Hey everyone,
I am trying to use a block to extrim to. I would like to trim the same side as mi insertion point. Can anyone give me an idea on why this is not woirking?
Thank all,
Andre
Code:
(defun c:locktrim ()
(setq currlay (getvar "Clayer"))
(setq lockpt1 (getpoint "\nSelect Daves Mid-cross: "))
(setvar "Clayer" "Hardware")
(command "-layer" "make" "0" "lock" "panels" "")
(command "-insert" "lomountextrusiontrim" lockpt1 "1" "1" "0")
(command "explode" "last")
(c:extrim "last" lockpt1)
(command "-insert" "lomountpaneltrim" lockpt1 "1" "1" "0")
(command "explode" "last")
(c:extrim "last" lockpt1)
(princ))
[ Moderator Action = ON ] What are [ CODE ] tags... [ Moderator Action = OFF ]