Compiler plusieurs dwg en 1 seul

[nico7162]

Bonjour,

 

Je cherche à compiler plusieurs fichiers dwg en un seul.

 

Chaque fichier représente un folio format A3 en espace objet.

 

Le but est d'obtenir un seul fichier avec tous les folios dans l'espace objet en les décalant de 420.

 

 

 

Merci d'avance de vos idées.

[fauxsuisse]

Tu peux par exemple faire tes cadres dans l'espace objet puis "lier" en xref chaque dwg sur son emplacement puis tu les sélectionnes tous est tu les fait insérer dans ton dessin tu les resélectionnes tous puis "Decompos" vu qu'une fois insérés ils deviennent des blocs.

[ahbv]

salut,

 

tu peux en utilisant le designcenter importer tes présentations dans un fichier unique ensuite exporter toutes tes présentations dans le mode objet (clic droit sur présentation et commande "exporter presentation en objet).

est ce que c'est cela que tu veux ? si c'est avec du lisp, je ne peux pas t'aider car ce n'est pas ma tasse de thé (et c'est bien dommage!!)

a+ AHG

[bonuscad]

Bonjour,

 

Je te renvoie sur un sujet ancien, qui lui peut te renvoyer sur une discussion encore plus ancienne...

[FRAXA]

un script avec super auto script d'Eric devrait pouvoir faire l'affaire assez facilement.

[nico7162]

Merci bonuscad,

effectivement dans l'ancien sujet il y a un lisp qui convient pour ce que je voulais faire.

[joris25]

Bonjour toujours dans le même type de demande consistant à compiler automatiser des fichiers, j'aimerai savoir (je n'arrive pas à le trouver) si il existe un lisp, une routine etc... qui insererait tous les dxf d'un répertoire d'un coup en 0,0,0.

 

J'ai un répertoire rempli de dxf (issu d'une tranche effectuée sur faro scene 5.4 - scanner ) ils sont tous géo référencés entre eux. Il faut donc faire insertion bloc en 0,0,0 sur chacun des fichiers.. Avez vous une solution?

 

Merci d'avance..

[joris25]

Bonjour toujours dans le même type de demande consistant à compiler automatiser des fichiers, j'aimerai savoir (je n'arrive pas à le trouver) si il existe un lisp, une routine etc... qui insererait tous les dxf d'un répertoire d'un coup en 0,0,0.

 

J'ai un répertoire rempli de dxf (issu d'une tranche effectuée sur faro scene 5.4 - scanner ) ils sont tous géo référencés entre eux. Il faut donc faire insertion bloc en 0,0,0 sur chacun des fichiers.. Avez vous une solution?

 

Merci d'avance..

[bonuscad]

Bonjour,

(je n'arrive pas à le trouver)

 

Pourtant il est dans le lien donné, il faut juste adapter dwg en dxf...

Ce qui donne:

((lambda ( / prefix)
 (setq
   prefix (strcat (vl-filename-directory (getfiled "Sélectionner un fichier DXF TEMOIN" "" "dxf" 16)) "\\")
 )
 (foreach dxf (vl-directory-files prefix "*.dxf" 1)
   (command "_.-insert" (strcat "\"" prefix dxf "\"") "_none" "0.0,0.0,0.0" "" "" "")
 )
 (prin1)
))

Tu copies-colles le code directement en ligne de commande, il va s'exécuter.

Tu pointes un fichier DXF dans un dossier et il va insérer tous les DXF de ce dossier.

[joris25]

merci ca fonctionne génial...

[Manon5]

Bonjour,

 

 

Pourtant il est dans le lien donné, il faut juste adapter dwg en dxf...

Ce qui donne:

((lambda ( / prefix)
 (setq
   prefix (strcat (vl-filename-directory (getfiled "Sélectionner un fichier DXF TEMOIN" "" "dxf" 16)) "\\")
 )
 (foreach dxf (vl-directory-files prefix "*.dxf" 1)
   (command "_.-insert" (strcat "\"" prefix dxf "\"") "_none" "0.0,0.0,0.0" "" "" "")
 )
 (prin1)
))

Tu copies-colles le code directement en ligne de commande, il va s'exécuter.

Tu pointes un fichier DXF dans un dossier et il va insérer tous les DXF de ce dossier.

 

 

Bonjour, cette commande est géniale, merci. :D

Aussi, j'aimerai savoir si il est possible d'implanter tous ces blocs à une distance de 10m en X par exemple.

Je vous explique, j'ai des relevés tous les mètres sur plus d'un kilomètre de tunnel avec un gabarit de train et je dois voir si le gabarit passe de partout.

Je dois donc, à partir de milliers de fichiers DXF, faire une présentation A4 de tous ces profils.

Si j'arrivais à implanter tous les 10m un profil, je n'aurai plus qu'à faire une présentation du premier profil et utiliser le LISP -Pan qui déclinerait les présentations de 10m en X et 100 fois (je vais diviser mes fichiers autocad en 100 profils pour que ce ne soit pas trop lourd).

 

Si quelqu'un a une idée brillante, ce serait vraiment super.

Merci à vous tous depuis toutes ces années. ;)

[bonuscad]

Sans avoir testé, mais ça devrait le faire...

((lambda ( / prefix)
 (setq
prefix (strcat (vl-filename-directory (getfiled "Sélectionner un fichier DXF TEMOIN" "" "dxf" 16)) "\\")
pt_ins '(0.0 0.0 0.0)
 )
 (foreach dxf (vl-directory-files prefix "*.dxf" 1)
(command "_.-insert" (strcat "\"" prefix dxf "\"") "_none" pt_ins "" "" "")
(setq pt_ins (list (+ (car pt_ins) 10.0) (cadr pt_ins) (caddr pt_ins)))
 )
 (prin1)
))