绘制多边形及圆弧(可批量)同时进行尺寸标注;统计多边形及圆弧的数据到Excel文件

jingnanbei · 发表于 2019-7-18 23:59:31

本帖最后由 jingnanbei 于 2019-7-19 00:03 编辑

老师，你好！
可以根据已知的弦长**高，批量绘制圆弧，并标注导出弦长**高和半径吗？
比如下图那样：

QQ图片20190718234450.png

jingnanbei · 发表于 2019-7-19 00:08:29

老师，你好！
可以根据已知的弦长、弦高，批量绘制圆弧，并标注导出弦长、弦高和半径吗？

风青c · 发表于 2019-7-19 07:11:50

风青c 发表于 2019-7-18 23:03
有些四边形导出的四边数据顺序为顺时针、有些为逆时针排列，所选的边有些为侧边，有些为底边？下面这个是 ...

有没有办法改变已经绘制好图形的时针？底边是哪个都无所谓。

jingnanbei · 发表于 2019-7-19 07:57:38

老师，已知弦长、弦高，可以批量绘制圆弧并标注导出弦长、弦高、弧长和半径吗？

cbwt8116 · 发表于 2019-7-19 09:51:39

支持！！！！！！！！

王鹏_pBZlo · 发表于 2019-7-19 16:50:23

风青c 发表于 2019-7-19 07:11
有没有办法改变已经绘制好图形的时针？底边是哪个都无所谓。

多义线端点反转

王鹏_pBZlo · 发表于 2019-7-19 17:07:16

风青c 发表于 2019-7-19 07:11
有没有办法改变已经绘制好图形的时针？底边是哪个都无所谓。

仅适用于封闭多义线,且每段均为直线
(defun c:plback( / pl par npar dxf10 lst cele i j)
(setq pl (car (entsel "\n选择需反向的多义线:")))
(setq par (entget pl) lst nil)
(while (setq dxf10 (assoc 10 par))
(setq par (cdr (member dxf10 par)))
(setq lst (append lst (list dxf10)))
) (setq lst (append (list (car lst)) (reverse (cdr lst))))
(setq par (entget pl) npar nil i -1 j -1)
(while (setq cele (nth (setq i (1+ i)) par))
(if (/= (car cele) 10)
(setq npar (append npar (list cele)))
(setq npar (append npar (list (nth (setq j (1+ j)) lst))))
)
) (entmod npar) (princ)
)

jingnanbei · 发表于 2019-7-19 18:13:53

老师，你好！
可以根据已知的弦长、拱高，批量绘制圆弧，并标注导出弦长、拱高、弧长和半径吗？

235851bxxwaxvzezgeviwm.png.thumb.jpg

jingnanbei · 发表于 2019-7-19 18:20:24

王鹏_pBZlo 发表于 2019-7-19 17:07
仅适用于封闭多义线,且每段均为直线
(defun c:plback( / pl par npar dxf10 lst cele i j)
(setq pl ( ...

老师，你好！
已知弦长、拱高，可以批量绘制圆弧并标注导出弦长、拱高、弧长和半径吗？

王鹏_pBZlo · 发表于 2019-7-19 19:01:10

jingnanbei 发表于 2019-7-19 18:20
老师，你好！
已知弦长、拱高，可以批量绘制圆弧并标注导出弦长、拱高、弧长和半径吗？

你能不能一次把话说完，原来没说要弧长啊

来自: 微社区

王鹏_pBZlo · 发表于 2019-7-19 19:02:45

jingnanbei 发表于 2019-7-19 18:20
老师，你好！
已知弦长、拱高，可以批量绘制圆弧并标注导出弦长、拱高、弧长和半径吗？

插件已更新，只是没有输出弧长参数
来自: 微社区

jingnanbei · 发表于 2019-7-19 20:10:53

王鹏_pBZlo 发表于 2019-7-19 19:02
插件已更新，只是没有输出弧长参数

老师，对不起，都是我的错，不要生气，请您原谅，行不？
您可以把弧长也标注并导出吗？
另外“按已有编号输出”按钮，对随意画的圆弧不起作用，可以修改一下吗？谢谢

王鹏_pBZlo · 发表于 2019-7-19 20:16:01

jingnanbei 发表于 2019-7-19 20:10
老师，对不起，都是我的错，不要生气，请您原谅，行不？
您可以把弧长也标注并导出吗？
另外“按已有编 ...

弧长无法标注,但可以输出. 已加入更新.
程序可以输出的圆弧是包括弦的闭合多义线,即程序绘制出的那种

jingnanbei · 发表于 2019-7-19 20:34:48

王鹏_pBZlo 发表于 2019-7-19 20:16
弧长无法标注,但可以输出. 已加入更新.
程序可以输出的圆弧是包括弦的闭合多义线,即程序绘制出的那种

谢谢老师！老师辛苦了！

王鹏_pBZlo · 发表于 2019-7-19 20:47:07

风青c 发表于 2019-7-19 07:11
有没有办法改变已经绘制好图形的时针？底边是哪个都无所谓。

这段程序已放在插件里,你记住命令是PLBACK就行了

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

[工具] 绘制多边形及圆弧(可批量)同时进行尺寸标注;统计多边形及圆弧的数据到Excel文件

点评

点评

点评