Die ISAM- und PRIMA-Macrobefehle sind in der hier veröffentlichten Form für den SEKA-Assembler der englischen Firma KUMA gedacht. Falls man einen anderen Macro-Assembler benutzen möchte, muß man die Macromodule gegebenenfalls an dessen Macrosyntax anpassen. Die Standardroutinen können unverändert übernommen werden, sofern der andere Assembler die Standard-Motorola Mnemoniks beherrscht.

Beide Bibliotheken sind von Gerhard Pritz aus Berlin erstellt und von uns für die ST Computer erworben worden. Die Source-Listings werden von der nächsten Ausgabe ab regelmäßig veröffentlicht. In dieser Ausgabe soll das Modulpaket zunächst erst einmal vorgestellt und eine kurze Einleitung gegeben werden. Eine komplette Veröffentlichung in einer Ausgabe würde den Rahmen der ST Computer sprengen und außerdem die vielen Assembleruninteressierten stark benachteiligen. Die Listings sind natürlich auf den jeweiligen, zur Ausgabe gehörigen, Disketten vorhanden. Ferner kann man das komplette Paket, also ISAM und PRIMA, für ganz Eilige schon jetzt auf einer Extra-Diskette für DM 49,- + DM 5,- Versandkosten, gegen Vorausscheck oder per Nachnahme, beim Heim-Verlag in Darmstadt, beziehen (beiliegende Software-Bestellkarte verwenden).

Um nun erst einmal zu erklären, was ISAM und PRIMA überhaupt sind bzw. beinhalten, wollen wir darauf kurz eingehen.

ISAM ist die Abkürzung für Indexed Sequential Access Method. Es handelt sich also um eine index-sequentielle Dateizugriffsmethode. Eine ISAM-Datei kann wahlfrei, also mit Direktzugriff auf einen ganz bestimmten Satz, oder auch sequentiell vorwärts oder rückwärts verarbeitet werden. Dadurch entsteht ein enormer Geschwindigkeitsvorteil beim Suchen von Daten.

Um nun aber die ISAM-Macros verwenden zu können, muß man zuerst die PRIMA-Macros besitzen, da diese im Sourcecode des ISAM verwendet werden. Aus diesem Grund werden zunächst die Sourcelistings der PRIMA-Macros bei uns veröffentlicht.

Hinter dem Namen PRIMA verbirgt sich einfach mehr oder weniger der Name des Autors, da es die Abkürzung für Pritzen’s Machwerk darstellt. In PRIMA sind eine Menge an allgemeinen Macros und Standardroutinen vereinigt, die einem das Programmieren in Assembler vereinfachen sollen.

Das gesamte Macro-Paket ist in vier Teile mit folgenden Macromodulen unterteilt:

1. Allgemeine Macros

• Delay = Warteschleife
• Repeat = Wiederholungsrate der Tastatur festlegen
• Compare = Vergleichen zweier Felder
• Gemdos = Aufruf einer GEMDOS-Funktion
• Conin = Eingabe eines Zeichens von Tastatur mit Warten
• Inkey = Eingabe eines Zeichens von Tastatur ohne Warten
• Control = Ausgabe von Control-Anweisungen an den Bildschirm
• Controlm = Mehrfache Ausgabe derselben Control-Anweisung
• Char = Ausgabe eines Zeichens an aktueller Cursorposition
• Pos = Positionierung des Cursors
• Transfer = Übertragen von Daten
• Fill = Füllen eines Feldes
• Print = Textausgabe auf Bildschirm mit Zeilenvorschub
• Printx = Textausgabe auf Bildschirm ohne Zeilenvorschub
• Prints = Speicherinhalt auf Bildschirm ausgeben
• Zeile = Zeilenvorschub (Carriage Return und Fine Feed)

2. Diskettenmacros

• Open = Eröffnen von Dateien
• Close = Schließen von Dateien
• Extend = Daten an bestehende Datei anhängen
• Fof = Satznummer des letzten Record ermitteln
• Get = Bestimmten Datensatz lesen
• Put = Bestimmten Datensatz schreiben
• Read = Nächsten Datensatz lesen (sequentiell)
• Write = Nächsten Datensatz schreiben (sequentiell)
• Diskerror = Disketten-Fehlerbehandlungsroutine

3. Standardroutinen

