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
Dim 3 Sep 2017 - 19:50 par Clément.7

» 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
Ti64CLi++
 
Clément.7
 


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 : 909
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 : 909
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