Forth-Quellprogramme; Einbindung Der Caos-Betriebsart In Anwenderprogramme; Nutzung Von Service Im Basic - Kleincomputer KC 85 Handbuch

CAOS-Betriebsart
3.5.

FORTH-Quellprogramme

FORTH-Dateien besitzen keinen Vorsektor. Sie enthalten den Quell-
text, wobei ein Screen vier Sektoren belegt. Der Quelltext ent-
hält keine Steuerzeichen.
4. Einbindung
art in
4.1.

Nutzung von SERVICE im BASIC

Das Programm SERVICE enthält einen Programmteil zur Nutzung der
Komponenten von SERVICE von der BASIC-Interpreterebene aus. Die
Programme werden mit der CALL-Anweisung
folgende Adressen zum Aufruf mit den angegebenen Parameterüber-
gaben:
CALL*D8 - FLOAD;
'gepoket' werden.
Programmbeispiel:
10 N$="TEST.KCP ":FORZ=0TO11
20 POKEZ,ASC(MID$(N$,Z+1,1)):NEXT
30 CALL*D8:!LADEN BILDINHALT
CALL*DB - FSAVE; Name und Typ müssen ab Adresse 0 'gepoket'
werden. Die Argumente müssen ab Adresse
14209 'gevpoket' werden.
ARGN - Anzahl der Argumente 2 oder 3
ARG1 - Ladeadresse
ARG2 - Endeadresse+1
ARG3 - Startadresse (bei Bedarf)
Das
einschließlich Farbattributspeicher des KC 85/3:
10 AN=14209:!ARGN
20 VPOKE AN,2:VPOKE AN+1,0:VPOKE AN+2,128
30 VPOKE AN+3,0:VPOKE AN+4,178
40 N$="TEST.KCP
50 POKE Z,ASC(MID$(N$,Z+1,1)):NEXT
60 CALL*DB:!RETTEN BILDINHALT
CALL*DE - DIR;
schirm
CALL*E1 - STAT;
Diskette
CALL*E4 - REN;
danach der neue Name angefordert werden
CALL*E7 - SETRO;
Name angefordert wird
CALL*EA - SETWR;
Name angefordert wird
CALL*ED - ERA; Löschen einer Datei, deren Name angefordert wird
69
der
Anwenderprogramme
Dateiname und
Programmbeispiel
":FOR Z=0 TO 11
Auflisten des Disketteninhaltes auf dem Bild-
Anzeige des freien Speicherplatzes auf der
Umbenennen einer Datei, wobei erst der alte und
Setzen des Schreibschutzes für Datei,
Aufheben des Schreibschutzes für Datei, deren
4. Einbindung in Programme
CAOS-Betriebs-
aufgerufen. Es gelten
-typ müssen
rettet den Bildschirminhalt
ab Adresse 0
0B781H -
deren