Snake |
Auteur |
Message |
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Sam 08 Déc 2007, 20:24
|
|
|
Salut,
vérifiez ceci ;] :
...
:Goto 3
:Lbl 2
:6+50fPart((A+C)/50=>A
:8+80fPart((B+D)/80=>B
:If pxl-Test(A+2,B:Goto 4
:Text(A,B,"º
:Lbl 3
:round(1+NfPart(E/N),0=>E
:Text(Liste4(E),Liste5(E),"
:A=>Liste4(E:B=>Liste5(E
:getKey=>K
:If K=0:Goto 2
:If D=72:Then
...
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Dim 09 Déc 2007, 14:24
|
|
|
A vrai dire, j'ai bien le Label 3, c'est à n'y rien comprendre
Peut-être je me suis trompé ailleurs, je vais revérifier, même si ça semble louche que ça soit une erreur de Label pour une faute de frappe; enfin vérifions quand même.
D'autres solutions ? (En tout cas vous êtes bien rapide ^^)
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 09 Déc 2007, 14:35
|
|
|
Citer | :6+50fPart((A+C)/50=>A
:8+80fPart((B+D)/80=>B
:If pxl-Test(A+2,B:Goto 4
:Text(A,B,"º
:
:Lbl 3 |
mouais alors essayez de rajouter un espace pour voir...
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Dim 09 Déc 2007, 15:06
|
|
|
Apparemment ça marche, mais je n'ai fait qu'une partie et je n'ai que game over qui s'affiche a chaque fois que je lance le programme
Edit: Autant pour moi, j'ai rémédier a ce problème ^^
Un nouveau problème se pose:
Je n'ai que la touche du haut et celle du bas qui répondent aux mouvements...
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 09 Déc 2007, 15:29
|
|
|
Code | :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 or K=34:72=>D |
vérifie ici pour voir s'il n'y pas d'erreurs ;°
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Dim 09 Déc 2007, 15:31
|
|
|
J'ai recopié et revérifié deux fois, les mouvements marchent maintenant mais c'est les "cadavres" des serpents des parties antérieures et leur nourriture, ainsi que le Game Over qui me font, à nouveau (dès que rentre dedans bien sûr), un Game Over...
Merci quand même de ton aide ^^ Et le jeu, même s'il est en version 0.5, me suffit amplement et est finement conçu et agréable a jouer ^^
Et si tu arrives à me dépatouiller, alors là t'es vraiment un chef
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 09 Déc 2007, 15:46
|
|
|
arf la je sais pourquoi ca ne disparait pas :
il y a un endroit, precisemment ici :
:Lbl 3
:round(1+NfPart (E/N),0=>E
:Text(Liste4(E),Liste5(E),"
:A=>Liste4(E:B=>Liste5(E
:getKey=>K
:If K=0:Goto 2
:If D=72:Then
:If K=24:67=>D
:If K=26:77=>D
...ou il faut rajouter 4 espaces (après le ".)
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Dim 09 Déc 2007, 15:51
|
|
|
Désolé de te dire ça mais comme j'ai tout lu précédemment, je l'avais déjà fait !
Je suppose que c'est par rapport aux listes qu'il y a un problème, parce que j'ai d'autres programmes qui utilise les mêmes listes, ça ne pourrait pas jouer?
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 09 Déc 2007, 15:57
|
|
|
vérifie ces lignes pour voir :/ ...
Code | :round(1+NfPart (E/N),0=>E
:Text(Liste4(E),Liste5(E),"
:A=>Liste4(E:B=>Liste5(E |
Citer | Je suppose que c'est par rapport aux listes qu'il y a un problème, parce que j'ai d'autres programmes qui utilise les mêmes listes, ça ne pourrait pas jouer? |
a priori non puisque le prog efface la liste au début...
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Dim 09 Déc 2007, 15:59
|
|
|
J'ai exactement ça...
Pour info : qu'est ce que ça change les espaces? (j'essaye d'en mettre plus ou moins, pour voir)
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 09 Déc 2007, 16:03
|
|
|
les espaces permettent d'effacer le serpent puiqu'ils "écrivent" du blanc sur le bout de la queue.
(faut que j'aille bosser un peu dsl )
+
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Lun 10 Déc 2007, 17:59
|
|
|
Ok, ok je comprends, les études d'abord ^^
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Lun 10 Déc 2007, 18:19
|
|
|
tu as bien mis 1=>E au début ?
:ClrDraw
:0=>Xmin
:94=>Xmax
-)62=>Ymin
:0=>Ymax
:AxesOff
:FnOff
:6=>A:8=>B:44=>C:77=>D:1=>E:2=>N:0=>O
...
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Lun 10 Déc 2007, 19:03
|
|
|
Effectivement, j'ai E->1...
J'ai recopié le 1.0, toujours les mêmes problèmes...
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Lun 10 Déc 2007, 19:11
|
|
|
=> essaye de remplacer les 4 espaces par des symboles (des chiffres par exemples) pour voir ou est ce qu'il te les affiche
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Lun 10 Déc 2007, 19:35
|
|
|
Alors,
J'ai remplacé par "1234 et ça me donne :
- quand le serpent est vers le bas :
1234
o
o
o
- et à droite:
1234 (on ne voit pas les trois o)
idem mais inversé pour en haut et a gauche
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Lun 10 Déc 2007, 19:47
|
|
|
Tu obtiens un truc exactement comme ca ?
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Lun 10 Déc 2007, 19:50
|
|
|
Exactement comme ça
|
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
Ratuss
Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Lun 10 Déc 2007, 19:52
|
|
|
bah alors ca devrait marcher si tu mets les 4 espaces :p
Code | Texte(L„(E),L…(E),"1234" |
Code | Texte(L„(E),L…(E)," " |
(tu peux virer le dernier guillemet si tu veux)
---------------------- --- LISTE DES JEUX POUR TI --- |
|
|
|
djyoda35
Autorisation : Membre
Nb de messages : 12
Inscrit le : Sam 08 Déc 2007, 20:03
|
Posté le : Lun 10 Déc 2007, 19:56
|
|
|
Je l'ai déjà remis, ça ne fait rien
|
|
|
|