| CONVERS+ - Conversion de base de 2 à 20 en décimale |
| Auteur |
Message |
coc5
Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
|
Posté le : Mer 24 Oct 2007, 20:20
|
|
 |
Finalement je l'ai quand même mit en ligne 
(edit: je l'ai changé maintenant c'est de 2 à 20 et le code est plus court  )
2nd edit : le code pour Ti82 est disponible (plus bas). En fait, le calcul est quasi-insantané par rapport à la version Ti82stats mais le code est un peu pluis long.
Ca m'a permit de mettre en oeuvre un code assez spécial^^ (Pour récupérer des données sans Input )
LE LIEN... ICI !
Le lien pour Ti82 non stats ici
<- -> permettent de changer la base.
Vous entrer un nombre dans la base donnée, et le programme vous donne le nombre décimal correspondant. Je prévoit bientôt de le faire dans l'autre sens.
| Code |
Lbl M
4->A
ClrHome
Disp "CONVERS+ //COC5","----------------",""," CALCULER"," QUITTER","","BASE <- ->
Repeat K=105
Output(A,1," "
If K=34:5->A
If K=25:4->A
Output(A,1,"*
55!
getKey->K
min(20,max(2,N+(K=26)-(K=24->N
Output(7,7,"
Output(7,6,N
End
If A=5:Then
ClrHome
DelVar Str1
Output(1,1,"
Return
End
If A=4:Then
Input "NOMBRE ",Str1
expr(Str1->B
0->V:0->Z
10->A:11->B
12->C:13->D
14->E:15->F
16->G:17->H
18->J:19->K
ClrHome
Output(4,8,"/100
Repeat V=length(Str1
expr(sub(Str1,length(Str1)-V,1
If Ans [SUPERIEUR OU EGALE] N
Then
Pause "NOMRE INVALIDE.
Goto M
End
Z+Ans(N^V->Z
V+1->V
Output(4,6,int(100V/length(Str1
End
ClrHome
Disp "","NOMBRE DECIMAL :","",Z
getKey
Repeat getKey
End
End
Goto M
|
Le code pour les Ti82 non stats (mache aussi avec les autres^^)
Les bases sont de 1 à 16 sinon ça prenait de la place pour pas grand chose.
| Code | Lbl M
4->A
ClrHome
Disp "CONVERS+ //COC5","----------------",""," CALCULER"," QUITTER","","BASE <- ->
Repeat K=105
Lbl 8
Output(A,1," "
If K=34:5->A
If K=25:4->A
Output(A,1,"*
55!
getKey->K
min(16,max(2,N+(K=26)-(K=24->N
Output(7,7,"
Output(7,6,N
End
If A=5:Then
ClrHome
1->dim([LISTE1]
Output(1,1,"
Return
End
If A=4:Then
0->V
10->A:11->B:12->C
13->D:14->E:15->F
0->dim([LISTE1]
3->S:1->M:0->U
ClrHome
Repeat K=105
Repeat L<6 or K=105 and U or K=102
getKey->K
Output(S+1,M,"
min(U+1,max(1,V-(K=24)+(V [DIFFERENT DE] 47)(K=26->V
3+2int(V/16->S
1+16fPart(V/16->M
Output(S+1,M,"^
33!
10-int(.1K->L
If K=102:0->[LISTE1] (V
If K-102:Then
If L=6 or L=5:Then
100-20int(.1K)+K+1->K
10-L->L
End
End
End
If K-105:Then
3Ans-4+K-10(10-Ans
If Ans<N:Then
If K-102:Ans->[LISTE1] (V
[LISTE1] (V
If 10=Ans:Output(S,M,"A
If 11=Ans:Output(S,M,"B
If 12=Ans:Output(S,M,"C
If 13=Ans:Output(S,M,"D
If 14=Ans:Output(S,M,"E
If 15=Ans:Output(S,M,"F
If 10>Ans:Output(S,M,Ans
V+(V [DIFFERENT DE] 47->V
End
End
If V-1:dim([LISTE1] ->U
End
0->V:0->Z
If not(U:Stop
Repeat V=U
[LISTE1] (U-V
If Ans [SUPERIEUR OU EGAL] N
Then
Pause "NOMRE INVALIDE.
Goto M
End
Z+Ans(N^V->Z
V+1->V
End
ClrHome
Disp "","NOMBRE DECIMAL :","",Z
getKey
Repeat getKey
End
Goto M |
----------------------
Ne cliquez pas ici ! |
 |
  |
| |
vibra
Autorisation : Membre
Nb de messages : 595
Inscrit le : Mer 04 Avr 2007, 13:29
|
Posté le : Mer 24 Oct 2007, 20:24
|
|
|
Je sais pas si on peut avoir des convertions à faire au bac, mais dans ce cas là c'est super utile… sauf que j'ai la 82 
----------------------
Vive la programmation et vive le vibraphone !!! |
| |
|
| |
coc5
Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
|
Posté le : Mer 24 Oct 2007, 21:45
|
|
|
Je l'ai éditer tout de suite en fait tant que j'étais sur mon ordi.
Le lien est une animation en cadeau
Si c'est si important de faire une version Ti82 je pourrais en faire une mais le code serait singulièrement différent (en fait je sais comment faire : indice : liste )
----------------------
Ne cliquez pas ici ! |
| |
|
| |
coc5
Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
|
Posté le : Sam 27 Oct 2007, 14:41
|
|
|
La version Ti82 est disponible
----------------------
Ne cliquez pas ici ! |
| |
|
| |
vibra
Autorisation : Membre
Nb de messages : 595
Inscrit le : Mer 04 Avr 2007, 13:29
|
Posté le : Sam 27 Oct 2007, 14:58
|
|
|
Merci, ça peut toujours servir.
----------------------
Vive la programmation et vive le vibraphone !!! |
| |
|
| |
coc5
Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
|
Posté le : Sam 27 Oct 2007, 15:07
|
|
|
Désolé j'avais oublié le lien... Erreur réparée
----------------------
Ne cliquez pas ici ! |
| |
|
| |
btssio
Invité
|
Posté le : Mer 22 Mai 2013, 17:29
|
|
|
merci mec t mon hero !!!!!!!!!! =)))    
|
| |
|
| |
btssio
Invité
|
Posté le : Mer 22 Mai 2013, 17:30
|
|
|
De la part de tout une classe qui passe le bts de math demain 
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mer 22 Mai 2013, 19:01
|
|
|
Content que vous soyez contents.
Sâchez cependant que ces deux programmes sont loin d'être les seuls à traiter ce problème.
(Et que l'autre sens de conversion est géré par la plupart.)
Si vous avez une ti82 autant rester sur ce sujet.
Si vous avez une ti82stat ou plus, il vaut mieux utiliser par exemple le mien.
http://tout82.free.fr/forum/sujet.php?message=31925#31925
----------------------
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 |
| |
|
| |
Kelk'1
Autorisation : Membre
Nb de messages : 36
Inscrit le : Lun 01 Avr 2013, 18:48
|
Posté le : Mer 22 Mai 2013, 21:28
|
|
|
Ca peut paraitre con, mais je ne vois pas bien ce que fait ce pgrm (la flemme de lire le code)
----------------------
Signature inutile, enjoy =) |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mer 22 Mai 2013, 21:50
|
|
|
C'est un des thèmes les plus répandus sur les forum TI, enfin...
Il convertit l'écriture d'un nombre d'une base quelconque vers la base 10.
La base est le nombre de valeurs que peut prendre chaque symbole d'écriture, accessoirement c'est la valeur qui sert de retenue.
Le binaire est la base 2, l'hexadécimal est la base 16, les shadoks utilisent la base 4, et nous utilisons la base 10 (décimale).
EDIT : et les secondes sont en base 60.
----------------------
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 |
| |
|
| |
Kelk'1
Autorisation : Membre
Nb de messages : 36
Inscrit le : Lun 01 Avr 2013, 18:48
|
Posté le : Mer 22 Mai 2013, 23:06
|
|
|
Ah ok je savais pas c'était quoi, merci
----------------------
Signature inutile, enjoy =) |
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Jeu 23 Mai 2013, 13:45
|
|
|
| Citer : linkakro | | les secondes sont en base 60. |
Heu... c'est pas plutôt en base 10? 
Parce que moi je dis "18 secondes", pas "I secondes" (l'équivalent de 18 en base 60)
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 23 Mai 2013, 16:38
|
|
|
Ce n'est pas parce que tu es en base 60 que tu dois abandonner les chiffres arabes.
L'invention de l'usage des lettres est un moyen d'enchainer des symboles qui ne nécessitent pas de syntaxe de séparation entre eux.
La base représente le nombre de valeurs avant la retenue.
(18)10 = (1;8)10 = (00+18)10 = (0;18)60 =(18)60 = "I"60
(72)10 = (7;2)10 = (60+12)10 = (1;12)60 ="1C"60 = 1minute12seconde
(204)10 = (2;0;4)10 =(12*16+12)10=(12;12)16="CC"16
Si on veut être précis (mais pas plus clair), il faudrait différencier la base de décomposition de la graphie des composants.
Alors on a la graphie des chiffres arabes, eux-même en base 10, pour exprimer 12 dans le nombre (204)10=(12;12)16 décomposé en base 16
----------------------
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 |
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Jeu 23 Mai 2013, 17:45
|
|
|
Ok, je vois...
Mais alors puisque les minutes et les heures ne fonctionne pas sur la même base, c'est un peu déroutant non?
Par exemple, si on a 1500 minutes (1 jour 1h), ça donne (25;0)60... et 3660 minutes (2 jours 13h) -> (1;1;0)60...
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 23 Mai 2013, 18:24
|
|
|
Hélas oui.
On ne peut pas utiliser ma notation (a;b;c)x qui est adaptée seulement aux nombres à base constante.
Il faudra mentionner systématiquement les unités.
"1502,5"10 minute = 1 jour 1 h 2 minutes 30 s
On aurait aussi 204 unité = 2 centaine 4 unité.
Il faut donc choisir entre la notations avec des unités, et la notation avec des symboles uniques.
Quant à la notation que j'ai proposé en premier, elle est très lourde et conseillée seulement pour ne pas confondre diverses écritures quand on les traite dans un même document.
----------------------
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 |
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Jeu 23 Mai 2013, 20:27
|
|
|
D'accord, merci pour tes explications
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
ld
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
|
Posté le : Ven 24 Mai 2013, 14:36
|
|
|
Avec ton prgm on peut passer d'une base de deux à vingt en base dix mais on ne peut pas passer d'une base dix à une autre base. Tu compte y remédier ?
J'aime ton animation gif avant le prgm, peu prennent la peine de le faire et çà fait bien. Et puis les menu de ton prgm son vraiment cool.
Linkakro dit vrai, beaucoup de prgm traitant du même sujet.
Si tu veux innover dans la conversion va falloir creuser !
Linkakro t'a donner le lien du siens et le mien et dans ma signature ci-dessous.
----------------------
Note Éphéméride Chrono Bombrman BlueFishEncryptor Labygénérateur Nord BandeauDeTexte LunarPhase Syracuse Papy-Jump Convertisseur ! SolveurDeSudoku VérificateurDeCodesBanquaire PrgmADiviser CryptageDeVigenere MiniSolv Reed-Solomon Code128Géodésie |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Ven 24 Mai 2013, 15:46
|
|
|
Certes, mais coc5 fait parti des anciens qui ne viennent plus. EDIT : ou presque
Il a été parmi les premiers de la génération ti82stat a faire des programmes de haute qualité, mais a été dépassé depuis.
Je pense que ce programme ne sera jamais amélioré par coc5 en personne.
En plus chacun aboutit souvent à la même chose en cherchant la même chose.
Ainsi le mien est pratiquement identique à celui de mdr1 du SiteDuZero hormis mes suppléments et son optimisation de 4 octets.
J'imagine bien ce programme amélioré avec le même calcul que les autres et son interface en plus.
----------------------
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 |
| |
|
| |
coc5
Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
|
Posté le : Jeu 20 Jui 2013, 10:06
|
|
|
| Citer : linkakro | | Certes, mais coc5 fait parti des anciens qui ne viennent plus. |
*pousse lentement la porte du forum, tremblant sur sa vielle cane vermoulue*
Bonjour ! je suis ravi que tu y aies trouvé intérêt ld mais ce programme était bien à l'époque quand il naviguait en solitaire sur le lac de nos créations (comme c'est beau), tu trouveras mieux maintenant je pense, par exemple dans les programmes dont parle ce cher linkakro !
----------------------
Ne cliquez pas ici ! |
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
