作者omashimaroo (哇细贱兔~~*)
看板Cad_Cae
标题Re: [问题] 问一个初学者AUTOCAD问题
时间Wed Feb 11 17:28:52 2009
哭!!!还是是不出来
我先把我的步骤打出来
一开始工具===>autolisp=====>visual lisp编辑器
然後找先前大大有po的程式码贴上去
; for theta=0 to 360 step dt do
(setq no 100)
(setq theta 0.0 dt (/ 360.0 no))
(setq dt (+ dt (/ dt 10.0)))
(setvar "cmdEcho" 0)
(command "pline")
(while (<= theta 360.0)
(setq t1 (* (/ theta 180.0) pi))
(setq y1 (sin t1))
(command (list t1 y1))
(setq theta (+ theta dt))
); end of while()
(command "")
(princ)
然後储存在support里面
档名为1234
然後工具=====>autolisp====>载入应用程式====>选取1234.lsp案载入
再把档案拉到启动套件
然後到指令区打1234
结果出现不明的指令「1234」。请按 F1 取得说明。
请问各位大大~~哪里出问题!?!?!?!?!
我是用Civil 3D - Traditional Chinese 作为 AutoCAD 2008这个版本(从学校抓的)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.116.155.63
※ 编辑: omashimaroo 来自: 140.116.155.63 (02/11 17:39)
1F：推 Qupi:在程式码的最上面加上 (defun c:1234 ( / ) 02/11 18:29
2F：→ Qupi:然後在程式码的最下面加上 ) 02/11 18:29
3F：→ omashimaroo:喔喔喔~~~乾虾~~真的很乾虾!!!!! 02/11 18:49
4F：推 camelot1123:虽然很不礼貌 可是我很好奇初学者怎麽会直接碰lisp?? 02/11 18:57
5F：推 sam37520:lisp初学者? 02/11 23:05
6F：→ omashimaroo:嗯~~~LISP初学者!!!!! 02/11 23:36
※ 编辑: omashimaroo 来自: 140.116.155.63 (02/13 17:46)