git_thailand 发表于 2022-7-6 07:33:48

如何使用其他方法

>")
(setvar“OSMODE”15359)
(setvar“CLAYER”OldLay)
 
);结束时
 
);对不起,我英语不好

Dadgad 发表于 2022-7-6 07:46:56

也许你可以用李的lisp?
 
http://www.lee-mac.com/boxtext.html
 
谢谢李!

git_thailand 发表于 2022-7-6 07:59:08

我想将这个lisp应用于其他方法。
 
 
***对不起,我英语不好***

MSasu 发表于 2022-7-6 08:07:26

首先,你需要准确地描述你想要实现的目标——如果用英语很难做到,那么试着贴一张描述性的图片。
 
关于你发布的代码,我有一些评论:
[列表]
[*]缺少UDIST函数的源。
[*]没有退出WHILE循环的条件-用户需要结束运行,或者让它在没有输入点的情况下崩溃。请尝试以下操作:
[/列表]
(while (and (setq pt1 (getpoint "\nPick first point : "))
         (setq pt2 (getpoint "\nPick End point : ")))







...
[列表]
[*]为什么在存储用户设置时用内置值替换OSMODE系统变量?
[/列表]
(setvar "OSMODE" 15359 OSN)
 
 
无意冒犯,但人们可能不愿意在这方面帮助你,因为在过去,你开始了许多讨论,从来没有提供足够的信息和/或反馈;我仍然好奇在这个问题上哪个解决方案是正确的。

git_thailand 发表于 2022-7-6 08:12:53

 
我很抱歉

MSasu 发表于 2022-7-6 08:19:15

重点不是让你感到抱歉,而是说服你提供更多关于你的帖子的信息和反馈。请帮助我们帮助你。

git_thailand 发表于 2022-7-6 08:31:02

http://s1032.photobucket.com/albums/a409/git_thailand/?action=view&current=QTB.mp4

git_thailand 发表于 2022-7-6 08:34:51

vdo中的lisp
页: [1]
查看完整版本: 如何使用其他方法