Connecting blocks with line or arc for electrical plans
@Anonymous wrote:
.... Can you please upload the finished LISP for download? Thanks!
That could be any of several different versions, depending on how you want Object Snap handled. Do you want to just run it with whatever Osnap mode(s) you have set at the time? Or if you use it with Blocks, do you want to add INSert mode to them if it's not already among them? Or do you want to run it with INSert mode only, omitting any other mode(s) you may have set at the time?
Kent Cooper, AIA 
@Anonymous wrote:
.... I would like to run it with whatever Osnap mode I have set at the moment.
My problem is that I downloaded LISP from previous page WA+, and it asks me to select blocs which I do, but nothing happens. When I try with lisp WA, it works - but it doesn't make a polyline. And what I would like is to select all blocs that I want to connect and have that arc-poly-line at the end.
....
WA+ appears to be a more specific-limited-circumstance version, requiring specific types of selection. And since it Trims the Arcs inside any Circles selected, a single Polyline result wouldn't be possible.
If you want to go with whatever Osnap mode(s) you have set, the first WA routine with the OSMODE setting removed should do. But no, it doesn't make a Polyline -- the A in WA stands for Arcs, after all. It could be made to do them all together in a Polyline [as in another very recent thread], but if you're talking about selecting Block objects, rather than picking on locations, questions arise. Would you be willing to select the Blocks one at a time, with the order of selection used for the route of the Polyline? If you want to select them in a window or something, is there some relationship that can be relied on for a routine to decide how to move between them? I think there are other threads with routines that do pretty much that, if you do some Searching.
Kent Cooper, AIA
@Anonymous wrote:
Can the arcs be connected into a polyline after finishing the command?
The drawing of the Arc could be followed by JOINing it to whatever precedes [if anything]. In either @hmsilva's routine in Message 12, or mine in Message 20, try following the (command) function that draws the Arc with this [untested]:
(if joined; is there a cumulative Polyline already?
(command "_.join" joined (entlast)); then ['joined' retains entity name]
(progn ; else -- turn Arc into start of 'joined'
(setq pea (getvar 'peditaccept))
(setvar 'peditaccept 1); just in case
(command "_.pedit" (entlast) ""); turn into Polyline [new entity name]
(setvar 'peditaccept pea)
(setq joined (entlast))
); progn
); if
Alternatively, the "arcs" could be drawn directly as single Polyline arc segments, to eliminate the need for much of the 'else' argument above. That would require changing the command name and prompt sequence in the way the arcs are drawn, but wouldn't be difficult.
In either case, add joined to the list of localized variables at the beginning of the command definition.
Looking back, I notice the link in Message 25 -- check that out, too.
Kent Cooper, AIA
Is there a way to make the arcs pass through the blocks' insertion point instead of the center point? Hope you can help me fix this
