Forum | TOUT sur la TI-82

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Les programmes des internautes -> Morpion & Puissance 4

<< Page: 1, 2, 3, 4 >>

Morpion & Puissance 4

Auteur

Message

Ratuss

Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41

Posté le : Sam 17 Jui 2006, 18:52

Oui c'est vrai tu as raison, on peut tout aussi mettre :

Code

Output (1,1,"LIGNE1 LIGNE2 LIGNE3

(je sais pas si c'est ca que tu voulais dire

)

----------------------
--- LISTE DES JEUX POUR TI ---

Sangohan38

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

Posté le : Sam 17 Jui 2006, 18:52

Si c'est ce que voulais dire.

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Sam 15 Juil 2006, 15:02

pour ratuss et autres économes de la memoire j'en ai un de 2045 octé . je le metrai des que j'aurai reussi a le faire passer sur ti graph link puis sur le block note...

Google_AdSense

Sangohan38

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

Posté le : Sam 15 Juil 2006, 17:15

Bien jouer mais mon morpion a été bvite fait. Je pense que je peut en faire un plus simple.

Google_AdSense

Sangohan38

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

Posté le : Dim 27 Aoû 2006, 10:39

Voila ma nouvelle version de mon morpion:

Code

:FullScreen
:0->Xmin
:94->Xmax
:0->Ymin
:62->Ymax
:ClrDraw
:CoordOff
:GridOff
:AxesOff
:Horizontal 0
:Horizontal 62
:Vertical 0
:Vertical 94
:For(A,1,07
:Text(10,A," SANGOHAN38"
:End
:For(A,1,10
:Text(A,53," PRESENTE:"
:End
:For(A,1,34
:Text(28,A," MORPION"
:End
:Text(52,27,"VERSION 2.0"
:Pause
:ClrDraw
:Lbl 1
:Menu("MORPION:","JOUER",2,"INSTRUCTIONS",3,"QUITTER",4
:Lbl 4
:ClrDraw
:ClrHome
:Output(1,1," "
:ClrList L1
:Stop
:Lbl 3
:ClrDraw
:Text(1,1,"POUR JOUER, ON UTILISE LES"
:Text(7,1,"TOUCHES [1] A [9]."
:Text(15,1,"APPUYES SUR LES TOUCHES ET
:Text(22,1,"APRES SUR [ENTER]."
:Line(52,30,52,0
:Line(22,30,22,00
:Line(52,30,22,30
:Line(52,20,22,20
:Line(52,10,22,10
:Line(52,00,22,00
:Line(42,30,42,0
:Line(32,30,32,0
:0->B
:Text(54,26,"1
:Text(54,36,"2
:Text(54,46,"3
:Text(44,26,"4
:Text(44,36,"5
:Text(44,46,"6
:Text(34,46,"9
:Text(34,36,"8
:Text(34,26,"7
:Lbl W
:If B[différent de]0:Goto X
:getKey->B
:If B=105:Goto 1
:If B=92:Text(54,26,"X
:If B=93:Text(54,36,"X
:If B=94:Text(54,46,"X
:If B=82:Text(44,26,"X
:If B=83:Text(44,36,"X
:If B=84:Text(44,46,"X
:If B=72:Text(34,26,"X
:If B=73:Text(34,36,"X
:If B=74:Text(34,46,"X
:1->[THETA]
:Goto W
:Lbl X
:[THETA]+1->[THETA]
:If [THETA][différent de]7:Goto X
:If B=92:Text(54,26,"1
:If B=93:Text(54,36,"2
:If B=94:Text(54,46,"3
:If B=82:Text(44,26,"4
:If B=83:Text(44,36,"5
:If B=84:Text(44,46,"6
:If B=72:Text(34,26,"7
:If B=73:Text(34,36,"8
:If B=74:Text(34,46,"9
:0->B
:Goto W
:Lbl 2
:ClrDraw
:1->A
:ClrList L1
:9->dim L1
:Line(32,10,32,40
:Line(42,10,42,40
:Line(52,10,52,40
:Line(62,10,62,40
:Line(32,10,62,10
:Line(32,20,62,20
:Line(32,30,62,30
:Line(32,40,62,40
:Text(1,31,"JOUEUR"
:Lbl 5
:1->A
:Text(1,57,A
:1->X
:getKey->B
:If B=92:Goto C
:If B=93:Goto D
:If B=94:Goto E
:If B=82:Goto 9
:If B=83:Goto A
:If B=84:Goto B
:If B=72:Goto 6
:If B=73:Goto 7
:If B=74:Goto 8
:Goto 5
:Lbl F
:2->A
:Text(1,57,A
:4->X
:getKey->B
:If B=92:Goto C
:If B=93:Goto D
:If B=94:Goto E
:If B=82:Goto 9
:If B=83:Goto A
:If B=84:Goto B
:If B=72:Goto 6
:If B=73:Goto 7
:If B=74:Goto 8
:Goto F
:Lbl 6
:24->S
:36->N
:7->O
:Lbl I
:If X=1 and L1(O)[différent de]0:Goto 5
:If X=4 and L1(O)[différent de]0:Goto F
:If L1(O)+X=1:L1(O)+X->L1(O)
:If L1(O)=1:Text(S,N,"X"
:If F=1 and L1(O)=1:Goto G
:If L1(O)+X=4:L1(O)+X->L1(O)
:If L1(O)=4:Text(S,N,"O"
:If F=1 and L1(O)=4:Goto H
:pxl-Test(S+1,N->F
:Goto I
:Lbl 7
:24->S
:46->N
:8->O
:Goto I
:Lbl 8
:24->S
:56->N
:9->O
:Goto I
:Lbl 9
:34->S
:36->N
:4->O
:Goto I
:Lbl A
:34->S
:46->N
:5->O
:Goto I
:Lbl B
:34->S
:56->N
:6->O
:Goto I
:Lbl C
:44->S
:36->N
:1->O
:Goto I
:Lbl D
:44->S
:46->N
:2->O
:Goto I
:Lbl E
:44->S
:56->N
:3->O
:Goto I
:Lbl M
:If L1(7)+L1(8)+L1(9)=3 or L1(7)+L1(8)+L1(9)=12
:Line(32,35,62,35
:If L1(4)+L1(5)+L1(6)=3 or L1(4)+L1(5)+L1(6)=12
:Line(32,25,62,25
:If L1(1)+L1(2)+L1(3)=3 or L1(1)+L1(2)+L1(3)=12
:Line(32,15,62,15
:If L1(7)+L1(4)+L1(1)=3 or L1(7)+L1(4)+L1(1)=12
:Line(37,40,37,10
:If L1(8)+L1(5)+L1(2)=3 or L1(8)+L1(5)+L1(2)=12
:Line(47,40,47,10
:If L1(9)+L1(6)+L1(3)=3 or L1(9)+L1(6)+L1(3)=12
:Line(57,40,57,10
:If L1(7)+L1(5)+L1(3)=3 or L1(7)+L1(5)+L1(3)=12
:Line(32,40,62,10
:If L1(9)+L1(5)+L1(1)=3 or L1(9)+L1(5)+L1(1)=12
:Line(62,40,32,10
:Text(7,33,"GAGNE"
:Pause
:Goto 1
:Lbl G
:If L1(1)+L1(2)+L1(3)=3 or L1(4)+L1(5)+L1(6)=3 or L1(7)+L1(8)+L1(9)=3 or L1(1)+L1(4)+L1(7)=3 or L1(2)+L1(5)+L1(8)=3 or L1(3)+L1(6)+L1(9)=3 or L1(1)+L1(5)+L1(9)=3 or L1(3)+L1(5)+L1(7)=3
:Goto M
:If L1(1)+L1(2)+L1(3)+L1(4)+L1(5)+L1(6)+L1(7)+L1(8)+L1(9)=21:Goto Y
:If L1(1)+L1(2)+L1(3)[différent de]3 and L1(4)+L1(5)+L1(6)[différent de]3 and L1(7)+L1(8)+L1(9)[différent de]3 and L1(1)+L1(4)+L1(7)[différent de]3 and L1(2)+L1(5)+L1(8)[différent de]3 and L1(3)+L1(6)+L1(9)[différent de]3 and L1(1)+L1(5)+L1(9)[différent de]3 and L1(3)+L1(5)+L1(7)[différent de]3
:Goto F
:Lbl Y
:Text(1,28," EGALITE "
:Pause
:Goto 1
:Lbl H
:If L1(1)+L1(2)+L1(3)=12 or L1(4)+L1(5)+L1(6)=12 or L1(7)+L1(8)+L1(9)=12 or L1(1)+L1(4)+L1(7)=12 or L1(2)+L1(5)+L1(8)=12 or L1(3)+L1(6)+L1(9)=12 or L1(1)+L1(5)+L1(9)=12 or L1(3)+L1(5)+L1(7)=12
:Goto M
:If L1(1)+L1(2)+L1(3)[différent de]12 and L1(4)+L1(5)+L1(6)[différent de]12 and L1(7)+L1(8)+L1(9)[différent de]12 and L1(1)+L1(4)+L1(7)[différent de]12 and L1(2)+L1(5)+L1(8)[différent de]12 and L1(3)+L1(6)+L1(9)[différent de]12 and L1(1)+L1(5)+L1(9)[différent de]12 and L1(3)+L1(5)+L1(7)[différent de]12
:Goto 5

Et pour le télécharger vous connaissez le lien

Ratuss

Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41

Posté le : Dim 27 Aoû 2006, 11:52

Ca prend combien de place ??

----------------------
--- LISTE DES JEUX POUR TI ---

Sangohan38

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

Posté le : Lun 28 Aoû 2006, 8:54

Moin que l'autre que j'avais fait.

Google_AdSense

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Mer 06 Sep 2006, 15:17

c'est a dire ????????

a par sa pour les "ouput " ou "disp " ,disp est qd meme trees utile car quand on veut aficher une variable alor qu'on ne conné pas la valeur, si c'est un chiffre a virgule, disp l'affiche en entier, ouput peut le couper au milieu d'une ligne .. si il est mal prévu ... bon dsl pour le morpion , en se moment je galere a le metre en txt , j'ai trop la flemme de taper tout se que j'ai fait de nouvot a la main alor je cherche moyen de transormer programme en . txt et .txt en programme....

Sangohan38

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

Posté le : Ven 08 Sep 2006, 20:38

Ya un moyen tout simple.

Tu va sur ti connect et normalement tu peut télécharger un truc dans ce genre.

titeufbig

Autorisation : Membre
Nb de messages : 33
Inscrit le : Dim 17 Sep 2006, 12:20

Posté le : Mer 20 Sep 2006, 13:45

a quoi sa correspond le A avec un accent??

Ratuss

Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41

Posté le : Mer 20 Sep 2006, 15:30

C'est ou ??

----------------------
--- LISTE DES JEUX POUR TI ---

titeufbig

Autorisation : Membre
Nb de messages : 33
Inscrit le : Dim 17 Sep 2006, 12:20

Posté le : Mer 20 Sep 2006, 19:58

Citer

:Text(10,A," SANGOHAN38"

Google_AdSense

titeufbig

Autorisation : Membre
Nb de messages : 33
Inscrit le : Dim 17 Sep 2006, 12:20

Posté le : Mer 20 Sep 2006, 19:59

Mais sur le code on dirait que y'a un accent, c'est un A tt simple non?

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Jeu 21 Sep 2006, 17:28

tu a un lien ?? ou un autre émulateur qui soit capable de transformer un prog ti , ou un fichier .82p ou un .txt en prog ti , en fichier .82p ou en .txt?????
passe moi le lien je prend tout de suite !!!
jen é marre de gallerer . je peut mettre mes prog sur pc et MES prog du pc a la calculos mé pas les prog ke je télécharge é je peut ni transformre en . txt , de txt a .82p puis a calculos !!!

ps g ti connect et ti graph link 82 é 83

Ratuss

Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41

Posté le : Jeu 21 Sep 2006, 18:29

Citer

Mais sur le code on dirait que y'a un accent, c'est un A tt simple non?

Bah oui...

Ps : craminou : http://www.ti83plus.online.fr/downloads.php?cat=Utilitaires+PC

----------------------
--- LISTE DES JEUX POUR TI ---

Google_AdSense

titeufbig

Autorisation : Membre
Nb de messages : 33
Inscrit le : Dim 17 Sep 2006, 12:20

Posté le : Ven 22 Sep 2006, 20:29

et je le fait comment ce A avec accent?

Sangohan38

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

Posté le : Ven 22 Sep 2006, 20:31

C'est l'équivalmence du signe [THETA].

PS: Désoler pour le retard mais faudra vous y faire.

Stupid

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

Posté le : Mer 11 Oct 2006, 18:20

C4EST QUOI GRIDoff en french?

Ratuss

Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41

Posté le : Jeu 12 Oct 2006, 19:14

GridOff is the same function as QuadNaff ( in [format] )

----------------------
--- LISTE DES JEUX POUR TI ---

Sangohan38

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

Posté le : Mer 01 Nov 2006, 18:42

Flood -> Supprimé.

Sangohan38

<< Page: 1, 2, 3, 4 >>

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Les programmes des internautes -> Morpion & Puissance 4

Flux RSS