• Input = Eingabe von Zeichen von der Tastatur
• Numeric = Eingabe von numerischen Zeichen von der Tastatur
• Abgleich = Abgleichroutine für Kommastellen
• Ueplus = Überlaufkontrolle für Addition und Subtraktion
• Plus = Addition
• Minus = Subtraktion
• Durch = Division
• Mal = Multiplikation
• Kneif = Abschneiden der Kommastellen ohne Runden
• Round = Runden der Kommastellen
• Binasc = Umwandlung von binär nach ASCII
• Ascbi = Umwandlung von ASCII nach binär
• Divi = 32 Bit Division
• Multi = 32 Bit Multiplikation
• Edit = Editierroutine

4. ISAM-Macros

• Keylen = Schlüssellänge festlegen
• Isam = ISAM-Funktionsroutinen

In den ISAM-Macros wird die eigentliche Arbeit nicht durch die beiden Macros KEYLEN und ISAM geleistet, sondern durch die folgenden ISAM-Funktionsroutinen:

• QWRITE = Schreiben
• QSEARCH = Suchen
• QREAD = Lesen
• QREAD__R = Rückwärts lesen
• QEQ HI = Gleichen oder höheren Schlüssel suchen
• QEQ LO = Gleichen oder niedrigeren Schlüssel suchen

Nicht nur für Profis

Das gesamte Paket ist als Handwerkszeug für Assembler-Programmierer und für die, die bis jetzt nur flüchtigen Kontakt mit einem Assembler gehabt haben, gedacht. Es verkürzt die Arbeitszeit bei der Programmerstellung erheblich, befreit von vielen Routinearbeiten und läßt Raum für die Konzentration auf das eigentliche Programmierproblem .

Es soll hier weder ein Kurs in 68 000 Assembler abgehalten noch haarklein auch die letzte Feinheit der Anwendung erklärt werden. Ebenso wird vorausgesetzt, daß man sich mit seinem Assembler (etwas) vertraut gemacht hat. Man sollte also zumindest wissen, wie man ein Assembler-Sourcecode lädt, assembliert und wieder abspeichert. Die genauen Befehle mit ihrer Syntax kann man ja dem mitgelieferten Handbuch entnehmen, auch wenn es beim SEKA-Assembler etwas mager ausgefallen ist.

Dies alles soll Anfänger natürlich nicht abschrecken, sondern sie ganz im Gegenteil eher ermutigen. Gerade für den Beginner wird diese Macroroutinensammlung zum wertvollen Arbeitsmittel werden und den Einstieg in die Assemblerprogrammierung vereinfachen.

Wenn man am Anfang noch bei jedem kleinen Macro nachschlagen muß, so wird doch bald alles zur Routine, und man wird nur noch bei Besonderheiten nachlesen. Eine weitere Hilfe bei Fragen dürften die Macrodefinitionen und die Beispielprogramme liefern.

Zum eigentlichen Assembliervorgang sei folgendes gesagt. Man lädt zuerst den Sourcecode PRIMA.S, danach, falls das eigene Programm ISAM-Macros benutzt, ISAM.S und zuletzt das eigene Programm. Anschließend wird ganz wie gewohnt assembliert.

PRIMA gibt automatisch den nicht benötigten Speicherplatz an das GEM-DOS zurück. Hierfür ist unbedingt eine gerade Anzahl von Bytes des Gesamtprogramms erforderlich. Die GEMDOS-Funktion SETBLOCK ($ 4A) verursacht nämlich einen Totalabsturz, wenn eine ungerade Anzahl von Bytes vor liegt. Abhilfe kann man da leicht mit der EVEN-Instruktion schaffen, die zuletzt vor dem END angegeben werden muß.

Ein Stack von 300 Bytes wird von PRIMA automatisch eingerichtet. Wenn man mehr als diese 300 Bytes Stack benötigt, kann man wie gewohnt einen eigenen Stack am Anfang des Programmes einrichten. Andernfalls braucht man sich überhaupt nicht um den Stack zu kümmern, da er einfach vorhanden ist. Eine Ausnahme ist dann zu beachten, wenn man mit dem SEKA-Assembler Debugging betreibt. In diesem Falle muß die erste Instruktion des Programmes folgendermaßen lauten:

Unter Debug startet man das Programm dann mit der G-Anweisung (in diesem Falle GSTART). Das Label START ist natürlich nicht zwingend, es kann auch ein anderer Labelname genommen werden. QSTACK darf nicht definiert werden, da PRIMA es schon gemacht hat.

Wenn das Programm fertig ausgetestet ist und selbständig ohne Debug laufen soll, kann die Anfangsinstruktion wieder entfernt werden. Falls man es vergißt, schadet es aber auch nichts.

Allgemeines zum Format

Ein Macromodul wird durch den Macronamen aufgerufen, dem, je nach Macro, eine bestimmte Anzahl an Parameter folgen. Folgende Parameter können zulässig sein:

