[82] TUNNEL

Voir le sujet précédent Voir le sujet suivant Aller en bas

[82] TUNNEL

Message par Metallica le Mar 13 Juil - 14:41

jeu de tunnel à défilement horizontale:

TUNNEL (Français):
Code:
:7→T
:EffEcr
:6→A:8→I:10→Y
:EffListe Lɿ
:T→dim(Lɿ
:Rép→dim(Lƨ
:Remplir(0,Lƨ
:For(X,1,T
:6→Lɿ(X
:Disp "/////]    [/////
:End
:Output(1,8,"V
:For(X,0,E9                  <--- "E" du (2nde)+(,)
:CodeTouche→K
:If K=24:I-1→I
:If K=26:I+1→I
:A-1+partEnt(3NbrAleat→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,"]    [
:Output(1,I,"V
:If NbrAleat
:Then
:A+partEnt(4NbrAleat+1
:Output(T,Rép,"Θ
:0.01Rép+Lɿ(T→Lɿ(T
:End
:partEnt(Lɿ(1
:If I≤Rép or I≥5+Rép or I=100partDéc(Lɿ(1
:Goto 0
:Tricroi(Lƨ,Lɿ
:End
:Lbl 0
:Output(1,I,"X
:Output(8,8,"GAME OVER
:Pause :EffEcr
:EffVarLɿEffVarLƨEffVarAEffVarIEffVarKEffVarTEffVarXEffVarXEffVarY
:Output(1,1,"
TUNNEL (Anglais):
Code:
: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,E9                  <--- "E" du (2nde)+(,)
: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,"]    [
:Output(1,I,"V
:If rand
: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
:DelVarLɿDelVarLƨDelVarADelVarIDelVarKDelVarTDelVarXDelVarXDelVarY
:Output(1,1,"

Fonctionne sur: TI-82 / TI-82 Stats(.fr) / TI-83 / TI-83+(.fr) / TI-84+

Télécharger: 82p / 83p / 8xp

Metallica
Or 4
Or 4

Sexe : Masculin
Age : 20
Messages : 926
Date d'inscription : 30/06/2010
Etudes : DUT Info
Points Forum : 17
Points Concours : 9
Langages :
  • - TI-Basic Z80
  • - Axe Parser
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83+ SE

TI-83+ SE


Revenir en haut Aller en bas

Re: [82] TUNNEL

Message par AlexRider38 le Sam 24 Juil - 19:19

t'a un "screenshot"?

AlexRider38
Or 4
Or 4

Sexe : Masculin
Age : 19
Messages : 579
Date d'inscription : 11/07/2010
Etudes : Lycéen
Points Forum : -10
Points Concours : 0
Langages :
  • - TI-Basic Z80
  • - Axe Parser
  • - TI-Basic Nspire
  • - Lua Nspire
  • - Ndless Nspire
Calculatrices :
  • - TI-Collège
  • - TI-80
  • - TI-82
  • - TI-82 Stats.fr
  • - TI-84 Pocket.fr
  • - TI-Nspire CAS
  • - TI-Nspire CX

TI-84 Pocket.fr


Revenir en haut Aller en bas

Re: [82] TUNNEL

Message par Metallica le Mer 28 Juil - 17:38

non désolé [Vous devez être inscrit et connecté pour voir cette image]

_________________
[Vous devez être inscrit et connecté pour voir cette image]
[Vous devez être inscrit et connecté pour voir cette image]

Commencer Dropbox avec 500mo offert en étant parrainé !

Metallica
Or 4
Or 4

Sexe : Masculin
Age : 20
Messages : 926
Date d'inscription : 30/06/2010
Etudes : DUT Info
Points Forum : 17
Points Concours : 9
Langages :
  • - TI-Basic Z80
  • - Axe Parser
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83+ SE

TI-83+ SE


Revenir en haut Aller en bas

Re: [82] TUNNEL

Message par Contenu sponsorisé Aujourd'hui à 16:43


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum