Pls help me to to modify 1 program with 2

Pls help me to to modify 1 program with 2

ritzofriya
Advocate Advocate
1,426 Views
22 Replies
Message 1 of 23

Pls help me to to modify 1 program with 2

ritzofriya
Advocate
Advocate

Attached 2 Programs ( got it from internet only)

eww : its make a both end fillet poly line(each point manually ) (green in ss)

wa : its connect all blocks with arc(automatically).(red in ss)

 

is that possible wa do the connect with eww instead of arc(automatically)? 

 

https://www.cadtutor.net/forum/topic/73579-pls-help-me-to-to-modify-1-program-with-2/

 

 

Capture.JPG

 

 

0 Likes
Accepted solutions (2)
1,427 Views
22 Replies
Replies (22)
Message 2 of 23

Kent1Cooper
Consultant
Consultant

Nothing attached.

Kent Cooper, AIA
Message 3 of 23

ritzofriya
Advocate
Advocate

Please Check attached link 

0 Likes
Message 4 of 23

pbejse
Mentor
Mentor

@ritzofriya wrote:

Please Check attached link 


 

Really @ritzofriya ?  Yoy think this is some sort of a treasure hunt for us?  😁

 

 

 

Message 5 of 23

Kent1Cooper
Consultant
Consultant

@ritzofriya wrote:

Please Check attached link 


It "looks like" it has attachments, but:

Kent1Cooper_0-1629111332185.png

 

Kent Cooper, AIA
Message 6 of 23

pbejse
Mentor
Mentor

@Kent1Cooper wrote:

Kent1Cooper_0-1629111332185.png

 


Exactly my point, first you need to sign up if you are not a member and all those other stuff that we need to do.

@ritzofriya Why not just attach the file WA.lsp and eww.lsp here and it make it easier for us.

 

Message 7 of 23

hak_vz
Advisor
Advisor

@ritzofriya  Choose one platform (this forum, cadtutor or what ever you like) and post requests there. If you don't receive answer at one platform in two or three days, then switch to other platform.

Miljenko Hatlak

EESignature

Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Message 8 of 23

ВeekeeCZ
Consultant
Consultant

Why s/he would do that? It's easier this way and faster.

Message 9 of 23

hak_vz
Advisor
Advisor

@ВeekeeCZIf requests are identical and if he/she can update all platforms and transfer important findings between them, then I agree it's faster. If solution is received on one platform (or seven of them) and none on other platform, post the solution and close conversation. You'll rarely see that.

Miljenko Hatlak

EESignature

Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Message 10 of 23

ВeekeeCZ
Consultant
Consultant

Of course, s/he wouldn't. If s/he got what s/he came for... not motivated.

Message 11 of 23

Sea-Haven
Mentor
Mentor

Say no more, multi posting is a problem. Also reinforcing Kent's previous suggestion on one of the posts, 4-5 now ? A pick pick pick is the way to go.


https://www.cadtutor.net/forum/topic/73579-pls-help-me-to-to-modify-1-program-with-2/
https://www.cadtutor.net/forum/topic/73529-can-anyone-help-me-to-make-all-my-exiting-polylines-to-en...

Message 12 of 23

jrreid
Advocate
Advocate

I had trouble attaching files as well.

You have to go to the bottom of the postings and click the open area that says Post Reply.

Then it will start a conversation and below that is where you can attached your files.

 

Hope this helps.

 

JRR.

Message 13 of 23

ritzofriya
Advocate
Advocate

Thank you so much to inform me that. attached the same. kindly let me know if you are facing any issues to download.

Google drive link also available here

0 Likes
Message 14 of 23

ritzofriya
Advocate
Advocate

I'm SO sorry, my bad.

0 Likes
Message 15 of 23

diagodose2009
Collaborator
Collaborator

You mustr upload a sample.dwg as version Acad2007. 

You save sample.dwg as old-version of Acad or ZwCad.

I try your-programe.lisp (eww.lsp), but failedbigfoot_pf32bit_done02h.jpg

0 Likes
Message 16 of 23

ritzofriya
Advocate
Advocate

Dear,

Attached sample.dwg as version Acad2007  as asked 

Message 17 of 23

diagodose2009
Collaborator
Collaborator
Accepted solution

Here I upload version1.0, but encrypted, 

If you like, then I can continue to,work  at your-project.

You compile the clipboard.jpg to .VLX

You compile the clipboard.jpg to Visual-Lisp

bigfoot30.JPG

 

 

Message 18 of 23

ritzofriya
Advocate
Advocate
Accepted solution

😀Thank a lot.. its perfect.  (gif attached)

If the PL corner has a fillet also.. it will be Super..(FA program attached for reference.)

Then if possible to bypass choosing option of arc or polyline each time it could be great. 

Any way Thanks a looot....

0 Likes
Message 19 of 23

ritzofriya
Advocate
Advocate

Also possible to avoid crossing lines it may be great.

and keeping right angle lines.

Supporting programs attached 

1.To avoid crossing (CA.lsp)

2.Right angle (lbrap.lsp) 

 

0 Likes
Message 20 of 23

diagodose2009
Collaborator
Collaborator

I update the programe "pp_ritzofriya_warcplinelectrical_autoexec.lsp"

You see the file nsds.zip, you edit the OriginalSource As zip

 

Q=How to concatenate all pline into oneBigPline via (3.jsPline)?
The "\nCommand.com=C:Q2[enter]\n"  increase each time , increase
the value of SetColor.
   $L=(setvar "CECOLOR" (strcat "0" (itoa (dfn_color_ceinc nil (* 5 ritzofriya)))))
How to keep all'pline from (2.Pline) into one-variabile?
The hint=You set sysvardlg , always with the function "syst_mapvars"
  $L=    alo=list("Osmode","CmdEcho"),
  $L=   ptl=list(0,0),
  #L=   lvl=syst_mapvars(alo,ptl);

 

 

HEADER.JPG

0 Likes