Fillet multiple select

[dgleason]

Is there a clever way to select multiple polylines for fillet. Other than of course asking the user to select them (ie mouse click). Can I provide fillet a group or selection set?

Thanks,
Dave Gleason

[dzatto]

The only thing I know of is the multiple command. The only thing it does is let you do multiple fillets without exiting and restarting the command. You still need to pick each line, otherwise how will CAD know what lines to fillet with each other?

[dgleason]

I am just looking to fillet (given a defined radius) many multiple segment polylines. Not so much with each other but rather to smooth out the inflection points of each multisegment polyline.

[Maverick91]

I am just looking to fillet (given a defined radius) many multiple segment polylines. Not so much with each other but rather to smooth out the inflection points of each multisegment polyline.

Have you tried the spline or fit curve options in the PEDIT command?

[jmctamney]

Try this:

Command: fillet
Select first object or [Undo/Polyline/Radius/Trim/Multiple]: R
Specify fillet radius <0'-0">: .25
Select first object or [Undo/Polyline/Radius/Trim/Multiple]: P
Select 2D polyline:

[dgleason]

I don't think I'm explaining myself well. At the "Select 2D polyline" prompt I'd like to provide a group or selection set of polylines, not just one. (That is not just one multisegment 2d polyline).

[dgleason]

No I haven't looked at that, but that is where I'll look next. Thanks,
dg

[irneb]

I don't think I'm explaining myself well. At the "Select 2D polyline" prompt I'd like to provide a group or selection set of polylines, not just one. (That is not just one multisegment 2d polyline).

You could use LISP to run this command for you after asking the user to select the polylines:

(defun c:MPL_Fillet (/ ss en rad n)
  (setq rad (getvar "FILLETRAD"))
  (initget (+ 1 4 8 64 128))
  (if (/= ""
     (setq rad
        (getdist (strcat "Enter fillet radius <" (rtos rad) ">: "))
     ) ;_ end of setq
      ) ;_ end of =
    (setvar "FILLETRAD" rad)
  ) ;_ end of if

  (prompt "\nSelect the polylines you'd whish to fillet: ")
  (setq    ss (ssget '((0 . "LWPOLYLINE,POLYLINE")))
    n  0
  ) ;_ end of setq
  (while (< n (sslength ss))
    (setq en (ssname ss n))
    (command "_FILLET" "P" en)
    (setq n (1+ n))
  ) ;_ end of while

  (princ)
) ;_ end of defun

[jamal432585604]

You could use LISP to run this command for you after asking the user to select the polylines:

(defun c:MPL_Fillet (/ ss en rad n)
  (setq rad (getvar "FILLETRAD"))
  (initget (+ 1 4 8 64 128))
  (if (/= ""
     (setq rad
        (getdist (strcat "Enter fillet radius <" (rtos rad) ">: "))
     ) ;_ end of setq
      ) ;_ end of =
    (setvar "FILLETRAD" rad)
  ) ;_ end of if

  (prompt "\nSelect the polylines you'd whish to fillet: ")
  (setq    ss (ssget '((0 . "LWPOLYLINE,POLYLINE")))
    n  0
  ) ;_ end of setq
  (while (< n (sslength ss))
    (setq en (ssname ss n))
    (command "_FILLET" "P" en)
    (setq n (1+ n))
  ) ;_ end of while

  (princ)
) ;_ end of defun

Hi irneb,

I tried to use the great lisp that you have provided but sounds not to work. I couldn’t fillet multiple selected lines

I got the error: “error: bad argument type: lselsetp nil” (attached)

Clip_930.jpgClip_931.jpg

What might be the issue?


Best

Jamal