【转帖】lisp函数
 

lisp函数
lisp函数
定义一个lisp函数。功能：使用全局函数创建一个简单实体-圆，返回圆的实体数据链表，圆心和半径由用户输入。
这个程序怎么做？谁能给我详细的代码？
;画一个半径为12的circle
(createcircle(getpoint)12.0)

通过工具菜单->加载应用程序 可加载该程序，然后可直接在命令行输入相关命令运行。如需要每次启动时均加载该程序，则可以将该文件放在启动组中。
为什么无法加载呀？有没有原代码？
代码在12楼