Poster un nouveau sujet Poster une réponse
Programme Zrace
Auteur Message
Pesudozzz
Invité
Posté le : Sam 16 Jan 2010, 23:25   Citer 

Bonjour.
Je me permets d'écrire sur ce forum pour vous demander une petite faveur d'explication
Il y très peu de communautés de programmes de TI , et donc vous devez surement connaître TiOnline
C'est sur ce site que j'ai trouvé des programmes peu lourds (pour certains) et donc facilement recopiable a la main.
Je suis assez intéressé par la programmation , et la Ti que j'ai est parfaite pour débuter
Je cherchais un jeu de course , pas très lourd , et c'est là que je trouve Zrace , Ici

Le code , je l'ai eu grâce a Ti-graph link , et le voici :

Code
:
:Lbl Z
:ClrHome
:Disp " ENTER TO START"
:
:9
:Disp "RACE"
:
:
:Disp "!      !"
:Disp "!      !"
:Disp "+------+"
:For(Á,1,70)
:End
:Output(2,1,"!READY !"
:For(Á,1,70)
:End
:Output(3,1,"! SET  !"
:For(Á,1,70)
:End
:Output(4,1,"! GO!  !"
:For(Á,1,70)
:5üC
:5üB
:5üA
:0üL
:0üN
:5üR
:9üV
:7üK
:7üO
:While 1
:R+int (rand*3)-1üR
:If R=2
:Then
:3üR
:Else
:If R=9
:Then
:8üR
:End
:End
:Disp "
:Output(8,R,"8")
:Output(8,R+O,"8")
:getKeyüY
:If Y=24
:Then
:V-1üV
:Else
:If Y=26
:Then
:V+1üV
:End
:If Y=34
:Then
:
:End
:If Y=21
:Then
:End
:End
:Output(5,V,".")
:VüK
:If (V÷C) or (Vù(C+O))
:Then
:Goto C
:End
:CüD
:BüC
:AüB
:RüA
:N+1üN
:If Nù20
:Then
:O-1üO
:0üN
:L+1üL
:End
:End
:Lbl C
:0üX
:While X÷2
:Output(5-X,V-X,"*")
:Output(5+X,V+X,"*")
:Output(5+X,V-X,"*")
:Output(5-X,V+X,"*")
:Output(5+X,V,"*")
:Output(5-X,V,"*")
:Output(5,V+X,"*")
:Output(5,V-X,"*")
:X+1üX
:End
:0üX
:While X÷2
:Output(5-X,V-X," ")
:Output(5+X,V-X," ")
:Output(5-X,V+X," ")
:Output(5+X,V," ")
:Output(5-X,V," ")
:Output(5,V+X," ")
:Output(5,V-X," ")
:X+1üX
:End
:ClrHome
:Disp "   SCORE: "
:(L*130)+NüS
:Disp S
:Disp "  PLAY AGAIN?"
:Input A
:If A=YES
:Then
:Goto Z
:Else
:If A=NO
:Then
:Goto Y
:End
:(L*130)+NüS
:If SùE
:SüE
:
:
:Pause
:ClrHome
:Disp "  PLAY AGAIN?"
:Repeat A
:Pause
:
:End
:Goto Z
:Else
:If A=NO
:..prgmZRACE
:Goto Y
:End
:
:Lbl Y
:Return
:End
:Stop



J'ai deux questions :

Premierement , je ne vois pas l'utilité des dernières lignes (remarquer play again ect...)

Deuxiement , je ne peux même pas voir la fin , car j'ai une err: domain , a la ligne :

Citer

Code
:Output(8,R,"8")
:Output(8,R+O,"8")




J'ai cherché sur le forum , j'ai trouvé que c'était a cause du fait que cela sortait de l'écran , j'ai vérifié en adaptant Ce que j'ai vu ici , mais cela ne fonctionne pas.

Donc je demanderais aux experts un peu d'aide et de m'éclaircir un peu , car il fait noir dans le secteur.
Voila , merci !
PS : Je suis sur TI 82 stats.fr alors j'ai peut être mal traduit quelque-chose.
PS 2: très bon forum , continuez comme ça!

  Haut de page Bas de page 
 
darkmory
Avatar

Autorisation : Membre
Nb de messages : 131
Inscrit le : Jeu 07 Jan 2010, 22:13
Posté le : Sam 16 Jan 2010, 23:55   Citer 

il ne faut pas que R ou R+O soient superieur a 16
le max est donc:
Output(8,16,"8")

----------------------
chuck norris peut jouer au tout dernier prince of persia sur une calto
chuck norris peut ecrire tres vite et tres bien avec une psp
Cours de programmation via le fofo ici
 Adresse email Haut de page Bas de page 
 
pesudozzz
Invité
Posté le : Dim 17 Jan 2010, 8:57   Citer 

Merci de ta réponse , mais je voulais aussi demander

Code

:R+int (rand*3)-1üR


Traduit en stats.fr , c'est bien
R+partDéec(NbrAleatoire*3)-1->(sto)R ?

Erratum

Je viens de relire le sujet :"traduction Anglais/Francais" , ce n'est pas cela.
partDéc =/= int.
Mais j'avais dit cela car je l'avais vu dans le lexique pdf

Citer
int : math + num + 4
4:partDéc



Donc faudra vous mettre d'accord;

Maintenant , je peut apercevoir les murs , mais des que je lance , il fait l'animation du crash et "Game over". Je ne peux pas aller plus loin , comme si il y avait déjà un mur dès le début.

  Haut de page Bas de page 
 
pesudozzz
Invité
Posté le : Dim 17 Jan 2010, 9:14   Citer 

De mieux en mieux (pas d'ironie)
J'ai trouvé tout seul godgrace.gif (fier d'avoir compris quelquechose)

En fait c'était à :

Citer

Code
:Disp "



J'avais mis un espace après le "

Maintenant ca marche parfaitement !

Je laisse quand même le programme a ceux qui cherchait un jeu de course pas trop long a recopier.
Objectif de la semaine prochaine : le snake , et après j'aurais de quoi m'occuper en heure de creux.
Merci a vous!

  Haut de page Bas de page 
 
pesudozzz



Autorisation : Membre
Nb de messages : 4
Inscrit le : Dim 17 Jan 2010, 9:14
Posté le : Dim 17 Jan 2010, 9:15   Citer 

... Et pour la peine , je m'inscris godgrace.gif
Bon week end

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





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