打断or延伸

自贡黄明儒

根据机械制图的规定，被遮盖的物体必需是虚线。我经常进行这一操作，在今日之前，我都是傻乎乎地执行br
命令，然后再选择对象成虚线。效率低下，好歹习惯了。
看了langs大师的《剪切成虚线》，我深受启发，居然还有这么好的操作。唯一的缺点是：“在位编辑”下有问题。
langs的是源码，很长，觉得自己写一个更容易懂。因为大部情况是打断，所以我采用两点打断
定义"4虚线层"，为了同PCCAD定义一致，看来langs大师早使用PCCAD了
;;;[功能] 打断成虚线
命令BRR
本程序只保证大部情况下的正确性

yz_bs_jj

好，思路巧妙

zhangkui9070

感谢分享，谢谢

纵横八方

挺不错 顶一下

Noangler

不错，谢谢分享！

hzyhzjjzh

谢谢楼主分享

aggdqty

感谢楼主分享           

菜鸟初来乍到

感谢楼主分享

hf423

命令: (LOAD "D:/MyCad/打断or延伸.fas")
打断成虚线 BRR
命令: brr

输入命令后，无任何反应，很可惜，跑不起来。
Win11+CAD2014


不过CAD2020跑起来了，显示如下，这是用了很多COMMAND语句么？


命令: (LOAD "D:/MyCad/打断or延伸.fas")
打断成虚线 BRR
命令: brr -linetype
当前线型: "ByLayer"
输入选项 [?/创建(C)/加载(L)/设置(S)]: _L
输入要加载的线型: DASHED 输入要查找的线型文件名 <acadiso.lin>:
线型“DASHED”已加载。
输入选项 [?/创建(C)/加载(L)/设置(S)]:
命令: layer
当前图层:  MyLayer
输入选项 [?/生成(M)/设置(S)/新建(N)/重命名(R)/开(ON)/关(OFF)/颜色(C)/线型(L)/线宽(LW)/透明度(TR)/材质(MAT)/打印(P)/冻结(F)/解冻(T)/锁定(LO)/解锁(U)/状态(A)/说明(D)/协调(E)/外部参照(X)]: new
输入新图层的名称列表: 4虚线层 输入选项 [?/生成(M)/设置(S)/新建(N)/重命名(R)/开(ON)/关(OFF)/颜色(C)/线型(L)/线宽(LW)/透明度(TR)/材质(MAT)/打印(P)/冻结(F)/解冻(T)/锁定(LO)/解锁(U)/状态(A)/说明(D)/协调(E)/外部参照(X)]: _c
新颜色 [真彩色(T)/配色系统(CO)] : 6
输入图层名列表，这些图层使用颜色 6 (洋红) <MyLayer>: 4虚线层 输入选项 [?/生成(M)/设置(S)/新建(N)/重命名(R)/开(ON)/关(OFF)/颜色(C)/线型(L)/线宽(LW)/透明度(TR)/材质(MAT)/打印(P)/冻结(F)/解冻(T)/锁定(LO)/解锁(U)/状态(A)/说明(D)/协调(E)/外部参照(X)]: lt
输入已加载的线型名或 [?] <Continuous>: DASHED
输入使用线型“DASHED”的图层名列表 <MyLayer>: 4虚线层 输入选项 [?/生成(M)/设置(S)/新建(N)/重命名(R)/开(ON)/关(OFF)/颜色(C)/线型(L)/线宽(LW)/透明度(TR)/材质(MAT)/打印(P)/冻结(F)/解冻(T)/锁定(LO)/解锁(U)/状态(A)/说明(D)/协调(E)/外部参照(X)]:
命令: _.UNDO 当前设置: 自动 = 开，控制 = 全部，合并 = 是，图层 = 是
输入要放弃的操作数目或 [自动(A)/控制(C)/开始(BE)/结束(E)/标记(M)/后退(B)] <1>: _BEGIN
命令:
>打断or延长*取消*
; 错误: 函数已取消

天凉好个秋

请问，总是显示点无效是因为什么呢