Lbl R
ClrText
Locate 6,3,"ATTENTION,"
Locate 5,5,"T'ES PRET???"
Locate 8,7,"[EXE]"
Do
LpWhile Getkeyá31
ClrText
0ÞZ
5ÞY
Int 4Ran#ÞA
Int 4Ran#ÞB
Int 4Ran#ÞC
Int 4Ran#ÞD
Int 4Ran#ÞE
Int 4Ran#ÞF
Int 4Ran#ÞG
Int 4Ran#ÞH
Int 4Ran#ÞI
Int 4Ran#ÞJ
Int 4Ran#ÞK
Lbl 0
Locate 1,2,"™™™™™™™™™™™™™™™™™™™™™"
Locate 1,4,"™™™™™™™™™™™™™™™™™™™™™"
Locate 1,3,A
Locate 3,3,B
Locate 5,3,C
Locate 7,3,D
Locate 9,3,E
Locate 11,3,F
Locate 13,3,G
Locate 15,3,H
Locate 17,3,I
Locate 19,3,J
Locate 21,3,K
Locate 6,7,"TEMPS:"
Locate 13,7,Y
Y™1ÞY
Y=™1ãGoto A
Goto 0
Lbl A
Isz Z
ClrText
"1ER"
?ÞL
"2EME"
?ÞM
"3EME"
?ÞN
"4EME"
?ÞO
"5EME"
?ÞP
"6EME"
?ÞQ
"7EME"
?ÞR
"8EME"
?ÞS
"9EME"
?ÞT
"10EME"
?ÞU
"11EME"
?ÞV
A=L And B=M And C=N And D=O And E=P And F=Q And G=R And H=S And I=T And J=U And K=VãGoto 8
Lbl 9
ClrText
"DOMMAGE, C'EST PAS CA!!!!"
"ESSAYE ENCORE."
5ÞY
Do
LpWhile Getkeyá31
ClrText
Z=10ãGoto 7
Goto 0
Lbl 8
ClrText
"BRAVO, C'EST BIEN CA."
"NBRE DE TENTATIVES:"
ZÝ
Goto R
Lbl 7
"PERDU!!!"
"DOMMAGE!!!!"
Goto R