// Break Double - break entities between 2 bounding entities. MACRO BD |ECOFF;SNAPOFF :LP1 GE p1;^D1st boundary [Done] IFERR Done GE p2;^D2nd boundary :LP2 GE p3;^DSegment to remove [Done] IFERR LP1 BREAK p3 INT p1 p3;INT p2 p3 GO LP2 :Done ECON ENDM ----------------------------------------------------------------- // HiDe a segment of an entity between it's intersections with two other entitities. The color of the selected segment will be changed to color 1, the line style will be changed to "HIDDEN" but only if a line style named "HIDDEN" exists and the layer will be changed to "HIDDEN" but only if a layer named "HIDDEN" exists.. MACRO HD |ECOFF;SELBYE;SNAPOFF :LP1 GE p1;^D1st boundary [Done] IFERR Done GE p2;^D2nd boundary :LP2 GE p3;^DSegment to hide [Done] IFERR LP1 SPLIT p3 INT p1 p3;;p3 INT p2 p3 CHANGEC p3;;1 CHANGELS p3;;HIDDEN CHANGEL p3;;HIDDEN GOTO LP2 :Done ECON ENDM ----------------------------------------------------------------- // Trim Double - trim entities between 2 bounding entities. MACRO TD |ECOFF;SNAPOFF :LP1 GE p1;^D1st boundary [Done] IFERR Done GE p2;^D2nd boundary :LP2 GE p3;^DSegment to trim [Done] IFERR LP1 TRIM p3 INT p1 p3;;p3 INT p2 p3 GO LP2 :Done ECON ENDM ----------------------------------------------------------------- Change entity properties to the same AS a sample. Note: You can not change the line width using CHANGELW p2;;LIKE;p1 MACRO AS |ECOFF;SELBYE :L1 GE p1 ^DPick entity to match [Done] IFERR Done :L2 GE p2;^DPick entity to change [Done] IFERR L1 CHANGEL p2;;LIKE;p1 CHANGELS p2;;LIKE;p1 CHANGEFS p2;;LIKE;p1 CHANGEC p2;;LIKE;p1 GOTO L2 :Done ECON ENDM