Autorisation : Membre
Nb de messages : 20
Inscrit le : Ven 15 Oct 2010, 20:21
Posté le : Ven 15 Oct 2010, 20:41
[couleur=#FFAAFF]Un programme simple ou vous êtes le symbole égal et ou vous devez vous deplacer avec les flèches de gauche et de doite pour attrapper les zéros qui tombent
{Code} :
EffEcr
0->A
2->C
2->X
1->Y
Lbl 3
EffEcr
A+1->A
Output(Y,X,"O
Output(7,C,"=
If Y=7
Then
If C {pas égal à} x
Goto 4
entAléat(1,3->X
1->Y
Goto 3
End
Output(2,6'"SCORE
Output(2,13,A
Output(4,13,{votre meilleur score}
Codetouche->K
If K=24
C-1->C
If K=26
C+1->C
If C=0
3->C
If C=4
1->C
Y+1->Y
5 !
Goto 3
Lbl 4
for(K,1,20
Ouput(2,6,"SCORE
Output(2,13,A
Output(4,6,"RECORD
Output(4,13,{votre meilleur score}
End
EffEcr