你们怎么管理你们的LI
你们是如何在AutoCAD中管理LISP的?目前我做的是:-
1) 应用程序命令自动加载一些我常用的LISP。
a) 输入命令-用于日常LISP
b) 快捷方式图标按钮-对于偶尔但必要的LISP,我必须创建一个带有脚本的快捷方式(因为我记不起这么多)来激活它们
2) 将LISP从windows资源管理器拖动到autocad中
仅在特定任务期间使用
3) AutoCAD工具选项板
我也尝试过这个&
赞成的意见
-我可以完整描述LISP的功能
欺骗
-一直打开它会占用大量的工作空间
-由于它一直处于关闭状态,每次需要访问LISP时,我都需要按CTRL+3
无论如何,主要是1b)。LISP的类型越来越多,甚至越来越难记住快捷方式图标的含义,即使会弹出一个描述,但需要时间才能找到我需要的。
因此,希望获得有关如何在AutoCAD中高效管理LISP以实现快速访问的建议。
有什么建议吗?
谢谢 我没有使用那么多,但我把它们存储在一个路径文件夹中。然后,我需要的几个将被调用并从命令行加载。
(load "myLisp")
myLisp
然后,我在桌面上有一些(两个监视器),可以拖到当前窗口中。
最后,在工具选项板上有一对被设置为“自动隐藏”。这只有当你把rusor放在上面时才可见,所以只占屏幕的一小部分。调色板也可以放在第二个屏幕上,但我经常使用它,所以不想离开主屏幕。 我的桌面上有一个lisps文件夹(其中许多是Lee Mac)。AutoCad启动时,所有LISP都会自动加载到启动套件中。
然后,我有两个自定义工具栏,其中包含我每天/每周使用的最常见的lisp命令。 对于我不记得的事情,最有帮助的一件事是,多年来,我一直非常一致地让每个lsp文件的第三行包含对程序的注释/描述。
;=======================================================================
; BLK-FIXG.Lsp Mar 10, 2014
; Search BLOCK Table By DXF Pairs And Then Update those BLOCKs By Group
然后,我做了一个基于通配符模式的搜索例程。lsp名称或仅搜索全部。术语或短语的lsp。
关于加载,快捷方式样式1:
acad。lsp(acaddoc.lsp)
;;;MILLWORK
(defun c:mcb ()(if (not mcb_)(load "MILL-CB"))(mcb_))
(defun c:mct ()(if (not mct_)(load "MILL-CT"))(mct_))
(defun c:mws ()(if (not mws_)(load "MILL-STR"))(mws_))
(defun c:mi ()(if (not mi_)(load "MILL-ISL"))(mi_))
HTH-David
这意味着您可以创建新的命令[使用脚本命令,例如c^c^(加载……)测试;]有图标吗?
你能就此私奔吗?谢谢 Casacading菜单是另一种简单的方法。这些可以是sub-sub等。
确切地
我已经习惯了,现在我忘记了这一步。
类似这样:
[颜色=#8b4513]=======================================================================;SL.LSP 2014年5月9日;基于文件名和描述搜索;============独立程序======================================(defun c:sl(/path st dir ss ll sw1 sw2 sw3 l3 rf dl i)(setq path“/acad/ut/”(initget 1“*前缀通配符”(setq st(getkword“\n文件搜索标准-前缀/通配符/*:“)(cond(color=st“*” (setq ss“*”)(setq dir(mapcar的strcase(dos_dir b](strcat path“*.lsp”[红色))[(=st“Prefix”(而(不是(SNSS)(setq ss(strcase(getstring“\nLSP文件前缀:“]]](setq dir b](mapcar strcase()dos\u dir(strcat路径ss“*.lsp”((=st“通配符”)(setq ss(strcase(getstring“\n Wildcard图案:(setq dir b](mapcar strcase(dos\u dir b]strcat路径“*.lsp”)(foreach l dir(wcmatch(substr l 1(-(strlen lstrlen ll)4ss(setq ll(setq dir ll)(if dir(progn(setq sw1(getstring t“\n搜索短语1:)(if(=sw1 (setq sw1“*”sw2“”sw3“”(progn b](setq sw2(getstring tF]“\n搜索短语2: (如果(=sw2(setq sw3(progn b](setq sw3(getstring t“\n搜索短语3:(princ“\n搜索…\n”(setq dir(acad\U strlsort dir(foreach f dir(strcat“\r”(substr f 1(--([strlen f4)(setq rf(open b](strcat路径f“r”)[[颜色=绿色](重复3(setq l3(read line rf((和l3(;”(substr l3 1 1)(>(strlen l3)3(foreach s(list sw1 sw2 sw3(和(/=s“”(wcmatch(strcase l3(strcat“*”=OLIVE](小写s)“*”(setq dl[c I never use the startup suite.
I load frequently used stuff with ACADDOC.LSP from my pathed LISP folder, that's not very many these days. The rest I usually drag and drop.
Like dbroada, my palettes are also Autohide as small buttons on the right, along with Properties, XREF Manager, Design Center and Calculator.
Also, like dbroada, I will type the code on the commandline.
P.S. Previously I did like BIGAL, menus, that's an excellent way if you have a lot you use frequently.
页:
[1]
2