Rappel de commande lisp

[Bred]

Bonjours,

 

J'ai un lisp qui propose au lancement 3 choix (getkword "...A / B ou C :).

J'ai créé 3 macros boutons qui réponde chacune à l'un des 3 choix.

Lorsque je lance la commande par l'un des boutons macro ça fonctionne.

Mais quand je relance la commande à la suite par un "entrée", il me relance le lisp du début, en me re-demandant le choix A, B ou C....

Y a t'il une astuce pour éviter ce genre de chose où dois-je séparé mon lisp en 3 (defun... )???

 

merci

[Tramber]

tu devrais déjà publier ton lisp.

 

De mémoire, ENTREE ne relance que les (defun c:fonction et non les (defun fonction

 

[Bred]

Voilà le lisp (principe) :

 

(defun c:CHOIX ()

(initget 1 "A B C")

(setq Q1 (getkword "\n Choix (A/B/C) ?"))

(if (= Q1 "A")(alert "CHOIX A"))

(if (= Q1 "B")(alert "CHOIX B"))

(if (= Q1 "C")(alert "CHOIX C"))

)

 

Avec 3 Boutons macro :

^C^Cchoix;a;

^C^Cchoix;b;

^C^Cchoix;c;

 

le bouton marche 1 fois, mais quand on le relance à la suite avec "entrée" il pause la question Choix (A/B/C)?

 

merci

 

 

 

[bonuscad]

Tu pourrais simplement passer un argument à ta fonction!!! :

 

(defun CHOIX (Q1 / )

(if (= Q1 "A")(alert "CHOIX A"))

(if (= Q1 "B")(alert "CHOIX B"))

(if (= Q1 "C")(alert "CHOIX C"))

)

 

^C^C(choix "A");

^C^C(choix "B");

^C^C(choix "C");

[Tramber]

Ben oui, c'est plus clair.

 

Mieux vaut :

*^C^Cchoix;a; puis ECHAP

 

[Bred]

merci.

mais donc je perd l'accés à ma question "choix" si je veux taper la commande au clavier...

si je n'ai plus ou pas les 3 boutons, j'aurait voulu garder la possibilité de choisir dans les trois choix proposés...

ou alors je n'ai rien compris à ta proposition (je débute en lisp) ...

[Patrick_35]

Salut

Il y a une chose que je ne comprends pas. Pourquoi faire poser la question choix alors que tu les as directement avec tes boutons ?

 

@+

[Bred]

Je vais essayer d'être un peu plus clair :

Mon lisp sert à régler un pas de vis. Ce pas de vis peut être réglé par rapport à 3 choix : la sortie de vis, le point d'appui de l'écrou ou le point d'appui de la vis... j'ai donc fait un lisp qui insert mes pièces et qui les règles suivant l'un des 3 choix que j'ai fait.

J'aurais pû séparé les 3 choix (et je peux toujour le faire) mais comme j'ai eu cette difficulté de retour de commande, je pose la question pour savoir si il est possible d'y remédier pour mes prochains lisp...

Ce lisp fait la même chose mais de trois manière différente selon les cas de figures désiré, je pensais qu'il était "malin" de le regrouper...

Si vous ne voyez pas de solution, ce sera une bonne leçon pour moi pour les prochaines fois...

 

Merci