how to poly 4 arcs

[devitg]

Hi all , by tis code line I have all arcs at a given layer 

(setq arc-ss (ssget "X" '( ( 0 . "arc") ( 8 . "4-arcs"))))

How can I convert it to a LWPOLY or a 2dpoly ,  some like when doing a boundary, or JOIN, or PEDIT  

of course by a LISP line code , not a the command line 

See attached dwg 

Thanks in advance. 

[hak_vz]

Try this

(command "_.pedit" "m" arc-ss "" "y" "j" "" "") 

[devitg]

@hak_vz Hi , after a few try and error , it seem to work 

(setq a (ssget "X" '( ( 0 . "arc") ( 8 . "4-arcs"))))
(VL-CMDF "_.pedit" "m" a ""  "j" "" "") 

[john.uhden]

@devitg 

I'm sure glad it works, because it should, as long as the arcs begin and end at the same consecutive points.

The AutoLisp solution could be made, but it would be a lot of code.  YUCK.

[Kent1Cooper · Accepted solution]

The difference between the code suggestions in Messages 2 & 3 is about whether you have the PEDITACCEPT System Variable set for PEDIT to ask whether you want to convert the Arcs to Polylines, before it lets you Join them.  You can avoid the question entirely by just using the JOIN command instead of PEDIT:

(initcommandversion); [because otherwise, in (command) function, doesn't work quite as doing manually]

(command "_.join" arc-ss "")

[devitg]

@Kent1Cooper Menwhile I did the try and error , I noticed that  instead it did not join the arc it convert them to Poly 

About the PEDITACEPT , what shall be to avoid such problem 

Now I will test the join command , that it give me errors too , sure as I did not use the 

(initcommandversion)

Thanks 

[devitg]

@john.uhden Hi, doing by LISP was my first intention,  as I have all the end and start point  , center radius, angles , for each arc  , so I did a LWPOLY , that result in a 4 lines , but when I start studing the SET-BULGE , I surrender with not shame. 

Soldier that surrend , worth for a new battle. 

[john.uhden]

Reminds me of a joke someone told me when I was a kid...
Why are Italian war rifles in such great shape?
Never been fired and dropped only once.

It went along with things like...
The Shortest Books Ever Written:
*Great Swiss Naval Battles*
*Great German Peacemakers*
and others I shouldn't mention.

[Sea-Haven]

Just a side suggestion have you looked at a pline from scratch using the arc function with various radius or is it something that the shape is random values just something that looks good ? No code only idea.

[devitg]

@Sea-Haven , it was just to know how to solve in this  my particular case. 

[Sea-Haven]

Thought that was the case, if Fillet 2 arcs worked would make life much easier.