yann67

hello, zut, j'ai 2012LT et ça ne marchera pas!!! bon, je vais surement freiner serieusement ma formation lisp!! à plus

Tu es un nerveux du lisp!! en meme temps, je suis très proche du néant! :-) merci de ta réactivité, vais le tester demain!

Messieurs, ci joint ma petite macro ^C^C_-insert;plafo;M2P;\\;;;^C^C_-insert;inter;x;1;\\;^C^C_arc;\\\;^C^C_chprop;\;ca;liai;\\\ Je voulais donc modifier cette macro en lisp afin d'avoir un panel plus grand de raccourci clavier ci-joint mon lisp qui en es à ses début :-) soyez indulgent! mozart était comme moi quand il avait 2ans (defun C : SA ( ) (setq a (getpoint "\npremier point: ")) (setq b (getpoint "\n2ème point: ")) (setq x1 (car a)) "\ncoordonnée x 1er point" (setq x2 (car B)) "\ncoordonnée x 2ème point" (setq y1 (cadr a)) "\ncoordonné y 1er point" (setq y2 (cadr B)) "\ncoordonnée y 2ème point" (setq xdis (-x2 x1)) (setq ydis (-y2 y1)) (command "insérer" "lumi" xdis ydis 0")) (command "insérer" "inter" 1 1 0")) (command "arc" "3P")) (setq dep (getpoint "\nspécifier point de départ arc: ")) (setq cen (getpoint "\nspécifier le centre de l’arc: ")) (setq fin (getpoint "\nspécifier le dernier point de l’arc: ")) (princ) ) Merci d'avance

Il manquait une ligne de commande en plus "ydis" (setq xdis (-x2 x1)) (setq ydis (-y2 y1)) (command "insérer" "lumi" xdis ydis 0"))

Hello, je vois ça, tu es très demandé pour les gros chantier :-) Moi, je bosse en BE depuis 4ans, fini de bosser en entreprise pour le moment Sinon, à propos du lisp, je compte taper "SA" au clavier pour lancer le lisp En faite, je souhaitai que xdis et ydis donne le point d'insertion du bloc. Délicat de maitriser le lisp, pffffff :-)

Bon, voilà mon travail! soyez indulgent, je n'ai pas autocad chez moi! (defun C : SA ( ) (setq a (getpoint "\npremier point: ")) (setq b (getpoint "\n2ème point: ")) (setq x1 (car a)) "\ncoordonnée x 1er point" (setq x2 (car B)) "\ncoordonnée x 2ème point" (setq y1 (cadr a)) "\ncoordonné"e y 1er point" (setq y2 (cadr B)) "\ncoordonnée y 2ème point" (setq dis (-x2 x1)) (commande "insérer" "lumi" xdis ydis 0")) (commande "insérer" "inter" 1 1 0")) (commande "arc" "3P")) (setq dep (getpoint "\nspécifier point de départ arc: ")) (setq cen (getpoint "\nspécifier le centre de l’arc: ")) (setq fin (getpoint "\nspécifier le dernier point de l’arc: ")) (princ) Merci pour vos éventuelles remarques

Messieurs, et salut tramber "NHR"! Voilà j'ai mis en place une macro dans la boite de dialogue personnalisation CUI ( cette macro insère un bloc, crée un arc etc...) plutôt longue mais fonctionne bien en outil!!! Par contre, je me demande si l'on peut mettre en place un raccourci clavier " genre tu tapes "R" et autocad prend en compte la macro. Bon, ça fonctionne si l'on tape "control + T" par exemple mais ça ne me branche pas trop Si cela se trouve, ya pas de possibilité puisque autocad 2012 est pluss bridé Merci de vos réponses si ils y en a Bon week à tous Yannick