Bonjour, j'ai créé une nouvelle barre d'outil et j'y ai ajouté une commande pour faire des nuages de révision. Voici ce que j'aimerais que ma commande effectue comme travail: 1- CRÉER UN NOUVEAU CALQUE _REV1_NUAGE ET LE METTRE COURANT. 2- CRÉER UNE POLYLIGNE AU NOMBRE D'ARRÊTE INDÉTERMINER ET FERMER DANS L'ESPACE PAPIER 3- AVEC LA COMMANDE NUAGE, LONGUEUR DE L'ARC DE 8 mm ET UTILISÉ LA POLYLIGNE COMME OBJET À CONVERTIR EN NUAGE 4- CRÉER UN NOUVEAU CALQUE _REV1_TRIANGLE ET LE METTRE COURANT. 5- DÉSACTIVER LES OBJETS D'ACCROCHAGE (OSNAP) 6- INSÉRÉ UN BLOC ATTRIBUT "TRIANGLE_DE_REVISION.DWG" AVEC JUSTIFICATION DE L'EMPLACEMENT PAR L'UTILISATEUR À L'ÉCHELLE DE 1 SANS ROTATION ET QUE LA VALEUR D'ATTRIBUT SOIT 1 7- ENVOYER LES OBJETS "NUAGE" ET TRIANGLE DE RÉVISION" DANS L'ESPACE OBJET AVEC LA COMMANDE "CHSPACE" 8- QUITTER LA FENÊTRE DONC LEQUEL LES OBJETS "NUAGE" ET "TRIANGLE DE RÉVISION" CE SONT INSÉRÉS ET METTRE ACTIVER LA COMMANDE ESPACE PAPIER 9- FAIRE UN ZOOM ÉTENDU FIN MON BUT: C'est de créer des nuages de révision avec le triangle de révision coller à même ce nuage et je veux passé absolument par la commande objet pour que mes nuages soit bien droit et bien présenté. Voici mon lisp qui bloc après l'insertion de mon bloc attribut. Quelqu'un peut m'aider SVP (defun c:NUAGE () (Command "_LAYER" "N" "_REV1_NUAGE" "CH" "_REV1_NUAGE" "") (command "_.pline"(while (not (zerop (getvar "cmdactive")))(command pause)))(command "pedit" (entlast) "C" "") (command "_revcloud" "L" "8" "8" "O" "DERNIER" "") (Command "_LAYER" "N" "_REV1_TRIANGLE" "CH" "_REV1_TRIANGLE" "") (Command "_-OSNAP" "INACTIF" "") (Command "-inserer" "C:/_REPERTOIRE_X/BLOCS/TRIANGLE_DE_REVISION.dwg" "E" "1" "R" "0") (Command "_CHSPACE" "\\") (Command "_PSPACE" "") (Command "_ZOOM" "ET" "") ) MERCI ERIC
