Calculatrice

Salut tout le monde,
Voila en fait j'ai une calculatrice TI-83 et j'ai rentré un jeux a la main (car je n'ai pas de cable --') et en fait il y a un probleme qui m'empeche de jouer ça affiche ERR:DOMAIN. Donc je vais vous faire un petit copier coller du programme et je vais vous dire ou se met mon curseur quand je clique sur Goto : ( les -> sont des flèches ;) !)

PlotsOff :FnOff :Full:AxesOff:GridOff
ClrDraw
Text(20,31,"SERPENT
Text(26,40,"PAR
Text(32,31,"ERIC PIEL
Text(38,38,"1998
0->Xmin:1->ΔX
0->Ymin:1->ΔY
1->N:0->S:3->W
If 1:Then
Lbl D:End
0->P:1->M:0->G:12->Q:13->T:1->U:0->V
{0->L6:41->dim(L6:11.4->L6(12:12.4->L6(13
2^26-1->L6(1:2^26-1->L6(11
If N=1:ClrDraw
If N=2:Then
524160->L6(6
ClrDraw
Line(22,27,68,27
End
If N=3:Then
For(I,4,8
131584->L6(I
End
ClrDraw
Line(31,13,31,41:Line(63,13,63,41
End
If N=4:Then
For(I,4,9
2^(I+4)+2^(23-I->L6(I
End
ClrDraw
Line(26,41,49,7:Line(50,7,73,41
End
If N=5 or N=6:Then
For(I,3,9,3
8388592->L6(I
End
ClrDraw
For(I,9,45,18
Line(10,I,84,I
End
End
If N=6:Then
Line(47,9,47,45
For(I,4,8
2^13+L6(I->L6(I
End
End
If N>6:Then
ClrDraw
For(I,2,10,2
For(J,I,I+22,4
J->A:If A>24:A-24->A
2^A+L†(I->L6(I
Text(6I-4,4A-6,"X
End
End
End
For(I,2,10
2+2^25+L6(I->L6(I
End
6144+L6(5->L6(5
Line(0,0,0,55:Line(94,0,94,55:Horizontal 0:Horizontal 55
Text(0,2,"NIVEAU:",N:Text(0,36,"VIES:",W:Text(0,60,"SCORE:",S
Text(26,38,"θθ
Pause
Repeat .5>fPart((L6(Ans)/2^(X+1
2+int(23rand->X:2+int(9rand->Y
End
Text(6Ans-4,4X-6,"d"
Lbl A
Repeat I
P+2->P
If Ans>2:Then
U+V+L6(T->E
T+1->T:If Ans>41:12->T
iPart(E->A:1+10fPart(E->B
If .5≤fPart((L6(Ans)/2^(A+1:Then
W-1->W
If Ans:Goto D
Goto F
End
If A=X and B=Y:Then
M+G->G:M+S->S:Text(0,82,Ans
If M=8:Then
N+1->N:Goto D
End
M+1->M
Repeat .5>fPart((L6(Ans)/2^(X+1
2+int(23rand->X:2+int(9rand->Y
End
Text(6Ans-4,4X-6,"d
End
If G:Then:G-1->G
Else
iPart(L6(Q->C:1+10fPart(L6(Q->D
L6(D)-2^C->L6(D
Q+1->Q:If Ans>41:12->Q
Text(6D-4,4C-6,"
End
Text(6B-4,4A-6,"θ; ICI
E->L6(T
2^A+L6(B->L6(B
P-3->P
End
getKey->I
End
If Ans=24 or Ans=26:Then
If U+Ans≠25:Ans-25->U
0->V
End
If I=25:Then:0->U
If V≤0:-.1->V
End
If I=34:Then:0->U
If V≥0:.1->V
End
P+3->P
Goto A
Lbl F
Text(0,52,W
ClrList L6

Si ça peut vous aider c'est le jeu snake. Enfin voila Merci d'avance =) J'espère que vous saurez m'aider