[TI-Basic] String2Upper, le programme qui transforme les minuscules en majuscules

Hello !

Voici un programme qui transforme les minuscules en majuscules.
Pour l'utiliser, mettez votre de chaîne de caractères dans Str1, et hop, la conversion !

Par contre trois trucs à préciser :

-> c'est très lent
-> les accents ne sont pas gérés
-> j'ai trouvé un moyen de le rendre moins lent mais j'avais déjà uploadé le programme

Voilà !

Code:

" →Str2
For(Y,1,length(Str1
sub(Str1,Y,1→Str3
inString("abcdefghijklmnopqrstuvwxyz",Str3
If Ans
Then
Str2+sub("ABCDEFGHIJKLMNOPQRSTUVWXYZ",Ans,1→Str2
Else
Str2+Str3→Str2
End
End
sub(Str2,2,length(Str1→Str1

(optimisé par linkakro)

ça, c'est bien !

Mais tu devrais le poster sur Tout 82, vu le nombre de gens qui cherchent a adapter des 8xp pour 82 stats.

oui c'est une bonne idée

ce programme est pas si mal meme si je pense que tu aurais pu le faire en plus petit, il ne m'a pas l'air optimiser mais bon c'est deja super bien

Oh, ne vous dérangez pas pour l'optimiser, je l'ai fait vite fait, donc c'est sûrement pas parfait.
(notamment pour la fluidité)

Et oui, je le posterai sur Tout82.

fait le autrement tu a mille facon de le reprogrammer surtout que la bah tu as mis plein de if et deux for alors que un seul aurait suffit...

Comment ça ? Explique un peu mieux...

bah pourquoi tu as mis une boucle de recherche de la lettre dans la chaine ? il y a bien plus simple...

Bah vas-y dis...

mince je pensais "axe" y'a aucune commande de recherche de tokens en basic ?

Bah il y a instring( ca recherche les tokens pourquoi ?

Il faut s'affranchir de la contrainte des chaines vides, mais les If ne me paraissent pas une bonne méthode. Je préfère générer une nouvelle chaîne progressivement.
D'autre part je ne pense pas qu'une boucle de recherche soit nécessaire lorsque inString existe.

Code:

" →Str2
For(Y,1,length(Str1
sub(Str1,Y,1→Str3
inString("abcdefghijklmnopqrstuvwxyz",Str3
If Ans
Then
Str2+sub("ABCDEFGHIJKLMNOPQRSTUVWXYZ",Ans,1→Str2
Else
Str2+Str3→Str2
End
End
sub(Str2,2,length(Str1→Str1

persalteas a écrit:Mais tu devrais le poster sur Tout 82, vu le nombre de gens qui cherchent a adapter des 8xp pour 82 stats.

Ce programme traîte des chaînes de caractère, pas des programmes alors je ne vois pas bien comment cela permettrait de traduire un 8xp.

Aké, je vois que... c'est optimisable

[hs]

Pourquoi le message de Linka est-il vert?

[/hs]

Au Grec:parce que celui qui a lancé ce topic lui dit merci!
Mais...il n'y a pas de minuscules sur les z80?
A moins d'avoir un shell ou je ne sais quoi

Il y a des minuscules à partir de la 83+.

Et théoriquement, il n'y a pas besoin de shell. Lorsque tu achètes ta 83+.fr et que tu la mets en français, les minuscules sont présentes dans Catalog, Caractères (le premier choix) quand tu appuies deux fois sur alpha. Les shells et autres ne font que créer un hook pour étendre les minuscules à l'ensemble de la calculatrice.

voila linkaro a fait exactement ce que je pensais je l'aurais programmé de même

la fonctions de recherche en basic c'est instring comme il l'a si bien dit

moi je me demande pourquoi sur la 83+ et la 84+ on ne peut pas mettre de minuscule sans programme ?

Avec un code hexadécimal on peut. Mais ça reste un programme à compiler.
Perso j'utilise Axe, qui dans ses options nous permet d'activer (ou non) les minuscules.

nan mais merci je connais 30 moyen d'y arriver

mais pourquoi mettre les minuscule sans les activer ?

Ce programme traîte des chaînes de caractère, pas des programmes alors je ne vois pas bien comment cela permettrait de traduire un 8xp.

Effectivement.

bah on met tout le programme dans une chaine et sa nous le traduit

il faudrait sa marcherais je pense

J'ai pensé à faire comme CMD mais je ne pense pas que ce soit plus facile de changer un programme en chaîne que de traduire soi-même les lettres : il faut utiliser la calculatrice ou un éditeur pour supprmmer tous les sauts de lignes et les remplacer par ":", mais aussi refermer tous les guillemets de fin de ligne. (des maniaques de mon genre ne referment pratiquement jamais leurs fonctions)
En plus les labels ne fonctionnent pas lorsqu'ils ne sont pas sur une ligne isolée. Donc encore une manipulation de plus...

il faut faire un programme qui le fait enaxe peut etre j'y reflechirais...

Cela me semble facile en Axe : la structure peut très bien être similaire, mais utiliser inData, un pointeur et de purs tokens...
Par contre je ne sais pas si les tokens statistisques a,b,c etc sont les mêmes ou non que les tokens caractères.