Dieser Anhang bietet eine kurze Übersicht über die Befehle des Commodore VC-20 BASIC V2. Er ist nicht als Lehrbuch gedacht, sondern soll dazu dienen lange ungenutztes Wissen wieder aufzufrischen.
Falls Sie ein Lehrbuch für BASIC benötigen, sollten Sie einen Blick auf das original VC-20 Handbuch werfen. Es ist (in englischer Sprache) als e-Text bei Project64 (http://project64.c64.org) verfügbar. Viele weitere Texte in anderen Sprachen (u.a. Deutsch) sind bei iDoc (http://www.softwolves.pp.se/idoc/) verfügbar.
Nur die ersten ZWEI Zeichen eines Variablennamen sind signifikant. 'CO', 'COCOS' und 'COLLOSEUM' (nicht aber 'C' und 'CA') sind daher gleichwertige Bezeichnungen für ein und die selbe Variable. Zusätzlich zu den zwei Zeichen wird noch die Typinformation zur Unterscheidung zwischen Variablen herangezogen. Somit sind 'CO', 'CO%' und 'CO$' gleichzeitig und unterscheidbar nutzbar.
FOR...TO...STEP...NEXT - Der einzige echte Schleifen-Befehl in BASIC-
Syntax:
FOR <Var> = <Start> TO <Ende> [STEP <Size>]
<Loop Code>
NEXT [<Var>]
Beispiele:
FOR I=1 TO 5: PRINT I;: NEXT -> 1 2 3 4 5
FOR I=1 TO 5 STEP 2: PRINT I;: NEXT -> 1 3 5
FOR I=5 TO 1 STEP -2: PRINT I;: NEXT I -> 5 3 1
FOR I=3 TO 1: PRINT I;: NEXT -> 3 (!)
IF...THEN - Bedingte Programmausführung-
Anmerkung: Es gibt kein
ELSE oder ENDIF
Syntax:
IF <Condition> THEN <Statements> oder
IF <Condition> GOTO <LineNr> oder
IF <Condition> THEN <LineNr>
Beispiel:
100 IF A < B THEN MN = A: GOTO 120
110 MN = B
120 ....
GOTO oder GO TO - Unbedingter Sprung-
Syntax:
GOTO <LineNr> oder
GO TO <LineNr>
GOSUB - Unbedingter Sprung in ein Unterprogramm-
Anmerkung: Es ist nicht möglich formale Parameter an ein Unterprogramm zu übergeben. Alles muß mit globalen Variablen gemacht werden.
Syntax:
GOSUB <LineNr>
Beispiel:
10 PRINT "Hauptprogramm"
20 GOSUB 100
30 PRINT "Wieder Hauptprogramm"
40 GOSUB 100
50 PRINT "Noch einmal Hauptprogramm"
60 END
100 PRINT "Dies ist das Unterprogramm"
110 RETURN
RETURN - Ende des Unterprogramms-
Syntax:
RETURN
Beispiel:
Siehe GOSUB
ON...GOTO oder ON...GOSUB - Mehrweg Verzweigung-
Syntax:
ON <IntegerExpr> GOTO <LineNr1>, <LineNr2> ... oder
ON <IntegerExpr> GOSUB <LineNr1>, <LineNr2> ...
Beispiel:
ON X GOTO 100, 200, 300
Dies ist gleichwertig zu:
IF X = 1 THEN GOTO 100
IF X = 2 THEN GOTO 200
IF X = 3 THEN GOTO 300
DEF FN- Definition einer BASIC Funktion/Subroutine-
Syntax:
DEF FN <Name>(<Param>) = <Single Line Expression>
Beispiel:
DEF FN SI(X) = SIN(X)/X
FN SI(π/3) -> 0.826993343
LOAD - Lädt ein Programm von Diskette oder Band-
Syntax:
LOAD <FileName> [, <Device> [, <SecondDev>]]
Beispiele:
LOAD "SuperGame", 8, 1 -> Absolutes Laden from Disk #8
LOAD "*", 9 -> Lädt das erste Programm von Disk #9
LOAD "", 1 -> Lädt das erste Progamm von Band (#1)
SAVE - Speichert ein Programm auf Diskette oder Band-
Syntax:
SAVE <FileName> [, <Device> [, <SecondDev>]]
Beispiel:
SAVE "SuperGame", 8 -> Speichern auf Disk #8
Um eine bestehende Datei auf einer Diskette zu überschreiben, muß dem Dateinamen ein '@' vorangestellt werden.
Beispiel:
SAVE "@SuperGame",8 -> Speichern auf Disk #8, die bestehende Datei dieses Namens wird überschrieben.
VERIFY - Prüft ob ein Programm im Speicher und auf Diskette oder Band identisch ist.-
Es werden keine Veränderungen durchgeführt.
Syntax:
VERIFY <FileName> [, <Device> [, <SecondDev>]]
Beispiel:
VERIFY "SuperGame", 8 -> Prüft SuperGame auf Disk #8
VERIFY "*", 9 -> Prüft das erste Programm auf Disk #9
VERIFY "", 1 -> Prüft das erste Programm auf Band #1
OPEN - Öffnet eine Datei-
Syntax:
OPEN <FileID>, <Device> [, <SecondDev> [, <FNameMode>]]
Die <SecondDev> ist eine optionaler Parameter im Bereich 0-15 mit folgender Bedeutung: 0..Reserviert für LOAD, 1..Reserviert für SAVE, 2-14..Frei verfügbar für den Zugriff auf Benutzerdateien, 15..Befehls-/Error Channel.
<FNameMode> verwendet das Format: "<FileName> [,<FileType> [,<AccessMode>]]" wobei <FileType> entweder P (Program), S (Sequential), L (Relative) oder U (User) ist und <AccessMode> entweder R (Read), W (Write) oder A (Append) oder die Anzahl von Bytes/Record für eine relative Datei ist.
Beispiele:
OPEN 1, 4 -> Öffnet eine Ausgabedatei für Drucker #4
OPEN 1, 8, 2, "My File,P,R" -> Öffnet eine Programmdatei zum Lesen
OPEN 1, 8, 2, "My File,S,W" -> Öffnet eine sequentielle Datei zum Schreiben
OPEN 1, 8, 2, "My File,L,"+CHR$(40) -> Öffnete eine relative Datei mit 40 Bytes/Record
OPEN 1, 8, 15 -> Öffnet den Befehls-/Fehlerkanal von Disk #8
CLOSE - Schließt eine Datei-
Syntax:
CLOSE <FileID>
Beispiel:
CLOSE 1
GET# - Liest ein Zeichen aus einer Datei-
Syntax:
GET# <FileID>, <VarName>
Beispiel:
GET#1, A$
Beachten Sie, daß zwischen 'GET' und '#' kein Leerzeichen steht.
INPUT# - Liest Daten aus einer Datei-
Syntax:
INPUT# <FileID>, <VarName> [, <VarName>...]
Beispiel:
INPUT#1, EN$, ER$, TR$, SC$
Beachten Sie, daß zwischen 'INPUT' und '#' kein Leerzeichen steht.
PRINT# - Schreibt Daten in eine Datei-
Syntax:
PRINT# <FileID>, <Data>
Beispiel:
PRINT#1, "Power20"
Beachten Sie, daß zwischen 'PRINT' und '#' kein Leerzeichen steht. Vorsicht: ?# ist NICHT das Gleiche wie PRINT#, auch wenn beide im Listing gleich aussehen.
CMD - Umlenkung von Standard Output (Standard Input ist nicht betroffen)-
Syntax:
CMD <FileID> [, <Message>]
Beispiel:
OPEN 1, 4 : REM Öffnet Datei#1 für Drucker #4
CMD 1 : REM Datei#1 wird Standard Output
PRINT "Beliebiger Text"
PRINT "Mehr Text"
PRINT#1 : REM CMD 1 rückgängig machen
CLOSE 1
ST- Device Status (Vordefinierte Variable)-
ST = 0 .. Device Ok
Bit 6: 1 .. End of File
Bit 7: 1 .. Device Not Present
READ - Liest statische Daten aus DATA Befehlen im Programm-
Syntax:
READ <Var> [, <Var>...]
Beispiel:
10 RESTORE
20 READ X$
30 PRINT X$;
40 S = 0
50 FOR I=1 TO 3
60 READ X
70 S = S + X
80 NEXT I
90 PRINT S
100 DATA "Power", 12, -15, 23
RESTORE - Setzt den Zeiger auf das nächste DATA Element auf das erste DATA Statement im Programm-
Syntax:
RESTORE
Beispiel:
Siehe READ
DATA - Speichert statische Daten-
Syntax:
DATA <Data> [, <Data>...]
Beispiel:
Siehe READ
LET - Zuweisung-
Syntax:
LET <Variable> = <Wert>
Beispiel:
LET A = 6.25
Anmerkung: Das Schlüsselwort LET ist nicht erforderlich. <Variable> = <Wert> allein reicht auch. LET macht alles nur langsamer -> Verwenden Sie es nicht!
DIM - Array Deklaration-
Syntax:
DIM <Name>(<Size> [, <Size>...])
Beispiel:
DIM A(7) -> Ein Array mit 8(!) Elementen mit Indizen [0..7]
DIM B$(4,5) -> Ein Array mit 30(!) Strings
Zugriff auf die Elemente:
A(3) = 17 : B$(2,3) = "Power20"
+, -, *, /, ^ - Arithmetische Operatoren-
Beispiel:
9 + 5 * (15 - 1) / 7 + 2^4 -> 35
<, <=, =, <>, >=, > - Vergleichs-Operatoren-
Beispiele:
3 <> 6 -> -1 (TRUE)
3 > 4 -> 0 (FALSE)
SIN - Sinus (Argument in Radians)-
Syntax:
SIN(<Value>)
Beispiel:
SIN(π/3) -> 0.866025404
COS - Cosinus (Argument in Radians)-
Syntax:
COS(<Value>)
Beispiel:
COS(π/3) -> 0.5
TAN - Tangens (Argument in Radians)-
Syntax:
TAN(<Value>)
Beispiel:
TAN(π/3) -> 1.73205081
ATN - Arcus Tangens (Result im Bereich [-π/2 .. π/2])-
Syntax:
ATN(<Value>)
Beispiel:
ATN(1) -> 0.785398163 ( = π/4)
EXP - Exponent (ex mit e = 2.71828183...)-
Syntax:
EXP(<Value>)
Beispiel:
EXP(6.25) -> 518.012825
LOG - Natürlicher Logarithmus-
Syntax:
LOG(<Value>)
Beispiel:
LOG(6.25) -> 1.83258146
SQR - Quadratwurzel-
Syntax:
SQR(<Value>)
Beispiel:
SQR(6.25) -> 2.5
ABS - Absolutwert-
Syntax:
ABS(<Value>)
Beispiele:
ABS(-6.25) -> 6.25
ABS(0) -> 0
ABS(6.25) -> 6.25
SGN - Sign (Vorzeichen)-
Syntax:
SGN(<Value>)
Beispiele:
SGN(-6.25) -> -1
SGN(0) -> 0
SGN(6.25) -> 1
INT - Integer (Runden auf die größte ganze Zahl, kleiner oder gleich dem Argument)-
Syntax:
INT(<Value>)
Beispiele:
INT(-6.25) -> -7 (!)
INT(-5) -> -5
INT(0) -> 0
INT(5) -> 5
INT(6.25) -> 6
RND - Zufallszahl im Bereich [0.0 .. 1.0]-
Syntax:
RND(<Seed>)
Wenn (<Seed> < 0) wird der Zufallszahlengenerator initialisiert.
Beispiele:
RND(-625) -> 3.85114436E-06
RND(0) -> 0.464844882
RND(0) -> 0.0156260729
- + - Strings aneinanderhängen
-
Beispiel:
"Pow" + "er20" -> "Power20"
<, <=, =, <>, >=, > - Vergleichsoperatoren-
Beispiele:
"Power20" < "VC-20"-> -1 (TRUE)
"Alpha" > "Omega" -> 0 (FALSE)
LEN - Stringlänge-
Syntax:
LEN(<String>)
Beispiel:
LEN("Power20") -> 7
LEFT$ - Linker Teilstring-
Syntax:
LEFT$(<String>, <Len>)
Beispiel:
LEFT$("Power20", 5) -> "Power"
RIGHT$ - Rechter Teilstring-
Syntax:
RIGHT$(<String>, <Len>)
Beispiel:
RIGHT$("Power20", 5) -> "wer20"
MID$ - Teilstring aus der Mitte eines String-
Syntax:
MID$(<String>, <Start>, <Len>)
Beispiel:
MID$("Power20 for Macintosh", 13, 3) -> "Mac"
/* -- 123456789012345678901 -- */
STR$ - Wandelt eine Zahl in einen String-
Syntax:
STR$(<Value>)
Beispiele:
STR$(6.25) -> " 6.25"
STR$(-6.25) -> "-6.25"
VAL - Wandelt einen String in eine Zahl-
Syntax:
VAL(<String>)
Beispiele:
VAL("6.25") -> 6.25
VAL("6xx25") -> 6
VAL("x6x25") -> 0
ASC - ASCII Code des ersten Zeichens eines Strings-
Syntax:
ASC(<String>)
Beispiele:
ASC("P") -> 80
ASC("Power20") -> 80
CHR$ - Character zu einem gegebenen ASCII Code-
Syntax:
CHR$(<Value>)
Beispiel:
CHR$(80) -> "P"
