Gamme TI-82
Partager sur Facebook Fil RSS Imprimer la page
Cacher les résultats

Résultat de la recherche



Poster un nouveau sujet Poster une réponse
All-Star Steping
Auteur Message
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Ven 25 Mai 2007, 19:13   Citer 

Les regles sont inscrites
Le programme Y je le donne juste aprés
Si vous voulez pas le recopier vous supprimez les deux premieres instructions et vous remplacez par


Code

:ClrHome
:Output(4,1,"****************
:Output(4,1,"****************



ü:sto->
ø:Pas égal à
:Le 1 des Listes
+:Le 6 des Listes

I% se trouve dans finances



Code
PRGM=STEP



:1üT:prgmY
:Output(3,1,"ALL-STAR STEPING
:Output(5,2,"UN JEU DU SLOVAK
:Output(8,1,"(C)COPYRIGHT2007
:If Dim L+=0
:{0,0,0,0}üL+
:Lbl 0
:Pause :ClrHome
:Menu("ALL-STAR STEPING","JOUER",J,"REGLES",S,"RECORDS",F
:Lbl S
:Disp "MEMORISEZ LES","LETTRES","RETAPEZ LESDANS","L'ORDRE DES QUE","+ S'AFFICHE,NE","TAPEZ PAS AVANT","SINON -200 POINT
;Pause:ClrHome
:Disp "CORRESPONDANCES:","H:HAUT","D:DROITE","B:BAS","G:GAUCHE
:Goto 0
:Lbl F
:Disp "NORMAL:","SCORE:","COUPS JUSTES:","","RAPIDE:","SCORE:","COUPS JUSTES:
:Output(2,7,L+(1
:Output(3,14,L+(3
:Output(6,7,L+(2
:Output(7,14,L+(4
:Goto 0
:Lbl J
:Menu "*****VITESSE:*****","NORMAL",N,"RAPIDE",R
:Lbl N:1üZ
:Goto L
:Lbl R:2üZ
:Lbl L
:2üY:0üF:0üG:0üJ
:Suite(0,A,1,10ü
:Lbl 1:ClrHome
:Y+1üY:0üE
:For(T,1,Y
:randInt(1,4üX
:If X=1
:Output(1,T,"H
:If X=2
:Output(1,T,"D
:If X=3
:Output(1,T,"B
:If X=4
:Output(1,T,"G
:XüL(T
:69!:69!69!
:If Z=1:Then
:69!:69!:69!
:End:End
:For(B,1,(500+Y100)/z
:End
:ClrHome
:For(P,1,3
:Output(1,1,P
:69!:69!:69!:69!:69!
:End
:Output(1,1,"GO!
:69!:69!:69!:69!:69!:69!
:ClrHome
:0üM:0üE
:GetkeyüC
:If C>0:Then
:Output(8,1,"FAUTE:-200
:F-200üF:J+1üJ:End
:Lbl 3:M+1üM
:Output(1,M,M
:If MøY:Goto 3
:Lbl 2:E+1üE
:Output(3,E,"+
:For(B,1,200/Z
:End
:GetkeyüC
:If C=25:1üA
:If C=26:2üA
:If C=34:3üA
:If C=24:4üA
:If AøL(E)
:Then :F-50üF
:Output(2,E,"X
:Else
:F+100+3YüF
:G+1üG
:Output(2,E,"O
:End
:69!:69!:69!
:If EøY:Goto 2
:If Yø10:Goto 1
:ClrHome
:If F>L+(Z
:FüL+(Z
:If G>L+(3 and Z=1
:GüL+(3
:If G>L+(4 and Z=2
:GüL+(4
:Output(1,1,"TON SCORE:
:Output(1,11,F
:Output(3,1,G
:Output(3,3,"/52
:Output(5,3,"I%
:Output(5,3,"
:Output(5,1,round((G/52)100,0
:Output(8,1,"FAUTES:
:Output(8,8,J





¤:Le carré dans Graph Stats




Code
PRGM=Y



:ClrHome
:For(Z,2,6,2
:For(A,1,8
:If T<2:Then
:Output(Z,A,"*
:Output(Z,17-A,"*
:End
:If T>1:Then
:Output(Z,A,"¤
:Output(Z,17-A,"¤
:End:End:End



 Adresse email Haut de page Bas de page 
 
unknow
Avatar

Autorisation : Membre
Nb de messages : 232
Inscrit le : Jeu 12 Oct 2006, 19:30
Posté le : Ven 25 Mai 2007, 19:15   Citer 

il marche pas celui la que j'ai transféré ainsi que fonky 4 (a cause des chaines)

----------------------
Ta le look coco

Tout nouveau design venait jeter un coup d'oeil ca en vaut la peine, ca a totalement changé
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Ven 25 Mai 2007, 19:18   Citer 

fallait recuperer chaine4 et chaine9 et créer les noms avec l'option correspondante et lui marche

 Adresse email Haut de page Bas de page 
 
unknow
Avatar

Autorisation : Membre
Nb de messages : 232
Inscrit le : Jeu 12 Oct 2006, 19:30
Posté le : Ven 25 Mai 2007, 19:22   Citer 

et comment je pouvais le savoir je l'ai transmis pendant que tu perdais lamentablement au basket alors que moi j'avais gagné! laugh.gif

----------------------
Ta le look coco

Tout nouveau design venait jeter un coup d'oeil ca en vaut la peine, ca a totalement changé
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Ven 25 Mai 2007, 19:26   Citer 

ouais mais j'ai failli gagné mais c'est à cause des briques que tu lançais et que je devais courrir pour les attraper que j'ai perdu

et la chaine4 c'est "(C)COPYRIGHT2007"
et la chaine9 c'est " "

 Adresse email Haut de page Bas de page 
 
unknow
Avatar

Autorisation : Membre
Nb de messages : 232
Inscrit le : Jeu 12 Oct 2006, 19:30
Posté le : Ven 25 Mai 2007, 19:28   Citer 

ba j'ai effacé une partie de ta presentation qui comportai une chaine et l'autre je sais pas. pirate.gif

----------------------
Ta le look coco

Tout nouveau design venait jeter un coup d'oeil ca en vaut la peine, ca a totalement changé
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Ven 25 Mai 2007, 19:30   Citer 

pour le p4 faudra que je mette le raiseau encore et ça ça va etre chaud et chiant...mais ça seriat enorme

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





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

Site hébergé par Free Page sous licence creative commons Page validée par le W3C (XHTML 1.0 Transitional) Feuille de style validée par le W3C Flux RSS 2.0 valide Page étiquetée par l'ICRA Page testée par Ocawa