Publicité
La clause UNTIL externe contient une condition qui affiche un
message d'erreur si la touche n'est pas définie. Dans la liste ci-
dessous, les indentations identifient la structure externe, les clauses,
les structures interne et leurs clauses.
Séquence
-::
.. Ananas
Il
Il
Ban.:tne
Il
IICerise
ll
DO
CLLCD
"Appu'=,ez SIJt-"
DISP
"
[A]
pOIJr
Anan.:os"
"
[B] POUt-
Ban.:one"
:3 DI=::;P
"
[C]
POUt-
Cet-ise"
4
DE;P
DO Ut·1T l L KE'ï' Et·1D
UtHIL
Commentaires
Cette liste contient les résultats pos-
sibles. Elle reste dans la pile jusqu'à
ce que la structure
DO ... UNTIL ... END suivante donne
1,
2 ou 3, indiquant le choix de
l'utilisateur.
Commence la clause de la boucle
externe. Cette clause affiche les
messages d'option, qui présente à
l'utilisateur les choix et en demande
une réponse.
Efface l'affichage.
Le message d'option pour la ligne 1.
Affiche le message.
Le message d'option pour la ligne 2.
Affiche le message.
Le message d'option pour la ligne 3.
Affiche le message.
Le message d'option pour la ligne 4.
Affiche le message.
Cette boucle interne non définie se
répète jusqu'à ce que l'utilisateur
appuie sur une touche. La com-
mande KEY donne 0 si vous n'avez
pas appuyé sur une touche, ou don-
ne une chaîne (représentant la
touche) et 1 si vous avez appuyé sur
une touche. A la fin de la boucle, la
chaîne reste dans la pile.
Commence la clause de test externe.
Cette clause vérifie si la touche est
une touche définie.
236
27 : Programmes interactifs
Publicité
