Eric Posté(e) le 29 août 2005 Posté(e) le 29 août 2005 Voici une petite macro à placer dans un bouton pour ceux qui veulent faire des croix pour représenter l'axe d'un cercle par exemple Il suffit d'indiquer le centre de la croix puis une extrémité et à nouveaux le centre de la croixEn tout 3 points Cet axe se place sur un calque nommé axe en cyan et type de ligne axe ^C^C-calque;e;axe;;_line;\\;-reseau;d;;p;\2;180;o;pedit;m;p;d;;o;j;;;-reseau;d;;p;@;2;90;o;_layerp;-calque;tl;axes;axe;co;cyan;axe;; Cela ne fonctionne qu'à partir d'AutoCAD 2004 je pense. Voila une petite macro pour s'amuser. [Edité le 29/8/2005 par Eric] Eric est formateur, revendeur sur AutoCAD LT, DraftSight, ZWCAD, SketchUp et PDF2CAD
Eric Posté(e) le 29 août 2005 Auteur Posté(e) le 29 août 2005 Bon il y a un espace après pedit;m qui ne devrait pas exister, mais pas moyen de le supprimerDonc quand vous faites un copier coller dans votre bouton, supprimez cet espace. Eric est formateur, revendeur sur AutoCAD LT, DraftSight, ZWCAD, SketchUp et PDF2CAD
Eric Posté(e) le 29 août 2005 Auteur Posté(e) le 29 août 2005 Après réflexion voci la macro remodifiée pour qu l'on n'ai qu'à indiquer le centre de la croix et l'extrémité Du coup on élimine un point ^C^C-calque;e;axe;;_pline;\\;pedit;d;m;d;@;q;;-reseau;d;;p;@;2;180;o;pedit;m;p;d;;o;j;;;-reseau;d;;p;@;2;90;o;_layerp;-calque;tl;axes;axe;co;cyan;axe;; [Edité le 29/8/2005 par Eric] Eric est formateur, revendeur sur AutoCAD LT, DraftSight, ZWCAD, SketchUp et PDF2CAD
Eric Posté(e) le 29 août 2005 Auteur Posté(e) le 29 août 2005 Alors maintenant, ne devrait pas apparaître : l'espace après -reseau;d;; Et l'espace sur le mot axe s Comment ça se fait qu'il y a tout ces espaces qui apparaissent après avoir collé le codeEt en plus si on édite le message il n'apparaissent pas :casstet: Eric est formateur, revendeur sur AutoCAD LT, DraftSight, ZWCAD, SketchUp et PDF2CAD
rebcao Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 Coucou Eric ! serais-tu en train de t'ennuyer ? c'est sans doute la nostalgie des vacances ? ... ;) Une idée, tu peux utiliser un bloc représentant déjà la croix dans un rapport de 1 x 1... que tu insères ensuite à l'échelle du rayon, avec une petit morceau en plus pour représenter de vrais axes ui dépassent un peu le cercle ! Christian [Edité le 30/8/2005 par rebcao] Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
Eric Posté(e) le 30 août 2005 Auteur Posté(e) le 30 août 2005 Ben oui c'est toujours dur de se remettre de vacances en Alsace :D Ouais on aurait pu faire la même chose avec un bloc mais il aurait fallu le publier et le récupérer ensuite dans un dossier et je voulais faire un truc très simple à utiliser pour l'utilisateur. (simple copier coller)Enfin ce serait plus simple s'il n'y avait pas ces satanés espaces qui viennent se mettre dans le code :mad: C'est pas du boulot ça Patrick :D Mais tu as raison il y aurait bien d'autres manières de faire cette croix.Si le coeur vous en dit... [Edité le 30/8/2005 par Eric] Eric est formateur, revendeur sur AutoCAD LT, DraftSight, ZWCAD, SketchUp et PDF2CAD
rebcao Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 voici la macro avec le bloc... *^C^C_-insert;croix-1x1;cen;\;;;echelle;d;;auc;@;r;0.5;\ Cliquer pour copier-coller cette MACRO… et n'oublier pas de charger le fichier dessin CROIX-1x1.dwg… au suivant... Christian [Edité le 30/8/2005 par rebcao] Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
rebcao Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 une variante avec un seul clic sur le cercle... ;) *^C^C_lengthen;\;id;cen;@;_-insert;croix-1x1;auc;@;$m=$(/,$(getvar,perimeter),3.14);;; Cliquer pour copier-coller cette MACRO… Attention pour les versions 2000 la commande _-insert doit être remplacée par -insert. Pour la 2000 i je sais plus !!! Christian [Edité le 30/8/2005 par rebcao] Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
rebcao Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 et de 3 ! Troisième variante en un seul clic et en débordant légèrement le cercle pour ue ça ressemble vraiment à un trait d'axe... *^C^C_lengthen;\;id;cen;@;_-insert;croix-1x1;auc;@;$m=$(+,$(/,$(getvar,perimeter),3.14),$(*,$(getvar,textsize),5));;; Cliquer pour copier-coller cette MACRO… c'est la valeur de TEXTSIZE qui détermine la valeur du débordement ! Et comme TEXTSIZE varie généralement en fonction de l'échelle du dessin, le résultat est correcte. Pour la valeur de Pi on aurait bien sur pu entrer une valeur avec plus de précision !!! Christian Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
bonuscad Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 Une autre variante, n'utilisant pas de bloc avec un seul clic sur un cercle, arc ou polyarc (devant contenir au moins un quadrant) et la croix depassant du cercle. ^C^C_.-layer;_make;axe;_ltype;axes;axe;_color;_cyan;axe;;_.line;_quad;\_cen;@;;_.-array;_last;;_polar;_none;@;4;360;_yes;_.select;_crossing;_none;@;_none;@;;_.scale;_previous;;_none;@;1.25;_.layerp;^Z PS: attention aucun espace lors du copier-coller de ^C à ^Z Choisissez un travail que vous aimez et vous n'aurez pas à travailler un seul jour de votre vie. - Confucius
rebcao Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 une dernière variante pour faire des Groa... Cliquer pour afficher la Magro… Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
Eric Posté(e) le 30 août 2005 Auteur Posté(e) le 30 août 2005 Ben dis donc, j'en connais d'autres qui s'ennuie :D Eric est formateur, revendeur sur AutoCAD LT, DraftSight, ZWCAD, SketchUp et PDF2CAD
rebcao Posté(e) le 30 août 2005 Posté(e) le 30 août 2005 gagné ! Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
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