Lee Mac 发表于 2022-7-5 17:12:11

加载完所有内容后,如果在命令行中键入“jmos”,会发生什么?

jmos4 发表于 2022-7-5 17:13:05

你好
 
 
我添加了快速加载,这样我可以键入JMOS并将其加载,但它会不断加载,直到我点击escape。如果我能解决这个问题,我可以接受它,而不是自动加载,只是他们改变了事情,现在lisp文件已经正常工作了多年,现在不会了。
 
 
当做

Lee Mac 发表于 2022-7-5 17:17:45

 
我意识到了这一点,但我怀疑您的需求加载存根并没有重新定义c:jmos函数,这就是为什么当存根被重复评估时,该函数正在无限循环中加载。因此,我建议您改为使用我的自动加载功能来定义需求加载存根,然后尝试使用命令(这将导致程序加载);我的自动加载功能考虑了存根没有被重新定义的可能性,并将提醒您这样做。

tombu 发表于 2022-7-5 17:19:52

 
在将其添加到ACAD中加载之前,是否已将其从启动套件中删除。LSP?
 
当你进入时会有什么回报!c: jmos在命令行?

jmos4 发表于 2022-7-5 17:25:00

大家好,
 
 
我确实从启动套件中删除了lisp,尽管它似乎没有从那里加载,但我可以加载它并加载一次,也就是说,如果我使用quick命令,它会像你说的那样进入一个循环。
 
 
我在Marvic Lisp中尝试了自动加载行,但它不加载Lisp文件,不确定这是否重要,但它是在JMOS运行时加载的。lsp加载它告诉您,所以即使我启动AutoCAD的新会话并点击f2,我也可以看到它没有加载。
 
 
看起来这不应该是一个很大的痛苦去加载,做1或2个绘图是不错的,但必须打开其中70个,它变得很快,通过加载例程或快速加载和点击逃生每次
 
 
我是否可以在JMOS lisp的末尾添加一个例程来终止循环?
 
 
当做

Lee Mac 发表于 2022-7-5 17:26:47

 
正如我在之前的文章中所描述的,自动加载表达式将定义一个需求加载存根,当您调用命令时,该存根将加载程序,因此您在启动时不会看到任何加载消息(这就是为什么我问您在加载完所有内容后调用命令时会发生什么,但您忽略了这个问题)。

tombu 发表于 2022-7-5 17:30:49

问题必须出在马尔维克Lisp程序的地方。你试过李的自动装弹机吗?
尝试在命令行中用(load“jmos.lsp”)加载它,并在命令行中查找错误。
 
我个人在Ribbon中自动加载宏。
^C^C^P(或C:jmos(加载“arrow.lsp”));jmos公司
仅在尚未加载的情况下加载“jmos.lsp”。然后运行jmos。

jmos4 发表于 2022-7-5 17:33:40

你好
 
 
我不知道你的意思,但在Marvic lisp中尝试了自动加载,然后调用它(在命令行中键入jmos),它再次执行失控加载,与快速加载的操作完全相同。它加载一次的唯一方式是通过appload,不知道为什么这样做有效,而其他方法不起作用。
 
 
如果有一种方法可以在加载1次后停止它,那就太好了,有趣的是它在2012年自动加载,就像R13之后一样,所以不确定是什么改变了它的行为方式,但至少可以说它很烦人。
 
 
我可能可以添加一个自定义工具栏按钮/宏,但我有点老派,喜欢键入90%的命令,通常使用2-3位缩写
 
 
当做

tombu 发表于 2022-7-5 17:36:30

很明显马尔维克Lisp程序是个问题,试试李的自动装弹机吧。

jmos4 发表于 2022-7-5 17:40:16

你好
 
 
我真的很确定Marvic不是问题所在,因为它工作了很多年,最初,Marvic有一个用户ID,它似乎在AutoCAD的较新版本中没有维护,当你打开一个图形时,它会加载一个用户特定的lisp文件(jmos.lsp),它会加载Marvic lisp,然后加载用户lips,直到AutoCAD的较新版本(可能是2010年以后)才出现问题?。
 
 
(if(findfile“f:/lsp/users/userid.lsp”)
(加载“f:/lsp/users/userid.lsp”)
(princ“\n\n*******找不到F:/LSP/USERS/USERID.LSP文件。*******\n\n”)
)
 
 
因此,我添加了快速加载,以下是我使用的具有相同失控效果的两个:
 
 
(defun c:jmos()(quickld“jmos”)(if loadok(c:jmos))(princ))
 
 
本文建议:
(defun c:jmos()(if(/=“ERROR”(load“jmos”“ERROR”))(c:jmos))(princ))
 
 
 
我试着将自动加载添加到Marvic lisp的末尾:
 
 
(自动加载“jmos”(“jmos”))
 
 
同样的逃跑
 
 
JMOS lisp不一定是一个函数,而只是加载我对某些lisp例程的偏好的函数
 
 
就像我说的,我不知道为什么它不能像以前那样工作,在过去的十年里,我真的没有经常使用AutoCAD,但是当我这样做的时候,如果能让它工作起来,而不必每次都应用或逃避,那就太好了。
 
 
感谢您的回复,
 
 
当做
页: 1 [2]
查看完整版本: 反复加载LIsp文件