TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr : forums, programmes, FAQ, manuels...

Résultat de la recherche

TOUT sur les TI-82 - Index -> Programmes -> Les programmes des internautes -> Papier,pierre,ciseaux

Papier,pierre,ciseaux

Auteur

Message

el spectro
Avatar

Autorisation : Membre
Nb de messages : 123
Inscrit le : Ven 15 Déc 2006, 16:07

Posté le : Jeu 21 Déc 2006, 8:54

Tout le monde connait ce jeu qui a fait fureur en maternelle
en voici une version adaptée à la calculatrice

Code

PIERRE,PAPIRER,CISEAUX

:Lbl A
:Menu(« PIERRRE ,PAPIER ... », »JOUER » ,J, »QUITTER »,Q
;Lbl J
:5->V
:5->W
:Lbl 1
:Effecr
:Output(1,4,"+---++---+"
:Output(2,4,"! !! !"
:Output(3,4,"! !! !"
:Output(4,4,"! !! !"
:Output(5,4,"! !! !"
:Output(6,3,"O+---++---+O"
:Output(7,3,"+ +" [10 espaces]
:Output(8,3,"^ ^"
:Output(7,5,V
:Output(7,12,W
:0->B
:Lbl 2
:codetouche->K
:If K=105 et B[égal barré]0
:Goto 3
:If K=92 :Then
:Output(3,6,"O"
:Output(4,6,"^"
:1->B
:End
:If k=93 :Then
:Output(3,6,"0"
:Output(4,6,"0"
:2->B
:End
:If K=94 :Then
:Output(3,6,"!"
:Output(4,6,"!"
:3->B
:End
:0->C
:Goto 2
:Lbl 3
:C+1->C
:Output(3,11,"0"
:Output(4,11,"0"
:69!:69!:69!
:Output(3,11,"!"
:Output(4,11,"!"
:69!:69!:69!
:Output(3,11,"O"
:Output(4,11,"^"
:69!:69!:69!
:If C=5:Goto 4
:While C[égal barré]5:Goto 3
:Lbl 4
:entAléat(1,3->A
:If A=1
:Then
:Output(3,11,"O"
:Output(4,11,"^"
:End
:If A=2
:Then
:Output(3,11,"0"
:Output(4,11,"0"
:End
:If A=3
:Then
:Output(3,11,"!"
:Output(4,11,"!"
:End
:Lbl 9
:Pause
:If A=B
:Then
:Output(4,5,"EGALITE"
:Pause
:Goto 1
:End
:If V<1:Then:Goto 5:End
:If W<1:Then:Goto 6:End
:If A=1 et B=2:Then:W-1->W:Goto 1:End
:If A=1 et B=3:Then:V-1->V:Goto 1:End
:If A=2 et B=1:Then:V-1->V:Goto 1:End
:If A=2 et B=3:Then:W-1->W:Goto 1:End
:If A=3 et B=1:Then:W-1->W:Goto 1:End
:If A=3 et B=2:Then:V-1->V:Goto 1:End
:Pause
:End
:Goto 1
:Lbl 5
:Output(6,3,"O "
:Output(7,2,"+ "
:69!:69!
:Output(6,1," "
:Output(7,2," "
:Output(8,1,"O+<"
:Output(4,5,"PERDU"
:Pause
:Goto A
:Lbl 6
:Output(6,14," O"
:Output(7,14," +"
:69!:69!
:Output(6,16," "
:Output(7,15," "
:Output(8,14,">+O"
:Output(4,5,"GAGNER"
:Pause
:Goto A
:Lbl Q

Voilà de quoi replonger dans sa plus tendre enfance

----------------------
désolé pour mon absence mais mon temps sur le net était occupé par un exposé...

Krenn

Autorisation : Membre
Nb de messages : 2
Inscrit le : Jeu 21 Déc 2006, 13:57

Posté le : Jeu 21 Déc 2006, 13:59

pas mal,fé passer les heures de cours

----------------------
de retour pour discuter avec vous^^

unknow

Autorisation : Membre
Nb de messages : 232
Inscrit le : Jeu 12 Oct 2006, 19:30

Posté le : Jeu 21 Déc 2006, 19:26

jcroyais que tu n'aimais pas les grandes prsentations?!

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

Tout nouveau design venait jeter un coup d'oeil ca en vaut la peine, ca a totalement changé

Sangohan38

Autorisation : Membre
Nb de messages : 3388
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Ven 22 Déc 2006, 13:05

La, cela s'imposait, ce jeux est mythique.

Sangohan38

el spectro
Avatar

Autorisation : Membre
Nb de messages : 123
Inscrit le : Ven 15 Déc 2006, 16:07

Posté le : Ven 22 Déc 2006, 15:48

il n'y a pas de grandes présentation c'est juste le jeu lui même

PS:j'aime les grandes et belles présentation mais je suis dégouté de plus avoir de place dans ma calcu

----------------------
désolé pour mon absence mais mon temps sur le net était occupé par un exposé...

Shânyü-Finiarel
Avatar

Autorisation : Membre
Nb de messages : 34
Inscrit le : Dim 03 Déc 2006, 14:32

Posté le : Ven 22 Déc 2006, 21:08

PAs mal El spectro!!
Bonnes vacs on se voit à la rentrée

----------------------
...capable d'être dans l'incertitude, le mystère et le doute en oubliant l'exaspérante quête de la vérité et de la raison. Voilà l'état d'esprit qui convient... La Tour des Anges, Philip Pullman

Sangohan38

Autorisation : Membre
Nb de messages : 3388
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Sam 23 Déc 2006, 21:22

Sinon, on ne fait pas de présentation ...

Sangohan38

Stupid

Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Mar 06 Fév 2007, 15:53

je voulais en faire un à deux maais au moment ou ce que les joueurs ont fait devrait s'afficher il y'a rien et on attend...que faire pour que les données puissent s'envoyer

lovespain
Invité

Posté le : Sam 07 Jan 2012, 23:22

Bonsoir,
Je voudrai mettre ton prgm sur ma calco (TI82 stats) mais je ne trouve pas le point d'exclamation, il est ou?

sandro

Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58

Posté le : Sam 07 Jan 2012, 23:25

tu l'optient en faisant [math][droite][4] : il s'agit du symbole factoriel, qui sert en propabilitées, d'où l'emplacement.

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes

metallica

Autorisation : Membre
Nb de messages : 108
Inscrit le : Lun 28 Jui 2010, 11:14

Posté le : Dim 08 Jan 2012, 10:18

non, il faut faire [math][gauche][4]

----------------------

Tutoriel sur l'Axe Parser !

lovespain
Invité

Posté le : Dim 08 Jan 2012, 11:06

Merci beaucoup !

sandro

Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58

Posté le : Dim 08 Jan 2012, 19:08

Ups, t'as raison : j'ai pensé "c'est l'onglet tout à droite" et j'ai donc écrit droite alors que le moyen le plus cour d' arriver était la flèche gauche
Sandro

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes

Lehomardmasqué
Invité

Posté le : Lun 20 Jan 2014, 14:14

Quand je lance il me dit ERR: TYPE DONNE au "JOUER",J, je ne sais pas d'où ça vient, quelqu'un peut m'aider ?

linkakro

Autorisation : Membre
Nb de messages : 3772
Inscrit le : Lun 19 Oct 2009, 21:25

Posté le : Lun 20 Jan 2014, 18:16

Vérifie les guillemets et le virgules de la commande du menu. Il doit en manquer.

----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)

Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store

TOUT sur les TI-82 - Index -> Programmes -> Les programmes des internautes -> Papier,pierre,ciseaux