texte en point

[grand_sapin]

bonjour à toutes et à tous

 

est-ce que quelqu'un aurait dans son panel de routines un lisp qui associerait un point 3D à un texte ?

Je m'explique, j'ai une forêt de textes qui me donne des altitudes, mais bon, je vais pas passer mes 2 prochaines semaines à associer un point 3D manuellement à chaque texte (tout en sachant que je ne possède pas Covadis, sans quoi la question ne se poserait pas)

 

Donc voila

 

Merci de votre aide

 

Sapinou

[fabcad]

es-tu sur autodesk map ou autocad ?

 

 

[Edité le 6/4/2006 par fabcad]

[grand_sapin]

AUTOCAD 2005, de base, quoi

[fabcad]

voila un debut de code :

un peu d'aide aux autres dévellopeurs pour passer altitude dans le z de pti

(defun traite-js (js / nbr c1 pti altitude)

(setvar "cmdecho" 0)

(setq nbr (sslength js))

(setq i 0)

(while (<= i (- nbr 1))

(setq c1 (ssname js i))

(setq pti (cdr (assoc 10 (entget c1))))

(setq altitude (cdr (assoc 1 (entget c1))))

(entmake (list (cons 0 "POINT")(cons 10 pti)))

(setq i (+ i 1))

); fin while

nil

); fin defun

;;;------------------------------------------------------------------------

; FONCTION MAITRE

(defun c:centroides-sur-textes ()

(setvar "cmdecho" 0)

(setq js (ssget))

(traite-js js)

(prompt "\n---COPYRIGHT 07/05 Par Fabrice DEMIEL---")

nil

);fin c:centroides

;;;------------------------------------------------------------------------

(prompt "\npour lancer Tapez : centroides-sur-textes ")

 

[Edité le 6/4/2006 par fabcad]

[grand_sapin]

merci beaucoup, c'est exactement ce que je cherchais

 

super top

 

j'en perds mes épines :cool: :cool: :cool:

 

sapin