Visual LISP, AutoLISP and General Customization
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

ARROW LEADER CONVERT TO LOOP LEADER???

33 REPLIES 33
Reply
Message 1 of 34
Anonymous
5014 Views, 33 Replies

ARROW LEADER CONVERT TO LOOP LEADER???

Is there a way to have the Arrow leader convert to Loop leader in one click.
Our company standards use diamond tags and sometimes i have to change the arrow to loop by inserting a leader.

Thanks
33 REPLIES 33
Message 21 of 34

PNG FILE HERE.

PLEASE LET ME KNOW IF THIS IS INFO YOU NEED


THANKS A LOT
Message 22 of 34

Bmp file
Message 23 of 34

for the

standard loop
LEADER Layer: "G-ANNO-TEXT-NOTE-N"
Space: Model space
Handle = 32e7
associative: no
Normal: X= 0'-0" Y= 0'-0" Z= 0'-1"
Horizontal direction: X= 0'-1" Y= 0'-0" Z= 0'-0"
Vertex: X=241'-11 31/64" Y=412'-6 29/64" Z= 0'-0"
Vertex: X=241'-11 55/64" Y=412'-6 47/64" Z= 0'-0"
Vertex: X=242'-0 1/16" Y=412'-6 47/64" Z= 0'-0"
Hook Line: Off
Arrow: On
Path type: Straight
Associated to: MTEXT Handle = 32E8
dimension style: "Aec-Arch-I-96$7"
dimension style overrides:
DIMASZ 3/64"
DIMGAP 1/32"
DIMLDRBLK loop
DIMSCALE 1.000000
DIMTAD 0
DIMTXSTY STANDARDN
DIMTXT 7/64"


for the swaploop
LEADER Layer: "G-ANNO-TEXT-NOTE-N"
Space: Model space
Handle = 32e9
associative: no
Normal: X= 0'-0" Y= 0'-0" Z= 0'-1"
Horizontal direction: X= 0'-1" Y= 0'-0" Z= 0'-0"
Vertex: X=242'-0 53/64" Y=412'-6 1/16" Z= 0'-0"
Vertex: X=242'-1 13/64" Y=412'-6 17/32" Z= 0'-0"
Vertex: X=242'-1 3/8" Y=412'-6 17/32" Z= 0'-0"
Hook Line: Off
Arrow: On
Path type: Straight
Associated to: MTEXT Handle = 32EA
dimension style: "Aec-Arch-I-96$7"
dimension style overrides:
DIMASZ 1/8"
DIMGAP 1/32"
DIMLDRBLK loop
DIMSCALE 1.000000
DIMTAD 0
DIMTXSTY STANDARDN
DIMTXT 7/64"
Message 24 of 34

Or better yet, post a "small drawing" - preferably zipped - as was requested.

--
Matt W
"What the flip was Grandma doing at the sand dunes?"
"R. Robert Bell" wrote in message news:5193374@discussion.autodesk.com...
Please post a .png next time (they are much smaller.)

--
R. Robert Bell


wrote in message news:5193068@discussion.autodesk.com...
I attached three kinds of leaders that we use. I hope I did it right because
this is my first time attaching a picture.

It is a bmp file.

Thanks
Message 25 of 34

Is this what you need to see???
Message 26 of 34

Yes, thanks!

I don't know how or why your existing dot & loop arrows are doing it, but
the ArrowheadSize fro these is 3/64", but a normal arrow is 1/8". These 2
lisps address specifically these differing sizes:

(defun c:swapdot (/ ent obj)
(vl-load-com)
(princ "\nSelect leader: ")
(if (setq ent (ssget ":S" '((0 . "LEADER"))))
(progn
(setq obj (vlax-ename->vla-object (ssname ent 0)))
(if (= (vla-get-arrowheadtype obj) acArrowDefault)
(progn
(vla-put-arrowheadtype obj acArrowDot)
(vla-put-arrowheadsize obj (/ 3.0 64.0))
)
(progn
(vla-put-arrowheadtype obj acArrowDefault)
(vla-put-arrowheadsize obj (/ 1.0 8.0))
)
)
)
)
(princ)
)

(defun c:swaploop (/ ent obj)
(vl-load-com)
(princ "\nSelect leader: ")
(if (setq ent (ssget ":S" '((0 . "LEADER"))))
(progn
(setq obj (vlax-ename->vla-object (ssname ent 0)))
(if (= (vla-get-arrowheadtype obj) acArrowDefault)
(progn
(vla-put-arrowheadblock obj "loop")
(vla-put-arrowheadsize obj (/ 3.0 64.0))
)
(progn
(vla-put-arrowheadblock obj "")
(vla-put-arrowheadsize obj (/ 1.0 8.0))
)
)
)
)
(princ)
)

wrote in message news:5194405@discussion.autodesk.com...
Is this what you need to see???
Message 27 of 34

I've officially lost interest in this thread. 😞

--
Matt W
"What the flip was Grandma doing at the sand dunes?"
Message 28 of 34

I will keep this routine so maybe I can figure out something out of this.

Thanks for all
Message 29 of 34

> I've officially lost interest in this thread. 😞
Okay... I lied.

Why not just use the MATCH PROPERTIES button?? (NOW I'm done)

--
Matt W
"What the flip was Grandma doing at the sand dunes?"
Message 30 of 34
caddmandew
in reply to: Anonymous

Jeff

 

I wanted to try this routine but what does the "smily frustrated" in code represent?

 

Jim

Jim Haglund
"It's never too late to have a happy childhood"
Message 31 of 34
Kent1Cooper
in reply to: caddmandew


@caddmandew wrote:

....what does the "smily frustrated" in code represent?

....


It represents a colon followed by a capital S.  See:

 

http://forums.autodesk.com/t5/Visual-LISP-AutoLISP-and-General/Emoticon-Smiley-to-AutoLISP-Translato...

 

for a translator, and instructions on how to turn colon-triggered emoticons off when you're signed in.

Kent Cooper, AIA
Message 32 of 34
caddmandew
in reply to: Kent1Cooper

Thank you Kent.

Jim Haglund
"It's never too late to have a happy childhood"
Message 33 of 34
caddmandew
in reply to: Kent1Cooper

It works, yeah.   Here is what happen though...

 

If the leader is a dot leader and I run the SwapLoop.lsp it turns the leader to a typical closed fill arrow then I select it a second time and it switches to a loop.  Do you know why? and can the code me revide to eliminate that step?

 

Thanks

Jim

Jim Haglund
"It's never too late to have a happy childhood"
Message 34 of 34
caddmandew
in reply to: caddmandew

OK I have another question...  Is there a way to make this work with Mleaders?

 

Thanks in advance

Jim

Jim Haglund
"It's never too late to have a happy childhood"

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

Autodesk Design & Make Report

”Boost