社区 › AutoLISP/Visual LISP 编程技术 › 求一键画出水平或垂直的构造线

friendship12c 发表于 2014-3-6 15:01:42

求一键画出水平或垂直的构造线

请高手写一个简单程序，每次输入水平构造线都需要先输入“xline： 然后再输入 水平 ”V “或者竖直H 感觉很麻烦，请哪位专家可以写一个简单程序，实现 fv即出现竖直构造线，fg出现水平构造线，谢谢了！
下面是CAD的命令行
命令: xline
指定点或 [水平(H)/垂直(V)/角度(A)/二等分(B)/偏移(O)]: h
指定通过点:

ysq101 发表于 2014-3-6 15:37:56

(defun c:fv ()
(command "xline" "v")
(princ)
)


(defun c:fg ()
(command "xline" "h")
(princ)
)

q3_2006 发表于 2014-3-6 15:42:01

(defun c:fg () (command "xline" "h"))
(defun c:fv () (command "xline" "v"))

【KAIXIN】 发表于 2014-3-6 18:14:45

论坛早有现成，我的工具箱2011就有，适合未入门者

hao3ren 发表于 2014-3-7 10:25:55

f+g+空格=三键

1993063 发表于 2014-3-8 14:25:04

hao3ren 发表于 2014-3-6 16:25 static/image/common/back.gif
f+g+空格=三键

啥意思,没明白.

friendship12c 发表于 2014-3-18 21:28:42

非常感谢，我也不太懂开发，不知道怎么为论坛做贡献！非常感谢！

查看完整版本: 求一键画出水平或垂直的构造线