Hi Steve,
It's very strange, here's on my PC.
(has only one object)
Re: Not opened for read
- Forum: General
- Topic: Not opened for read
- Replies: 7
- Views: 145
- Wed Apr 21, 2021 8:28 am
- Jump to post
Code: Select all
(defun C:FMP ; = Fillet Multiple Polylines
(/ plss n)
(if (setq plss (ssget '((0 . "LWPOLYLINE"))))
(repeat (setq n (sslength plss))
(command "_.fillet" "_polyline" (ssname plss (setq n (1- n))))
); repeat
); if
(princ)
); defun
Code: Select all
; Ring Type Joint Face Blind
(defun RTJBLD (/ RTJBLD:FOD$ RTJBLD:FTHK RTJBLD:RTJD$ RTJBLD:RTJTHK$ RTJBLD:HOL$ RTJBLD:HPCD$ INPT IANG BLD1 insertscal)
...