début bien difficile sur HP 50G !

[C.Ret]

[...] je cherche à créer une liste contenant chacun des caractères d’une chaine.

Il y encore une façon de faire:

Code : Tout sélectionner

« DUP SIZE -> P s
   « 1 s FOR i
            P i i SUB
         NEXT
     s ->LIST
   »
»

On entre la chaine en ligne 1: et ce code la transforme en une liste des caractères la constituant.


La question que je me pose, quel est l'intérêt. Pourquoi ne pas directement travailler à partir de la chaine de caractères qui est une forme particulière de liste ?

LST i GET permet d'obtenir le i-ième élément de la liste LST
PRO i i SUB permet d'obtenir le i-ième caractère de la chaine de caractères PRO

LST SIZE done le nombre d'élément d'ue liste
PRO SIZE donne le nombre de caractères

Dans les deux cas + sert d'opérateur de concaténation,
etc...

Il doit bien être possible d'utiliser la chaine de caractère directement non ?

[patt]

Merci pour ces deux exemples.

Pourquoi utiliser une liste ? Car ma connaissance du RPL étant très limitée, cela me paraissait plus simple… Mais ma maitrise du maniement des chaînes de caractères progressant, je n’en suis plus très sûr.

Dans tous les cas, j’apprends…

[tyann]

Bonjour à tous
Voici ma petite contribution, pour ma part j'ai utilisé SEQ qui permet de créer une liste depuis une expression.

Code : Tout sélectionner

<< -> s
  <<
    << s n n SUB
    >> 'n' 1 s SIZE 1 SEQ
  >>
>>

Pourquoi utiliser une liste ?

Pour trier une chaine de caractères par ordre alphabétique par exemple:
on la convertit en Liste puis on utilise SORT, et enfin on la remet sous forme de chaine avec ∑LIST .

[C.Ret]

AH, oui ! Bien !

J'avais pas pensé aux fonctions de TRI. Bien vu ! J'imaginais un truc plus compliqué avec des listes servant d'indexages indirects ou de références croisées, etc.

Moi aussi j'apprends ...


C'est sûr les listes c'est bien utile, surtout qu'une liste peut contenir des éléments de types diffèrents voir même d'autres listes. Ce qui revient à faire de arbres ou une forme d'hiérarchisation...
Choses bien compliquées à faire à l'aide de chaines de caractère (ou de vecteurs).

[patt]

Belle utilisation des listes, en effet !

Sinon, Concernant les chaînes de caractères, existe-t-il une fonction pour rechercher la position d’un caractère à partir d’une position donnée ?

Actuellement, je m’en sors avec le code suivant, sachant que :

CAR contient le caractère à rechercher
PRO la chaîne
PC le numéro où commence la recherche.

Code : Tout sélectionner

<<PRO PC 
DO PRO PC DUP SUB ‘PC’ INCR DROP
UNTIL CAR ==
END
PC 2 – SUB>>

Avec PRO=”ABC123:”
CAR=”:”
PC=4
J’obtiens sur la pile “123”.

[bernouilli92]

Ton exemple n'est pas clair par rapport à ce que tu demandes.
Ton programme renvoie une chaîne de caractères et non une position.

La fonction POS renvoie la position d'une chaîne dans une autre.
Voici un exemple de fonction POSN qui renvoie la position d'une chaîne dans une autre mais en commençant la recherche à partir d'une certaine position.

Code : Tout sélectionner

<<
  1 MAX
  ROT OVER 1E9 SUB ROT POS
  IF DUP THEN 1 - + ELSE DROP2 0 END

Exemples :
"ABC123DEF123" "1" 5 -> 10
"ABC123DEF123" "B" 4 -> 0
"ABCDEF" "4" 2 -> 0


Par ailleurs, la manière "naturelle" de passer des arguments à un programme en RPL est d'utiliser la pile et non des variables.

[patt]

Un peu fatigué, hier soir (désolé).

J’emploie des variables car j’ai encore du mal à n’utiliser que la pile, même si j’aime bien le principe…

Merci pour ton aide et ton indulgence.

[Paul Tergeist]

Moi aussi les listes c'est pas mon fort. Pourtant elles deviennent de plus en plus pratiques sur pockets.

[tyann]

Salut Paul

Moi aussi les listes c'est pas mon fort.

Si c'est pas Monfort, c'est Labeyrieux
En ces moments de fêtes

[Paul Tergeist]

Je crois que j'ai vraiment une très mauvaise influence sur les membres de ce forum.

[doum-doum]

Et cela depuis 1664

[patt]

Trèves de plaisanteries, revenons à un peu plus sérieux…
Comment éteindre l’indicateur « HLT » suite à l’utilisation de l’instruction HALT ?

[gege]

KILL
G.E.

[bernouilli92]

Ou CONT pour continuer le programme.

[patt]

Bien merci, sinon à partir du code touche renvoyé par KEY comment obtenir le nom de la touche pressée ? (à la façon de CHR pour les codes ascii)