make reversed / negative / mirrored fillet

make reversed / negative / mirrored fillet

Anonymous
Not applicable
1,279 Views
5 Replies
Message 1 of 6

make reversed / negative / mirrored fillet

Anonymous
Not applicable

Hi, is there a way in AutoCAD to make reversed / negative / mirrored fillet in one step? I dont know about it. Like on the picture; simple exploded 2D lines. Thank You.

0 Likes
Accepted solutions (1)
1,280 Views
5 Replies
Replies (5)
Message 2 of 6

Kent1Cooper
Consultant
Consultant

If those are Lines [not a Polyline], there's FilletLinesReverse.lsp with its FLR command, available here.  [This just came up yesterday.]

Kent Cooper, AIA
0 Likes
Message 3 of 6

Anonymous
Not applicable

Hi, a tried it, it works -but it seems complicated, I hoped for simple routine -possible to learn for me 🙂 And there is some question on the screen -I dont want that... Thanks

0 Likes
Message 4 of 6

ВeekeeCZ
Consultant
Consultant
Accepted solution

@Anonymous wrote:

Hi, a tried it, it works -but it seems complicated, I hoped for simple routine -possible to learn for me 🙂 And there is some question on the screen -I dont want that... Thanks


Kent's routine is quite complex, and that is derfinitely something you should learn from! and with full commentary! Appreciate it, not so common! But if you want to something as simple as i can imagine, try following - without commentary, just for you to dig around.

 

Spoiler
(vl-load-com)

(defun c:FilletFlipped ( / enlast)
  
  (setq enlast (entlast))
  (initcommandversion)
  (command "_.FILLET")
  (while (> (getvar 'CMDACTIVE) 0)
    (command PAUSE))
  (if (and (not (equal enlast (setq enlast (entlast))))
	   (= "ARC" (cdr (assoc 0 (entget enlast)))))
    (command "_.MIRROR"
	     enlast ""
	     "_none" (vlax-curve-getStartPoint enlast)
	     "_none" (vlax-curve-getEndPoint enlast)
	     "_Y")
    (princ "\nFlipping failed. No arc created or wrong object (polyline). "))
  (princ)
)

Btw. It seem like LAST is protected symbol. But it's simple to fix, replace 'last' variable with different name - eg. ELAST.

To @Kent1Cooper Why the limitation for a LINE only? It will work with ARC as well.

0 Likes
Message 5 of 6

Kent1Cooper
Consultant
Consultant

@ВeekeeCZ wrote:

@Anonymous wrote:

Hi, a tried it, it works -but it seems complicated... And there is some question on the screen -I dont want that...


.... 

Btw. It seem like LAST is protected symbol. But it's simple to fix, replace 'last' variable with different name - eg. ELAST.

To @Kent1Cooper Why the limitation for a LINE only? It will work with ARC as well.


I guess I don't have occasion to use the (last) AutoLisp function often enough to have remembered it at the time, so as to not use it as a variable name.  Interestingly, I don't get that warning, either in Acad2016 or in ol' 2004 at the location where that's all I have [and under which I wrote that routine].  Is that a new-to-2017 feature?  The routine still works fine for me, and since 'last' is a localized variable, it doesn't leave the AutoLisp function affected -- it should be a problem only if the same routine had tried to use the (last) function after using it as a variable name.

 

I couldn't say after several years what I had in mind at the time -- I was probably pulling elements from some other recent routine in which the more complex way of defining multiple variable names with different suffixes was justified.  I think the limitation to Lines was only in contrast to Polyline corners, since Filleting them doesn't result in a new object that can be Mirrored [it could probably be done, but it's a more complicated problem].  As for Arcs, I was probably focusing on the nature of the original question, even though it was really about faces of Solids.  And in regard to arc segments in Polylines, if they were part of my thinking at the time, back in 2004, it wasn't allowed to Fillet Polyline arc segments at all.  Even in 2016, I'm surprised to find that doing so seems to distort the adjacent arc segment(s), at least in some circumstances.

Kent Cooper, AIA
0 Likes
Message 6 of 6

ВeekeeCZ
Consultant
Consultant

@Kent1Cooper wrote:

I guess I don't have occasion to use the (last) AutoLisp function often enough to have remembered it at the time, so as to not use it as a variable name.  Interestingly, I don't get that warning, either in Acad2016 or in ol' 2004 at the location where that's all I have [and under which I wrote that routine].  Is that a new-to-2017 feature?  ...


You must have some "expert mode" settings, because in my 2016 I have received the warning as well. And by google search I guess it was there ever since. But what will warn me is a different color in VLIDE (blue by default).

Btw. Thanks for the reminding that LAST is a function - it did not came up on my mind at the time even I use this function a lot.

0 Likes