AutoCAD LT Script pour insérer des xref

[dumas]

Bonjour la communauté,

Je souhaite faire un bouton de commande via un script sur Autocad LT afin d'insérer des xref. Je bloque au niveau du chemin d'accès demandé par autocad. 

Merci d'avance pour votre aide.

Cordialement

Romain 

[rebcao]

Bonjour Romain,

Pourrais-tu préciser ? 

merci.
Christian

[philsogood]

hello

il me semble que depuis quelques temps la LT accepte le LISP : fais toi plus chier!!

je te fournis le lisp que j'ai créé (avec Christian je crois, à une époque où je me formais encore sur AutoCAD!)

il se met sur le SCG, insère ton XREF et te remets sur ton SCU comme ça ta Xref est insérée dans les regles de l'art!! 😉

Phil

(defun c:xa (/)
  (command "_ucs" "_world")
  (command "_plan" "_current")
  (initdia)(command "_xattach")
;;Pour laisser le temps à l'utilisateur de spécifier tout ce qu'il faut dans la boite de dialogue, tu peux utiliser une boucle qui utilise la variable système CMDACTIVE.
;;Cette variable a une valeur supérieure à 0 tant qu'une commande est active (voir l'aide pour plus de précisions).
  (while (< 0 (getvar 'cmdactive))
    (command pause)
  )
  (command "_ucs" "_previous")
  (command "_plan" "_current")
)