假设您正在使用以下代码向程序添加一些新功能: ObjectCreationStyle (strcase (cdr (assoc 3 BoundaryData)))
(if (equal ObjectCreationStyle "COMMAND")
(progn
(setq firstCenterPt (polar rowCenterPt (Degrees->Radians 45) distanceOnPath))
(gp:Create_activeX_Circle)
)
)
(不要担心这段代码的实际作用,如果有的话。它只是一个包含多个长变量和函数名称的示例。 Visual LISP 可以通过为您完成单词来节省一些击键。 使用可视 LISP 按匹配完成单词的功能
|
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2025-11-3 07:45
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.