OBJ
Diese Befehle errechnen Q und setzen einen „Tag" auf Q. Befindet sich aber
der Wert 0 in Stack-Ebene 1 (was der Fall ist, wenn @CANCEL beim Verwenden
der Eingabemaske gedrückt wird), springt das Programm zu den Befehlen:
Diese Befehle erzeugen die Meldung, dass die Operation abgebrochen wurde.
Anmerkung: Die Funktion MSGBOX gehört zu einer Sammlung von
Ausgabefunktionen im Menü PRG/OUT. Die Befehle IF, THEN, ELSE, END
finden Sie im Menü PRG/BRCH/IF. Die Funktionen OBJ ,
sich im Menü PRG/TYPE. DROP steht unter PRG/STACK zur Verfügung. Die
Funktionen
und
Beispiel 2 – Um die Verwendung des 3. Eintrages (Informationen zum
Feldformat) der Argumente für die Funktion INFORM zu illustrieren, ändern Sie
die leere Liste des Programms INFP1 in { 2 1 }. Dies bedeutet, dass nur 2
Spalten anstelle der Standardvorgabe von 3 und nur 1 Tab-Stopp verwendet
werden. Speichern Sie dieses neue Programm in der Variable INFP2:
«
" CHEZY'S EQN" { { "C:" "Chezy's coefficient" 0} { "R:"
"Hydraulic radius" 0 } { "S:" "Channel bed slope" 0} } { 2 1 } {
120 1 .0001} { 110 1.5 .00001 }
R S 'C*(R*S)'
»
END
Starten Sie das Programm @INFP2, erhalten Sie die folgende Eingabemaske:
DROP
C R S 'C*√(R*S)'
"Operation cancelled" MSGBOX
NUM finden Sie auf der Tastatur.
NUM "Q"
TAG ELSE "Operation cancelled" MSGBOX
NUM "Q"
INFORM IF THEN OBJ
TAG
TAG befinden
DROP
C
Seite 21-33