Aller au contenu

Testez SuperAutoScript


Eric

Messages recommandés

Pour ceux qui ont suivit l'affaire, j'avais réalisé il y a quelques temps un petit programme nommé ZoomTout

 

Ce projet à évolué pour arriver à SuperAutoScript (oui ça fait pompeux, mais ça ne fait pas de mal de se faire du bien )

 

Ce programme permet d'effectuer un script sur plusieurs fichiers AutoCAD

Il existe 3 scripts enregistrés et une case pour entrer un script personnalisé

Si vous utilisez les scripts perso, rentrer votre texte dans la case puis cliquez sur le bouton validez le script pour qu'il soit pris en compte (sinon votre script sera vide)

 

Ensuite cliquez sur lancer le script pour effectuer les taches.

 

AutoCAD doit être installé sur votre PC pour fonctionner

SuperAutoScript ne fonctionne que sur les versions françaises d'AutoCAD et devrait fonctionner sur les versions LT

 

SuperAutoscript en est à sa version 0.1 et comporte bien sur des imperfections.

Problèmes connus :

 

- si AutoCAD est lancé pour la première fois le script peut s'emballer et faire n'importe quoi

Pour éviter ce problème lancer AutoCAD une fois avant de lancer SuperAutoscript.

 

- Dans certains cas inexpliqués AutoCAD refuse de lancer le fichier script et tourne en boucle

Dans ce cas arrêtez SuperAutoScript en cliquant bouton droit sur l'icone de SuperAutoScript en bas à droite (près de l'heure) et choisissez exit.

 

Si vous avez des idées pour d'autre script à ajouter à la liste ou des rapports de bug n'hesitez pas

 

SuperAutoScript peut être téléchargé ici

 

 

 

Lien vers le commentaire
Partager sur d’autres sites

Salut Eric,

 

je vais avoir un peu l'air c.. là mais j'arrive pas à me servir de ton script. http://smileyonline.free.fr/images/gif/pascompris/vignette/thumbnails/scarymovie2_gif.gif

 

Je le télécharge, je le lance et là il me démarre autocad (MAP 2006), puis je fais quoi après ? http://smileyonline.free.fr/images/19032003/merlot.gif

 

J'ai essayer de lancer les dessin ensuite, avant pendant après mais rien n'y fait.

 

merci de ton aide. http://smileyonline.free.fr/images/gif/meilleur/vignette/thumbnails/2king_1_prv_gif.gif

Lien vers le commentaire
Partager sur d’autres sites

aie aie aie ça commence mal

Alors normalement lorsque l'on clic sur l'exe vous devriez avoir cette image

 

http://www.caderix.com/telechargements/images/sas1.gif

 

Ensuite vous choisissez votre script ou vous rentrez le votre puis vous lancer le script en cliquant sur lancer le script

 

A ce moment la AutoCAD se lance et vous demande de choisir des fichiers

 

Une fois les fichiers choisit et validés un message apparait pour vous demander de cliquer sur ok une fois que tous les fichiers sont ouvert

 

Une fois les fichiers ouvert cliquez sur ok

 

La les scripts s'éxecutent

 

Puis une fois terminé un message apparaît vous indiquant que c'est terminé

 

Alors où ça bloque ?

Une incompatibilitée avec Map ?

 

Lien vers le commentaire
Partager sur d’autres sites

J'ai fait tout comme tu dit (sur AcadMap 2004)

 

Il me dezomm bien mes fichiers et les enregistrent

mais me crée aussi un fichier filedia.dwg :casstet:

 

me déroule la page de cadXP :P

 

m'affiche la page d'outlook en me proposant un nouveau message à écrire :mad2: :calim:

 

me crée une erreur fatale sur Autocad quand j'y retourne :hallucine: :hallucine:

Lien vers le commentaire
Partager sur d’autres sites

Voila ce que ça donne avec 2 fichiers à "Dézommer"

 

 

Régénération du modèle.

Initialisation de l'environnement COVADIS ...

... terminé : 10 variables mises à jour.

AutoCAD Express Tools Copyright © 2002-2003 Autodesk, Inc.

COVADIS Topo 2000-6 : chargement des utilitaires de menu ...

... terminé.

Utilitaires de menu AutoCAD chargés.

AutoCAD BonusCAD DDE-07 chargé.

==> MBLOC

Commande: filedia

Entrez une nouvelle valeur pour FILEDIA <1>: 0

