Gamme TI-82
Partager sur Facebook Fil RSS Imprimer la page
Cacher les résultats

Résultat de la recherche



Poster un nouveau sujet Poster une réponse Page: 1,      >>
Problème avec Snake
Auteur Message
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Ven 16 Nov 2007, 19:19   Citer 

Bonjour,
j'ai télécharger le snake sur le site :
http://www.ticalc.org/archives/files/fileinfo/124/12436.html

Je l'ai tout tapé à la main et relus 3 fois maxiangry.gif maxiangry.gif
ET... SYNTAX ERROR
Un truc vraiment bizarre ...
Voilà le programme

Code
ClrHome
Output(1,3,"XSNAKE  V4.7
Output(3,8,"BY
Output(5,7,"XprO
Output(8,2,"HIGH SCORE:
Output(8,14,ZÖMin
Normal
PlotsOff
AxesOff
FnOff
GridOff
For(A,1,999
End
0üXmin
94üXmax
0üYmin
62üYmax
0üN
0üP
0üO
39üdim(áY
1üM
ClrDraw
Lbl 0
Repeat 0
Fill(99,áY
áYüáX
49üB
47üA
34üD
1üE
10üL
0üH
0üI
Horizontal 0
Horizontal 1
Horizontal 2
Horizontal 60
Horizontal 61
Horizontal 62
Vertical 0
Vertical 1
Vertical 2
Vertical 3
Vertical 91
Vertical 92
Vertical 93
Vertical 94
getKey
While M
While H
While not(I)D=24
DüC
Repeat Ans+I
A-3üA
pxl-Test(61-B,AüI
Pt-On(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
Pt-Off(áY(E),áX(E),2
getKey
End
AnsüD
End
While not(I)(D=25
DüC
Repeat Ans+I
B+3üB
pxl-Test(61-B,AüI
Pt-On(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
Pt-Off(áY(E),áX(E),2
getKey
End
AnsüD
End
While not(I)(D=26
DüC
Repeat Ans+I
A+3üA
pxl-Test(61-B,AüI
Pt-On(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
Pt-Off(áY(E),áX(E),2
getKey
End
AnsüD
End
While not(I)(D=34
DüC
Repeat Ans+I
B-3üB
pxl-Test(61-B,AüI
Pt-On(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
Pt-Off(áY(E),áX(E),2
getKey
End
AnsüD
End
If D=21
Pause
If D=45
Then
Lbl 2
ClrHome
Output(2,7,"GAME
Output(3,7,"OVER
Lbl 3
ClrDraw
10N+(L-10)/3+OüO
If O>ZÖMin
Then
OüZÖMin                                        Et là ça bug
Output(5,5,"NEW HIGH
End
Output(6,5,"SCORE:
Output(6,11,O
DelVar áX
DelVar áY
Return
End
If I
Then
If A=J and B=K
Then
Pt-Off(J,K
L+3üL
0üI
0üH
Else
For(A,3,31
Horizontal A
Horizontal 62-A
End
P+1üP
If P=3
Goto 2
(L-10)/3+OüO
0üM
N-1üN
Goto 0
End
End
If D<24 or D>26 and Dø34
CüD
End
While not(H
1+3randInt(1,19üK
2+3randInt(1,29üJ
not(pxl-Test(62-K,J+1üH
End
Pt-On(J,K,3
If L=40
0üM
0üI
End
ClrDraw
N+1üN
If N=7
Then
ClrHome
Output(1,1,"CONGRATULATIONS!
Output(3,3,"YOU'VE WON!!
Goto 3
End
If N
{32,9,32,53,62,9,62,53üáX
If N>1
augment(áX,{34,52,60,52,34,10,42,10,52,10,60,10üáX
If N>2
augment(áX,{2,31,12,31,22,31,42,31,52,31,72,31,82,31,90,31üáX
If N>3
augment(áX,{2,52,12,52,22,52,72,52,82,52,90,52,2,10,12,10,22,10,42,10,52,10,72,10,82,10,92,10üáX
If N>4
augment(áX,{11,41,11,21,23,41,23,21,71,41,71,21,83,41,83,21üáX
If N>5
augment(áX,{41,41,41,21,53,41,53,21üáX
If 99-áX(1
Then
For(X,1,dim(áX),4
áX(XüA
áX(X+1üB
áX(X+2üC
áX(X+3üD
If A=C
Then
Line(A-1,B,A-1,D
Line(A+1,B,A+1,D
Else
Line(A,B-1,C,B-1
Line(A,B+1,C,B+1
End
Line(A,B,C,D
End
End
1üM
End



Assez incompréhensible puisque le symbole a été utilisé au moins trois fois...
Quelqu'un a une idée??

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Ven 16 Nov 2007, 19:54   Citer 

En fait je ne sais pas si le "ÖMin" sert à qqch...

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Sam 17 Nov 2007, 2:06   Citer 

Salut,

Quand tu mets GOTO il te renvoi ou ?

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Sam 17 Nov 2007, 11:31   Citer 

lequel GOTO??

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
W[a]nTeD
Avatar

Autorisation : Membre
Nb de messages : 51
Inscrit le : Mar 13 Nov 2007, 18:54
Posté le : Sam 17 Nov 2007, 11:37   Citer 

Et bien quand le jeu bug, il y a ecrit err:????? et aprés tu fais quitter ou goto ("voir" si la calculette est en francais!)! Et là tu te retrouve dans le programme, dis nous à quelle ligne tu te retrouve godgrace.gif

----------------------
Pour les amateurs de Counter Strike Source et 1.6 http://hight-lxf.forumsactifs.com/
Je recrute beaucoup!!!
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Sam 17 Nov 2007, 11:41   Citer 

à la ligne où j'ai mis "Et là ça bug"

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 887
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Sam 17 Nov 2007, 17:03   Citer 


Code
ZÖMin



Ca correspond à quoi en Ti-Basic ?

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
vibra
Avatar

Autorisation : Membre
Nb de messages : 595
Inscrit le : Mer 04 Avr 2007, 13:29
Posté le : Sam 17 Nov 2007, 18:14   Citer 

À rien je crois.

----------------------
Vive la programmation et vive le vibraphone !!!
 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Sam 17 Nov 2007, 23:17   Citer 

A une variable, du style Xmax

sinon http://tout82.free.fr/forum/sujet.php?sujet=799

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Dim 18 Nov 2007, 12:58   Citer 


Citer : coc5

Code
ZÖMin



Ca correspond à quoi en Ti-Basic ?



ça correspond à un truc genre Zn(en italique)min

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 887
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Dim 18 Nov 2007, 13:40   Citer 

Dans ce cas c'est bizarre parce-que ce serait plutôt une erreur domaine qui devrait s'afficher...

Essaie de voir si tu n'as pas mis des esapaces entre les commandes ou après le Znmin.
Nomrmalement, ZnMin doit correspondre à un groupe de mot !

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Dim 18 Nov 2007, 13:50   Citer 

en fait, j'ai viré le nmin donc il reste plus que Z et ça ne me le fait plus
par contre il y a des truc bizarres comme un meilleur score de 156 (je n'ai jamais fait plus de 10 moodforlove.gif ) ... je pense que c'est lié.

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Dim 18 Nov 2007, 15:10   Citer 

tu fais 0->Z dans l'écran principal.

+

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Mar 20 Nov 2007, 13:03   Citer 

ok

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Mer 21 Nov 2007, 17:56   Citer 

ça y est j'ai trouvé !!!!

Pour avoir Znmin il faut aller dans VARS puis 2 (Zoom...) puis 2 fois à droite (ZU) et 4 fois en bas

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Mer 21 Nov 2007, 19:13   Citer 

Euh..... Je veux pas jouer les boulets mais j'ai encore un problème...

Quand je passe au niveau 3, la calculette me met ERR:DIM MISMATCH ici :


Code
augment(áX,{34,52,60,52,34,10,42,10,52,10,60,10üáX



je l'ai relu encore et encore....crazy.gif

Ca vient de moi ou du prog????

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Jeu 22 Nov 2007, 17:24   Citer 

pour le á tu as bien mis le petit L ? (disponible dans le catalogue)

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Jeu 22 Nov 2007, 17:43   Citer 

oui...

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Jeu 22 Nov 2007, 17:46   Citer 

...et pour ü la flèche sto ?

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Jeu 22 Nov 2007, 17:55   Citer 

oui...

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse Page: 1,      >>





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2016 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink
 

Site hébergé par Free Page sous licence creative commons Page validée par le W3C (XHTML 1.0 Transitional) Feuille de style validée par le W3C Flux RSS 2.0 valide Page étiquetée par l'ICRA Page testée par Ocawa