Lisp中的尺寸标注
这让我疯狂(呃?)!我有一个很好的,长,Lisp与几乎每一个CAD命令在它。这基本上是一个学习练习,以熟悉Lisp中的命令应用程序。我到达最后一个部分,然后。。。我试过的都没用。我只是想替换一些先前删除的DIM。我的线不是p线。本节代码如下。谁能给我一个提示吗?我发现的讨论是关于p线的,或者完全超出了我的新手Lisper的头脑!谢谢你的建议!道格
; add 3 new dimensions
(setq dim1 (getpoint "\nFirst dim. point :"))
(setq dim2 (getpoint "\nNext dim. point :"))
(command "._dimlinear" "_non" dim1 "_non" dim2)
(alert "yes?")
(princ)
) ;end of program
必须指定尺寸标注的终点。文本
当做
塔瓦特 在命令行中尝试此操作。。。。。
(command "_.dimlinear" '(0 0 0) '(100 0 0) '(0 10 0)) 谢谢你的帮助,但我一点击“dim2”,它就跳转到我的提醒消息。我只画2D-我应该调整一下吗?我知道一定有一些方法来对齐文本和行,但似乎就是找不到。。。
再次感谢你,tho! 对这意味着你没有尝试过。。。所以完全接受它。
(setq dim1 (getpoint "\nFirst dim. point :"))
(setq dim2 (getpoint "\nNext dim. point :"))
(setq dim3 (getpoint "\n dim. Text location :"))
(command "._dimlinear" "_non" dim1 "_non" dim2 "_non" dim3 )
现在它就像一个魔咒,我知道我哪里出错了——这让它变得更好!我没有添加“dim3”行,只是用坐标替换了命令行。新手程序员犯的新手错误。
非常感谢!我现在要去了解更多!
道格 随时欢迎你。。
当做
塔瓦特
页:
[1]