Commande: _script

Entrez un nom de fichier script. :

C:\superautoscript\script.scr

Commande: _zoom

Spécifiez le coin d'une fenêtre, entrez un facteur d'échelle (nX ou nXP) ou

[Tout/Centre/DYnamique/ETendu/Précédent/Echelle/Fenêtre] : et

Régénération du modèle.

Commande: _qsave Enregistrer le dessin sous :

filedia Un dessin du même nom existe déjà.

Voulez-vous l'écraser? 1

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? filedia

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? 0

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? _s*Annuler*

Commande: filedia

Entrez une nouvelle valeur pour FILEDIA <0>: 0

Commande: _script

Entrez un nom de fichier script. : filedia 0

_script C:\superautoscript\script.scr

"filedia 0 _script C:\superautoscript\script.scr ": Nom de fichier incorrect.

Commande: filedia

Entrez une nouvelle valeur pour FILEDIA <0>: 0

Commande: _script

Entrez un nom de fichier script. :

C:\superautoscript\script.scr

Commande: _zoom

Spécifiez le coin d'une fenêtre, entrez un facteur d'échelle (nX ou nXP) ou

[Tout/Centre/DYnamique/ETendu/Précédent/Echelle/Fenêtre] : et

Régénération du modèle.

Commande: _qsave Enregistrer le dessin sous :

filedia Un dessin du même nom existe déjà.

Voulez-vous l'écraser? 1

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? filedia

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? 0

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? _script

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? C:\superautoscript\script.scr

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser?

Commande: filedia

Entrez une nouvelle valeur pour FILEDIA <0>: 0

Commande: _script

Entrez un nom de fichier script. :

C:\superautoscript\script.scr

Commande: _zoom

Spécifiez le coin d'une fenêtre, entrez un facteur d'échelle (nX ou nXP) ou

[Tout/Centre/DYnamique/ETendu/Précédent/Echelle/Fenêtre] : et

Régénération du modèle.

Commande: _qsave Enregistrer le dessin sous :

filedia Un dessin du même nom existe déjà.

Voulez-vous l'écraser? 1

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

 

etc...etc...

 

mais, en plus ça ne fait jamais 2 fois la même chose :hallucine:

Lien vers le commentaire
Partager sur d’autres sites

Merci Kallain pour ces infos

 

Ce problème vient du fait que le script tourne en boucle mais comme il se trompe il ne s'arrête plus.

Quand tu as ce problème clic bouton droit sur l'icône de SuperAutoScript en bas à droite près de l'heure et choisis exit pour l'arrêter.

 

Le problème se situe apparement ici :

 

Commande: _qsave Enregistrer le dessin sous :

filedia Un dessin du même nom existe déjà.

Voulez-vous l'écraser? 1

Oui ou Non, s'il vous plaît.

Un dessin du même nom existe déjà.

Voulez-vous l'écraser? filedia

 

Le _qsave ne dervait pas demander d'enregistrer sous sauf si c'est un nouveau dessin

 

Question : quelle est le nom du dessin par défaut quand Map + covadis se lance (en haut dans la barre de titre)

Si ce n'est pas [dessin1.dwg] cela ne fonctionnera pas

 

Lien vers le commentaire
Partager sur d’autres sites

Mais Map demande toujours si on veut écraser un fichier existant quand on fait enregistrer ?

Ou il a fait ça sur un dessin vierge ?

 

La boite de dialogue pour sélectionner les fichiers s'est bien ouverte ?

 

T'as essayé avec un autre script ?

 

 

Pour info je précise aussi qu'un dossier SuperAutoScript est crée sur votre disque dur, il contient le fichier script dont AutoCAD se sert

 

[Edité le 4/11/2005 par Eric]

Lien vers le commentaire
Partager sur d’autres sites

J'ai essayé le script "Purger"

 

la fenètre "Traitement en cours" s'ouvre et reste bloquée ( de 12h à 14h)

le fichier purger.lsp n'est pas créé dans le repertoire

 

J'ai essayé sur un poste avec AutocadMap 2000 realise4 (sans covadis)

 

Pour "Zoom" pas de problème : ça marche et autocad se referme

 

pour purger ça reste bloqué et lorsque l'on sort (sur l'explorateur Windows) ça ouvre la première fois

 

Bloc-notes avec le fichier "accident.scr" qui reprend le lisp de ton accident ????

 

et la deuxième fois il ouvre "Imaging" :casstet:

