[83]Plus ou moins

Voir le sujet précédent Voir le sujet suivant Aller en bas

[83]Plus ou moins

Message par Natars le Sam 1 Oct - 18:06

Voici un petit programme que j'ai créer moi-même, je remercie d’ailleurs le site du zéro sans qui je n'aurais jamais su programmer en TI Basic

Pour ce qui est du programme, il dispose de:

  • Un menu principal avec "règles", "quitter" et "jouer" et un sous-menu qui permet de choisir le nombre de joueur, donc si il y a un joueur, on joue contre l'ordinateur.


  • Un deuxième menu permettant de dire si on rejoue avec le même mode de jeu ou si on retourne au menu principal.


  • Un compte-tour qui affiche le résultat à la fin


  • Un système qui affiche en cas d'erreur si c'est plus ou moins et vous rappelle votre réponse (le message n'est jamais effacé pour vous rappeler l'indice)
maintenant, voici le code:
Code:
AxesNAFF
effecr
effdessin
texte(25,25,"PLUS OU MOINS")
pause
lbl 01
menu("MENU PRINCIPAL","JOUER",02,"REGLE",03,"QUITTER",04)
lbl 03
effecr
effdessin
texte(0,0,"TROUVER LE NOMBRE MYSTERE")
texte(6,0,"ENTRE 1 ET 100'')
pause
goto 01
lbl 02
effecr
effdessin
menu("JEU","JOUEUR",06"ORDINATEUR",05)
effecr
effdessin
lbl 06
2->J
texte(0,0,"JOUEUR 1, CHOISISSEZ UN")
texte(6,0,"NOMBRE MYSTERE")
150>X
input "MYSTERE:",X
pause
effecr
effdessin
goto 07
end
lbl 05
entalea(1,99)->X
1->J
goto 07
lbl 07
texte(0,0,"JOUEUR 2, QUEL EST LE")
texte(6,0,"NOMBRE MYSTERE?")
pause
while R[égal barré]X
input "REPONSE:",R
effecr
if R=X
then
disp "VICTOIRE"
pause
menu("ENCORE?","OUI",90,"NON",91)
lbl 90
effecr
effdessin
if J=1
then
goto 05
else
goto 06
end
lbl 91
goto 01
pause
end
if R<X
then
disp "PLUS"
pause
end
if R>X
then
disp "MOINS"
pause
end
end
lbl 04

Pour ce qui est de:
while R[égal barré]X
Je n'ai rien trouvé qui correspondait et comme je ne voulais pas que vous marquiez des bêtises, je l'ai noté comme ça, sachez qu'il faut remplacer le couple de crochet par ce qu'il y a marqué dedans

Natars
Argent 2
Argent 2

Sexe : Masculin
Age : 21
Messages : 28
Date d'inscription : 01/10/2011
Points Forum : 1
Points Concours : 0
Langages :
  • - TI-Basic Z80
Calculatrices :
  • - TI-82 Stats.fr
  • - Casio Collège

TI-82 Stats.fr


ftp://192.168.0.11/

Revenir en haut Aller en bas

Re: [83]Plus ou moins

Message par persalteas le Sam 1 Oct - 18:31

Bien !! tu ne peux pas savoir comme je suis heureux de te voir poster un programme ce soir ! ça me rappelle à quoi sert ce forum (si tu as jeté un coup d'oeil dans les sujets du dessus tu a compris de quoi je parle.)


d'habitude, le égal barré s'écrit =/= sur les forums, c'est une convention, tout le monde comprend.

Simplement, pourquoi avoir mit autant de "EffEcr:Effdessin" ?

_________________
[Vous devez être inscrit et connecté pour voir cette image]

persalteas
Platinum 2
Platinum 2

Sexe : Masculin
Age : 21
Messages : 2068
Date d'inscription : 30/06/2010
Etudes : PACES (médecine)
Points Forum : 114
Points Concours : 10
Langages :
  • - TI-Basic Z80
  • - xLib
  • - Grammer
  • - TI-Basic Nspire
Calculatrices :
  • - TI-82 Stats.fr
  • - TI-83
  • - TI-83+
  • - TI-84+ SE
  • - TI-86
  • - TI-Nspire
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84 Pocket.fr


http://tiemulation.kegtux.org

Revenir en haut Aller en bas

Re: [83]Plus ou moins

Message par noelthebest le Sam 1 Oct - 18:56

Pour un premier programme, c'est bien. Clin Oeil
Après, tu peux toujours essayer de t'inspirer des programmes du concours (plus ou moins) pour améliorer le tien (celui de persalteas par exemple ! :D ).
Après, comme persalteas l'a dit tu pourrais encore optimiser.

_________________
[Vous devez être inscrit et connecté pour voir cette image]

[Vous devez être inscrit et connecté pour voir cette image]
[Vous devez être inscrit et connecté pour voir cette image]

noelthebest
Platinum 1
Platinum 1

Sexe : Masculin
Age : 19
Messages : 1969
Date d'inscription : 12/03/2011
Etudes : ENS Cachan
Points Forum : 20
Points Concours : 9
Langages :
  • - TI-Basic Z80
  • - ASM TI-83+ / TI-84+
  • - Axe Parser
Calculatrices :
  • - TI-83+.fr
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84+ SE


Revenir en haut Aller en bas

Re: [83]Plus ou moins

Message par Natars le Dim 2 Oct - 9:42

pour les effecr/effdessin, je ne veux pas que l'on se retrouve rapidement avec:
PLUS
MOINS
MOINS
PLUS
...

je ne veux pas encombrer l'écran

Natars
Argent 2
Argent 2

Sexe : Masculin
Age : 21
Messages : 28
Date d'inscription : 01/10/2011
Points Forum : 1
Points Concours : 0
Langages :
  • - TI-Basic Z80
Calculatrices :
  • - TI-82 Stats.fr
  • - Casio Collège

TI-82 Stats.fr


ftp://192.168.0.11/

Revenir en haut Aller en bas

Re: [83]Plus ou moins

Message par noelthebest le Dim 2 Oct - 9:48

Si t'écris seulement sur un des deux écrans, t'effaces l'écran concerné, c'est tout.
Après, pour les autres optimisations :

-enlève tout ce qui est parenthèses/guillemets à la fin
-pour ce qui est de l'affichage de "Plus" ou de "Moins" : tu vas forcément exécuter un Pause, donc enlève le des conditions et mets-le qu'une seule fois
-toujours pour cette partie-là : si tu fais ce que je t'ai dit, alors tu te retrouves avec une seule instruction dans chacune des deux conditions : tu peux donc enlever les "Then" et les "End", si tu le fais la TI comprendra qu'il n'y a que la première instruction après la condition qu'elle devra exécuter.

Voilà.

_________________
[Vous devez être inscrit et connecté pour voir cette image]

[Vous devez être inscrit et connecté pour voir cette image]
[Vous devez être inscrit et connecté pour voir cette image]

noelthebest
Platinum 1
Platinum 1

Sexe : Masculin
Age : 19
Messages : 1969
Date d'inscription : 12/03/2011
Etudes : ENS Cachan
Points Forum : 20
Points Concours : 9
Langages :
  • - TI-Basic Z80
  • - ASM TI-83+ / TI-84+
  • - Axe Parser
Calculatrices :
  • - TI-83+.fr
  • - TI-Nspire CX
  • - Casio Collège
  • - Casio Graph

TI-84+ SE


Revenir en haut Aller en bas

Re: [83]Plus ou moins

Message par Contenu sponsorisé Aujourd'hui à 18:15


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum