求助，画焊缝剖面

414249149

求助大神帮编一个画焊缝剖面的lisp，或者现有的分享一下也行

1、输入命令
2、输入角焊缝高度 ，默认为4，如不输入则直可以开始画一个夹角
3、根据画夹角线的顺序，顺时针角度内生成弧线（新建图层：配件层，如已有该图层则不新建图层），每段弧线间距1mm
4、删除画的夹角线
5、回车/ESC 退出程序执行，否则继续开始画夹角
焊缝高度数据有记忆功能，方便下次使用