Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Lun 13 Déc 2010, 23:28
Il doit y avoir un problème avec Output(Y,X," " qui efface les traces.
---------------------- 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)
J'ai un problème ça me marque erreur étiquette mais je sais pas de quoi ça vient
Rg-22 Invité
Posté le : Ven 17 Déc 2010, 21:14
Non en fait c'est bon j'ai trouvé mais maintenant j'ai une autre erreur a la ligne : Output(H,Liste1(H,"-
L'erreur se trouve apres le - ça me marque : << Erreur Dim Invalible >>
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 17 Déc 2010, 22:39
La valeur de H est fausse.
Et puis la parenthèse (H) devrait être fermée mais ce n'est pas la cause de ça.
---------------------- 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)
J'ai fermé la parenthèse (H) mais maintenant (le jeu se lance bien ça ne m'indique aucune erreur) le O ne veut pas monter il traverse les lignes et tombe donc je perds
nogeay Invité
Posté le : Sam 18 Déc 2010, 18:03
j'ai faite la même betise!
mais j'ai un autre problème : c'est quoi le theta ? où est-il sur la clculatrice ?
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Lun 14 Fév 2011, 11:20
J'ai terminer de recopier tout le prgm.
Il fonctionne parfaitement car j'ais fais 0 faute et du premier coups !
César est trop fort !
Aimant fignoler les démarrages, je te posterais si tu le souhaite mon image de fond que j'est intégrée au début du jeu.
PS: je me suis amuser à optimiser à mort le prgm pour une nouvelle version.
Il fait encore 800 octets mais il devrait fondre encore un peu.
Ne tant fais pas il est identique au tient !
J'ai utiliser un système de listes et de for pour arriver a cette prouesse.
Je le poste arriver au stade du poids critique, histoire de faire une version soft pour les pas très courageux du recopiage ou encore faire de la place dans les ressources de la calto afin d'y ajouter de nouveaux effets...
Briques qui tombent, se cassent, les pouvoirs aussi...
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Mer 16 Fév 2011, 11:31
Oui ! Persalteas, tu as raison !
Mais curieusement dans le cas ici, les :
entAléat(1,15)->H Output(2,G,"- ou encore Output(1,H," "
sont si omniprésent dans ce prgm que en les couplant tous dans une unique boucle,
le prgm ne gagne qu'en vitesse et fluidité !
De plus le prgm de Sypotu, même s'il est très bien fait n'est pas du tout optimiser et présente de très nombreuses erreurs comme :
0->A
A-(T=24)+(T=26)->A Le comble de l'inutile !
remplaçable par, tout simplement :
-(T=24)+(T=26->A De plus même la variable A n'as rien d'utile ici, puisque elle est destinée à aller dans X ! X+A->X
Ce qui nous donne au final : X-(T=24)+(T=26->X
Lbl A:....If Y=8 :Goto C:Goto A est remplaçable par une boucle Repeat Y=8
"et B=1" doit être mit au début de la condition pour économiser des octets.
Le Output(Y,X," " et le Output(Y,X,"O sont bien trop rapprocher, d'ou le scintillement.
Et plein plein d'autres erreurs et de lignes devenant inutile...
Pour preuve, je suis parvenu a le réduire à seulement 578 octets/ 1220 !
Et il fonctionne encore mieux, des "=" à la place des "-" (plus visible), plus rapide, pas de scintillement, l'écran 8*16 au lieu de 8*15 et bien plus réactif !
Seul est unique gros défaut à présent, le prgm réduit au stricte minimum vital, est désormais épurais de menus, et de plein de truc en trop...
Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Mer 16 Fév 2011, 12:22
Je ne vois pas en quoi 0->A est inutile ou que c'est une erreur!
Tu voudrait y remplacer par Effvar? Sa prend la même place en terme de mémoire.
Ensuite, regarde mieux le code, je suis sur que la variable A est utilisée à d'autres endroits.
Et pour finir, je te conseil de sortir ton bescherelle car confondre "ai" et "er" c'est assez grave quand on est au lycée!
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Jeu 17 Fév 2011, 8:49
Bon c'est mi-grave, je vais pas perdre mon temps à vous expliquer, c'est pas utile de toute façon...
Je vous posterais ma version ultra soft du prgm dès que j'aurais finit.
Elle devrait faire moin de 587 octéts, c'est toujour mieux que 1200.
Je vous l'aisserer libre de juger le pour et le contre entre les deux versions.
Je suis nouveau sur les programmes de calculette et j'ai recopier le code dans prgm. Mais je n'ai pas trouvé le Liste3(.... J'ai mis L3 mais ca ne marche pas.
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Ven 18 Fév 2011, 10:54
PAPY-JUMP V2
463 octéts
Code
:AxesNaff:rappelImage 9:Pause:AxesAff:EffEcr
:7->X:1->Y:1->J:0->K:0->S
:EntAléat(1,16->A:EntAléat(1,16->B:EntAléat(1,16->C:EntAléat(1,16->D
:EntAléat(1,16->E:EntAléat(1,16->F:EntAléat(1,16->G:7->H
:Repeat Y=8
:Output(1,A,"=:Output(2,B,"=:Output(3,C,"=:Output(4,D,"=:Output(5,E,"=:
:Output(6,F,"=:Output(7,G,"=:Output(8,H,"=
:if K=4 ou J=1 et (Y=7 et X=H ou Y=6 et X=G ou Y=5 et X=F ou Y=4 et X=E ou Y=3 et X=D ou Y=2 et X=C ou Y=1 et X=B:Then
:-J->J:0->K:End
:K-J->K
:codeTouche->T
:if T=105:Pause
:if Y=1 et 1-J:Then:G->H:F->G:E->F:D->E:C->D:B->C:A->B
:entAléat(1,16->A:S+1->S:EffEcr:output(8,15,S:Y+1->Y:End
:output(Y,X," ":X-(T=24)+(T=26->X:Y+J->Y
:if X=0:16->X:if X=17:1->X
:output(Y,X,"O
:End
:output(4,6,"PERDUT !
:if S>Z:Then:S->Z:output(6,2,"MEILLEUR SCORE":End
