Jef,
Dit lijkt mij een kegel!
Groet Phineas.
Dit lijkt mij een kegel!
Groet Phineas.
Deze sectie stelt je in staat om alle bijdragen van dit lid te bekijken. Je kunt alleen de bijdragen zien waar je op dit moment toegang toe hebt.
Toon bijdragen Menu(defun c:Rechthoek ()
(setq Hoek1 (getpoint "\nKies hoek linksonder: "))
(setq Hoek3 (getcorner Hoek1 "\nKies hoek rechtsboven: "))
(setq Hoek2 (list (car Hoek1) (cadr Hoek3)))
(setq Hoek4 (list (car Hoek3) (cadr Hoek1)))
(command "line" Hoek1 Hoek2 Hoek3 Hoek4 "c")
)