Aller au contenu

Une macro pour faire des croix


Eric

Messages recommandés

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 croix

En 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]

Lien vers le commentaire
Partager sur d’autres sites

Bon il y a un espace après pedit;m qui ne devrait pas exister, mais pas moyen de le supprimer

Donc quand vous faites un copier coller dans votre bouton, supprimez cet espace.

 

Lien vers le commentaire
Partager sur d’autres sites

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]

Lien vers le commentaire
Partager sur d’autres sites

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 code

Et en plus si on édite le message il n'apparaissent pas :casstet:

 

Lien vers le commentaire
Partager sur d’autres sites

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 @)

Lien vers le commentaire
Partager sur d’autres sites

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]

Lien vers le commentaire
Partager sur d’autres sites

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 @)

Lien vers le commentaire
Partager sur d’autres sites

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 @)

Lien vers le commentaire
Partager sur d’autres sites

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 @)

Lien vers le commentaire
Partager sur d’autres sites

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

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é