Je kan bij lengthen aangeven welke kant dit moet gebeuren door: in plaats van alleen een entity, een list te sturen met entity en een punt.
Weet niet of je dat punt kan berekenen vanuit de crossing die gekozen is.
Weet niet of je dat punt kan berekenen vanuit de crossing die gekozen is.
Code Selecteer
(setq entity (car (entsel))
(setq pt (getpoint "richting: "))
(command "_lengthen" "_delta" "100" (list entity pt) "")