transformer des 3dfaces en polylignes 3d

[cmaire]

Bonjour,

connaissez vous un moyen de transformer des 3dfaces en polylignes 3d?

La fonction décomposer ne fonctionne pas et je ne trouve rien sous Covadis pour le faire

Merci d'avance

[bonuscad]

Bonjour,

 

Voir ici si cela fonctionne pour toi malgré l'ancienneté du lisp.

[cmaire]

En effet, j'ai bien des polylignes à la place des 3dfaces mais le lisp ne me récupère pas le bon z...

C'est déjà un bon début...je vais voir ce lisp...

merci

[RhymOne]

Salut,

Moi j'ai celui ci, 3dfto3dp2

 ; ----------------------------------------------------------------------
;                   (Converts 3D Faces to 3D Polylines)
;                     2006 RMA, All Rights Reserved

(defun c:3dfto3dp2 ()
 (setq cmdecho (getvar "CMDECHO"))
 (setvar "CMDECHO" 0)
 (command "UNDO" "G")
 (setq sset (ssget '((0 . "3DFACE"))))
 (if sset
   (progn
     (setq itm 0 num (sslength sset))
     (while (        (setq hnd (ssname sset itm))
       (setq ent (entget hnd))
       (setq pt1 (cdr (assoc 10 ent)))
       (setq pt2 (cdr (assoc 11 ent)))
       (setq pt3 (cdr (assoc 12 ent)))
       (setq pt4 (cdr (assoc 13 ent)))
       (entdel hnd)
       (command "_3dpoly" pt1 pt2 pt3 pt4 "C")
       (setq itm (1+ itm))
     )
     (princ ", Done.")
   )
 )
 (setq sset nil)
 (command "UNDO" "E")
 (setvar "CMDECHO" cmdecho)
 (princ)
)

(princ "DS> 3DFTO3DP2.LSP loaded ... type 3DFTO3DP2 to run.")

[bonuscad]

le lisp ne me récupère pas le bon z...

 

Ah oui! il y avait eu une petite correction depuis. Si tu travaille depuis un SCU, change ceci dans le code.

				dxf_10 (trans (cdr (assoc 10 ent)) 0 1)
				dxf_11 (trans (cdr (assoc 11 ent)) 0 1)
				dxf_12 (trans (cdr (assoc 12 ent)) 0 1)
				dxf_13 (trans (cdr (assoc 13 ent)) 0 1)

[thierry.garré]

Bonjour,

 

Juste pour ma culture personnelle. Je n'arrive pas à voir l'intérêt de cette transformation ?

 

Merci d'éclairer ma lanterne.

[cmaire]

Bonjour,

Juste parce que le cahier des charges de mon client précise qu'on ne doit lui fournir uniquement des polylignes 3d...et certaines entités ont été saisies sous Microsation en 3dfaces.

 

[Calecx]

Pour ma part je me suis beaucoup servi de cette fonction pour exporter un projet 3D en vue d'être intégré dans une maquette virtuelle. D'après le prestataire qui s'occupait de l'intégration, cela nécessitait des Poly3D et non des 3Dfaces.

 

Une autre utilisation, plus restreinte cette fois, lors d'un décalage de Poly3D en mode talutage par exemple, il arrive que l'opération échoue (malgré un MNT qui semble propre), mais si on recommence avec le même outil, mais en demandant en plus une génération de MNT, cela fonctionne au moins pour les 3Dfaces, même si la poly3D refuse toujours de se créer. Donc je récupère les 3Dfaces, je les traite avec 3DFto3Dpo, et je peu récréer ainsi ma poly3D décalée. C'est long et pas pratique, mais je n'ai trouvé que ça.

[thierry.garré]

Merci de vos réponses.

[RhymOne]

Salut à tous,

Autre utilisation, pour les coupes qui font appel à des objets lineaires (ligne,poly2D ou 3D).

Un axe en plan un "MNT" poly3D et le tour est joué pour les coupes simples...

[lecrabe]

 

Hello

 

Ne pas oublier ce sujet identique !?

http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=6900#pid128527

 

Le Decapode