Torient命令和Lisp

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

大家好

我对TORIENT命令有问题，该命令将文本和其他内容对齐到特定角度，例如一条线

现在我非常懒惰，有数百万的文本与不同的行对齐，我想做一个快捷方式，这个命令，我创建了这个lisp


[font=Tahoma](defun c:to () (command "torient"))[/font]

但我不为我工作，它说这是一个未知的命令。

但当我手动输入时，效果很好

如果这有帮助的话，有一个变量torient，我用

copy

!torient

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

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

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

为了完整起见：

由于TOrient是一个Express Tool命令，因此不能使用LISP中的命令函数调用它，相反，可以使用以下命令调用它：

copy

(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

轻微修改。。。

copy

[编程交流] Torient命令和Lisp

发表回复

精选推荐