[AXE]Number input en Axe ?

Quel problème pour les 90% des programmeurs Axe que les entrées utilisateurs... Aujourd'huis nous allons voir comment faire un number input en Axe.

Commençons par le début, la syntaxe de la commande input est celle la :input->A qui enregistre une chaine de caractere ascII a l'adresse A... A sera don utiliser ici comme un pointeur.

premières lignes de code :

Code:


:.INPUT
:input->A


Une fois cela fais nous savons que le numéro des caractère des chiffres de 0 a 9 sont 48,49,50....

Une fois cela su il est facile de faire un number input a UN seul chiffre :

Code:


:.INPUT
:input->A
:0->B
:for(Y,0,9)
:If {A}=(Y+48)
:B+Y->B
:End
:End
:output(0,0,B>Dec)


Le problèmes maintenant c'est d'y insérer plusieurs chiffres donc de faire un number input pour les nombres et non les chiffres...

La technique va être relativement similaire il faut juste y intégrer une seconde boucle qui parcours tout les octets de {A} et qui les test tous après il ne nous reste plus qu'a ajouter le numéro de l'octets ( multiplier par 10 selon la place ) a B exemple :

on prends 567

c'est donc egale a (7)+(6*10)+(5*100)

Intégrons ceci a un algorithme :

Code:


:.INPUT
:input->A
:0->B+1->K
:for(X,0,lenght(A)-1)
:for(Y,0,9)
:If {X+A}=(Y+48)
:Y*K+B->B //ajoute le nombre selon le tokens et selon la place dans la chaîne
:K*10->K //multiplie par 10 pour avoir le numéro suivant dans la chaîne
:End
:End
:End
:output(0,0,B>Dec)


Et voila notre code est finis.... quoique non, testez le et que voyez vous ? tout les chiffres sont a l'envers... pour corriger ce problèmes il suffit de lire les octets depuis la fin de la chaîne :

Code:


:.INPUT
:input->A
:0->B+1->K
:for(X,0,lenght(A)-1)
:for(Y,0,9)
:If {length(A)-1-X+A}=(Y+48)
:Y*K+B->B //ajoute le nombre selon le tokens et selon la place dans la chaîne
:K*10->K //multiplie par 10 pour avoir le numéro suivant dans la chaîne
:End
:End
:End
:output(0,0,B>Dec)


Et la tout devrais marcher !

puis en version optimisé en nombre de ligne (6):

Spoiler:

et en version optimiser en taille sur la calculatrice :

Spoiler:

Tu appelles "version optimisée" un code où je vois Output(0,0,B>Dec) et des For qui ne sont pas des For(const) ? [Vous devez être inscrit et connecté pour voir cette image]
Sinon, bonne idée ce tuto, ça pourrait aider les débutants [Vous devez être inscrit et connecté pour voir cette image]

Je compte y ajouter un input pour les letttre, les liste... et tout ce qu'on peut faire en basic je completerais Et je n'avais pas vu cette optimisation en copier coller.

Fiouuu... C'est vraiment compliqué, l'Axe.

Et je trouve la syntaxe...bizarre. ( --notroll )

Bah c'est du bas niveau quand meme l'axe meme si c;est pas aussi bas que l'asm ou l'hexa. apres non c'est pas extrenement compliquer quand meme mais je compte faire un tutorial identique pour l'input des liste,chaine,matrice... en gros toute ce qu'on peut faire ne basic.