如何使用differ调用命令

hamidciv · 发表于 2022-7-5 22:22:53

嗨，亲爱的朋友们
：（如何在autolisp中使用不同的方法绘制对象？
例如，在下面的正常命令弧中
（命令“arc”s c e“c”）
s=起点
c=第二点
e=终点

在这种方法中，使用“开始”“中心”“结束”绘制圆弧，但我希望使用“开始”“中心”“结束”绘制圆弧
开始中心角度，如何在autolisp中执行此操作？
谢谢

hanhphuc · 发表于 2022-7-5 22:29:59

哈米西夫您好，
作为初学者，绘制一条弧，通过（entget（car（entsel））浏览dxf assoc列表
示例：由大师David Bethel编写
;;;http://www.cadtutor.net/forum/showthread.php?83671-LWPOLYLINE的强制DXF&高亮显示=强制

HTH公司

hamidciv · 发表于 2022-7-5 22:34:53

你好，hanhphuc
我想你不明白我的意思，我想用星心角法画圆弧，这也是autocad可用的工具栏。
谢谢

hanhphuc · 发表于 2022-7-5 22:43:01

对不起，我误解了。。

copy


(COMMAND "ARC" s "C" c "A" (- (angle c e) (angle c s)))

如果使用“命令”（图形对象等）在代码中，如果启用了“osmode”，请小心。这就是为什么我们更喜欢entmake或vla addArc

copy


(defun c:test (/ s c e); entmake
(if (and (setq s (getpoint "\nStart.. "))
 (setq c (getpoint "\nCenter.. "))
 (setq e (getpoint "\nEnd.."))
 ) ;_ end of setq
 (entmakex (list '(0 . "ARC")
          (cons 10 c)
          (cons 40 (distance c s))
          (cons 50 (angle c s))
          (cons 51 (angle c e))
          ) ;_ end of list
    ) ;_ end of entmakex
 ) ;_ end of if
)

hamidciv · 发表于 2022-7-5 22:45:03

非常感谢亲爱的hanhphuc
我认为代码不正确
（命令“ARC”s“C”C“A”（（角度C e）（角度C s）））

mostafa badran · 发表于 2022-7-5 22:54:07

试试这个。

copy

(command "arc" "c" pause pause "angle" pause "")

hamidciv · 发表于 2022-7-5 23:00:45

尊敬的mostafa：
如果可能的话，请详细解释这个命令？
你的停顿是什么意思？

mostafa badran · 发表于 2022-7-5 23:05:19

暂停意味着允许用户输入，暂停命令以允许用户直接输入（通常是点选择或拖动）。

hanhphuc · 发表于 2022-7-5 23:08:43

对不起，如果带有变量的自动化“命令”不工作，可能是由于环境设置“angdir”或命令输入弧度或度数中的角度单位，反之亦然？

@莫斯塔法·巴德兰，谢谢

mostafa badran · 发表于 2022-7-5 23:13:38

这是我的荣幸。

[编程交流] 如何使用differ调用命令

发表回复

精选推荐