download PDF (41MB) - Mike Schilli

CCDUTIL
CCD LEX-File fiir den HP-71
Teil 3
Die aktuelle Version von CCDUTIL ist
CCD:2A. Ich bin dazu iibergegangen, bei
funktionellen Anderungen (neue Befeh
le) die Versions-NUMMER zu erhohen
und beianderen Anderungen (Fehlerkorrekturen)
den Buchstaben, wobei ich die
Version "A" als "1A" betrachte (es gab
auch eine Version 1B).
Bereits in der Version 1B sind zwei Bugs
beseitigt worden: die "-1", die DSP, RPT
und KBD zuruckgeben konnten sah nur
so aus; ein Vergleich wie"DSP=-1" lieferte
immer Null als Ergebnis. AuBerdem
war es doch nicht der Weisheit letzter
SchluB, wie von mir in Heft 5/88, Seite 5
vorgeschlagen wurde, zum Loschen der
Anzeige in das Nibble an Adresse #2F442
einen Wert ungleich Null zu schreiben:
beim nachsten INPUT-Befehl wird die
Programmausfiihrung unterbrochen.
Wenn man beim Studium der IDS mal
genauer hinsieht, findet man eine mit
NEEDSC bezeichnete Adresse (#2F94A).
Ein Wert von Null bedeutet, daB keine
Zeichen zum Display geschickt wurden,
seit die ENDLINE-Taste das letzte mal
gedruckt wurde. Dort schreibt SETSTS
nun Null hinein, wenn die Option "Anzei
ge loschen" bei STS$ gesetzt war.
Die Funktion FILE$ ist (mal wieder) erweitert
worden: ist die Lange des Stringparameters
genau 32 Zeichen, so wird er
nicht als Filename sondern als Massenspeicherkatalogeintrag
interpretiert. Nun
kann man z.B. das gesamte Directory
einer Diskette mit einer ENTER-Anweisung
einlesen, mit der FILE$-Funktion
die Katalogeintrage auswerten lassen und
das ganze sortiert ausgeben.
Dieses Feature gab es auch schon in der
letzten Versbn, jedoch war diese Erweiterung
so kurzfristig, daB sie nicht mehr
im Artikel in Heft 3/89 beruckschtigt werden
konnte, da dieser bereits gesetzt wurde.
Neu ist allerdings, daB nun bei exakter
Schreibweise (nur Kleinbuchstaben und
keine Leerzeichen) auch "workfile" und
"keys" gef unden werden. Und jetzt - tataaaaa...
- ist es erstmals moglich, herauszufinden,
welcher File einer Kanalnummerzugeordnet
ist, wenn man FILE$
keinen String sondern eine Zahl -eben
die Kanalnummer- ubergibt.
Und weil es billig zu haben war (etwa 100
Bytes), habe ich auch die Funktion FTY-
PE$ aus dem DATACOMM-Modul iiber
nommen. FTYPE$ wird -genau wie FILE$ein
Filename oder eine Kanalnummer
iibergeben und man erhalt einen fiinf
Zeichen langen String, der den Filetyp
reprasentiert (zB. "TEXT", "BASIC" oder
"KEY "). Kennt der HP71 den Filetyp
nicht, so wird, genau wie bei CAT$ eine
bis zu fiinfstellige Zahl in Stringform zu
riickgegeben. Wird der angegebene File
nicht gefunden, erzeugt FTYPE$ nicht
wie FILE$ einen Fehler, sondern gibt
einen Nullstring zuriick; das ist niitzlich,
wenn man herausfinden will, ob ein File
bereits existiert.
Im Gegensatz zur Funktion im DATA
COMM-Modul findet dieses FTYPE$ auch
"workfile" und "keys". Es benutzt die gleiche
LEX-ID und Tokennummer wie die
Original-Funktion, sodaB CCDUTIL im
Speicher vor DCLEX liegen muB (siehe
HP71-Benutzerhandbuch Seite 112 -
Suchordnung fiir Files) um in den GenuB
der erweiterten Funktionalitat zu kom
men.
Wirklich neu sind die Funktionen REC#
und RECLEN#. Eigentlich sollten sie REC
und RECLEN heiBen, aber daB muB HP
wohl nicht gefallen haben: als ich die
Antwort auf mein "permanent resource
allocation request" erhielt, waren die beiden
Funktionen einfach umbenannt.
Mit REC# kann man erfahren, wieviele
Records in einem File sind und welches
die momentane Recordnummer ist. Im
Gegensatz zu den Funktionen FILESZR
und DRECORDS von HP kann REC#
nicht nur auf einen Filetyp angewandt
werden, sondern auf TEXT, DATA und
SDATA-Files und REC# ist etwa dreimal
so schnell wie FILESZR.
RECLEN# kann ebenfalls auf diese Filetypen
angewandt werden und liefert die
Lange des langsten Records (bei TEXT-
Files), die Lange des momentanen Re
cords bzw. den im momentanen Record
verbleibenden Platz (DATA-Files) und
wenn man am Ende des Files angekommen
ist "-1". Eine genaue Parameterbeschreibung
ist der untenstehenden Ta
belle zu entnehmen.
I n der folgenden Tabelle sind alle Befehle
ausCCDUTILaufgefiihrt. Beiden bereits
an anderer Stelle beschriebenen Befehlen
steht nureinHinweis auf denentsprechenden
Artikel. Vor jedem Befehl sind in
hexadezimaler Schreibweise die LEX-
ID/Tokennummerdes Befehls aufgefuhrt.
Optionale Parameter sind in eckigen
Klammern aufgefuhrt. Numerische Para
meter werden durch "#" und Stringparameter
durch "$" dargestellt. Ist wahlweise
beides moglich, so. ist dieses durch "#/
SERIE 70
$" dargestellt. Ich iiberlasse es dem
geneigten Leser, sich Gedanken iiber
die nicht benutzten Tokennummern zu
machen.
CCDUTIL ist jetzt 2842 Bytes groB. Ich
habe deshalb darauf verzichtet, den
Hexdump mit abzudrucken; wer ist denn
schon so wahnsinnig, 6000 Ziffern abzutippen
? Zusammen mit KEYPOLL ist
unser LEX-File nun immerhin schon fast
4k Bytes groB, etwa ein siebentel der
GroBes des J PC-ROM's (hatten wir sieben
aktive LEX-File-Programmierer, dann
... - tja, wer weiB ?).
Bei vielen Leuten sehe ich ein LEX-File
namens CCDGP auf alien moglichen
Disketten rumgeistern. Dieses ist eine
uralte Vorversion von CCDUTIL, die ich
auf der Mitgliedervollversammlung '86
unter's Volkgebracht habe. Sie hat noch
tausend Bugs (konnen auch zwei Oder
drei mehr sein), verkehrte LEX-ID und
Tokennummern und teilweise gleiche
Befehle wie CCDUTIL, jedoch mit ande
ren Namen. VergeBt am besten diesen
File.
F6/01 FTYPE$(#/$) (Kanalnummer/
Filename)gibt den Filetyp eines Files in
Stringform zuriick. Wird der angegebene
File nicht gefunden, so wird ein Nullstring
zuriickgegeben. Als Parameter wird eine
Kanalnummer oder ein Filename erwartet.
E1/D0DDELAY
Siehe Prisma 4/88, Seite 7
E1/D1 PDELAY
Siehe Prisma 4/88, Seite 7
E1/D2 SWDSP AEON/OFFUE
Siehe Prisma 4/88, Seite 7
E1/D3 SWPRT AEON/OFFUE
Siehe Prisma 4/88, Seite 7
E1/D4 DSP Siehe Prisma 4/88, Seite 7
E1/D5 KBD Siehe Prisma 4/88, Seite 7
E1/D6PRT Siehe Prisma 4/88, Seite 7
E1/D7 SETSTS $ (Status)
Siehe Prisma 3/89, Seite 24
E1/D8 STS$(#) (Statusoption)
Siehe Prisma 3/89, Seite 24
E1/D9 FlLE$(#/$) (Kanalnummer/Filename/Massenspeicherkatalogeintrag)gibt
den Katalogeintrag eines Files zuriick
(ahnlich CAT$). Wird ein numerischer
Parameter iibergeben, so wird dieser als
Kanalnummer aufgef aBt. Ein Stringparameter
wird, solange er nicht genau 32
nnmnutprnlnh Deutsnhland e.V PRISMA 6/89 15