Lien vers le commentaire
Partager sur d’autres sites

Il doit y avoir un truc avec Map qui ne fonctionne pas comme sur AutoCAD, mais ne l'ayant pas, ca m'est difficile de savoir quoi.

 

Pour info c'est quoi ton système d'exploitation ?

 

pour purger ça reste bloqué et lorsque l'on sort (sur l'explorateur Windows) ça ouvre la première fois

 

Bloc-notes avec le fichier "accident.scr" qui reprend le lisp de ton accident ????

 

et la deuxième fois il ouvre Imaging

 

 

 

T'es sur qu'il n'est pas hanté ton pc

 

Non ca vient du fait que le script essaie de fonctionner sur une autre applications quand tu sort d'AutoCAD.

Quand ça déconne arrête SuperAutoScript d'abord puis fait autre chose.

 

le fichier purger.lsp n'est pas créé dans le repertoire

 

 

Non il n'y a pas de fichier purger.lsp qui se créer, seulement un fichier nommé script.scr

 

 

[Edité le 4/11/2005 par Eric]

Lien vers le commentaire
Partager sur d’autres sites

Bonjours Eric !

J’ai voulu essayer de lancer ton programme sur ma LT 2002

Mai j’avais un LT 2006 périmé, que j’ai arrêté, et dont j’ai lancé la désinstal sur le champ.

Il ma demandé de fermer plusieurs applications …

Et maintenant il ne trouve plus ($acad)

Tu as une idée ?

 

Pour info un vieux truc qui ne marchera qu’avec la clef noire (facile de trouver la version)

C’est un exo que j’avais écrit pour un stage LISP (création et lecture de fichiers) en VO

 

; {-----------------------------------------------}

; {| |}

; {| GENSCR Cr‚e un fichier SCRIPT |}

; {| en r‚cuperant tout les DWG |}

; {| du r‚pertoire sp‚cifier, et y |}

; {| ajoute des commandes AutoCAD. |}

; {| __________________________ |}

; {| |}

; {| |}

; {| Revision le 24 aout 1990 par CDL |}

; {| VERSION 1.00 |}

; {-----------------------------------------------}

 

 

 

(defun entrer ()

 

; (command "ecrantxt")

(command "dir" "\\acadwin\\dwg\\*.dwg>\\acadwin\\dwg\\LISTE.txt")

(setq fe "\\acadwin\\dwg\\LISTE.txt")

(setq fs "\\acadwin\\dwg\\DWG.scr")

)

 

 

(defun lecture ()

(setq a (open fe "r"))

 

(setq nbpoint 0)

 

(while (setq enrg (read-line a))

(setq nom (substr enrg 1 8))

(setq extention (substr enrg 10 3))

(if (= extention "DWG")(setq nbpoint (+ nbpoint 1))

)

)

(close a)

 

(command "ECRANTXT")

 

(write-line " STATISTIQUES ")

(write-line " ")

(prompt "Nombres de dessins : ")

(prin1 nbpoint)

(write-line "")

 

(getstring "Appuyer sur une touche")

)

 

; ECRITURE DU FICHIER

 

(defun ecriture ()

 

(setq a (open fe "r"))

(setq b (open fs "w"))

 

(while (setq enrg (read-line a))

(setq nom (substr enrg 1 8))

(setq extention (substr enrg 10 3))

(if (= extention "DWG")

(progn

(write-line "_open" b)

(write-line nom b)

(write-line "traceur" b)

(write-line "" b)

(write-line "" b)

)

)

)

 

(close a)

(close b)

)

(defun c:tracex()

(entrer)

(lecture)

(ecriture)

)

 

; FIN DE PROGRAMME

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

Aplus

Lien vers le commentaire
Partager sur d’autres sites

Ah pas facile la vie de programmeur.

 

As tu essayé de lancer AutoCAD LT 2002 tout seul ?

Il devrait réecrire la clé de registre pour lancer AutoCAD automatiquement

Sinon tu as redémarré ton pc ?

Lien vers le commentaire
Partager sur d’autres sites

Et maintenant il ne trouve plus ($acad)

 

C'est parce qu'après la désinstallation de Lt 2006 il te manque (ou elle est vide) la clé de registre :

 

HKEY_CLASSES_ROOT\CLSID\{8E75D913-3D21-11D2-85C4-080009A0C626}\LocalServer32

 

Lien vers le commentaire
Partager sur d’autres sites

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é