Jump to content

Connecting lines with an arc


OMEGA-ThundeR

Recommended Posts

Hi,

 

Example: (image)

example.jpg

 

U usually use the FILLET command to connect 2 lines with an arc. If that not works i go to the next best thing; Tan Tan Radius (Circle > T)

 

But why does FILLET not always work the way i want?

When i click the lines before or after the tangent point or use the REVERSE command to reverse the direction of the lines, the result is always the same.

 

Any ideas? I am just wondering...

Edited by OMEGA-ThundeR
Link to comment
Share on other sites

Maybe fillet won't do an arc larger than 180 degrees.

 

If the tool you want to use doesn't work at all the way you want it to and another one gets you close, use the one that gets you close.

Link to comment
Share on other sites

If you think thats a problem try filleting two arcs there is that S bend again, its a buggy thing in autocad and you would think by now they would address it. This problem has existed form literally the first version of Autocad. Re arc fillet arc there are 4 solutions we have some other software and it recognises this problem and uses a different technique to solve the problem.

 

There are a number of lisps out there to help. Try this PS go clockwise and anti clockwise for two answers.

 

 

; draws an arc between 2 lines but does not erase
; by Alan H Aug 2015
(defun c:arcfill ( / pt1 pt2 pt3 pt4 obj1 obj2 obj3 obj4 obj5 obj6 pt5) 
(alert "Pick in clockwise direction")
(setq oldsnap (getvar 'osmode))
(setvar 'Osmode 512)
(setq pt1 (getpoint "\npick 1st line"))
(setq obj1 (ssname (ssget pt1) 0))
(setq obj5 (vlax-ename->vla-object obj1)) ; convert to vl
(setq pt2 (getpoint "\npick 2nd line"))
(setq obj2 (ssname (ssget pt2) 0))
(setq obj6 (vlax-ename->vla-object obj2)) ; convert to vl
(setq rad (getdist "\nEter radius"))
(command "offset" rad Obj1 pt2 "")
(setq obj3 (vlax-ename->vla-object (entlast)))
(command "offset" rad Obj2 pt1 "")
(setq obj4 (vlax-ename->vla-object (entlast)))
(setq pt5 (vlax-invoke obj3 'intersectWith obj4 acExtendThisEntity)) ; centre pt
(setq pt3 (vlax-curve-getClosestPointto obj6 pt5))
(setq pt4 (vlax-curve-getClosestPointto obj5 pt5))

(command "arc" "C" pt5 pt3 pt4) 
(vla-delete obj3)
(vla-delete obj4)
(setvar 'osmode oldsnap)
)
(c:arcfill)l

Screen Shot 05-27-16 at 01.11 PM.jpg

Link to comment
Share on other sites

Try to measure the distance between your 2 lines(which do you wan to connect)then set your fillet radius to what distance you get divided into 2.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...