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
 


prgm SPEEDUP

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

prgm SPEEDUP

Message par Cytropus le Ven 14 Juin 2013 - 11:24

Bonjour à tous !

J’inaugure le forum avec ce programme.
Il est simple, facile, et a l'avantage d'occuper longtemps (un peu comme snake Wink)

Code:
:1->dim(lEXAM
:EffEcr
:1->A
:1->B
:EffVar E EffVar F 30->G
:While G
:G-1->G
:EffEcr
:If non(E
:Then
:entAléat(1,7->C
:entAléat(1,16->D
:F+1->F
:1->E
:If F>100
:Then
:F+1->F
:25->G
:End
:If F=<100
:30->G
:End
:Output(8,15,G
:Output(8,8,lEXAM(1
:Output(8,1,F
:Output(C,D,"?
:Output(A,B,"O
:If A=C et B=D
:EffVar E
:codeTouche->T
:(T=34 et A=/=7)-(T=25 et A=/=1)+A->A
:(T=26 et B=/=16)-(T=24 et B=/=1)+B->B
:End
:EffEcr
:Disp "PERDU
:Pause
:EffEcr
:If F>lEXAM(1
:Then
:F->lEXAM(1
:Disp "NEW HIGH SCORE:",F
:Input "PSEUDO:",Chaîne3
:Else
:Disp "SCORE:",F,"HIGH SCORE:",lEXAM(1),"DETENU PAR",Chaîne3
:Output(8,9,"CYTROPUS

Voilà !

Déplacement : croix directionnelles
Objectif : ramasser le ? dans les temps
poids du programme dans la description évidemment. Bien Joué

Bon jeu à tous !
Cytropus
avatar
Cytropus
Intéressé
Intéressé

Messages : 31
Points Concours : 15
Productivité : 2
Date d'inscription : 11/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: prgm SPEEDUP

Message par blg_flg le Ven 14 Juin 2013 - 15:21

Ah oui, ça pourrait sans doute être bien d'imposer screenshots et liens de download systématiques...

__________________________________________________________________________




A bove ante, ab asino retro, a moderatoro undique caveto.

Invité, tu désires la liberté ? Fais donc un petit tour sur TI-Free World !

Spoiler:
avatar
blg_flg
Connaisseur
Connaisseur

Messages : 249
Points Concours : 45
Productivité : 6
Date d'inscription : 04/06/2013
Localisation : Pantruche
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: prgm SPEEDUP

Message par matrefeytontias le Ven 14 Juin 2013 - 19:14

Peut-être pas imposer, mais au moins permettre. Genre des champs exprès pour ça.

Pas mal sinon, comme petit programme Smile

matrefeytontias
Connaisseur
Connaisseur

Messages : 150
Points Concours : 35
Productivité : 13
Date d'inscription : 14/06/2013

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: prgm SPEEDUP

Message par persalteas le Ven 14 Juin 2013 - 20:14

Hors de question d'imposer, tu vas faire fuir les gens Razz

Les programmes testés, approuvés, fournis avec screen et l'accord de l'auteur pouront être ajoutés à la catégorie "Programmes du Site". Au moins dans les débuts du site.

Merci de ton inauguration pucy ;P 

Deux petites optimisations:
Code:
:Disp "PERDU
:Pause
peut s'écrire:
Code:
:Pause "PERDU

et aussi, en utilisant:
Code:
:A+(T=34 et A=/=7)-(T=25 et A=/=1->A
:B+(T=26 et B=/=16)-(T=24 et B=/=1->B
Tu sauvegardes 2 octets Wink

__________________________________________________________________________
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: prgm SPEEDUP

Message par Cytropus le Lun 17 Juin 2013 - 10:42

De rien persou ! Wink

Mais je ne suis pas à 2 octets près =D.

@blg_flg (ou keb pour les intimes !) : imposer des screenshots et liens de download systématiques serait stupide.
Personnellement, cela me gonflerais de devoir en faire à chaque fois et le nombre de programme du site diminuerait vu le nombre de gens qui nous demande où ils peuvent trouver un câble.
avatar
Cytropus
Intéressé
Intéressé

Messages : 31
Points Concours : 15
Productivité : 2
Date d'inscription : 11/06/2013
Localisation : Paris
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: prgm SPEEDUP

Message par blg_flg le Lun 17 Juin 2013 - 16:36

Non, pas imposer, c'est sûr... Mais c'est surtout les gens que tu fais fuir parce qu'ils ont la flemme de recopier. tongue

__________________________________________________________________________




A bove ante, ab asino retro, a moderatoro undique caveto.

Invité, tu désires la liberté ? Fais donc un petit tour sur TI-Free World !

Spoiler:
avatar
blg_flg
Connaisseur
Connaisseur

Messages : 249
Points Concours : 45
Productivité : 6
Date d'inscription : 04/06/2013
Localisation : Pantruche
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: prgm SPEEDUP

Message par persalteas le Lun 17 Juin 2013 - 17:08

Bof. Pendant des années on avait pas de screens et on survivait :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: prgm SPEEDUP

Message par blg_flg le Lun 17 Juin 2013 - 17:45

Ben justement, je trouvais ça pénible. C'est juste que je me foutais des programmes Basic... :P

__________________________________________________________________________




A bove ante, ab asino retro, a moderatoro undique caveto.

Invité, tu désires la liberté ? Fais donc un petit tour sur TI-Free World !

Spoiler:
avatar
blg_flg
Connaisseur
Connaisseur

Messages : 249
Points Concours : 45
Productivité : 6
Date d'inscription : 04/06/2013
Localisation : Pantruche
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: prgm SPEEDUP

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