Hello all. I was wondering if anybody could assist me with the following little piece of code:
/////////////////////////////////////////////////////////////////////////////
(defun C:cor (/ l1 l2 l3 l4)
(setq l1(entsel "\nPick first line")
l2(entsel "\nPick second line")
l3(entsel "\nPick third line")
l4(entsel "\nPick fourth line"));
(command "chamfer" "a" ".75" "90" "u" "l1" "l3" "l2" "l4" )
)
/////////////////////////////////////////////////////////////////////////////
I have attached an example of what I would like this code to accomplish. Basically I'm trying to run the chamfer command but instead of getting prompted to select lines inside of the command I'm trying to have those entities(l1, l2, l3, l4) chosen outside of it then running the command with the entities substituted for the "Pick line" prompts. I hope that explanation was clear but if it wasn't please look @ the attached example.
Also I was wondering why the prompts change in the Chamfer command for example; why is the getkword multiple option Multiple when chamfer is typed from the command line and then mUltiple from the (command "chamfer" ....) is used in a lisp routine?
As you can probably tell, I'm pretty new to programming(and posting on this forum), so any clarification I could get would be greatly appreciated.
Thanks,
Matt