| calculette a processeur merdique |
| Auteur |
Message |
Persalteas
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
|
Posté le : Sam 27 Nov 2010, 16:22
|
|
 |
Salut tout le monde, comme ça m'éclate toujours de faire des programmes inutiles, j'ai inventé celui-ci, qui fait croire à l'utilisateur que la calculette à besoin de temps pour réfléchir au calcul.
et accessoirement qui insulte celui qui veut faire une division par zéro.
et aussi peut dire que le calcul est trop dur.
quasi indétectable pour un débutant, du moment que celui çi ne fait pas d'erreur de syntaxe.
| Code |
ClrHome
Lbl 0
Input "",Str1
If inString(Str1,"/0
Menu("ERR:T'ES CON! ","Quitter",1,"VOir",2
If not(Randint(0,3
Menu("ERR: TROP DUR ","Quitter",1,"Voir",2
If not(Randint(0,3:Then
Output(4,1,"CALCUL EN COURS:"
Output(5,1,"[ ]"
For(A,2,15
Output(5,A,"="
For(B,1,100Randint(1,5):End
End
ClrHome
Disp Str1
End
Equ>String(Str1,Y0 //la fonction Y zéro
Y0(1)->L1(1)
Disp L1(1)
Goto 0
Lbl 2
ClrHome
Output(1,1,Str1
Goto 0
Lbl 1
Output(1,1,Str1
|
oui, je sais, c'est un petit programme inutile.
mais tant pis, j'aime bien les petits programmes inutiles. 
|
 |
  |
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Sam 27 Nov 2010, 17:16
|
|
|
Certains membres cumulent les programmes de farce et autres virus
J'ai me bien celui-là 
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
raboulave
Autorisation : Membre
Nb de messages : 57
Inscrit le : Jeu 08 Oct 2009, 20:56
|
Posté le : Dim 28 Nov 2010, 18:30
|
|
|
Bien marrant, enfin j'imagine 
Pasque j'ai un bug, j'ai tout bien recopié mais pourtant j'ai une erreur type donnée si je tape un nombre, ou une addition, ou un soustraction, ... enfin bref, ça ne marche qu'avec les lettres. J'ai rentré 3 lettres, y'a le faux chargement qu'est apparu avec "Calcul en cours" et à la fin de la barre, j'ai quand même eu une erreur type donnée ^^
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
help_me
Invité
|
Posté le : Lun 29 Nov 2010, 15:38
|
|
|
Je débute en programmation et je comprend pas d'où sortent Str , inString et Randit . Est-ce que vous pouvez m'expliquer svp ? 
|
| |
|
| |
Persalteas
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
|
Posté le : Lun 29 Nov 2010, 20:27
|
|
|
tu dois avoir une calculette en français:
Randint c'est entAléat(
Str c'est Chaine
instring c'est souschaine(
entAléat( sert à donner un nombre entier aléatoire.
une chaine est une variable de texte.
souschaine( permet de sélectionner une partie de cette variable texte.
|
| |
|
| |
raboulave
Autorisation : Membre
Nb de messages : 57
Inscrit le : Jeu 08 Oct 2009, 20:56
|
Posté le : Lun 29 Nov 2010, 21:37
|
|
|
Et pour mon Erreur type donnée alors ?
|
| |
|
| |
Persalteas
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
|
Posté le : Lun 29 Nov 2010, 21:57
|
|
|
ah quel endroit, ton erreur?
|
| |
|
| |
raboulave
Autorisation : Membre
Nb de messages : 57
Inscrit le : Jeu 08 Oct 2009, 20:56
|
Posté le : Lun 29 Nov 2010, 22:46
|
|
|
Oups oui excuse-moi ^^
L'erreur se situe au niveau de Equ->Chaîne(Chaîne1
Avec le pointeur sur Chaîne1 (dans la parenthèse ).
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Lun 29 Nov 2010, 23:18
|
|
|
Vous devez intervertir Str1 et Y0 à la ligne du Eq>chaîne
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
help_me
Invité
|
Posté le : Mar 30 Nov 2010, 11:57
|
|
|
euh... Je trouve pas "souschaîne" c'est normal?
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mar 30 Nov 2010, 18:25
|
|
|
INSTRING CE N'EST PAS SOUS-CHAINE
inString = carChaîne
sub = sous-chaîne
Uniquement dans le catalogue, sur les 82stat et suppérieures.
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
Persalteas
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
|
Posté le : Mar 30 Nov 2010, 20:11
|
|
|
ah euh oui c'est vrai...
en fait, je les confonds déjà en français, alors en anglais...
et carchaine( tu trouves ? normalement on ne l'a que dans le catalogue.
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
f(x)=1/x
Autorisation : Membre
Nb de messages : 19
Inscrit le : Lun 29 Nov 2010, 19:50
|
Posté le : Mer 01 Déc 2010, 16:50
|
|
|
Salut persalteas et les autres, où je peux trouver dans la TI ClrHome ?
----------------------
Bonjour, je suis en seconde option SI. J'aimerai apprendre à programmer car j'adore créer des algorithmes depuis peu. |
| |
|
| |
raboulave
Autorisation : Membre
Nb de messages : 57
Inscrit le : Jeu 08 Oct 2009, 20:56
|
Posté le : Mer 01 Déc 2010, 18:17
|
|
|
Ok merci pour l'inversion chaîne 1-Y0 mais j'ai toujours le même problème sinon, c'est que je ne peux rien mettre d'autre que des lettres sinon le programme m'affiche ERR:DIM INVALIDE.
Quasi-indétectable par un débutant, mais si le programme plante tout le temps... ^^
|
| |
|
| |
raboulave
Autorisation : Membre
Nb de messages : 57
Inscrit le : Jeu 08 Oct 2009, 20:56
|
Posté le : Mer 01 Déc 2010, 18:32
|
|
|
Encore une fois, j'ai oublié d'être plus précis :
En fait, maintenant, quoi que je tape j'ai une err dim invalide. L'erreur se situe toujours sur la ligne :
Y0(1)->L1(1)
^
||
L'erreur se situe sur la 2e parenthèse du Y0.
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mer 01 Déc 2010, 18:45
|
|
|
Corrigez ceci comme cela :
| Code | Equ>String(Str1,Y0 //la fonction Y zéro
Y0(1)->L1(1)
Disp L1(1)
|
expr( est uniquement dans le catalogue.
Elle affiche le résultat du calcul associé à la chaîne.
Elle remplace la manipulation complète, qui était d'ailleurs erronnée.
Equ>String sert à mettre la fonction dans la chaîne et pas le contraîre ( String>EQ ).
Et on ne doit pas intervertir les argumments par rapport au sens de l'instruction.
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
metallica
Autorisation : Membre
Nb de messages : 108
Inscrit le : Lun 28 Jui 2010, 11:14
|
Posté le : Jeu 02 Déc 2010, 17:28
|
|
|
| Citer : f( x )=1/x | | Salut persalteas et les autres, où je peux trouver dans la TI ClrHome ? |
pgrm + {fleche droite} + 8
----------------------
Tutoriel sur l'Axe Parser ! |
| |
|
| |
R # 2 B
Autorisation : Membre
Nb de messages : 21
Inscrit le : Ven 07 Jan 2011, 14:35
|
Posté le : Sam 08 Jan 2011, 13:50
|
|
|
j'aime l'idèe d'une calcu qui t'insulte quand tu fais une division par zéro ! J'avoue que j'ai bien ris quand j'ai lu le programme !
----------------------
Calto : Ti-82 Stats.Fr
programmeur depuis presque 2 ans
Peu de motivations sauf pour la programmation (évidemment !)
En cours les 3/4 de la journéee, le reste penché sur ma calto ! |
| |
|
| |
