HP 48SX Gebruikershandleiding pagina 129
Deel ii
Lo
ROT ROT
GETI 4 ROLL DUP2
IF
> 18 FS? XOR
THEH
SHAP
EMD
DROP
UNTIL
-64 FS?
END
SWAP DROP 8 MEHU
Begint de DO lus.
Plaatst de index en de matrix in
niveaus 1 en 2.
Neemt het nieuwe matrix element,
verplaatst het huidige kleinste of
grootste matrix element van niveau 4
naar niveau 1. Kopieert vervolgens
beide elementen.
Begint de voorwaardelijke lus.
Test de situatie die ontstaat bij de
relatieve waarde van de twee
elementen en de status van vlag 10.
Als het nieuwe element kleineris
dan het huidige grootste element of
groter dan het huidige kleinste...
... wordt het nieuw element in
niveau 1 geplaatst.
Beéindigt de voorwaardelijke lus.
Slaat het huidige kleinste of grootste
element op en wist het andere
elementuit het stapelgeheugen.
Begint de UNTIL clausule.
Test of vlag —64 actiefis. Als vlag
—64 niet actief is, wordt de DO
clausule nogmaals uitgevoerd.
Als vlag —64 actief is, wordt de lus
beéindigd.
Plaatst de index in niveau 1 en wist
deze uit het stapelgeheugen. Gaat
terug naar het vorige menu.
31: Extra programmeervoorbeeiden
615
