SunnyTurtle 发表于 2022-7-6 09:25:45

Torient命令和Lisp

大家好
 
我对TORIENT命令有问题,该命令将文本和其他内容对齐到特定角度,例如一条线
 
现在我非常懒惰,有数百万的文本与不同的行对齐,我想做一个快捷方式,这个命令,我创建了这个lisp

(defun c:to () (command "torient"))

但我不为我工作,它说这是一个未知的命令。
 
但当我手动输入时,效果很好
 
如果这有帮助的话,有一个变量torient,我用
!torient

Cad64 发表于 2022-7-6 09:33:37

您不需要lisp例程。只需在pgp文件中添加一个命令别名。

Lee Mac 发表于 2022-7-6 09:36:23

为了完整起见:
 
由于TOrient是一个Express Tool命令,因此不能使用LISP中的命令函数调用它,相反,可以使用以下命令调用它:
 
(defun c:to nil (c:torient))

alanjt 发表于 2022-7-6 09:43:36

*咳嗽*同意*咳嗽*

SunnyTurtle 发表于 2022-7-6 09:45:45

这工作得很好,感谢它只是一个简单的lisp现在,但我有一个lisp,我的工作,可以使用这个命令以及
谢谢Lee Mac
你在哪里找到pgp文件,它像一个快捷注册表还是什么

Cad64 发表于 2022-7-6 09:55:38

 
pgp文件包含所有命令别名。可以从Autocad中访问它,方法是转到“工具”菜单>“自定义”>“编辑程序参数”(acad.pgp)。该文件将在记事本中打开,您可以编辑现有别名或在底部的“用户定义”部分添加自己的别名。
 
以下是通过Express Tools别名编辑器创建命令别名的另一种方法:http://www.ellenfinkelstein.com/AutoCAD_tips_create_alias.html
 
无论您选择以何种方式编辑pgp文件,编辑后都需要运行REINIT命令才能使更改生效。
 
注意:无论何时对任何文件进行更改,请务必保存未经编辑的备份副本,以防您把它搞砸了眨眼:

irneb 发表于 2022-7-6 09:59:33

如果使用Express Tools“Command Alias Editor”,则无需在之后运行ReInit:眨眼:

SunnyTurtle 发表于 2022-7-6 10:03:14

谢谢大家

SunnyTurtle 发表于 2022-7-6 10:09:40

您好,这是一段时间以来,我修复了这个问题,但我有同样的问题,但这次有点不同。
 
我正在尝试创建lisp的快捷方式。现在,如果我能够编辑这个lisp,我只需要更改(defun c:ncopy()。。。。。至(defun c:nc()。。。。。。。但我没有权限,或者至少我认为我没有权限。
 
那么,有没有一种方法可以简化lisp
这不起作用,我做错了什么

CHLUCFENG 发表于 2022-7-6 10:13:01

轻微修改。。。
 
4
页: [1] 2
查看完整版本: Torient命令和Lisp