Here is what I use for flow sheet line jumpers (1/8" dia).
Their insert point is the center of the arc and will
be the intersection the user picks. Oh, I have also accounted
for LTSCALE, since most flowsheets are done completely
in modelspace (and usually at 1 to 1). Do note that our
LTSCALE is based of a factor of 1 and not 0.5 or other like
some folks use (we use our own customize linetypes).
This is setup for a menu, so for toolbar buttons join at
and remove the "+" on the ends of the lines. Be careful when
cut-n-pasting as some news readers addd extra ^[Letter] at
the end of the lines.
Jumper Horizontal (pick intersection):
^C^C_id;int;\_-insert;jumper;_none;$m=$(getvar,lastpoint);+
$(if,$(=,$(getvar,measurement),1),$(*,$(getvar,ltscale),25.4),+
$(getvar,ltscale));;0;_break;\_first;_none;$(eval,$(+,$(index,+
0,$(getvar,lastpoint)),$(if,$(=,$(getvar,measurement),1),+
$(*,$(getvar,ltscale),1.5875),$(*,$(getvar,ltscale),0.0625)))+
","$(index,1,$(getvar,lastpoint)));_none;$(eval,$(-,$(index,+
0,$(getvar,lastpoint)),$(if,$(=,$(getvar,measurement),1),$(*,+
$(getvar,ltscale),1.5875),$(*,$(getvar,ltscale),0.0625)))","+
$(index,1,$(getvar,lastpoint)));
Jumper Vertical (pick intersection):
^C^C_id;int;\_-insert;jumper;_none;$m=$(getvar,lastpoint);+
$(if,$(=,$(getvar,measurement),1),$(*,$(getvar,ltscale),25.4),+
$(getvar,ltscale));;90;_break;\_first;_none;$(eval,$(index,0,+
$(getvar,lastpoint))","$(+,$(index,1,$(getvar,lastpoint)),+
$(if,$(=,$(getvar,measurement),1),$(*,$(getvar,ltscale),1.5875),+
$(*,$(getvar,ltscale),0.0625))));_none;$(eval,$(index,0,$(getvar,+
lastpoint))","$(-,$(index,1,$(getvar,lastpoint)),$(if,$(=,+
$(getvar,measurement),1),$(*,$(getvar,ltscale),1.5875),$(*,+
$(getvar,ltscale),0.0625))));
Jumper at angle (must pick all points):
^C^C_id;int;\_-insert;jumper;_none;$m=$(getvar,lastpoint);+
$(if,$(=,$(getvar,measurement),1),$(*,$(getvar,ltscale),25.4),+
$(getvar,ltscale));;_near;\_break;\_first;_end;\_end;\
Enjoy,
Stef
"TomDe" wrote on 29 Aug 2003:
> I need to insert a block on (and aligned) a line, then break that line a
> specified distance on each side of the inserted block.
> I have no idea where to start, any help would be greatly appreciated.
--
mailto: yodersj@earthlink.net_remove_
http://www.flatmtn.com/ || CAD / Computers
Hardcore LT users: Doing what they say can't be done.