cal命令在LISP中如何调用,
比如在这种情况下,我不知道该怎样调用.请指教.(defun C:ZDA()<BR> (command "cal" "p1=(cur+cur)/2" )<BR> (command "cal" "p2=(cur+cur)/2" ) (setq calset "(cur+cur)/2")
(setq p1 (cal calset))
calset為字串 楼上的,没有这个函数吧 (if (null cal)(arxload"geomcal")) geomcal又是什么东西?你不上传一个,别人怎么加载? 老大,您在程序中加入這一行就加載了,類似(vl-load-com) geomcal.arx是cad安装目录下的数学计算模块,一般启动cad已经自动加载,有时候因为一些原因没加载的,用楼上朋友所说的(if (null cal)(arxload"geomcal")) 加载,以便cal命令能正常调用。平常我们在cad中用的命令command:cal就是调用了这个东东。
调用cal的方法
Command: cal<BR>>> Expression: (3+4)/2<BR>3.5
Command: (c:cal "(3+4)*3/2")<BR>10.5<BR>Command: (cal "(3+4)*3/2")<BR>10.5
程序中可用(cal “表达式字符串”)或(c:cal "...")直接来调用。 有长见识了 此类模块即无说明,也很少见提起,什么地方有这方面知识的介绍? 帮助文件中就可以找到
页:
[1]
2