forum CAD: domande e risposte - i post di lunedì 15 febbraio 2016

i post di lunedì 15 febbraio 2016

Alle_prime_armi : [post n° 375499]

Misura distanze

Buongiorno, ho realizza questo piccolo lisp per misurare distanze che fino alla versione autocad 2014 funzionava egregiamente
(defun c:DISarea ( / pt1 pt2 )
(setq pt1(getpoint"\nPrimo punto")
pt2(getpoint pt1 "\nSecondo punto")
)
(princ "\nDistanza UdR - Area: ")
(princ (* 30(atoi(rtos (/ (distance pt1 pt2) 3.0)2 0))))
(princ)
)
Adesso ho installato Autocad 2016 ed il comando non funziona più, mi chiede il primo ed il secondo punto, ma poi non

i post di lunedì 15 febbraio 2016