RCOMP

RCOMP
Syntax:	RCOMP
Parameter
keine
Einordnung
Typ:	Anweisung
Kontext:	Strukturkontrolle
Aufgabe:	nimmt die letzte Bedingungsklausel erneut auf
Abkürzung:	keine (TSB: rC)
Token:	$64 $46 (100 70)
Verwandte Befehle
ELSE - IF - THEN

Dieser Artikel beschreibt das Simons'-Basic-Schlüsselwort RCOMP.

Typ: Anweisung
Syntax: RCOMP

RCOMP verwendet die letzte Entscheidung einer IF <bedingung> THEN-Konstruktion wieder. Mit diesem Befehl kann man also eine Bedingungsklausel über mehrere Zeilen ausdehnen, ohne den (mitunter aufwendig zu berechnenden) Bedingungsausdruck erneut auswerten zu müssen. Auf RCOMP folgt der Wahr-Zweig der Klausel (der sich auf jeder neuen Zeile unterscheiden kann), worauf (mit ELSE abgetrennt) auf jeder Zeile erneut auch ein Nicht-Wahr-Zweig folgen darf.

Beachten: Sowohl der Wahr-Zweig als auch der Nicht-Wahr-Zweig wird von RCOMP fortgeführt. Alle RCOMP-Zeilen verhalten sich also genauso wie die ursprüngliche Bedingungsklausel (der Bedingungsausdruck wird dabei nicht neu ausgewertet).

Beispiel

10 PRINT "test ";
20 FETCH "jn",1,x$: PRINT
30 IF x$ = "j" THEN PRINT "ja": ELSE: PRINT "nein"
40 RCOMP GOSUB 1000: ELSE: GOSUB 1100
50 PRINT "ende"
50 END
1000 PRINT " zufrieden": RETURN
1100 PRINT " nicht zufrieden": RETURN

Je nachdem, ob der Benutzer "j" oder "n" drückt, erscheint eine andere Antwortausgabe, wenn er "n" drückt, werden z. B. alle ELSE-Zweige behandelt.

Simons'-Basic-Befehle des Commodore 64

$  | %  | @  | ANGL  | ARC  | AT  | AUTO  | BCKGNDS  | BFLASH  | BLOCK  | CALL  | CENTRE  | CGOTO  | CHAR  | CHECK  | CIRCLE  | CMOB  | COLD  | COLOUR  | COPY  | CSET  | DELAY  | DESIGN  | DETECT  | DIR  | DISABLE  | DISAPA  | DISK  | DISPLAY  | DIV  | DOWN  | DRAW  | DUMP  | DUP  | ELSE  | END LOOP  | END PROC  | ENVELOPE  | ERRLN  | ERRN  | EXEC  | EXIT  | EXOR  | FCHR  | FCOL  | FETCH  | FILL  | FIND  | FLASH  | FRAC  | GLOBAL  | GRAPHICS  | HI COL  | HIRES  | HRDCPY  | INKEY  | INSERT  | INST  | INV  | JOY  | KEY  | LEFT  | LIN  | LINE  | LOCAL  | LOOP  | LOW COL  | MEM  | MERGE  | MMOB  | MOB OFF  | MOB SET  | MOD  | MOVE  | MULTI  | MUSIC  | NO ERROR  | NRM  | OFF  | OLD  | ON ERROR  | ON KEY  | OPTION  | OUT  | PAGE  | PAINT  | PAUSE  | PENX  | PENY  | PLACE  | PLAY  | PLOT  | POT  | PROC  | RCOMP  | REC  | RENUMBER  | REPEAT  | RESET  | RESUME  | RETRACE  | RIGHT  | RLOCMOB  | ROT  | SCRLD  | SCRSV  | SECURE  | SOUND  | TEST  | TEXT  | TRACE  | UNTIL  | UP  | USE  | VOL  | WAVE