AFTER

Catégorie :BASIC Amstrad
Soumettre : admin

AFTER

AFTER délai du chronomètre,numéro de chronomètre GOSUB numéro de ligne

10 AFTER 250 GOSUB 60:CLS
20 PRINT"Devine une lettre en 5 secondes"
30 a$=INKEY$:IF flag=1 THEN END
40 IF a$<>CHR$(INT(RND*26+97)) THEN 30
50 PRINT a$;" est exacte,tu as gagne !"
55 SOUND 1,478:SOUND 1,358:END
60 PRINT "Trop tard.J'ai gagne !"
70 SOUND 1,2000:flag=1:RETURN
run

COMMANDE:
Appelle un sous-programme après (AFTER en anglais) un certain délai. Le délai du chronomètre indique la durée de l'attente en multiples de 0,02 seconde. Le numéro de chronomètre (qui peut être 0,1,2 ou 3) précise lequel des quatre chronomètres d'attente il faut utiliser.

Chacun des 4 chronomètres peut être associé à un sous-programme.

Mots clés associés: EVERY, REMAIN, RETURN

Soumis le :  Fri, 24-Jan-2014, 11:31