Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
ALLGEMEINE ANLEITUNG FeR XBL s 1.~X<br />
Der normale IF ... THEN ... ELSE Befehl. Vor ELSE muß N:" stehen.<br />
Hinter THEN kann z~ar durchaus ein Label stehen (IF ... THEN target),<br />
aber es wird nicht.als ·IF THEN GOTO target" aufgefaßt, sondern als<br />
"IF ... THEN GOSUB target" (siehe COSUB).<br />
IF exptl ... END Ir<br />
Strukturiertes IF ... ELSE IF ... ELSE . .. END IF. Das ELSE IF kann<br />
mehrfach vorkommen, ELSE allein nur einmal, END IF muß immer stehen.<br />
Hinter keinem der IF exp' steht ein THEN. Es wird grundsätzlich maximal<br />
eine der Befehlsfolgen •...• ausgeführt. Wenn die erste Bedingung nicht<br />
zutrifft, wird die nächste geprüft, falls sie zutrifft, wird die dahinter<br />
liegende Befehlsfolge ausgeführt und dann sofort zum END IF gesprungen,<br />
etc.. Wenn keine der Bedingungen zutrifft, wird entweder zum<br />
END Ir gesprungen, oder, wenn ein ELSE vorhanden ist, die Befehlsfolge<br />
-l,-------.h -in-te LELSLaus.g.e.f.ühr..t.-u:a.u.S-es~&_ohtg.ell__Dell-n-it.io.n--ll.ich..t..-k-l-ar<br />
geworden ist: die ELSE IFs müssen nicht immer benutzt werden, das ELSE<br />
auch nicht; IF ... END IF oder IF .. ; ELSE ... END IF ist auch maglich)<br />
Beispiel:<br />
1 INPUT at <br />
2 IF a'=t$D <br />
3 PRINT "CR" <br />
4 ELSE IF a'='$A <br />
5 PRINT ·LINEFEED" <br />
6 ELSE IF at='$C <br />
7 PRINT "CLEAR SCREEN" <br />
8 ELSE <br />
9 PRINT "777 ft <br />
111) END Ir<br />
Wenn man 13 oder $d eingibt, wird "CR", bei 1IIJ oder $a wird<br />
"LINEFEED", bei 12 oder $c wird "CLEAR SCREEN", bei allen anderen<br />
Werten wird "777" ausgegeben.<br />
ALLG( EINE ANLEITUNG FOR XBC S 1,~X<br />
PEEKCexp)<br />
Die entsprechende Funktion zu POKE. PEEK entspricht nicht der Standard<br />
BASIC-Funktion PEEKt<br />
POXE\ exp, exp\l <br />
Wie POKE, nur mit Integer-zahlen. <br />
PEEX\(exp) <br />
Die entsprechende Funktion zu POKE\. <br />
POKEt exp, exptl