Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Connexion

Récupérer mon mot de passe

Chatbox externe


Derniers sujets
» [JEU] Mon voisin du dessous
Mar 10 Oct 2017 - 19:42 par Wistaro

» Lancement du TI-Concours 2017 !
Sam 20 Mai 2017 - 0:27 par Paulo1026

» Chaînes Youtube des membres
Ven 19 Mai 2017 - 22:41 par Wistaro

» cacul du taux d'intêret
Ven 24 Mar 2017 - 21:50 par m@thieu41

» [Projet] Un mario by tout82
Dim 29 Jan 2017 - 14:09 par Wistaro

» Cherche documentation assembleur TI82stat
Mer 25 Jan 2017 - 12:29 par Ti64CLi++

» Probleme Ti-82 Stats fr
Jeu 12 Jan 2017 - 13:56 par Ti64CLi++

» ROM 82 stats.fr
Jeu 15 Déc 2016 - 10:24 par Ti64CLi++

» flappy bird
Jeu 15 Déc 2016 - 10:23 par Ti64CLi++

Partenaires
TI-Planet Espace-TI : Forum

Faire un don à Tout-82...
Où va cet argent ?
Membres donateurs:- Persalteas (10€)
- Wistaro (5€)
- jo2geek (22€)

Les posteurs les plus actifs du mois


Plus Moins (ou le juste prix)

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

Plus Moins (ou le juste prix)

Message par ashtrail le Jeu 3 Oct 2013 - 21:26

