Forum

Catégorie : Support
Forum : TI-82 STATS.fr
Vues : 1386
Réponses : 9
Type : discussion
Etat : réponses autorisées
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.

Convertir un reel

-Coco- le 27/10/2010 à 17:39
Bonjour à toutes et à tous.
'ai un petit problème, et certains connaissent probablement mieux leur Ti 82 stats fr que moi.
Voilà, dans un programme (gardé secret actuellement godgrace.gif ) j'ai besoin de convertir un réel en une chaîne de caractères.

exemple :
J'ai A qui vaut 26.
Je veux donc une chaîne qui vaut "26"

Existe-t-il une fonction pour ça ?
Ou bien suis-je obligé de ruser en me faisant chier avec un programme de 10 lignes ?

Merci d'avance,
-Coco-
Sangohan38 le 27/10/2010 à 17:48
Je ne comprend pas exactement ce que tu veux faire. Tu veux que la valeur de A soit mise dans une chaine c'est sa?
Si c'est sa, tu doit passer par les 10 lignes de programme.

Sangohan38
Persalteas le 27/10/2010 à 18:00
tiens c'est bizzare j'ai eu exactement besoin de la mème chose il y a pas longtemps pour un programme également secret.
si ça se trouve, on bosse sur la même chose.


je te dis quand même que j'ai rien trouvé, par contre dans l'autre sens ça ce fait (de chaine vers variable numérique).
-Coco- le 27/10/2010 à 18:35
Bon, ben c'est bien ce que je pensais...
le programme va mesurer quelques octets de plus ^^'
Persalteas le 27/10/2010 à 18:49
quelles sont les 10 lignes de programme dont parle sangohan?
-Coco- le 27/10/2010 à 19:42
Un truc qui convertit une variable en chaîne.
genre qui découpe la variable dans une liste, puis qui récupère chaque bout de la liste et l'associe avec une sous-chaîne pour obtenir au final une chaîne où le nombre est écrit.
genre :
-nombre en entrée (ex : 125)
-découpage en liste (ex : {1,2,5})
-recherche dans une chaîne pour que 1 = "1", etc
-ptites corrections de bugs
-chaîne en sortie (ex : "125")

c'est l'algo de mon programme OTOSTR qui convertit la variable O en chaîne. donc dans le programme on obtient :
:A>O
:prgmOTOSTR
ce qui revient à récupérer la chaîne de A.

Et ensuite, de mon côté le programme ultrasecret est un programme qui convertit une image en code pur et dur. (en temps direct)

genre sur le programme tu choisis "Ligne", tu choisis x1,y1,x2,y2 avec des "Input" tous seuls, puis ça te trace une ligne sur ton écran et en même temps entre dans la chaîne 1 : chaîne1 + "Ligne(X1(/i],[i]Y1,X2,Y2):" -> chaîne 1

ça sera utile genre pour les écrans de démarrage un peu complexes ou on est trop radins pour sauvegarder une image (y'a d'autres fonctions, comme FillREct etc)

Et tout ça en basic ! (c'est pas du gâteau!)
linkakro le 27/10/2010 à 21:01
Voici un programme qui remplit cette fonction pour les entiers naturels.
J'aurais dû le faire plus tôt, cette question de conversion me rend dingue depuis très longtemps.
Code
Prompt A
" "ü ( ) Str1
1ü ( ) B
0ü ( ) W
"0123456789"ü ( ) Str2
While int(A*10^ú ( ) W
W+1ü ( ) W
int(10fPart(A*10^ú ( ) W)ü ( ) B
sub(Str2,B+1,1)+Str1ü ( ) Str1
End
Disp Str1

Edit: il y a un bug quand il y a un zéro
Edit: bug corrigé
Sangohan38 le 27/10/2010 à 22:04
Pourquoi tu met pas le 0 à la fin de ta chaine? Ça enlèvera peut-être ton bug et ça ne change pas grand chose.

Sangohan38
linkakro le 28/10/2010 à 20:57
Non, le bug n'a rien à voir avec ça.
Je l'ai corrigé, je vais l'éditer.
linkakro le 01/11/2010 à 00:50
Ce programme gère tous les réels en écriture normale.
Code
Prompt C
abs(Cü ( ) A
"."ü ( ) Str1
"0123456789"ü ( ) Str2
0ü ( ) W
While iPart(Aý^ ( ) (ú ( ) W
W+1ü ( ) W
iPart(10fPart(Aý^ ( ) (ú ( ) Wü ( ) B
sub(Str2,B+1,1)+Str1ü ( ) Str1
End
0ü ( ) W
While fPart(Aý^ ( ) (W
iPart(10fPart(Aý^ ( ) (W)ü ( ) B
Str1+sub(Str2,B+1,1)ü ( ) Str1
W+1ü ( ) W
End

If not(fPart(A)) and length(Str1)>1
sub(Str1,1,length(Str1)-1)ü ( ) Str1
If C=0
"0"ü ( ) Str1
If C<0
"ú ( ) "+Str1ü ( ) Str1

Disp Str1
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.