home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 10
/
aminetcdnumber101996.iso
/
Aminet
/
misc
/
amag
/
AM9512_2.lha
/
Amiga-E-Kurs
/
Listing2.e
< prev
next >
Wrap
Text File
|
1995-11-19
|
934b
|
34 lines
/* Beispiele, wie man Variablen/Konstanten definiert.
Eine Stringvariable mit Platz für 10 Zeichen */
DEF name[10]:STRING
/* Eine Stringvariable und zwei LONG-Variablen */
DEF name[20]:STRING, a, b
/* Lange Zeilen lassen mit einem Komma in der
nächsten Zeile weiterführen */
DEF name[20]:STRING, a, b,
hilf[10]:STRING
/* Einfache Konstanten beginnen mit CONST und
dürfen nur auf Großbuchstaben und _ bestehen */
CONST ANZAHL = 10
CONST MAXIMAL = ANZAHL+30,
SCHRITT = $20, BITS = %1100
/* Für benannte Aufzählungen bietet sich ENUM an */
ENUM ROT, GRUEN, BLAU, GELB, LILA, SCHWARZ=20
/* Für benannte Bits ist SET recht praktisch */
SET HIRES, LACE, DUALPLAYFIELD, SUPERHIRES
/* Es läßt sich auch sofort ein Wert zuweisen */
DEF a=4:LONG
/* Ein Feld wird mit ARRAY angelegt */
DEF tab[20]:ARRAY OF INT
/* Eine Liste wird analog zum Array definiert */
DEF liste[40]:LIST