CDL Posté(e) le 10 avril 2004 Posté(e) le 10 avril 2004 La solution existe !Je cherche : Incrémentation automatique dans un BLOC (numérotation) un LISP ou une macrosur AutoCAD LT 2000 et 2004 (+ LT-EXTENDER) Je suis en RTC un lien sur le site !(ou une solus pour copier/coller un LISP)Merci d’avance !
didier Posté(e) le 10 avril 2004 Posté(e) le 10 avril 2004 helloun petit lisp tapé vite fait sur le gazdans cet exemple, l'attibut "num"est le premier attribut du bloc NomDuBlocteste çàet commente s'il y a un souci (setq num 0)(setq num (getint "\nNuméro de depart\n\t"))(setq inc (getint "\nValeur de l'incrémentation\n"))(princ (strcat "POINT NUMERO " (itoa num) " A FAIRE ...(Echap pour arrêter)"))(setq pins (getpoint "\nPOINT D'INSERTION\n"))(command "_INSERT" "NomDuBloc" pins "" "" "" (itoa num) )(while (setq num (+ num inc))(princ (strcat "POINT NUMERO " (itoa num)" A FAIRE ...(Echap pour arrêter)"))(setq pins (getpoint "\nPOINT D'INSERTION\n"))(command "_INSERT" "NomDuBloc" pins "" "" "" (itoa num) ));while à bientôt Éternel débutant… Mon site perso : Programmer dans AutoCAD
Tramber Posté(e) le 10 avril 2004 Posté(e) le 10 avril 2004 Sympa pour ceux qui sont vraiment sur LT Sinon, dans les express il y a un outil mais seulemnt pour textes et attributs Bureau d'études dessin. Spécialiste Escaliers Développement - Formation ./__\. (.°=°.)
CDL Posté(e) le 10 avril 2004 Auteur Posté(e) le 10 avril 2004 Merci !Je teste et je te tient au courant Didier ? ( T'est monochhorme maintenant !)A+
didier Posté(e) le 10 avril 2004 Posté(e) le 10 avril 2004 helloben oui, j'ai perdu mes couleursc'est pour masquer mes cheveux blancs ... ;) A plus... Éternel débutant… Mon site perso : Programmer dans AutoCAD
CDL Posté(e) le 12 avril 2004 Auteur Posté(e) le 12 avril 2004 pour Didier : ton programme PERFECT ! suite...Comment je garde les zéros devant ?pour 1; je veux ecrire 01 ?voire meme... A01 et aprés B02 ?j'ai aussi des cheuveux blancs !
x_all Posté(e) le 1 juillet 2006 Posté(e) le 1 juillet 2006 je découvre lisp grace a vous... un grand merci a didier pour ce bout de code... il fait tout comme je voulais )) quelques trucs sur autocad
rvpas Posté(e) le 9 juillet 2006 Posté(e) le 9 juillet 2006 Salut, avis aux simple utilisateur de LT!On peux créer aussi des macro boutons. Exemple En utilisant une variable USERI pour donner le numéro de départ ^c^cuseri1; Puis, on insert un bloc (rep) avec un attribut qui va être incrémenter automatiquement à l'insertion.Numéroter un attribut dans un bloc au moment de l'insertion ^c^cattdia;0;-inserer;rep;\;;;$M=$(getvar,USERI1);modifvar;USERI1;$(+,$(getvar,useri2),$(getvar,USERI1));attdia;1; Et éventuellement pour renuméroter après insertion.Renuméroter un attribut dans un bloc après insertion *^C^C_-attedit;;;;;\;_v;_r;$M=$(getvar,USERI1);;modifvar;USERI1;$(+,$(getvar,useri2),$(getvar,USERI1));attdia;1; Il faut créer 3 boutons et ne pas oublier de créer un nouveau chemin de recherche support dans l'onglet fichier des options. De cette façon, autocad retrouvera le bloc sans problème. Bref l'usage du DIESEL pour un vieux dinosaure c'est normal n'est il pas rebcao et le crabe ? D'ailleurs quand pensez vous ?Bonne soirée PASCAL
rvpas Posté(e) le 9 juillet 2006 Posté(e) le 9 juillet 2006 Oups ! J'oubliai, on peux changer le pas en attribuant à USERI2 un pas Pas d'incrémentation^c^cuseri2; C'est toutSee youPascal
GL Posté(e) le 26 juillet 2006 Posté(e) le 26 juillet 2006 Salut, avis aux simple utilisateur de LT!On peux créer aussi des macro boutons. Exemple En utilisant une variable USERI pour donner le numéro de départ ^c^cuseri1; Puis, on insert un bloc (rep) avec un attribut qui va être incrémenter automatiquement à l'insertion.Numéroter un attribut dans un bloc au moment de l'insertion ^c^cattdia;0;-inserer;rep;\;;;$M=$(getvar,USERI1);modifvar;USERI1;$(+,$(getvar,useri2),$(getvar,USERI1));attdia;1; Et éventuellement pour renuméroter après insertion.Renuméroter un attribut dans un bloc après insertion *^C^C_-attedit;;;;;\;_v;_r;$M=$(getvar,USERI1);;modifvar;USERI1;$(+,$(getvar,useri2),$(getvar,USERI1));attdia;1; Il faut créer 3 boutons et ne pas oublier de créer un nouveau chemin de recherche support dans l'onglet fichier des options. De cette façon, autocad retrouvera le bloc sans problème. Bref l'usage du DIESEL pour un vieux dinosaure c'est normal n'est il pas rebcao et le crabe ? D'ailleurs quand pensez vous ?Bonne soirée PASCAL J'ai essayé mais je n'ai pas d'incrémentation, si je mets 1 dansUSERI1 cela reste toujours à 1J'ai autocad lt 2005Merci pour votre aide. [Edité le 26/7/2006 par GL]
Patrick_35 Posté(e) le 26 juillet 2006 Posté(e) le 26 juillet 2006 SalutTu as aussi cette solution @+ [Edité le 26/7/2006 par Patrick_35] Les Lisps de PatrickLe but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.Joseph Joubert, 1754-1824
rvpas Posté(e) le 27 juillet 2006 Posté(e) le 27 juillet 2006 Salut GL, Il faut donner le pas d'incrémentation dans useri2 donc il faut créer un bouton supplémentaire pour paramêtrer le pas comme ci dessous Numéro de départ ^c^cuseri1; Pas d'incrémentation ^c^cuseri2; Insérer le repère incrémenter ^c^cattdia;0;-inserer;rep;\;;;$M=$(getvar,useri1);modifvar;useri1;$(+,$(getvar,useri2),$(getvar,useri1));attdia;1;ou si tu veut garder un pas de 1, tu supprime $(getvar,useri2) par 1. Bonne journée,Pascal
fauxsuisse Posté(e) le 9 avril 2009 Posté(e) le 9 avril 2009 Bonjour à tous. J'ai essayé le lisp de Didier qui marche très bien mais maintenant j'aurai voulu savoir s'il était possible de faire la même chose mais quand on pose le bloc qu'on puisse le tourner et non toujours positionné horizontalement, et je voulais aussi savoir s'il est possible de le faire sous Autocad 2010, j'ai essayé mais il ne numérote rien du tout. Merci d'avance !!
Messages recommandé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 compteSe connecter
Vous avez déjà un compte ? Connectez-vous ici.
Connectez-vous maintenant