[求助]：尺寸标注的LISP

yaya-54 · 发表于 2005-6-7 11:00:29

您需要登录才可以下载或查看，没有账号？立即注册

×

我想标注图下的尺寸，可是一般我都是用辅助线的帮助才可以把508这道尺寸线标注出来，有没有LISP程序，可以直接达到第二个图那样的效果。谢谢!

啵浪鼓 · 发表于 2005-6-7 12:59:39

确实是这样,需用辅助线来完成
也可以用程序来完成,先将ucs改成与参考直线同轴后再标注

yaya-54 · 发表于 2005-6-7 13:58:18

应该可以用LISP编一个的吧，以前我同事有一个程序可以不用辅助线的，可是后来丢了。这里的高手帮下忙吧。

啵浪鼓 · 发表于 2005-6-7 17:29:37

一个简单范例:
(defun c:qw ()
(setq s (entsel))
(command "ucs" "e" s)
(command "dimlinear" pause pause pause)
(command "ucs" "w")
(princ))

xyp1964 · 发表于 2005-6-7 19:04:36

最好加上提示：(setq s (entsel"\n选择对正参照实体 : "))

yaya-54 · 发表于 2005-6-8 13:31:11

4楼的，我把你的命令COPY了做了个LSP并加上了五楼的命令，可是好像不能达到我想要的效果，因为我对LSP不懂，所以麻烦告诉我下要怎么操作。谢谢！　

winabcd · 发表于 2005-6-8 14:30:55

我试过，4楼的方法是可以的，

yaya-54 · 发表于 2005-6-9 08:47:36

照4楼的方法又试了下，可以了，谢谢！

wyj123 · 发表于 2005-6-12 06:01:47

我一般用标注断开工具，比作辅助线快。

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：尺寸标注的LISP