Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Jeu 21 Oct 2010, 19:45
Pour [ tu fait [2nd]+[X] et pour ] c'est [2nd]+[+].
Si tu as une lettre allant de A à J entre ces crochets, c'est une matrice et elles se trouvent dans le menu associé.
Pour savoir où sont les fonctions, cherche dans le sujet approprié (fonctions ti-83).
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 22 Oct 2010, 0:00
Non, débutant.
Pic1 se trouve dans le menu var
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 13
Inscrit le : Dim 17 Oct 2010, 18:18
Posté le : Dim 24 Oct 2010, 13:52
Bonjour j'ai terminer un programme mais il ya une erreur Invalid dim j'ai mis goto et puis il me montre qu'il il ya une erreur dans la ligne suivantes (ou il y a les ***)
Code
:ClrHome
:Disp "PACMAN V1.0","BY JIM BUSH/GI","c1996
:Pause
:ClrDraw
:AxesOff
:ú60üYmin
:2üYmax
:97üXmax
:3üXmin
:[[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1][1,0,0,0,1,0,0,0,0,0,1,0,0,0,1][1,0,1,0,1,0,1,0,1,0,1,0,1,0,1][1,0,1,0,0,0,0,0,0,0,0,0,1,0,1][1,0,0,0,1,0,1,1,1,0,1,0,0,0,1][1,0,1,0,0,0,0,0,0,0,0,0,1,0,1][1,0,1,0,1,1,0,1,0,1,1,0,1,0,1]******[1,0,0,0,0,0,0,0,0,0,0,0,0,0,1][1,1,1,1,1,1,1,1,1,1,1,1,1,1,1]]ü[A]
:For(B,1,9
:For(A,1,15
:If [A](B,A
:Then
:Line(6A,ú6B,6A+5,ú6B
:Line(6A,ú6B,6A,ú6B-5
:Line(6A+5,ú6B,6A+5,ú6B-5
:Line(6A+5,ú6B-5,6A,ú6B-5
:Else
:Line(6A+2,ú6B-2,6A+3,ú6B-2
:Line(6A+2,ú6B-3,6A+3,ú6B-3
:End
:If (B=2 or B=8) and (A=3 or A=13)
:Then
:Line(6A+1,ú6B-1,6A+4,ú6B-1
:Line(6A+4,ú6B-1,6A+4,ú6B-4
:Line(6A+4,ú6B-4,6A+1,ú6B-4
:Line(6A+1,ú6B-4,6A+1,ú6B-1
:End
:End
:End
:[[1]]ü[A]
:StorePic Pic1
:94üXmax
:0üXmin
:ú62üYmin
:0üYmax
:RecallPic Pic1
:0üD
:0üE
:3üO
:Lbl A
:ClrHome
:Output(4,6,"READY!
:Pause
:45üA
:ú38üB
:45üF:6üH
:ú14üG:0üI
:FüJ:ú6üL
:GüK:0üM
:0üN
:Lbl 2
:If E=66:Goto B
:Line(A+1,B,A+4,B
:Line(A,B-1,A,B-4
:Line(A+1,B-5,A+4,B-5
:Line(A+5,B-1,A+5,B-4
:Text(0,0,"LIVES:",O," SCORE:",D
:Lbl 0
:If A=F and B=G or A=J and B=K
:Goto 8
:Line(F,G-5,F,G-1,0
:Line(F+1,G,F+4,G,0
:Line(F+5,G-1,F+5,G-5,0
:F+HüF
:G+IüG
:If A=F and B=G
:Goto 8
:Line(F,G-1,F,G-5
:Line(F+1,G,F+4,G
:Line(F+5,G-1,F+5,G-5
:If pxl-Test(úG-I,F+H) or rand5<1
:Goto 4
:Lbl 5
:Line(J,K-5,J,K-1,0
:Line(J+1,K,J+4,K,0
:Line(J+5,K-1,J+5,K-5,0
:J+LüJ
:K+MüK
:If A=J and B=K
:Goto 8
:Line(J,K-1,J,K-5
:Line(J+1,K,J+4,K
:Line(J+5,K-1,J+5,K-5
:If pxl-Test(úK-M,J+L) or rand5<1
:Goto 6
:Lbl 7
:N-1üN
:Text(0,70,"TIME:",N(N>0)
:getKeyüC
:If Cù24 and C÷26 or C=34
:Goto 1
:If C=105
:Pause
:Goto 0
:Lbl 1
:Text(úB,A," "
:If C=24 and not pxl-Test(úB,A-6
:A-6üA
:If C=25 and not pxl-Test(úB-6,A
:B+6üB
:If C=26 and not pxl-Test(úB,A+6
:A+6üA
:If C=34 and not pxl-Test(úB+6,A
:B-6üB
:If pxl-Test(úB+2,A+2
:Goto 3
:Goto 2
:Lbl 3
:D+1üD
:E+1üE
:If (A=15 or A=75) and (B=ú14 or B=ú50)
:Then
:D+24üD
:6üN
:End
:Goto 2
:Lbl 4
:0üÁ
:If H
:1üÁ
:0üH
:0üI
:If A<F and not pxl-Test(úG,F-6
:ú6üH
:If AùF and not pxl-Test(úG,F+6
:6üH
:If B÷G and not pxl-Test(úG+6,F
:ú6üI
:If B>G and not pxl-Test(úG-6,F
:6üI
:If H and I
:Then
:If Á=1
:0üH
:If not Á
:0üI
:End
:Goto 5
:Lbl 6
:0üÁ
:If L
:1üÁ
:0üL
:0üM
:If A<J and not pxl-Test(úK,J-6
:ú6üL
:If AùJ and not pxl-Test(úK,J+6
:6üL
:If B>K and not pxl-Test(úK-6,J
:6üM
:If B÷K and not pxl-Test(úK+6,J
:ú6üM
:If L and M
:Then
:If Á=1
:0üL
:If not Á
:0üM
:End
:Goto 7
:Lbl 8
:If N>0
:Goto 9
:Text(úB,A," "
:Line(A,B-1,A,B-5,0
:Line(A+1,B,A+4,B,0
:Line(A+5,B-1,A+5,B-1,0
:Line(J,K-1,J,K-5,0
:Line(J+1,K,J+4,K,0
:Line(J+5,K-1,J+5,K-5,0
:Line(F,G-1,F,G-5,0
:Line(F+1,G,F+4,G,0
:Line(F+5,G-1,F+5,G-5,0
:ClrHome
:Disp "LOSER!!!
:Pause
:0üI:0üM
:6üH:ú6üL
:O-1üO
:If O
:Goto A
:ClrHome
:Disp "HA HA HA!",D
:Stop
:Lbl 9
:ClrHome
:Disp "GOT HIM!!
:Pause
:If A=F and B=G
:Then
:Line(F,G-1,F,G-5,0
:Line(F+1,G,F+4,G,0
:Line(F+5,G-1,F+5,G-5,0
:45üF
:ú14üG
:D+100üD
:End
:If A=J and B=K
:Then
:Line(J,K-1,J,K-5,0
:Line(J+1,K,J+4,K,0
:Line(J+5,K-1,J+5,K-5,0
:45üJ
:ú14üK
:D+100üD
:End
:Goto 2
:Lbl B
:ClrHome
:Disp "ALL CLEAR!!
:Pause
:ClrDraw
:RecallPic Pic1
:500+DüD
:0üE
:Goto A
merci de m'expliqué car je comprend pas pourquoi il m'affiche cette erreur !
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 28 Oct 2010, 21:14
Il te manque certainement une valeur (ou il y en a de trop) dans la ligne de matrice juste avant les étoiles.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)