Merhaba,
Autocad de çizilen herhangi bir nesne için en,boy olarak en az yer kaplayacağı şekilde bir lispe ihtiyacım var.
Çevrelediği şey daire, yamuk, üçgen vs herhangi bir şekil olabilir. Ancak en boy olarak minimum şekilde çevresine dörtgen oluşturmalı.
Bu konuda yardımcı olabilecek var ise şimdiden teşekkür ederim.
Herkese iyi günler dilerim.
(defun c:BX (/ ss c say tek bx mnp mxp)
(if (setq ss (ssget))
(progn
(setq c 0 say (sslength ss))
(while (< c say)
(setq tek (ssname ss c)
bx (vla-getboundingbox (vlax-ename->vla-object tek) 'mnp 'mxp)
mnp (vlax-safearray->list mnp)
mxp (vlax-safearray->list mxp))
(command ".rectangle" "non" mnp "non" mxp)
(setq c (1+ c)))))(princ))
