iconeo 发表于 2022-7-5 19:25:30

这个节目可以看吗？
 
谢谢

David Bethel 发表于 2022-7-5 19:26:31

作为替代：
 

(defun c:test (/ x hx bn ip)
(initget 7)
(setq x (getdist "\nOuter Radius:   "))
(setq hx (* x 0.5))

(entmake (list (cons 0 "BLOCK")(cons 2 "*U")(cons 70 1)(list 10 0 0 0)))
(entmake (list (cons 0 "POLYLINE")(cons 8 "0")(cons 62 2)(cons 66 1)(cons 10 (list 0 0 0))(cons 70 1)(cons 40 x)(cons 41 x)))
(entmake (list (cons 0 "VERTEX")(cons 8 "0")(cons 62 2)(cons 10 (list (- hx) 0 0))(cons 40 x)(cons 41 x)(cons 42 1)))
(entmake (list (cons 0 "VERTEX")(cons 8 "0")(cons 62 2)(cons 10 (list hx 0 0))(cons 40 x)(cons 41 x)(cons 42 1)))
(entmake (list (cons 0 "SEQEND")(cons 8 "0")(cons 62 2)))
(setq bn (entmake (list (cons 0 "ENDBLK")(cons 8 "0"))))

(while (setq ip (getpoint "\nINSERT Point <Enter to Exit>   "))
      (entmake (list (cons 0 "INSERT")(cons 2 bn)(cons 10 ip))))

(prin1))

 
 
-大卫

jasonle215 发表于 2022-7-5 19:32:48

 
你好，Iconeo，
感谢您在上一篇文章中对动态块的帮助。我正在使用预制混凝土板，只是想找到一种更快绘制立面图的方法

jasonle215 发表于 2022-7-5 19:33:59

 
谢谢大卫。代码有效！！！我真的很感谢你们的帮助

rlx 发表于 2022-7-5 19:38:07

 
 
查看关于RlxIso的线程

Dadgad 发表于 2022-7-5 19:42:09

 
我忍不住想知道Iconeo会如何绘制这些预制板？

iconeo 发表于 2022-7-5 19:44:57

呜呼，我猜对了钢筋嵌入！
 
如果我有任何选择。。。在Revit中
 
如果在AutoCAD中，我通常只使用具有可见性状态的简单动态块。那些该死的架构师总是在改变事情，所以它让事情变得灵活。在一个1000英尺的仓库里改变面板尺寸并不是一件有趣的事。。。
 
为了灵活性，我会处理块外的任何阵列。
 
干杯

David Bethel 发表于 2022-7-5 19:49:00

 
 
很高兴你成功了-大卫
页: 1 [2]
查看完整版本: entmake甜甜圈