J'ai voulu ajouter un compteur de minutes, puisqu'il doit fonctionner 30 mn.
Et là... Le comportement devient aberrant : le programme saute des étapes, ce qui est censé être aléatoire ne l'est plus...
Or ce qui est vraiment étrange est que seule la ligne Text( est responsable de cela.
Vous avez le programme normal en dessous, avec un " devant la ligne pour qu'elle ne s'active pas, et dès qu'on l'enlève cela devient n'importe quoi.
J'ai mis des commentaires seulement ici :
- Code: Tout sélectionner
"Initialisation
0→Xmin
264→Xmax
0→Ymax
164→Ymin
ClrDraw
AxesOff
GridOff
BorderColor 1
BackgroundOff
Line(0,0,264,0,10,1
Line(0,0,0,164,10,1
Line(264,0,264,164,10,1
Line(264,164,0,164,10,1
[[0,1][1,0][0,1][1,0]]→[B]
0→A
startTmr→F
"La boucle
While startTmr-F<1800
"Text(0,0,round((startTmr-F)/60,0))
[B](A+1,1)→B
[B](A+1,2)→C
randInt(1,163)→D
randInt(1,263)→E
While pxl-Test(D,E)=0
Pxl-On(D,E,10+A
D+B→D
E+C→E
End
If D≠0 and D≠164 and E≠0 and E≠264:Pxl-Off(D,E
A+1→A
remainder(A,4→A
End
Disp round((startTmr-F)/60,0)
Boucle normale :
En enlevant " devant Text( :