[Ti83 PCE] snake ti-basic

[Nicolas_1er]

Et vu que c'est pas sur mon ordi je demande juste l'autorisation même si y'a aucune raison qu'ils dise non^^ du coup vous l'aurez sans doute dans la semaine

[Nicolas_1er]

Re tout le monde !
voici donc mon programme comme je l’avais dit,
Bon sauf que devinez quoi, j'ai résolu mon foutu bug tout seul, comme un grand
en gros j'avais un lbl dans une boucle if du coup il devait pas compter le if et du coup peu etre décaler tout les end d'un cran si j'ai bien compris
Bref voici donc mon code mais attention, n’espérez pas y trouver la moindre trace d'opti^^ pour l'instant c'est juste le code brouillon mais je travail déjà a opti tout ça. Et pour quand j’aurais fini je réfléchis aussi a faire faire une version couleur bien fluide (pxl par pxl sur la page de graph) parce que pour l'instant disons le nous, niveau fluidité y'a du taf
bref n’hésitez pas a me dire ce que vous en pensez et toutes les idées pour améliorer tout ça,( c'est pas ce qui manque^^)

(à noter que le programme efface L1, [H] et pas mal de variable)

[Nicolas_1er]

Bon bah on peux parler d'un gros bide^^
Vous en pensez quoi du coup ?

[guinatore]

Ce programme a l'air sympathique, le seul problème est qu'en début de programme le sous-programme CODE est demandé, cependant il n'existe pas...
[EDIT]: même en passant la ligne PrgmCODE on arrive dans le programme avec une liste SNR non définie

[Nicolas_1er]

Oups la grosse boulette ^^
En fait c'est juste la liste des records
Vois pouvez la créer rapidement au pire avec juste 0 dans les 9 1ers emplacement
Quand au sous programme c'est encore une 2eme boulette que tu peux effacer

[guinatore]

Pas mal!
Une remarque : high score et pas hight score
Et tu pourrais enlever le fait qu'on perde si l'on va dans la direction opposée à l'actuelle

[Nicolas_1er]

Ben pendant tout ce temps j’ai pu réorganiser tout ca^^
Du coup voici une version un poil opti et sur laquelle j'ai corrigé 2/3 trucs dont justement ce dont tu parle mais il y a encore un truc que je comprend pas, des fois quand je mange une pomme, il n'en repop pas une nouvelle, vous savez pourquoi ?

[guinatore]

Peut être qu'elle spawn sur le serpent nn?

[Nicolas_1er]

ben quand il mange une pomme je fait

Code: Select all

If [H](Y,X)=2
Then
1→[H](Y,X
1→C
L+1→L
Output(1,9,L
While [H](D,E)=1
nbrAléatEnt(3,10→D
nbrAléatEnt(1,26→E
End
2→[H](D,E
Output(D,E,"*
End

Quand [H](D,E)=1 ça veux dire qu'il y a déjà le serpent a cet emplacement



[EDIT] La partie en question est ligne 7 à 10

[guinatore]

Je vois pas trop; essaie de mettre

Code: Select all

nbrAléatEnt(3,10→D
nbrAléatEnt(1,26→E


Juste avant le while 1, pour reset tes variables, peut-être que leur valeurs précédentes faussent le résultat