gramms ändern, werden mit INPUT-Anweisungen eingegeben. Sind die Eingabeda-
ten vor der Ausführung des Programms bekannt, so könnten auch andere READ-
Anweisungen und weitere DATA-Anweisungen
Mit dem folgenden Programm wird eine Datei mit 100 Zahlen erstellt.
100 REMark
ZahLen
110 OPEN...._NEW #6,mdv1_zahLen
120 FOR zahLen
= 1 TO 100
130
PRINT
#6,zahLen
140 END FOR zahLen
150 CLOSE #6
Nach der Ausführung des Programms wird durch Eingabe des folgenden Befehls
geprüft, ob der Dateiname "Zahlen" in dem Inhaltsverzeichnis steht:
DIR mdv1_zahLen
Sie können sich den Inhalt der Datei ohne großen Aufwand auf den Bildschirm aus-
geben lassen. Geben Sie zu diesem Zweck ein:
Lz
COpy mdv'l
ah l en TO scr
Dadurch wird der gesamte Inhalt der Datei auf den Bildschirm kopiert.
Sie können auch das folgende Programm benutzen, um die Datei zu lesen und den
Inhalt der Datei auf dem Bildschirm anzuzeigen:
100 REMark
Datei
110 OPEN...._IN #6,mdv1_zah
120 FOR zahL = 1 TO 100
130
INPUT #6,
posten
140
PRINT!
posten'
150 END FOR zah L
160 CLOSE #6
Gegebenenfalls kann das Programm geändert werden, um eine Ausgabe in einer
anderen Form zu erhalten.
Auf ähnliche Weise erstellen die folgenden Programme eine Datei mit 100 zufällig
ausgewählten Buchstaben und lesen sie wieder zurück.
100 REMark
Buchstaben._Datei
110 OPEN...._NEW #6,
120 FOR zah L = 1 TO 100
130
LET zei ch$ = CHR$(RND(65
140
PRINT
#6,
zei ch$
150 END FOR zah L
160 CLOSE #6
100 REMark
Buchstaben
110 OPEN...._IN #6,mdv1_zei
120 FOR zahL=1
TO 100
130
INPUT
#6,
posten$
140
PRINT!
posten$
150 END FOR zah L
160 CLOSE #6
Angenommen, Sie möchten eine einfache Datei mit Namen und Telefonnummern
erstellen.
678462
HANS
896487
PETER
249386
PAUL
584621
SEPP
482349
MAX
438975
MARIA
982387
GABI
3/85
benutzt werden.
- Datei
Lesen
Len
mdv l.Lz e i chen.Lda
t e i
TO 90»
hoLen
chen._datei
,
VERSCHIEDENE
TECHNIKEN
SEQUENTIELLE
DATEIEN
Numerische Datei
Zeichendatei
ERSTELLEN EINER
DATEN DATEI
97