INKEY$
GW-Basic, utilisé par PC-Basic
Exemple de programmation
Pour retourner un caractère lu au clavier.
Syntaxe:
v$=INKEY$
Commentaires:
Si aucun caractère n'est en attente dans
la mémoire tampon du clavier, une chaîne nulle (de longueur zéro) est renvoyée.
Si plusieurs
caractères sont en attente, seul le premier est renvoyé. La chaîne comportera un
ou deux caractères.
Deux chaînes
de caractères sont utilisées pour renvoyer les codes étendus décrits dans
l'annexe C du guide de l'utilisateur GW-BASIC. Le premier caractère d'un code à
deux caractères est zéro.
Aucun
caractère n'est affiché à l'écran et tous les caractères sauf les suivants sont
transmis au programme :
CTRL-BREAK
CTRL-VERR NUM
CTRL-ALT-SUPPR
CTRL-PRTSCR
PRTSCR
Exemples:
5 CLS
10 A$ = INKEY$
20 IF A$<>"" GOTO 50 'Si
différant de vide
30 PRINT "VOUS N'APPUYEZ SUR
RIEN"
40 GOTO 10
50 PRINT "LA TOUCHE QUE VOUS
AVEZ APPUYÉE EST--- " A$
Exemple 2
5 RANDOMIZE TIMER
10 X = INT(49*RND(1)+1)
20 Y = INT(49*RND(1)+1)
30
PRINT "QU'EST-CE QUE FONT" X " + " Y
40 T = 0
45 B$ = ""
50 A$ = INKEY$
60 T = T + 1
70 SOUND 128,1
80 IF T = 115 THEN 200
90 B$ = B$ + A$
95 IF LEN(B$) <> 2 THEN 50
100 IF VAL(B$) = X + Y THEN 130
110 PRINT "INCORRECTE " X "+" Y "=" X + Y
120 GOTO 10
130 PRINT "CORRECT"
140 GOTO 10
200 CLS
210 SOUND
180,30
220 PRINT "TROP TARD"
