wowan1314 发表于 2012-4-28 14:56:21

本帖最后由 wowan1314 于 2012-4-28 14:57 编辑

给你个参考的，默认长宽比3：1.    水平有限仅供参考。

Andyhon 发表于 2012-4-28 15:02:52

这是多岐性的一例
命题者知悉其意向所指
但见题者却会引伸出不同的分岐连想 ...

革天明 发表于 2012-4-28 16:25:12

(defun c:31 ()
(setq        p1        (getpoint "\n请输入第一点:")
        p2        (getpoint p1 "\n请输入第二点:")
        os_mode        (getvar "osmode")
        ang        (angle p1 p2)
        p3        (polar p2 (+ ang (* 0.5 pi)) (/ (distance p1 p2) 3.0))
        p4        (polar p1 (+ ang (* 0.5 pi)) (/ (distance p1 p2) 3.0))
)
(setvar "osmode" 0)
(command "_pline" p1 p2 p3 p4 "c")
(setvar "osmode" os_mode)
)

664571221 发表于 2018-8-31 11:22:28

你好这个能否引伸下，宽度在图中用鼠标量取，然后画长度方向，生成矩形

Andyhon 发表于 2018-8-31 12:21:31

内定 3.0
改以 GetDist 取值即可
页: 1 [2]
查看完整版本: 一个很简单的操作，但小弟不会写，求助各位高手！！