Bonsoir, jai mis Snake sur ma calculatrice (voici le code )
Code
ClrDraw
:AxesOff
:GridOff
:Normal
:Func
:FullScreen
:Float
:ZStandard
:PlotsOff
:FnOff
:Lbl F
:Menu("SÖaKûS","PLAY GAME!",C,"RULES",D,"CREDITS",E
:Lbl D
:ClrDraw
:Text(1,32,"SÖaKûS
:Text(7,1,"THE RULES ARE SIMPLE. GUIDE
:Text(13,1,"YOUR SÖaKû AROUND BY USING
:Text(19,1,"THE ARROW KEYS. TO GAIN
:Text(25,1,"POINTS, GUIDE YOUR SNAKE
:Text(31,1,"THROUGH THE DOTS. (PUSH
:Text(37,1,"ENTER TO SEE AN EXAMPLE.)
:Pause
:Pxl-On(50,30
:Pxl-On(50,32
:Pxl-On(48,30
:Pxl-On(48,32
:For(A,50,40,ú1
:Pxl-On(55,A
:For(B,1,40):End
:End
:For(A,55,49,ú1
:Pxl-On(A,40
:For(B,1,40):End
:End
:For(A,40,31,ú1
:Pxl-On(49,A
:For(B,1,40):End
:End
:Pxl-Off(50,30
:Pxl-Off(50,32
:Pxl-Off(48,30
:Pxl-Off(48,32
:Pxl-On(55,70
:Pxl-On(55,72
:Pxl-On(57,70
:Pxl-On(57,72
:Text(56,1,"(PUSH ENTER)
:Pause
:ClrDraw
:Text(1,32,"SÖaKûS
:Text(7,1,"THE EXAMPLE ON THE BOTTOM
:Text(13,1,"SHOWED HOW TO GET A POINT.
:Text(19,1,"BUT, IF YOU HIT YOURSELF,
:Text(25,1,"GO OUTSIDE, OR HIT ONE OF THE
:Text(31,1,"FOUR DOTS, YOU LOSE. TRY
:Text(37,1,"TO GET AS MANY POINTS
:Text(43,1,"AS YOU CAN BEFORE DIENG
:Text(49,1,"TO GET A HIGH-SCORE.
:Text(55,1,"GOOD LUCK!
:Pause
:Goto F
:Lbl E
:ClrDraw
:AxesOff
:GridOff
:Normal
:Float
:Func
:FullScreen
:PlotsOff
:FnOff
:For(A,94,24,ú1
:Text(29,A,"PHIL SOFTWARE
:End
:For(A,1,94
:For(B,29,35
:Pxl-Change(B,A
:End
:End
:For(A,2,94,2
:For(B,29,35
:Pxl-Off(B,A
:End
:End
:For(A,93,1,ú2
:For(B,35,29,ú1
:Pxl-Off(B,A
:End
:End
:Goto F
:Lbl C
:ClrDraw
:31üA
:47üB
:3üC
:ú1üS
:iPart rand60+2üD
:iPart rand92+2üE
:Lbl B
:DüF
:EüG
:iPart rand60+2üD
:iPart rand92+2üE
:Pxl-On(D-1,E-1
:Pxl-On(D-1,E+1
:Pxl-On(D+1,E-1
:Pxl-On(D+1,E+1
:Pxl-Off(F-1,G-1
:Pxl-Off(F-1,G+1
:Pxl-Off(F+1,G-1
:Pxl-Off(F+1,G+1
:S+1üS
:Lbl A
:getKeyüK
:If K=24
:1üC
:If K=25
:2üC
:If K=26
:3üC
:If K=34
:4üC
:Pxl-On(A,B
:If C=1 and Bø1
:B-1üB
:If C=2 and Aø1
:A-1üA
:If C=3 and Bø94
:B+1üB
:If C=4 and Aø62
:A+1üA
:If A=D and B=E
:Goto B
:If pxl-Test(A,B)=0
:Goto A
:ClrHome
:Disp "SCORE:",S
Mais sur la claculatrice elle me dit que ya un probleme au niveau de
apres bah jai mis des "-" a la place des "+", la calculatrice me dit que ya plus derreur mais quand je lance le jeu ca me met directement la fin ( quand la partie est fini)
Aidez-moi svp
Janjoula Invité
Posté le : Ven 09 Oct 2009, 0:04
jai beau le relire des centaines de fois, je vois pas ou est l'erreur