Pline create in ALISP??
24-Feb-92 22:32:36
Sb: #34518-Pline create in ALISP??
Fm: Ted Schaefer 71520,265
To: DAVE HRYNKIW 72330,3001
Dave –
Try something like this. (not tested, just typed out)
(setq pt (getpoint "\nFrom pt: ")) (command ".pline" pt)
;leave the pline command unfinished (while (= (type pt) 'list)
(setq pt (getpoint "\nTo pt: "))
(if (= (type pt) 'list)(command pt)) );while (command "cl") ;if you want
to close it
– Ted Schaefer