Discussion :

[Seb981]

Bonjour à vous tous,

Je souhaiterais faire un programme en prolog ou lorsque je lance cela me ferais un menu du style :

**** MENU ****

1 - Ajouter un predicat
2 - supprimer un predicat
3 - lancer un predicat
4 - fin du programme

Tapez votre réponse : 3
Tapez votre predicat : ---

------

retour au menu :

**** MENU ****

1 - Ajouter un predicat
2 - supprimer un predicat
3 - lancer un predicat
4 - fin du programme

etc.

Pourriez-vous me dire quel predicat utilisé ?
pour mettre à l'écran c'est print()
mais pour demander de taper un chiffre, le recuperer ...
quel predicat pour terminer un programme ?

@+ Seb

[Trap D]

Lance-toi dans XPCE, tu pourras faire des fenêtres et autres.

[Seb981]

mais on m'oblige de le faire avec SWI-prolog

@+ Seb

[je®ome]

C'est parfait !
va jetter un coup d'oeil par ici .

[Trap D]

C'est parfait !
va jetter un coup d'oeil par ici .

C'est vrai que je ne pense même pas à citer mes propres tutos

[Seb981]

merci à vous, cela m'a l'air pas mal .

J'ai déjà réussi faire le hello world !

@+ Seb

[cflo91]

Bonjour je voudrai faire un menu similaire mais sans utiliser d'interface graphique.....

Comment puis je faire ?

Je voudrai que l'utilisateur est le choix entre plusieurs action...

Merci d'avance pour votre aide

[vivoli12]

Avec des write() et des read(), y a pas plus simple.

[cflo91]

ok mais comment faire un menu ?

[Trap D]

Avec des write() et des read(), y a pas plus simple.

Pas avec XPCE. Il y a des champs de saisie (testfield si je me souviens bien).

[cflo91]

je veux juste faire en menu avec deux possibilités, soit l'utilisateur tape 1 pour la premiere ou bien 2 pour la seconde.

Je voudrais ne pas me servir de XPCE.

En fait, je pense qui faut que je récupère le 1 ou le 2 avec read mais je ne sais pas comment m'en servir?

[Trap D]

Voilà un exemple de menu :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
test :-
	repeat,
	writeln('1. action 1'),
	writeln('2. action 2'),
	writeln('3. sortie'),
	read(X),
	writeln(X),
	travail(X).
 
travail(1) :-
	!,
	writeln('action 1'), fail.
 
travail(2) :-
	!,
	writeln('action 2'), fail.
 
travail(3) :-
	!,
	writeln('sortie').
 
travail(_) :-
	writeln('erreur de saisie'), fail.

[cflo91]

merci