hosyn 发表于 2022-7-5 22:54:22

以下m有什么帮助吗

我想把这个宏改成lisp文件,谢谢你的帮助。

^C^C_-layer;set;0;;-layer;on;0ro;;-layer;off;0pe,0ha,0te;;
^C^C_-plot;;;2;;;;;   --->> that 2 is page name in PAGE SETUP MANAGER
^C^C_-layer;set;0;;-layer;on;0pe;;-layer;off;0te,0ha,0ro;;
^C^C_-plot;;;2;;;;;   --->> that 2 is page name in PAGE SETUP MANAGER
^C^C_-layer;set;0;;-layer;on;0te;;-layer;off;0pe,0ha,0ro;;
^C^C_-plot;;;2;;;;;   --->> that 2 is page name in PAGE SETUP MANAGER
^C^C_-layer;set;0;;-layer;on;0ha;;-layer;off;0te,0pe,0ro;;
^C^C_-plot;;;2;;;;;   --->> that 2 is page name in PAGE SETUP MANAGER

MSasu 发表于 2022-7-5 23:03:37

分号(“;”)在剧本中有意义;对于AutoLISP,备选方案必须以字符串形式提供输入(这意味着确认),分别在提示符的双引号(“”)中提供。
下面是第一句话的转换;使用它转换剩余的:
(command "_-LAYER" "_SET" "0" ""
      "_-LAYER" "_ON" "0ro" ""
      "_-LAYER" "_OFF" "0pe,0ha,0te" "")

hosyn 发表于 2022-7-5 23:15:43

Greattttt,thanx
我不知道该如何感谢你对我的帮助。。又是XXXXX。
 
那么lisp的plot命令呢??

^C^C_-plot;;;2;;;;;   --->> that 2 is page name in PAGE SETUP MANAGER

BIGAL 发表于 2022-7-5 23:27:06

看到你的其他帖子,版主会要求你不要发布两次。

MSasu 发表于 2022-7-5 23:36:30

Hosyn,你能把你试图把情节动作翻译成AutoLISP吗?我将非常乐意帮助您调试它。

BIGAL 发表于 2022-7-5 23:39:12

Hosyn^C^C_-图;;;2.代码在我发布的链接中,这里也发布了许多其他通过lisp绘图的示例。你看了吗?
 

(COMMAND "-PLOT" "Y" "" plottername
   "A3" "m"    "LANDSCAPE"    "N"   "W""-6,-6"    "807,560" "1=2""C"
       "y"   "Designlaser.ctb" "Y" "N" "N" "N" "N" "N" "y"      )
)

hosyn 发表于 2022-7-5 23:46:15

从Thanx到BIGAL和Msasu
你帮了我很多忙,我试着测试代码,一切都很好,但我不知道如何定义命令宏的快捷键,例如该宏:

^C^C_-plot;;;2;;;;;

我想定义键“pl”,这意味着当我键入它时,宏运行???并且有必要将宏更改为lisp代码以定义键。

BIGAL 发表于 2022-7-5 23:55:30

第一个PL是为“PLINE”保留的。您可以更改它,但我不建议您这样做。将此复制到acaddoc。lsp和它应该自动加载。查找Acad。pgp它将有速记键击的基本列表。
 

; replace plottername with correct plotter and designlaser with correct CTB
(defun c:pll ()
(COMMAND "-PLOT" "Y" "" plottername
   "A3" "m"    "LANDSCAPE"    "N"   "W""-6,-6"    "807,560" "1=2""C"
       "y"   "Designlaser.ctb" "Y" "N" "N" "N" "N" "N" "y"      )
)
)
页: [1]
查看完整版本: 以下m有什么帮助吗