[TI]convertisseur Hexadécimal/Décimal/Binaire
matcha
Messages postés
25
Statut
Membre
-
nicocorico Messages postés 846 Statut Membre -
nicocorico Messages postés 846 Statut Membre -
Bonjour,
J'ai fait beaucoup de recherches sur internet pour trouver un convertisseur Hexadécimal/Binaire/Décimal en Ti-Basic, qui sont malheureusement restées infructueuses.
J'en aurai besoin pour m'aider à faire mon propre programme, car j'ai un projet de MPI à faire qui doit regrouper plusieurs programmes ( calcul de l'aire d'une sphère, équation au 2nd degres ... )
J'ai essayé d'utiliser les fonctions >bin, >hex et >dec mais je n'arrive pas trop à les faire marcher.
Donc j'aimerais soit que vous m'aidiez à trouve un programme de conversion Dec/Bin/Hex, soit que vous m'aidiez à le faire !
J'ai fait beaucoup de recherches sur internet pour trouver un convertisseur Hexadécimal/Binaire/Décimal en Ti-Basic, qui sont malheureusement restées infructueuses.
J'en aurai besoin pour m'aider à faire mon propre programme, car j'ai un projet de MPI à faire qui doit regrouper plusieurs programmes ( calcul de l'aire d'une sphère, équation au 2nd degres ... )
J'ai essayé d'utiliser les fonctions >bin, >hex et >dec mais je n'arrive pas trop à les faire marcher.
Donc j'aimerais soit que vous m'aidiez à trouve un programme de conversion Dec/Bin/Hex, soit que vous m'aidiez à le faire !
A voir également:
- Ti 82 conversion binaire
- Binaire - Guide
- Conversion mb en mo ✓ - Forum Matériel & Système
- Question 1 Mb = ?Mo - Forum Matériel & Système
- Conversion bytes en mo ✓ - Forum Webmastering
- Atomman g7 ti - Accueil - Ordinateurs
7 réponses
Pour convertir une valeur dans n'importe quelle base, il suffit de faire une boucle ainsi :
La boucle donnera la valeur de chaque chiffre du plus faible au plus fort quelle que soit la base, 2 (binaire), 8 (octal), 10 (décimal), 16 (héxa) ou exotique...
S'il s'agit de convertir la valeur en visuel, il suffit d'ajouter 48 (caractère '0') à chaque valeur de chiffre, et dans le cas de l'héxa, 65 (caractère 'A') si la valeur dépasse 9.
L'opération peut être facilement optimisée avec des 'And' et des décalages dans le cas des bases binaire, octal, et héxa.
Et pour reconstituer une valeur à partir de n'importe quelle base, il suffit de faire l'opération inverse :
Tant que valeur est > 0 : Chiffre = Valeur modulo base Valeur = valeur divisée par base
La boucle donnera la valeur de chaque chiffre du plus faible au plus fort quelle que soit la base, 2 (binaire), 8 (octal), 10 (décimal), 16 (héxa) ou exotique...
S'il s'agit de convertir la valeur en visuel, il suffit d'ajouter 48 (caractère '0') à chaque valeur de chiffre, et dans le cas de l'héxa, 65 (caractère 'A') si la valeur dépasse 9.
L'opération peut être facilement optimisée avec des 'And' et des décalages dans le cas des bases binaire, octal, et héxa.
Et pour reconstituer une valeur à partir de n'importe quelle base, il suffit de faire l'opération inverse :
Tant que nombre de chiffres > 0 : Valeur = valeur multipliée par base Valeur = Valeur + Chiffre
Le chêne aussi était un gland, avant d'être un chêne
J'ai réellement besoin de réponses, je doit bientôt rendre mon projet !
J'ai réussi à faire un truc mais c'est bof, en effet j'arrive à calculer la réponse mais pas à l'inscrire ( à cause de problèmes de dimensions ) :
Je le répète, j'ai vraiment besoin d'aide ( un roo bisou baveux à celui qui me trouve la solution )
J'ai réussi à faire un truc mais c'est bof, en effet j'arrive à calculer la réponse mais pas à l'inscrire ( à cause de problèmes de dimensions ) :
() Prgm ClrHome Dialog Title "Convertion dec/bin" Request "Nombre décimal",A EndDlog int(A/2)»B A-(B*2)»C int(B/2)»D B-(D*2)»E int(D/2)»F D-(F*2)»G int(F/2)»H F-(H*2)»I int(H/2)»J H-(J*2)»K int(J/2)»L J-(L*2)»M int(L/2)»N L-(N*2)»O int(N/2)»P N-(P*2)»Q int(P/2)»R P-(R*2)»S Text " "&string(S)&""&string(Q)&""&string(O)&""&string(M)&""&string(K)&""&string(I)&""&string(G)&""&string(E)&""&string(C)&" " Disp "Nombre Binaire",NB ClrHome Goto bin EndPrgm
Je le répète, j'ai vraiment besoin d'aide ( un roo bisou baveux à celui qui me trouve la solution )
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question