Voilà un code qui sert à faire Flappy bird
- Code: Select all
12→A
0→B
2→K
4→Q
0→P
EffEcran
For(X,1,150
Output(4,5,"PRET ?
End
EffEcran
Output(4,5,"GO !!
For(X,1,10
Disp "
End
1→I
While I=1
codetouch(→C
If C=63
180→B
A-Kcos(B)→A
ent(A)→A
If B>0
B-45→B
If A<1 ou A>15
0→I
Q-1→Q
If Q≤0
Then
9→Q
entAléat(2,9)→D
Output(7,1,"[XXXXXXXXXXXXXX]
Output(7,D,"} {
End
If I=1
Output(3,A,"O
Disp "=
Output(7,16,"=
If Q=5
Then
If A<D+1 ou A>D+4
Then
0→I
Else
P+1→P
End
End
End
Pause
EffEcran
Output(4,4,"PERDU
Output(5,4,"SCORE :
Output(5,11,P