qq25469005 发表于 2019-3-27 10:28:34

-------------------------------------------

本帖最后由 qq25469005 于 2023-2-22 16:23 编辑

--------------------------------------------------------------------------

1291500406 发表于 2019-3-28 09:33:48

本帖最后由 1291500406 于 2019-3-28 09:47 编辑

打断圆和打断椭圆需先转化为直线，再用break打断，以下是转换程序，和打断程序，打断为一点打断，和两点打断

qq25469005 发表于 2019-3-29 14:37:35

1291500406 发表于 2019-3-28 09:33
打断圆和打断椭圆需先转化为直线，再用break打断，以下是转换程序，和打断程序，打断为一点打断，和两点打 ...

感谢你的工具，我试试看哈

qq25469005 发表于 2019-3-29 14:40:07

就是这个...........

1291500406 发表于 2019-3-29 22:13:01

本帖最后由 1291500406 于 2019-3-29 22:17 编辑

qq25469005 发表于 2019-3-29 14:40
就是这个...........
(defun c:bb ()(setvar "cmdecho" 0)(setq a(getreal "\n必强提示:指定断口大小"))(if a(progn(while(setq b(getpoint "\n必强提示:指定位置"))(command "circle" b "d" a)(setq ss (entlast))(command "_trim" ss "" (entsel "\n必强提示:选择剪切对象:") pause )(command "erase" ss ""))))(princ))
页: [1]
查看完整版本: -------------------------------------------