Aller au contenu

Liste des références externes


PyrN

Messages recommandés

 

 

Une petite fonction lisp:

 

(defun xreflist ( / tbl lst) ; 22/2/2007
 (setq tbl (tblnext "block" t))
 (while tbl
   (if (assoc 1 tbl)
(setq lst (cons (cdr (assoc 2 tbl)) lst)))
   (setq tbl (tblnext "block")))
 lst)

 

te renvoie la liste des xref. à toi de les pomme-C pomme-V dans ton éditeur favori.

 

Carboléüm, qui dessine aussi à la main -> Carboleum's sketchblog

Lien vers le commentaire
Partager sur d’autres sites

Occasion de regarder la commande RTEXT (nécessite que les ExpressTools soient installés)

 

Faire F1à l'utilisation pour l'aide et regarder la syntaxe Diesel à utiliser.

 

The $(xrefs) DIESEL function

RText supports listing Xref files attached to a drawing through the $(xrefs) DIESEL function.

The syntax for the $(xrefs) DIESEL function is:

 

$(xrefs [, flags [, leader [, trailer]]])

 

flags A collection of bitflags with the following meanings:

1 = (default) include Xref file name (not exclusive with flag 2)

2 = include Xref block name (not exclusive with flag 1)

4 = don't display file name extension

8 = don't display path

16 = show nesting with additional spacing

leader A text string inserted before each Xref entry.

trailer A text string appended to each Xref entry except the last.

 

 

Pour la fonction lisp proposée, on peut faire une opération booléenne sur le bit 70 pour avoir par exemple que les Xrefs seulement chargés

 

((lambda ( / next dxf_tbl_blk)
 (setq next T)
 (while (setq dxf_tbl_blk (tblnext "BLOCK" next))
   (cond
     ((eq (boole 1 4 (cdr (assoc 70 dxf_tbl_blk))) 4)
       (if (eq (boole 1 32 (cdr (assoc 70 dxf_tbl_blk))) 32)
         (print (cdr (assoc 1 dxf_tbl_blk)))
       )
     )
   )
   (setq next nil)
 )
 (prin1)
))

 

[Edité le 9/8/2011 par bonuscad]

Choisissez un travail que vous aimez et vous n'aurez pas à travailler un seul jour de votre vie. - Confucius

Lien vers le commentaire
Partager sur d’autres sites

Bonjour à toutes et à tous

 

1 - tu peux utiliser le Gestionnaire de référence

C:\Documents and Settings\All Users\Menu Démarrer\Programmes\Autodesk\AutoCAD Map 3D 20xx - Français\Gestionnaire des références

ou

2 - Lister les xrefs en tapant Rtext

$(xrefs,3)

 

tu obtiens ta liste en texte que tu insères dans ton plan autocad et tu peux faire un copier coller dans notepad.

ou

3 - le lisp de gile xreflist :

http://www.cadxp.com//modules.php?op=modload&name=XForum&file=viewthread&fid=152&tid=30658

 

 

@+

 

Michel a

 

Lien vers le commentaire
Partager sur d’autres sites

  • 1 an après...

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité