Forum

Catégorie : Programmes
Forum : Aide à la programmation
Vues : 865
Réponses : 4
Type : discussion
Etat : réponses autorisées

Problème programmation snake

Eliott le 07/09/2014 à 16:40
j ai essayer de programmer un snake avec ce code:

Code
EffDessin
0->Xmin
94->Xmax
(-)62->Ymin
0->Ymax
AxesNAff
FonctOff
6->A:8->B:44->C:77->D:1->E:2->N:0->O
1->dim(Liste6
If .7349=partDéc(Liste6(1:Liste6(1->O
EffListe Liste4
EffListe Liste5
99->dim(Liste4
99->dim(Liste5
For(ø,1,6,1.4
Ligne(88,(-)ent(ø),6,(-)ent(ø)
End

Ligne(6,(-)57,88,(-)57
Ligne(88,(-)56,88,(-)6
Ligne(6,(-)6,6,(-)56
Texte(0,13," SCORE : 3
Texte(0,53," HIGH : ",ent(O

Lbl 5
(-)8-5ent(NbrAléat10->I
8+5ent(NbrAléat16->J

If pxl-Test((-)I,J:Goto 5
Ligne(J,I,J+2,I-2
Ligne(J,I-2,J+2,I
Goto 3

Lbl 2
6+50partDéc((A+C)/50->A
8+80partDéc((B+D)/80->B
If pxl-Test(A+2,B:Goto 4
Texte(A,B,"º

Lbl 3
arrondi(1+NpartDéc(E/N),0->E
Texte(Liste4(E),Liste5(E),"[4 espaces]
A->Liste4(E:B->Liste5(E

codeTouche->K
If K=0:Goto 2
If D=72:Then
If K=24:67->D
If K=26:77->D
If 1=abs(K-25:44->C
Goto 2:End

If C[pas égal à]44:Goto 2
If K=25:39->C
If K=34:49->C
If K=25 ou K=34:72->D
Goto 2

Lbl 4
Texte(A,B,"º
Ligne(B+1,(-)A-3,B+2,(-)A-2
If (-)I[pas égal à]A+2 ou J[pas égal à]B ou N=99:Goto Q
N+1->N
Texte(0,38,N+1
Goto 5

Lbl Q
If N+1>O:N+1.7349->Liste6(1
Texte(27,31,"GAME OVER
Pause


et quand j essaye de lancer mon programme je vois :
ERR: VAL FENETRE
pour la ligne: Ligne(88,(-)ent(ø),6,(-)ent(ø)

Merci de votre aide !

Ps: si vous voyez d autres fautes dites le moi
linkakro le 07/09/2014 à 18:19
Ce programme semble être celu[...]ss de ce forum.
Ce forum ne supporte pas l'unicode et tu postes un texte avec des flèches unicodes pour sto, cela génère "→".
Utilises une balise code autour de tes codes.
Je modère et ajoute une balise.

La commande de dessin affiche l'écran graphique mais la fenêtre est fausse, d'où l'erreur fenêtre. Corrige les valeurs affectées à Xmin, Xmax, Ymin, Ymax. Le début du programme s'en charge.
Code
0->Xmin
94->Xmax
-62->Ymin  // négatif
0->Ymax
Eliott le 07/09/2014 à 19:23
merci beaucoup
Eliott le 07/09/2014 à 19:35
le probleme persiste toujours !!

que dois je corriger et par quoi ? ( je suis debutant , il faut bien commencez un jour)
la calculatrice me dit qu il y a un probleme a la ligne : Ligne(88,(-)ent(ø),6,(-)ent(ø)
Eliott le 07/09/2014 à 19:53
C est bon vient de comprendre