• Register

• unmittelbare Daten (#UD)

• Label (Feldadressen)

• Label (Feldinhalte)
• "Literal”
• Funktionsnamen (FUNKTION)
• sonstige numerische Angaben

Was für den Einzelfall gilt, kann man den Beispielen, den Macrobeschreibungen oder, was im Zweifelsfall am besten ist, den Macrodefinitionen selbst entnehmen.

Sowohl bei den Macros als auch bei den Standardroutinen bleiben die Registerstände unverändert; es sei denn, das betreffende Macro oder die Routine meldet in einem vereinbarten Register einen Rückkehrwert (z. B. einen Fehlercode). Eine Ausnahme bildet hier das Adressregister A0, das nach Beendigung des Macros bzw. der Routine einen anderen Inhalt haben kann.

Die Parameter

1. Register

Sofern eine Registerangabe zulässig ist, wird der Inhalt des angegebenen Registers zur Verarbeitung herangezogen.

Beispiel: CHAR D5

Hiermit wird das im Register D5 enthaltene Zeichen auf den Bildschirm gebracht. Man muß bei der Registerangabe auf das Längenattribut achten, da die Registerdaten als Byte, Wort oder Langwort gefordert sein können.

2. unmittelbare Daten

Unter unmittelbaren Daten versteht man z. B. # 12, d. h. die Zahl 12 wird verarbeitet.

Beispiel: GET 1,# 12,D1

Der Datensatz mit der Nummer 12 wird aus der Datei 1 gelesen und anschließend an die in dem Datenregister Dl enthaltene Speicheradresse geschrieben.

3. Label

Mit Label sind Marken gemeint, die irgendwo im Programm als Feldnamen definiert wurden. Das Doppelkreuz gibt hierbei an, daß die Adresse des Feldes und nicht der Inhalt benutzt wird.

Beispiel:

Es wird der Text ausgegeben, der ab der Adresse FELDl im Speicher zu finden ist. In unserem Beispiel wird die Ausgabe dann beendet, wenn eine binäre Null gefunden wird.

4. Label

Label ohne ein Doppelkreuz sind ebenfalls im Programm definierte Feldnamen, jedoch wird hier der Inhalt des Feldes und nicht seine Adresse angesprochen.

Beispiel: PUT 2, NUMMER,# PUFFER NUMMER: DC.L 4712 PUFFER: BLK 120

Es wird der Datensatz mit der Recordnummer 4712 in die Datei mit der Nummer 2 geschrieben und zuvor die Satzdaten ab der Adresse PUFFER geholt.

5. ”Literal”

Hiermit sind in Anführungszeichen eingeschlossene, alphanumerische Werte gemeint. Überall, wo Literais zulässig sind, können niemals die Formen # Label oder Label Verwendung finden. Literais müssen immer zwischen zwei Anführungszeichen stehen.

6. Funktionsnamen

Damit sind ganz bestimmte festgelegte Funktionsnamen für bestimmte Macros gemeint.

Beispiel: CONTROL CLS

CLS ist hier der Funktionsname für Bildschirm löschen (Clear Screen). So werden unter anderem alle CON-TROL-Sequenzen über solche Funktionsnamen aufgerufen.

Beispiel: ISAM 1,LESEN_R,#BUF1

Dieser Macroaufruf bewirkt, daß der nächstniedere Datensatz der als ISAM-

Datei organisierten Datei mit der Nummer 1 gelesen und anschließend ab Adresse BUF1 abgespeichert wird.

7. Sonstige numerische Angaben

Dies sind numerische Angaben ohne irgendwelche Zusätze wie z. B. das Doppelkreuz #. Sie werden als Dateinummern (FAN), für Datensatzlängen und auch als Funktionsnummer beim GEMDOS-Macro verwendet.

Beispiel:

OPEN ’T” ,6,”MYFILE” ,120 READ 6,A5

Die Datei mit der Nummer 6, dem Dateinamen „MYFILE“ und einer Datensatzlänge von 120 Zeichen wird als Inputdatei eröffnet. Dann wird der nächste Datensatz aus dieser t)atei 6 ab der in dem Adressregister A5 stehenden Speicheradresse abgespeichert.

Dies soll zur Vorstellung zunächst einmal genug sein. Wir werden dann aber der nächsten Ausgabe mit den allgemeinen Macros der PRIMA-Bibliothek beginnen. (HE)

Um die Leistungsfähigkeit der beiden Modi zu verdeutlichen, geben wir hier als Beispiel eine Telefondatei.