Poster un nouveau sujet Poster une réponse
FLY THE COPTER ( Jeux )
Auteur Message
SquirrelLittle
Invité
Posté le : Lun 12 Sep 2016, 19:33   Citer 

Bonjour, j'ai recopié ce jeu code sur ma calculatrice :


Code

:FnOff
:ClrHome
:ClrDraw
:GridOff
:AxesOff
:PlotsOff
:0→Xmin:1→∆X
:0→Ymin:1→∆Y
:20→G
:For(X,0,47
:Vertical X
:Line(X,Ans,X,Ans+G,0
:Ans+randInt(-(Ans>2),Ans<53-G
:End
:Ans&#8594;X:-1&#8594;A
:31&#8594;B:.2&#8594;F
:For(&#952;,0,E9      // scientific E, not the variable E
:Text(0,0,&#952;
:If not(fPart(A/3
:Pt-Off(C,D
:Pt-On(A,B
:A&#8594;C:B&#8594;D
:getKey&#8594;E
:F-.1+.3(Ans=21&#8594;F
:B+Ans&#8594;B
:(A+1)(A&#8800;Xmax&#8594;A
:G-.5not(Ans&#8594;G
:A+47-95(A>47
:Pt-On(Ans,X+randG,1+not(fPart(&#952;/32
:Vertical Ans
:Line(Ans,X,Ans,X+G,0
:X+randInt(-(X>2),X<53-G&#8594;X
:G-not(A&#8594;G
:If E=105:Pause
:If not(E=45 or pxl-Test(Ymax-round(B,0),A
:End
:For(C,1,9
:Pt-Change(A,B
:rand(20
:End
:ClrHome
:ClrDraw
:Disp "Distance:
:Output(1,10,&#952;



source (http://tibasicdev.wikidot.com/fly-the-copter#toc0)

Mais lorsque je démarre le jeu, tout fonctionne correctement mais impossible de faire monter l'hélicoptère ! Pourtant le créateur du jeu à indiqué qu'il faut appuyer sur 2nde mais ça ne fonctionne pas :/

  Haut de page Bas de page 
 
SquirrelLittle
Invité
Posté le : Lun 12 Sep 2016, 19:36   Citer 

Le code s'affiche mal sur le forum mais j'ai mis la source juste en dessous

  Haut de page Bas de page 
 
SquirrelLittle
Invité
Posté le : Lun 12 Sep 2016, 19:37   Citer 

Et aussi mon hélicoptère ne meurt pas lorsqu'il touche un bord ^^'

  Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink