Forum | TOUT sur la TI-82

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Les programmes des internautes -> Reflex (JEU)

Reflex (JEU)

Auteur

Message

hellknight71

Autorisation : Membre
Nb de messages : 48
Inscrit le : Lun 14 Déc 2015, 12:49

Posté le : Mar 22 Mar 2016, 17:45

Salut à tous

J'aimerai vous proposer un petit jeu dont le but est d'appuyer sur les bonnes touches le plus vite possible et ainsi faire les plus grand score.

Voici le code :

Code

:EffDessin
:0->Xmin
:94->Xmax
:62->Ymax
:0->Ymin
:Lbl 1
:Menu("REFLEX","JOUER",J,"SCORE",S,"QUITTER",Q
:Lbl Q
:Stop
:Lbl J
:0->S
:0->E
:94->A
:EffDessin
:Horizontale 1
:Horizontale 2
:Horizontale 3
:While 1
:codetouche(->K
:If E=0
:Then
:entAleat(1,4->I
:1->E
:End
:If I=1
:Then
:Texte(20,25,"HAUTE"
:End
:If I=2
:Then
:Texte(20,25,"BASSE"
:End
:If I=3
:Then
:Texte(20,25,"GAUCHE"
:End
:If I=4
:Then
:Texte(20,25,"DROITE"
:End
:If K=24 et I=3
:Then
:S+1->S
:0->E
:A+3->A
:For(X,1,3
:For(Y,A-3,A-1
:Pt -Aff(Y,X
:End
:End
:Texte(20,25," "
:End
:If K=25 et I=1
:Then
:S+1->S
:0->E
:A+3->A
:For(X,1,3
:For(Y,A-3,A-1
:Pt -Aff(Y,X
:End
:End
:Texte(20,25," "
:End
:If K=26 et I=4
:Then
:S+1->S
:0->E
:A+3->A
:For(X,1,3
:For(Y,A-3,A-1
:Pt -Aff(Y,X
:End
:End
:Texte(20,25," "
:End
:If K=34 et I=2
:Then
:S+1->S
:0->E
:A+3->A
:For(X,1,3
:For(Y,A-3,A-1
:Pt -Aff(Y,X
:End
:End
:Texte(20,25," "
:End
:A-1->A
:For(B,1,3
:Pt -NAff(A,B
:End
:If A=0
:Then
:EffDessin
:EffEcr
:Disp "PERDU !","","SCORE :",S
:End
:If S>H
:Then
:L1->H
:{H}->L1
:End
:Pause
:Goto 1
:End
:Lbl S
:EffEcr
:{H}->L1
:L1->H
:Disp "RECORD :",H
:Pause
:EffEcr
:Goto 1

Comme vous avez pu le constater il est très long et c'est pourquoi je vous propose un lien pour les possesseurs de câbles. Sinon bonne chance.

Lien: https://mon-partage.fr/f/6xLn1YaA/

adribaz

Autorisation : Membre
Nb de messages : 76
Inscrit le : Sam 13 Déc 2014, 19:11

Posté le : Mar 29 Mar 2016, 13:53

Slt, pa mal ton programme, j'avais deja eu cette idée mais g galère un peu

sinon GG

EDG

Autorisation : Membre
Nb de messages : 37
Inscrit le : Lun 29 Fév 2016, 14:12

Posté le : Mar 29 Mar 2016, 19:19

C'est un genre de "Super Simon" un peu non ?

----------------------
MES PROGRAMMES : https://web.archive.org/web/20190719123110/http://les-programmes-d-edg.e-monsite.com/

hellknight71

Autorisation : Membre
Nb de messages : 48
Inscrit le : Lun 14 Déc 2015, 12:49

Posté le : Mer 30 Mar 2016, 15:00

Pas vraiment non. Le but du jeu n'est pas de mémoriser une suite de touches sur lesquelles appuyer ensuite, mais plutôt d'appuyer sur les touches correspondantes le plus rapidement possible pour gagner des points.

Merci du compliment adribaz. J'avais essayé de le faire avant mais avec 1,2,3,4,5,6,7,8 et 9. Beaucoup trop long pour moi à l'époque.

C'est plus simple comme ça.

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Les programmes des internautes -> Reflex (JEU)

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

Flux RSS