Forum | TOUT sur la TI-82

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Aide à la programmation -> aide pour un jeu de voiture

aide pour un jeu de voiture

Auteur

Message

tsenayoshi

Autorisation : Membre
Nb de messages : 6
Inscrit le : Jeu 29 Oct 2009, 20:16

Posté le : Lun 02 Nov 2009, 23:50

:7üT
:ClrHome
:6üA:8üI:10üY
:ClrList L†
:Tüdim L†
:Ansüdim L…
:Fill(0,L…
:For(X,1,T
:6üL†(X
:Disp "/////] [/////
:End
:Output(1,8,"V
:For(X,0,ý^9
:getKeyüK
:If K=24:I-1üI
:If K=26:I+1üI
:A-1+int 3randüA
:If A=1:2üA
:If A=11:10üA
:AüL†(T
:Disp "
:Output(8,1,X
:Output(T,1,"////////////////
:Output(T,A,"] [ --je ne sais pas pourquoi il y a un proble sur cette ligne--
:Output(1,I,"V
:If rand<X/300
:Then
:A+int 4rand+1
:Output(T,Ans,"Á
:0.01Ans+L†(TüL†(T
:End
:int L†(1
:If I÷Ans or Iù5+Ans or I=100fPart L†(1
:Goto 0
:SortA(L…,L†
:End:Lbl 0
:Output(1,I,"X
:Output(8,8,"GAME OVER
:Pause :ClrHome
:ClrList L…,L†
:Output(1,1,"

tsenayoshi

Autorisation : Membre
Nb de messages : 6
Inscrit le : Jeu 29 Oct 2009, 20:16

Posté le : Mar 03 Nov 2009, 16:17

Bonjour quelqun a une solution s'il vous plait?

sypotu

Autorisation : Membre
Nb de messages : 651
Inscrit le : Dim 13 Sep 2009, 8:27

Posté le : Mar 03 Nov 2009, 22:31

c'est une erreur domaine ?
quelle est la valeur de A ?(après l'erreur tape A puis enter sur l'écran principal)
et de T ?

----------------------
Ti-83+.fr
Passe en 1ère S

Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p

Floyd The Wolf
Avatar

Autorisation : Membre
Nb de messages : 14
Inscrit le : Mer 04 Nov 2009, 18:35

Posté le : Mer 04 Nov 2009, 19:53

Tiens, c'est marrant, j'ai le même programme

Il marche pourtant très bien. Et j'ai la même chose à cette ligne.
Revoici mon code au cas où (ça fait mal aux yeux de chercher l'erreur, désolé

) :

Code

:7->T
:ClrHome
:6->A:8->I:10->Y
:ClrList L6
:T->dim(L6
:Ans->dim(L5
:Fill(0,L5
:For(X,1,T
:6->L6(X
:Disp "/////] [/////
:End
:Output(1,8,"V
:For(X,0,10^(9
:getKey->K
:If K=24:I-1->I
:If K=26:I+1->I
:A-1+int(3rand->A
:If A=1:2->A
:If A=11:10->A
:A->L6(T
:Disp "
:Output(8,1,X
:Output(T,1,"/////////////////
:Output(T,A,"] [
:Output(1,I,"V
:If rand<X/300
:Then
:A+int(4rand+1
:Output(T,Ans,"=
:0.01Ans+L6(T->L6(T
:End
:int(L6(1
:If I[inférieur ou égal]Ans or I[supérieur ou égal]5+Ans or I=100fPart(L6(1
:Goto 0
:SortA(L5,L6
:End:Lbl 0
:Output(1,I,"X
:Output(8,8,"GAME OVER
:Pause :Clrhome
:ClrList L5,L6
:Output(1,1,"

tsenayoshi

Autorisation : Membre
Nb de messages : 6
Inscrit le : Jeu 29 Oct 2009, 20:16

Posté le : Ven 06 Nov 2009, 23:59

Ok merci a vous je vais regarder.

tsenayoshi

Autorisation : Membre
Nb de messages : 6
Inscrit le : Jeu 29 Oct 2009, 20:16

Posté le : Sam 07 Nov 2009, 0:04

Ah! c'est bon j'ai trouvé les erreur au lieu de A+1 j'avais ecrit A+I et au lieu de 0.01 j'ai écrit 0,01
Merci de votre aide

lminard
Invité

Posté le : Mer 10 Oct 2012, 15:34

j'ai testé ce programme, il est pas si mal excepté d'un coté je peut "rouler" sur [ alors que de pour ] je ne peut pas. j'aurai aimer ne pouvoir "rouler" sur ni l'un ni l'autre ! quelqu'un pourrait me conseiller ?

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Aide à la programmation -> aide pour un jeu de voiture

Page générée en 6 requêtes

Flux RSS