6t)~~ - The Sharp MZ-Series

- Kapitel 3 ­
3.3.3 TESTE ••• WENNWAHR ••• WENNFALSCH •••
- TESTE
Der Befehl TESTE hat in LOGO die gleiche Aufgabe, wie die Befehlsfolge
WENN ••• DANN ••• SONST. Er steht immer in Verbindung mit mindestens einem der
Befehle WENNWAHR und WENNFALSCH. TESTE testet, ob etwas WAHR oder FALSCH
ist. AlP - LOGO merkt sich das Ergebnis bis zum erneuten Aufruf von TESTE.
- WENNWAHR (kurz: WW)
- WENNFALSCH (kurz: WF)
Die Restzeile hinter dem Befehl WENNWAHR wird nur ausgeführt, wenn das
letzte Prüfergebnis WAHR war. Ebenso wird die Restzeile hinter WENNFALSCH
nur ausgeführt, wenn das letzte Testergebnis FALSCH war. Die Befehle
WENNWAHR und WENNFALSCH beziehen sich also immer auf den letzten Aufruf von
TESTE.
Die Prozedur ZAEHLE3 könnte mit dem Befehl TESTE so aussehen:
PR ZAEHLE3 :ZAHL
DRUCKZEILE :ZAHL
TESTE :ZAHL = 0
WENNFALSCH ZAEHLE :ZAHL - 1
ENDE
Es ist möglich, das Prüfergebnis von TESTE mehrmals zu verwenden. Dieses
Ergebnis bleibt bis zum nächsten TESTE-Aufruf erhalten. Dies gilt auch,
wenn sich die Abfrage (WENNWAHR/-FALSCH) in einer anderen Prozedur befindet.
Nun zu einer weiteren Programmiertechnik:
Wir können die Prozedur ZAEHLE4 auch "rückwärts-rekursiv" schreiben. Das
bedeutet, daS - trotz der Bearbeitung der Zahlen rückwärts - die Zahlen
vorwärts ausgedruckt werden. Dies klingt sehr trocken. Doch wenden wir uns
einem Beispiel zu:
PR ZAEHLE4 :ZAHL
WENN :ZAHL > 0 DANN ZAEHLE4 :ZAHL - 1
DZ :ZAHL
ENDE
?ZAEHLE4 4
o
1
2
3
4
? ••
AlP - LOGO Seite 50