Bonjour tout le monde,
Voici ma version du Plus Moins. Elle est plutôt légère (476 octets //merci rpgcreator Wink ) et avec des niveaux (oui bon les vrai programmeur réussirais à baisser ça de 200 octets ou plus même mais en attendant...). Il y a aussi un niveau ou l'on choisis soi-même son intervalle. Le programme s'appelle PLUSMOIN.

le lien : 4shared.com/file/k3TZTdCa/PLUSMOIN.html

Code:
:Lbl M
:ClrHome      // EffEcr
:1→B
:If P<1 or P>5
:1→P
:If P=1
:randInt(1,99→X     // randInt = entAléat, marrant que ti editor convertisse mes progs en anglais...
:If P=2
:randInt(1,499→X
:If P=3
:randInt(1,999→X
:If P=4
:randInt(-999,999)→X
:If P=5
:randInt(V,W)→X
:Menu("PLUS/MOINS","JOUER",J,"DIFFICULTE",Θ,"QUITTER",Q   //Θ=thêta (alpha+3)
:Lbl Θ
:Pause "CHOISISSEZ VOUS-MEME LE NIVEAU DE DIFFICULTE V ETANT LE MIN ET W LE MAX
:ClrHome
:Prompt V,W
:5→P
:If W<V:1→P
:Goto M
:Lbl D
:Menu("DIFFICULTE","FACILE",1,"MOYEN",2,"DIFFICILE",3,"HARDCORE",4
:Lbl 1
:1→P
:Goto M
:Lbl 2
:2→P
:Goto M
:Lbl 3
:3→P
:Goto M
:Lbl 4
:4→P
:Goto M
:Lbl J
:Repeat A=X
:Input A
:If A<X
:Then
:Disp "PLUS
:B+1→B
:End
:If A>X
:Then
:Disp "MOINS
:B+1→1
:End
:End
:ClrHome  // EffEcr
:Disp "VOUS AVEZ GAGNE","ET EN",B,"COUPS!
:Pause
:Goto M
:Lbl Q


Dernière édition par ashtrail le Ven 4 Oct 2013 - 10:22, édité 2 fois

__________________________________________________________________________
Mes programmes :
-JEUX : Le TAPTAUPE, Le MINSTEP, Un Plus-Moins
-MATHS : Regroupement n°1, Regroupement n°2, tout sur les pourcentages
-AUTRE : Le programme qui jauge les prénoms
avatar
ashtrail
Connaisseur
Connaisseur

Messages : 248
Points Concours : 21
Productivité : 21
Date d'inscription : 18/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://ti-freeworld.fr1.co/

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par rpgcreator le Ven 4 Oct 2013 - 9:59

t'avais pas besoin de mettre des while, deux if dans un repeat, c'était le meilleur choix
sino, vraiment pas mal.
Avec une ti-84+, t'aurais la possibilité de mettre un temps de reponse de 30 sec, comme dans le vraix sur tf1 Razz

__________________________________________________________________________
troll!!!
je prefere la ti-82stats a la fumette Razz

ET VOUS ?

Je travaille en ce moment sur une adaptation de pokémon donjon mystère en ti-basic sur 82stats. J'ai fini la première version du jeu que je posterais prochainement !!!!!!!!!!
En attendant, viens voir mes RPG supra légers en ti-basic pour ti-82stats:

http://www.tout82.org/t87-rpg82-iii-world-war-z
http://www.tout82.org/t75-skyrim-ii-modern-warfare
http://www.tout82.org/t78-rpg82-deluxe

avatar
rpgcreator
Connaisseur
Connaisseur

Messages : 252
Points Concours : 27
Productivité : 6
Date d'inscription : 16/09/2013
Localisation : Vernouillet 28
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par ashtrail le Ven 4 Oct 2013 - 10:02

rpgcreator a écrit:deux if dans un repeat, c'était le meilleur choix
Ah ouais pas con! Bon je vais changer ça!

EDIT : Merci grâce à toi il ne fait plus que 472 octets et est plus esthétique d'un point de vue programmation. Comme excuse je dirais juste que je l'ai fait y a longtemps.

__________________________________________________________________________
Mes programmes :
-JEUX : Le TAPTAUPE, Le MINSTEP, Un Plus-Moins
-MATHS : Regroupement n°1, Regroupement n°2, tout sur les pourcentages
-AUTRE : Le programme qui jauge les prénoms
avatar
ashtrail
Connaisseur
Connaisseur

Messages : 248
Points Concours : 21
Productivité : 21
Date d'inscription : 18/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://ti-freeworld.fr1.co/

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par rpgcreator le Ven 4 Oct 2013 - 12:26

ok bin poste la quand t'as le temps

__________________________________________________________________________
troll!!!
je prefere la ti-82stats a la fumette Razz

ET VOUS ?

Je travaille en ce moment sur une adaptation de pokémon donjon mystère en ti-basic sur 82stats. J'ai fini la première version du jeu que je posterais prochainement !!!!!!!!!!
En attendant, viens voir mes RPG supra légers en ti-basic pour ti-82stats:

http://www.tout82.org/t87-rpg82-iii-world-war-z
http://www.tout82.org/t75-skyrim-ii-modern-warfare
http://www.tout82.org/t78-rpg82-deluxe

avatar
rpgcreator
Connaisseur
Connaisseur

Messages : 252
Points Concours : 27
Productivité : 6
Date d'inscription : 16/09/2013
Localisation : Vernouillet 28
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par ashtrail le Ven 4 Oct 2013 - 14:18

Oui je l'ai déjà fait pour le code pour le lien ça prendra un peu plus de temps.

__________________________________________________________________________
Mes programmes :
-JEUX : Le TAPTAUPE, Le MINSTEP, Un Plus-Moins
-MATHS : Regroupement n°1, Regroupement n°2, tout sur les pourcentages
-AUTRE : Le programme qui jauge les prénoms
avatar
ashtrail
Connaisseur
Connaisseur

Messages : 248
Points Concours : 21
Productivité : 21
Date d'inscription : 18/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://ti-freeworld.fr1.co/

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par m@thieu41 le Ven 4 Oct 2013 - 23:18

Pas mal, mais je trouve que tu compliques pas mal de trucs sans pour autant gagner en vitesse/optimisation
Petites remarques:

On ne va jamais au Lbl D, donc on ne peut jamais choisir Moyen/Difficile etc, mais juste la saisie "manuelle"

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

Code:
:Repeat A=X
:Input A
:If A<X
:Then
:Disp "PLUS
:B+1→B
:End
:If A>X
:Then
:Disp "MOINS
:B+1→1
:End
:End
:ClrHome  // EffEcr
:Disp "VOUS AVEZ GAGNE","ET EN",B,"COUPS!
:Pause
Pourquoi s'embêter avec des Then/End?
Code:
:Repeat A=X
:Input A
:If A<X
:Disp "PLUS
:If A>X
:Disp "MOINS
:B+1->B
:End
:ClrHome  // EffEcr
:Disp "VOUS AVEZ GAGNE","ET EN",B-1 //Ne pas oublier le "-1" parce qu'on incrémente même quand on a trouvé. (ou sinon changer l'initialisation de B)
:Pause "COUPS!  //En utilisant la fonction Pause pour un affichage on gagne 1o (on ne critique pas :p )
---------------------

Par rapport aux niveaux de difficulté:
Code:
:1->P //Permet d'éviter de tester la valeur de P
:Lbl M
:ClrHome      // EffEcr
:1→B //Tu peux mettre DelVar B et changer l'affichage (en enlevant le "-1" dans ma remarque précédente).

//plutôt que P=2 on prend P=5,
//plutôt que P=3 on prend P=10
//plutôt que P=4 on prend P=11
//Il faut bien sûr changer ces valeurs lors des attributions quand on choisi Facile/Normal etc.

:If P!=5 //Pour P=5 il n'y a rien à changer (une parenthèse en trop mais c'est pas important)
:randInt(1-1000(P=4),-1+100(P-(P=11→X    // un peu de booléens?

//P=5 ne change pas

__________________________________________________________________________
ZSNAKE Mon premier (et unique) jeu en ASM:
Un Snake 2 joueurs (2caltos)
-> Je travaille sur une version plus stable du jeu, je poste dès que possible.
avatar
m@thieu41
----------------------
----------------------

Messages : 934
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par Wistaro le Sam 5 Oct 2013 - 22:24

Voici ma version "deluxe" du jeu avec 7 niveaux de difficulté, un possibilité de choisir une session et une gestion des score par session aussi
http://tiplanet.org/forum/archives_voir.php?id=11447

Votre avis, comparaisons?

__________________________________________________________________________
Clique ici pour retrouver tout mes programmes en TIbasic

Tu es curieux, Invité? Alors clique ici:


Coucou Invité !Ta dernière visite sur ce forum date de . Tu as posté un total de 78 message(s) sur Tout 82 et enfin, tu as 0 ans.
Si nous sommes le 0, je te souhaite un joyeux anniversaire ;-)

avatar
Wistaro
Passioné
Passioné

Messages : 910
Points Concours : 86
Productivité : 28
Date d'inscription : 16/06/2013
Localisation : Tarbes - DUT GEII
Calculatrice(s) :
  • TI-82
  • TI-82 Stats
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://www.youtube.com/user/Wistaro

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par persalteas le Dim 6 Oct 2013 - 15:44

Ces programmes ne sont pas comparables.

476 octets c'est plutôt léger, la tienne en pèse 2k...
Il y a aussi la mienne, de 4k :P

__________________________________________________________________________
Bienvenue sur le nouveau Tout-82, Invité ! Viens discuter sur le chat... What a Face
Depuis que je me suis tatoué une calculatrice sur le bras, vous pouvez compter sur moi ! :P (Best joke ever x) )
avatar
persalteas
----------------------
----------------------

Messages : 482
Points Concours : 152
Productivité : 39
Date d'inscription : 06/12/2012
Localisation : Savoie, France
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://tout82.forumactif.org

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par Wistaro le Dim 6 Oct 2013 - 18:01

oui, je l'ais vue la tienne, elle est pas mal Smile

__________________________________________________________________________
Clique ici pour retrouver tout mes programmes en TIbasic

Tu es curieux, Invité? Alors clique ici:


Coucou Invité !Ta dernière visite sur ce forum date de . Tu as posté un total de 78 message(s) sur Tout 82 et enfin, tu as 0 ans.
Si nous sommes le 0, je te souhaite un joyeux anniversaire ;-)

avatar
Wistaro
Passioné
Passioné

Messages : 910
Points Concours : 86
Productivité : 28
Date d'inscription : 16/06/2013
Localisation : Tarbes - DUT GEII
Calculatrice(s) :
  • TI-82
  • TI-82 Stats
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://www.youtube.com/user/Wistaro

Revenir en haut Aller en bas

Re: Plus Moins (ou le juste prix)

Message par Contenu sponsorisé


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