malgré mon peu de connaissance en lisp, il doit y avoir moyen d'adapter ça pour répéter une fonction sur une collection d'objet
(defun c:ss-pt-cen (/ ss)
(if (setq ss (ssget '((0 . "LWPOLYLINE"))))
(repeat (setq n (sslength ss))
(entmake
(list '(0 . "POINT")
(cons 10 (pline-centroid (ssname ss (setq n (1- n))))))
)
)
)
(princ)
)
Comparaison de distrib Linux
http://doc.ubuntu-fr.org/moniteur_systeme
apturl instalation ubuntu depuis un lien apt
/usr/bin puis le fichier "apturl".)
Relevé 3D le projet TANGO sur téléphone
http://doc.ubuntu-fr.org/moniteur_systeme
apturl instalation ubuntu depuis un lien apt
/usr/bin puis le fichier "apturl".)
Relevé 3D le projet TANGO sur téléphone
Aucun commentaire:
Enregistrer un commentaire