130 Hoofdstuk 9: Sprongen en Lussen
Intoetsen (RPN modus) Scherm
gi007
:2
gi008
:1
b
fs
Opmerkingen betreffende het programma in de ALG modus: We zullen het
inkomen invoeren op het scherm alvorens het programma op te starten. We zullen het
vervolgens in R
opslaan zodat het beschikbaar is voor de voorbeelden in het volgende
9
hoofdstuk. Door het inkomen in te voeren op het scherm alvorens het programma op te
starten, zorgen we ervoor dat het in de X-register aanwezig is op het moment dat de :0
instructie op regel 002 wordt uitgevoerd. Deze instructie zal de testwaarde 20.000 in de
X-register plaatsen en (zoals beschreven in Appendix A) het inkomen naar het Y-register
verplaatsen. De ~ instructie op regel 003 zal de getallen in de X en Y-registers
omwisselen (zoals eveneens beschreven in Appendix A): dat wil zeggen dat het inkomen
terug in het X-register en de testwaarde in het Y-register worden geplaatst. Dit is nodig
omdat bij het uitvoeren van of de :2 instructie op regel 007 of de :1 instructie op
regel 009, het getal in het X-register verplaatst wordt naar het Y-register; indien de
~ instructie niet toegevoegd zou zijn, zou de testwaarde van 20.000, in plaats van het
inkomen, in het Y-register aanwezig zijn op het moment dat de b instructie op regel 010
wordt uitgevoerd.
Intoetsen (ALG modus) Scherm
f[
fs
fCLEARÎ
004,43, 33, 007
005,
45
2
006,43, 33, 008
007,
45
1
008,
25
–190,22
007,43, 33, 002
000,
het getal in het Y-register (20.000).
Sprint, indien aan de voorwaarde
voldaan is, naar regel 007.
Roept, indien niet aan de
voorwaarde voldaan is, het
belastingtarief van 25% naar
X-register.
Springt naar programmaregel 008.
Roept het tarief van 20% naar het
X-register.
Berekent de belasting.
Zet de calculator in de uitvoermodus.
(Het scherm toont het resultaat van
het vorige programma).
Zet de calculator in de
programma-invoermodus. (Het
scherm geeft de programmaregel
weer waar de uitvoering
onderbroken werd aan het einde
van het vorige voorbeeld).
Wist het programmageheugen.