DE2363343A1 - Programmierbarer rechner - Google Patents

Description

Telefon (0 70 31) 2 89 73 -66 7432

Int.Z. Case 785 '_. _{17# De2# i973}

Hewlett-Packard Company 1501 Page Mill Road, Palo Alto, California 94304, USA

PROGRAMMIERBARER RECHNER

Die Erfindung betrifft elektronische-Rechner gemäß dem Oberbegriff des Anspruchs 1.

Die herkömmlichen Rechner entsprachen in der Regel einer der beiden folgenden Konzeptionen, um den Arbeitsaufwand von sich wiederholenden routinemäßigen Berechnungsaufgaben zu vermindern. Das eine Konzept besteht in der Programmierbar keit. Programmierbare Maschinen haben den Vorteil, daß das Programm variiert werden kann, so daß Probleme aus beinahe allen Disziplinen gelöst werden können. Dieser Vorteil wird allerdings mit beträchtlichen Kosten erkauft. Der Benutzer zahlt daher für wesentlich mehr Rechenkapazität und Vielseitigkeit, als beispielsweise erforderlich ist, um die sich wiederholenden Probleme der gleichen Disziplin, beispielsweise der Mathematik, der Wissenschaft, des Finanzoder Geschäftswesens zu berechnen. Gemäß der anderen Konzeption werden auf spezielle Aufgaben abgestellte Rechner hergestellt. Ein derartiger Rechner hat in der Regel ein fest eingebautes Programm, durch welches nur ein schmaler Bereich von Problemen behandelt werden kann. Derartige spezielle Rechner sind naturgemäß billiger als programmierbare Rechner, sie haben jedoch den wesentlichen Nachteil, daß sie eben nur für spezielle Aufgaben einsetzbar sind.

409826/0862

Der Erfindung liegt-vor allem die Aufgabe zugrunde, einen verbesserten programmierbaren Rechner zu schaffen/ weicher eine größere Kapazität und Flexibilität als herkömmliche Rechner aufweist, welcher nur für einen engen Bereich von Problemen ausgelegt ist und welcher kleiner und billiger als herkömmliche programmierbare Rechner ist»

Die Losung dieser Aufgabe gemäß der Erfindung ist im Patentanspruch 1 angegeben. Dabei werden eine Tastatur-Eingabeeinheit, wahlweise eine Leuchtdiode enthaltende Anzeige-Einheit, ein Ätisgangsdrucker und MOS/LS!-Schaltungen verwendet, welche also Metalloxyd/Halbleiter-Schaltlcreise in groBen integrierten Einheiten enthalten.

Die Tastatur-Kingangseinheit enthält eine Gruppe von Ziffern-' ■ tasten zur. Eingabe numerischer Daten in den Rechner, eine Gruppe Steuertasten sum Steuern "der verschiedenen Betriebsarten des 'Rechners und dar Vorgänge des Druckwerks, eine Gruppe von Operatortasten zur Bezeichnung der mathematischen Vorgänge, welche mit verschiedenen Daten vorzunehmen sind,- und eise Gruppe von Programmtasten ^ mit denen die Ausführung von Programmen einer Bibliothek gesteuert- wird, welche in eine» eingesteckten Äuslesespeiclier {ROM) oder, einem programmierbaren Äuslese-speicher (PROM) gespeichert sind«,

Die Tastatur enthält auch einen leeren .abschnitt _t der einen Einsteck-Punkt ions block auf nehmen kanrij, welcher 15 Tasten und einen zugeordneten Auslesespeic-her enthält. Verschiedene Funkfcionsblocke können jeweils unterschiedlichen Disziplinen und Problembereichen zugeordnet !«/erden« Beispielsweise kann ein Statistikblock vorgesehen, werden, dessen Tasten den in der Statistik-auftretenden Größen entsprechen. In ähnlicher Weise würde ein mathematischer Funktionsblock verschiedene iBathessafcische Funktionen- umfassen _t welche als Ergebnis der Tastenbetätigung berechnet werden können» Zusätzlich kana in die Tastatur ein durch"den Benutzer defiaierbarer Funktions-

409828/08Θ2

—; ο „

block eingesteckt werden. Dieser Block enthält 15 Tasten, , von denen jede eine transparente Kappe hat, welche der Benutzer entfernen und durch eine Funkt'ionsaufschrift ersetzen kann. Jeder dieser Tasten ist eine spezielle Funktion oder ein Programm zugeordnet, das in einem eingesteckten Auslesespeicher ROM oder einem programmierbaren Auslesespeicher PROM enthalten ist, der häufig in Verbindung mit dem Rechner verwendet wird. Eine derartige Funktion oder ein solches Programm können dann aufgerufen werden, indem einfach die zugeordnete Taste des durch den Benutzer definierbaren Funktionsblockes betätigt wird.

Die wahlweise einsetzbare Anzeigeeinheit mit Leuchtdioden für 15 Dezimalziffern ist in einer einsteckbaren gedruckten Schaltung enthalten, welche automatisch mit dem Rechner zusammenarbeitet.

Das Druckwerk für 18 Spalten ist ein einstückiger Teil des Rechners und liefert eine gedruckte Aufzeichnung der eingegebenen Daten, der Rechenoperatoren, der berechneten Ergebnisse und der Zustands- bzw. Fehleranzeigen des Rechners. Der Druck- , Vorgang kann unterdrückt oder in anderer Weise durch Tasten der Eingabetastatur gesteuert werden.

Die MOS/LSI-Schaltungen enthalten acht Auslesespeicher, in denen Unterprogramme zur Ausführung verschiedener Funktionen gespeichert sind. Diese Schaltungen überwachen auch die Programmausführung und dienen dazu, jegliche Peripherie-Eingabe/ Ausgabegeräte zu steuern, welche mit dem Rechner verbunden werden können. Die Gruppe der Auslesespeichereinheiten umfaßt acht einzelne Auslesespeicher, welche in ihrem Aufbau identisch sind und sich nur in der Art und Weise unterscheiden, in welcher sie programmiert sind.

Zum Abtasten der Tastatur,-zur Gewinnung der Zustandsinformation über den Rechner oder eines speziellen Unterprogrammes und zur Erzeugung einer folgenden Adresse in dem Auslesespeicher ist eine Steuer- und Taktgeberschaltung vorgesehen.

409826/0862

Eine Rechen- und Registerschaltung enthält eine Additionseinheit, eine Gruppe von Arbeitsregistern, eine Gruppe von Datenspeicherregistern, welche ein Stapelregister bilden, und ein Konstanten-Speicherregister zum Speichern von Marken ("flags") auf der Mikroprogrammebene, welche verschiedenen Unterprogrammen zugeordnet sind.

Eine Datenspeicher-Schaltung enthält zehn Datenspeicher-Register, von denen fünf für Klammerausdrücke, drei für verschiedene interne Ordnungsfunktionen auf der Mikroprogrammebene, eines als Gesamtregister, welches durch den Benutzer befragt werden kann ■, und das letzte als dem Benutzer zugängliches Register zum Speichern eines einzelnen Wertes verwendet wird.

Die letzte MOS/LSI-Schaltung, die Eingabe/Ausgabeschaltung (I/O-Schaltung) ermöglicht es, daß der Rechner mit verschiedenen Eingabe/Ausgabe-Peripheriegeräten, beispielsweise einer Schreibmaschine oder einem X/Y-Schreiber, in Verbindung steht und bestimmt, ob das für ein bestimmtes Programm geeignete Peripheriegerät zur Verfügung steht. Die Schaltung verwendet auch eine binäre Rechenlogikschaltung (ALU) zur Ausführung binärer Rechnungen, einen Programmadressenzähler zur Verwendung beim Durchfahren von Programmen und die erforderliche Logikschaltung zum Betrieb des internen Druckwerkes .

Der Rechner kann manuell von der Tastatur aus betrieben werden, indem die als Tasten auf der Standard-Tastatur vorhandenen Funktionen benutzt werden, oder er kann über einen eingesteckten speziellen Funktionsblock oder einen durch den Benutzer definierbaren Funktionsblock betrieben werden. Der Rechner kann auch automatisch mit einem Programm betrieben werden, dessen Befehle der Benutzersprache entsprechen und in einem eingesteckten Ausiesespeicher (ROM), einem eingesteckten programmierbaren Auslesespeicher (PROM)

409826/0862

oder einem Lese/Schreibspeicher gespeichert sind, der einer einsteckbaren Lese- und Aufzeichnungseinheit mit einer Magnetkarte zugeordnet ist.

Der Benutzer kann also die Tastatur erweitern, indem er in diese einen Punktionsblock mit mehreren Tasten sowie zugeordneten Auslesespeichern einfügt, wobei diese Tasten entweder vorbestimmte Funktionen oder durch den Benutzer definierbare Funktionen bezeichnen. Es wird ein anpassungsfähiger Rechner geschaffen, bei welchem ein definierbarer einsteckbarer Funktionsblock zur Erweiterung der Tastatur eine Tabelle mit

dem Mikroprogramm-Funktionen enthält und bei diese Funktionen

zusammen mit den zusätzlichen Funktionen für eine Mikroprogrammbibliothek, die irgendwo in dem Rechner gespeichert ist, wahlweise zum Aufbau von Funktionen oder Programmen gewählt werdenkönnen, die speziellen Tasten in dem Funktionsblock zugeordnet sein können.

Weiterhin wird ein anpassungsfähiger Rechner geschaffen, bei welchem ein in einem Einsteck-Auslesespeicher oder einem programmierbaren Einsteck-Auslesespeicher enthaltenes Programm nicht nur in dem Rechnerchassis enthaltene Mikroprogrammfunktionen aufrufen kann, sondern auch Mikroprogrammfunktionen, welche in einem Einsteck-Tastatur-Funktionsblock enthalten sind, welcher in dem Rechher verwendet wird.

Jede Taste des durch den Benutzer definierbaren Tastatur-Funktionsblockes stellt eine Funktion oder ein Programm dar, welches durch einen Festwertspeicher oder einen programmierbaren Festwertspeicher, der häufig in den Rechner eingesteckt wird, als Folge von Mikroprogrammen definiert ist, welche in dem Rechnerchasses und/oder dem durch den Benutzer definierbaren Funktionsblock enthalten sind, und welcher als Tastenfunktionen dargestellt werden kann oder nicht. Weiterhin wird ein anpassungsfähiger Rechner geschaffen, in welchem ein Programm auf der Ebene der Sprache des Benutzers in einem

40 9 8 2S/Q8 62

Auslesespeicher oder einem programmierbaren Auslesespeicher gefahren werden kann, ohne daß dem Programm zugeordnete Tasten verfügbar sind. Jede periphere Eingabe/Ausgabeeinheit ist mit dem Rechner durch eine einzige gedruckte Schaltung verbunden, welche die gesamte notwendige Hardware und Software zum Antrieb der Peripheriegeräte enthält. Schließlich kann der Benutzer bestimmen, daß automatisch der Dezimalpunkt eingesetzt wird, um diesen an einer vorgewählten Stelle in die eingegebenen Daten einzufügen. Auch kann der Benutzer eine "Prozent"-Taste in Verbindung mit Daten μηα einem oder mehreren von vier Rechenoperatoren verwenden. Der Benutzer kann verschiedene Daten eingeben, denen jeweils ein Rechenr Operator folgt, und er kann ein Gleichheitszeichen eingeben, welches irgendeinem der eingegebenen Rechenoperatoren zur Berechnung des Ergebnisses bis zu diesem Punkt folgt.

Im folgenden wird die Erfindung anhand eines bevorzugten

Äusführungsbeispieles unter Bezugnahme auf .die Zeichnungen

erläutert; es stellen dar: - '

Pig. 1 eine perspektivische Aufsicht auf einen anpassungsfähigen Rechner;

Fig. 2 eine perspektivische Rückansicht eines anpassungsfähigen Rechners gemäß Fig. 1;

Fig. 3 ein Blockdiagramra des Rechners gemäß Fig. 1; Fig. 4 ein Diagramm zur Erläuterung der Verbindungen zwischen der Rechen- und Registerschaltung und der Steuer- und Logikschaltung gemäß Fig. 3?

Fig. 5 ein Diagramm,aus weichem die Zeitfolge hervorgeht, . in welcher die Verb indungs Sammelleitungen gemäß Fig. 3 verbunden sind?

Fig. 6 ein Blockdiagramm der Steuer- und Taktgeber schaltung gemäß Fig. 3j

Fig. 7 ein differenzierteres Blockdiagramm der Tastatur-Abtastschaitung gemäß Fig. 6;

Fig. 8 ein differenziertes schematisches Diagramm der Tastaturschaltung gemäß Fig. 7

409826/0882

Fig. 9 ein Blockdiagramm der Rechen- und Registerschaltung gemäß Fig. 3;

Fig. 10 ein Flußdiagramm zur Erläuterung der Datenströme für die Register A-F und M in Fig. 9;

Fig. 11 den zeitlichen Ablauf der Ausgangssignale für die · Anzeige-Dekodierschaltungen A-E gemäß Fig. 9 und 10;

Fig. 12 den zeitlichen Verlauf der Signale an den Anzeige-Dekodieraus gangen A-E gemäß Fig. 9 und 10, wenn die Dezimalziffer 9 dekodiert wird;

Fig. 13 den zeitlichen Verlauf der durch die Anzeige-Dekodierschaltung gemäß Fig. 9 erzeugten Startimpulse;

Fig. 14 ein Schaltungsdiagramm der Taktgeber-Treiberschaltung gemäß Fig. 4;

Fig. 15 den zeitlichen Verlauf der Eingangs- und Ausgangs-

signäle der Taktgeber-Treiberschaltung gemäß Fig. 14;

Fig. 16 schematisch die Gruppen von Auslesespeichern gemäß Fig. 3;

Fig. 17 ein Blockdiagramm einer der Auslese-Speicher 0-7 gemäß Fig. 16;

Fig. 18 den zeitlichen Verlauf eines typischen Adressiersignales und eines typischen Befehlssignales;

Fig. 19 schematisch die wichtigen Zeitpunkte für eine typische Adressierfolge;

Fig. 20 den zeitlichen Verlauf der Wortwählsignale, die in

der Steuer- und Taktgeberschaltüng gemäß Fig. 3 und 6 und in den Auslesespeichern 0-7 gemäß Fig. 3 und 17 erzeugt werden;

Fig. 21 ein Diagramm des Eingangs/Ausgangs(I/O)-Prozessors gemäß Fig. 3;

Fig. 22A-B ein Blockdiagramm der Eingabe/Ausgabeschaltung gemäß Fig. 21;

Fig. 23 die zeitlichen Beziehungen zwischen den Signalen

SYNC, START, EERA, I_g, SRI und IXT der Eingabe/Ausgabeschaltung gemäß Fig. 22;

Fig. 2* ein detailliertes Diagramm der Datenspeicherschaltung gemäß Fig. 3;

409826/0862

Fig. 25A-B ein Blockdiagramm der Datenspeichersc^altung

gemäß Fig.24; Fig. 26 den zeitlichen Verlauf der Signale SYNC, START, I_g

und BCD der Datenspeicherschaltung gemäß Fig. 25; Fig. 27 schematisch ein Schaltungsdiagrainm der dem Druckwerk gemäß Fig. 3 zugeordneten Taktgeberschaltung; Fig. 28 ein Diagramm der dem Druckwerk gemäß Fig. 3 zugeordneten Treiberschaltung; Fig. 29 ein Blockdiagramm der Leuchtdioden-Anzeigeschaltung

gemäß Fig. 3; Fig. 30 ein Logikdiagramm der Anodentreiberschaltung gemäß

Fig. 29;

Fig. 31 den zeitlichen Verlauf der verschiedenen der Anodentreiberschaltung gemäß Fig. 29 und 3O zugeordneten

Signale;
Fig. 32 schematisch die prinzipielle induktive Treiberschaltung für eine der Leuchtdioden der Anzeigeschaltung gemäß

Fig. 3 und 29;
Fig* 33 den zeitlichen Verlauf der Treibersignale für den

Dezimalpunkt der Leuchtdioden-Anzeigeschaltung gemäß

Fig. 3 und 29; Fig. 34 schematisch die induktive Treiberschaltung für eine Dezimalziffer der Leuchtdioden-Anzeigeschaltung gemäß

Fig. 3 und 29; Fig. 35 ein Logikdiagramm der Kathodentreiberschaltung gemäß

Fig. 29;

Fig. 36 die Leuchtdioden-Anzeigeschaltung gemäß Fig. 3; Fig. 37 ein Segment der Leuchtdioden-Anzeigeschaitung gemäß

Fig. 3 und 36; Fig. 38 ein bereichsweise linearisiertes Modell der Schaltung

gemäß Fig. 37; Fig. 39 die zeitlichen Verläufe des Induktionsstromes und der

Anodenspannung einer Leuchtdiode in den Schaltung

gemäß Fig. 37; Fig. 40 schematisch den Taktgebergenerator des Rechners, falls

die Leuchtdioden-Änzeigeschaltung fehlt;

409826/0882

Pig. 41 ein Netzgerät/ welches in dem Rechner gemäß Fig. 1

verwendet werden kannj
Fig. 42 ein Flußdiagramm des gesamten Mikroprogrammsystemes

in dem Rechner gemäß Fig. 1;
Fig. 43 ein Flußdiagramm einer Anzeigewarteschleife, welche

in dem Rechner gemäß Fig. 1 verwendet wirdι Fig,, 44 ein Diagramm der Wählschaltung für die Gruppe von

Auslesespeichern;
Fig. 45 einen einsteckbaren Tastatur-Funktionsblock, der in

dem Rechner gemäß Fig. 1 verwendet werden kann; Fig. 46 ein Diagramm eines wahlweise einsteckbaren Auslesespeichers (ROM/PROM), der in dem Rechner gemäß Fig.

verwendet werden kannι
Fig„ 47 ein Diagramm einer wahlweise in den Rechner gemäß.

Fig. 1 einsteckbaren Datenspeichereinheit^ Fig. 48 ein Flußdiagramm zur Erläuterung der Mikroprogrammschrit·

te, welche bei einem Unterprogramm zur Berechnung

eines Ausdrucks mit einer offenen Klammer vorgenommen

werden.

Gemäß Fig_o 1 und 2 enthält ein elektronischer Rechner 10 eine Tastatur 12 zur Eingabe von Daten und Befehlen, wahlweise: eine Leuchtdioden-Anzeigeeinheit 14 mit jeweils 7 Segmenten pro Leuchtdiode zur Anzeige jeder Dateneingabe sowie der Ergebnisse der durch den Rechner ausgeführten Berechnungen= Der Rechner enthält auch einen Drucker 16 für 18 Spalten, welcher Zwischenergebnisse und endgültige Ergebnisse der Berechnungen, eingegebene Daten, Rechenoperatoren und Ztistandshinweise über die Anlage ausdrucken kann» Die Tastatur 12 enthält weiterhin einen bedeckten, leeren Abschnitt 16, der einen Funktionsblock 20 für 15 Tasten aufnimmt, um die Kapazität des Rechners zu erweitern. Der Funktionsblock kann für einen speziellen Problembereich geeignet sein_y in welchem Fall seine Tasten Funktionen dar s te Hera," die bei der Berechnung dieser spezifischen Probleme nütslich sind» Anderer-

409826/0-862"

setts kann der Funktionsblock 20 auch derart aufgebaut sein, daß er durch den Benutzer definierbar ist", wobei die verschiedenen Tasten als Funktionen oder Programme bezeichnet und definiert sein können, die in einem (programmierbaren) . Auslesespeicher ROM oder PROM 22 gespeichert sind? der entsprechend den Bedürfnissen des Benutzers zugeschnitten ist. Das derart definierte Programm oder die Funktion können ausgeführt werden, indem einfach die zugeordnete Taste des-durch den Benutzer definierbaren Funktionsblockes betätigt wird. Das ROM oder PROM 22 kann lösbar in den Rechner durch eine gelenkige dicke Kappe 24 hindurch eingesetzt werden= Der Rechner kann einen Äuslesespeicher-ROM oder PROM 22 ohne einea. Ei.nst:eck-Funktionsblock 20 verwenden „ In diesem Fall enthält das Rom oder PROM eines oder mehrere Programme, die der Benutzer von der Haupttastatur aus ausführen kann«

Gemäß Fig, 2 enthält der Rechner auch drei Eingabe/Ausgabe-(I/O)-Anschlüsse 26, die im nichtbenutzten Zustand duxeft Anschlußkappen 28 bedeckt sind« Diese Anschlüsse dienen "dazu, den Recteer mit verschiedenen Eingabe/Ausgabe-Periphexrle-Einheiten_f beispielsweise einer Schreibmaschine einem mit aus-" lesbaren Aufzeichnungen versehenen .Kartenleser, einem X-Y-Setaeiber und dgl," zu verbinden» - "

Wie in dem tfbersichtsfoloekscfaaltbild in FIg₀ 3 dargestellt ist ρ enthält der Rechner auch eise MOS/LSI-Steuer- und Takt= gebersslialtung 3O₅. welche also aus Metalloxyd/Halb leitermaterial "in großen integrierten Einheiten hergestellt: ist,? sowie eine MOS/LSI-Hechen- und Registerschaltung 32, SSOS/IiSI-Äuslesespeicherschaltungen mit einer Gruppe 34 Auslesespeichern, einem in einem Datenspeicher .36 enthaltenen MQS/E:Sl=Batenspeieher und eine MOS/LSI-Eingabe/Äusgabescfealtungj die im eiaest Eingabe/Äusgabeprozessor 38 enthalten

-Ii-

so daß sie mit den herkömmlichen bipolaren TTL-Schaltungen (Transistor/Transistorlogik) verbindbar sind und bei sehr kleinen Leistungspegeln arbeiten können. Sie sind derart aufgebaut, daß sie aus 14 Ziffern bestehende binär/dezimalkodierte Wörter ziffernseriell und, bitseriell verarbeiten können. Sie können auch aus 56 Bits bestehende binäre Wörter seriell verarbeiten. Die maximale Bitgeschwindigkeit oder Taktfrequenz beträgt 2OO kHz, wodurch sich eine Wortzeit von 280 ps ergibt. Das bedeutet, daß in 60 ms eine Addition in Gleichkommaschreibweise durchgeführt werden kann.

Die Steuer- und Taktgeberschaltung 30, die Gruppe 34 der Auslesespeicher ROM, die Rechen- und Registerschaltung 32, die Datenspeicheranordnung 36 und der Eingabe/Ausgabeprozessor 38 sind durch eine Sammelleitung 40 mit sechs Leitungen miteinander verbunden. Diese Sammelleitung umfaßt eine SYNC-Leitung, eine Befehlsleitung I_c, eine Wortwahl-Leitung WS, eine Befehlsadressenleitung I , eine START-Leitung und eine BCD-Leitung für binär/dezimalkodierte Signale. Alle Vorgänge erfolgen in Wortperioden mit jeweils 56 Bits (b_o-b_5t.) in vierzehn aus 4 Bits bestehenden binär^ezimalkodierten Ziffern. In Fig. 4 ist die Zeitfolge dargestellt, in welcher einige der Verbindungsleitungen der Sammelleitung 40 verbunden werden.

Die SYNC-Leitung trägt Synchronisationssignale von der Steuer- und Taktgeberschältung 30 zu den Auslesespeichern ROM 0-7 in der Gruppe 34 von Auslesespeichern und zu der Rechen- und Registerschaltung 32, um das Rechensystem zu synchronisieren. Ober die SYNC-Leitung wird pro Wortzeit ein Synchronisiersignal abgegeben. Dieses Ausgangssignal dient auch als "Fenster" (b.^-fa,-.) ¹¹¹^t einer öffnungsweite von 10 Bits, innerhalb welcher die Befehlsleitung I aktiviert ist.

Die Befehlsleitung I überträgt aus 10 Bits bestehende Befehle ' von dem aktiven Auslesespeicher der Speiehergruppe 34 an die

409826/0862

anderen Auslösespeicher, an die Steuer- und Taktgeberschaltung 30, die Datenspeicher-Anordnung 36 und den Eingabe/Ausgabeprozessor 38, von denen jeder die Befehle lokal dekodiert und auf diese reagiert, vorausgesetzt, daß sie sich auf dem betreffenden Speicher beziehen, um aus Bitmustern bestehende Befehle frei zu setzen, die üblicherweise mit der Rechen- und Registerschaltung und der Steuer- und Taktgeberschaltung verbunden sind, sind mit der I -Leitung entsprechende Verknüpfungsglieder verbunden. Beispielsweise beeinflußt ein Additionsbefehl {ADD) die Rechen-und Registerschaltung 32, wird jedoch von allen anderen Schaltkreisen ignoriert. In ähnlicher Weise setzt der Befehl "SETZE ZÜSTANDSBIT 5" das Zustandsflipflop in der Steuer- und Taktgeberschaltung 30, wird jedoch von allen anderen Schaltkreisen ignoriert.

Die tatsächliche Ausführung eines Befehls wird gegenüber seinem Empfang um eine Wortzeit verzögert. Beispielsweise kann ein Befehl bedeuten, daß die Ziffer 2 in zwei Registern der Rechen- und Registerschaltung 32 addiert wird. Der Additionsbefehl würde in diesem Fall von der Rechen- und Registerschaltung während der Bitzeiten b,_-b_. der Wortzeit N+l empfangen. !fahrend also ein Befehl gerade ausgeführt wird, wird bereits der nächste Befehl aufgenommen.

Die WS-Leitung überträgt ein Auslösesignal von der Steuer- und Taktgeberschaltung 3O oder einem der Auslesespeicher in der Gruppe 34 von Auslesespeichern an die Rechen- und Registerschaltung 32, um die Auslösung des Befehles durch diese Schaltung zu bewirken. Daher erfolgt im Beispiel des vorangehenden Absatzes die Addition nur während der Ziffer 2, da die Additionsschaltung in der Rechen- und Registerschaltung 32 durch die WS-Leitung nur während dieses Teiles des Wortes aktiviert wird. Wenn die WS-Leitung den Signalpegel "o" hat, zirkuliert der Inhalt der Register in der Rechen- und Registerschaltung 32 unverändert. In Fig. 4 sind drei Beispiele von WS-Taktsignalen erläutert. In dem ersten Beispiel wird aus dem gesamten Wort

409826/0862

die Ziffernposition 2 ausgewählt. In dem zweiten Beispiel werden die letzten Il Ziffern ausgewählt. Dieses entspricht dem Mantissenabschnitt eines Gleitkomma-Wortformates. In dem dritten Beispiel wird das gesamte Wort ausgewählt. Die Benutzung des Wortwahl-Merkmales gestattet die wahlweise Auswahl, die übertragung, das Verschieben oder den Vergleich von Teilen der Registerinhalte innerhalb der Rechen- und Registerschaltung 32, wobei nur ein Grundbefehl wie ADDIEREN, ÜBERTRAGEN, VERSCHIEBEN oder VERGLEICHEN erforderlich ist. Schließlich ist eine gewisse Anpassung in den Wortwahlfeldern des Auslesespeichers (ROM) durch wahlweise Maskierung möglich.

Die I -Leitung überträgt seriell die Adressen der aus den

el

Auslesespeichern 0-7 der Speichergruppe 34 auszulesenden-Befehle. Diese Adressen stammen aus der Steuer- und Taktschaltung 30, welche ein Befehlsadressehregister aufweist, dessen Zählerstand bei jeder Wortzeit erhöht wird, es sei denn, daß ein Sprungbefehl oder ein Verzweigungsbefehl ausgeführt wird. Jede Adresse wird an die Auslesespeicher ROM 0-7 während der Bitzeiten b-n-b-,, übertragen und in dem Adressenregister jedes Auslesespeichers gespeichert. Indessen ist in einem gegebenen Zeitpunkt nur ein Auslesespeicher wirksam, und nur dieser Auslesespeicher spricht auf eine Adresse an, indem er einen Befehl auf der I -Leitung abgibt. Die Steuerung wird zwischen den Auslesespeichern 0-7 und durch einen ROM-ZLuslesebefehl übertragen. Diese Technik gestattet es, daß eine einzelne aus acht Bits bestehende Adresse sowie acht spezielle Befehle die acht Auslesespeicher mit jeweils 256 Wörtern adressieren.

Die START-Leitung überträgt einen aus einem Bit bestehenden Impuls, der während der Bitzeit' b_ auftritt und dazu verwendet wird, die Vorgänge der Datenspeicheranordnung 36 und des Eingabe/Ausgabeprozessors 38 mit denen der Rechen- und Registerschaltung 32 zu synchronisieren.

409826/QÖ6-2

Die BCD-Leitung überträgt numerische Daten zwischen der Rechen- und Registerschaltung 32, dem Eingabe/Ausgabeprozessor 38 und irgendwelchen Standardeinheiten oder wahlweise eingefügten Einheiten, die Datenspeicher enthalten. Das Format, der auf dieser Leitung übertragenen Daten ist in Fig. 4 dargestellt.

Die Übertragsleitung 42 überträgt den Zustand der Übertragsausgänge der Additionsschaltung in der Rechen- und Registerschaltung 32 an die Steuer- und Taktschaltung.30. Die Steuer- und Taktschaltung leitet aus dieser Information bedingte Verzweigungsbefehle her, entsprechend dem numerischen Wert des Inhalts der Speicher in der Rechen- und Registerschaltung 32.

Die Steuer- und Taktschaltung 30 ist derart aufgebaut, daß sie eine aus fünf mal acht Schaltern bestehende Matrix nach einer Zwischenverbindung absucht, welche die Betätigung einer Taste * angibt. Als Taste kann jede Art von Metall/Metallkontakt verwendet werden. Die mit dem Prellen von Kontakten verbundenen Probleme werden durch programmierte Ausblendungen bei einem Tasteneingabeprogramm vermieden. Jede Taste hat einen zugeordneten aus 6 Bits bestehenden Kode, um mehr als das Maximum von 40 Tasten aufzunehmen, das durch den Abtaster für die Matrix in der Steuer-und Taktschaitung dargestellt wird, ist eine zusätzliche Tastatur-Multiplexschaltung vorgesehen.

Ein Standard-Netzgerät enthält eine Schaltung zur Abgabe eines Signales, welches den Beginn des Betriebs des Rechners in bekannter Weise auslöst, wenn diesem Leistung zugeführt wird. Ein Leistungsschalter in der Tastatur steuert die Zufuhr der Betriebsleistung. Die primären Ausgänge des Rechners sind ein eingebauter Drucker 44 und eine wahlweise einsteckbare Anzeigeeinheit 46 mit Leuchtdioden.

409826/0882

Steuer- und Taktschaltung

Gemäß FIg. 4 und 6 enthält die Steuer- und Taktschaltung den Hauptzähler 52, und sie tastet die Tastatur 12 ab, speichert die Zustandsinformation über das System oder den Zustand eines Algorithmus und erzeugt die nächste Adresse eines Auslesespeichers. Sie erzeugt auch die Unterklasse der Wortwahl-(WS)-Signale, die den Hinweiskode 54 umfassen, der durch einen Zähler für 4 Bits dargestellt wird, welcher auf eine der Zifferpositionen in den Registern hinweist.

Die Steuereinheit der Steuer-und Taktschaltung 30 ist ein Mikroprogramm-Steuergerät 56 mit. einem Auslese-Steuerspeicher für 58 Wörter (25 Bits pro Wort), der Auslöse- oder Zustandsbedingungen aus dem Rechner aufnimmt und schrittweise Ausgangssignale zur Steuerung des Datenflusses erzeugt. Jedes Bit in diesem Steuer-Auslesespeicher entspricht entweder einer einzelnen Steuerleitung oder ist Teil einer Gruppe von N Bits, die in 2 sich einander ausschließenden Steuerleitungen kodiert sind und außerhalb des Steuer-Auslesespeichers dekodiert werden. In jeder Phase 2 des Taktgebers wird ein Wort aus dem Steuer-Auslesespeicher entsprechend seiher gegenwärtigen Adresse ausgelesen. Ein Teil des Ausgangssignales wird dann zurückgeführt und wird die nächste Adresse.

Es werden verschiedene Arten von Zustandsbedingungen überprüft. Da die meisten Befehle nur zu bestimmten Bitzeiten während der Wortperiode auftreten, sind zeitliche Zustandsbedingungen erforderlich. Das bedeutet, daß der Steuer-Auslesespeicher in einer Warteschleife sitzen kann, bis die entsprechende zeitliche Zustandsbedingung erfüllt ist, und dann kann die Steuerung an die nächste Adresse zur Abgabe eines Befehles übergehen. Andere Zustandsbedingungen entsprechen dem Zustand des Hinweisregisters, der Versorgungsleitung PWO, dem Übertrags- '. Flipflop und dem Zustand jedes der zwölf Zustandsbits.

409826/0862 ·

Da der Rechner ein serielles System auf der Basis von aus 56 Bits bestehenden Wörtern ist, wird ein Zähler 52 für 56 Bits zum Zählen dieser Bits verwendet. Es sind verschiedene Dekodierer für den Systemzähler 52 erforderlich. Das SYNC-Signal wird während der Bitzeiten ^b45~^b ₅4 erzeugt und an die Rechen- und Registerschaltung 32 und alle Auslesespeichergruppen übertragen, die in dem Rechnersystem vorhanden sind. Andere zeitliche Zustandsbedingungen werden an den Steuer-Auslesespeicher 56 übertragen, wie in dem vorherigen Absatz erläutert wurde.

Der Systemzähler 52 wird auch als Tastatur-Abtastvorrichtung gemäß Fig. 7 verwendet. Die 3 Bits des Systemzählers 52 mit der höchsten Wertigkeit werden an einen "eins aus acht"-Pekodierer 58 übertragen, der wahlweise eine der Zeilen 5O der Tastatur auswählt. Die 3 Bits mit der niedrigsten Wertigkeit zählen Modul 7 und werden an eine "1 s 5⁵¹ Multiplexschaltung 62 übertragen, welche schrittweise eine der Spalten 64 der Tastatur überträgt. Während Ϊ6 Taktzeiten wird keine Taste abgetastet. Der Ausgang der Multiplexschaltung wird als Signal ^ffaste gedrückt" bezeichnet. Falls ein Kontakt an irgendeiner Schnittstelle in der Matrix aus 5x8 durch Herabdrücken einer Taste hergestellt wird, erhält das Signal "Taste gedrückt¹¹ den Signalpegel "H" für einen Zustand des Zählersystemes 52, d.h. wenn die richtigen Leitungen für die Spalten und Seihen gewählt sind. Das Signal "Taste gedrückt" bewirkt, daß der Zustand des Systemzählers in einem Tastenkodespeicher 66 aufbewahrt wird. Dieser Kode aus 6 Bits wird dann an das Ädressenregister 68 übertragen und wird eine Startadresse für das Programm, welches die betätigte Taste bedient. Zwei führende O-Bits werden durch Hardware addiert, so daß eine aus 8 Bits bestehende Adresse existiert. Daher wird während jedes Zustands des Systemzählers 52 von der Dekodier/Multiplexschaltung 58 und 62 abgetastet, ob eine spezielle Taste gedrückt ist. Falls dieses der Fall ist, wird der Zustand des Systemzählers zur Startadresse zur Ausführung

4098 2 6/0862

der betreffenden Tastenfunktion. 16 der 56 Zustände werden nicht für Tastenkodes verwendet. Durch die Aufteilung der Funktionen des Systemzählers und durch eine Abtasttechnik für die Tastatur, welche direkt mit der MOS-Schaltung zusammenarbeitet, wird der Schaltungsaufwand wesentlich herabgesetzt.

Während die Steuer- und Taktschaltung 30-40 Tasten ohne die -Verwendung einer zusätzlichen Logikschaltung abtasten kann, kann die Tastatur 12 wahlweise mit 50 Tasten ausgestattet werden. Die zusätzliche Multiplexschaltung für die Tastatur zum Erhöhen der Abtastkapazität der Steuer- und Taktschaltung auf 50 Tasten ist in Fig. 8 dargestellt.

Ein Schieberegister mit 28 Bits, welche jeweils zweimal

/■ . . ■

während jeder Wortzeit von 56 Bits zirkulieren, wird in der Steuer- und Taktschaltung gemäß Fig. 6 verwendet. Diese 28 Bits werden in drei Funktionsgruppen, nämlich das Hauptadressenregister 68 (8 Bits)-, das Adressenregister 70 für die Unter- ■ Programmadresse (8 Bits) und das _Zustandsregister 72 (12 Bits) unterteilt.

Die Hauptauslesespeicher 0-7 enthalten jeweils 156 Wörter mit 10 Bits, welche eine Adresse mit 8 Bits erfordern. Diese Adresse zirkuliert durch eine serielle Addier/Subtraktionsschaltung 74 und wird während der Bitzeiten b₄_-b₅₄ erhöht, mit Ausnahme der Verzweigungs- und Unterprogrammsprung-Befehle, für welche das Adressenfeld mit 8 Bits des Befehles mit 10 Bits an Stelle der laufenden Adresse ersetzt wird. Die nächste Adresse wird über die I -Leitung an jeden der Hauptspeicher

3.

0-7 während der Bitzeiten b.„-b₂g übertragen.

Das Zustandsregister 72 enthält 12 Bits oder Flagen, welche dazu verwendet werden, den Zustand des Rechners zu verfolgen. Information darüber, ob der Dezimalpunkt gedrückt wurde oder

das Minuszeichen eingegeben wurde, muß in den Zustandsbits

erhalten bleiben."Zn jedem Falle erinnert sich der Rechner an -

4 09826/0882

-46 -

er
vergangene Ereignisse, indem ein geeignetes Zustandsbit setzt und später fragt, ob es gesetzt ist. Eine positive Antwort auf eine Zustandsanfrage setzt das übertragungsflipflop 76, wie durch das Steuersignal IST in Fig. 6 angezeigt ist. Jedes Zustandsbit kann gesetzt oder zurückgesetzt oder abgefragt werden, während es durch die Additionsschaltung 74 zirkuliert _t wenn ein entsprechender Befehl gegeben wird.

Der Befehlssatz läßt eine Höhe von Unterprogramraaufrufen zu. Die Rückkehradresse ist in dem Rückkehradressenregister 7O mit 8 Bits gespeichert. Die Ausführung eines ünterprogrammsprung-Befehles speichert die erhöhte vorliegende Adresse in das Rückkehradressenregister 70. Die Ausführung des Rückkehrbefehles bringt diese Adresse wieder zur übertragung über die I -Leitung zurück. Es werden Verknüpfungen verwendet, um die 28 Bits abzufragen, welche in dem Schieberegister 68 bis 72 zirkulieren, um die Adressen zum geeigneten Zeitpunkt einzusetzen, wie durch das JSB-Steuersignal in Fig. 6 angegeben ist.

Ein wichtiges Merkmal des Rechners besteht in der Fähigkeit, daß er eine einzelne Ziffer oder eine Gruppe von Ziffern, beispielsweise das Exponentenfeld, aus den Registern für 14 Ziffern verarbeiten kann. Dieses Merkmal wird durch die Verwendung eines 4-Bit-Zeigers 54 erreicht _t welches auf die interessierende Ziffer hinweist." Es sind.Befehle verfügbar, um den Hinweiszähler 54 zu setzen, zu erhöhen, zu erniedrigen und abzufragen. Der Hinweiszähler wird durch die gleiche serielle Additions/Subtraktionsstufe 74 erhöht oder erniedrigt _f welche für die Adressen verwendet wird. Eine positive Antwort auf den Befehl "IST HINJfEXSREGISTER N" setzt das Übertragsflipflop 76 über die Steuerleitung IPT in Fig. 6.

Das Wortwählmerkmal wurde bereits in Verbindung mit Fig«, 3 und 5 diskutiert. Einige der Wortwählsignale x-jeräea in äer Steuer- unä Taktschaltung 3O erseugt_f nämlich jene? die -won &em. Hinweiszähler 54 - abhängen, und der Rest der Wortwshisignale

4 09826/0882

wird in den Hauptauslesespeichern 0-7 erzeugt. Die Möglichkeiten für den Wortwählzeiger bzw. Zähler 54 sind'(1) lediglich Zeigerposition und (2) Zeigerposition und alle Ziffern mit niedrigerer Wertigkeit. Wenn beispielsweise die Mantissen-Vorzeichen der Zahlen in den Registern A und C der Rechen-und Registerschaltung 32 ausgetauscht werden sollen, würde der Zeiger auf die Position 13 (letzte Position) gesetzt und der Befehl "TAUSCHE A MIT C AUS" würde bei einem Wortwählfeld der Zeigerposition gegeben. Falls das ganze Wort mit Ausnahme des Mäntissenvorzeichens ausgetauscht werden soll, würde der Befehl "TAUSCHE A MIT C AUS" gegeben, wenn der Hinweiszähler auf 12 steht und das Wortwählfeld auf den Wert des Hinweiszählers und die weniger bedeutenden Ziffern eingestellt ist. Der Wortwähl"-(WS)-Ausgang der Steuer-und Taktschaltung ist durch eine ODER-Verknüpfung mit dem Wortwähl-Ausgang des Auslesespeichers verbunden und wird an"die Rechen- und Registerschaltung 32 übertragen.

Jedes Übertragssignal der Additionsschaltung in der Rechen- und Registerschaltung 32 setzt das Übertragsflipflop 76, wenn ■ die Wortwählschaltung ebenfalls den Nullpegel H aufweist. Dieses Flipflop wird während des Verzweigungsbefehles abgefragt um zu bestimmen, ob die vorliegende Adresse erhöht (ja-Übertrag) oder durch die Verzweigungsadresse ersetzt werden soll (kein übertrag). Die Verzweigungsadresse wird in einem Adressenspeicher 78 für 8 Bits gespeichert und durch das BRH-Steuersignal auf der I -Leitung durchgeschaltet.

Das Signal über die Einschaltung der Leistung wird dazu verwendet, die Startbedingungen des Rechners zu synchronisieren und vorher einzustellen. Es hat zwei Funktionen, von denen die eine darin besteht, die Adresse des Steuerauslesespeichers 56 auf den geeigneten Startzustand einzustellen und den Systemzähler 52 in der Steuer- und Taktschaltung 30 mit dem Zähler in jedem der Auslesespeicher ROM 0-7 zu synchronisieren.' Wenn

409826/0862

2O -

die Versorgungsieistung eingeschaltet wird, hat das PWO-Signäl wenigstens während der Dauer einer Sekunde den Logikpegel "1", welcher in diesem System O V entspricht. Dadurch wird es dem Systemzähler 52 erlaubt, wenigstens einen Schritt durch die Bitzeiten b.^-h,.λ ^zu unternehmen, wenn die SYNC-Leitung den Pegel "H" hat, wodurch der Hauptauslesespeicher 0 aktiviert und der Rest der Äuslesespeicher stillgesetzt wird. Wenn das Signal PWO den Logikpegel "0" (+6 V) aufweist, wird die Adresse des Steuerauslesespeichers 56 auf 000000 gesetzt, wo der richtige Betrieb beginnen kann.

Rechen- und Registerschaltung

Die in Fig. 9 dargestellte Rechen- und Registerschaltung 32 bewirkt die Rechenfunktionen und einen Teil der Datenspeicherung für den Rechner. Sie wird durch die WS-, I - und SYNC-Leitungen gesteuert und empfängt Befehle über die Äuslesespeicher ROM 0-7 über die I -Leitung und gibt die Information zurück an die Steuer- und Taktschaltung 30 über die Übertragsleitung 32 und dekodiert teilweise die Anzeigeinformation, bevor sie diese über die Ausgangsleitungen 80 an den Anodentreiber der Ausgangsanzeigeeinheit 14 abgibt. Sie gibt einen Startimpuls an die KathodentreiberschaItung der Änzelgeeinheit"14 zur Synchronisation der Anzeige ab, und dieser Startimpuls wird auch zur Synchronisation des Eingabe/Äusgabeprozessors und aller Datenspeicher in dem Rechner verwendet.

Die Rechen- und Registerschaltung 32 enthält sieben dynamische Register A-F und M mit jeweils 14 Ziffern {56 Bits) und eine serielle, im BCD-Kode arbeitende Additions/Subtraktionsschaltung 82. Die wegen ihrer Komplexität in Fig. 9 nicht dargestellten tatsächlichen Datenwegen werden nachfolgend anhand von Fig. diskutiert. Die Leistung und Flexibilität eines Befehlssatzes wird zu einem großen Teil durch die Vielzahl der verfügbaren Datenwege bestimmt» Einer der Vorteile eines seriellen Aufbaus

,409826/08 62

besteht darin, daß zusätzliche Datenwege nicht sehr kostspielig sind und nur ein zusätzliches Verknüpfungsglied pro Signalpfad erfordern. Der Aufbau der Rechen- und Registerschaltung 32 wird für die Algorithmen optimiert, die für den Rechner erforderlich sind.

Die sieben Register A-F und M können in drei Gruppen unterteilt werden: (1) Die Arbeitsregister A, B und C, wobei C das Bodenregister eines Stapels aus vier Registern ist; (2) die nächsten drei Register D, E und F in dem Stapel; und (3) ein getrenntes Speicherregister M*, welches mit den anderen Registern nur durch das Register C in Verbindung steht. In Fig. 10, welche die Datenwege darstellt, die alle Register A-F und M verbinden, stellt jeder Kreis das aus ■ 56 Bits bestehende Register dar,"das durch den Buchstaben in den Kreis bestimmt ist. In dem Leerlaufzustand, in welchem in der Rachen- und Registerschaltung 32 kein Befehl ausgeführt wird, zirkuliert jedes Register kontinuierlich, da bei dynamischen MOS-Registern die Information durch eine Ladung auf einer parasitären Kapazität dargestellt wird und kontinuierlich erneuert werden muß oder verloren geht. Dieses ist durch die wieder in jedes Register eintretende Schleife dargestellt.

Die Register A, B und C können alle ausgetauscht werden. Entweder das Register A oder das Register B ist mit einem Additionseingang verbunden und entweder das Register B oder das Register C ist mit dem anderen Eingang verbunden. Die Additionsschaltung kann entweder mit dem Register A oder dem Register C verbunden werden. Gewisse Befehle können einen übertrag über das Übertragsflipflop 76 auslösen, welcher an die Steuer- und Taktschaltung 30 übertragen wird, um die bedingte Verzweigung zu bestimmen. Das Register C speichert jeweils eine, genormte Version der dargestellten Daten.

In dem durch die Register C, D, E und F gebildeten Speicher wird ein Befehl "HERUNTERROLLEN^H (ROLL DOWN)" durch die folgenden

409826/0 86 2

Übertragungen ausgeführt: F-*E-*D-*C->D. Ein Befehl "STAPEL· AUFWÄRTS" (STACK UP) wird durch die folgenden Signalübertragungen ausgeführt: Qc-*D^E-tP. Daher ist es möglich, einen Registerinhalt zu übertragen und ihn zirkulieren zu lassen, so daß in dem letzten Beispiel der Inhalt von C nicht verloren geht. Die Struktur und der Betrieb eines derartigen SpeicherstapeIs werden in der deutschen Anmeldung P 22 57 350.8-53 beschrieben.

In der seriell/dezimalen Additions/Subtraktionsstufe 82 muß eine Korrektur (Addition von 6} zu einer BCD-Summe vorgenommen werden, falls die Summe 9 übersteigt. (Eine ähnliche Korrektur ist für die Subtraktion erforderlich.) Es ist nicht bekannt, ob eine Korrektur erforderlich ist, bis die ersten drei Bits der Summe erzeugt worden sind. Dieses erfolgt durch die Addition des Inhaltes des Registers 84 (A^ -A₁.-) mit 14 Bits und indem die berichtigte Summe in einen Abschnitt 88 (A₅₆-A₅₃) des Registers A eingesetzt wird, falls ein Obertrag erzeugt wird. •Dieses Register 84 ist auch für einen Befehl- "SCHIEBE Ä NACH LINKS" erforderlich. Eines der Charakteristiken einer dezimalen Ädditionsstufe besteht darin, daß nicht im BCD-Kode enthaltene Kodes, beispielsweise 1101 nicht erlaubt sind'. Sie werden modifiziert, falls sie durch die Additionsschaltung zirkuliert werden. Die Additionslogik wird herabgesetzt, um Schaltkreisfläche zu sparen. Falls andere Kodes mit 4 Bits als OOOO-1OOI verarbeitet werden, so werden sie modifiziert. Hierdurch ergibt sich keine Beschränkung für Anwendungen, welche nur numerische Daten erfordern. Wenn jedoch ASCII-Kodes verarbeitet werden, werden fehlerhafte Ergebnisse erhalten.

Die Rechen-und Registerschaltung 32 empfängt den Befehl während der Bitzeiten b. -b .. Von den zehn Arten von nachfolgend beschriebenen Befehlen muß die Rechen- und Registerschaltung 32 nur auf zwei Arten? nämlich auf Rechen- und Registerbefehle und Dateneingangs/Anzeigebefehle reagieren. Die Rechen- und Seglsterbefehle werden durch eine Zehn in den beiden Bits mit der niedrigsten Stellenwertigkeit in dem I -Register 86 kodiert»

409826/0862

Wenn diese Kombination erfaßt wird, werden die 5 Bits mit der höchsten Stellenwertigkeit in dem I -Register 86 ge-

speichert und durch den Befehlsdekodierer 90 in einem von 32 Befehlen dekodiert.

Die Rechen- und Registerbefehle sind nur dann wirksam, wenn das Wortwählsignal (WS) in einem der Auslesespeicher ROM O-7 oder in der Steuer- und Taktschaltung 30 den Logikpegel "1" aufweist. Es werde beispielsweise angenommen, daß der Befehl A+O*C d.h."MANTISSE LEDIGLICH MIT VORZEICHEN" aufgerufen wird. Die Rechen- und Registerschaltung 32 dekodiert nur A+C*C. Sie setzt die Register A und C an den Eingängen auf die Additionsschaltung 82 und,wenn die Leitung WS das Potential "H" hat, verbindet sie den Ausgang der Additionsschaltung mit dem Register C. Die tatsächliche Addition findet nur während der Bitzeiten t>,₂-b_₅ statt (Ziffern 3 bis 13) , da während der ersten drei Ziffernzeiten der Exponent und das .Exponentenvorzeichen zirkulieren und unverändert zu ihren ursprünglichen Registern zurückgeleitet werden. Das Wort Wählsignal ist ein Auslösebefehl in der Rechen- und Registerschaltung 32. Wenn es den Logikpegel "1" hat, wird der Befehl ausgeführt, und wenn es den Logikpegel "0" hat, zirkulieren alle Register weiter.

Die Dateneingangs/Anzeigebefehle mit Ausnahme der Zifferneingabe, beeinflussen ein ganzes Register, wenn das in dem aktiven Auslesespeicher erzeugte Wortwählsignal den Logikpegel "1" für den gesamten Wortzyklus aufweist. Einige dieser Befehle sind: STAPEL AUFWÄRTS (UP STACK), STAPEL ABWÄRTS (DOWN STACK), .SPEICHERAUSTAUSCH M «■> C, ANZEIGE EIN oder ANZEIGEN FLICKERN. Nachfolgend wird ein Befehl über ihre Anzeige gegeben.

Für größere Leistungsersparnisse ist der Anzeigedekodierer so eingeteilt, daß er teilweise die BDC-Daten in sieben Segmente und einen Dezimalpunkt in der Rechen- und Registerschaltung 32 unterteilt, indem fünf Ausgangsleitungen (A-E) 80 mit der

409826/0862

Zeit als dem anderen Parameter verwendet werden. Die Information für sieben Segmente (a-g) und einen Dezimalpunkt (dp) wird zeitlich versetzt auf den fünf Ausgangsleitungen A-E übertragen. Die Ausgangswellenformen für die Ausgangsleitungen A-E sind in Fig. 11 dargestellt. Beispielsweise überträgt die Leitung D die Information über das Segment e während der Zeit T. (erste Bitzeit jeder Ziffernzeit) und das Segment d die Information während der Zeit T (zweite Bitzeit jeder Ziffernzeit) . Der Ausgang E überträgt die Information über das Segment g während der Zeit T,, die Information für das Segment f während der Zeit T_ und die Information über den Dezimalpunkt (dp) während der Zeit T₄. Die tatsächlichen Signale, welche auftreten würden, falls die Ziffer 9 dekodiert würde, sind in Fig. 12 dargestellt. Die Dekodierung wird in der Anodentreiberschaltung der Anzeigeeinheit 14 abgeschlossen, wie noch er- · läutert wird.

Die Register in der Rechen- und Registerschaltung 32 enthalten 14 Binärziffern mit zehn Mantissenziffern, das Mantissenvorzeichen, zwei Exponentenziffern und das Exponentenvorzeichen. Obgleich der Dezimalpunkt nicht in einem Register gespeichert ist, ist für ihn eine volle Ziffernposition in der Anzeige vorgesehen. Dieser scheinbare Widerspruch ergibt sich dadurch, daß die Register A und B zum Speichern von Anzeigeinformation verwendet werden. Das Register A wird eingestellt, so daß es die angezeigte Zahl mit den Ziffern in der richtigen Reihenfolge hält. Das Register B wird als Maskierungsregister verwendet, wobei die Ziffer 9 an der Stelle des Dezimalpunktes eingesetzt wird. Wenn der Anodentreiber der Ausgangsanzeigeeinheit 14 einen Dezimalpunktkode während der Zeit T₄ erfaßt, gibt sie ein Signal an die Kathodehtreiberschaltung der Ausgangsanzeigeeinheit ab, wodurch die Steuerung an die nächste Ziffernposition übergeht. Eine Ziffer und der Dezimalpunkt teilen sich in die 14 Ziffernzeiten. Die Ziffernmaske 9 in dem Register B gestattet es, daß sowohl die hinteren als auch

409826/086 2

die vorderen Nullen ausgetastet werden, beispielsweise indem die Ziffern "9" in das B-Register eingegeben werden. Die Verwendung der drei Arbeitsregister für die Anzeige, d.h. des C-Registers zum Speichern der Zahl in der normierten Form, des Α-Registers zum Speichern der Zahl in der angezeigten Form und des B-Registers als Maske, gestattet es dem Rechner, sowohl in Gleitkomma-Schreibweise als auch in Festpunkt-Schreibweise Zifferarbeiten, wobei nur einige zusätzliche Zustände der Auslesespeicher besetzt werden.

Das Austasten der Anzeige wird in folgender Weise vorgenommen: Im Zeitpunkt T. wird die Ziffer BCD vom Register A in das Anzeigeregister 94 weitergegeben* Wenn die Ziffer ausgetastet werden soll, enthält das .Register B eine 9 (1001), so.daß im Zeitpunkt T₄ das Schlußbit (B_Ql> des B-Registers "1" ist, wozu auch eine Acht verwendet werden könnte. Der Eingang für das Anzeigeregister 94 ist über eine ODER-Verknüpfung mit dem Register für das Bit B .. verbunden und wird auf .1111 gesetzt, wenn die Ziffer ausgetastet werden soll. Der Dezimalpunkt wird in ähnlicher Weise behandelt. In das Register B wird an der Stelle des Dezimalpunktes eine Zwei (OOIO) eingegeben. Im Zeltpunkt T₂ wird das Flipflop für den Dezimalpunkt auf Bq, gesetzt. Jede Ziffer mit einer Eins in der zweiten Stelle, d.h. 2,3, 6 oder 7, setzt den Dezimalpunkt.

Der Anzelgedekodierer 92 gibt ebenfalls ein Startsignal an die Leitung 48 ab. Dieses Signal ist ein Wortsynchronisierimpuls, welcher den Ziffernabtaster in der Kathodentreiberschaltung der Anzeigeeinheit 14 zurücksetzt um sicherzustellen, daß die Kathodentreiberschaltung die Ziffer "1" auswählt, wenn die Information über die Ziffer "1" sich auf den Ausgängen A, B, C, D und E befindet. Die Zeitfolge für dieses Signal ist in Fig. 13 dargestellt.

Es ist ein weiteres spezielles Dekodiermerkmal erforderlich. Ein Minuszeichen wird als das Zehnerkomplement oder als Vor-

409826/0862

zeichen und Größe durch die Ziffer 9 an der Vorzeichenstelle dargestellt. Jedoch darf .die Anzeige nur ein Minuszeichen, d.h. das Segment g darstellen. Die Ziffer 9 im Register A in der Ziffernposition 2 (Exponentenzeichen) oder die Position' 13 {Mantissenzeichen) muß als Minuszeichen dargestellt werden. Die Dekodierschaltung verwendet den Impuls auf der I -Leitung zur Bitzeit b.... (Fig. 5) um herauszufinden, daß die Ziffer 9 in der Ziffernposition 2 des Registers Ä ein Minuszeichen sein sollte und sie verwendet den SYNC-Impuls, um zu bestimmen, daß die Ziffer 9 in der Ziffernposition 13 des Registers A ebenfalls ein Minuszeichen sein sollte. Der Impuls auf der I -Leitung zur Bifezeit b,, kann durch eine Maskierungsoption

S J—L

gesetzt werden, wodurch das Minuszeichen des Exponenten an anderen Stellen für andere Zwecke der Rechnerschaltkreise auftritt.

Auslesespeicher

Die Gruppe 34 der Äuslesespeicher gemäß Fig. '3 enthält acht einzelne Auslesespeicher MOS O-7. Diese Schaltungen speichern die Unterprogramme, welche für die Ausführung der verschiedenen Funktionen des Rechnersystemes erforderlich sind. Jeder Auslesespeicher ROM enthält 256 Wörter mit jeweils 10 Bits, so daß insgesamt 15 360 Bits in der gesamten Gruppe von Auslesespeichern zur Verfügung stehen. Ein detailliertes Diagramm der Gruppe 34 der Auslesespeicher, aus welchem jeder der Speicher 0-7 hervorgeht, ist in Fig. 16 dargestellt. Ein Blockdiagramm einer der Speicherschaltungen ist in Fig. 17 dargestellt. Da die Auslesespeicher 0-7 identisch sind mit der Ausnahme ihrer Programmierung, ist in dem Blockdiagramm nur eine derartige Schaltung dargestellt.

Zusätzlich zu der Gruppe 34 der Auslesespeicher in der Standardausführung des Rechners, können andere Gruppen von Auslesespeichern in einem speziellen Rechner bei verschiedenen Rechneroptionen vorhanden sein. Beispielsweise enthält jeder

409826/086 2

- 37 - "

Einsteck-Tastaturfunktionsblock eine Auslesespeicher-Gruppe, ebenso wie die wahlweise verwendbaren Datenspeicher und jede Interfacekarte für eine Peripherie-Eingabe/Ausgabeschaltung.

Fig. 44 stellt die Schaltung dar, welche zur Auswahl der Gruppe von Auslesespeichefn erforderlich ist, um jede gegebene Funktion auszuführen. Das Kernstück dieser Schaltung besteht in einem Satz aus drei Flipflops, deren Ausgänge mit A, B und C bezeichnet sind. Jeder dieser Flipflops enthält die Hälfte eines Paketes 184 von Zwischenspeichern des D-Typs. Es werden verschiedene Logikglieder verwendet, um die Zustände dieser drei Flipflops zu steuern. Die Ausgänge A, B und C sind mit der Gruppe 34 in dem Hauptsystem, der Funktionsblock-Gruppe der Auslesespeicher bzw. der wahlweise vorhandenen Gruppe von Datenspeichern verbunden. Diese Ausgänge steuern die Logikglieder für ihre entsprechenden Gruppen von Auslesespeichern.

Die Gruppe von Auslesespeichern, die jeder Interfacekarte für ein Peripherie-Eingabe/Ausgabe-Gerät zugeordnet ist, dient der Eigensteuerung und enthält daher ein eigenes Flipflop. In dem Zeitpunkt, in welchem eine Gruppe von Auslesespeichern eingeschaltet wird, gibt die ausgewählte Peripherie-Eingabe/Ausgabeeinheit einen negativen Impuls, an die RGC-Leitung in Fig. 44. Dadurch werden die Flipflops A, B und C zurückgesetzt.

Fig. 44 enthält auch eine Schaltung 186 zur Leistungseinschaltung, die ein P]WO-Signal zur Betätigung der gesamten Hardware des Rechners abgibt. Die PWO-Leitung verbleibt etwa während 1,5 s nach der Einschaltung der Netzgeräte auf dem Pegel "L". Dadurch wird sichergestellt, daß der Druckermotor seine volle Geschwindigkeit erreicht hat und der Vektorenzähler für den Drucker in der Eingabe/Ausgabeschaltung mit dem Drucker synchronisiert ist. Zusammengefaßt werden durch das PWO-Signal die folgenden Funktionen ausgeführt:

1. Ein unerwünschter Betrieb des Druckers während des , Einschaltens wird vermieden,

409826/0862

2. die Druckerschaltung in der Eingabe/Ausgabe schaltung wird zurückgesetzt,

3. der Befehlssatz 1 wird ausgewählt,

3. die Standard-Auslesespeichergruppe (ROM-Gruppe A) wird ausgewählt,

5. in jeder Gruppe von Auslesespeichern wird der Auslesespeicher O eingeschaltet,

6. es wird sichergestellt, daß die erste Adresse des Auslesespeichers nach der Beendigung des PWO-Signales die Adresse O ist.

Prinzipiell gibt jeder Auslesespeicher in der Hauptspeichergruppe 34 der Fig. 16 bei einer seriellen Eingangsadresse eine serielle Ausgangsadresse ab. Während jeder Wortzeit von 56 Bits wird eine Adresse eingegeben,und zwar zunächst das Bit mit der niedrigsten Wertigkeit, vom Bit b.._q bis zum Bit b_2fi. Jeder Auslesespeicher 0-7 in dem System erhält die gleiche aus 8 Bits bestehende Adresse und versucht von der Bitzeit b.j- bis zu der Bitzeit b_₄ ein Aus gangs signal an die I -Leitung abzugeben. Jedoch stellt ein Flipflop 96 für ein Speicher-Aus lös es xgnal (ROE) in jedem AusIesespeieher sicher, daß nicht mehr als ein Auslesespeicher einen Befehl auf der I -Leitung gleichzeitig abgeben kann.

Alle Äusgangssignale werden invertiert, so daß die im Dauerbetrieb abgegebene Leistung reduziert wird. Die Rechenschaltungen sind in P-Kanal-MOS-Technik ausgeführt. Deshalb sind die wirksamen Signale, welche ein Logikglied einschalten, jeweils die negativeren Signale. Dieses wird als negative Logik bezeichnet, da der negativere Logikpegel die logische "1" bildet. Wie schon erwähnt wurde, wird der Logikpegel "0" durch +6 V und der Logikpegel "1" durch 0 V dargestellt. Die Signale auf den I -

und I -Leitungen entsprechen in der Regel dem Logikpegel "O". Wenn die Ausgangspufferspeicher in dem Logikzustand ¹¹O" belassen werden, so verbrauchen sie mehr Leistung. Um dieses zu verhindern, werden die Signale auf den I - und I -Ausgängen

409826/0862

invertiert und die Signale aller Eingänge wiederum invertiert. Daher erscheinen die Signale auf den I - und I -Ausgangsleitungen als positive Logik. In Fig. 19 ist das Muster dargestellt, welches auf dem Oszillografen im Zustand 11 010 für den Befehl 1101 110 011 erschiene.

Wegen des seriellen Betriebes des Rechners ist eine sorgfältige Synchronisation erforderlich. Diese erfolgt durch den SYNC-Impuls, der in der Steuer- und Taktschaltung 30 erzeugt wird und während der Bitzeiten b.,--^. existiert. Jeder Auslesespeicher ROM"hat seinen eigenen Zähler 98 für 56 Zustände, der mit dem Systemzähler 52 in der Steuer- und Taktschaltung 30 synchronisiert ist. Die dekodierten Signale vom Zustandszähler 98 öffnen den Eingang für das Adressenregister. 100 zur Bitzeit b._q, bewirken zur Bitzeit b.,. durch das Taktsignal einen I -Befehl und ergeben andere Steuertaktsignale.

Wenn das System eingeschaltet wird, liegt die PWO-Leitung auf OV (d.h. auf dem Logikpegel "1") während wenigstens einer Sekunde. Die PWO-Leitung ist über eine entsprechende Maskierung derart verbunden, daß sie das Auslöseflipflop 96 bei dem Haupt-Auslesespeicher ROM 1 setzt und dieses bei allen anderen Auslesespeichern zurücksetzt. Wenn der Betrieb beginnt, ist daher der Auslesespeicher ROM 0 der einzige aktive Auslesespeicher. Zusätzlich sperrt die Steuer- und Taktschaltung 30 den Adressenausgang während des Einschaltvorganges, so daß die erste Auslesespeicher-Adresse 0 ist. Der erste Befehl muß ein Unterprogrammsprung/Befehl sein, damit das Adressenregister 68 in der Steuer- und Taktschaltung 30 richtig geladen wird.

Fig. 18 erläutert die wichtigen Zeitpunkte für eine typische Adressierfolge. Während der Bitzeiten b.._ - b_2g wird die Adresse seriell von der Steuer.- und Taktschaltung 30 aufgenommen und in das Adressenregister 100 über die I -Leitung

el

eingegeben. Diese Adresse wird dekodiert, und zur Bitzeit b^

409826/0 862

wird der gewählte Befehl parallel in das I -Register 1Q2

weitergeleitet. Während der Bitzeiten b₄₅-b,-₄ wird der Befehl seriell auf-der I -Leitung von dem aktiven Auslesespeicher gelesen, d.h. von dem Auslesespeicher, dessen Auslöseflipflop gesetzt ist..

Die Steuerung wird zwischen den Auslesespeichern durch einen Auslesespeicher-Wählbefehl übertragen. Dieser Befehl schaltet das Auslöseflipflop des aktiven Auslesespeichers aus and schaltet ein Auslöseflipflop 96 für den gewählten Auslesespeicher ein. Dieses hängt davon ab,, daß das Auslösef lipf lop ein Zwischenspeicherflipflop ist. In dem aktiven Äuslesespeicher wird der Auslesespeicher-Wählbefehl durch einen Dekodierer 104 zur Bitzeit 44 dekodiert und der Eingangsteil des Auslöseflipflops 96 gesetzt. Der Arbeitsteil dieses Flipflops wird erst am Ende der Wortzeit b,.,.- gesetzt. In den passiven Auslesespeichern wird der Befehl seriell in das I -Register 102 während der Bitzeiten b.^-b^. eingelesen. und dann dekodiert und das Auslöseflipflap 96 wird zur Bitzeit bj-j. in dem ausgewählten Auslesespeicher gesetzt. Eine Maskierung bei der Dekodierung der drei Bits mit der niedrigsten Wertigkeit in dem I -Register 102 gestattet es, daß

jeder Auslesespeicher nur auf seinen eigenen Kode anspricht.

Die sechs sekundären Wörtwählsignale werden in den Haupt-Auslesespeichern ROM 0-7 gespeichert. Nur die beiden Wörtwählsignale, welche von dem Hinweisregister abhängen, stammen von der Steuer- und Taktschaltung 30, Der Wortwählabschnitt des Befehles wird in dem Wortwählregister 106 {ebenfalls ein Zwischenspeicher) gespeichert. Falls die ersten beiden Bits Ol sind, handelt es sich um einen Rechenbefehl, für den der Auslesespeicher ein Wortwähl-Verknüpfungssignal erzeugen muß. Zur Bitzeit b,.,. werden die nächsten drei Bits an den Arbeitsteil des Flipflops weitergegeben und gespeichert, so daß sie in der nächsten Wortzeit in sechs "eins aus sechs"-Signale dekodiert werden können. Der Synchronisationszähler 98 stellt

409826/0862

die Taktinformation für den Wortwähl-Dekodierer 108 bereit. Das Ausgangs-Wortwählsignal (WS) wird durch das Auslöseflipflop 96 derart weitergeleitet, daß nur der aktive Auslesespeicher ROM auf der WS-Leitung ein Ausgangssignal abgeben kann, welches über ein ODER-Glied mit allen anderen Auslesespeichern und auch der Steuer- und Taktschaltung 30 verbunden ist. Das WS-Signal gelangt an die Rechen- und Registerschaltung 32 und steuert den Abschnitt einer Wortzeit, in welchem ein Befehl wirksam ist.

Die sechs in dem Rechner verwendeten und durch die Auslesespeicher erzeugten Wortwählsignale sind in Fig. 20 erläutert. Die Auslesespeicher 0-7 geben einen einzigen Impuls auf der I -Leitung zur Bitzeit b,, ab, um die Zeit für das negative Vorzeichen des Exponenten zu bezeichnen. Dieser Impuls wird in dem Anzeige-Dekodierer der Rechen-und Registerschaltung dazu verwendet, um eine Neun in ein angezeigtes Minuszeichen umzuwandeln. Der Zeitpunkt dieses Impulses wird durch eine Maskierung des Auslesespeichers bestimmt.

Eingabe/Ausgabeschaltung

Der Eingabe/Ausgabeprozessor 38 ist in Fig. 3 und Fig. 21 dargestellt. Er enthält eine MOS/LSI-Eingangs/Ausgangsschaltung 110_feinen "eins aus sechzehn"-Dekodierer 112 und verschiedene Logikglieder. Der Prozessor dient als binäre Rechenlogikeinheit, treibt den Drucker an und steuert den Fluß der Befehle und Adressen zwischen der Rechen-und Registerschaltung, der Steuer-und Taktschaltung und der Gruppe von Auslesespeichern.

Der Prozessor 38 ist mit der Rechen- und Registerschaltung und der Steuer- und Taktschaltung durch acht Signale verbunden, und zwar erstens die Eingangstaktphase (O₁), zweitens die Ausgangstaktphase (0.), drittens das Signal "LEISTUNG EINGESCHALTET" (PWO), viertens die Befehlsleitung (I), fünftens

4 0 9 8 2 6 /0*862 .

das Taktsignal (START) , sechstens die Datensammelleitung (BCD), siebtens die Markierung«leitung (FLG) und achtens einerjanderen Adresseneingang (EXT) des Auslesespeichers ROM.

Die Schaltung 110 enthält 20 Ausgänge (C1-C20) mit parallelen Datensignalen, die durch das Druckwerk verwendet werden« C13 steuert den Druckwerks-Elektromagneten für die Spalte 13. C19 und C20 steuern die Befehle: DRUCKEN, BEREITSTEHEN, PAPIERVORSCHUB und RED. Die Ausgänge C9-C18 werden als Speicheradressenleitungen verwendet, wenn ein ROM oder PROM oder Lese/Schreibspeicher in den Rechner eingesteckt wird. Die Ausgangsieitungen C1-C8 werden in beiden Richtungen betrieben und als Eingänge verwendet,wenn die Zwischenspeicherleitung geerdet ist. Die Ausgangsleitungen Cl bis C18 sowie die Zwischenspeicher- und GIOE-Leitungen sind jeweils in einem Intervall jedes Eingabe/Ausgabe-Peripheriegerätes verfügbar und werden durch die jedem Peripheriegerät zugeordnete Interface-Software ausgewählt.

Die EISl-Leitung gemäß Fig. 21 wird dazu verwendet, um die Befehlsleitung I zu steuern. Sie enthält auch einen der Eingänge zusammen mit den Leitungen I0C1, I0C2 und I0C3 für. den "eins aus sechzehn"-Dekodierer 112. Es würden an sich Schaltspitzen zu erwarten sein, wenn die verschiedenen IOC-Leitungen ihren Zustand wechseln. Um dieses Problem auszugleichen, wird ein Dekodiersignal SCE durch die Eingabe/Ausgabeschaltung HO verwendet. Durch diese Technik werden insgesamt 14 verschiedene Steuersignale vom Dekodierer 112 als Impulse mit näherungsweise 200 us Dauer empfangen. Diese Signale sind in.der nachfolgenden Tabelle angegeben.

Dekodiereranschluß Funktion

1 Frage Taste "DRUCKER AUS" ab,

2 . frage Tastatur-Funktionsblock

markierung ab,

3 schalte Warnlicht ein,

409826/0862

Dekodiereranschluß Funktion

4 Lesebefehl für Einsteck-Auslesespeicher

ROM oder PROM

5 frage Taste"AUTO DEZIMALE" ab,

6 wähle Auslesespeicher-Gruppe für

Datenspeicheroption,

7 wähle Auslesespeicher-Gruppe für

Funktionsblock,

8 gib Steuerung zur Haupt-Auslesespeicher-Gruppe zurück,

9 ' TG8 (reserviert zur Steuerung von

Peripheriegeräten),

10 TG9 (reserviert zur Steuerung von

Peripheriegeräten), ■

14 allgemeine Eingabe/Ausgabeauslösung,

15 schalte Warnlicht ab,

16 Schreibbefehl für Lese/Schreibspeicher,

17 YINTF-Befehl zur Steuerung der Peripheriegeräte gespeichert.

Gemäß Fig. 21 wird die Leuchtdiode (LED) 114 als Warnlicht verwendet. Im eingeschalteten Zustand zeigt diese Lampe an, daß der Rechner beschäftigt ist und keine Tastaturbefehle aufnehmen kann. Das Warnlicht wird beim Einschalten der Leistungseinschaltfolge, während der Ausführung einer der Pr.ogramme mit Exponentenfunktionen oder während der Ausführung eines Programmes der Programmbibliothek eingeschaltet. Beim Abschluß irgendeiner dieser Funktionen wird das Warnlicht ausgeschaltet, und der Rechner nimmt dann Tastatureingangssignale auf.

Der Zustand der Tasten "DRUCKER ABGESCHALTET" und "AUTO DEZIMALE" sowie der FPS-Leitung, welche von der Tastatur-Multiplexschaltung ausgeht, wird durch den Dekodierer 112 überprüft. Falls das geeignete Signal vorhanden ist,.wird die FLG-Leitung auf ein niedriges Potential während etwa 200 μβ gebracht. Diese Leitung kann durch die Interfaceschaltung verwendet werden, welche ver-

40 9826/0862

schiedenen Eingabe/Ausgabe-Peripheriegeräten zugeordnet ist.

Die Eingangsleitung TP und TR für die Eingabe/Ausgabeschaltung 110 sind vom Drücker aufgenommene Taktsignale.

Die MOS-Eingabe/Ausgabeschaltung 110 gemäß Fig. 21 ist im einzelnen in dem Blockdiagramm in Fig. 22A-B dargestellt. Ein Schaltschema eines Befehlssatzes ist in der Eingabe/ Ausgabeschaltung eingesetzt, um einen größeren Wirkungsgrad zu erreichen.

Die Befehlsleitungen der Auslesespeicher 0-7 der Gruppe 34 von Auslesespeichern sind direkt mit dem IS-Eingang und der Eingabe/Ausgabeschaltung verbunden. Diese Schaltung gibt ein Signal EISl ab. Wenn dieses Signal einen hohen Logikpegel hat, werden die Befehlsleitungen der Äuslesespeicher mit der I Leitung verbunden, welche mit der Steuer- und Taktschaltung 30 und der Rechen- und Registerschaltung 32 verbunden wird. Wenn das Potential der Leitung EISl niedrig ist, wird die I -Leitung mit der Steuer- und Taktschaltung verbunden und die Rechen- und Registerschaltung auf dem niedrigen Potentialpegel gehalten und die Eingabe/Ausgabeschaltung (I/O) kann Befehle mit den gleichen Bitmustern abgeben, wie sie üblicherweise von der Steuer-und Taktschaltungder Rechen- und Registerschaltung abgegeben werden. Da die Eingabe/Ausgabe-(I/O)-Schaltung sich daran erinnern kann, mit welchem Befehlssatz sie arbeitet, versucht sie nicht, IS2-Befehle auszuführen, wenn der Rechner sich im ISl-Betrieb befindet. Die PWO-Leitung für die Eingabe/ Ausgabe-(I/O)-Schaltung stellt sicher, daß diese in dem ISl-Befehlssatz angeschlossen wird. Wenn der Befehl ISl ausgeführt wird, wird das interne IS2-Befehlsflipflop 114 zurückgesetzt, wodurch EISl einen hohen Potentialpegel erhält und die Eingabe/ Ausgabe-Schaltung nur solche Befehle aufnimmt, deren Bitmuster in allen Befehlssätzen gleich sind. Wenn der Befehl IS2 ausgeführt wird, erhält EISl einen niedrigen Wert und das Flipflop

409826/0882

114 für den IS2-Befehl wird gesetzt.

Die Eingabe/Ausgabe-Schaltung enthält ein Befehlsregister 116, welches den seriellen Befehl von der Gruppe 34 von Auslesespeichern auf der I -Leitung in einen parallelen Befehl zum Dekodieren durch den Dekodierspeicher ROM 118 umwandelt. Das Schieberegister 120 für 9 Bits und das Schieberegister für 1 Bit dienen als Ausgangsregister für die Eingabe/Ausgabeschaltung .

Die Eingabe/Ausgabeschaltung 110 enthält auch ein Schieberegister 124 für 56 Bits, das sogenannte T-Register. Dieses Register dient als erstes Arbeitsregister, wenn die Eingabe/Ausgabeschaltung aufgerufen wird, um binäre Recheninformationen auszuführen. Die Logikglieder 126 und 128 bilden in beiden Richtungen einen Pufferspeicher für die BCD-Leitung und erlauben es den binären Daten, daß sie durch die BCD-Leitung in die Eingabe/Ausgabe-(I/O)-Schaltung eingegeben oder aus dieser ausgegeben werden. Das binäre Prozessor ROM .130 dient als Rechenlogikeinheit, um alle grundlegenden binären Vorgänge mit dem Inhalt des T-Register s· auszuführen. Es hilft bei der Steuerung der Datenübergänge in das T-Register. Bei der Ausführung von binären Rechnungen mit der Eingabe/Ausgabe-(I/O)-Schaltung kann ein Übertrag auf der Leitung 132 bei einem bestimmten Vorgang auftreten. Durch diesen Zustand wird ein Signal auf der FLG-Leitung hervorgerufen und das Zustandsbit 11 in der Steuer-und Taktschaltung 30 gesetzt.

Die Eingabe/Ausgäbeschaltung 110 umfaßt weiterhin ein 14-Bit-Register 132, welches als P-Register bekannt ist. Dieses Register steht dem Benutzer als 14-Bit-Speicherregister zur Verfugung, wird jedoch allgemein durch das Rechnersystem als Programmzähler verwendet. Die 14 Bits mit der niedrigsten Wertigkeit in dem T-Register 124 können in das P-Register

409826/0862

132 eingegeben werden, ohne den Inhalt des T-Registers 124 zu ändern. Der Inhalt des P-Registers 132 kann in die 14 Bits mit der niedrigsten Wertigkeit des T-Registers 124 durch den PTT-Befehl eingegeben werden. In diesem Fall bleiben die 42 Bits des T-Registers mit der höchsten Wertigkeit und der gesamte Inhalt des P-Registers unverändert.

Der PINC-Befehl führt eine binäre Erhöhung der in dem P- _Register gespeicherten Zahl aus. Es wird nicht "nur die erhöhte Binärzahl in das P-Register 132 eingegeben, sondern es werden auch die 10 Bits der erhöhten Zahl mit der niedrigsten Wertigkeit nacheinander in die Ausgangsleitungen C9-C18 eingegeben. Der PDEC-Befehl ist ähnlich dem PINC-Befehl mit der Ausnahme, daß die in dem P-Register gespeicherte Binärzahl um eins erniedrigt, wird. Die Befehle PINC und PDEC haben eine gemeinsame Beschränkung. Wenn nämlich das Dezimaläquivalent der Zahl in dem T-Register den Wert 1,023 übersteigt, so hat die auf den Äusgangsleitungen C9-C18 dargestellte Zahl nicht genügend Bits, sondern das auf der Leitung C18 dargestellte Bit ist stets 1. Die Recheneinheit 134 wird dazu verwendet, um die Erhöhung oder Erniedrigung durch PINC- und PDEC-Befehle vorzunehmen.

Die parallelen Datenausgangsleitungen C1-C18 sind verträglich mit der Ieistungssparenden TTL-Logik. Die Leitungen C1-C8 können entweder dazu verwendet werden, um Daten einzugeben oder auszugeben, wogegen die Leitungen C9-C18 stets lediglich Ausgangsleitungen sind. Wenn die Zwischenspeicher-Eingangsleitung für die Eingabe/Ausgabe-(I/O)-Schaltung den Logikpegel H hat, werden die Leitungen C1-C8 Ausgangsleitungen und wenn die Zwischenspeicher leitung ("LATCH") den Logikpegel L hat, so werden diese Leitungen zu Eingangsleitungen. Wenn die LATCH-Leitung auf einen niedrigen Potential gehalten ist, so werden die auf den Leitungen C1-C8 enthaltenen Daten in das Ausgangspufferregister 136 übertragen. Nachdem die LATCH-Leitung abgeschaltet ist, verbleiben die eingespeicherten

4098 2 8/0882

Daten als Ausgang auf den Leitungen C1-C8.

Die. Daten auf den Leitungen C1-C8 können durch zwei Befehle EERA und IXT verarbeitet werden. Diese Befehlsleitungen 138 bzw. 140 sind in Fig. 22A-B dargestellt. Der Befehl EERA wird durch die Steuer- und Taktschaltung 30 und die Eingabe/ Ausgabeschaltung 110 verstanden. Wenn dieser Befehl ausgeführt wird, wird das aus 8 Bits bestehende Wort seriell auf den Leitungen C1-C8 auf der EXT-Ausgangsleitung und während der gleichen Zeltperiode übertragen, wie die Adressen an die Gruppe 34 der Auslesespeicher übertragen werden. Die Steuer- und Taktschaltungen 30 erkennt den EERA-Befehl und überträgt die Daten von der EXT-Eingangsleitung an ihre 1A-Ausgangsleitung. Auf diese Weise wird die nächste Auslesespeicheradresse von der I/O-Schaltung erhalten. Nachdem der Befehl EERA ausgeführt.wurde, enthalten die Bits C1-C8 die gleichen Daten wie das Bit C9. ·

Der Befehl IXT tauscht die Daten auf den Leitungen C1-C8 mit den 8 Bits der höchsten Wertigkeit des T-Registers 124. Die verbleibenden Bits des T-Registers 124, sowie die Leitungen C9-C18 des I/O-Registers 120 bleiben unverändert.

Die I/O-Schaltung 110 enthält auch die erforderliche Logikschaltung und den Speicher zum Betrieb des Druckwerks 16. Dieses Druckwerk hat 18 Spalten und wahlweise 13 Schriftzeichen per Spalte. Es enthält eine routierende Druckertrommel mit 13 Sektoren. Von dem Drucker sind Taktsignale als Eingänge für die Eingabe/Ausgabe-Schaltung 110 erforderlich. Sie sind in den Fig. 22A-B als TP- und TR-Signale bezeichnet und werden mit der Phase 2 der Taktgeber geschaltet.

Während des Betriebs dreht sich die Drucktrommel kontinuierlich, und der laufende Sektor des Druckers wird kontinuierlich durch den Sektorzähler 142 bezeichnet. Während des Zeitabschnittes, in welchem der Drucker betätigt wird, wird das Ende jedes Sektors

409826/0862

- 3 a -

durch einen Markierungsimpuls bezeichnet, der das Zustandsbit 11 in der Steuer'- und Taktschaltung 30 setzt. Das Verfahren, mit welchem ein Ausdruck erreicht wird/ beginnt mit dem Aufbau einer Druckermaske in dem C-Register 144 der Reehen-und Registerschaltung 32 und in dein T-Register 124 der Eingabe/Ausgabeschaltung 110. Die Spalten 1-14 des Druckers werden entsprechend den Daten im C-Register von rechts nach links gedruckt. Jede digitale Position wird mit einer hexadezimalen Zahl (0-15) ausgefüllt, welche den zu druckenden Sektor darstellt. Eine Hexadezimalzahl 13, 14 oder 15 läßt in der gegebenen Spaltenposition einen Platz leer. Der beste Druckvorgang wird erreicht, wenn die ZIfferneingaben auf der Drucktrommel mit ihren entsprechen-'den Sektorenzahlen zusammenfallen. Die vier Ziffern des T-Reglsters 124 mit der niedrigsten Wertigkeit werden in ähnlicher Weise für die Spalten 15-18 angegeben.

'Der dem Druck-Unterprogramm vorangehende RED-Befehl verschiebt das Farbband in die Position für Rot-Druck. Das Farbband bleibt in dieser Position, bis ein Papiervorschub erfolgt. Es wird ein Papiervorschubbefehl (ADV) dazu verwendet, um jede Druckfolge zu beendigen. Das Ausgangsformat zum Antrieb des Hxnweisregisters ist derart, daß während der Zeitperiode, in welcher der Drucker ausgelöst wird, ein Logikpegel "0" auf den Leitungen C1-C18 anzeigt, daß die betrachtete Spalten-Magnetspule gespeist werden sollte. Die Ausgangssignale auf den Leitungen C19 und C20 steuern die Betriebsarten des Druckwerks gemäß der nachfolgenden Tabelle.

C19 C2Ö Betriebsart L L Drucker bereit halten L H Parbbandmagneten speisen H L Papiermagneten speisen H H Druckmagneten auslösen

409828/0882

Der Abschnitt der Eingabe/Ausgabeschaltung 110, der sich
auf den Drucker bezieht, enthält auch ein Schieberegister
148 für 4 Bits, welches die zu druckenden Daten entweder
vom T-Register 124 der Eingabe/Ausgabeschaltung 110 oder vom
C-Register 144 der Rechen- und Registerschaltung 32 aufnimmt
und sie in paralleler Form an einen Komparator 150 abgibt.
Die Datenwählschaltung. 146 überträgt die Daten entweder vom
C-Register oder vom T-Register zum Schieberegister 148. Der
Komparator 150 funktioniert derart, daß er die laufende
Sektorenzahl vom Sektorzähler 142 mit dem Ausgang des Schieberegisters 148 vergleicht und bestimmt, wenn sich die Drucktrommel in der geeigneten Position findet, um jeweils die
Daten auszudrucken. Das Drucksteuerwerk 152 nimmt die auf das Druckwerk bezogenen Befehle vom Befehlsdekodierer ROM 118 und steuert dementsprechend die Druckreihenfolge.

Die Eingabe/Ausgabeschaltung 110 enthält weiter einen Haupttaktgeber 154, welcher die erforderlichen Taktsignale innerhalb
der Eingabe/Ausgabeschaltung "abgibt. Auch ist ein Schmitt-Trigger 156 vorgesehen, welcher die FLG¹-Signale von den Eingabe/Ausgabe-Peripheriegeräten aufnimmt, die in dem Rechner
verwendet werden, und welcher diese mit dem Taktsignal 02 von der Steuer- und Taktschaltung 30 weiterleitet.

Daten-Speicherschaltung

Die Daten-Speicheranordnung 36 gemäß Fig. 3 ist ausführlicher in Fig. 24 dargestellt. Sie enthält eine MOS/LSI-Datenspeicherschaltung 158 und einen in beiden Richtungen betriebenen Verstärker 16O. Die Datenspeicherschaltung 158 enthält 10 Daten-Speicherregister. Zusätzlich zu der einzelnen Daten-Speicherschaltung in dem Rechner kann der Benutzer wahlweise fordern, daß ein zusätzlicher Datenspeicher vorgesehen wird. Auch sind die Speicherschaltungen als integrale Bauteile innerhalb der
wahlweisen Einsteck-Tastaturfunktionsblöcke und in den Peripherie-Interfacekarten enthalten, die den verschiedenen Eingabe/

409826/0862 ■

-Ho-

Ausgabe-Peripheriegeräten zugeordnet sind, die mit dem Rechner verwendet werden können.

Die der Rechen- und Registerschaltung 32 zugeordneten BCD-Leitungen und die Eingabe/Ausgabe-Schaltung HO sind miteinander direkt verbunden und könnten wiederum mit ebenso Vielen zusätzlichen Datenspeichern verbunden werden. Der Verstärker 160 treibt die überschüssige Kapazität, welche von der BCD-Leitung ausgesehen wird, wenn mehr als drei Datenspeicher verwendet werden. Da die BCD-Leitung in beiden Daten binäre Signale überträgt,- muß der Verstärker 16O in beiden Richtungen arbeiten können. Um die Richtung des Datenflußes durch den Verstärker zu steuern, ist ein Steuersignal {BDE) erforderlich. Üblicherweise hat dieses Signal den Pegel "0", in welchem Fall die BCD-Leitung von der Rechen-und Registerschaltung 32 und die Eingabe/Ausgabeschaltung. 110 der Eingang ist, während die mit den Datenspeicherschaltungen verbundene BCD-Leitung den Ausgang bildet.

Ein DSTC-Befehl ("DATA STORAGE TO C-REGISTER") wird durch alle Datenspeicher dekodiert, welche in der jeweiligen Anordnung des Rechners enthalten sind. Dieses würde den Datenspeicher in den Standardrechner sowie die laufend benutzten Datenspeicher in dem Tastatur-Funktionsblock, die wahlweise verwendbaren Datenspeicher und die Peripherie-

4.'

Interfacekarten umfassen. Obgleich nur der vorher adressierte Datenspeicher den DSTC-Befehl ausführt, sprechen alle Datenspeicher an, indem sie auf der BDE-Leitung einen Logikpegel "1" während des gesamten Wortes erzeugen, in welchem die Datenübertragung erfolgt» Durch die Verwendung dieser Technik ist nur die BDE-Leitung des einzigen Datenspeichers in der Standard-Bestückung des Rechners erforderlich, um die Übertragungsrichtung des Verstärkers 160 für alle Datenspeicher zu steuern.

Der MOS-Datenspeicher 158 gemäß Fig. 24 ist im einzelnen in dem Blockdiagramm der Fig. 25A-B dargestellt. Der Daten-

409826/0862

speicher 158 erkennt drei getrennte Befehle, welche direkt von den Auslesespeichern über die IS-Leitung empfangen werden. Diese umfassen (1) die Adresse vom C-Register zum Datenspeicher (ATDS), (2) die Daten vom C-Register für den Datenspeicher (DTDS) und (3) das Auslesen vom Datenspeicher in .das C-Register (DSTC). Diese seriellen Befehle werden von einem Schieberegister 162 mit IO Bits empfangen, in ein paralleles Signal mit 10 Bits umgewandelt und an den Befehlsdekodierer 164 übertragen.

Der Inhalt des C-Registers in der Rechen- und Registerschaltung 32 wird kontinuierlich auf der BCD-Leitufig dargestellt, es sei denn, daß einer der vorgenannten Befehle abgegeben wird. Wenn ein Daten-Übertragungsbefehl auftritt, so wird dieser nur ausgeführt, wenn wenigstens ein Datenspeicher-Register vorhanden ist, welches vorher aktiviert worden ist. Dieses bleibt dann aktiviert, bis ein anderer Datenübertragungsbefehl abgegeben wird, welcher ein anderes Register adressiert.

Die Bezeichnung jedes Registers umfaßt zwei getrennte Teile. Die zefri register innerhalb jedes Datenspeichers werden mit 0, 1, 2, ... 8, 9 bezeichnet. Die Datenspeicher innerhalb eines speziellen Rechners werden selbst mit 0, 1, 2, 3 ... 62, 63 bezeichnet. Jeder Datenspeicher kann in irgendeiner Kombination kodiert werden, wodurch die Notwendigkeit vermieden wird, daß verschiedene Datenspeicher verschiedenen Adressen zugeordnet werden. Die Adressenbits werden mit steigender Wertigkeit als Bl, B2, B3, B4, Al, A2 bezeichnet. Falls die Bits B1-B4 als hexadezimale Zahl betrachtet werden, sind nur zehn der sechzehn möglichen Kombinationen zulässige BCD-Zeichen. Normale Adresse sind solche, welche die zehn zulässigen BCD-Kodes für die Bits B1-B4 verwenden. Die speziellen Adressen sind die verbleibenden Kombinationen, Die normalen Registeradressen werden mit 0<p_D D-j<399 bezeichnet, wobei alle drei Ziffern zulässige BCD-Zahlen darstellen. Falls D₂ auf die hexadezimalen Zahlen zehn bis sechzehn beschränkt ist, so sind 240 Adressen verfügbar.

409826/0862

Zur Adressierung eines Datenspeichers ist es erforderlich, daß der binäre oder BCD-Kode der geeigneten Schaltung in die A- und B-Eingänge des 6-Bit-Koitiparators 166 eingegeben werden. Um beispielsweise die Registeradressen für eine Schaltung wie 130 bis 139 zu ergeben, würde dies bedeuten, daß diese als Schaltung 13 bezeichnet wird. Der BCD-Kode für 13 beträgt 01 0011. Daher ergeben sich für den Komparator 166 die folgenden Eingangswerte:

A2 = 0 Al = 1 B4 = O B3 = 0 B2 = 1 Bl = 1

Der Adressendekodierer der Datenspeicher kann Gleitkommaadressen verarbeiten. Damit eine Adresse durch einen Datenspeicher aufgenommen wird, muß der Exponent entweder +0, +1 oder +2 sein. Das Vorzeichen der Mantisse wird immer durch einen Datenspeicher ignoriert. Zusätzlich werden die Adressen auf die nächst niedrigere ganze Zahl abgerundet. Beispielsweise würden die Zahlen -3.79, 3.1854, +3.00 und -3.00 als Adressen das Register 3 auslösen. Wenn ein Exponent 0 eingegeben wird, wird nur die Ziffer mit der höchsten Wertigkeit der Mantisse gefragt, um eine Registerzahl im Bereich von 0-9 zu bestimmen. Wenn ein Exponent gleich +1 gefunden wird, werden die beiden Ziffern mit der höchsten Wertigkeit der Mantisse abgefragt, um eine Registerzahl im Bereich von 0-99 zu bestimmen. Wenn ein Exponent gleich +2 in einer Adresse angetroffen wird, werden die drei Ziffern mit dem höchsten Stellenwert in der Mantisse abgefragt, und es wird eine Zahl im Bereich von 0-399 überprüft.

Die Eingabe/Ausgabeschaltung umfaßt auch vier Abtast- und Halteflipflops 168 zum Speichern des gewünschten Registers

40 9826/0862

Z363343

(0-9) innerhalb einer speziellen Datenspeicherschaltung. ' Ein "eins aus zehn"-Dekodierer 170 wählt das gewünschte Register innerhalb der Schaltung. Eine Leitung 172 für"Exponent = 0", eine Leitung 174 für "Exponent " 1" und eine Leitung 176 für "Exponent =2" dienen zur Anzeige, ob der Exponent einer als Adresse verwendeten Zahl in Gleitkomma-Schreibweise als 0, 1 oder 2 dekodiert wurde. Zur Erläuterung sind nur zwei der zehn Speicherregister mit 56 Bits dargestellt als Register 178 und 180. (Fig. 25A-B) Alle zehn Register sind gleich aufgebaut. Innerhalb des Datenspeichers 158 befindet sich auch ein Abtast- und Halteflipflop 182, welches herausfindet, ob ein vorher adressiertes Register sich innerhalb eines gegebenen Datenspeichers befindet.

Verschiedene dem Datenspeicher 158 zugeordnete Signale und deren Kurvenformen innerhalb einer Wortzeit von 56 Bits sind in Fig. 26 dargestellt.

Taktgeber-Treiberschaltung

Eine bipolare Treiberschaltung 188 für den Taktgeber, deren eine Phase in Fig. 14 erläutert ist, erfordert weniger als 25 mW und kann Lasten bis zu 300 pF bei einem Spannungshub von +7 bis -15 V treiben. Ein Auslösesignal 190 gestattet es, daß beide Ausgänge Q, und Q₂ auf V , dem Logikpegel ¹¹O", gehalten werden. Dadurch wird der Taktgeber in effektiver Weise abgetastet. Im Gleichspannungsbetrieb läßt das Transistorpaar Q-, Q₂ nur eines'der Ausgangstransistorpaare Q₅, Q, oder

Q_, Q₀ leiten. Die Diode D_ verhindert die Leitfähigkeit vom /o J

Transistor Q, zum Transistor Q₀ während des Einschaltvorganges.

O O

Der einzige mögliche Übergangs-Kurzschlußstrom muß vom Transistor Q₅ zum Transistor Q_ fließen. Jedoch kann der Transistor Q₇ weniger als 5 mA Spitzenstrom führen. Die Eingangssignale für den Takttreiber 188 werden auf dem Anodentreiber der wahlweisen Anzeigeeinheit 14, oder, falls die Anzeigeeinheit

409826/0862

nicht im Rechner verwendet wird, durch den Taktgeber-Generator in Fig. 40 betrieben. Die Ausgänge der Treiberschaltung sind jeweils mit den MOS/LSI-Schaltungen in dem Rechner verbunden. Das Zeitverhältnis zwischen den Eingangs/Ausgangssignalen des Taktgebers ist in Fig. 15 dargestellt.

Leuchtdiodenanzeige

In dem Rechner ist eine wahlweise einsteckbare Leuchtdioden-Änzeigeelnheit 14 vorgesehen. Gemäß dem Blockdiagramm in Fig.29 umfaßt diese eine Anodentreiberschaltung 192, eine Kathodentreiberschaltung 194 und drei Leuchtdioden 196 mit jeweils fünf Ziffern.

Die Anzeigeeinheit verwendet eine induktive Treibertechnik, welche wirksam ist, da Bauteile mit höheren Leistungsverlusten fehlen. Die einzige Verteilung der Leistung erfolgt über die Leckwiderstände und die gesättigten Transistorschalter.

Die in dem Rechner verwendete Anzeigeschaltung ist in Fig. 36 dargestellt. Sie umfaßt eine Anordnung von 8 χ 15 Leuchtdioden, in welcher die acht Reihen durch den Anodentreiber und die 15 Spalten durch den Kathodentreiber abgetastet werden. Das vereinfachte Schaltungsdiagramm für ein Segment der Anzeige mit einer Leuchtdiode ist in Fig. 37 dargestellt. Das für Abschnitte der Schaltung linearisierte Ersatzschaltbild ist in Fig. 38 dargestellt. Eine untersuchung dieses Ersatzschaltbildes zeigt, daß der Aufbau des Induktionsstromes unddie Entladung nahezu linear für die in dem Rechner verwendeten Parameter ist. Das Verhältnis der Ladungszeit zu der Aufladungszeit beträgt etwa;

t V-V

Entladung s asat _ 3,8 - 0,1 3,7 _ _nr

— —£ _{= =} 2,06

ladung ^Vd ^{+ V}csat ^X'^{6 +} °>² -¹'⁸

409826/0862

Fig. 38 zeigt den Induktionsstrom für einen Rechner mit einer Taktfrequenz von 175 kHz. Der durchschnittliche Leuchtdiodenstrom kann aus der folgenden Gleichung berechnet werden:

Ave I-™. = Impuls strom χ Tastverhältnis

JjEiU

= (| χ 80 mA) 5,88 s

Ϊ75~ kHz ^{X 56}

₌ (80) (5_f88) (0,175) ₌

(2) (56) ^{Uf/Jb 1}^

Im ungünstigsten Fall, d.h. wenn dreizehru~mal die Acht und zweimal das Minuszeichen angezeigt werden, beträgt die Anzeigeleistung 110 mW. Die Anzeigeinformation wird teilweise in der Rechen- und Registerschaltung 32 dekodiert und vollständig in acht Signale dekodiert, weiche sieben Schriftzeichensegmente sowie einen Dezimalpunkt innerhalb der bipolaren Anodentreiberschaltung 192 der Ausgangsanzeigeeinheit 14 darstellen. Wie vorher besprochen, enthält der Änodentreiber 392 den Taktgenerator für den Rechner. Falls die wahlweise einsetzbare Anzeigeeinheit nicht verwendet wird, werden die Taktsignale von der getrennten Taktgeberschaltung abgeleitet, die irgendwo in dem Rechner angeordnet ist. Diese getrennte Taktgeberschaltung ist im einzelnen in Fig. 40 dargestellt. Die TTL-Wandler 198 mit niedriger Leistung und die zugeordneten passiven Elemente bilden einen Oszillator, dessen Frequenz im ungünstigsten Fall stets unter 720 kHz liegt. Der Oszillatorausgang ist eine Rechteckwelle. Das JK-Zwischenspeicherflipflop 200 arbeitet mit dem Ausgang des Oszillators zusammen und gibt Ausgangssignale mit 360 kHz und Rechtecksignale mit 180 kHz ab. Die entstehenden Taktgeber-Phasensignale 01T und 02T auf den Ausgängen der Gatter 202 sind identisch den Signalen, die durch den Taktgeberabschnitt des Anodentreibers 192 erzeugt werden.

Ein Logikdiagramm des Anodentreibers 192, ist in Fig. 30 dar-

409826/0862

- 16 -·

gestellt. Dessen Taktgenerator verwendet eine externe LC-Scfyaltung, um die Oszillatorfrequenz auf einen Wert von 800 kHz einzustellen. Die Flipflops Bl und B2 werden abwechselnd ausgeschaltet, und es werden gemäß Fig. 31 Rechtecksignale mit 200 kHz abgegeben. Das Flipflop 3 wird vom Flipflop B2 getaktet und taktet wieder das Flipflop B4, um eine weitere Teilung der Taktfrequenz von ungefähr 200 kHz zu erreichen. Die Zweiphasen-Taktsignale O1T und O2T werden von den Flipflops BL und Bl und dem Oszillator 200 erzeugt. Diese Signale dauern 625 ns und sind um 625 ns getrennt (Fig. 31) Ein periodisches Zähltaktsignal (CCL) wird von dem Anodentreiber 192 abgeleitet und einmal während jeder Ziffernzeit dem Kathodentreiber 194 zugeführt. Der hintere Rand dieses Signales bewirkt, daß die Anzeige zur nächsten Ziffer übergeht.

Die Anzeige besteht aus fünfzehn Zeichen, während die Rechner-Wortperiode aus vierzehn Zeichen besteht. Das besondere Zeichen ist der Dezimalpunkt. Wie vorher erklärt wurde, wird eine binär dezimalkodierte Zwei in das Register B an der Ziffernposition des Dezimalpunktes eingegeben. Der Dezimaldekodierer 92 in der Rechen- und Registerschaltung 32 gibt dieses durch ein Fignal auf den Ausgängen B und E während der Bitzeit T. an (Fig. 11). . Wenn dieser Zustand durch den Anodentreiber dekodiert wird, wird der Dezimalpunkt angeregt und ein besonderes Taktgebersignal gegeben, um die Anzeige auf die nächste Position weiterzuschalten (Fig. 31, 32 und 33). Daher werden alle verbleibenden Ziffern in dem Register A um eine Ziffer in der Anzeige verschoben.

Die Fig. 32 und 33 stellen die vereinfachte Schaltung und die Zeitbeziehungen für die Anzeige des Dezimalpunktes dar. Die Reihenfolge ist kritisch, da der gesamte Induktionsstrom in dem Segment b, welches als letztes gespeist wird, abnehmen muß, bevor das Zähler-Taktgebersignal gegeben wird, um zur nächsten Ziffer weiterzusehalten ,

409826/0862

da der verbleibende Strom sonst durch die falsche Ziffer entladen würde und ein schwaches Leuchten des Segmentes b auf der gleichen Ziffer mit dem Dezimalpunkt aufträte. Die Art und Weise, in welcher der Dezimalpunkt eingefügt wird, ist der Grund, daß alle anderen sieben während der ersten Hälfte der Ziffernzeit angeregt werden. Die Aufladungszeit für den Dezimalpunkt ist halb so groß wie diejenige der anderen Segmente. Das Dezimalpunktsegment enthält den gleichen Strom in einer Hälfte der Zeit und ist halb so leuchtkräftig wie die anderen Segmente.

Wie beschrieben wurde, wird ein induktives Verfahren verwendet, um die Leuchtdioden zu speisen. Im Grunde läuft dieses Verfahren darauf hinaus, daß die zum Aufbau des Stromes in einer Induktionsspule erforderliche Zeit zur Strombegrenzung verwendet wird, statt einen Widerstand zu verwenden, wie dieses bei Leuchtdiodenanzeigen üblicherweise der Fall ist. Dadurch wird Leistung eingespart, da die einzigen Verlustkomponenten in dem Antriebsystem die parasitäre Induktivität und die Transistorwiderstände sind. Die Antriebsschaltung für eine Ziffer ist in Fig. 34 dargestellt. Falls der Kathodentransistürschalter T geschlossen ist, wird ein Anodenschalter T während c a

2,5 ps geschlossen, so daß der Strom sich bis zu einem Wert I nahezu dreieckförmig (auf dem Anfangsabschnitt einer Exponentialkurve) aufbauen kann. Wenn der Anodenschalter T.

a geöffnet wird, wird der Strom durch die Leuchtdiode gedämpft und fällt in etwa 5 ps ab. Die Anoden werden entsprechend der Folge in Fig. 31 abgetastet. Der Hauptgrund für die schrittweise Erregung der Anoden besteht darin, daß der Spitzenkathodenstrom des Transistors herabgesetzt wird. Da die Abfallzeit ungefähr zweimal so groß wie die Anstiegszeit ist, beträgt der Spitzenkathodenstrom etwa 2,5 mal den Spitzenstrom in irgendeinem Segment. Die Leuchtdioden sind wirkungsvoller, wenn sie mit einem geringen Tastverhältnis erregt werden. Dieses bedeutet hohe Ströme während kurzer Zeitperioden,

409826/0862

- ne -

(80 ma Anodenstrom, 250 ma Kathodenstrom). Fig. 31 zeigt auch das Verhältnis zwischen der Anodenabtastfolge und dem Anzeige-Ausgangssignal (A-E) der Rechen- und Registerschaltung 32.

Die Kathodentreiberschaltung 194 der Anzeigeeinheit 14 umfaßt ein Schieberegister mit 14 Bits zum Abtasten der aus 15 Ziffern bestehenden Anzeige während einer Wortzeit. Dieses Abtasten setzt sich von Ziffer zu Ziffer entsprechend den Zähltaktsignalen von der Anodentreiberschaltung fort. Einmal während jeder Wortzeit trifft ein Startsignal von der Rechen- und Registerschaltung 32 ein und startet dieses Verfahren. Ein Blockdiagramm der Kathodentreiberschaltung 194 ist in Fig. 35 dargestellt.

Aus qangsdrucker

Die Hauptsteuerung für den Ausgangsdrucker 16 erfolgt in der MOS/LSI Eingabe/Ausgabeschaltung 110. Es ist jedoch eine zusätzliche Schaltung außerhalb der Eingabe/Ausgabeschaltung vorgesehen, um die Takt- und Treiberfunktionen für den Drucker auszuführen.

Fig. 27 zeigt ein Diagramm der Taktgeberschaltung für den Drucker. Die Eingabe/Ausgabe- (i/0) -Schaltung HO erfordert einen Impulszug (TP) vom Drucker, welcher die Sektorabschnitte beim Drehen der Druckwerkstrommel bezeichnet. Zwischen den Sektoren 12 und 0 der Druckwerkstrommel wird ein Rückstellsignal durch den Drucker an die Druckertakts6haItung abgegeben, wodurch ein Signal (TR) an die Eingabe/Ausgäbe-(I/O)-Schaltung zur Rückstellung des SektorZählers 142 folgt.

Da beide Signale "RÜCKSETZEN" und "TP" von einer magnetischen Aufnahmeeinrichtung innerhalb des Druckers abgeleitet werden, haben sie sehr kurze Änsteigs- und Äbfallzeiten. Zusätzlich handelt es sich um Signale mit sehr niedrigen Pegeln. Die Druckertaktschaltung gemäß Fig. 27 arbeitet mit diesen Signalen,

403826/0862

um sie der Eingabe/Ausgabe-(I/O)-Schaltung in besserer Form anzubieten. Die Operationsverstärker 2O6 arbeiten als Pegeldetekotren. Um Streuimpulse in Anbetracht der kleinen Amplitude des Signales TP zu verhindern, ist ein wieder triggerbarer monostabiler Multivibrator 208 vorgesehen, der das Ausgangssignal des Operationsverstärkers 206 aufnimmt. Da beide Signale TP und TR durch die Eingabe/Ausgabe-(I/O)-Schaltung 110 in Synchronisation mit der Phase 2 des Taktgebersignales empfangen werden müssen, ist ein D-Zwischenspeicherflipflöp 210 vorgesehen.

Die Druckerschaltung gemäß Fig. 28 nimmt einfach die TTL-Signale mit niedrigem Pegel der Eingabe/Ausgabeschaltung 110 auf, um sie den verschiedenen Magnetspulen des Druckers 16 zuzuführen, welcher höhere Leistungspegel zu dessen Betrieb erfordert.

Netzgerät -

Das Netzgerät des Rechners ist im einzelnen in Fig. 41 dargestellt, in herkömmlicher Weise aufgebaut und liefert +6 V, +15 V, +5V, +7,5V und -12V an die verschiedenen Rechner-Schaltkreise.

Einsteck-Tastatur-Funktionsblock

Fig. 45 zeigt ein Diagramm der Schaltung mit jedem Einsteck-Tastaturfunktionsblock. Jeder derartige Block enthält zwei MOS/LSI-Datenspeicher 158, welche in der beschriebenen Weise von dem Rechner-Mikroprogramm aus adressiert werden. Auch sind acht MOS/LSI-Auslesespeicher vorgesehen, welche eine ROM-Gruppe 212 bilden. Diese Schaltungen sind identisch zu den Standard-Speichern des Rechners mit Ausnahme-ihrer Bitmuster, welche später in einer Befehlsliste angegeben werden. Die Funktionsblockschaltung enthält auch einen bipolaren Takttreiber 188.

409826/08 62

Wahlweise einsteckbares ROM/PROM

Wie schon erwähnt wurde, kann der Benutzer mit dem Rechner einen Auslösespeicher ROM oder PROM mit einer Speicherbibliothek verwenden, die in einer Benutzerspräche geschrieben ist. Diese Programme können über die Tastatur vom Benutzer ausgeführt werden. In Fig. 46 ist ein Diagramm jedes dieser Einsteck-Auslesespeicher dargestellt. Es sind vier herkömmliche Auslesespeicher mit 256 Bits oder programmierbare Auslesespeicher 214 vorgesehen, in welchen die das Programm der Bibliothek bildenden Befehle gespeichert sind. Der Vorteil bei der Verwendung eines programmierbaren Äuslesespeichers PROM liegt in der Tatsache, daß die Programmbefehle verändert werden können. Ein Dekodierer 216 wählt, welcher der (programmierbaren) Auslesespeicher adressiert werden soil, wobei von den beiden Bits mit der höchsten Stellenwertigkeit in.der gesamten Adresse ausgegangen wird. Der Transistorschalter 218 bewirkt bei einem Lesebefehl, daß ein niedriger Spannungspegel in dem Zwischenspeichereingang der I/O-Schaltung 110 erzeugt wird, so daß Daten von den Auslesespeichern 214 in die I/O-Schaltung geladen werden können. Die Logikschaltung 222 gibt ein Markierungssignal an die I/O-Schaltung 110 ab, wann immer eine gegebene Adresse die Speicherkapazität des wahlweise eingefügten Auslesespeichers übersteigt. Der Transistorschalter 224 ergibt ein zeitlich gegenüber dem Transistor 218 verzögertes Auslösesignal zur Betätigung des Dekodierers 216. Die Regelschaltung 226 ergibt eine zusätzliche Regelung von zwei der Netzspannungen, welche der Auslesespeicherschaltung zugeführt werden. Das Logikglied 228 wird von einigen Einsteck-Tastaturfunktionsblöcken benutzt, um zu bestimmen, ob das in dem Auslesespeicher 214 programmierte Programm vertraulich ist, in welchem Fall die Programmauflistüng verhindert wird.

Datenspeicher-Option

In Fig. 47 ist schematisch der wahlweise Einsteck-Datenspeicher dargestellt. Jedes Inkrement des Einsteck-Datenspeichers umfaßt

40 9826/0862

30 Register, welche durch drei MOS/LSI-Datenspeicher 158 gebildet werden. Diese Schaltungen sind bezüglich Aufbau und Funktion identisch zu denjenigen, die bereits beschrieben wurden. Drei MOS/LSI-Auslesespeicher-Schaltungen bilden eine ROM-Gruppe 230. Die Bitmuster für diese einzelnen ROM-Schaltungen sind in der folgenden Befehlsliste angegeben. Der wahlweise verwendbare Datenspeicher enthält auch eine Taktgeber-Treiberschaltung 232, wie beschrieben wurde.

Befehlssatz 1

Jede durch den Rechner ausgeführte Funktion wird durch eine Reihe von einem oder mehreren aus 10 Bits bestehenden Befehlen ausgelöst, die in der Gruppe 34 der Auslösespeicher ROM 0-7 oder einem der Speichergruppen eines Tastaturfunktionsblockes 20, einer Datenspeicher-Einheit oder einer der wahlweisen Eingabe/Ausgabe-Interfacekarten enthalten sind. Die Reihennätur der MOS-Rechenschaltkreise gestattet es, daß die Befehlsbits von dem Bit mit der niedrigsten Wertigkeit bis zu dem Bit mit der höchsten Wertigkeit seriell dekodiert werden. Falls das erste Bit 1 ist, handelt es sich bei dem Befehl entweder um einen Unterprogrammsprung oder eine bedingte Verzweigung entsprechend dem zweiten Bit, wobei 8 Bits für eine Adresse zurückbleiben. Der nächstgrößte Satz von Befehlen, der Rechensatz, beginnt mit 0 und es folgt, wiederum von rechts nach links, eine 1, wobei acht Bits für kodierte Befehle verbleiben.

Mit drei Ausnahmen umfaßt der Befehlssatz 1 jene Befehle, die durch die Rechen- und Registerschaltung, die Steuer- und Taktgeberschaltung und die Auslesespeicher ausgeführt werden. Diese drei Ausnahmen sind durch drei Befehle innerhalb des Befehlssatzes 1 dargestellt, welche durch die Datenspeicherschaltung ausgeführt werden. Die Bitmuster für diese drei Befehle sind folgende:

409826/0862

Befehl

DSTC ATDS DTDS

Bit-Muster

1011111000 100111000 0, 1011110000

Diese Befehle sind im einzelnen in dem Abschnitt über den MOS/LSI-Datenspeicher erläutert.

Die zehn verschiedenen Arten von Befehlen des Befehlssatzes 1 sind in der folgenden Tabelle dargestellt:

Tabelle der Befehlstypen {X = gleichgültig)

Type Verfügbare
Befehle

Name

Felder

(ADRESSEN 156(ADRESSEN

χ 8
= 256

64
(37 benutzt)

64
(30 benutzt)

SPRUNG-UNTERPROGRAMM

BEDINGTE VERZWEIGUNG

RECHENREGISTER

UNTERPROGRAMM ADDRESSE	O 1
VERZWEIGUNGSADRESSE	1 1

ZÜSTANDSOPERÄTIONEN

SETZE BIT N FRAGE N SETZE N ZURÜCK LÖSCHE ALLES

HINWEISREGISTERBETRIEB

	3	1 O	4 2	N	F	O	1	O O
5	WORTWAHL
OPERATIONS KODE

¹Z ¹I

F = OO F = Ol F = 10} F = dl

(N = OOOO)

O

SETZE HINWEISMARKE AUF P F = OO

FRAGE P F = 10

ERNIEDRIGE P F = Ol

ERHÖHE P F = 11

P = XXXX

409828/0862

Type Verfügbare Befehle

6

64 (20 benutzt)

Name

Felder

N

F =

. N

2

1

= OO

(N

=

O O

0 I

5

DATENEINGANG/ANZEIGE

4

F =

.NF =

F

= 10 (N

- (N

=

LADE KONSTANTE

F =

F =

1

I - A · S

F =

Ol

(N -

= O]

O

XXOl)

-

BCD-EINGANG FÜR C-REGISTER

F =

F = 4

IX

(N «

X

1 O

XXIlJ

7

STAPELBEFEHLE

3

XXX

IX

N -

O

( O)

VERFÜGBAR

3

10

O O

8

32

XXX

OO

O

(11 benutzt)

WÄHLE AUSLESESPEICHEF

2

O O

O O

O O

9

WÄHLE AUSLESESPEICHEB

XXX

F

1

O

TASTATUREINGABE

XXl)

10

EXTERNER EINGANG

0 0 0

XXO)

16

UNTERPROGRAMMRÜCKKEHR

XXX)

(RESERVIERT FÜR PRO-

0 0 0

ο I

8 7 1

GRAMMSPEICHER-MOS-

SCHALTUNG) VERFÜGBAR | KEIN BETRIEB (NOP) |

0 0 0

O

0 0 0

O

0 0 0

O .

Es gibt zwei Befehle des Typs 1, nämlich "UNTERPROGRAMMSPRUNG" und "BEDINGTE VERZWEIGUNG". Sie werden nur durch die Steuer- und Taktschaltung 30 dekodiert. Es wird kein Wortwahlsignal erzeugt, und alle Register in der Rechen- und Registerschaltung 32 zirkulieren lediglich. Das Ziel des Befehles ."UNTERPROGRAMMSPRUNG" besteht darin, in dem Auslesespeicher zu einer neuen Adresse überzugehen und die existierende Adresse um 1 erhöht als Rückkehradresse zu verwenden. Der letzte Befehl in einem Unterprogramm muß ein Rückkehrbefehl sein, um das Programm fortzusetzen, wo es vorher verlassen wurde.

409826/0862

Die Steuer- und Taktschaltung 30 enthält ein Schieberegister 68-72 für 28 Bits, welche die laufende Adresse des Äuslesespeichers mit 8 Bits enthält und auch 8 Speicherbits für eine Rückkehradresse hat (Fig. 6). Während der Bitzeiten b._-b₅₄ läuft die Auslese-Speicheradresse durch die Ädditionsschaltung 74 und wird um 1 erhöht. Normalerweise wird diese Adresse bei jeder Wortzeit erneuert. Wenn jedoch die beiden ersten Bits des Befehles, welche zu den Bitzeiten ^b45~^b4g eintreffen, IO sind, so wird die erhöhte laufende Adresse zu dem Adressenrückkehr-Äbschnitt 70 des Schieberegisters für 28 Bit umgeleitet, und die verbleibenden 8 Bits des Befehles, welche die Unterprogramm-Adresse bilden, werden in den Adressenanteil 68 eingesetzt. Diese Datenleitungen und die JSB-Steuerleitung sind in Fig. dargestellt. Auf diese Weise ist die Rückkehradresse aufgehoben worden und die Sprungadresse kann an den Auslesespeicher ROM zu den Bitzeiten b._q-b _fi der nächsten Wortzeit übertragen werden.

Der am häufigsten verwendete Befehl ist der Befehl "BEDINGTE VERZWEIGUNG", der bei der Eingabe von Daten oder Systemzuständen die Fähigkeit des Rechners, Entscheidungen zu fällen_/ ausmacht. In dem bisher beschriebenen Rechnersystem arbeitet dieser Befehl aucL als unbedingte Verzweigung.

Das Format des Befehls"BEDINGTE VERZWEIGUNG" ist gemäß der vorstehenden Tabelle ist 1 1 in Verbindung mit einer nachfolgenden Verzweigungsadresse von 8 Bits. Der Befehl wird zu den Bitzeiten ^°ac~^ca empfangen. Die letzten 8 Bits des Befehls sind In dem Adressen-Pufferregister 78 (Fig. 6} gespeichert. Während der nächsten Wortzeit wird das Übertragsflipflop 76 zur Bitzeit b,₉ überprüft. Falls das Übertragsflipflop während der vorhergehenden Wortzeit gesetzt wurde, wird die laufende ROM-Adresse an die Auslesespeicher 0-7 übertragen. Falls das Übertragsflipflop nicht gesetzt wurde, wird die Verzweigungsadresse von dem Adressen-Pufferspeicher

40 9 826/08 6

in die I -Leitung eingelesen und in das ROM-Adressenregister 100 geladen (Fig. 17). Der Befehl bewirkt eine Verzweigung, falls kein Übertrag vorliegt. Es gibt drei Arten, wie das Obertragsflipflop 76 gesetzt werden kann: (1) durch einen in der Rechen- und Registerschaltung 32 erzeugten Übertrag; (2) durch eine erfolgreiche Abfragung der Position des Hinweisregisters und (3) durch eine erfolgreiche Abfragung eines der zwölf Zustandsbits. Ein Beispiel ist in der nachstehenden Tabelle angegeben;

Beispiel für die Ausführung* einer bedingten

Verzweigung

Wort	Vom ROM empfangene Adresse	Vom ROM abgegebene Adresse	Ausgeführte Adresse	Ergebnis
N-I	P	ERHÖHE VOR ZEICHENZIFFER	-	-
N	P+l	BEDINGTE VER ZWEIGUNG ZUR ADRESSE Q	ERHÖHE VOR ZEICHENZIFFER	ÜBERTRAG ERZEUGT,FALLS A-REGISTER NEGATIV IST
N+l	P+2	INHALT VON P+2	BEDINGTE VERZWEIGUNG	ÜBERTRAGE P+2
	oder	oder		oder
	Q	INHALT VON Q		ÜBERTRAGE Q

Eine typische Prüfbedingung besteht darin,, daß das Vorzeichen einer Zahl bestimmt'wird. Wenn beispeilsweise bei der Adresse P in dem Programm eine Verzweigung zu der Stelle Q gewünscht Wird, falls das Vorzeichen von A positiv ist, während das Programm weiter ausgeführt werden soll, falls das Vorzeichen negativ ist, so wird an der Stelle P in der vorstehenden Tabelle der Befehl "ERHÖHE DAS Α-REGISTER, WORTWAHL LEDIGLICH DER VORZEICHENZIFFER¹¹ gegeben. Während der Wortzeit N-I wird der Befehl von der Rechen- und Registerschaltung 32 empfangen und zur Wortzeit N ausgeführt, d.h. zur gleichen Wortzeit, in

409826/0-8 62

welcher der Befehl "BEDINGTE VERZWEIGUNG" von der Steuer- und Taktschaltung 30 empfangen wird. Falls das Vorzeichen von.A negativ ist, ergibt sich in der Vorzeichenziffer eine" 9. Die Erhöhung dieser Position führt zu einem übertrag und setzt das Übertragsflipflop in der Steuer-und Taktschaltung 30. Da der Befehl eine Verzweigung bewirkt, falls kein übertrag erzeugt wird, springt die Programmausführung zur Stelle Q nur dann, falls das Vorzeichen positiv ist, d.h. eine 0 war, sonst läuft die Programmausführung bei P+2 weiter.

Während der Wortzeit N+l hat der Rechner lediglich ausgewählt, welche von den beiden Adressen zunächst gesendet werden soll (alle Register zirkulieren lediglich). Die Ausführung einer Verzweigung benötigt zwei Wortzyklen. Einerseits muß eine Frage gestellt werden und das Übertragsflipflop 76 gesetzt werden, falls die Antwort ja ist und die andere Prüfung besteht darin, ob das Übertragsflipfiop gesetzt wurde und die geeignete Adresse übertragen hat. In vielen Fällen bedeutet das Stellen der Frage einen Rechenvorgang, d»h. A+B-*A, welcher ohnehin ausgeführt werden muß. In diesem Fall erfordert die Verzweigung lediglich einen besonderen Befehl.

Gegenüber den meisten Befehlssätzen hat dieser Satz keinen bedingten Verzweigungsbefehl. Da jedoch ein gewöhnlicher Sprungbefehl einer der am häufigsten verwendeten Befehle ist, wird der Befehl "BEDINGTE VERZWEIGUNG" auch dazu benutzt, um eine unbedingte Verzweigung oder einen Sprung zu bewirken, welcher sicherstellt, daß das Übertragsflipflop 76 zurückgesetzt wird, wenn eine unbedingte Verzweigung gewünscht wird. Dieses ist der Grund, weshalb eine bedingte Verzweigung als Verzweigung auftritt, wenn kein übertrag erfolgt. Das Über-, tragsflipflop 76 wird während der Ausführung jedes Befehles, mit Ausnahme des Rechnens (Typ 2} und der Abfragung des Hinweisregisters oder Zustands (Typen 3 und 4) ausgeführt. Da nur die Rechen- und Abfragebefehle das Übertragsflipflop 76 setzen können, ist diese Begrenzung nicht schwerwiegend. Der Befehl

09826/Q862

^IIÜNTERPROGRAMMSPRÜNG^II kann auch als unbedingte Verzweigung verwendet werden, falls die vorherige Rückkehradresse nicht aufgehoben werden muß. Insgesamt kann die bedingte Verzweigung als eine unbedingte Verzweigung verwendet werden, falls der Zustand des Übertragsflipflops 76 zurückgesetzt werden soll, d.h. daß die bedingte Verzweigung nicht einem Rechenbefehl oder einem Abfragebefehl über das Hinweisregister folgt.

Die RECHEN- UND REGISTERBEFEHLE (Typ 2) sind nur an die Rechen-und Registerschaltung 32 gerichtet. Es gibt 32 derartiger Befehle, welche in acht Klassen eingeteilt sind, die durch die linksstehenden 5 Bits des Befehls kodiert werden. Jeder dieser Befehle kann mit 8 Wortwählsignalen kombiniert werden, so daß sich eine Gesamtkapazität von 256 Befehlen ergibt. Die 32 Rechen- und .Registerbefehle sind in der nachstehenden Tabelle aufgeführt.

Tabelle der Befehle des Typs 2

	(in der Reihenfolge	1	des	Binärkodes)
Kode	Befehle	1	Kode	Befehle
0 0000	0-B	1	0000	A-B
0 0001	0-»B	1	0001	B«r-*C
0 0010	A-C	1	0010	SCHIEBE C NACH RECHTS
0 0011	C-I	1	0011	A-I
0 0100	B-*C	1	0100	SCHIEBE B NACH RECHTS
0 0101	0-c·*:	1	οίοι	c+c-k:
0 0110	o-»c	1	0110	SCHIEBE A NACH RECHTS
0 Olli	O-C-1-Λ	1	Olli	0->A
O 1000	SCHIEBE A NACH UNKS	1	1000	A-B-+A
O 1001	Α·*Β	1	1001	A<-»B
O 10IO	A-C-*C	1	1010	A-C->A
ο ion	c-1-κ:	1	1011	A-IHA
0 1100	C-*A	1	1100	A-fcBH-A
0 1101	0-C	1	1101	A«^C
0 1110	A+C-*C		1110	A+C-*A
0 1111	C+1-»C	1111	A+1-*A
Tastes	A»BffC sind Register

409826/0862

Die acht Klassen von RECHEN- UND REGISTERBEFEHLEN zusammen mit der in Klammern angegebenen Nummer des Befehles innerhalb jeder Klasse sind:

(1) LÖSCHEN {3)

(2) ÜBERTRAGEN/AUSTAUSCHEN (6)

(3) ADDIEREN/SUBTRAHIEREN (Ί)

(4) VERGLEICHEN (6)

(5) KOMPLEMENTBILDÜNG (2) -

(6) ERHÖHEN (2)

(7) ERNIEDRIGEN (2)

(8) VERSCHIEBEN (4)

Es sind drei LÖSCH-Befehle vorgesehen. Diese Befehle sind O-*K_r 0-*B und O-¥2. Sie werden ausgeführt, indem einfach alle Verknüpfungsglieder gesperrt werden, welche dem bezeichneten Register vorangehen. Da diese Befehle mit irgendwelchen acht · Wortwählsignalen kombiniert werden können, ist es möglich, einen Teil eines Registers oder eine einzelne Ziffer zu 'löschen. , ■

Es sind sechs Befehle "ÜBERTRAGUNG/AUSTÄUSCH" vorsehen. Diese Befehle sind A+B, B-*C, C-*A, A -*♦ B, B-*■"* C und C«-*Ä. Auf diese Weise können die Daten in den Registern A, B und C in verschiedene Weise verarbeitet werden. Wiederum muß die Wirksamkeit des Befehles in Verbindung mit der Wortwahlmöglichkeit gesehen werden. Einzelne Ziffern können ausgetauscht oder übertragen werden.

Es sind sieben Befehle "ADDIEREN/SUBTRAHIEREN" vorgesehen, welche die Additionsschaltung 82 benutzen. Es sind die Befehle A+C-»C, Ä+C-»C, Ä+C+A und C+C4C Der letzte Befehl kann benutzt werden, um durch fünf zu teilen. Dieses wird erreicht, indem zunächst die Zahl mit sich selbst addiert wird über den Befelxl C+C+C, dann mit 2 multipliziert wird und dann um eine Ziffer nach rechts verschoben und durch IO geteilt wird. Das Ergebnis ist, daß durch 5 geteilt wird. Dieser Algorithmus wird in dem Quadratwurzelprogramm verwendet.

409826/0082

Es gibt sechs Befehle "VERGLEICHEN". Diesen Befehlen folgt jeweils ein Befehl "BEDINGTE VERZWEIGUNG". Sie werden dazu benutzt, um den Wert eines Registers oder einer einzelnen Ziffer in einem Register zu überprüfen, ohne dessen Inhalt zu verändern oder zu übertragen. Diese Befehle (Typ 2) können leicht in der vorstehenden Befehlstabelle gefunden werden, da sie keine Obertragungspfeile aufweisen. Es sind;

(1) 0-B (Vergleiche B mit 0)

(2) A-C (Vergleiche A und C)

(3) C-I (Vergleiche C mit 1)

(4) 0-C (Vergleiche C mit 0)

(5) A-B (Vergleiche A und B)

(6) A-I (Vergleiche A mit 1)

Wenn beispielsweise eine Verzweigung erfolgen soll, falls B 0 ist, oder irgend-eine Ziffer oder eine Gruppe von Ziffern 0 ist, wie durch ein WS-Signal ermittelt wird, "folgt dem 0-B-Befehl eine bedingte Verzweigung. Falls B 0 ist, würde kein Übertrag oder Leihbetrag erzeugt und die Verzweigung würde auftreten. Es ist wiederum leicht, einzelne Ziffern oder einen Teil eines Registers durch die geeigneten Wortwählmöglichkeiten zu vergleichen.

Es gibt zwei Befehle "KOMPLEMENTBILDUNG". Die Zifferndarstellung erfolgt über die Notierunq des Vorzeichens der Mantisse und des Zehnerkomplements in dem Exponentenfeld. Bevor Ziffern abgezogen werden können, muß das Zehnerkomplement des Subtrahenten gebildet werden, d.h. O-C-K:. Andere Algorithmen erfordern das Neunerkomplement, d.h. O-C-1-*C.

Es sind vier Befehle "ERHÖHEN/ERNIEDRIGEN" vorgesehen, und zwar A+1-*A und C+1-»C.

Es sind vier Verschiebebefehle vorgesehen. Alle drei Registerinhalte A, B und C können nach rechts verschoben werden, während; nur der Registerinhalt A nach links verschoben werden kann»

409826/0862

— ου -

RECHEN- UND REGISTERBEFEHLE sind in der nachfolgenden Tabelle angegeben.

Klasse

Tabelle der Befehle des Typs (nach Klassen)

Befehle Kode

1) LÖSCHEN

2) ÜBERTRAGUNG/
AUSTAUSCH

3) ADDIEREN/

SUBTRAHIEREN

4) VERGLEICHEN

5} KOMPLEMENTBILDUNG

6} ERHÖHUNG

7) ERNIEDRIGEN

8} VERSCHIEBUNG

0^-A

ο-κ:

A-s-B B-ä-C

A+C->C

A+B-»A	RECHTS
. A-B-»A	RECHTS
Ä+C->Ä	RECHTS
A-C-J-A	LINKS
C+C^-A
0-B
0-C
A-C
A-B
A-I
C-I
o-c-k:
O-C-l-^-C
A+l+A
C+l-i-C
A-l+A
C-I^C
SCHIEBE A NACH
SCHIEBE B NACH
SCHIEBE C NACH
SCHIEBE A NACH

10111 00001 00110

01001 OO100 01100 11001 10001 11101

OHIO 01010 11100 HOOD 11110 11010 10101

ooooo 01101 00010 lOOOO 1OO11 OOOll

00101 00111

Hill 01111

11011 O1O11

10110 10100 10010 01000

Das Schieberegister 68-72 für 28 Bits in der Steuer- und Taktschaltung 3O enthält 12 Zustandsbits oder Hinweismarken, welche

4 09826/0862

dazu benutzt werden, die Zustände eines Algorithmus oder eines in der Vergangenheit liegenden Ereignisses, beispielsweise_/daß die Dezimalpunkttaste bereits gedrückt worden ist, in Erinnerung zu rufen. Diese Hinweismarken können einzeln gesetzt, zurückgesetzt oder abgefragt werden, oder es können alle Bits gelöscht und gleichzeitig zurückgesetzt werden. Das Format der Befehle "ZUSTANDSVERARBEITUNG" (Typ 3) der vorstehenden Befehlstabelle wird nachstehend wiederholt.

Tabelle über die Kodierung der Zustandsbefehle

BIT #■	1S	N	I5 I4	O	τ2	1I	1O
FELD		F	1	O	0

F BEFEHL

0 0 SETZE MARKE N

0 1 FRAGE MARKE N

1 0 SETZE MARKE N ZURÜCK

1 1 LÖSCHE ALLE MARKEN (N=OOOO)

Falls das Zustandsbit N 1 ist, wenn der Befehl "FRAGE N AB" ausgeführt wird, wird das Zustandsflipflop 76 in der Steuer- und Taktschaltung 30 gesetzt. Das Zustandsbit bleibt gesetzt. Nach einem Abfragebefehl folgt stehts ein Befehl "BEDINGTE VERZWEIGUNG". Ein Abfragebefehl führt zu einer Verzweigung, wenn das Zustandsbit N=O oder wenn N^l ist. Der Grund für diese negative Orientierung besteht darin, daß alle Verzweigungen auftreten, falls die Prüfung zu einem negativen Ergebnis führt, d.h. das Übertragsflipflop 0 ist. Aus der' Kombination der bedingten und unbedingten Verzweigungen wird ein Ergebnis bei einem einzigen Befehl abgeleitet.

Das Zustandsbit 0 wird gesetzt, wenn eine Taste gedrückt wird. Beim Löschen wird es zu jeder Wortzeit gesetzt, solange

409826/0862

die Taste gedruckt ist.

Ein Zähler 54 mit 4 Bits in der Steuer- und Taktschaltung arbeitet als Hinweismarke, so daß Rechenbefehle bei einem Teil eines Registers arbeiten können. Die Befehle sind verfügbar, um die Hinweismarke an einer der 14 Stellen zu setzen und abzufragen, oder um deren gegenwärtige Position zu erhöhen oder zu erniedrigen. Die Dekodierung des Hinweisbefehles erfolgt in der nachfolgenden Tabelle.

Tabelle über die Dekodierung des Hinweisbefehles

BIT #-	9 8 7 6	5 4	3	2 10
FELD	P	F	1	10 0

00

01

BEFEHLE

SETZE HINWEISMARKE AUF P

FRAGE, OB DIE HINWEISMÄRKE BEI P STEHT

ERNIEDRIGE HINWEISMARKE)

ERHÖHE HINWEISMARKE j 7T~ ,

J d.h. ohne

Bedeutung

Wie bei dem Befehl über die Zustandsabfragung wird das übertragsflipflop 76 gesetzt, wenn die Hinweismarke sich bei P befindet, wenn der Befehl ausgeführt wird, ob die Hinweismarke sich bei P befindet. Wie bei der Zustandsabfragung erfolgt die tatsächliche Frage in negativer Form, d.h. falls P^N ist, erfolgt eine Verzweigung. Diesem Befehl würde eine bedingte Verzweigung folgen. Bei einem Mathematikprogramm gestattet die Hinweismarke stets einen fortschreitenden Betrieb bei einem größeren und größeren Abschnitt eines Wortes. Bei jeder Iteration in einer Schleife wird die Hinweismarke erniedrigt oder erhöht und dann zur Vervollständigung überprüft, um eine andere Iteration oder einen Sprung aus der Schleife zu erreichen .-

409828/0862

- 53 -

Die Befehle des Typs 5 über den Dateneingang und die Anzeige werden dazu benutzt, um Daten in die Rechen- und Registerschaltung 32 einzugeben, die Inhalte der Stapel- und Speicherregister zu verändern und die Anzeige auszutasten. 16 Befehle in diesem Satz werden von keiner der existierenden Schaltungen erkannt und sind daher für andere externe Schaltungen verfügbar, welche zusammen mit anderen Ausführungen des Rechners verwendet werden könnten. Die nachfolgende Tabelle enthält eine Liste über die Dateneingangs- und Anzeigebefehle.

Tabelle der Befehle des Typs 5

(X: ohne Bedeutung, was in diesem Zusammenhang bedeutet, daß der Befehl nicht von diesem Bit abhängt. Entweder eine 1 oder eine 0 bewirkt die gleiche Befehlsausführung.)

^X9 ¹S ¹T ¹S ¹S ¹A

10 0 0

Σ9 1S	i	7	0	1S	1A	BEFEHL
0000	->		0	0	0	16 verfügbare Befehle
0000	N	- 1111	0	0	1	Eingabe des 4-Bit-Kodes N in das C-Register bei der Hinweismarken position (LOAD CONSTANT)
0	0	- 1001	0	1	X	FLACKERN DER ANZEIGE
0	0	0	0	1	X	SPEICHERAUSTAÜSCH, C-HYKC
0	1	1	0	1	X	STAPEL AUFWÄRTS, C+C+D->-E-*F
0	1	0	0	1	X	STAPEL ABWÄRTS, F->-F->-E->-D->A
1	0	1	0	1	X	ANZEIGE ABGESCHALTET
1	0	0	1	1	X	ERINNERN SPEICHERINHALT M->-M-*C
1	1	1	1	1	X	HERUNTERROLLEN C+F+E+D+C
1	1	0	1	X	LÖSCHEN ALLER REGISTER O+A,B,C ,D,E rF ,K
X	X	1	1	X	Is A-Register (56 Bits)
X I	X	0	1	X	BCD C-Register (56 Bits)
1

409826/0862

Der erste Satz von sechzehn möglichen Befehlen (I₅I. = OO) in der vorstehenden Tabelle wird von dem Rechner nicht verwendet.

Der nächste Befehl {I-I- = 01) in dieser Tabelle wird der

5 4

Befehl "LADE KONSTANTE" (LDC) oder"ZIFFERNEINGANG" genannt. Wenn dieser Befehl ausgeführt wird, werden 4 Bits in I₉-I₆ in das C-Register an der Stelle der Hinweismarke eingesetzt und diese wird erniedrigt. Dadurch kann eine Konstante, wie beispielsweise fr in dem Auslesespeicher gespeichert und dann an die Rechen- und Registerschaltung 32 übertragen werden. Um eine Konstante mit 10 Ziffern zu übertragen, sind nur 11 Befehle erforderlich, und zwar einer zur Voreinstellung der Hinweismarke. Bei der Verwendung dieses Befehles gibt es verschiedene Ausnahmen. Wenn dieser Befehl verwendet wird, wenn sich die Hinweismarke in der Position 13 befindet, kann ihr kein RECHEN- und REGISTERBEFEHL·, d.h. ein Befehl des Typs 2 oder 5 folgen. Wenn P = 12 ist, kann der Ladekonstante eine andere Ladekonstante aber kein anderer der Befehle des Typs 2' oder 5 folgen. Wenn P = 12 ist, kann dem Befehl "LADE KONSTANTE" ein anderer Befehl "LADE KONSTANTE" aber kein anderer Befehl der Typen 2 oder 5 folgen. Wenn die Hinweismarke sich in der Position 14 befindet, hat der Befehl "LADE KONSTANTE" keine Wirkung. Wenn P = 12 ist und dem Befehl "LADE KONSTANTE" ein anderer Befehl des Typs 2 oder 5 folgt, wird die Position 13 in dem C-Register verändert. Das Laden von Kodes £1010-1111)_# welcher keine Ziffern betreffen, ist nicht zulässig, da sie verändert werden, wenn sie durch die Additionsschaltung gelangen.

Der nächste Befehlssatz (Ι_β I₅ I₄ = 01X) in der Befehlstabelle des Typs 5 enthält zwei ANZEIGE-Befehle und sechs STAPEL- oder SPEICHER-Befehle. Das Anzeigeflipflop in der Rechen- und Registerschaltung 32 steuert die Austastung aller Leuchtdioden. Wenn es zurückgesetzt ist, wird der Kode 1111 in das Anzeige-Pufferregister 94 eingegeben, welches derart gekodiert wird, daß

4098 26/0862

keine Segmente eingeschaltet sind. Ein Befehl dient dazu* dieses Flipflop (I_Q I_Q I_ = lOO) zurückzusetzen und ein anderer Befehl dient dazu, es zu blinken (000).

Die verbleibenden Befehle des Typs 5 enthalten zwei Befehle, welche den Speicher beeinflussen (AUSTAUSCH C*~*M und SPEICHERE M-+C) . Drei Befehle beeinflussen den Speicherstapel (AUF, AB, DREHE NACH UNTEN bzw. UP, DOWN und ROTATE DOWN). Weitere Befehle sind ein allgemeiner Löschbefehl,

ein Befehl zum Laden des Registers A von der Leitung Ιο

(I Ig I₅ = 011) und ein Befehl zum Laden des Registers C von der BCD-Leiturig (111). Keiner der beiden letzten Befehle hängt von den Bits I , I_fi oder I₄ ab. Der Befehl I -*■ A gestattet es, daß ein Tastenkode von einem Programmspeicher an die Rechen- und Registerschaltung 32 zur Anzeige übertragen ' wird. Die gesamten 56 Bits werden geladen, obgleich nur die beiden Informationsbits von Interesse sind. Der Befehl BCD in C gestattet es, daß die Daten in die Rechen- und Registerschaltung 32 von einem Datenspeicher oder der Eingabe/Ausgabe-Schaltung eingegeben werden.

Der Befehl "WÄHLE AUSLESESPEICHER" und andere sechs Befehle sind durch das Kodemuster 10000 in den Befehlsbits I₄^I₀ enthalten. Die Dekodiertabelle für diese Befehle ist nachfolgend dargestellt.

Tabelle der Befehle des Typs 6

Beeinflußter Schaltkreis	Ve1	71	61S1	1 0	4V2 1I1O	Befehl
I AUSLESE- SPEICHER	000 4- 111	0 0 0 0 0 0	10 0 0 0 10000 IJD 0 0 0	AUSLESESPEICHERWAHL· EINS AUS ACHT.GEMÄSS DEN BITS Σ -I g
STEUER- UND TAKTSCHALTUNG	XXX	O 1	10 0 0 0	UNTERPROGRAMM-RÜCKKEHR
X X	0 10	1 0 0.0 0	EXTERNER TASTENKODEEINGANG ZUR STEUER- UND TAKT- SCHALTUNG
X X	1	LOOOO	TASTATUREINGABE

409826/0862

-U-

Beeinflußter Schaltkreis

i

1

X

O

1

1

5*.

O

O

O

L1O

Befehl

DATEN SPEICHER

I

O

1

1

1

1

O

O

O

0

ÜBERTRAGE ADRESSE VOM C-REGISTER ZUM DATEN SPEICHER

1

0

ÜBERTRAGE DATEN VOM C-REGISTER ZUM DATEN SPEICHER

Der WAHLBEFEHL für den Auslesespeicher gestattet die übertragung der Steuerung von einem Auslesespeicher zu einem anderen. Jeder Auslesespeicher hat eine Maskierungsauswahl, welche derart programmiert ist, daß die Bits I - I_ dekodiert werden. Ein WÄHLBEFEHL für den Auslesespeicher 3, der vom Auslesespeicher ausgelesen wird, setzt das Auslöseflipflop 96 in den Auslesespeicher 1 und setzt das Auslöseflipflop 96 in dem Auslesespeicher Die Adresse wird in üblicher Weise in der Steuer- und Taktschaltung 3O erhöht. Falls sich der Befehl "WÄHLE ROM 3" an der Stelle 197 in dem Auslesespeicher ROM 1 befindet, befindet sich der erste aus dem Speicher ROM 3 gelesene Befehl an der Stelle 198.

Die Bits I_CI_C = 01 bezeichnen einen UNTERPROGRAMM-UMKEHR-BEFEHL (RET). Es gibt 8 Speicherbits in dem Schieberegister 68-72 mit 28 Bits in der Steuer- und Taktschaltung 30, um die Rückkehradresse zu erhalten, wenn ein UNTERPROGRAMM-SPRUNGBEFEHL ausgeführt wird. Diese Adresse ist schon erhöht worden, so daß die Ausführung eines Befehls RET lediglich die Ausgabe der Adresse auf der I -Leitung zu den Bitzeiten b._q-b„-. und das Einsetzen in den Speicheradressenteil 68 des Schieberegisters verlangt. Die Adresse ist auch in dem Rückkehradressenteil 7O enthalten.

In die Steuer- und Taktschaltung 30 wird ein Tastenkode eingegeben, indem eine Taste der Tastatur gedrückt wird. Ein Drücken einer Taste wird durch eine positive Abfragung des Zustandsbits 0 erfaßt. Während einer Berechnung wird die Tastatur ausgeschaltet, da dieses Zustandsbit gewöhnlich nicht abgefragt würde, bis eine Rückkehr zu der Anzeigeschleife erfolgt. Die tatsächliche Betätigung einer Taste bewahrt den Zustand des Systemzählers,

409826/0862

- 57 -

welcher ebenfalls der Tastenkode 1st, in dem Tastenkoderegister 66 (Fig. 6) und setzt das Zustandsbit auf 0. Die Ausführung eines Tastenkode-Befehles führt den Tastenkode mit seinen 6 Bits in das Tastenkode-Register 66 über die

I -Leitung und in das ROM-Adressenregister 68 zu den Bita

zeiten b_1n-b_,. Die bedeutendsten 2 Bits b__c und b_o/. werden J. y zb Zo Zo

auf O gesetzt, so daß ein· Tasteneingangsbefehl stets zu einem der ersten 64 Zustände springt.

Es werden jetzt zwei Algorithmen diskutiert, um den Befehlssatz weiter zu erläutern. Der erste dieser Algorithmen besteht in einer Anzeige-Warteschleife, welche verwendet wird, nachdem ein Tastenkode verarbeitet worden ist und während auf einen anderen auszuführenden Tastenkode gewartet wird. Der zweite dieser Algorithmen besteht in einem Gleitkomma-Multiplikationsvorgang.

In Fig. 43 ist ein Flußdiagramm der Anzeige-Warteschleife dargestellt. In diese Schleife wird eingetreten, nachdem eine Tasteninformation bearbeitet worden ist, das Register A in geeigneter Weise mit der anzuzeigenden Zahl geladen worden ist und das Register B die Anzeigemaske enthält. Es sind zwei Hinweismarken oder Zustandsbits erforderlich. Das Zustandsbit O (SO) ist in der Steuer- und Taktschaltung 30 verdrahtet, so daß es automatisch gesetzt wird, wann immer eine Taste bedrückt wird. Das Zustandsbit 8 (S8) wird in diesem Programm verwendet, um die Tatsache zu bezeichnen, daß diejenige bereits ,getätigte Taste schon verarbeitet worden ist, da ein Programm beendet sein kann, bevor die Taste freigegeben wird. In den Zuständen DISl und DIS2 werden diese beiden Zustandsbits ausgelöst. Dann wird eine Schleife als Zeitverzögerung benutzt, um das Kontaktprellen zu überbrücken. Im Zustand dorDIS4 wird das Zustandsbit 8 (S8) überprüft. Während der ersten Zeit in dem Algorithmus muß es eins sein, da es auf DISl gesetzt wurde, um anzuzeigen, daß die Tasteninformation verarbeitet worden ist. Im Zustand DIS5 wird die Anzeige eingeschaltet. Die Anzeige flickert, da

409826/0862

sie vorher ausgeschaltet sein muß. Es gibt keinen getrennten Befehl zum Einschalten der Anzeige. Zu dieser Zeit erscheint die,Antwort für den Benutzer. Im Zustand DIS6 wird das Zustandsbit O (SO) überprüft, um das Drücken einer Taste zu überprüfen. Anderenfalls, d.h. wenn es O = 0 ist, wurde die vorhergehende Taste losgelassen und das Zustandsbit 8 (S8) auf 0 (DIS7) zurückgesetzt. Der Rechner kann jetzt eine neue Tasteninformation aufnehmen, da die vorhergehende Tasteninformation verarbeitet und die Taste entlastet worden ist. Der Algorithmus läuft weiter durch die Zustände DIS6 und DIS7 und wartet auf eine neue Tasteninformation. Dieses ist die grundlegende Warteperiode des Re'chners. Falls es O = 1 in dem Zustand DIS6 ist, kann die gedruckte Taste die alte Taste, d.h. die bereits verarbeitete Taste oder eine neue Taste sein. Dieses kann bei der Rückkehr in den Zustand DIS4 bestimmt werden, wo das Zustandsbit 8 (S8) überprüft wird. Falls eine neue Taste gedrückt wird S8 = 0), springt die Ausführung in den Zustand DIS8, die Anzeige wird ausgetastet, und es erfolgt ein Sprung aus dem Programm zur Tasteninformation. Die nachfolgende Tabelle gibt die Befehlsliste des Algorithmus an:

Tabelle des Warteschleifenalgorithmus Bezeichnung Betrieb Anmerkung

DISl: 1 -»■ S8 SETZE ZUSTANDSBIT 8

DIS2: 0 -> SO SETZE ZUSTAND 0 ZURÜCK

DIS3: P-I P ERNIEDRIGE HINWEISMARKE

FALLS P#12 48 WÖRTERSCHLEIFE (3 χ 16) DANN GEHE ZU UM KONTAKTPRELLEN ABZU-DIS3 WARTEN

ANZEIGE AUSGESCHALTET

DIS4: FALLS S8 # 1, FALLS TASTENINFORMATION

DANN GEHE Zu NICHT VERARBEITET WURDE, DIS8 VERLASSE PROGRAMM

DIS5: ANZEIGE FLACKERT ANZEIGE EINSCHALTEN

DIS6: FALLS SO ^ 1, FALLS TASTE ENTLASTET

DANN GEHE ZU IST, SETZE S8 ZURÜCK DIS7 UND WARTE

40 982 6/0862

- 59 -

Bezeichnung Betrieb Anmerkung

GEHE ZU DIS2 TASTE GEBRÜCKT

PRÜFE OB GLEICHE TASTE

DIS7: O -*- S8 ZEIGE AN, DASS TASTE NICHT

VERARBEITET WÜRDE

GEHE ZU DIS6 . ZURÜCK UND WARTE AUF

TASTENINFORMATION DIS8: ANZEIGE AUSBLENDEN

DIS9: TASTEN IN -»- SPRUNGBEFEHL ZUM PROGRAMMROM-ADRESSE START ZUR VERARBEITUNG Ψ DER GEDRÜCKTEN TASTE FORTSETZUNG

Der Algorithmus für die Gleitkomma-Multiplikation multipliziert χ mal y, wobei das Register C χ in Potenzschreibweise und das Register D γ enthält. Wenn die Multiplikationstaste gedrückt wird, springt der Warteschleifen-Algorithmus zu einer ROM-Adresse, welche der ersten Stufe des Multiplikations-Algorithmus entspricht, wegen der Art und Weise, in welcher die Befehle "TASTEN ROM ADRESSE" (Zustand DIS9 in Fig. 43) ausgeführt werden. Der Tastenkode wird zur nächsten ROM-Adresse, Zu diesem Zeitpunkt werden die Inhalte der Register A-D in folgender Weise angezeigt.

Register A enthält die Gleitkomma-Darstellung von χ Register B enthält die Anzeigemaske von χ Register C enthält die Pοtenzdarstellung von χ Register D enthält die Potenzdarstellung von y

Der Algorithmus zur Ausführung der Gleitkomma-Multiplikation ist in der folgenden Tabelle angegeben. Die Buchstaben in Klammern bezeichnen die folgenden Wortwahlmöglichkexten:

P: POSITION DER HINWEISMARKE

WP: AUF ZUR HINWEISMARKENPOSITION

X: EXPONENTENFELD

XS: EXPONENTENVORZEICHEN

M: MANTISSENFELD OHNE VORZEICHEN

MS: MANTISSE OHNE VORZEICHEN-

W: GANZES WORT

S: NUR MANTISSENZEICHEN

409 826/0 86

Tabelle für Gleitkornma-Multiplikationsalgorithmus

Bezeichnung - Betrieb MPYl:

MPY2:

MPY3:

MPY4:
MPY5:

MPY6:

STAPEL"	-»■ A	(W)
A+C -*- C	(X)	(M)
A+C -»■ C	(S)	(W)
FALLS KEIN ÜBERTRAG,GEHE ZU MPY3 O -»■ C(S)
0 ■*■ B
A + B
0 -> A

2 ■> P

P+l -»■ P

A+B + A(W) C-I -> C(P) FALLS KEIN ÜBERTRAG,GEHE ZU MPY5

SCHIEBE A(W) NACH PiCHTS

WENN P # DANN GEHE ZU MPY 4

Anmerkung -

ÜBERTRAGE y NACH A
BLENDE STAPEL AUS

ADDIERE EXPONENTEN, UM EXPONENTEN DER ANTWORT ZU BILDEN

ADDIERE VORZEICHEN ZUR BILDUNG DES VORZEICHENS DER ANTWORT

KORRIGIERE VORZEICHEN, FALLS BEIDE NEGATIV SIND

LÖSCHE B, DANN ÜBERTRAGE MANTISSE VON Y-

BEREITE A ZUR AKKUMULATION DES PRODUKTES VOR

SETZE HINWEISMARKE AUF LSD (NIEDRIGSTER STELLENWERT) MULTIPLIKATION MIT MINUS 1

ERHÖHE DIE NÄCHSTE ZIFFER

ADDIERE MULTIPLIKATOR-MANTISSE C(P) MAL ZUM TEILPRODUKT.WENN C(P)=O IST, HALTE AN UND GEHE ZUR NÄCHSTEN ZIFFER

SCHIEBE TEILPRODUKT NACH RECHTS

PRÜFE, OB MULTIPLIKATION ABGESCHLOSSEN (HINWEISMARKE BEI MSD).

FALLS A(P)>

DANN GEHE ZU

MPY6

SCHIEBE A(M) NACH

LINKS

PRÜFE, OB MSD = O. FALLS JA, SCHIEBE NACH LINKS UND BERICHTIGE EXPONENTEN MULTIPLIZIERE MIT 10 UND ERNIEDRIGE

EXPONENTEN

C-I
C+l

C(X) C(X)

A ■*■ B(XS) A+B +A(XS) FALLS KEIN ÜBERTRAG,GEHE ZU MPY7 A+l ■> A(M) WEITERFAHREN_xUM FAKTOR VON IO ZU KORRIGIEREN

VERDOPPLE BESONDERE PRODUKTZIFFERN UND DIE ELFTEN ZIFFERN

FALLS SUMME KLEINER ALS IO, DANN ERLEDIGT

FALLS SUMME GROSSE ALS IO,DANN ADDIERE 1

409 8 28/0 802

Bezeichnung

MPY7:

Betrieb

Anmerkung

FALLS KEIN ÜBERTRAG, FALLS NICHT ALLE ZIFFERN DANN GEHE ZU MPY7 SIND, DANN ERLEDIGT A+l A(P) WENN ALLE ZIFFERN 9 SIND,

C+l C(X) ADDIERE 1 UND ERHÖHE

EXPONENTEN

TAUSCHE C(M) MIT A AUS

GEHE ZUR MASKE 1

GIB EIN

ANTWORT-MANTISSE IN C

GEHE ZUM PROGRAMM ZUR EINGABE DER ANTWORT IN A UND STELLE DIE GEEIGNETE MASKE FÜR B DAR!

BEFEHLSSATZ 2 "

Während die in dem Befehlssatz 1 enthaltenen Befehle durch die Rechen- und Registerschaltung, die Steuer- und Taktschaltung und die Auslesespeicherschaltungen und die Datenspeicher ausgeführt werden, enthält der Befehlssatz 2 diejenigen Befehle, welche durch die Eingabe/Ausgabeschaltung ausgeführt werden.

In einigen Fällen können die gleichen Bitmuster einen Befehl innerhalb eines Befehlssatzes 1 sowie einen Befehl in dem Befehlssatz 2 enthalten. Diese Situation macht es erforderlich, daß die verschiedenen Rechnerschaltungen den Befehlssatz erkennen müssen, in welchem ein Befehl gegeben wurde. Wegen dieses Erfordernisses wird ein Befehl ISl oder IS2 abgegeben, um diejenigen nachfolgenden Befehle zu bezeichnen, die entweder von dem Befehlssatz 1 oder dem Befehlssatz 2 entnommen sind. Nach der Ausführung eines Befehles IS2 werden die Rechen- und Registerschaltung und die Steuer- und Taktschaltung daran gehindert, auf nachfolgende Befehle zu antworten, da sie Befehle des Befehlssatzes 2 sind.

Die Befehle des Befehlssatzes 2 sind nachfolgend aufgeführt, wobei die Bitmuster in der ansteigenden Reihenfolge der Wertigkeit von rechts nach links gegeben sind.

409826/0862

Befehlstabelle (Befehlssatz 2)

Bezeichnung Bit-Muster	1001000000
ISL	0101000000
IS2	0111111000
TTC	0111110000
CTT	0010001000
XOR	0011001000
IOR	0010101000
AND	0001101000
ADD	0100001000
SLT	OIOIOOIOOO
SRT	1100001000
TINC	1101001000
TDEC	1110001000
YBC	0001010000
EERA	0100101000
IXT	111111OOOO
CCS	1101110000
TCS	0101110000
PRE	0011110000
ADV	0001110000
RED	1000000000
TTP	1000101000
PTT	0111000000
PINC	1001001000
PDEC	0000100000
RMGRA	0010100000
RMGRB	0100100000
RMGRC

Be s ehre ibung

BEWIRKE BEFEHLSSATZ 1 BEWIRKE BEFEHLSSATZ 2 T-REGISTER +C-REGISTER C-REGISTER + T-REGISTER

T-REGISTER EXKLUSIV ODER C-REGISTER-KT-REGISTER

T-REGISTER INKLUSIV ODER C-REGISTER +T-REGISTER

T-REGISTER UND C-REGISTER +T-REGISTER

T-REGISTER UND C-REGISTER

+T-REGISTER

SCHIEBE T-REGISTERINHALT UM EIN BIT NACH LINKS

SCHIEBE T-REGISTERINHALT UM EIN BIT NACH RECHTS

ERHÖHE T-REGISTER UM EINS ERNIEDRIGE T-REGISTER UM.EINS FRAGE BINÄREN ÜBERTRAG AB

EXTERNER EINGANG ZUM AUSLESESPEICHER ROM A

I/O REGISTER ■*-*- T-REGISTER

VERGLEICHE C-REGISTER MIT SEKTOR-ZÄHLER

VERGLEICHE T-REGISTER MIT SEKTOR-ZÄHLER

BEWIRKE DRUCK

PAPIERVORSCHUB

BEREITE ROTEN AUSDRUCK VOR LADE T-REGISTER IN PROGRAMMZÄHLER LADE PROGRAMMZÄHLER IN T-REGISTER ERHÖHE PROGRAMMZÄHLER UM EINS ERNIEDRIGE PROGRAMMZÄHLER UM EINS WÄHLE ROM-GRUPPE A

WÄHLE ROM-GRUPPE B

WÄHLE ROM-GRUPPE C

409826/0862

Bezeichnung Bit-Muster

YADP	0110100000
READ	1000100000
SBL	1010100000
YFKB	1100100000
YPOC	1110100000
YINTF	0000100000
WRITE	001010000
RBL	OIOOIOOOOO
GIOE	0110100000
ELON	1010100000
TG9	1100100000
TG8	1110100000

Beschreibung

FRAGE AUTOSCHALTER FÜR DEZIMALPUNKT AB

LESE PROGRAMMSPEICHER SETZE BESETZILICHT

FRAGE FUNKTIONSBLOCK TASTATURMARKE AB

FRAGE DRUCKBEFEHLMARKE AB FRAGE MARKIERUNG AB SCHREIBE PROGRAMMBEFEHL SETZE BESETZTLICHT ZURÜCK ALLGEMEINE ϊ/0-AUSLÖSUNG FEHLERLICHT EIN
ALLGEMEINER I/O-BEFEHL 1 ALLGEMEINER I/O-BEFEHL 2· ·

Mikroprograminierung des Systems

In Fig. 42 ist ein Flußdiagramm der gesamten Mikroprogrammierung des Rechners dargestellt. Später wird eine genaue Liste der Unterprogramme angegeben, die in diesem Diagramm erwähnt sind. Die Startfolge beginnt damit, daß der Leistungsschalter eingeschaltet wird. Dadurch wird die Steuer- und Taktschaltung dazu gebracht, die ROM-Gruppe A auszulösen und die Adresse 003in dem Speicher A-O zu aktivieren. Der in dieser Adresse enthaltene Befehl beginnt mit der Ausführung des Maschinenprogrammes. Dieses Programm soll alle Arbeitsregister löschen, das Register der Zustandsbits löschen, den .Rechner in den manuellen Steuerbetrieb bringen, das numerische Ausgangsformat auf eine bestimmte Stelle mit zwei Dezimalen einstellen, die Auslöseprogramme für die Peripheriegeräte aufrufen und den Zustand des Rechnersystems anzeigen, indem LÖSCHEN auf dem Drucker angezeigt wird.

Beim Abschluß des Maschinenprogrammes geht die Steuerung an die System-überwachungsprogramme über· Die ersten Prüfungen sind der Kode für das Benutzerprogramm und für das Betriebs-

4098 26/0862

programm. Ein Kode für das von 0 verschiedene Programm bewirkt, daß die Steuerung des Systemes an die Tastatur-Funktionsblock-Programme übergehen, welche Befehle für die ROM-Gruppe B abgeben. Falls das Ergebnis der Benutzerkodeprüfung 0 ist, wird der Betriebstest ausgeführt. Das Ergebnis 0 zeigt den manuellen Steuerbetrieb an, wogegen das Ergebnis ungleich 0 angibt, daß das Programm durchgefahren wird.

In dem manuellen Steuerbetrieb wird der Inhalt des C-Registers in der Rechen- und Registerschaltung für den numerischen Ausgang in das geeignete Format gebracht, die geeignete Anzeigemaske erstellt und die Anzeige eingeschaltet. Eine Benutzermarke für die Datenspeicherung führt dazu, daß die Steuerung zu den Datenspeicherprogrammen übertragen wird. Falls diese Markierungsprüfung 0 ergibt, bleibt die Steuerung in dem Hauptsystem. Falls die vorher gedrückte Taste noch gedrückt 1st, bleibt der Rechner in einer Warteschleife bis die Taste entlastet ist. Eine Entlastung einer Taste an diesem Punkt zeigt den Abschluß des vorherigen Ausführungsprogrammes an und zwingt den Rechner in eine Leerlaufschleife, in welcher er auf die Betätigung einer neuen Taste wartet.

Wenn eine neue Taste gedrückt wird, wird eine spezielle Marke in dem Zustandsbit-Register gesetzt, wodurch der Rechner die Warteschleife verläßt. Nach ungefähr 3 ms Verzögerung ist der Zentralprozessor vorbereitet auf die Ausführung eines neuen Programmes, indem einige Hinweismarken zurückgesetzt und Daten in verschiedene Register eingegeben werden. Die kurze Zeitverzögerung wird dazu verwendet, um irgendwelche Probleme mit zu vermeiden, die mit dem Prellen der Kontakte der Tastatur verbunden sind. Wenn die gerade niedergedrückte Taste einem Tastatur-Funktionsblock zugeordnet ist, geht die Kontrolle an die Funktionsblockprogramme über. Wenn der gerade gedrückten Taste eine Verschiebetaste vorausging, wird die Steuerung an den Auslesespeicher ROM A-6 übertragen, wo die Ausführung der Programme für die Befehle von ROM A-2 und der ROM-Gruppe C beginnen. Anderenfalls ist der Zentralprozessor darauf vorbereitet, einen

409826/086 2

digitalen Eingang aufzunehmen, indem er das Α-Register zurücksetzt. Jetzt werden die in dem Auslesespeicher ROM A-I enthaltenen Ausführungsprogramme aufgerufen.

In dem Programmbetrieb wird zunächst eine Prüfung durchgeführt um zu bestimmen, ob die Stopptaste gedrückt worden ist. Falls dieses geschehen ist, werden die geeigneten Marken geändert, so daß sie eine Änderung der Betriebsart von"Programmdurchführung" auf "manuelle Steuerung" anzeigen, wonach die Steuerung auf den System-Überwachungspunkt übertragen wird. Falls die Stopptaste nicht .gedrückt worden ist, wird der Programmzähler herabgesetzt und ein neuer Befehl von dem Programmspeicher gelesen. Falls der Programmspeicher nicht überschritten wird, kann der Zentralprozessor eine Zifferneingabe aufnehmen und einen neuen Befehl als die Startadresse für ein Programm aufnehmen.

Falls die Speicherkapazität während einer Erhöhung überschritten wird, wird ein Fehlerprogramm aufgerufen, was zum Ausdrucken einer Fehlernachricht führt. Gleichzeitig wird der Rechner auf · manuelle Steuerung umgestellt und die Mikroprogrammsteuerung wird auf den Ausgangspunkt der System-Überwachung zurückgeführt.

Jedes Ausführungsprogramm ist einem bestimmten Befehl der Maschinensprache zugeordnet. Alle diese Programme sind im einzelnen in denjenigen.Teil der Befehlslisten beschrieben, der mit dem Auslesespeicher ROM A-O bis A-7 zu tun hat. Das der Taste für die linke Klammer zugeordnete Programm ist in dem Flußdiagramm in ,Fig. 48 dargestellt.

Einzelaufstellung der Programme und Unterprogramme der Befehle

Eine vollständige Liste aller Programme und Unterprogramme der Befehle und aller von diesen Unterprogrammen und Programmen verwendeten Konstanten ist nachfolgend angegeben. Die Liste umfaßt alle Unterprogramme und Programme, die ur-

409 8 26/0862

-η -

sprünglich und wahlweise gewählt worden. Alle Programme, Unterprogramme und Konstanten sind in den einzelnen ROM-Schaltungen in jeder ROM-Gruppe gespeichert, wie an der Spitze der ersten jeder ROM-Gruppe zugeordneten Seite angegeben ist. Jede Zeile der jeder ROM-Schaltung zugeordneten Liste ist getrennt in der ersten Spalte der linken Seite jeder Seite aufgeführt. Dadurch wird die Bezugnahme auf die verschiedenen Teile der Liste vereinfacht. Jede Adresse in jeder ROM-Schaltung wird in Oktalform durch vier Ziffern in der zweiten Spalte des linken Teiles jeder Seite dargestellt. Verzweigungsadressen sind in Oktalform durch vier Ziffern in der dritten Spalte der linken Halfte ^der Seite dargestellt. Das Bitrauster jedes Befehles oder jeder Konstanten ist durch zehn Bits in der vierten Spalte der linken Hälfte jeder Seite dargestellt. Die den einzelnen Befehlen zugeordneten Bezeichnungen sind in der linken Spalte der linken Hälfte jeder Seite enthalten. Eine Aufstellung für jeden der Befehle ist in der sechsten Spalte der linken Hälfte jeder Seite dargestellt. Die Bezeichnungen für die Verzweigungsbefehle sind in der siebenten Spalte der'linken Hälfte jeder Seite dargestellt. Erläuternde Kommentare sind in dem verbleibenden Teil jeder Seite dargestellt.

09826/0 862

Zeilen laufende Nr. Adresse

0000

4	0001
5	0002
6	0003
7	0004
8 .	0005
9	0006
10	0007
11	0010
12	0011
13	0012

14

0013

JVlAIN UNIT LISTING (ROM A-O) Haupteinheit (ROM A-O)

Abzweig- Betriebs-Adresse Code

Bit-Muster

0 000 110 100 LPWOl CLS

0 100 110

JSB LPWO2

1 110 101 000 LPWO3 CLR

0 010 100

1 101 001

0 000 100

RMGRB

PT13

BRN LP0W4

0 000 101 000 LSRT2 DSTO

1 010 101'

MTC

0 010 011 000 LP0W4 LDC2 ,

0 010 010 000 LRES3 ROM 1 '

1 000 101 111 LDlVI BRN LDIV2

1 000 100 Oll LMULl. BRN LMUL2

CLEAR ALL STATUS BITS
alle Zustandsbits löschen

GO TO I/O SOFTWARE PWON

Eingabe/Ausgabe-(I/O-) Software gehen PWON

CLEAR ALL REGISTERS
Alle Register löschen

CALL I.BLK SOFTWARE FOR REDEFINITION I.BLK-Software für Neudefinition rufen

PREPARE DP FLAG LOAD
DP-Kennzeichen-Ladung vorbereiten · «

SET IT TO 2 ^j

auf 2 setzen

SWITCH THE DISPLAY ON
Anzeige einschalten

PREPARE INTERNAL FLAG VECTOR Internen Kennzeichenvektor vorbereiten

LOAD DP FLAG OR NONZERO OPMODE FLAG DP-Kennzeichen oder OP-Betrieb-Kennzeichen (nicht O) laden

GO TO DIVIDE ROUTINE

Zur Divisionsroutine gehen

GO TO MULTIPLICATION ROUTINE zur Multiplikationsroutine gehen

K)

co

co

GO CO

-Ρου

15

0014

0 111 010 001 LPOWl JSB LPRSl

ο σο co

16	0015
17	0016
18	0017
19	0020
20	0021
21 '	0022

22 23 24

0023

0024

0025

25	0026
26	0027
27	0030
28	0031

1 000 010

BRN LP0W2

1 000 101 110 LRIPl W,BXC

0 001 100

BRN LRIP2

0163■ 0 111 010 001 LFQLl JSB LPRSl

0 110 010 000 ' ROM 3 , ■

0 101 000 100 LDECl SS5

1 000 101 110 LDIGO W,BXC

1 010 101

0 011 100

MTC

BRN LDGTl

0 110 010 000 LPARl ROM 0 111 111 101 LRESC , JSB LPRTO

0 010 010

ROM

Q 100 010 000 LRIP2 ROM PREPARE DATA AND BLANK FOR PRINT Daten und, Leerstellen für Drucken vorbereiten

BRANCH TO CONTINUE

zur Fortsetzung abzweigen

SAVE DATA TEMPORARILY IN B-REG Daten zwischenzeitlich im B-Register bewahren

BRANCH TO CONTINUE

zum Fortsetzen abzweigen

PREPARE DATA AND BLANK FOR PRINT. Daten und Leerstellen zum Drucken vorbereiten

DECIMAL POINT ENTRY,SET D.P. KEY FLAG Dezimalpunkteingang, DP-Tastenkenn- _% zeichen setzen ~

DIGIT 0 ENTRY, STORE DATA IN B-REG 0% Eingang Ziffer 0, Daten im B-Register ' speichern

PREPARE INT. FLG. VECTORFOR TEST Internen Kennzeichenvektor für Test vorbereiten

PREPARE ROM SWITCH
ROM-Schaltung vorbereiten

JUMP TO FORCED PRINT ROUTINE zur Routine für erzwungenen Druck springen

SWITCH TO ROM 1 AGAIN
wieder auf ROM 1 schalten

SWITCH TO ROM 2 .
auf ROM 2 schalten ·

CO CO CO CO

29 0032

30 0033

31 0034

1 111 101 010 LDIG3 X,APIA

1 111 101 010 LDIG2 X,APIA

1 111 101 010 LDIGl X,APIA

32 0035 0023 0 001 001 111

BRN

33 0036 0146 0 110 Oil 011 LPFRl BRN

■Ρ-	35	004C
O
co
co	36	0041
.NJ
CO	37	0042
O
OO	38	0043
CD	39	0044

BRN

1 111 101 010 LDIG6 X,APIA

1 111 101 010 LDIG5 X,APIA

1 111 101 010 LDIG4 X,APIA

40 0045 0032 0 001 101 011

BRN

41 0046 0061 0 011 000 111 LMTXl BRN

42 0047

0 010 100 000 LFBLKl RMGRB

43 0050 0163 0 111 010 001 LSUBl JSB DIGIT 3 ENTRY Eingang Ziffer 3

DIGIT 2 ENTRY Eingang Ziffer 2

DIGIT 1 ENTRY Eingang Ziffer 1

LDIGO GO TO DIGIT 0 ENTRY Eingang Ziffer 0 gehen

LPERA PERCENT ROUTINE BEGINNING POINT Anfangspunkt für Prozentroutine

34 0037 0 110 010 000 LPERY ROM

35 0040 0163 0 111 010 001 LADDl JSB LPRSl

PREPARE DATA AND BLANK FOR PRINT Daten und Leerstellen für Druck

LADD2 BRANCH TO CONTINUE Abzweigen, zur Fortsetzung

DIGIT 6 ENTRY Eingang Ziffer 6

DIGIT 5 ENTRY Eingang Ziffer 5

DIGIT 4 ENTRY Eingang Ziffer 4

LDIG3 GO TO DIGIT 3 ENTRY zum Eingang·Ziffer 3 gehen

LXTMlO RECALL, GO TO COMMON PART WITH STORE zurückrufen, mit Speicherinhalt zum ' gemeinsamen Teil.gehen

SWITCH TO ROM GROUP auf ROM Gruppe 3 schalten

LPRSl PREPARE DATA AND BLANK FOR PRINT Daten und Leerstellen für Druck vorbereiten

CO CO CO -P-CO

44 0051 0344 1 110 010 Oil

BRN

LSUB2

ο
σο
σ>

45 0052

46 0053

47 0054

1 111 101 010 LDIG9 X,APIA

1 111 101 010 LDIG8 Χ,ΑΡΙΑ

1 111 101 010 LDIG7 Χ,ΑΡΙΑ

48 0055 0042 0 010 001 011

BPN

49 0056 0163 0 111 010 001 LXTMl JSB

50 0057 0173 0 111 110 001

51 0060

52 0061

53 0062 0271

54 0063 0321

1 οοΐ οοο 100

JSB

SS9

0 100 010 000 LXTMlO ROM

1 Oil 100 111 LCONTl BRN 1 101 000 111 LENTR BRN

55 0064 0355 1 110 111 001 LSRTl JSB

56 0065 0006

57 0066 0260

58 0067

59 0070

60 0071

0 000 Oil Oil BRN

1 Oil 000 Oil LCFNl BRN

0 010 010 000 LRND2 ROM

1 100 010 000 LSHFPl ROM 0 010 010 000 LDGTl ROM

LDIG6 LPRSl

LPRT3

LCONT2 LSLEl

BRANCH TO- CONTINUE

zur Fortsetzung abzweigen

DIGIT 9 ENTRY
Eingang Ziffer 9

DIGIT 8 ENTRY
Eingang Ziffer 8

DIGIT 7 ENTRY
Eingang Ziffer 7

GO TO DIGIT 6 ENTRY

zum Eingang Ziffer 6 gehen

PREPARE DATA AND BLANK FOR PRINT Daten und Leerstellen für Druck vorbereiten

PREPARE SYMBOL AND PRINT Symbol vorbereiten und drucken

SET "STORE" ROUTINE FLAG ,

"Speicher"-Routine-Kennzeichen setzen

LAST ENTRY KEYCODE ACCEPTED Letzter Eingangs-Tastencode akzeptiert

LKYUPl WAIT FOR KEY RELEASE

auf Loslassen der Taste warten

LSRT2
LCEN2

SWITCH TO ROM 1
auf ROM 1 schalten

SWITCH TO ROM 1
auf ROM 1 schalten

OO CJ) OO CO

61 0072 0067 0 011011111 LRNDl 62 0073

63 0074

0 100 000 100 LRESl

BRN LRND2 SS4

1 Oil 001 100 LRES2 PTIl

O	67	0100
co 00	68	0101
co
CD	69	0102
co co	. 70	0103

64 0075 0162 0 111 001 Oil

65 0076 0222 1 001 001 101 LPRXl

66 0077 0165 0 111 Oil 001

0 010 010 000

1 010 101 000 LSUPlO 1 110 101 110

0 111 001 100

71 0104 1 101 100 010

72 0105 0047 O 010 Oil 111

7 3 0106 0,111 O 100 100 111

74 0107 O 110 001 110 LSUPl

75 0110 0101 O 100 000 111

76 Olli 1 100 001 100 LSUP2

BRN LRES8 JSB LPRX2

JSB LPRT9

ROM

MTC

W,AXC

PT7 ;

P,AMlA

BRN LFBLK Ϊ

BRN

LSUP2

W₁CTA

BRN LSUPlO

PT12 ROUND KEY ROUTINE BEGINNING

Beginn der Routine zur Tastenrundung

SET AUX FLAG TO INDICATE RESET ROUTINE
Hilfskennzeichen zur Anzeige der Rückstellroutine setzen

SET POINTER TO AVOID OP.MODE CHANGE
Hinweismarke setzen um OP-Betriebs-Wechsel zu vermeiden

STORE RETURN VECTOR
Rückkehr-Vektor speichern

AFTER RETURN LOAD SYMBOL# AND PRINT
nach Rückkehr Symbol# laden und drucken

GO TO ROUTINE EXIT

zum Routinenausgang gehen

PREPARE INT.FLG.VECTOR

internen Kennzeichenvektor vorbereiten *.

RESTORE DATA IN C-REG

Daten in C-Register zurückstellen

PREPARE ROUTINE USER CODE TEST

Routine für Benutzerkode-Test vorbereiten

IS IT ZERO? Null?

NO:GO TO FUNCTION BLOCK

Nein: zum Funktionsblock gehen

YES: STAY IN MAIN UNIT

Ja: in Haupteinheit bleiben

CO . CD

PREPARE OP.MODE TEST CO

OP-Betriebs-Test vorbereiten -i>-

σ
co
οο

OO
OT.

77 0112 1 101 100 010

78 0113 0261 1 Oil 000 111

79 0114 0147 O 110 Oil 111

80 0115 O 101 000 000 LPW02

81 0116 0037 O 010 000 001

82 0117 O 110 100 000

83 0120 O 101 000 000

84 0121 0077 O 100 000 001

85 0122

O 110 100 000

86 0123 O 101 000 000

87 0124 0177 1 000 000 001

88 0125

O 110 100 000

P,AMlA

BRN LRUNl

BRN

LMANl

89 0126 1 001 000 000

90 0127 0141 O 110 000 111 ·

91 0130 0367 1 111 Oil 111 LEQLF

92 0131 1 100 010 000 LPCHS

93 0132

94 0133

IS2	100
LIO
GIOE
IS2	200
LIO

GIOE

IS2 LIO

GIOE

ISl -

BRN LPWO8 BRN LEQLG ROM

1 000 101 110 LRIP8 W,BXC 1ST IT ZERO? Null?

NO: GO TO PROGRAM RUN DIRECTOR Nein: zur Programmablaufs-Adressenliste gehen

YES:GO TO MANUAL CONTROL DIRECTOR Ja: zur Handsteuerungs~Adressehliste gehen

LOAD CHANNEL I SELECT CODE Auswahlkode I/O CHANNEL CALL ^{fÜr KanaI λ laden} I/0-Kanal-Ruf

LOAD CHANNEL 2 SELECT, CODE Auswahlkode für Kanal 2 laden

I/O CHANNEL CALL
I/O-kANAL-Ruf

LOAD CHANNEL 3 SELECT CODE Ausfallkode für Kanal 3 laden

I/O CHANNEL CALL
I/O-Kanal-Ruf

CHANGE SIGN ROUT.BEGINNING Beginn der Vorzeichenwechsel-Routine

SAVE DATA TEMPORARILY IN B-REG Daten zwischenzeitlich im B-Register bewahren

O 110 010 000

ROM

95 0134

0 101 00b 000 LPAGE IS2

96 0135 0007 0 000 100

97 0136 0 110 100

LIO GIOE

98 0137 1 001 000 000 ISl

99 0140 0107 0 100 Oil 111 BRN LSUPl 100 0141 1 Oil 010 100 LPW08 YSIl

101 0142 0002 O 000 001 Oil

102 0143 0273 1 Oil 101

BRN LPWO3

BRN LTRBl

103 0144 0163 O 111 010 001 LPERZ JSB LPRSl

104 0145 0037 O 001 111 111 BRN LPERY

105 0146 O 100 010 000 LPERA ROM

106 0147 O 100 010 000 LMANl ROM

107 0150 0152 O 110 101 Oil LJMPB BRN LJMPR

108 0151

109 0152

O 100 010 000 LSCOT ROM

O 100 000 100 LJMPR SS4 CALL NEXT PAGE ROUTINE BEGINNING
nächste beginnende Seitenroutine rufen

SET PROPER SELECT CODE richtigen Auswahlkode ACTIVATE PAGING HARDWARE setzen

Hardware für Seitenbildung aktivieren

IS I/O PLAG SET?
I/O-Kennzeichen gesetzt?

NO, CONTINUE IN PWON ROUTINE
Nein, in PWON-Routine fortfahren

I/O DEVICE NOT FOUND, GO TO ERROR ROUTINE I/O Gerät nicht gefunden, zur Fehlerroutine gehen

SWITCH TO ROM 2
auf ROM 2 schalten

JUMP RELATIVE BACKWARD
relativ zurückspringen

ALLOWS TO REACH BEHIND DSP. ROUTINE FROM
OUTSIDE

ermöglicht, von außerhalb hinter die DSP-Routine zu reichen . nj

JUMP RELATIVE FORWARD
relativ vorwärtsspringen'

110 0153 0227 1 001 Oil

BRN LJMPl OO

co co

CO

CO

Ill 0154

0155

0 111 101 010 LC0D5 X,CPlC

0 111 101 010 LC0D4 X,CPlC

0 111 101 010 LC0D3 X,CPlC

0 111 101 010 LC0D2 X,CPlC

0 111 101 010 LCODl X,CPlC

1 000 010 000 LCODO ROM 4

1 010 101 000 LRES8 MTC

118 0163 0011 O 000 101 111 BRN LRES3

0164 1 110 010 000 LPRSl ROM 7

	113	0156
409826	114	0157
O	115	0160
OO co
ro	116	0161
	117	0162

0165

0166

0 000 110 000 LPRSB RETURN

0 111 100 010 LPRT9 P,CPlC

co

J>co

START TO GENERATE 5 FOR SECOND OP. CODE DIGIT

Starten um 5 für zweite OP-Kode-Ziffer zu erzeugen _λ

START TO GENERATE 4 FOR SECOND OP.CODE DIGIT

Starten um 4 für zweite OP-Kode-Ziffer zu erzeugen

START TO GENERATE 3 FOR SECOND OP.CODE DIGIT

starten um 3 für zweite OP-Kode-Ziffer zu erzeugen

START TO GENERATE 2 FOR SECOND OP.CODE DIGIT

starten um 2 für zweite OPHKode-Ziffer zu erzeugen

START GENERATE 1 FOR SECOND OP.CODE DIGIT starten um 1 für zweite OP-Kode-Ziffer zu erzeugen

USE ZERO FOR SECOND OP.CODE DIGIT für zweite OP-Kode-Ziffer O benutzen

GET INT.FLG.VECTOR FOR UPDATE internen Kennzeichenvektor nehmen, um ihn auf den neuesten Stand zu bringen

ROUTINE BEGINNING FOR OUTPUT "BLANK" Routinenbeginn für Ausgabe "Leerstelle" END OF THE SUBROUTINE (ORIG.DATA IS IS A-REG) Ende der Subroutine (Originaldaten befinden sich im A-Register)

LOAD PRINT CODE FOR SYMBOL # Druckkode laden für Symbol #

O III 10© ΟΙΟ 1.ERT¹S P,CFlC

ill 10© ΟΙΟ' 3LFR¹I? F-CE¹IC

in ioo οίο lprts

111 1OO ΟΙΟ EiPKTS P

O 111 1OO ΟΙΟ LPRT4

Qi 111 10© ΟΙΟ LPRT3 P ,CPlC

O 111 100) QlQ) LPRT'2 P₁₅CPlC

0 111 IQO QlO. LPRTl P ,CFIC

1 HO QlO QOO LPRTO RQM 7

0200- 1 OQO QlQ= QOQ LINTE 2 ROM 4

132 " QSQl I QQO QlO QOO LSEH2 ROM 4

133 Ο2Ο2 ©176 O Hl IH 1Ol LÄDÖ2 JSE LPRTO

134 Ο2Ο3 OMO O Hl QQO Oil, BRW LCOD)I

135 Ö2O4 QlM Q: HO) QlO OH . BRNi LPERZ=

136 02,05 0171 O Hl 1Ol QQ)I LPQW2 JSB LPRT5

	122	Ο167
	123 ■	O17O
	124	0171
	125	Ο172
	126 .	Ο173
	12.7	Ο174
ea rn.= OO ISJf; O* "Si».	128 129	©175 0176
O e»	13O	O177
C*

137 Ο2Ο6 0154 O HO HO Oll

BRN

138 0207

O HO OiO OQO LLABL ROM 3 LOAD PRINT CODE J¹OR SYMBQL Druckkode laden für Symbol

LOAD PRINT CODE FOR SYMBOL Druckkode laden für Symbol

LOAD PRINT CODE FOR SYMBOL Druckkode laden für Symbol

LOAD PRINT CODE FOR SYMBOL Druckkode laden für Symbol

LOAD PRINT CODE FOR SYMBOL, < Druckkode laden für Symbol <

LOAD PRINT CODE FOR SYMBOL > Druckkode laden für Symbol >

LOAD PRINT CODE FOR SYMBOL, = Druckkode laden für Symbol =

LOAD PRINT CODE FOR SYMBOL X Druckkode laden für Symbol X

LOAD PRINT CODE FOR SYMBOL· + Druckkode laden für Symbol +

PREPARE SYMBOL + AND PRINT

Symbol vorbereiten und drucken

GO TO LOAD SECOND QP .CODE DIGIT

zum Laden der zweiten OP-Kode-ziffer gehen

PREPARE SYMBOL AND PRINT' Symbol vorbereiten und drucken

GQ TQ LOAD SECOND OP. CODE DIGIT zur Ladung der zweiten QP-Kode-Ziffer gehen

LABEL HEAD ROUTINE BEGINNING (DEC=87): Routinenbeginn markieren (DEC=STj

O OO Cf>

139 0210 01S3 0 111 ΟΙΟ 001 LMUL2 JSE LPKSl

140 0211 0115 Q/ 111 111 0OI JSB LPRTl 141 0212 0156 0 110 111 Oil BRN 142 0213 01S3 Q 111 ©10 001 LD)I¥2 JSB

143" 0214 0170 O 111 100 144 0)215 0155 O HO 110 1.11

JSB LEBT6 BKM LCOB4

1.45 0216 -01.76 Q; 111 111 101 LPEKB; JSB

E₁FRTO

146 021?

141 0;22© 148 0221

0 110 010 000 LFEK0 HOM

1 010 100 000 LITO Z SBL-

0 000 1.10 000 LP¹RTB RETÜRM

149 Ο222 0132 0 101 101 Oil LPIPC BRN LKIPS

150 O223 1 110 010' 000 LP/RX2 KQK

151 0224

152 0225

153 0226

1 QOl 000 100 LJSBC SSS

QQQi 100 LJSBP SSS '

0 QOl OQQ) 100 LJSBÄ SSl PREPARE DATA AN© BLANK FOR PRIMT Daten und Leerstellen für Druck vorbereiten

PREPARE SYMBOL X AND PRINT
Symbol χ vorbereiten und drucken

GO TQ LOAD SECOND OP.. CODE DIGIT zur Ladung der zweiten OP-Ziffer gehen PREPARE: DATA AND BLANK FOR. PRINT Daten und Leerstellen für Druck vorbereiten

PREPARE; SYMBOL AND PRINT
Symbol vorbereiten und drucken

GO TO LOAD SECOND QP.CODE DIGIT zur Ladung der zweiten OP-Kode-Ziffer gehen

GO TO PRINT SUBROUTINE
zum Subroutinendruck gehen

SET BUSY LIGHT
Betriebskontröllampe setzen

END OF THE SUBROUTINE
Ende der Subroutine

SWITCH TO; R0M7 PRINT SUBROUTINES auf RQM7 schalten» Subr out inen, drucken

JUMP TQ SUBROUTINE: LABEL IN C-HES zur Subroutine springenι im C-Register

etikettieren

JUMP TO SUBROUTINE: LABEL IH PROGRAM zur Subroutine springen: im Programm

etikettieren

JUMP TO SUBROUTINE: GIVEN BY ADORESS zur Subroutine springen: durch Adresse

gegeben

0227

0230

0 101 000 100 LJMPl SS5

1 100 010 000 LJMPS ROM 6 0231 0163 O 111 010 001 LMTXB JSB

0232 0172 O 111 101 101

O 010 010 000

	158	0233
	159	0234
»09826,	160 161	0235 0236
~>« ο co	162	0237
ca »ο	163	0240
	164	0241
	165	0242
	1.66	0243
	167	0244
	168	0245

0234 0176 0 111 111 101 LEQL2 JSB

0 110 010 000 ROM 3

0 110 010 000 LGRND ROM 3

0 010 100 000 LTABP RMGRB

0 010 100 000 LFBCOl RMGRB

0,010 100 000 LFBCO2 RMGRB

0 010 100 000 LFBCO3 RMGRB

O 010 100 000 LFBCO4 RMGRB

0 010 100 000 LFBC05 RMGRB

0 010 100 000 LFBC06 RMGRB

LPRSl

LPRT 4

LPRTO

SET COMMON JUMP FLAG gemeinsames Sprungkennzeichen setzen

COMMON START FOR PROGRAM JUMPS gemeinsamer Start für Programmsprünge

PREPARE DATA AND BLANK FOR PRINT Daten und Leerstellen für Druck vorbereiten

PREPARE SYMBOL AND PRINT Symbol vorbereiten und drucken

ROUTINE EXIT
Routinenausgang

GO TO PRINT
zum Druck gehen

GRAND TOTAL ROUTINE BEGINNING Beginn der großen Gesamtroutine

TABLE FUNCTION IN PRGM.RUN MODE Tabellenfunktion in Programmablaufbat;

F.B. FUNCTION Ol BEGINNING Beginn der F.B.-Funktion 01

F.B. FUNCTION 02 BEGINNING Beginn der F.B.-Funktion 02

F.B. FUNCTION 03 BEGINNING Beginn der F.B.-Funktion· 03

F.B. FUNCTION 04 BEGINNING Beginn der F.B.-Funktion 04

F.B. FUNCTION 05 BEGINNING Beginn der F.B.-Funktion 05 F.B. FUNCTION 06 BEGINNING Beginn der F.B.-Funktion 06

rieb

CD CO CO -£> CO

	169	0246
	170	0247
	171	0250
	172	0251
	173	0252
	174	0253
σ	175	0254
co co	176	0255
!8/0862	177 178	0256 0257
	179	0260
	180	0261

0 010 100 000 LFBC07 RMiGRB

0 010 100 000 LFBC08 RMGRB

0 010 100 000 LFBCO9 RMGRB

0 010 100 000 LFBClO RMGRB

0 010 100 000 LFBCIl RMGRB

0 010 100 000 LFBC12 RMGRB

0 010 100 000 LFBC13 RMGRB

0 010 100 000 LFBC14 RMGRB

0 010 100 000 LFBC15 RMGRB

0 010 010 000 LCEN2
0 000 010 100 LRÜN1

ROM 1 YSO

0262 0301 1 100 000 111 BRN

0263 0 010 101 000 LSTOP CXM

0264

0265

0 Oil 000 010

P. ZTC

0 010 101 000 LSTPl CXM

LERRA

LRUN 2

ro

CaJ

cn co co

co

F.B. FUNCTION 07 BEGINNING Beginn der F.B.-Funktion 07 F.B. FUNCTION 08 BEGINNING Beginn der F.B.-Funktion 08 F.B. FUNCTION 09 BEGINNING Beginn der F.B.-Funktion 09 F.B. FUNCTION IO BEGINNING Beginn der F.B.-Funktion 10 ¹P,B. FUNCTION Il BEGINNING Beginn der F.B.-Funktion 11 F.B. FUNCTION 12 BEGINNING Beginn der F.B.-Funktion 12 F.B. FUNCTION 13 BEGINNING Beginn der F.B.-Funktion 13 F.B. FUNCTION 14 BEGINNING Beginn der F.B.-Funktion 14 F.B. FUNCTION 15 BEGINNING Beginn der F.B.-Funktion 15 E.B.SOFTWARE NOT READY

*'^"Software nicht fertig

IS ANY KEY DOWN ? irgend eine Taste unten?

NO: CONTINUE IN PROGRAM RUN MODE Neinj Im Programmablaufbetrieb fortfahren STOP ROUTINE BEGINNING, GET INT.FLG.VECTOR Routinenbeginn stoppen, internen Kennzeichenvektor holen

SET MANUAL CONTROL FLAG Handsteuerungskennzeichen setzen RESTORE DATA, STORE NEW INT.FLG.VECTOR Daten zurückstellen, neuen internen

Kennzeichenvektor speichern

0266 0107 0 100 Oil 111

BRN LSUPl 0267

0270

. 1 100 010 000 LOOXS ROM 6

1 100 010 000 LFXPS ROM 6 0271 0355 1 HO Hl 001 LC0NT2 JSB

0 010 010 000 ROM 1

1 OH 100 100 LTRBl RSH

	189	0272
	190	0273
	191	0274
4 09826	192 193	0275 0276
80/:	194	0277
KJ	195.	0300
	196	0301
	197	0302
	198	0303

1 110 010 000

ROM 7

0 001 100 110 LTFZl M,CMl

1 000 100 000

1 Oil 010 100

199. 0304 0307 1 100 OH 111

LKYUPl

BRN LINTE2

BRN LINTEl

195. 0300 0355 1 110 111 001 LSTEP JSB LKYUPl

Ό 111 000 000 LRUN2 PINC

READ

YSH

BRN LOKYl 0305

1 000 101 HO LFRRA W, BXC GO TO SUPERVISOR

zum überwachungsprogranun gehen

1/X ROUTINE
1/X Routine

EXP ROUTINE
EXP-Routine

TtEQR KEY RELEASE
Loslassen der Taste warten

RESET EXTERNAL FLAG

externes Kennzeichen zurücksetzen

GO TO PRINT MESSAGE

zur Drucknachricht gehen

CHECK VALUE OF MANTISSA
Mantissenwert prüfen

NONZERO: CONDITION NOT MET nicht Null: Bedingung traf nicht zu-

ZERO: CONDITION MET
Null": Bedingung traf zu

WAIT FOR KEY RELEASE

auf Loslassen der Taste warten

INCREMENT PRGM. COUNTER AND LOAD ADDR. Programmzähler erhöhen und Adresse laden ItEAD NEW INSTRUCTION
neue Instruktion lesen

EXTERNAL FLAG?
externes Kennzeichen?

NO. O.K.

Nein, in Ordnung

YES: TROUBLE; STORE DATA
Ja: Störung; Daten speichern

cn co co

201 0306 0273 1 Oil 101 111 BRN

202 0307 1 Oil 101 110 LOKYl ¹W, ZTA

LTRBl

203 0310

O 001 010 000

204 0311 0263 1 Oil 001 111 BRN

205 0312 ' O 001 111 110 LIFPl S,CMl

206 0313 0200 1 000 000 Oil

207 0314

1 001 000 100 LTNTEl SS9

208 0315 0200 1 000 000 Oil BRN

209 O3"l6 O 110 111 110 LTFMl S ,ZMC

210 0317 0200 1 000 000 Oil

211 0320 0314 1 100 110 Oil

212 0321

1 001 000 100 LSLEl SS9

213 0322 0201 1 000 000 111 LYLEl BRN

214 0323 0163 O 111 010 001 LDSPR JSB

215 0324

216 0325

O 100 100 000

LSTOP

LINTE2

LINTE2

LINTE2 LINTEl

LYLE 2

LPRSl

O 100 100 000 LLIST RMGRC PREPARE A-REG TO ACCEPT DIGIT A~Register für Ziffernannahme vorbereiten

ACCEPT NEW INSTRUCTION neu Instruktion akzeptieren

CHECK SIGN OF MANTISSA Mantissenvorzeichen prüfen

NEGATIVE: CONDITION NOT MET negativ: Bedingung traf nicht zu

POSITIVE: CONDITION MET positiv: Bedingung traf zu

CHECK SIGN OF MANTISSA Mantissenvorzeichen prüfen

POSITIVE: CONDITION NOT MET positive: Bedingung traf nicht zu

NEGATIVE: CONDITION MET negativ: Bedingung traf zu

SET LAST ENTRY FLAG ROUTINE BEGINNING letztes Eingangskennzeichen für Routinenbeginn setzen

INTERROGATE LAST ENTRY FLAG ROUT. BEGINNING

letztes Eingangskennzeichen für Routinenbeginn abfragen

DATASTORAGE DATA ADJ.ROUTINE Datenspeicherungs- und Justierungsroutine

RETURN TO DATA STORAGE SOFTWARE zur Datenspeicherungs~Software zurückkehren

LIST DATA, Daten auflisten

CD CO CO

O 100 100 000 LCLRR RMGRC

0 100 100 000 LDSIN RMGRC

0 100 100 000 LDSDE RMGRC

0 100 100 000 LSTOR RMGRC

0 100 100 000 LSTOA RMGRC

0 100 100 000 LSTOM RMGRC

0 100 100 000 LSTOT RMGRC

0 100 100 000 LSTOD RMGRC

0 100 100 000 LRECL RMGRC

0 100 100 000 LFXCH RMGRC

0 100 100 000 LDECT RMGRC

228. 0341 0305 1 100 010 111 BPN

0342 0 001 000 100 LRTRN SSl

0343 0230 1 001 100 Oil BRN

0344 0167 0 111 100 001 LSUB2 JSB

	217	0326
	218	0327
	219*	0330
	220	0331
	221	0332
	222	0333
.B*	223	0334
>09826>	224 225	0335 0336
:.9 8 O;	226	0337
	227	0340

0345 0157 0 110 111 111

LERRA

LJMPS LPRT7

LCOD 2

CLEAR DATA Daten löschen

D.S. INCREMENT
D.S. erhöhen

D.S. DECREMENT
D.S. erniedrigen

STORE DIRECT BEGINNING
direkten Beginn speichern

ACCUMULATE + BEGINNING
+-"Beginn akkumulieren

ACCUMULATE - BEGINNING
—Beginn akkumulieren

ACCUMULATE X BEGINNING
X-Beginn akkumulieren

ACCUMULATE / BEGINNING
/-Beginn akkumulieren

RECALL DIRECT BEGINNING direkten Beginn zurückrufen

EXCHANGE DIRECT
direkt austauschen

DECREMENT AND TEST IF ZERO erniedrigen und testen, wenn Null

RETURN ROUTINE BEGINNING Routinenbeginn zurück .

PREPARE SYMBOL - AND PRINT Symbol - vorbereiten und drucken

GO TO LOAD SECOND OP. CODE DIGIT zu Ladung der zweiten OP-Kodeziffer gehen

CD CO CO 4> CO

233 0346

234 0347

235 0350

236 0351

1 001 000 100 LSFTF

0 010 101 000 LIFFL

1 011 001 100

0 Oil Oil 000

237 0352 0265 1 Oil 010 111

238 0353 1 001 000 100 LGTLC

1 000 000 100 LGTLP

240 0355 0227 1 001 Oil 111 LGTAB

O QOO 010 100 LKYUPl

242 0357 0220 1 001 000 Oil

σ	239	0354
co
co
!Ό	240	0355
OT
	241	0356
σ
OO σ?

243 0360

O 000 100 100

244 0361 0356 1 110 111 Oil

245 _; 0362

246 0363

1 100 010 000 LTWWS O 010 O10 000 LPADV

247 0364 0163 O 111 .010 001 LFQLA

SS9

CXM

PTIl

LDC 3

BRN	LSTPl	6	LPRSl
SS9	zu	1
SS8
BRN	LJMPl
YSO
BRN	LPRTZ
RSO
BRN	LKYUPl
ROM
ROM
JSB

SFT PROGRAM FLAG ·# BEGINNING,SET AUX.FLG. Programrnkennzeichen auf beginnend mit ^f setzen, Hilfskennzeichen setzen'

IF PROGRAM FLAG* BEGINNING,GET INT,F.VECT, wenn Programmkennzeichen mit ■# beginnt, internen Kennzeichenvektor nehmen

PREPARE DIGIT INTERPRETATION CODE FLAG Kodekennzeichen für Zifferninterpretation vorbereiten

SET IT TO THREE
auf 3 setzen

GO.TO LABEL GIVEN BY C-REG
zum durchC-"Register gegebenen Etikett gehen

GO TO LABEL GIVEN BY PROGRAM

zum durch Programm gegebenen Etikett gehen

GO TO ADDRESS GIVEN BY PROGRAM zur vom Programm gegebenen Adresse gehen

IS THE KEY STILL DOWN?
Taste immer nach unten?

NO,GO TO SUBROUTINE END
nein, zum Ende der Subroutine

gehen

YES, RESET FLAG
ja, Kennzeichen

zurückstellen

STAY IN WAIT-LOOP

in Warteschleife bleiben

X/12 ROUTINE

PAPER ADVANCE BEGINNING POINT Anfangspunkt für Papiervorschub

PREPARE DATA AND "BLANK" FOR PRINT Daten und Leerstellen für Druck vorbereiten

cn co co

248 0365

0 000 111

PLS

OO NJ CD

CD CO CO

249 0366 1 Oil Oil

250 0367 1 111 Oil 000 LEQLG

251 0370 0176 0 111 111

252 0371 0 100 010

253 0372

0 Oil 010 000 LMAWC

254 0373 0162 0 111 001 Oil LEND 255 0374 256 0375 257 0376

1 100 010 000 LLOGS

1 100 010 000 LLNS

1 100 OlO 000 LIOPC

258 0377 0305 1 100 010 111 LMEMT

LDCIl	LPRTO
LDC15
JSB
ROM 2	LRES 8
TKRA
BRN
ROM 6
ROM 6	LERRA
ROM 6
BRN

PREPARE SXKBOL CODE LOAD Syitibolkode-Ladung vorbereiten

BLANK Leerstelle GO TO PRINT zum Drucken gehen SWITCH BACK TO R0M2

auf ROM 2 zurückschalten

ACCEPT'KEYCODE
Tastenkode akzeptieren

PROGRAM END ROUTINE BEGINNING Beginn der Routine für Programmende

LOG ROUTINE
log-Routine

LN Routine
ln-Routine

I/O CALL BEGINNING Beginn I/O-Ruf

MEMORY LOCATION NOT POUND Speicherplatz nicht gefunden

co cn co co

MAIN UNIT LISTING (ROM A-I) Haupteinheit (ROM A-I)

I, INE

AJ)DR

Zeilen laufende
Nr. Adresse

BRAN OPERATION CODE ADDR BIT PATTERN

Abzweig- Betriebs-Kode Adresse Bit-Muster

0000

O 110 010 100 LNXTl YS6

4	0001
5	0002
6	0003
7	0004
8	0005
9	0006
10	0007
11	0010
12	0011
13	0012
14	0013

0206

0137

0043

0217

1 000 Oil Oil O 101 010 100

BRN LNXT18 YSS

O 101 111 111 BRN LNXT2

O Oil 001 110 LNXT4 W,ZTC

O 000 110 100

O 010 001 111

CLS

BRN LSUPB

1 111 101 010 LNXTlO X,APIA

O 000 000 000

1 000 111 111

NOP

BRN LNXT9

O Oil 010 010 LRESA WP,ZTC,

O 111 110 000

CTT IS DEC, POINT FLAG ALREADY SET? ist Dezimalpunkt-Kennzeichen schon gesetzt?

nein

YES: IS IT DECPOINT KEY AGAIN ja: ist es wieder Dezimalpunkttaste

NO . nein

YES: TROUBLE: SET ZERO FOR NEW DATA ja; Störung: O. für neue Daten setzen

CLEAR ALL STATUS BITS alle Zustandsbits löschen

GO TO SUPERVISOR

zum Überwachungsprogramm gehen

INCREMENT EXPONENT BY ONE Exponent um Eins erhöhen

TO ELIMINATE POSSIBLE CARRY um möglichen übertrag zu eliminieren

CONTINUE IN INCREMENT LOOP in Erhöhungsschleife fortfahren

RESET REST OF THE C-REG Rest des C-Registers zurückstellen

STORE NEW INT.FLG VECTOR IN T-REG TEMP neuen internen Kennzeichenvektor zwischenzeitlich im T-Register speichern

1014 0254 1 010 110 101 0015 0020 Ο¹001 000 Oil

JSB

BRN

0016 0254 1 010 110 101 LPADl JSB 0017 0106 0 100 Oil Oil

	19	0020
	20	0021
σ CD OO	21	0022
OT
O 00	22	0023
ro	23	0024
	24	0025

0026 0021 0 001 000 111 0027

110 010 000

BRN

100 010 000 LRES8 ROM

001 110 000 LRES3

010 101 000

1 Oil 110 000

010 101 000

101 100 010

CXM

DTDS

CXM

P,CMlC

BRN

ROM

LPAPA

LRES 8

LPAPA

LDIGF

LRE S 3

CALL PAPER ADyANCE SUBROUTINE Papiervorschub-Subroutine rufen

GO TO RESET INTERNAL DATA STORAGE REGS. Zurücksetzung Interner Datenspeicherregister gehen

CALL PAPER ADVANCE SUBROUTINE Papiervorschub-Subroutine rufen

GO TO SUPERVISOR · zum Überwachungsprogramm gehen

TO COMMON ADRESS PART GENERATOR zum gemeinsamen Adressenteilgenerator

CALL INT. D,.S.R. internes D.S.R. rufen

STORE ADDRESS TEMPORARILY IN M-REG, ZERO IN C Adresse zwischenzeitlich in M-Register speichern, Null in C

CLEAR GIVEN DSR

aegebenes DSR löschen ι

RESTORE ADDRESS IN C-REG₇ZERO IN M-^EG Adresse im C-Register, Null im M-Regi3t, zurückstellen

DECREMENT CURRENT ADDR. AND CHECK IF CARRY

laufende Adresse erniedrigen und auf übertrag prüfen

NO, CONTINUE IN DSR RESET LOOP nein, in DSR-Rückstellschleife fortfahren

YES, FINISHED, SWITCH TO ROM ja, beendet, auf ROM 7 umschalten

0030 0336 1 101 111 Oil LFPRA BRN

LFPRl

0031 0244 1 010 010 Oil LRESD

0032 0 101 000 000 1,RESP

0033

0034

0035

1 000 000 000

1 001 001 000

0 101 101 000

BRN IS2

TTP PDEC

LRESS

	33	0036
	34	0037
'*-
CD
CO	35	0040
CO
t-o
cn V	36	0041
σ
co
CD	37	0042
KJ
	38	0043

1 001 000 000 ISI

0 000 110 100 LRSHR CLS

0 Oil 000 100

LSUPB

0 000 110 100 LSUPA CLS

0 111 000 100 LSUPH SS7

0044 0106 0 100 Oil Oil BRN

0045 1 001 100 100 LFIN2 RS9

LDIGF

0046

0047

1 000 100 100

0 110 100 100

CONTINUE fortfahren

PREPARE P.r^REG RESET
P-\Register-Rücksteilung vorbereiten

ZEROS INTO P-REG
Nullen in P-Reglster

ONE'S INTO P-REG AND I/O-REG (LEFT PART) Einsen ins P-Register und ins I/O-Register (linker Teil)

ONE'S INTO I/O-REG DATA PART Einsen in den Datenteil des I/O-Registers

END Ende

CLEAR ALL STATUS BITS
alle Zustandsbits löschen

SET OP-FLAG
OP-Kennzeichen setzen

GO TO SET FIRST ENTRY DIGIT FLAG zum Setzen der ersten Eingangsziffern Kennmarke gehen

CLEAR ALL STATUS BITS
alle Zustandsbits löschen

SET FIRST ENTRY DIGIT FLAG erstes Eingangsζiffern-Kennzeichen setzen

RESET FLAG IF SET

Kennzeichen zurückstellen falls gesetzt

RESET FLAG IF SET

Kennzeichen zurückstellen falls gesetzt

RESET FLAG IF SET

Kennzeichen zurückstellen falls gesetzt

CD
OO
PO

RS RS4 RSl

46 0053 0043 0 010 001 111 BRN LSUPB

47 0054 0 101 100 010 LDGT2 P,CMlC

43 0050

44 0051

45 0052

0 101 100 100 0 100 100 1OO 0 001 100 100

48 0055 0251 1 010 100 111

49 0056

50 0057

0 000 011 000

0 000 001 100

51 0060 0157 O 111 000 001

52 0061 O 101 010 100

53 0062 0313 1 100 101 111

54 0063

1 001 011 000

BRN LDGT3 LDCO

PTO

JSB LSHFT YS

BRN LRND5 LDC9

55 0064 0322 1 101 001 Oil BRN LRND6

56 0065 O 111 111 010 LCOUl XS,CPlC

57 0066

58 0067

59 0070

O 111 110 000 ·

, CTT

O 000 110 000 RETURN O 010 101 000 LRNDA CXM

60 0071 0202 1 000 001 Oil

BRN LRND3 RESET FLAG IF SET
RESET FLAG IF SET
RESET FLAG IF SET
GO TO SUPERVISOR

IS IT "ONE"
Ist es "Eins"?

Kennzeichen zurückstellen ^fallS

Zum überwachungsprogramm gehen

NO: CONTINUE IN THE TEST
Im Test fortfahren

YES: RESET DIGIT INTERPRET CODE TO ZERO Ja: Zifferninterpretationskode auf O zurückstellen

PREPARE DIGIT ALIGNMENT SHIFT. COUNTER Schiebezähler für Ziffernausrichtung vorbereiten

WAS DEC. POINT KEY DOWN?
War Dezimalpunkttaste unten?

NO, IT WAS DIGIT KEY
Nein, es war Zifferntaste

YES, SET SCT. NOT. FORMAT DPL. FLAG Ja, Format-Anzeigekennzeichen für "wissen schaftliche No'tierung" setzen

INCREMENT COUNTER
Zähler erhöhen

RESTORE COUNT TO T REG

Zählung zum T-Register zurückstellen

FETCH INT.FLG. VECTOR FOR UPDATE Internen Kennzeichenvektor abrufen, um ihn auf den neuesten Stand zu bringen

CONTINUE IN ROUND() ROUTINE

in Routine fpr runde Klammern fortfahren

CO CD CO CO

CO

61 0072

62 . 0073

1 Oil 001 100 LDGTA PTlI

0 101 100

63 0074 0054 0 010 110 Oil 64 0075

65 0076 66 0077

0 010 001

0 Oil 100

67 0100 0107 0 100 Oil

68 0101 0235 1 001 110 111 LPRX3

69 0102 1 001 101 010 LFSTl

70 0103 0117 0 100 111

71 0104 0042 0 010 001 Oil

72 0105

73 0106

74 0107

0 000 010 000 LDIGF 0 111 010 100 LFSR8

75 0110 6000 0 000 000 Oil 76 Olli

O Oil 001

P,CMlC

BRN LDGT2

W ,BTC

RS

O 010 100 100 LFSTT RS2

BRN LFST8 BRN LPRX8 X, AMI
BRN LFST2

BRN LSUPA

O 111 000 110 LDIGZ M,APCC

ROM YS7

BRN LNXTl W, ZTC

PREPARE DIGIT INTERPRETATION CODE FOR TEST
Zifferninterpretationskode für Test vorbereiten

IS IT ZERO?
Ist es Null?

NO, CONTINUE IN THE TEST
Nein, im Test fortfahren

YES:IT IS DATA ENTRY; RESTORE DATA IN C-REG
Ja: Ist Dateneingang; Daten im C-Register
zurückstellen

RESET OP. FLAG
OP-Kennzeichen zurückstellen

RESET LEFT PAR. FLAG

Kennzeichen für linke Klammer zurückstellen

WAS ZERO ENTERED? Wurde Null eingegeben?

NO; IT IS NONZERO DIGIT

Nein; Ziffer von Null verschieden

YES; USE "ZERO" FOR NEW DATA

Ja; "Null" für neue Daten benutzen

BUILD "NEW" DATA IN C REG

"neue" Daten im C-Reglster aufbauen

GO TO LSUPl nach LSUPL gehen

IS THIS'FIRST ENTRY .DIGIT?

Ist dies die erste Eingangsziffer?

NO; GO TO "NEXT DIGIT" ROUTINE

Nein; zur "nächste Ziffer"-Routine gehen

YES: SET "ZERO¹¹FOR "OLD" DATA

Ja; "Null" für "alter" Daten setzen

CO

er; co

CO

CO

77 0112

0 111 110 000

CTT

78 0113 0174 0 111 110 Oil BRN LFST9

79 0114 0 000 110 100 LFST7 CLS

80 0115

0 110 000 100

81 0116 0106 0 100 Oil Oil

0 111 100 100 LFST2

0. 001 001 100

	82'	0117
409826,	83 84	0120 0121
O OO	85	0122
CD ro	86	0123

SS6

BRN LDIGF RS7

PTl

0 111 000 001 JSB LSHFT

0 110 100 000 LFST31 YADP

1 Oil 010 100

87 0124 0131 O 101 100 111 88 0125

89 0126

90 0127

1 Oil 100 100

1 010 101 000

YSIl

BRN LFST5

RSIl

MTC

O 101 100 010 LFST4 P,CMlC

91 0130 0177 O 111 111 111

BRN LFST6 STORE ZERO AS DISPLAY COUNT

Null als Anzeigezählnng speichern

YES; CLEAR ALL STATUS BITS; ZERO=NEW DATA' Ja; alle Zustandsbits löschen; O = neue

Daten

SET DEC. POINT FLAG
Dezimalpunkt-Kennzeichen setzen

GO TO RETURN TO SUPERVISOR Zurück zum überwachungsprogramm "gehen"

RESET FIRST ENTRY DIGIT FLAG Kennzeichen für erste Eingangsziffer zurückstellen

PREPARE.LEFT ALIGNMENT SHIFT COUNTER Schiebezähler für linke Ausrichtung vorbereiten

IS AUTO D.P.FLAG SET?

Kennzeichen für "Auto D.P." besetzt?

IST IT?
Ist es?

NO; IT IS NORMAL ENTRY
Nein; ist normaler Eingang

YES; RESET EXTERNAL FLAG

Ja; externes Kennzeichen zurückstellen

PREPARE DPL-FLAG FOR CHECK

DPL-Kennzeichen für Überprüfung vorbereiten ^

TEST DECREMENT ' CO

Erniedrigung testen · C^

NON ZERO (NO CARRY); GO TO EXP. DECREMENT CO Nicht Null (kein übertrag); zur Exponenten- j>. erniedrigung gehen co

92 0131

93 0132

94 0133

95 0134

96 0135

1 010 101 000 LFST5 MTC

1 010 001 100

1 001 Oil 000

0 010 101 000

1 110 101 110

97 0136 0106 0 100 Oil Oil

PTlO LDC

CXM

W ,AXC

BRN LDIGF

98 0137

0 110 100 110 LNXT2 M,ZMC

99 0140 0147 0 110 Oil 111 BRN LNXT3

100 0141 1 000 101 110 LNXT13 W,BXC

101 0142

102 0143

1 010 101 000

1 010 001 100

103 0144 0 001, 100 010

104 0145 0165 0 111 010 111

MTC

PTlO

P,CMl ,

BRN LNXT6

105 0146 0007 1 100 Oil 111 BRN LNXT80

106 0147 0 101 101 010 LNXT3 X,CMlC

CARRY, DECREMENTING IS FINISHED
Übertrag, Erniedrigung beendet

GENERATE NUMBER OF ADJUSTMENT SHIFTS

Zahl der Justierungsverschiebungen erzeugen

NEEDED FOR NEXT ENTRY DIGIT

Die für die nächste Eingangsziffer benötigt

STORE NEW INT. FLAG VECTOR

Neuen internen Kennzeichenvektor speichern

SEND NEW DATA TO C-REGISTER

Neue Daten ins C-Register schicken

GO TO RETURN TO SUPERVISOR

Nach "zurück zum Überwachungsprogramm"

gehen

CHECK IF MANTISSA IS ZERO
Prüfen,ob Mantisse O ist

YES Ja

NO, STORE DATA TEMPORARILY IN B-REG

Nein, Daten zwischenzeitlich im B-Register

speichern

PREPARE INT. FLAG VECTOR FOR TEST
Internen Kennzeichenvektor für Test
vorbereiten

NUMBER OF NEEDED ALIGNMENT SHIFTS

Zahl der benötigten Ausrxchtungsverschxebungei

IS IT ZERO? Ist sie Null?

NO START WITH ALIGNMENT

Nein, mit Ausrichtung beginnen

DECREMENT EXPONENT BY ONE
Exponent um eins erniedrigen

-F-CO

107 0150

108 0151

0 001 001 100

0 110 110 010

109 0152 0004 0 000 010 Oil

110 0153 0157 0 111 000 001

111 0154 0 110 Oil 110

PTl

WP, ZMC

BRN LNXT4

JSB LSHFT S, CTA

112 0155

0 110 001 010

113 0156 0310 1 100 100 101

114 0157 0131 0 101 100 111

ο co	XX<*	UXD /
co ro	115	,0160
O	116	0161
co CD	117	0162

X ,CTA

JSB BRN

LCOU
LFST5

0 100 001 110 LSHFT W,SLA

0 000 111 100

1 101 101 100

118 0163 0160 .0 111 000 Oil 119 0164

120 0165

121 0166

122 0167

0 000 110 000

PLS YP13

BRN RETURN

LSHFT

0 100 001 010 LNXT6 X,SLA

0 100 001 110 LNXT7 W,SLA

0 101 100 010

123 0170 0166 0 111 Oil Oil

P,CMlC

BRN LNXT7

PREPARE UNDERFLOW CHECK
Unterlaufprüfung vorbereiten

CHECK IF UNDERFLOW
Prüfen auf Unterlauf

UNDERFLOW: GO TO "TROUBLE" EXIT Unterlauf: zum "Störungs"-Ausgang gehen

COPY SIGN TO A-REG

Vorzeichen ins Α-Register kopieren

COPY EXPONENT TO A-REG

Exponent ins Α-Register kopieren

GO TO "FIRST DIGIT" OUTPUT

zum Ausgang "erste Ziffer" gehen

ALIGNMENT SHIFT
Ausrichtung schieben

ARE SH-IFTS COMPLETED
Verschiebungen vollständig?

NO, CONTINUE
Nein, fortfahren

YES, FINISHED
Ja, beendet

PREALIGNMENT SHIFT
Vorausrichtung schieben

ALIGNMENT SHIFT
Ausrichtung schieben

ALIGNMENT FINISHED?
Ausrichtung beendet

NOT YET
Noch nicht

er; cc

124 0171

125 0172

ro cn •—: O OO CD

1 010 101

0 101 100

MTC

P,CMlC

126 0173 0305 1 100 010 111 BRN LNXT8

127 0174 0 101 010 100 LFST9 YS5

128 0175 0102 0 100 001 Oil

BRN LFSTl

129 0176 0114 0 100 110 Oil BRN LFST7

130 0177 1 101 101 010 LFST6 X,AMlA

131 0200

0 000 000

132 0201 0127 0 101 Oil

NOP

BRN LFST4

133 0202

134 0203 135 0204

1 Oil 001 111 LRND3 PTIl

0 001 Oil

LDCl

0 010 101 000 LC0NT3 CXM

136 0205 0106 0 100 Oil Oil

BRN LDIGF

137 0226,

O 110 100 000 LNXTl8 YADP YES, FETCH INT. FLG. VECTOR FOR UPDATE Ja, internen Kennzeichenvektor abrufen, uiti ihn auf den neuesten Stand zu bringen

DECREMENT NUMBER OF ALIGNMENT SHIFTS Zahl der Ausrichtungsverschiebungen erniedrigen

IS THIS DECIMAL POINT KEY ROUTINE Ist dies die Dezimalpunkt-Routine?

NO, IT IS DIGIT ENTRY
Nein/ ist Zifferneingang

Ja

DECREMENT DATA EXPONENT BY ONE Datenexponent um 1 erniedrigen

TO ELIMINATE POSSIBLE CARRY um möglichen Übertrag zu eliminieren

CONTINUE IN DECREMENT LOOP in Erniedrigungsschleife fortfahren

PREPARE DIGIT INTERPRETATION CODE FLAG Zifferninterpretations-Kode-Kennzeichen vorbereiten

SET IT TO ONE
auf Eins setzen

STORE UPDATED INT. FLG. VECTOR, RESTORE

auf den neuesten Stand gebrachten internen Kennzeichenvektor speichern, Daten zurückstellen

GO TO SUPERVISOR

zum Überwachungsprogramm gehen

IS AUTO D.P. FLG. SET?

ist Kennzeichen "Auto D.P." gesetzt?

138 0207 1 Oil 010 100

139 0210 0302 1 100 001 Oil

140 0211 1 Oil 100 100

141 0212

0 101 010 100

142 0213 0223 1 001 001 111

1 110 101 110

1 010 101 000

1 101 001 100

0 101 100 010 LNXT9

147 0220 0007 0 000 Oil 111

	143	0214
IN.*.	144	0215
:860*	145	0216
980/9<	146	0217

148 0221

1 110 101 110

149 0222 0114 0 100 110 Oil 150 0223

151 0224

152 0225

0 111 101 010 LNXTIl

0 101 111 010

0 110 111 010

YSIl

BRN LNXT14

RSIl

YS 5

BRN LNXTIl

W, AXC

MTC

PTl 3 P,CMlC

BRN LNXTlO W, AXC

BRN LFST7 X,CPlC XS,CMlC XS,ZMC .

IS IT? 1st es?
NO Nein

YES; RESET EXTERNAL FLAG

Ja; externes Kennzeichen zurückstellen

IS THIS DEC. POINT KEY ROUTINE?

1st dies die Dezimalpunkt-Tasten-Routine?

NO; IT IS A DIGIT

Nein; es ist eine Ziffer

YES, STORE CURRENT DATA IN A-REG

Ja, laufende Daten in Α-Register speichern

PREPARE INT. FLG. VECTOR FOR TEST
internen Kennzeichenvektor für Test vorbereiten

PREPARE DPL FLG FOR TEST

DPL-Kennzeichen für Test vorbereiten

DECREMENT AND TEST IF CARRY OCCURRED
erniedrigen und testen, wenn Übertrag aufgetreten ist

NO CARRY, CONTINUE IN EXP. INCREMENT
kein übertrag, mit Exponentenerhöhung
fortfahren

CARRY; FINISHED; RESTORE DATA IN C-REG
Übertrag; beendet; Daten im C-Register
zurückstellen ΓΌ

co CD CO CO

GO TO D.P. FLAG OUTPUT

zum D.P.-Kennzeichen-Ausgang gehen

INCREMENT CURRENT EXPONENT BY ONE
laufenden Exponenten um 1 erhöhen

DECREMENT CODE FOR SIGN OF EXP.,

Kode für Vorzeichen des Exponenten erniedrig®

IS IT ZERO NOW? Ist er jetzt O?

153 0226 0004 0 000 010 Oil

"■ν
O
CO
CD
K)

154 0227

155 0230

0 111 111 010

0 000 000 000

156 0231 0141 0 110 000 111

157 0232

158 0233

159 0234

160 0235

161 0236

0 110 100 100

162 0237 0241 1 010 000 111

164 0241

165 0242 0043 0 010 001 "ill

BRN

XS,CPIC

LNXT 4

NOP

BRN

LNXT13

0 010 Oil 000 LFQLR LDC2

0 000 010 000 LEQLZ ROM

O 000 110 100 CLS

O 010 001 110 LPRXB W,BTC

RS 6

BRN

163 0240 0235 1 001 110 111 LEQLF BRN

LPRXL

LPRXB

O 010 010 100 LPRXL YS2

BRN

LSUPB

OVERFLOW.; GO TO "TROUBLE" EXIT überlauf; zum "Störunge"-Ausgang gehen

NO, RETSTORE ORIG VALUE

Nein, ursprünglichen Wert zurückstellen

TO ELIMINATE POSSIBLE CARRY Um möglichen Übertrag zu eliminieren

NO OVERFLOW DETECTED

kein überlauf festgestellt

CLEAR STATUS BITS
Zustandsbits löschen

RESTORE ORIGINAL DATA IN C-REGISTER ursprüngliche Daten im C-Register zurückstellen

RESET D.P. FLAG ,

D.P.-Kennzeichen zurückstellen

GO TO TEST
zum Test gehen

GO TO COMMON PATH WITH PRINT X ROUTINE mit X-Druck-Routine zum gemeinsamen Pfad gehen

IS L.PAR FLAG SET?

Ist Kennzeichen für linke Klammer gesetzt?

GO TO SET FIRST ENTRY DIGIT FLAG AND SUPERVISOR

zum Setzen des Kennzeichens für die erste Eingangsziffer und zum Überwachungsprogramm gehen

CO CO CO

0243

0244 *

0245

' 0246

110 010 000

ROM

0 Oil 001 110 LRESS W_fZTC

111 110 000

100 010 100 0247 0032 0 001 101 Oil

0250 0037 0 001 111 111

CTT

YS

BRN LRESP

O co co K> cn	172	0251	0265	0	101	100	010
	173	0252	-	1	Oil	010	111
O fW	174	0253	0	OQO	Oil	000

BRN

LRSHR

LDGT3

P ,CMlC

BRN LDGT4

LDCO

0254 0365 1 111 QlO 111

BRN

LDGT30

0255

O 101 110 QOO LPAPA PRE

177	0256	0255	1	Oil	010	100	YSIl	LPAPA
178	0257	0277	1	010	110	111	BRN	LPAD2
179	0260		1	Oil	111	111	BRN	■
180	0261	O	Oil	010	1OQ LCENA	YS3

RETURN TO LEFT PARENTHESIS ROUTINE zur Routine für die linke Klammer, zurückkehren

CLEAR C-REG

C-'Register löschen

CLEAR TKREG
T-Register löschen

IS THIS RESET ROUTINE?

Ist dies die Rückstellroutine?

NO, GO TO PRGM. COUNTER RESET Nein, zur Programmzähler-Rückstellung gehen

YES, SKIP PRGM. COUNTER RESET Ja, Programmzähler-Rückstellung überspringen

IS IT TWO? Ist es 2?

NO,· CONTINUE nein; fortfahren

YES;,IT IS I/O CALL; RESET D.I. CODE TO ZERO

Ja; es ist I/O-Ruf; D.I.-Kode auf O zurückstellen

GO TO I/O CHANNEL SELECT AND CALL ROUTINE zur Auswahl des I/0-Kanals gehen und Routine rufen

PRINTER MECH.ENABLE

Drucker mechanisch freigeben

• FLAG? Kennzeichen?
•NO, WAIT nein, warten
YES; CONTINUE ja; fortfahren

INTERROGATE OP.FLAG

QP."Kennzeichen abfragen

ω cn co

CO OJ

181 0262 0004 0 000 010 Oil

182 0263 0043 0 010 OQl 111

BRU Ι^ΝΧΤ 4

BRN 1,SUPB

183 0264 1 000 010 000 LFLGl ROM 4 .

184 0265 0 101 100 010 LDGT4 P,CMlC

185 0266 0361 1 111 000 111 BRN LDGT5

186 0267 0264 1 oil ΟΙΟ Oil BRN LFLGl

187 0270

O 001 000 100 LPRINA SSl

188 0271 1 111 Oil 000 . LDC15

189 0272 0336 1 101 111 Oil BRN LFPRl

190 0273 O 010 101 000 LCONTA CXM

191 0274

O 001 Oil 000

LDCl

192 0275 0376 1 111 111 Oil BRN LCONT39

193 0276 0045 O 010 010 111 LFINA BRN LRIN2

1 Oil 100 100 LPAD2 RSIl

194	0277
195	. 0300
196	0301
197	0302

O Oil 110 000

ADV

O 000 110 000 RETURN O 101 010 100 LNXT14 YS5

NOT SET, GO TO CLEAR C-REG

nicht gesetzt, zum Löschen des C-Reglsters

gehen

SET, DO NOTHING
gesetzt, nichts tun

IS IT THREE? Ist es drei?
NOjCONTINUE Nein, fortfahren

YES, GO TO ACCEPT PRGM.FLAG NUMBER
Ja, zum Akzeptieren der Programm-Kennzeichenzahl gehen

SET SHIFT KEY ROUTINES AUX.FLG

Hilfskennzeichen für Tastenumschalt-

routinen setzen

PREPARE INT.FLG.VECTOR FOR UPDATE
Internen Kennzeichenvektor vorbereiten,
um ihn auf den neuesten Stand zu bringen

SET PRGM. RUN MODE FLAG

Kennzeichen für Programmablaufbetrieb

setzen

GO TO RESET FLAGS

zum Rückstellen der Kennzeichen gehen

RESET EXT FLAG

externes Kennzeichen zurückstellen

PAPER ADVANCE
P ap iervors chub

SUBROUTINE END

PO OJ

cn co co

Ende der Subroutine

IS THIS DEC. POINT,KEY ROUTINE?

1st dies die Dezimalpunkttastenroutine?

198 0303 0223 1 001 001 111 199 0304 0114 0 100 110 Oil

oo
N>
σ>

BRN

BRN

LNXTIl

LFST7

200 0305

0 010 101 000 LNXT8 CXM

201 0306 0310 1 100 100 101 JSB LCOU

202 0307 · 0 010 001 110 LNXT80 W,BTC

203 0310 0105 0 100 010 111

204 0311 0 111 111 000 LCOU

205 0312 0065 0 011 010 111

206 0313 0 011 011 000 LRND5

207 0314

208 0315

0 000 111 100

1 111 000 010

209 0316 0321 1 101 000 111 210 0317

0 110 011 000

214 0323

0 010 101 000

BRN TTC

BRN LDC

PLS

P,APCA BRN LDC

LDIGZ

LCOUl

LDPT3

211 0320 0322 1 101 001 011

212 0321 0 101 000 010 LDPT3

213 . 0322 0 101 100 100 LRND6

BRN LRND6 P,AMCC
RS 5

CXM NO, ACCEPT DIGIT

Nein, Ziffer akzeptieren

YES, GO TO D.P. FLAG OUTPUT Ja, zum D.P.-Kennzeichenausgang gehen

STORE NEW INTERNAL FLAG VECTOR neuen internen Kennzeichenvektor speichern

RESTORE OLD DATA IN C-REG alte Daten im C-Register zurückstellen

GET DISPLAY COUNT
Anzeigezählung nehmen

LOAD THREE FOR TEST
drei für Test laden

RESTORE POINTER
Hinweismarke zurückstellen

IS DIGIT GREATER THAN SIX Ist die Ziffer größer als 6?

NO, RESTORE IT
Nein, zurückstellen

YES, SET DIGIT TO SIX
Ja, Ziffer auf 6 setzen

RESET D.P. KEY FLAG IF SET Dezimalpunkttasten-Kennzeichen zurückstellen, falls gesetzt

STORE NEW INT.FLG. VECTOR IN M-REG neune internen Kennzeichenvektor in M-Register speichern "

OJ CD oo

co j>

CO

0324 0 010 001 110

0325 0106 0 100 Oil Oil

	217	0326
	218	0327
	219	0330
	220	0331
tow	221	0332
:860t	222	0333
rvj σ>	223	0334
O
OO NJ	224 ,	0335
	225	0336
	226	. 0337

1 Oil 010 110

1 Oil 010 110

0 100 010 110 LCLAl

1 101 101 010

1 110 101 110

1 100 010 000

0 101 110 000

W, BTC

BRN LDIGF

0 100 101 110 LCLAA W ,ATB

MS,SRA

MS,SRA

MS,SLA

X,AMlA

BRN

W, AXC

ROM

O 000 001 100 LFPRl PTO

PRE 0340 1 Oil 010 100 LFPR2 YSIl

0341 0340 1 110 000 Oil BRN LFPR2

0342 1 Oil 100 100 RSIl 0343

0344

1 111 110 000

1 101 110 000

CCS

TCS Daten im C-Register zurückstellen

RESTORE DATA IN C-REG

GO TO LSUPl
Nach LSUPl gehen

COPY LABEL BACK INTO B-REG Etikett zurück ins B-Register kopieren

PREALIGNMENT
Vorausrichtung

PREALIGNMENT
Vorausrichtung

ALIGNMENT SHIFT
Ausrichtung verschieben

DECREMENT EXPONENT
Exponent erniedrigen

NO CARRY; ALIGNMENT CONTINUE kein übertrag; fortfahren mit Ausrichten

GET ADJUSTED LABEL INTO C-REG justiertes Kennzeichen in C-Register nehmen

CARRY; ALIGNMENT FINISHED
übertrag, Ausrichtung beendet

PREPARE SECTOR COUNTER
Sektorzähler vorbereiten

PRINTER ENABLE
Drucker freigeben

FLAG? Kennzeichen?
NO, WAIT Nein, warten

YES; RESET EXTERNAL FLAG

Ja; externes Kennzeichen zurücksetzen

RIGHT PART OF THE PRINTER MASK rechter Teil der Druckermaske

LEFT PART OF THE PRINTER MASK linker Teil der Druckermaske

cn co oo

0345

0346

0 000 111 100

1 101 101 100

	237	0352
	238	0353
O co	239	0354

0347 0340 1 110 000 Oil 0350 1 Oil 010 100 LFPR3 0351 0350 1 110 100 Oil

1 011 10ο 100

0 Oil 110 000

0 001 010 100

.240 " 0355 0366 1 111 Oil Oil 0356 0 001 100 100

0 010 001 110

1 100 010 000

1 100 010 000 LDGT5

)367 1 111 Oil 111 LEQLD

0 000 000 000

0016 0 000 111 Oil LPADA

242	0357
243	0360
244	0361
245	0362
246	0363
247	0364
248	0365
249	0366
250	0366

0 100 010 000

1 110 010 000 1 010 000 100

LDGT30

LFPR4

LEQLK

PLS
YP13

BRN LPPR2

YSIl

BRN LFPR3

RSIl

ADV

YSl

BRN LFPR4 RSl

W, BTC ROM 6

ROM 6 BRN LEQLK DUMMY BRN LPADl

ROM 2 ROM 7 SSlO

INCREMENT SECTOR COUNTER
Sektorzähler erhöhen

LAST SECTOR?
Letzter Sektor

NO nein

YES, FLAG? Ja, Kennzeichen?

NO, WAIT
nein, warten

YES, RESET EXTERNAL FLAG

Ja, externes Kennzeichen zurücksetzen

PAPER ADVANCE
Papiervorschub

IS SHIFT KEY ROUT.AUX»FLG.SET?
Hilfskennzeichen für TastenumschaItroutine
gesetzt

RESET SHIFT KEY ROUTINES AUX.FLG.
Hilfskennzeichen für Tastenumschaltroutine
zurücksetzen

SWITCH TO ROM 6
ROM 6 schalten

GO TO PAPER ADVANCE ROUTINE
zur Papiervorschubroutine gehen

CD U) OO •ΓΟΟ

GO TO I/O CHANNEL SELECT AND CALL ROUTINE
zur Routine für I/O-Kanalwahl und -ruf gehen

SET SECOND PRINT FLAG

zweites Druckkennzeichen setzen

251 0370

1 000 010 100

252 0371 0232 1 001 101 Oil

253 0372 0 000 111 100

254 0373

0 Oil Oil 000

255 0374 1 111 Oil 000

256 0375 0233 1 001 101 111

YS8

BRN LEQLR PLS

LDC

LDC15

BRN LEQLZ

257 0376

0 000 101 000 LCONT39 DSTO IS RIGHT PARENTHESIS FLAG SET? " Ist Kennzeichen für rechte Klammer gesetzt?

YES, PREPARE SYMBOL LOAD
Ja, Symbolladung vorbereiten

SYMBOL FOR RIGHT PAR.)
Symbol für rechte Klammer

BLANK Leerstelle

GO TO COMMON PART

zum gemeinsamen Teil gehen

SWITCH THE DISPLAY ON
Anzeige einschalten

258 0377 0204 1 000 010 011

BRN LCONT3

LINE

CURR
ADDR

BRAN ADDR

MAIN UNIT LISTING (ROM A-2) Haupteinheit (ROM A-2)

OPERATION CODE BIT PATTERN

Zeilen laufende Abzweig- Betriebs-Kode Nr. Adresse Adresse Bit-Muster

0000

0001

0002

O 000 010

ROM

1 100 001 100 LIDSl PT12

O 011 001 110 LIDS2 W,ZTC GO TO ROM O AFTER ROM GROUP SWITCH zum.ROM O hinter ROM-Gruppenschalter gehen

PREPARE SPEC ADDR. CODE LOAD Laden des speziellen Adressenkodes vorbereiten

ZERO TO C~REG
O ins C-Register

co cn

co

CO CO

	6	0003
	7 ·	0004
	8	0005
	9	0006
	10	0007
409826,	11 12	0010 0011
ο ÖO <S> K-v	13 14	0012 0013

0015

0016

0017

0020

0 111 101 110

1 111 Oil 000

O 000 110 000

1 001 001 100

O 101 100 QlO

1 010 000 111

0014 0020 0 001 000 Oil

O 010 001 110

O 000 010 000

LDC15

RETURN

1 010 101 000 LRIP3 MTC

PT9

P,CMlC

BRN

1 110 010 000 LRIP4 ROM

O 000 111 100 LRES69 PLS

BRN

1 000 000 100 LRIP5 SS8

W_fBTC

ROM

O 010 010 000 LRES6 ROM

LRIPA

LRES6

SET EXPONENT TO "ONE"
Exponent auf 1 setzen

LOAD SPEC, ADDR. FOR INT. D.S.
Spezielle Adresse für internes D.S.
laden

END OF SUBROUTINE
Ende der Subroutine

GET INT.FLAG VECTOR FOR TEST
internen Kennzeichenvektor für Test
nehmen

PREPARE LEVEL INDICATOR FOR TEST
Niveau-Indikator für Test vorbereiten

CHECK IF LEVEL INDICATOR IS ZERO
prüfen ob Niveau-Indikator 0 ist

IT IS NOT ZERO, CONTINUE
nicht O, fortfahren

SWITCH TO R0M7
auf R0M7 schalten

RESTORE PROPER POINTER VALUE

richtigen Hinweismarkenwert zurückstelle?

PREPARE RETURN TO RESET ROUTINE
Rückkehr zur Rückstellroutine vorbereiten

SET RIGHT PARENTHESIS FLAG
Kennzeichen für rechte Klammer setzen

CD GO GO

RESTORE DATA IN C-REG

Daten im C-Re'gister zurückstellen

GO TO COMMON PATH WITH "EQUAL" ROUTINE -C-zum gemeinsamen Pfad mit "EQUAL"-Routine GO gehen

GO TO RESET ROUTINE

zur Rückstellroutine gehen

20 0021 0047 0 010 100 001 LRESE JSB

21 0022 0354 1 110 110 Oil BRN

22 0023 0 110 100 OOO' LDSP50 YADP

23 0024 1 Oil 010 100 YSIl

24 0025 0027 O 001 Oil 111 BRN

O 010 001 100 _ PT2

0 010 101 100 LDSP5 YP2

1 100 110 111 BRN O 101 Oil Oil BRN

0 000 Oil Oil BRN

1 100 100 000 LMAN6 YFKB

	25	0026	0315
4 0.98	26	0027	0126
co	27	0030	0006
O	28	0031
co σ>	29	0032
	30	0033

31 0034 1 Oil 010 ,100

32 0035 0167 O 111 Oil 111

33 0036 ' 1 100 010 000

YSIl BRN ROM

34 0037

1 Oil 010 100 LCL03 YSIl

35 0040 0267 1 Oil Oil 111 BRN

36 0041 O 010 010 000 LMTX3 ROM

LIDSlO

LRE S 9

LDSP5

LDSP51 LDSP6 ■

LRIP3

LMAN7

LCLOA

GO TO ADDRESS GENERATING SUBROUTINE zur Ädressenerzeugungs-Subroutine geixen

IS AUTO DEC. PT. SET?

Ist automatischer, Dezimalpunkt gesetzt?

NO,GO TO NORMAL PATH

nein, zum normalen Pfad gehen

YES, SET POINTER FOR ALL OF MANTISSA Ja, Hinweismarke für gesamte Mantisse setzen

IS ALL OF MANTISSA TO BE DISPLAYED Soll gesamte Mantisse angezeigt werden?

tFS, POINTER IS SET
Hinweismarke ist gesetzt

INTERROGATE F.BL. KBD. AND SET BUSY LIG2T F.BL.KBD. abfragen und Betriebsanzeige setzen

IS IT? Ist es?
NO nein

GO TO CALL F.BLK. SOFTWARE zum Rufen der F.BLK.-Software gehen

CHECK IF SINGLE OPERAND OP.FLAG IS SET Prüfen, ob OP-Kennzeichen für einzelnen Operanden gesetzt ist

GO TO LSUPA nach LSUPA gehen

CO CO CO

	37	0042	0356
	38	0043
	39	0044	0001
	40	0045
	41	0046
	42	0047
O co	43	0050	0053
00 ro	44'	0051
5/0862	45 46	0052 0053	0263
	47	.0054
	48	0055	0000
	49	0056
	50	0057
	51	0060
	52	0061
	53	0062

0 010 010 000 LCI₁O

1 010 100 100 LMAN9 RSlO

1 100 010 000

ROM

0 Oil Oil 000 LBAKl LDC3

1 111 Oil 000

LDC15

1 110 111 Oil BRN 1 110 101 000 LIDSlO CLR

O 000 Oil 100

0 110 101 100

0 010 101 111

1 100 010 000

PRS

YP

BRN

ROM

LBAK

0 000 000 111 BRN LIDSl

1 Oil 101 110 LALPA W,ZTA

O 111 000 000 LALPl PINC

1 Oil 001 111 LCLOP BRN LCL08

O 000 000 000 DUMMY

O 000 000 101 LXTMA JSB LIDSl GO TO SUPERVISOR

zum Überwachungsprogramm gehen

RESET SHIFT KEY FLAG
Tastenumschaltkennzeichen zurückstellen

GO TO ROM 6
zum ROM 6 gehen

MASK, PART 2
Maske, Teil 2

mask; .part 3
Maske, Teil 3

CLEAR ALL REGISTERS
alle Register löschen

PREPARE C-REG FOR MESSAGE
C-Register für Nachricht vorbereiten

INCREMENT. PRGM COUNTER
Programmzahler erhöhen

DECREMENT COUNTER
Zähle'r erniedrigen

FINISHED? Beendet?

NO; CONTINUE
Nein; fortfahren

YES;GO TO ROM 6 TO CONTINUE

Ja; zum ROM 6 zur Fortsetzung gehen

JUMP TO INT.D.S. ADDRESS GENERATOR
zum internen D.S. Adressen-Generator
springen

co cn co co

0063

0064

0065

1 001 Oil 000

1 001 110 000

1 001 010 100

0066 0364 1 111 010 Oil

0- 010 001 110

1 Oil 110 000

	5ff	0067
	59	0070
co OO	60	0071
co	61	0072
ό
00	62	0073
κ>
	63	0074
	64	0075
	65	0076

66

0077

0 110 001 110

0 100 101 110

1 Oil 000 100

1 010 101 000

1 110 010 000

LDC9	LMTX 2
ATDS
YS9
BRN	LMTX3
W, BTC
DTDS
BRN

1 000 101 000 LDSPl DSOP

W, CTA W, ATB

SSIl MTC

CONSTANT REGISTER ADDRESS
Konstanten-sRegister ^Adresse

D,S. CALL

D.S, rufen

CHECK IF "STORE" ROUTINE FLAG IS-SET Prüfen ob Kennzeichen für "Speicher"-Routine gesetzt ist

NOT SET GO TO "RECALL" ROUTINE nicht gesetzt/ zur "Rückruf"-Routine gehen

SET, RESTORE DATA IN C-REG

Daten im C-Register zurückstellen

STORE DATA IN D.S.
Daten in D.S. speichern'

GO TO ROUTINE EXIT

zum Routinenausgang gehen

SWITCH THE DISPLAY OFF
Anzeige abschalten

COPY, DATA INTO A-REG FOR ADJUSTMENT Daten für Justierung ins Α-Register kopieren

STORE ORIG.DATA TEMPORARILY IN B-REG. ursprüngliche Daten zwischenzeitlich im B~Register speichern

SET"DISPLAY ROUTINE" FLAG

Kennzeichen für "Anzeige-Routine" setzen

GET INTERNAL FLAG VECTOR FOR TEST internen Kennzeichen-Vektor für Test nehmen

GO TO COMMON PART WITH PRINT SUBROUTINE mit Druck-Subroutine zum gemeinsamen Teil gehen

67 0100

0 XlO, 111 010 L0FL2 XS,

68 0101 0204 1 000 010 011 69 0102

70 0103

0 010 101 010

0 101 111 010

71 0104 0251 1 010 100 111 72 0105 0110 0 100 100 011

BRN

χ,ZMCC

XS,CMlC

BRN

BRN

73 0106

0 000 010 000 LSSUP ROM

74 0107 0106 0 100 011 011

BRN

75 0110

1 110 101 110 LCLOY W,AXC

76 Olli 0204 1 000 010 Oil

BRN

77 0112 0213 1 000 101 111 LDSPZ BRN 78 0113

79 0114

1 011 000 100 LIOSl SSIl

0 000 010 000

ROM CHECK SIGN OF THE RESULT EXPONENT Vorzeichen des Ergebnisesponenten prüfen■

LCLOI ZERO; POSITIVE, RESULT IS O.K. O; positiv, Ergebnis in Ordnung

CARRY; CONTINUE TEST; EXPONENT

COMPLEMENTED

übertrag; Test fortsetzen; Exponent

ergänzt

SIGN CODE DECREMENT
Vorzeichenkode erniedrigen

LOFL3 NO CARRY, TROUBLE

kein Übertrag, Störung

LCLOY CARRY, NEG, RESULT, O.K.

Übertrag, negatives Ergebnis, in Ordnung

GO TO SUPERVISOR

zum Überwachungsprogramm gehen

LSSUP ACCEPT KEYCODE FORM OUTSIDE

Tastenkode von außerhalb akzeptieren

RESTORE DATA IN C-REG

Daten im C-Register zurückstellen

LCLOl GO TO CLOSING ROUTINE

zur Abschlußroutxne gehen

LDSPA GO TO GENERATE DISPLAY MASK

zur Erzeugung der Anzeigemaske gehen

SET I/O CALL FLAG

I/O-Ruf-Kennzeichen setzen

GO TO I/O CALL SEQUENCE
zur I/O-Ruf-Sequenz gehen

80 0115

1 100 001 100 LDSPP

PT12

81 0116 1 001 100 010 LDSP3 P,AMI

82 0117 0177 0 111 111 111 , BRN LDSP4

83 0120

0 001 loo

84 0121 0177 O 111 111 85 0122

1 001 Oil

P,CMl

BRN LDSP4

LDC

■Ρ* O	86	0123	0116	0100	111	Oil	BRN LDSP3
co
00	87	0124		0 101	111	010 LDSP52	XS, CMlC
co
CD	88	0125 ι	0027	0 001	Oil	111	BRN LDSP5
OO
σ> Ni	89	0126		1 100	101	000- LDSP6	DNR
	90	0127		0 101	110	010	WP,CMlC
	91	0130		1 000	101	110	W, BXC
	92	0131		0 110	Oil	110	S,CTA
	93	0132		0 101	010	100	YS 5
	94	0133	0144	0 110	010	Oil	BRN LDSP8
	95	0134		0 000	110	010	WP,ZTB

CD CO OO

PREPARE SEARCH FOR LEADING ZEROS

Suche nach, führenden Nullen vorbereiten

ZERO? Null?

NO; END OF THE SEARCH
Nein; Ende der Suche

YES; DEC. POINT?
Ja; Dezimalpunkt?

YES; END OF THE SEARCH
Ja; Ende der Suche

NO; LOAD CODE FOR "BLANK"

Nein; Kode für "Leerstelle" laden

SEARCH ROUTINE
Such-Routine

DECREMENT DISPLAY COUNTER
Anzeigezäbfer erniedrigen

CONTINEUE
fortfahren

RESTORE.MASK TO C REG

Maske zum C-Register zurückstellen

INSERT CODES FOR "BLANK"

Kodes für "Leerstelle" einfügen

ORIG.DATA BACK TO C-REG; MASK TO B-REG
ursprüngliche Daten zurück ins C-Register Maske ins B-Register

COPY ORIG.SIGN TO A-REG urspr.Vorzeichen SCI. NOTATION FORMAT? ins Α-Register kp Format "wissenschafti.Notierung"?

NO nein

YES,CHANGE MASK TO DISPLAY ALL

Ja, Maske ändern um alles anzuzeigen

96

0135

0 HO 001 010

X, CTA

	97	0136	0	HO	πι	010	LWAIT	XS, ZMC
	98	0137	0143 0	HO	001	111		BRN LDS
	99	0140	0	001	001	100		PTl
	100	0141	0	010	HO	QlO		WP,ZMCC
cd' φ." φ;.	101 .	0142	1	HO	HO	010	LDSP9	WP,AXC
cr>	102	0143	0	101	100	100	LDSP 8	RS 5
'086 2	103.	0144	0	000	101	000	LD SP 7	DSIO
	104	0145	1	OH	100	100		RSH
	105	0146	0	000	HO	000	LPERD	RETURN
	106.	0147	0321 1	101	000	111	LMANB	BRN LPERO
	107	0150	0071 Ό	Oil	101	OQl		JSB LDSPl
	108	0151	0	100	100	000	LMAN 2	RMGRC
	109	0152	0	000	.100	100		RSO
	110	0153	0	000	010	100	YSO

COPY ORI.G. EXPONENT TO AKREG ursprünglichen Exponenten ins A-Register kopieren

CHECK IP EXPONENT IS NEGATIVE Prüfen ob Exponent negativ ist

NO, IT IS POSITIVE, O.K.
Nein, ist positiv, in Ordnung

YES, PREPARE COMPLEMENT
Ja, Komplement vorbereiten

COMPLEMENT OF THE EXPONENT Komplement des Exponenten

ORIG. EXPONENT BACK TO C-REG; COMPL. TO • A-REG.

ursprünglicher Exponent zurück ins C-Register, Komplement ins A-Register

RESET SCT. NOT. FORMAT FLAG Kennzeichen für wissenschaftliche Notierung zurücksetzen

DISPLAY ON
Anzeige ein

RESET DISPLAY FLAG
Anzeigekennzeichen zurücksetzen

END OF THE DISPLAY ROUTINE
Ende der Anzeige-*Routine

JUMP TO DISPLAY SUBROUTINE

zur Anzeige-Subroutine springen

IS THE "OLD" KEY STILL DOWN? Ist die "alte" Taste immer noch unten?

Ill 0154 0156 0 110 111 Oil

112 0155 0152 0 110 101 Oil

BRN

BRN

113	0156
114	0157
115	. 0160
116	0161

0 101 000 000 LMAN3 ,1S2 0 100 100 000 ^v RBL

1 001 000 000

0 000 010 100 LMAN4

117 0162 0161 Ό 111 000 111

118 0163 0136 0 101 111 101

119 0164

1 100 001 100

123 Ol70 0370 1 111 100 Oil

BRN

126 0173 0037 0 001 111 111 BRN

127 0174 0 100 010 100 LCL07. YS4

LMAN3 NO, CONTINUE

Nein, fortfahren

LMAN2 YES, WAIT
Ja, warten

120 0165 0033 0 001 101 111 BRN LMAN6

121 0166 0 000 000 000 DUMMY

122 0167 1 010 010 100 LMAN7 YSlO

LMAN 8

124 0171 0043 O 010 001 111 ■ BRN LMÄN9

125 0172 1 010 OlO 100 LCLQ2 YSlO

LCL03

RESET BUSY LIGHT
Betriebsanzeigelampe zurückstellen

ISl	LMAN 4	NEW neue	KEY DOWN? Taste unten?
YSO	LWAIT	NO, Nein	WAIT , warten
BRN		YES, Ja,	GO TO DO NOTHING nichts tun
JSB		SET	PROPER POINTER
PT12

richtige Hinweismarke setzen YES Ja

WAS SHIFT KEY SET?

war Umschalttaste gesetzt?

NO, GO TO ROM O

Nein, zum ROM 0 gehen

YES Ja ,

CHECK IP SECOND PRINT FLAG IS SET prüfen ob zweites Druck-Kennzeichen gesetzt ist

NO Nein

CD CO CO

CHECK- IF RIGHT PARENTHESIS FLAG IS SET prüfen ob Kennzeichen für rechte Klammer gesetzt ist

128. 0175 0312 1 100 101 011·

BRN LEQLT

129 0176 0221 1 003, 000

BRN

LRPAR,

σ oo σο to

130	0177
131	0200
132	0201

0 100 101 000 LDSP4 CTS

1 Oil 100 100 ° RSIl 0 111 111 000 LDSP40 TTC

133 0202 0023 0 001 001

134 0203 0 000 010 000 LPER3

135 0204 0 001 010 100 LCLOl

136 0205 0263 1 Oil 001

137 0206

138 0207

0 101 111

0 001 100

BRN LDSP50

ROM

YSl

BRN LCLO8 S ,CMlC

RSl

139 0210 0263 1 Oil 001 111 BRN LCL08

140 0211 1 100 101 000 LLDDZ DNR

141 0212 0102 0 111 101 Oil BRN LCL02

142 0213 O Oil 001 110 LDSPA W,ZTC

143 0214

O 000 111

PLS YES, CONTINUE IN RIGHT PARENTHESIS ROUTINE

Ja, fortfahren mit der Routine für rechte Klammer

SAVE MASK IN D REG

Maske im D-Register bewahren

GET DISPLAY COUNTER IN C REG Anzeigezählung im C-Register nehmen

CHECK IF ODD-AUX-FLG IS SET Prüf en, ob Hilfsjcennzeichen für "Ungerade" gesetzt ist.

NO, NORMAL PATH
Nein, normaler Pfad

YES, SET NEGATIVE SIGN OF THE RESULT Ja, negatives Vorzeichen des Ergebnisses setzen

YES, RESET FLAG

Ja, Kennzeichen zurückstellen

RESTORE PREVIOUS RESULT IN C-REG Vorheriges Ergebnis im C-Register zurückstellen

START TO GENERATE DISPLAY MASK Anfangen mit der Erzeugung der Anzeigemaske

ADJUST DEC. POINT LOCATION POINTER Hinweismarke für DezimalpunktstTellung justieren

CO GO OO

G215 0 010 Oil 000

0 100 110 111

0 000 000 000

1 110 010 000 O 000 010 000 O 000 000 000 O 000 000 000 O 000 000 000 O 001 100 110

0226 0100 O 100 000 Oil

0227 0253 1 010101 111

145	0216 0115
146 '	0217
147	0220
148	0221
149	0222
150	0223
151	0224
152	0225

155
156

157
158
159

0230
0231

0333

0233

0234

0235

0236

. 0237

O 000 010 000

0 100 010 000

1 101 101 111

0 101 000 000

1 000 101 000

0 001 101 000

1 001 000 000 O 000 Oil 000

LER20
LRPAR

LOPLl

LMTX20
LJAB2

0240 0045 O 010 010 111

LDC2

BRN LDSPP DUMMY R0M7 ROM O DUMMY DUMMY DUMMY M, CMl

BRN LOFL2 BRN LOFL4

ROM O YS 4

BRN LRET3

IS2

PTT

ADD

ISl

LDCO

BRN LBAKl

SET DISPLAY MASK CODE FOR DEC. POINT
Anzeigemasken^Kqde für Dezimalpunkt setzen

CHECK IF MANTISSA IS ZERO
Prüfen, ob Mantisse O ist

NO; CONTINUE TEST
Nein; Test fortsetzen

YES; GO TO SET ZERO FOR RESULT
Ja; O stellen für Ergebnis

ADDRESS MODIFICATION NEEDED?
Adressen-Modifikation benötigt?

NO Nein
YES Ja

CURRENT ADDRESS FOR MODIFICATION
laufende Adresse für Modifikation

MODIFICATION BY BINARY ADDITION
Modifikation durch binäre Addition

PREPARE MASK-OUT BITS 11 TO 16
Ausblendebits 11 bis 16 vorbereiten

MASK, PART 1 (POINTER WAS 3)

Maske, Teil 1 (Hinweismarke war 3) '

CO CD CO CO ·£- CO

164 0241

0 Oil 010 100

165 0242 0015 0 000 110 111

166 0243

1 101 001 100

167 0244 0220 1 QOl 000 Oil

168 0245 O 100 101 OQO LFQLC

169 0246 0000 O 0OQ OQQ 101

170 0247

171 ' 0250

172 0251

1 000 Oll OQO LDC8

1 110 010 OQO

O 001 111 010 L0FL3

173 Q252 0353 1 110 1Ol 111

174 0253

175 0254

O Oil 001 110 L0FL4

O QOQ 000 000

176 0255 0263 1 Oil 001 111

177 0256

178 Q257

179 0260

O 000 000 000 O 000. OQO 000 O 000 QQQ QOO

YS3

BRN LRIP5

PT13

BRN LER20 CTS

JSB LIDSl

ROM 7 XS,CMl

BRN LQFL5 W ,ZTC NOP

BRN. LCL08

DUMMY DUMMY DUMMY'

CHECK IF OP. FLG. IS SET

Prüfen ob OP.«Kennzeichen gesetzt ist

NQ CARRY, O.K., IT IS NOT ZERO,CONTINUE kein übertrag, in Ordnung, ist nicht O, fortfahren

YES, SET POINTER TO GENERATE PROPER MESS. Ja, Hinweismarke-Erzeugung richtiger Nachricht setzen.

SAVE RESULT
Ergebnis bewahren

GENERATE ADDRESS
Adresse erzeugen

CHECK SIGN OF EXP. AGAIN

Vorzeichen des Exponenten erneut überprüfen

NO CARRY, I.E. OVERFLOW DETECTED kein übertrag, d.h. überlauf ermittelt

CARRY; UNDERFLOW; SET ZERO FOR RESULT übertrag; Unterlauf; O für Ergebnis setzen

TO ELIMINATE CARRY CAUSED BY THE HARDWARE um durch Hardware verursachten Übertrag zu eleiminieren

GO TO THE CLOSING PART OF THE ROUTINE zum abschließenden Teil der Routine gehen

K? CO cn

OO OO 4>CO

180	0261	0306
181	0262
182	0263	0172
183	0264
184	0265

Q 110 QlO 000 LCLOG 1 100 Oil Oil LADJ7 0 110 010 100 LCLQ8

1 Oil 110 000 LLDDA 0266 0211 1 000 100 111

0267 O 100 101 000 LCLOA

0 010 101 000 LCL05

1 110 101 110

0 Oil 001 100

0 100 010 010

0 100 010 010

1 110 101 110

0 010 101 000

4 09826/	187 las	0270 0271
Ό 862	189 190	0272 0273
	191	0274
	192	0275
	193	0276

ROM 3	>	LADJI7
BRN
YS6	LCLO 2
BRN
DTDS	LLDDZ
BRN
CTS

CXM

PT3

WP₇SLA . WP,SLA

W,AXC CXM

CHECK IF L-FLAG IS SET prüfen, ob L-»Kenn2eichen gesetzt ist

NO Nein

STORE RESULT IN D.S.
Ergebnis in D.S. speichern

COPY C TO D-REGISTER

C· ins D-Register kopieren

GET INT.FLG VECTOR AND STORE RESULT IN M-REG

internen Kennzeichenvektor nehmen und Ergebnis im M-Register speichern

PREPARE INT.FLAG VECTOR FOR UPDATING internen Kennzeichenvektor vorbereiten, · um ihn auf den neuesten Stand zu bringen

SET POINTER TO INDICATE OP,CODE Hinweismarke setzen um OP-Kode anzuzeigen

"NEW" OP.CODE TRANSFERRED "Neuer"-OP-Kode transferiert

TO OP,CODE "TO BE EXECUTED" NEXT zum OP-Kode "auszuführen" als nächster

UPDATED INT,FLG. VECTOR TO C-REG auf den neuesten Stand gebrachten Kennzeichenvektor zum C-Register

RESTORE RESULT IN C-REG; INT.FLG VECTOR TO M-REG,

Ergebnis im C-Register zurückstellen internen Kennzeichenvektor zum M-Register

194 0277

0 1OQ 010 100

195 0300 0303 1 100 001 111

196 0301 1 000 101 110

197 0302 0261 1 Oil 000 111

198 0303 0 000 110 100 LCLOM

199 0304 0 Oil 000 100

200 0305 0042 0 010 OQl Oil

201 0306 1 010 111 010 LADJ17

202 0307 0376 .1 111 111 Oil

203 0310 0 111 100 110

204 0311 0376 1 111 111 Oil

205 0312 O Oil 010 100 LFQLT

206 0313 0363 1 111 001 111

207 0314 0270 1 Oil 100 Oil

208 0315 O 000 Oil 100

LDSP51

.YS 4	LCLOM	W,BXC	LCLOG	LADJ18	M ,CPlC	LADJ18
BRN	BRN		BRN
	CLS		YS 3	LEQL3
SS3	LCL06	BRN	LCLO 5
BRN	XS, CPCC	BRN
BRN	PRS

209 0316

O 111 010 100

210 0317 0124 O 101 010 Oil

211 . 0320 0027 O 001 Oil 111

BRN LDSP52

BRN LDSP5

212 0321

O 110 100 000 LPERO YADP INTERROGATE AUX.FLAG
Hilfökennzeichen abtragen

TECHNICAL BRANCH
Technischer Abzweig

CL, ALL FLAGS(FOR TWO OP.ROUTINES) ___ _ηΌ _,_Tar alle Kennz. löschen (für 2 OP-

&£.ι uj^. auAKa oP-Kennzeichen setzerfeoutinen) GO TO ROUTINE EXIT

zum Routinenausgang gehen CHECK IF ROUND UP IS NEEDED prüfen ob Aufrundung benötigt wird

NO Nein
YES Ja

IS OP.FLG.SET?

Ist OP-Kennzeichen gesetzt?

NO Nein
YES Ja

DECREMENT POINTER
Hinweismarke erniedrigen

IS THIS A DATA ENTRY Ist dies ein Dateneingang

YES, CONTINUE TEST
Ja, Test fortsetzen

NO, CONTINUE DECREMENT Nein, Erniedrigung fortsetzen

CHECK IF AUTO D.P. FLÄG SET prüfen, ob Kennzeichen für auto-, matischen Dezimalpunkt gesetzt ist

213 0322

223
224

1 Oil 010 100

214 0323 0203 1 000 001 215 0324

216 0325

1 Oil 100 100

0 111 010 100

217 0326 0330 1 101 100 Oil

218 0327 0203 1 000 001 111

YSIl

BRN LPER3

RSIl

YS7

BRN LPER32 BRN LPER3

219 0330

0 HO 010 100 LPFR32 YS6

220 0331 0335 1 101 HO 111

221 0332 0203 1 000 001 111

222 0333

0334
0335

225 0336

226 0337

1 000 000 000 LRET3

1 100 010 000

0 HO 001 HO LPER33

1 010 101 000 1 101 001 100

BRN LPER33 BRN LPER3

TTP

ROM W,CTA

MTC PT13

227 0340 0342 1 HO 001 OH BRN LPER35

228 0341 1 111 101 010 LPFR34 Χ,ΑΡΙΑ

IS IT SET?

Ist es gesetzt?

NO, GO TO NORMAL PATH

Nein, zum normalen Pfad gehen

YES, RESET EXTERNAL FLAG Ja, externes Kennzeichen zurücksetzen

IS IT MANUAL DATA ENTRY . Ist es manueller Dateneingang?

YES Ja

NO; GO TO NORMAL PATH Nein; zum normalen Pfaä gehen

WAS DEC POINT SET? war Dezimalpunkt gesetzt?

NO; Nein

YES; GO TO NORMAL PATH Ja^ zum normalen Pfad gehen

NEW ADDRESS INTO PRGM.COUNTER neue Adresse in den Programmzahler

STORE DATA TEMP IN A-REG (FOR PROCESSING) Daten zwischenzeitlich Α-Register speichern GET INT.PLG.VECTOR FOR TEST^(für Verarbeitung) internen Kennzeichenvektor für Test nehmen

PREPARE D.P.L. FLAG TEST D.P.L.-Kennzeichen-Test vorbereiten

INCREMENT EXPONENT Exponent erhöhen

229 0342

0 101 100 010 LPER35

230 0343 0341 1 HO 000 111 231 0344

ο
co
co
ro
σ>

1 HO 101 110

232 0345 0203 1 000 001 111

233 0346 0 000 000 000

234 0347 1 001 101 010 LDGTC

235 0350 0113 0 100 101 111

236 0351

0 000 001 100

237 0352 0052 0 010 101 011

238 0353 1 110 010 000 L0FL5

239 0354' 1 000 011 000 LRES9

240 0355 0013 .0 000 101 111

P,

BRN LPER,34

W,AXC

BRN LPER3

DUMMY

X,AMI

BRN LIOSl PTO

BRN LALFA 'ROM LDC

BRN

LRES69

241	0356	1	111	Oil	000 LBAK2	LDC15
242	0357	0	101	000	000	IS 2
243	0360	0	010	101	000	AND
244	0361	1	001	000	000	ISl
245	0362 0333	1	101	101	111	BRN LRET3
246	0363	0	000	010	000 LFQL3	ROM 0

DECREMENT D.P.L.FLAG

P,P.L."Kennzeichen erniedrigen

NO CARRY
Ke'in Übertrag

RESTORE ADJUSTED DATA IN C-REG

justierte Daten im C-Register zurückstellen

CHECK ENTERED DIGIT
eingegebene Ziffer prüfen

NO CARRY, CALL I/O

kein Übertrag, I/O rufen

CARRY, START ALPHA ROUTINE Übertrag, Alpha-Routine starten

PREPARE HIGHEST D.S.ADDR. TO BE RESET höchste D.S,-Adresse zur Rückstellung vorbereiten

GO TO RESTORE POINTER

zur Rückstell-Hinweismarke gehen

MASK,PART 4
Maske, Teil 4

MASK-OUT BITS Il THROUGH 16 Ausblendebits 11 bis 16

SWITCH TO ROMO
auf ROM O schalten

247 Q364

1 0X1 111 000 LMTX2 DSTC

248 0365 0230 1 001 100 Oil BRN LJ«2Q

249 0366 0 010 101 000 LDGTA CXM

250 0367 0347 1 110 Oil 111 BRN LDGTC

251 0370 1 Oil 101 110 LMAN8 W,ZTA

*·» σ co OO	252 253	0371 0372
co	254	0373
r0862	255	0374

O 000 010 000

ROM O

O Oil 001 110 LEQLB W,ZTC

O 100 101 000

O 010 001 110

256 0375 0245 1 010 010 111

CTS

W,BTC

BRN LEQLC

257 0376 1 110 010 000 ■LADJl8 ROM 7

258 0377 0204 1000 010 011 BRN LCLOl

DATA OUT, OF D,S.INTO CKR.EG paten aus D.S. ins C-«Register auslegen

STORE UPDATED INT.FLG.yECTOR auf den neuesten Stand gebrachten Internen Kennzeichenvektor speichern

PREPARE A-REG TO ACCEPT DIGIT Α-Register vorbereiten um Ziffern zu, akzeptieren

GO TO ACCEPT KEYCODE

zur Akzeptierung des Tastenkodes gehen

PREPARE ZERO IN C-REG

O in C-Register vorbereiten

LOAD IT INTO D-REG
ins D~Ragister laden

RESTORE DATA IN C-REG

Daten im C-Register zurückstellen

DO A ACC +
machen

MAIN UNIT LISTING (ROM A^

	LINE	CURR,	BRAN	Haupteinheit (RQM A~3_)	0221	Bit-Muster	000 000 000	DUMMY
	f		ADDR	OPERATION CODE		0	010 001 110 LERR37	W, BTC
	Zeilen			ΒΓΤ PATTERN	0271	0	001 000 111	BRN LERR30
	Nr.	laufendeAbzweig-Betriebs-Kode		1	101 100 010 LERR33	P,CMlC
	3	Adresse Adresse		0	Oil 100 111	BRN LERR34
	4	0000	0010	1
	5	0001			001 000 100	SSl
d	6	0002		0	000 100 Oil	BRN LGOOl
co	7	0003		0	010 010 000 LGOO2	ROM 5
co ro		0004		1	000 111 110 LGOOl	S, ZTB
σ>	8		0007	0	010 001 110	W, BTC
"S. O	9	0005		0	100 001 100	PT12
0» ο*	10	0006		1	ooo on in	BRN LGOO2
Wir N)	11	0007		0	001 001 110 LCLA3	W,SRC
	12	0010	1	001 001 110	WrSRC
	13	0011	1	101 001 100	PT 13
	14	0012	1
	15	0013
	16	0014
	.17	0015
		0016

RESTORE ORIG DATA DAMAGED BY TEST durch den Test zerstörte ursprüngliche Daten zurückstellen

letzte interne DECREMENT LAST INT.DIGITZiffer erniedrige*"*

NO CARRY, TEST CONTINUE kein übertrag, Test fortsetzen

CARRY, ODD, SET AUX.FLAG Übertrag,

Ungerade, Hilfskennzeichen "Ungerade" setzen

PREPARE LABEL HEAD LOADING Etikettenkopf-Ladung vorbereiten

PREPARE LABEL HEAD LOADING Etikettenkopf-Ladung vorbereiten

PREPARE LABEL HEAD LOADING Etikettenkopf-Ladung vorbereiten

0017

1 QOO OH pOO 0020 0025 O 001 010 111

LDC

BRN LCLA4 0021

0022

1 000 010 000 LEEQQ ROM 1 000 010 100 YS8

0023 0062 O Oil 001 Oil 0024 0021 O 001 000 111

BRN LEQLP

BRN LEEQQ

0 9 8 2 6/	24 25 26	0025 0026 0027
Ό862	27	0030
	28	0031
	29	0032
	30	0033
	31	0034
	32	0035

0 111 Oil 000 LCLA4 LDC7

1 111 101 Oil BRN LCLA20 1 000 101 110 LPARA W,BXC

1 010 101 000

1 001 001 100

1 110 100 010

O 101 Oil 000

O 000 111 100

O 001 000 010

MTC

PT9 P, AXC LDC5 PLS P ,AMC

LOAD 8 8 laden

BRANCH CHARDViA₁RE NOPJ abzweigen CHardware

IS IT EQUAL ROUTINE? Ist es die Gleichheits-Routine?

YES,GO TO LEVEL TEST Ja, zum Niveautest gehen

NO, SKIP LEVEL TEST Nein, Niveautest überspringen

LOAD 7
7 laden

SAVE DATA TEMPORARILY IN B-REG Daten zwischenzeitlich im B-Register bewahren

GET IN.FLG. VECTOR FOR TEST internen Kennzeichenvektor für Test nehmen

PREPARE LEVEL INDICATOR FOR TEST Niveau-Indikator für Test vorbereiten

LEVEL INDICATOR TO A-REG Niveau-Indikator ins A-Register

LIMIT SET TO C-REG

gesetzte Grenze ins C-Register

POINTER ADJUSTMENT
Hinweismarken Justierung

COMPARISON Vergleich

Ό
co
co

33

34 35 36 37 38 39

40 41

42 43

44 45 46

0036 0371 1 111 100

0037 0310 1 100 100 Oil

BRN LSERI

BRN LPAR2

0040 0212 1 000 101 011 LPERA BRN LPER2

0041 0042 0043 0044

0045 0046

0047 0050

0 010 010 000 LFIN2 ROM

0 010 010 000 LFIN3 ROM

1 000 101 110 LPER3 W,BXC

0 101 101

0 101 101

1 000 101

1 001 001 1 001 001

0051 0 110 100

0052 0 101 110

0053 0352 1 110 101

X,CMlC

X,CMlC W,BXC

W, SRC W, SRC

RS

WP,CMlC

BRN LPER4

47 0054

0 010 001 110 LFINl W,BTC NO CARRY,IT IS FIVE,GO TO ERROR ROUTINE kein Übertrag, es ist 5, zur Fehlerroutine gehen

CARRY, IT IS LESS THAN FIVE,CONTINUE Übertrag, es ist weniger als 5, fortfahren

PREPARE SYMBOL FOR PRINT Symbol für Druck vorbereiten

GO TO LSUPA
nach LSUPA gehen

GO TO SUPERVISOR LSUPB zum Überwachungsprogramm LSUPB gehen

RESTORE RESULT IN C-REG Ergebnis im C-Register zurückstellen

DECREMENT DATA EXPONENT Datenexponent erniedrigen

BY TWO um 2

GET INT'.FLG VECTOR BACK TO C-REG internen Kennzeichenvektor zurück ins C-REgister 'nehmen

OP.CODE ALIGNMENT SHIFT OP-Kode-AusrichtungsverSchiebung

OP.CODE ALIGNMENT SHIFT OP-Kode-Ausrichtungsverschiebung

IS IT ZERO? Ist es Null?

NO,CONTINUE TEST Nein, Test fortsetzen

YES,FINISHED,RESTORE DATA IN C-REG

Ja, beendet, Daten im C-Register zurückstellen

	48	0055	0041	0	010	000	111	LGT 2	BRN	LFlN 2
	49	0056		1	Oil	001	100		PTH
	50	0057		1	000	Oil	000		LDC 8
	51	0060	0110	0	100	100	101		JSB	LDSC20
	52	0061	0071	0	Oil	100	111	LEQLP	BRN	LGT 3
	53	0062		0	010	101	000		CXM
	54	0063 .		•ι	σοι	001	100		PT9
4P-	55	0064		0	001	100	010		P, CMl
CO OO	56	0065	0203	1	000	001	111		BRN	LERRG
ho σ>	57	0066		0	010	101	000		CXM
S. O	58	0067		1	010	001	100		PTlO
OO σ>	59	0070	0021	0	001	000	111	LGT 3	BRN	LEEQQ
	60	0071		1	110	010	000	LPRS60	ROM 7
	61	0072		1	001	010	100	YS9

0073 0347 1 HQ Oil 111 0074 1 001 100 100

1 Oil 001 100

64	0075
65	0076
66	0077

BRN RS9

PTH"

LPRS61

100 010 000 ROM 100 010 000 LLAHl R0M6 PREPARE ADDRESS
Adresse vorbereiten

GET INT.FLG.VECTOR FOR TFS -internen Kennzeichen-Vektor ' für Test nehmen

PREPARE PAR„LEVEL INDICATOR TEST Test für Niveau-Anzeiger vorbereiten

IS IT ZERO? Ist es Null? NO,TROUBLE Nein, Störung

YES, O.K. RESTORE C-REG Ja, in Ordnung, C-Register zurückstellen

LEVEL TEST FINISHED
Niveautest beendet

IS SHIFT KEY ROUTINE FLAG SET? Ist Kennzeichen für Tastenumschalt-Routine gesetzt?

NO Nein

YES; RESET IT
Ja; zurückstellen

PREPARE POINTER TO LOAD SYMBOL CODE Hinweismarke für Ladung des Symbolkodes vorbereiten

GO BACK zurückgehen

GO TO LABEL HEAD ROUTINE BEGINNING zum Beginn der Etikettenkopf-Routine gehen

	67	0100
	68	0101
	69	0102
	70	0103
	71	0104
O	72	0105
co
co	73	0106
CD	74	0107
O	75	0110
CQ CD	76	0111
ro	77 .	0112
	78	0113
	79	0114
	80	0115
	81	0116
	82	0117
	83 ·	0120
	84	0121
	85	0122

1 010 101 000 LDSCl MTC

1 001 001 100

0 111 100 010

0 110 001 110

PT9

P,CPlC

W, CTA

0 010 101 000 LDSC2,, CXM 0 100 001 110 W,SLA

0 100 001 110 W,SLA

1 110 101 110 W,AXC 1 010 001 100 PTlO

0 Oil 010 010 LDSC2O WP,ZTC 0 111 101 110 W,CP1C

0 Oil Oil 110 S,ZTC

1 100 001 100 PTl2 1 111 Oil 000 LDC15 1 001 110 000 ATDS 1 Oil 100 100 RSIl 1 100 001 100 PT12

0 000 110 000 RETURN

1 000 010 100 LCODZ YS8

GET INT.FLG. VECTOR FOR UPDATE internen Kennzeichen-Vektor nehmen, um ihn auf den neuesten Stand zu bringen

PREPARE LEVEL INDICATOR FOR INCREMENT Niveau-Anzeiger für Erhöhung vorbereiten

INCREMENT LEVEL INDICATOR BY ONE Niveau-Anzeiger um 1 erhöhen

COPY IT INTO A-REG (FOR ADDR.GEN.) ins A-REgister kopieren (für Adressenerzeugung

STORE IT BACK IN M-REG

zurück ins M-Register speichern

PREPARE LEVEL IND.FOR ADDRESS Niveau-Anzeiger für Adresse vorbereiten

END OF THE SUBROUTINE
Ende der Subroutine

CHECK IF RIGHT PAR.FLG IS SET prüfen, ob Kennzeichen für rechte Klammer gesetzt ist

0123 0376 1 111 111 Oil 0124 0 100 000 100

0125 0376 1 111 111 Oil

BRN SS4

LCODO

LCODO

0126

0 Oil 000 100 LPAR6 SS3

0127 0322 1 101 001 Oil 0130 0 010 110 010 LPER5 0131 0054 0 010 110 Oil

BRN ' LPAR3 WP,CMlC '
BRN LFINl

0 9826	93 94	0132 0133
ο OO	95	0134
KS	96	0135
	97	0136

1 Oil 000 100 LPER6 SSIl

1 000 010 000

1 010 101 000 LRIPD MTC

0 110 001 110

1 001 001 100

0137 0240 1 010 000 Oil

W, CTA

BRN LRIPX

0140

0141

0142

0143

1 100 010 000 LGRT2 ROM 1 100 101 000 LRIPY DNR 1 Oil 111 000 DSTC

O 100 101 000

PAR.

YES,SET RIGHT AUX.FLAG Ja, Hilfskennzeichen für rechte Klammer setzen

NO,NORMAL V KEY PATH Nein, normaler V-Tasten-Pfad

SET OP.FLAG

OP.-Kennzeichen setzen

IS IT TWO? Ist es 2?

NO; FINISHED
Nein; beendet

YES; SET SINGLE OP. FLAG Ja; einzelnes OP-Kennzeichen setzen

GO TO MULTIPLICATION ROUTINE LMUL3 zur Multiplikationsroutine LMUL3 gehen

GET INT.FLG. VECTOR FOR UPDATE internen Kennzeichenvektor nehmen, um ihn auf den neuesten Stand zu bringen

COPY IN INTO A-REG ins A-REgister kopieren

PREPARE LEVEL INDICATOR Niveau-Indikator vorbereiten

TECHNICAL BRANCH technischer Abzweig

READ DATA OUT OF THE STACK Daten aus dem Stapelspeicher auslesen

SEND IT TO D-REG ins D-Register schicken

0144 0153 0 110 110 001

1 001 001 110

1 001 001 110 1 Oil 110 000

1 010 101 000 1 110 11.0 010 0 010 101 000

	104	0145
	105	0146
	106	0147
	107	0150
O	108	0151
co
00
ro co	109	0152
o'·
CD OT	110	0153
ro
	111	0154
	112	0155
	113	0156
	114	0157
	115	0160
	116	0161
	117	0162

0 011 001 110

0 111 101 110

1 111 011 000 1 001 110 000

ι on ioo ioo

LD SC

JSB LDSC3 W, SRC

W, SRC DTDS

MTC WP,AXC CXM

BRN LPINl

W, ZTC W,CPlC LDC15 ATDS RSlI

1 Oil 111 000 LDSC40 DSTC PREPARE OP.CODE STACK
OP-Kode-Stapelspeicher vorbereiten

OP.CODE STACK
OP-Kode-Stapelspeicher

UP auf

STORE UPDATED OP.CODE STACK IN D.S. auf den neuesten Stand gebrachten OP-Kode-Stapel in D.S. speichern

GET INT.FLG.VECTOR FOR UPDATE internen Kennzeichen-VEktor nehmen, um ihn auf den neuesten Stand zu bringen

GET OLD OP.CODE INTO INT.FLG.VECTOR alten OP-Kode in internen Kennzeichen-Vektor nehmen

STORE UPDATE INT.FLG.VECTOR auf den neuesten STand gebrachten internen Kennzeichen-Vektor speichern

GO TO ROUTINE CLOSING PART zum Routinen-Abschlußteil gehen

0 110 001 110

W, CTA CALL D.S. D.S. rufen

RESET FLAG

Kennzeichen zurücksetzen

READ CURRENT OP. CODE STACK TO C-REG laufenden OP-Kode-Stapel ins C-Register lesen

OP. CODE STACK TO A-REG FOR UPDATE OP-Kode-Stapel ins Α-Register, um ihn auf den neuesten Stand zu bringen

σ co οο ro co ^ ο

OO CD NJ

118 119 120, 121 122 123 124

125 126 127 128 129 130

131 132

133 134

0163 0246 1 010 Oil Oil BRN LDSC30

0164 0 000 010 000 LPRS62 ROM

0165 1 100 010 000 LCLA8 ROM

0166 0 100 001 100 LERR36 'PT

0167 0377 1 111 111 111 BRN LERRZ

0170 1 100 101 000 LERR31 DNR

0171 0 100 101 000 CTS

0172

0174

0175

0177

0200 0201

•0 001 111 010 LERR40 XS,CMl

0173 0254 1 010 110 Oil

0 001 001

0 001 100

0176 0010 0 000 100 Oil

O 110 001

0 Oil 001

1 100 001 IQO

BRN LERR32

PTl

P, CMl

BRN LGOOl

X,CTA

X, ZTC PT.12

0202 0227 1 001 Oil

0203 O 010 101 000 LERRG

BRN CXM

LERR55

135 0204 0245 1 010 OlO 111 BRN LEEFE 13C 0205 O 010 001 110 LIMPl W,BTC SET POINTER FOR "NOTE 09" Hinweismarke für "09 beachten" setzen

COPY Υ BACK TO D-REG

Y zurück ins D-Register kopieren

CHECK EXPONENT SIGN
Exponentenvorzeichen prüfen

NOT INTEGER.ERROR
keine Ganzzahl, Fehler

CARRY, POSITIVE EXP. CONTINUE Übertrag, positiver Exponent, fortfahren

CHECK EXPONENTS MOST SIGNIFICANT DIGIT ' wichtigste Ziffer des Exponenten prüfen

NON ZERO,EVEN INTEGER
nicht Null, sogar Ganzzahl

ZERO,TEST CONTINUE,COPY EXP TO A-REG Null, Test fortsetzen, exponenten ins Α-Register kopieren

PREPARE PROPER POINTER

richtige Hinweismarke vorbereiten

RESTORE INT.FLG.VECTOR IN M-REG internen Kennzeichen-Vektor im M-Register zurückstellen

RESTORE DATA IN C-REG

Daten im C-REgister zurückstellen

0206

0207

0 100 000 100

0·000 010 000

SS4

ROM 0210 0077 O Oil 111 111 LLAHA BRN LLAHl

O 000 000 000 DUMMY

O 000 111 100 LPER2 PLS

0 100 Oil 000 LDC4

1 111 Oil 000 LDC15 O 000 010 000 ROM O Oil 001 100 LERB PT3

1 111 111 111 BRN LERRZ 0220 0043 O 010 001 111 LPERC BRN LPER3

1 Oil 010 100 LERR30 YSIl

	140	0211
	141	0212
	142	0213
	143	0214
	144	0215
O CD	145	0216
OO	146	0217
CD	147	0220
O 00	148	0221

0222 0170 O 111 100 Oil 0223 0166 O 111 Oil' Oil

BRN LERR31

BRN LERR36 0224 0371 1 111 100 111 LERIA BRN LSERl

O 101 000 100 LPAR5 SS5

152	0225
153	0226
154	0227
155'	0230

1 110 010 000

ROM

O 000 Oil 100 LERR55 PRS

1 101 101 010

X,AMIA SET AUX.FLAG Hilfskennzeichen setzen

GO TO MULTIPLICATION ROUTINE (LMUL2) zur Mulitplikationsroutine (LMUL2) gehen

GO TO LABEL HEAD ROUTINE BEGINNING zum Beginn der Etikettenkopf-Routine gehen

BLANK Leerstelle

SET POINTER FOR "NOTE 08" Hinweismarke für "08 beachten" setzen

IS IT SINGLE OP.OPERATION? It es einzelne OPVOperation?

NO, IT IS X Y Nein, es ist X Y

YES, IT IS LG OR LOG ROUTINE Ja, es ist Ig oder log-Routine

GO TO NOTE 05 MESSAGE zur Nachricht "05 beachten'

SET AUXILIARY FLAG Hilfskennzeichen setzen ·

SWITCH TO R0M7 auf ROM 7 schalten

POINTER DECREMENT Hinweismarke erniedrigen

DECREMENT EXPONENT Exponent erniedrigen

gehen

156 0231 0227 1 001 Oil 111 157 0232

0 001 110 010

BRN

WP,CMl

LERR55

158 0233 0254 1 010 110 Oil

BRN . LERR32

	159	0234	0271	0	000	111	100	LCODW	PLS	LERR34
	160	0235	0122	1	Oil	100	111	LGRTl	BRN	LCODZ
	161	0236	0140	0	101	001	Oil	LRIPX	BRN	LGRT 2
	162	0237		0	HO	000	Oil		BRN
O co	163	0240	0103	0	101	100	010		P,CMlC	LDSC2
CD CJ5	164	0241	0141	0	100	010	001		JSV	LRIPY
O	165	0242		0	HO	000	111	LPRXM	BRN
	166	0243	0322	0	000	000	000	LEEEE	DUMMY	LPAR3
	167	0244		1	101	001	Oil	LDSC30	BRN
	168	0245		1	HO	010	000		ROM 7
	169	0246		0	100	001	HO		W,SLA
	170	0247		0	100	001	HO		W, SLA
	' 171	0250		0	Oil	001	100	LCLOM	PT 3
	172	0251		0	000	110	000	.RETURN
	173	0252	0	Oil	001	110	W. ZTC!

NO CARRY, CONTINUE IN DECR , kein übertrag, Erniedrigung fortsetzen

CARRY, POINTER ADJUSTED, CHECK TAIL Übertrag, Hinweismarke justiert,Anhängsel NONZERO TAIL; NOT INTEGER prüfen Anhängsel nicht 0; keine Ganzzahl

CARRY, ZERO TAIL; INTEGER, CHECK CONT übertrag, Anhängsel O, Ganzzahl, Zählung prüfen

DECREMENT LEVEL INDICATOR Niveauanseiger erniedrigen

STORE IT AND CALL D.S.STACK Speichern und D,S.-Stapel rufen

GO TO LPAR3 nach LPAR3 gehen

DOWN herunter

PREPARE OP.CODE MANIPULATION OP-Kode-Manipulation vorbereiten

END OF THE SUBROUTINE Ende der Subroutine

SET ZERO FOR RESULT
Null für Ergebnis setzen

174 0253

O 100 010 000 LCLOD ROM

175 0254

176 0255

1 000 101 110 LPRR32 W,BXC

0 100 101 000

177 0256 0216 1 000 111 011

178 0257 0 111 110 000 LCLA6

179 0260

1 000 000 000

180 0261 0165 0 111 010 111

181 0262 0126 0 101 Oil Oil LIMPA

182 0263 1 011 010 100

183 0264 0364 1 111 010 011

184 0265

1 000 010 100

185 0266 0275 1 011 110 111 186 0267

1 101 001 100

187 0270 0363 1 111 001 111

188 0271 0 101 100 010 LERR34

189 0272 0003 0 000 001 111

190 0273 0010 0 000 100 011

191 0274 0014 0 000 110 Oil LCLAC

BRN LERB CTT

BRN LCLA8

BRN LPAR6

BRN . LERR25

BRN LERR24

BRN LERR39 P,CMlC

BRN LERR33 BRN LG001 BRN LCLA3

SEND EXP.TO B; MANT. TO C-REG Exponent nach B schicken; Mantisse ins C-Register

STORE MANTISSA IN STACK * Mantisse im Stapel speichern

COPY IT INTO T-REG

ins T-Register kopieren

LOAD ZEROS PROM T-REG TAIL INTO PRGM.COUNTER Nullen vom T-Register Anhängsel in Programmzähler laden

GO TO LEPT PAR.ROUTINE

zur Routine für d ^{linke Klammer}

IS IT SINGLE OP.OPERATION?

.Ist es einzelne OP-Operation?.

NO; GO TO CHECK VALUE OF Y Nein, zur Prüfung des Wertes von Y gehen

IS IT LOG?
Ist es log?

NO, SET ONE FOR RESULT Nein, eins als Ergebnis setzen

SET POINTER FOR "NOTE 12" Hinweismarke auf "12 beachten" setzen

DECREMENT LAST INT.DIGIT letzte interne Ziffer erniedrigen

NO CARRY TEST CONTINUE kein Übertrag, Test fortsetzen

CARRY EVEN, GO TO NORMAL OP.

Übertrag gerade, zur normalen Operation gehen

	192	0275	0	Oil	001	110 LERR24	W, ZTC
	193	0276	1	100	001	100	PT12
	194	0277	0	001	011	000	LDCl
	195	0300 0253	1	010	101	111	BRN
	196	0301	0	000	110	100 LPARZ	CLS
	197	0302	1	100	101	000	DNR
	198	0303	0	Oil	001	110	W, ZTC
	199	0304	0	100	101	000	CTS
**■ O CD	200	0305	0	010	) 000	100	SS2
OO ro σ>	201	0306	0	011	000	100	SS3
ο OO	202	0307 0042	0	010	001	011	BRN
ro	203	0310	0	011	010	100 LPAR2	YS3

LCLOD

LP IN 3

204 0311 0205 1 000 010 111 205 0312

0 010 010 100

206 0313 0126 0 101 011 011

20.7 0314

1 010 101 000

BRN LIMPl

BRN LPAR6

CLEAR ALL STATUS BITS ALLE Zustandsbits löschen * ·

PREPARE D-REG RESET

D--Register-Rücksteilung vorbereiten

CLEAR C-REG
C-Register löschen

ZERO TO D-REGISTER
Null ins D-Register

SET LEFT PAR. FLG. ,

Kennzeichen für linke Klammer setzen

SET OP. FLAG
OP-Kennzeichen setzen

GO TO ROUTINE EXIT

zum Routinen-Ausgang gehen

CHECK OP. FLAG
OP-Kennzeichen prüfen

NOT SET; GO TO IMPLY MULTIPLICATION nicht gesetzt; zur Multiplikationsimplizierung gehen

SET, CHECK LEFT PAR. FLAG . gesetzt, Kennzeichen für lin.ke Klammer prüfen

NOT SET, GO TO PRINT DATA nicht gesetzt, zum Datendruck gehen

SET, NESTED PARENTHESES, GET INT. VECTOR

gesetzt, verschachtelte Klammer, internen Kennzeichenvektor nehmen

208

0315

0 Oil 001 100

PT3

209	0316	0	000	Oil	000	LDCO
210	0317	0	001	Oil	000	LDCl

0320

0321

010 101 000

000 101 110

CXM

W, ZTB 0322 0077 0 100 000 001 LPAR3 JSB LDSCI

O co	214	0323
00
co	215	0324
σ OO	216	0325
co
ro	217	0326
	218	0327
	219	0330
	220	0331

0332

0333

100 101 000

1 Oil 110 000 0153 0 110 110 001

1 OlO 101 000

001 010 010

001 010 010

110 101 010

110 111 010

0 Oil 010 010

DNR

DTDS

JSB LDSC3

MTC

WP,SRC

WP,SRC

X, AXC

XS,AXC

WP,ZTC GENERATE OP. CODE TO BE STORED zu speichernden OP-Kode erzeugen

SET ADD. AS OP.CODE
ADD. als OP-Kode setzen

STORE NEW INT. PLG. VECTOR IN M-REG neuen internen Kennzeichen-Vektor im M-Register speichern

SET "ZERO" FOR DATA TO BE STORED "Null" für zu speichernde Daten setzen

GO TO INCR. LEV. IND. AND SEND DATA TO STACK zur Erhöhung des Niveau-Indikators gehen und Daten zum Stapelspeicher schicken

RESTORE DATA IN C-REG Daten im C-Register zurückstellen

STORE DATA IN D.S.STACK Daten im D.S.-Stapel speichern

PREPARE OP. CODE STACK OP-Kode-Stapel vorbereiten

INT.FLG. VECTOR OUT

interner Kennzeichen-Vektor aus

PREPARE OP. CODE TO BE EXECUTED auszuführenden OP-Code vorbereiten

TO BE STACKED
zum Stapeln

ADD NEW OP. CODE TO STACK neune OP-Kode zum Stapel hinzufügen

NEW OP. CODE STACK IN A-REG neune OP-Kode-Stapel ins A-Register

CLEAR OP.CODES IN INT.FLG.VECTOR OP-Kodes im internen Kennzeichen-Vektor löschen

223 0334

224 0335

225 0336

226
227
228
229
230

231
232

0337
0340
0341

0 010 101 000

1 110 101 110 1 011 110 000

1 101 001 100

1 111 011 000 LPAR4

1 111 101 100

0342 0340 1 110 000 011

0343 0 111 110 000

0344
0345

1 011 001 100 0 010 011 000

233 0346 0225 1 001 010 111

234 0347 0 001 100 100

235 0350 1 010 100 100

236 0351 0164 0 111 010 011

237 0352 0 101 110 010

238 0353 0130 0 101 100 011

239 0354 0132 0 101 101 011

240 0355

241 0356

242 0357

0 011 001 110 0 101 101 110 0 011 011 110

LPRS61

LPER4

CXM'

W,AXC DTDS

ΡΤ13

LDC15

ΥΡ15

BRN LPAR4

CTT

PTIl' LDC 2

BRN , LPAR5

RSl

RSlO

BRN LPRS62

WP,CMlC

BRN LPER5

BRN

LERR26 W,ZTC

LPER6

STORE NEW INT. FLG. VECTOR IN M-REG neuen internen Kennzeichen-Vektor im M-Register speichern

NEW OP. KODE STACK IN C-REG neune OP-Kode-Stapel ins C-Register

STORE NEW OP.CODE STACK IN D.S.

neuen OP-Kode-Stapel in D.S. speichern

BLANKS Leerstellen

GET BLANKS INTO T-REG Leerstellen ins T-Register nehmen

LOAD CODE FOR SYMBOL ( Kode für Symbol ( laden

GO TO FORCED PRINT ROUTINE zur Routine für erzwungenen Druck gehen

IS IT ONE? Ist es 1?

NO, CONTINUE IN TEST Nein, Test fortsetzen

YES, GO TO COMMON PATH Ja, zum gemeinsamen Pfad gehen

S, ZTC

243	0360	1	000	100	100	LFRR39	RS8
244	0361	0	ooo	001	100	LPRR25	PTO
245	0362	1	110	010	000		ROM 7
246	0363	1	110	010	000		ROM 7
247	0364	1	100	101	000	DNR
248	0365	0	001	111	110	S, CMl
249	0366 0355 1	110	110	111	BRN

250 0367

1 000 100

251 0370 0252 1 010 101 Oil

252 0371 -1 110 QlO 000 1,SERI

RS8

BRN

253 0372 254 0373 255 0374

1 000 001 100 LCLA20 PT8

O Oil 010

WP,ZTC

O 110 001 110 LCLA5 W,CTA

LERR26

LCLOM

256 0375 0257 1 010 111 111 BRN LCLA6

257 0376 1 000 010 000 LCODO ROM

258 0377 ' 1 110 010 000 LERRZ ROM

GET Y FOR TEST
Y für Test nehmen

Y IS -NEGATIVE

Y ist negativ

TO ADVOID COILISION WITH RPAR.ROUTINE um Kolision mit Routine für rechte Klammer zu vermeiden

SWITCH TO ROM 7 J

auf ROM 7 schalten ΐ

PREPARE TRUNCTION
Abbrechen vorbereiten

TRUNCATE FRACTIONAL PART OF LABEL NUMBER Bruchteil der Etikettennummber abschneiden

STORE MASTER LABEL IN A-REG
Hauptetikett im Α-Register speichern

ho

co

cn

OO CO

CO

MAIN UNIT LISTING (ROM A-4) Haupteinheit (.ROM A-4)

LINE CURR BRAN OPERATION CODE ADDR ADDR BIT PATTERN

geilen laufende Abzweig-Betriebs-Kode Nr. Adresse Adresse Bit-Muster

2	0000	0	000	000	000	LEQL19	DUMMY
3	0001	0	000	000	C jO		DUMMY
4	0002	0	010	101	000		CXM
5	0003	0	111	101	010		X,CPIC
6	0004	0	010	101	000		CXM
7	0005	1	Oil	001	100	LXTY2	PTIl
8	0006 0126	0	101	Oil	on	BRN
9	0007	1	010	010	000	ROM 5

0010 0011

LEQLlO

O 001 Oil 000 LFLG5 LDCl

O 010 101 000 LFLG6 CXM

12	0012	0036	O	001	111	Oil	LINTE3	BRN
13	0013		1	000	101	110	W, BXC

LFLG3

PREPARE OP.CODE SET Setzen des OP.-Kode vorbereiten

SET OP.CODE FOR + INSTEAD OP-Kode setzen für + anstatt

RESTORE C AND M-REGISTERS C- und M-Register zurückstellen

PREPARE SYMBOL CODE LOAD Ladung des Symbolkodes vorbereiten

GO TO SUBTOTAL ROUTINE zur Zwischensummen-Routine gehen

GO TO START POINT OF THE EXPOrBLOCK zum Anfangspunkt des Exponentenblocks gehen

SET CONDITION NOT MET FLAG Kennzeichen für "Bedingung traf nicht zu" setzen

STORE UPDATED INT, FLG. VECTOR auf den neuesten Stand gebrachten internen Kennzeichen-Vektor speichern

SAVE DATA TEMPORARILY IN B-REG Daten zwischenzeitlich" im B-Register bewahren

0014 0046 0 010 Oil Oil

BRN

	15-	0015	0216	0	101	000	000	LCLAIp	IS2	LCLAIl
	16	0016	0054	0	οίο	001	000		XOR	LEQL8
	17	0017		1	001	000	000		ISl
	18	0020		0	111	111	000		TTC
	19	0021		1	000	111	Oil		BRN
ί ο	20	0022		0	010	110	Oil	LFQLC	BRN
co 00	21	0023	0077	0	000	Oil	000	LFLGl	LDCO	LADDRl
σ>
O	22	0024		0	010	101	000		CXM
8 6 2.
	23	0025	0	100	000	001		JSB
	24	0026	0	000	on	100	LFLG2	PRS
	25	0027	1	101	101	010		X, AM IA

0030 0026 O 001 Oil Oil

BRN

LFLG 2 GO TO COMMON PART WITH OTHER PRGM. FLG. ROUTINES

zum gemeinsamen Teil mit anderen Programm-Ke.nnzeichen-Routinen gehen

COMPARE WITH MASTER MASK
mit Hauptmaske vergleichen

RESULT OF COMPARISON INTO C-REG Ergebnis des Vergleichs ins C-Register

GO TO CHECK SYNTAX

zur Prüfung der Syntax gehen

RESET DIGIT INTERPRETATION CODE TO ZERO Zifferninterpretaions-Kode auf 0 zurückstellen

STORE UPDATED INT.FLG.VECTOR IN M-REG auf den neuesten Stand gebrachten internen Kennzeichen-Vektor im M-Register speichern

GET PROGRAM FLAG VECTOR
Programm-Kennzeichen-Vektor nehmen

POINTER DECREMENT
Hinweismarke erniedrigen

DECREMENT ENTERED DIGIT TO CHECK ITS VALUE

Eingegebene Ziffer erniedrigen um ihren f>

Wert zu prüfen ς

NO CARRY; CONTINUE IN POINTER ADJUSTMENT 5 kein Übertrag; fortfahren mit Hinweismarken Justierung

27 0031

1 000 101 110 LFLG7 W,BXC

28 0032 1 001 010

29 0033 0041 0 010 000 dll

30 0034 31 0035

32
33

34
35
36

0036 0037 0040 0041

0 001 Oil

1 Oil 110

1 001 100 100 LFLG3

0 010 001

0 010 010

0 110 100 010 LFLG8

0042 0045 0 010 010

37 0043 38 0044 39 0045'

40 0046 41 0047

0 000 Oil

1 001 000

YS9

BRN LFLG8

LDCl DTDS

RS9 W, BTC ROM P-, ZMC

BRN LFLG4

LDCO

SS9

1 Oil 110 000 LFLG4 DTDS

1 010 101 000 LFLG9 MTC RESTORE DATA IN B-REGi PRGM. FLG. VECTOR TO C-REG

Daten im B-Register zurückstellen; Programm-Kennzeichenvektor zum C-Register CHECK AUXILIARY FLAG

Hilfskennzeichen prüfen

GO TO PROGRAM FLAG INTERROGATION Zur Programm-Abfrage gehen

SET PROGRAMM FLAG
Programm-Kennzeichen setzen

STORE UPDATED PRGM.FLG. VECTOR auf den neuesten Stand gebrachten Programm-Kennzeichen-Vektor speichern

RESET AUXILIARY FLAG IF SET
Hilfskennzeichen zurückstellen falls gesetzt

RESTORE DATA IN C-REG

Daten im C-Register zurückstellen

GO TO SUPERVISOR LSUPB

zum ijberwachungsprogramm LSUPB gehen

INTERROGATE FLAG VALUE
Kennzeichenwert abfragen

ZERO; CONDITION NOT MET
O; Bedingung traf nicht zu

RESET INTERROGATED PROGRAM FLAG abgefragtes Programm-Kennzeichen zurückstellen

ONE; CONDITION MET; INDICATE THIS SITUATION 1; Bedingung traf zu; diese Situation anzeigen

STORE UPDATED PRGM. FLG. VECTOR auf den neuesten Strand gebrachten Programm-Kennzeichen-Vektor speichern

PREPARE INT. FLG. VECTOR

internen Kennzeichen-Vektor vorbereiten

CD CaJ OO

0 110 001

PT6 PREPARE PROGRAM JUMP CONDITION FLAG Kennzeichen für ProgrammsprungTBedingung vorber.

42 0050

1 001 010 100

43 0051 0010 0 000 100 Oil 44 0052

49
5o

0 000 Oil 000

45 0053 0011 0 000 100 111

46 0054

47 0055 0361 1 111 000 111 48 0056 0002 0 000 001 Oil

0057
0060

51 0061 0353 1 110 101 111 52 0062 0065 0 011 Oil 001 53 0063

54 0064

1.100 101 000

0 100 101 000

55 0065 0264 1 Oil 010 Oil

YS9	LPLG5
BRN
LDCO	LFLG6
BRN

0 Oil 010 100 LEQL8 YS3

BRN LEQL9

BRN LEQL19

0 100 010 000 LCLOK ROM 0 101 110 010 LTW06 WP,CMlC

BRN	LTWO 7
JSB	LCALl
DNR
CTS
BRN	LLDD 2

CHECK CONDITION
■Bedingung prüfen

NOT MET

Traf nicht zu

MET; SET CONDITION MET FLAG

Traf zu; Kennzeichen für Bedingung traf zu "setzen"

STORE UPDATED INT. FLG. VECTOR auf den neuesten Stand gebrachten internen Kennzeichen-Vektor speichern

IS OP. FLAG SET?

Ist OP-Kennzeichen gesetzt?

NO, NORMAL PATH
Nein, normaler Pfad

YES, "SUBTOTAL" PATH

Ja, "Zwischensummen"-Pfad

IS OP.CODE EQUAL TO 6?
Ist OP-Kode, gleich 6?

NO; CONTINUE IN THE TEST
Nein; Test fortsetzen

CALL D.S. AND GET DATA
D.S. rufen und Daten nehmen

RESTORE OLD DATA IN C-REG *

alte Daten im C-Register zurückstellen

COPY IT BACK TO STACK

zurück in den Stapel kopieren

GO TO STORE DATA

zum Daten speichern gehen

co co co

0 010 001 110 LCALl

1 OQl 110 000 1 Oil 010 100

59 0071 0371 1 111 100 111

56	0066
57	0067
58	0070

60 0072

61 0073

62 0074

63 0075

1 Oil 111 000 LCAL3

ι 900 101 110

1 Oil 100 100

0 110 010 100

64 0076 0125 0 101 010 111

65 0077 0365 1 111 010 111

66 0100 0 Oil 001 110 LADDRl

67 0101 0 111 101 110

68 0102 1 100 001 100

69 0103 1 111 Oil 000

70 0104 0 111 Oil 000

71 0105 1 001 110 000

72 0106 0072 0 Oil 101 Oil

73 0107 1 000 101 110 LYLE3

74 0110 0077 O 100 000 001

W, BTC

ATDS

YSIl

BPN LERP

DSTC

W,BXC

RSIl

YS6

BRN LRETl

BRN LCALO

W,ZTC

W,CPlC

PT12

LDC15

LDC 7

ATDS

BRN LCAL3

W, BXC

JSB LADDRl

ADDRESS INTO C-REG
Adresse ins C-Register

CALL D.S.
D.S. rufen

CHECK IF FLAG

prüfen, ob Kennzeichen

NO ,· TROUBLE; D.S. NOT FOUND Nein? Störung; D.S. nicht gefunden

READ D.S. INTO C-REG
D.S. ins C-Register lesen

SAVE DATA IN B-REG

Daten im B-Register bewahren

YES, O.K.

Ja, in Ordnung

IS THIS AN ACC ROUTINE?
Ist dies eine ACC-Routine?

NO, GO TO SUBROUTINE END
Nein, zur End-Subroutine gehen

YES, GO TO DATA EXCHANGE
Ja, zum Datenaustausch gehen

SAVE DATA TEMPORARILY IN B-REG Daten zwischenzeitlich im B-Register bewahren

GET PROGRAM FLAG VECTOR
Programm-Kennzeichenvektor nehmen

N)

CO

cn co co

CO

75 Olli

1 101 001 100

PT13

76 0112 0031 0 001 100 111 · BRN LPLG7

77 0113 0 101 110 010 LTW017 WP,CMlC

78 0114 0373 1 111 101 111

79 0115 0065 O 011.011 001

80 0116 0224 1 001 010 Oil

81 0117 O 111 101 010 LOODX

82 0120 0162 O 111 001 Oil

83 0121

84 0122

85 0123

86	0124
87	0125
88"	0126
89	0127
90	0130

0 110 101 000 LSAV9

1 110 101 110

0 100 101 000

1 110 101 .110 LSAV8

0 000 110 000 LRFTl

BRN LTWO18 JSB LCALl

BRN LP0W3

X,CPlC BRN LCODA

STA W, AXC CTS W₁AXC RETURN

1 Oil Oil 000 LFQLlO LDCIl 0 000 010 000 LFQL7 ROM O 101 110 010 LTW09 . WP,CMlC SET POINTER TO L.E.FLAG LOCATION Hinweismarke auf L.E.-Kennzeichenplatz setzen

IS OP.CODE EQUAL TO 17?
Ist OP.-Kode gleich 17?

NO; CONTINUE IN TEST
Nein; Test fortsetzen

CALL D.S.AND GET STORED DATA D.S. rufen und gespeicherte Daten nehmen

YES; G0(rO XY ROUTINE START Ja; zum Start der XY-Routine gehen

SET CURRENT OP. CODE TO ONE laufenden OP.-Kode auf 1 setzen GO TO EXECUTE .PREVIOUSLY KEYED OPERATION zur Ausführung der zuvor eingetasteten Operation gehen

OLD RESULT'INTO A-REG

altes Ergebnis ins A-Register

TEMPORARILY EXCHANGED
zwischenzeitlich ausgetauscht

COPIED BACK INTO STACK
zurück in den Stapel kopiert

DATA OUT OF D.S. OR STACK INTO A-REG Daten aus D.S. oder Stapel ins A-Register,

END OF THE SUBROUTINE.
Ende der Subroutine

IS OP. CODE EQUAL TO 9?
1st OP.-Kode gleich 9?

N) OJ cn co

CaJ

0131 0153 0 110 101

0132

94 95 96

97 98

99

100

101 102 103 104 105 106

0 110 000

0133 0065 0 Oil Oil 001 LRCM2 JSB

0134 0135 0136

0 010 001 110 LMUL3

0 Oil 001

O 010 101

0137 0260 1 Oil 000 101 LLDV2 0140 O 000 000 000 LDIV3

0141 0142

O 101 001

O 000 101

0143 0247 1 010 Oil

0144 O 101 110 010 LTW03

0145 0147 O 110 Oil

0146 0134 O 101 110 Oil

0147 0150 0222 1 001 001 Oil BRN LTWOlO NO CONTINUE TEST

Nein,. Test fortsetzen

SS6 YES, IT IS L X ROUTINE; SET L-FLAG

Ja, es ist L X-Routine; L-Kennzeichen
setzen

LCALl CALL D.S. TO GET STORED DATA

D.S. rufen um gespeicherte Daten zu
nehmen

RESTORE DATA IN C-REGISTER

Daten im C-Register zurückstellen

SET MULTIPLICATION FLAG
Multiplikationskennzeichen setzen

COMPLEMENT OF THE EXPONENT IN C-REG
Komplement des Exponenten im C-Register

W,BTC PT 3 X»ZMCC JSB LSAV2
NOP

X,AMCC W, ZTB BRN LDIVIl
WP, CMlC

WAIT FOR OTHERS
auf andere warten

Ergebnxsexponent berechnen
CALCULATE RESULT EXPONENT

PREPARE B-REG
B-Register vorbereiten

O 101 110 010 LTW04 WP,CMlC IS OP. CODE EQUAL TO 3?
Ist OP.-Kode gleich 3?

BRN LTWO4 NO ,'CONTINUE TEST

Nein; Test fortsetzen

BRN LMUL3 YES;GO TO MULTIPLICATION ROUTINE (X)

Ja; zur Multxplikationsroutine (X) gehen

IS OP. CODE EQUAL TO 4?
Ist OP.-Kode gleich 4?

BRN LTW05 NEIN; CONTINUE TEST

Nein; Test fortsetzen

CO J>· CO

107 0151

1 100 001 100 LRCV2 PT12

108 0152 0177 0 111 111 111 BRN LDIV9

109 0153 0 101 110 010 LTWOlO WP,CMlC

110 0154 0217 1 000 111

111 0155

K>' CD

114

0 110 000

112 0156 0065 0 Oil Oil 113 0157

1 100 001

0160 0177 O 111 111

BRN LTWOIl

SS6

JSB LCALl

PT12

BRN LDIV9

115 0161 0015 O 000 110 111 LCLAE BRN LCLAlO

116 0162 0 010 101 000 LCODA CXM

117 0163 118 0164

1 010 101

1 001 001

MTC

W, SRC YES; SET POINTER TO PROPER VALUE Ja; Hinweismarke auf richtigen Wert setzen

IS OP.CODE EQUAL TO 10?
Ist OP.-Kode gleich 10?

NO; CONTINUE TEST
Nein; Test fortsetzen

YES; IT IS L-ROUTINE, SET L-FLAG Ja; Es ist L-Routine, L-Kennzeichen setzen

CALL D.S. TO GET STORED DATA D.S. rufen, um gespeicherte Daten zu nehmen

SET PROPER POINTER VALUE FOR DIVISION

Richtigen Hinweismarkenwert für ' Division setzen

GO TO RESTORE DIVISOR IN C-REG Zurückstellung des Divisors im C-Register gehen

STORE. UPDATED INT.FLG.VECTOR IN M-REG auf den neuesten Stand gebrachten internen Kennzeichenvektor im M-Registar speichern

PREPARE NEW INT.FLG.VECTOR FOR TEST neuen internen Kennzeichenvektor für Test vorbereiten

OLD OP.CODE ALIGNMENT SHIFT Ausrichtungsverschiebung für alten OP.-Kode

CD CO CO

119 0165

120 0166

121 122

123 124 125 126 127 128

129 130 131 132 133

1 001 001

0 001 001

W, SRC

PTl

0167 0170

0 110 100 100 RS

0 101 110 010 LTWOO WP,CMlC

0171 0250 1 010 100 Oil BRN LTWOl

0172 0 010 001 110 LCLOH W,BTC

0173 0057 0 010 111

BRN

LCLOK

0174

0 101 110 010 LTW015 WP,CMlC

0175 0212 1 000 101 Oil 0176 0133 0 101 101

BRN LTWO16

BRN LRCM2

0177 0 010 001 110 LDIV9 W,BTC ⁽""

0200 0137 0 101 111 111 ' BRN LLDV2

0201 0013 0 000 101 111 LINTEA BRN LINTE3

0202 0107 0 100 Oil 111 LYLEA BRN LYLE3

0203 0 101 111 010 LSUM5 XS,CMlC

134 0204

0 101 111

XS,CMlC OLD OP. CODE ALIGNMENT SHIFT Ausrichtungsverschiebung für alten OP.-Kode

PREPARE OLD OP.CODE (TO BE EXECUTED) FOR TEST

alten (auszuführenden)OP.-Kode für Test vorbereiten

IS OP.CODE EQUAL TO O?
Ist OP.-Kode gleich O?

NO, CONTINUE TEST Nein, Test fortsetzen

RESTORE DATA IN C-REG

Daten im C-Register zurückstellen

GO TO COPY IT INTO STACK

zu deren Kopieren in den Stapel gehen

IS OP. CODE EQUAL TO 15?
Is~t OP.-Kode gleich 15?

NO; CONTINUE TEST
Nein; Test fortsetzen

GO TO COMMON PART OF ROUTINES zum gemeinsamen Teil der Routinen gehen

RESTORE RESULT EXPONENT IN C-REG Ergebnisexponent im C-Register zurückstellen

RESTORE RESULT EXPONENT IN C-REG Ergebnisexponent im C-Register zurückstellen

cn co co

CXJ KJ

135 0205

136 0206

1 Oil 101 010

1 101 Oil 110

137 0207 1 001 111 110

138 0210 0306 1 100 Oil Oil

139 0211 0305 1 100 010 111

140 0212

141 0213 0113 O 100 101 111 142 0214 0065 O Oil Oil 001 143 0215 0151 O 110 100 111

144 0216

145 0217

X, ZTA	LSUM6
	LSUM8
S ,AMCA
S ,AMI
BRN
BRN

O 101 110 010 LTW016 WP,CMlC

BRN LTWO17

JSB LCALl

BRN LRCV2

1 100 010 000 LCLAIl ROM O 101 110 010 LTWOIl WP,CMlC

146 0220 0362 1 111 001 Oil 147 0221 0362 1 1,11 001 Oil

BRN LTWO12

BRN LTWO12

148 0222

O 101 110 010 LTW05 WP,CMlC

149 0223 0060 O Oil 000 Oil 150 0224

1 100 101 000 LP0W3

BRN LTWO6

DNR CANCEL OFFSET INDICATOR
Versetzungsanzeiger löschen

CHECK SIGNS OF BOTH MANTISSAS Vorzeichen beider Mantissen prüfen

EQUAL? Gleich?

NO; GO TO SUBTRACTION
Nein; zur Subtraktion gehen

YES; GO TO ADDITION
Ja; zur Addition gehen

IS OP. CODE EQUAL TO 16?
Ist OP.-Kode gleich 16?

NO; CONTINUE TEST
Nein; Test fortsetzen

CALL D.S. TO GET STORED DATA D.S. rufen um gespeicherte Daten zu nehmei

GO TO COMMON PART OF ROUTINES zum gemeinsamen Teil der Routinen gehen

IS OP.CODE EQUAL TO 11?
Ist OP.-Kode gleich 11?

NO; CONTINUE IN TEST
Nein; im Test fortfahren

NO; CONTINUE IN TEST
Nein; im Test fortfahren

IS OP. CODE EQUAL TO 5?
Ist OP.-Kode gleich 5?

NO; CONTINUE IN TEST
Nein; Test fortsetzen

XY - ROUTINE START; PREPARE MANTISSA, EXPONENT

XY-Routinen-Start; Mantisse und Exponent vorbereiten

NJ co

cn co

CO

-P-CO

151	0225	1	000	101	110	W, BXC
152	0226	0	100	101	000	CTS

153 0227

co (J)

0 010 001 110

W ,BTC

154	0230	1	000	000	100	LXTYl	SS8
155	0231	0.	010	000	100		SS2
156	0232	1	100	001	100		PT 12
157	0233 0007	0	000	Oil	111	LPQOIl	BRN LXTY2
158	0234	0	100	001	110	LPQ012	W, SLA
159	0235	1	010	010	110		MS,SRB
160	0236	1	000	101	110		W, BXC
161	0237 0241	1	010	000	111	LPQ015	BRN LPQO16
162	0240	0	111	111	110	LPQ016	SyCPlC
163	0241	1	100	001	110		W,AMBA
164	0242 0240	1	010	000	Oil		BRN LPQ015
165	0243	i	110	001	110	LPQO13	W,APBA
166	0244	1	010	010	000	LSAVl	ROM 5
167	0245	1	100	001	100	PT12

168 0246 0261 1 Oil 000 111 BRN LSAV2

169 0247 1 010 010 000 LDIVIl ROM 5

170 0250

O 101 110 010 LTWOl WP,CMlC MANTISSA IN A,C,D-REG
Mantisse in A-, C-, D-Register

EXPONENT IS IN B, C-REG
Exponent ist im B-, C-Register

XY-ROUTINE EXECUTION START POINT Startpunkt für Ausführung der , XY-Routine

SET POINTER TO PROPER VALUE Hinweismarke auf richtigen Wert setzen

GO TO LPQO23
nach LPQO23 gehen

SET PROPER POINTER VALUE
richtigen Hinweismarkenwert setzen

GO TO LDIV21
nach LDIV21 gehen

IS OP. CODE EQUAL TO 1?
Ist OP.-Kode gleich 1?

CO CO CO -C-LO

171 0251 0253 1 010 101 172 0252 0357 1 110 111

BRN LTWO2

173 0253 174 0254 0144 0 110 010 Oil 175 0255 0320 1 101 000 Oil 176 0256

ο oo σ> ro

177 0257- 0347 1 110 011 178 0260 0356 1 110 111 179 0261

0 110 010 100 LSAV2

180 0262 0121 0 101 000

0 000 110

181	0263
182	0264,
1.83	0265
184	0266
185	0267
186	0270
187	0271

0023

BRN

LADD 3

0 101 110 010 LTW02 WP,CMlC

BRN LTWO3

BRN ' LSUR3

0 101 110 010 LTW013 WP,CMlC

BRN LTW014

BRN

YS6

LRCA2

BRN LSAV9

RETURN

0 100 010 000 LLDD2 ROM

0	001	001	111	LFLAG	BRN
0	100	010	000	LCLO 4	ROM 2
0	100	010	000	LCLO 5	ROM 2
0	111	100	010	LDIV14	P, CP IC.
1	100	010	110	LDIVl5	MS,AMBA

LFLGl

NO; CONTINUE TEST
Nein; Test fortsetzen

YES; GO TO ADDITION ROUTINE Ja; zur Additionsroutine gehen

IS OP. CODE EQUAL TO 2?
1st OP.-Kode gleich 2?

NO; CONTINUE TEST
Nein; Test fortsetzen

YES;'GO TO SUBTRACTION ROUTINE Ja; zur Subtraktionsroutine gehen

IS OP. CODE EQUAL TO 13?
1st OP.-Kode gleich 13?

NO; CONTINUE TEST
Nein; Test fortsetzen

GO TO CALL DATA FROM,D.S.
zum Datenruf von D.S. gehen

IS THIS AN ACC ROUTINE?
Ist dies eine ACC-Routine?

NO, GO TO GET OLD RESULT

Nein,· gehen, um altes Resultat zu nehmen

YES, DO NOTHING, DATA IS READY Ja, nichts tun, Daten sind fertig

GO TO COMMON STORE ROUTINE zur gemeinsamen Speicherroutine gehen

CO CO OJ

	188	0272	0270 1	011	100	011	LDIVl6	BRN LDIV14
	189	0273	1	110	010	110		MS,APRA
	190	0274	0	100	010	110		MS,SLA
	191	0275	0	000	011	100	LTNMl2	PRS
	192	0276	0	000	101	100		' YPO
	193	0277	0271 1	011	100	111		BRN LDIV15
	194	0300	0	110	001	110	LFRRR	W,CTA
	195	0301	0	010	001	010		X, BTC
	196	0302	.0313 1	100	101	111		BRN LADD15
	197	0323	Ό.	100-	101	000		CTS
*·»							LSUM8
O (O	198	0304	0	000	010	000		ROM O
co							LSUM6
κ>	199	0305	1	010	010	000		ROM 5
■*»< ο
CO CD	200	0306	• ι	000	000	110	M, AMB
Ν>

0307 0312 1 100 101 Oil 0310

203	0311
204	0312
205	0313

0 011 111 110

1 100 101 110

BRN

S, ZNCC

W, AXB

1 100 001.110 LSUM7 W,AMBA

1 010 010 000 LADD15 ROM

STORE IT ALSO IN STACK
auch im Stapel speichern

CALLERRORROUTINE
Pehlerroutine rufen

GO TO LMPY 26 AND THEN TO NORMALIZATION ^ nach LMPY 26 gehen und dann zur \J1 Normalisierung Jp

CHECK WHICH MANTISSA IS BIGGER prüfen welche Mantisse größer ist

A-REG HAS BIGGER MANTISSA; GO TO SUBTRACTION

Α-Register hat größere Mantisse; zur Subtraktion gehen

B-REG HAS BIGGER MANTISSA; CHANGE RESULT SIGN.

B-Register hat größere Mantisse; Vorzeichen des Ergebnisses wechseln

INTERCHANGE A AND B-REGISTERr A- und B-Register austauschen

PERFORM SUBTRACTION
Subtraktion ausführen

GO TO NORMALIZATION ROUTINE zur Normalisie_{rungsroutine gehen}

CD CO CO 4> CO

0314

0315 0130

0316

0317 0065

0320

0321

cd 212 0322 0244
co

*° 213 0323

0324

0325

0326

03.27

0330

0 101 110 010 0 101 100 011 0 110 000 100

0 011 011 001

0 010 001 110 O Oil 111 110

1 111 111 OlO

O 111 111 010

O 111 111 OlO

0 001 001 010

LTW08 WP,CMlC

BRN _% LTWO9 SS6

LRCS2 JSB

LSUB3 W,BTC S,ZNCC

XS,APIA

XS,CPIC

XS,CPlC

X, AMC

1 010 010 101 LSUMl JSB LSAVl

0 000 101 110 W, ZTB

1 111 111 010 XS,APIA

IS OP CODE EQUAL TO 8 ?

Ist OP-Kode gleich 8?

NO: CONTINUE TEST

Nein, Test fortsetzen YES: IT IS L-ROUTINE: SET L--FLAG Ja: Es ist L-Routine ;L^-Kennzeichen setzen

CALL D.S. AND GET STORED DATA D.S. rufen und gespeicherte Daten nehmen

RESTORE DATA IN C-REGISTER Daten in C-Register zurückstellen COMPLEMENT OF THE "SIGN OF DATA IN C-REG

Komplement des. Vorzeichens der Daten im C-Register

GET PREVIOUS RESULT

Vorheriges Ergebnis nehmen PREPARE B-REGISTER

B-Register vorbereiten PREPARE SIGN OF EXPONENT IN A-REG FOR TEST

Vorzeichen des Exponenten im A-Register für Test vorbereiten PREPARE SIGN OF EXPONENT IN A-REG FOR TEST

Vorzeichen des Exponenten in A-Register für Test vorbereiten PREPARE SIGN OF EXPONENT IN C-REG FOR TEST ' ■ ' .

Vorzeichen des Exponenten in C-Register für Test vorbereiten PREPARE SIGN OF EXPONENT IN C-REG FOR TEST

Vorzeichen des Exponenten im C-Register für Test vorbereiten CHECK WHICH EXPONENT IS BIGGER Prüfen welcher Exponent größer ist

OO

cn co co

CO

	2X9	0331 0333	X	XOX	XOX	1X1	LSUM2	BRN
	220	0332	X	XXO	XOX	1X0		W, AXC
	221	0333	X	XXO	XOO	XXO		M, AXC
	222	0334	0	XlO	XOO	XXO	LSUM3	M, ZMC
	223 224	0335 Q337 0336	X X	XOX XXO	XXX XOX	XIl 110	LSUM4.	BRN W,AXC
	225	0337	X	000	XOO	110		M, BXC
409826;	226 227	0340 0341 0203	0 X	00Ϊ 000	0OX 0OX	ΟΙΟ 111		X, AMC BRN
ο OD
O	228	0342	X	oxo	0OX	110		W, SRB
	229	0343	X	XlX	XOX	010	X,APIA
	230	0344	0	000	0OX	110	W, ZMB

231 0345 0203 232 0346 0340

•Χ 000 001

1 110 QOO Oil

BRN

BRN LSUM2 BIGGER IS IN A-REGISTER

Größerer ist im Α-Register

GET DATA WITH BIGGER EXPONENT INTO

A-REG

Daten mit größeren Exponent ins

Α-Register nehmen

PREPARE MANTISSA VALUE CHECK

Mantissenwert-Prüfung vorbereiten

CHECK IF MANTISSA IS ZERO

Prüfen, ob Mantisse Null ist

LSUM3 YES Ja

NO; PUT IT BACK IN TO A-REG . Nein, zurück ins Α-Register geben PREPARE MANTISSA ALIGNMENT IN B-REG

Mantissenausrichtung im B-Register vorbereiten "^;

CHECK IF OFFSET IS ZERO Prüfen, ob Versetzung Null ist

LSUM5 YES, MANTISSAS ARE ALIGNED FOR SUMMATION

Ja, Mantissen sind ausgerichtet für Summierung
NO; ALIGNMENT SHIFT
Nein; Ausrichtung verschieben DECREMENT OFFSET
Versetzung erniedrigen CHECK IF MANTISSA AFTER SHIFT IS ZERO

Prüfen, ob Mantisse nachVerschiebung Null ist

LSUM5 YES, GO DIRECTLY TO RESULT CALCULATION

Ja, direkt zur Ergebnisberechnung gehen

LSUM4 NO, CONTINUE OFFSET ALIGNMENT

Nein, Versetzungsausrichtung fortsetzen

CJ) OO GO

	Seite	102	0174
	233	0347
	234	0350	0317
	235	0351
	236	0352	0314
	237	0353
	238	0354	0065
	239	0355
O co	240	0256	0322
00 κ> CD	241	0257
Q co	242	0360
CD	243	0361	0256
	244	0362 .	0356
	245	0363
	246	0364
	297	0365
	248	0366
	249	0367

0 101 110 010 LTW014 WP,CMlC

0 111 110 Oil BRN LTW015

0 110 100 100 RS6

1 100 111 111

0 101 110 010 LTW07

1 100 110 Oil 0 110 000 100

0 011 oll 001 LRCA2

0 010 001 110 LADD3

1 101 001 011

0 010 010 Ö00 LEQL9

0 101 110 010 LTWOl2

1 010 111 Oil 1 110 111 Oil

1 100 101 000 LCALO

BRN LRCS2

WP,CMlC

BRN LTWO8

SS6

JSB

0 100 101 000 CTS

1 000 101 110 LSAV7 W,BXC.

W,BTC

BRN LSUMl

ROM

WP,CMlC

BRN LTWOl3

BRN · LRC A2

DNR IS OP CODE EQUAL. TO Ist OP-Kode gleich 14?

NO; CONTINUE TEST Nein; Test fortsetzen YES; IT IS R-ROUTINE; RESET L-PLAG Ja; Es ist R~Routine;L-Kennzeichen zurückstellen

GQ TO CALL DATA FROM D.S.

Zum Datenruf von D.S. gehen IS OP CODE EQUAL TO 7?

Ist·OP-Kode gleich 7?

NO; CONTINUE TEST Nein; Test fortsetzen YES; IT IS L ROUTINE; SET L-FLAG Ja, Es istL-Routine; L-Kennzeichen setzen

CALL D.S. AND GET STORED DATA D.S. rufen und gespeicherte Daten nehmen

RESTORE DATA IN C-REGISTER Daten in C-Register zurückstellen GO TO COMMON SUMMATION BLOCK Zum gemeinsamen Summationsblock gehen· SWITCH TO ROM 1 Zum -ROM 1 schälten IS OP CODE EQUAL TOl2? Ist OP-Kode gleich 12? NO; CONTINUE IN TEST Nein; im Test fortfahren GO TO CALL DATA FROM D.S. Zum Datenruf yonD.S. gehen RESTORE PREVIOUS RESULT IN C-REG Vorheriges Ergebnis ins C-Register zurückstellen
COPY IT BACK TO STACK Zurück in den Stapel kopieren OLD RESULT TO B, DATA OUT OF D.S. TO C-REG

Altes Ergebnis nach B, Daten aus D.S. zum C-Register

250 0370

251 0371

252 0372

253 0373

254 0374

255 0375

0124

O3o3
0065

0376
0377

0172
0117

0 101 010 Oil

1 100 101 000

1 100 001 111 0 011 011 001

1 100 101 000 1 Oil 110 000

0 111 101 Oil 0 100 111 111

LFRR

LTWOlB

LCODD

BRN DNR

BRN JSB

DNR DTDS

BRN BRN

LSAV8

LERRR LCALl

LCLOH LCODX

MAIN UNIT LISTING (ROM At5) Haupteinheit Zeilen laufende Abzweig- Betriebs-

Nr.	Adresse	Adressse	0	Code	Θ10	000	LERR21	ROM 3	LLN 2 6
			1		111	110	LLN24	S, AXB
3	0000		1	Bit-Muster	111	110		S,APIA	LMPY21
4	0001		1	110	010	110		MS, SRC.	LSBL2
5	0002		o.	100	010	010		WP,SLA
6	0003		1O	111	001	011		BRN	LEXP21
7	0004		0	001	101	000	LXTy22	STA
8	0005	0022	1	100	011	001 "		JSB
9	0006		1	001	001	111	LSBLl	BRN	LERR23
10	0007	0245	1	110	010	100	LAUXl	YS 8
11	0010	0263	0	010	001	011		BRN
12	0011		1	011	101	110	LLN22	W, ZTA
13	0012	0102	1	000	000	110		M,AMCA
14	0013		1	100	001	011		BRN
15	0014		1	011	001	lio		W,SRA
16	0015	0262	0	101	111	110		S,CMlC
17	0016		011
18	0017		011
	101

RESTORE OLD DATA (ORIGINAL DATA) Alte Daten (original Daten)zurückstellen

CALL D.S. AND GET "NEW" DATA INTO B-REG

D.S. rufen und "neue" Daten ins B-Register nehmen

PREPARE OLD DATA

alte Daten vorbereiten

STORE OLD¹¹DATA¹¹IN D. S'.

"Alte" Daten in D.S. speichern

GO TO SET OP CODE

Zum Aufsetzen des OP-Kode gehen

GO TO SET BUSY LIGHT
Betriebsanzeigenlampe"setzen

MANTISSA IS ZERO
Mantisse ist Null

OO CO CO

	19	0020	0000	0	000	000	Oil	110	LLN 2 5	BRN	LERR21
	20	Q021		0-	111	111	110	010	LLN 2 6	S,CPlC
	21	0022		0	100	101	HO	111		W ,ATB
	22	0023	0225	1	001	Oil	001	HO		JSB	LECA22
	23	0024		1	101	100	010	no		P,AMlA
	24	0025	0021	0	001	000	in	IQQ		BRN	LLN 2 5
	25	0026		1	100	110	010	HO		WP,AXB
	26	0027		1	110	Oil	110			S,APBA
	27	0030	0001	0	000	000	111		BRN	LLN 2 4
	28	0031		0	111	Oo 1	100		PT7
	29	0032 .	0154	0	110	110	101		JSB	LPQO23
	30	0033		1	000	001	100		PT8
■τ	31	0034	0234	1	001	110	101		JSB	LPMU22
ο	32	0035		1	001	Oo 1	100		PT 9
co	33	0036	0233	r-t	QoI	UO	001		JSB	LPMU21
UA/	34	0037	0375	1	111	111	Ool		JSB	LLNCD3
CD	35	0040		I	010	001	100		PTlO
	36	0041	0233	1	001	HO	001		JSB	LPMU21
O	37	0042	0174	0	111	110	101		JSB	LLNCD2
00	38	0043		1	Oil	001	IQO		PTIl
σ>	39	0044	0233	1	001	HO	QOl		JSB	LPMU21
	40 ,	0045	0336	1	101	111	101		JSB	LLNCD 1
	41	0046	0233	1	001	110	001		JSB	LPMU21
	42	0047	0270	1	Oil	100	101		JSB	LLNC 2
	43	0050	0233	1	001	HO	001		JSB	LPMU21
	44	0051	. 0365	1	111	OH	OQl		JSB	LLNClO
	45	0052		1	110	1011110		W, AXC
	46	0053		0	101	001		W,AMCC
	47	0054		0	000	OH		XS,ZMB
	48'	0055	0057	0	010	111		BRN	LLN 2 7
	49	0056		0	101	001	LLN 2 7	W,AMCC
	50	0057		1	100	101	LLN28	W, AXB
	51	0060		0	000	on		PRS
	52	0061		0	100	001	W, SLA

MANTISSA IS NEGATIVE
Mantisse ist negativ

ro

co

CD CO CO

CO

U

CTi

υ

ο υ

υ

Γ-

ι-Ι

CM

r-H

O

CM

i-l

Hl

i-i

CM

iH

r-f

Q

O

I—{

CN

r-H

cn

1—I

i-l

CM

co

X

CM

ft

CM

CM

CM

CN

CM

i-l

CN

U

CM

υ

CN

P

CM

P

CM

CM

O

CM

υ

X

X

J3

U

X

P3

O

W

Ϊ3

O

O

U

O

O

O

O

σ

!2

η!

ft

E-f

Eh

ft

EH

!3

Pi

σ

Hl

σ

σ

σ

σ

ft

a

OJ

Hl

Oi

Hl

ft

|_j

ft

η!

ft

Hl

ft

Hl

ft

ft

Hl

i_l

(_5

i_l

l_j

η!

Hl

η!

Hi

Hl

Hl

„ , .. cqcTvSinapQcQiaeQPQPQ^HeQcQ

ft B - ^OJ »XEHCQiQPSCOPjCQCQPiCQCQCQEHCQCQ XPQiSCQCQg ftbXfflXfflbbnbbbftbb

ΐτ> UO tsi cn X X

^CQPQcncQCQooCQCQCQvD ^rncq«; EHCQCQEHCQCQEHCQCQCQEHftEH - -ftioOftioOft^hjioftiSftlSiS:

CM

i-H CM ft

l-^O<-^>-HOOΉ'-^OO"-^OO'-^<-^O'-^OQ■-^irH ΟΟΟι-ηΟ'ΉΟΟΉ'-Η'-Η'-Η'-Η'-Η'-ηΉ'-ηήΟΟΟ

ι-ΗθΉΉ>-Η ι-ίΟΟΟΟΟΟΟΟΟΟ'-'^|-*Ο'-<

■-H

i-lr-lOO'-t'Hi-iiHO'-tO'-l'-l'-lO'-H'-iO'-f'-liH O ft »-· •"Η »"Η ■-Ηι-ΗΟΟΟΟΟ^Η'-ΗΟ'-ΗΉ'-Ι'-ΗΟ

iHrHi-HOOOOO

O^-O O O O >-h O ή <-t

^l-^!'-t'-^O■-H'-^'-^'-t■-^'-^'-^'-^O'-^'-fl—ι ΟΟΟΟΟΟΟΟΟ

O

O

O

VD

<*

in

VD

CM

in

m

O

CM

VD

CM

r~

CM

in

CM

CM

CN

cn

O

CM

vo

CM

VO

in

f^

cn

cn

cn

i-t

cn

cn

cn

m

O

O

O

O

O

cn

CM

O

cn

cn

CM

CM

cn

CM

O

CM

cn

CM

CM

CM

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

"-t O O O O O O O O O

ooooooooo

Q)
-P
•H

r~r-C~~r--OOOOOOOO¹-H'-H'-l'-H'-H¹-H'-t'-HCMCMCMCMCMtNCM OOOO'-H'-H'Hi-Hi-lr-li-lrHi-Hi-Hi-ti-ii-Hr-ri-li-li-ii-li-li—li-lr-)iH

ooooooooooooooooooooooooooo

409 826/0

CS

PS CM H

CM

W PS PM

CN

W PS

ro CM W Pi PM

σ»

CM

H PS PM

CM

W PS P

ΟΟΟΟ

HOHHHrIHH OhOOOOh ή

cn	pji	U	U U	CO	-	(< U	P5	cn
CM			!*! S	CM		PQ U	SS	CN
Pi	sT	tS3	«. ft.	pi			GO	8
PM	in	CM	vo	PM		SEE	CM	CM
M1	CM		CM	M			PS	O
	PS		H PS				CM	H
	PM		Pm		CQ		O	H
tr*	o		OO				H
BRl·	H		-H H	BRI	£	O O	H
	H	H	O H			H H
		O			H H
				O
H			H	H
O		O	H

CO CM
O

PM

PM

CM O

PM

Cm

r^ 00

CM (N

OO

σ σ

Pm PM

UU

PS PS

rr vo

CN CM

OS

οδ

PM !S

OOOhoOhOOhOOO hhOhOhhOOhhhÖ

HHi-H OOHHOHHHHH

HhhOHOhOhOO OhOhhhQOhOOhh ΟΟηΟΟΟΟ OOhhhOOhOhOOh OhOOOhhOhOOOO

OOOhhhOOhOOhhhhOOOOOhhO hhOhOhhOhhhho

HOhOhOO O'OhOOOhhhhhOOhhO hOhhOhh. h. OhOOh

hOOh-H OhhhhhhhoOhhhhh O'OO OhOhhhhhOhOOO

OhOOhhhhOhOOOhOhOOhhOhh OOOOOOOOOOhhO

VO	VO	CM	iH	^*	in
H	CO	O	co	CO	H
CM	H	co	H	H	O
O	O	O	O	O

vo
vo

in vo

ooooooooooooooooooooooo ooooooooooooo

-P OHCNrO'tfinvor^OOCriOOOOOQOOOOHHHOHHHHHHHfMCMCMCNCNCM

409826/0862

	126	0173	0224	1	001	01 0	011	LLNCD2	BRN	P,ΑΡΙΑ	LRTN21
	127	0174		0	000	110	000	LLNC 6	RETURN	W, ATB
	128	0175		0	111	001	100		ΡΤ7	S,CMlC
	129	0176		0	011	011	000		LDC3	BRN
	130	0177		0	011	011	000	LLNC 7	LDC 3	WP,SRA
	131	0200		0	000	011	000		LDCo ■	W, AXC
	132	0201		1	000	011	000		LDC 8	MS,SLA.
	133	0202		0	101	011	000		LDC 5	W, AXC
	134	0203		0	000	011	000		LDCO	S,AMlA
	135	0204		1	001	011	00ο	LDC 9	BRN
■Ρ- '	136	0205	0352	1	110	101	011	BRN	W, AXB	LLNC 9
σ co	137	0206	0225	1	001	011	001	LEXP29JSB	P,ΑΡΙΑ	LECA22
OO K)	138	0207		1	111	100	010		JSB
CD	139	0210		0	100	101	110	LEXP22	ROM 2
O	140	0211		0	101	111	110
OO σ>	141	0212	0206 '	1	000	OH	011		LEXP29
ΙΌ	142	. 0213		1	011	010	010
	143	0214		1	110	101	110		-
	144	0215		0	100	010	110
	145	0216		1	110	101	110	LEXP23
	146	0217		1	101	111	110
	147	0220	0210	1	000	100	011		LEXP22
	148	0221		1	100	101	110
	149	0222'		1	111	100	010
	150	0223	0313	1	100	110	001		LNRM21
	151	0224		0	100	010	000	LRNT21

CD CO CO

END OF NORMALIZATION, GO·TO OVFL TEST Ende der Normalisierung, zum OVFL
Test gehen

X!

•Η CP

CU

α σ

Cn

ο *ι

CN

CO

co

CQ

^f ro

CN CM

g I

cn cn

λ! ο <

CQ ph cj a cj

cn S χ co χ

55 i< U .53 <! " rfJ

PS - *■ Pi - CO

CQ !S CO CQ !2 S !S

ro

CM

Cn

ro

U U U U

- - 05

PQ Cn X co PQ

pH CN

CN CM U U

CM O

Cn

CN

Cn

CM CN

Cn

co ^*

CN CN

O D

g S

cn cn

pH CN pH

CN CN CM

Cn Cn H

O O ή

pH pH pH

O pH^: Ή

O pH O

i-H pH

O O

O O O O

pH pH O O

pH pH O O

O O

O O

8 8

O O

O O pH O pH pH pH pH pH pH pH O pH pH O O O pH O O O t-l pH pH pH O pH pH pH pH pH pH pH O pH

pHpHOpHpHpHpHOpHOpHpHpHpH

OOOOpHpHOphOphOOphO OphOOpHpHphOpHphOOOph

pH O O θ pH pH pH O Ή pH' O O pH O O O Ή pH O pH O O pH pH pH O pH pH pH pH O pH pH pH O Ή pH O

pH pH pH pH O pH t-| O* pH O O O O

in

CN CN

	ro	in	ro
O	CN	in	in
	O	pH	CM
CM		O	O
O

in io r* O ρ-» cm ro

cn cn cn ro ro ro ro

CN CN CM CN CN CN CN

O OO O OO O

CMCNCMCMCMCNCMCMCMCNCMCNCNCN.

oooooooooooooo

cm ro ** in vo r» ao in in in in in in in 409826/0 8 62

	Seite	106	0305	0	010	111	110	LDIV22	S,ZMCC
	173	0252		1	100	100	110		M, AXB
	174	0253	0266	1	Oil	101	110		W ,ZTA
	175	0254		1	100	101	100		YP12
	176	0255		1	100	010	111		' BRN LMPY27
	177	0256		0	001	100	110		M,CMl
	178	0257	0011	-1	Oil	Oil	Oil	LERR22	BRN LDIV23
	179	0260		1	110	010	000	LERR23	RQM 7
	180	0261		0	110	010	000	LSBL2 LXTY21	• ROM 3
	181	0262		1 0	010 110	100 001	000 110		SBL W, CTA
409826,	182 183	0263 0264		0	000	100	111
O	Γ84	0265						LDTV23	BRN LAUX1
OO σ>				1	000	110	010		WP,BXC
	,185	0266		1	110	100	110		M ,AXC
	186	.0267		1	000	010	000	LLNC2.	ROM 4
	187	0270		1	000	100	100		RS8
	188	0271		0	110	Oil	QOO		LDC 6
	189	0272		1	001	Oil	000		LDC 9
	190	0273	0	Oil	Oil	000		LDC 3
	191	0274	0	001	Oil	000		LDCl
	192	0275	0	100	Oil	000		LDC 4
	193	0276

ZERO DIVISOR DETECTED <C> =0

L NOT 3

O-Divisor festgestellt

SET BUSY LIGHT
Betriebsanzeigenlampe setzen

EXPO BLOCK EXECUTION STARTING POIKT Startpunkt für Ausführung des
Exponentenblocks

GO TO LDIVl5
Zum LDIVl5 gehen

OJ

cn

VW

OJ CO

OO CJ Ϊ3

in

CN

W PS ft

VD CN

ft

CN

ft CN

rf

ro CN

13 rf

CJ U £

Q Q DS

rf rf PQ

ft

CQ

CQ £:

Pi ro

S CO CO rH

Pi - 1-3 ft

PQ & ft X

CJ

rH «I

ft Eh cn

O N rH

PQ X CO PQ

NI

< S3

* DS

ft CQ

■Η

S
co υ

Pi CQ

U CQ CQ

Eh Eh ft

N rij rtj ■

12 Χ

CN

Pi

VO Γ-

CN CN

X X

kI rf

oo

CN

ft

S rf

CN OO
CN

CN

S Pi

O O rH O O Ή O O O

rH rH rH O ■Η rH rH O >-H O O O ή

O -ι rH rH

O

O

rH rH

O O -t O O ή

ο -ι ο

-HOO

rH

O O

Ή O

O

rH

O O O O

rH rH

rH rH O "-H

Ή Ο Ή Ο

rH rH O r-1

O Ή Ο Ή

O O O Ή

rH rH rH

O O Ή

O O O O

rH rH rH rH rH
O O Ή O rH

ή O O O

O O rH rH

O O O O O O

O O
O

O O

O O

O O O

rH rH rH rH

O

-H

O O

O O -H

O ^

VD

ro O

O ro O

in O ro O VD
CN

oo
O

oo O

rOHNootfor OHCNootfinvorOrHCNootfinvoro

r^OOOOOOOOf-lrHiHiHfHrHrHrHCNCNCNCNCNCNCNCNrO cNrororooocororooooororo ro' rorooooororooooooooororooo OOOOOOOOOOOOOOOOOOOOOOOOOO

OOOOOOOOOO
CNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCN

4 0 9 8 2 6/0862

Yfe» t>.

cm

CN

U rf! GQ
XB B' cn

Ο η h QDQ

co ο m in- oo
U U O L) O 2
Q Q Q Q Q Oi

O ffl

ω oi χ m

in

CM

r-

CM

Oi

Q
U

CJ

CM

Pi

111

OTT

OTT

OTT

100

TTO

100

000

000

000

000

000

000

000

000

000

000

000

TTO

0OT

TOO

TOT

TOO

TOT

TOO

TTO

TTO

TTO

TTO

oll

TTO

TTO

TTO

TTO

TTO

.-4 i-l O

100

OTT

OTT

000

100

111

TOO

TTO

TOO

000

TOO

111

TOO

000

000

TOT

TOT

TTO

1-i

i-i

O

O

i-l

O

O

O

O

O

O

i-i

i-t

O

O

O

O

0307

0172

O O O O

^ O O

in
ro
ro
O

O O

«Η O O O O <-H

O ·-· O «-ι i-t O

O O

CO i-l

a Oo

cocororooororo^^^^^^r^^^rinininininin in in vo rnrococncncocooocnrncncn(viOinrocococococnrnroc»iro OOOOOOOOOOOOO^OOOOOOOOOOO

Q) O ή cn co ^J* in ^o r— oo er* O ¹^ cn ή co

CMCNCNCMCMCNCMCMCMCNCOrOCO (I)CO

in

r- oo ca O

CM CO

409826/0862

	244	0361	0362
t	245	0362	0147
	246	0363
	247	0364
	248	0365
	249	0366
	250	0367
	251	0370
	252	0371	0201
t^	253	0372
σ co	254	0373	0176
co ro CD	255 256	0374 0375
O	257	0376
862	258 Seite	0377 108

0 111 111 OJUO XS,CPlC

1 Oil 001 110 LPRE22 W,SRA

0 111 101 010 X,CPlC

1 111 001 Oil BRN LPRE22 0 110 011 111 BRN LPRE26

0 Oil 001 110 LLNClO W,ZTC

1 100 001 loo _t PT12 0 010 Oil 000 LDC2 0 Oil Oil 000 LDC3 0 000 Oil 000 LDCO O 010 Oil 000 LDC2

0 101 Oil 000 LDC5

1 000 000 111 BRN LLNC7 O 101 001 100 LLNCQ3 PT5

O 111 111 Oil BRN LLNC6

MAIN UNIT LISTING (ROM A-6)
Haupteinheit

Zeilen laufende Abzweig- Betriebs-Nr. Adresse Adresse Kode

Bit-Muster

0000

0001

0002

O 000 010 000 LLLL6

1 000 000 100 LLNl

1 001 000 100 LEXPl

ROM O

SS8

SS9

GO TO ROM O IN "RON GROUP SWITCH MODE"

Zum RoM O gehen in "ROM-Gruppe-Schalt-Betrieb"

NOT. LOG. ROUTINE EXECUTION START Ausführungsstart der NOT.LOG-Routine

EXPONENTIAL ROUTINE EXECUTION START Ausführungsstart für exponential Routine

00Q3 0004 0005 0006 ooo7

0010 0011

0012

0013

0014 · 0015 *y 0ol6

0017

0024 0101

0133 QQQ7 0112

0 010 000

1 Oil 000

0 110 100

1 100 001

1 010 010 QQO

SS2

SSIl

RS

PTl 2

RQM

1 OQl OQQ 100 LPREP SS9

Q	QOl	010	Oil	LLQGA	BRN	LPREPl
Q	100	000	111	LLNA	BRN	LLQGB
0	IQl	101	HI	BRN	LLNB

0 QOO IQQ QQl LOXXA JSB LPREP

Q IQO 101 QU

BRN' LOXXB

0 IQQ IQQ QQO LFXCN RMGRC

1 110 QlQ QQQ LFRRR ROM SET COMMON FLAG OF EXP. ROUTINES Gemeinsames Kennzeichen der exponential Routine setzen

SET SINGLE OPERAND OP. FLAG OP-Kennzeichen für einzelnen Operanden setzen

RESET DEC. POINT FLAG IF SET Dezimalpunkt-Kennzeichen zurückstellen falls gesetzt

SET POINTER TO PROPER VALUE Hinweismarke auf richtigen Wert s setzen

GO TO START POINT OF THE EXPO BLOCK

Zum Staxtpunkt des Exponential Blocks gehen

SET SHIFT KEY ROUTINE AUX. FLAG Hilfskennzeichen für Tastenumschaltr routine setzen

ROUTINE START
Routinenstart

ROUTINE START
Routinenstart

PREPARE DATA FOR PRINT
Daten für Druck vorbereiten

CONTINUE
fortfahren

EXCH () ROUTINE BEGINNING POINT Anfangspunkt für ()-Austauschroutine

GO TO ERROR MESSAGE ROUTINE Zur Fehlernachricht Routine gehen

0020

0o21

0055

	21	0022
	22	0023
	23	0024
	24	0025
•Ρ- σ	25	0026
CO
CO ro	26	0027
CD
S.	27	0030
CO
	28	0031
ro
	29η	0032
	30	0033
	31	0034
	32	0035

0067

0106

0 010 110 111

1 110 010 000 LGTR

0 Oil Oil 111 LTABl

0 100 011 011

1 110 010 000
0 000 000 000
0 011 111 110

0 000 000 000

0 100 011 011

LPREPl

LCHSl

BRN ' LGTl

ROM

BRN BRN

ROM DUMMY S,ZNCC

NOP

BRN

LTAB 2

LDONT

0036

1 110 110 101 LALP8 JSB

. 0 100 Oil oil BRN

0 100 Oil Oil - BRN

· 0 100 Oil Oil BRN

O 010 101 000 LT0C3 CXM

O 100 Oil Oil BRN

LDONT LPRINT

LDONT LDONT LDONT

LDONT

GRAND TOTAL Endsumme

AFTER RETURN FROM DATA ADJUSTMENT LOAD SYMBOL CODES Nach Rückkehr von Datenjustierung Symbolkoden laden

CALL TABLE FUNCTION Tabellenfunktion rufen

DO NOTHING Nichts tun

CHANGE SIGN OF MANTISSA Vorzeichen der Mantisse wechseln

TO ELIMINATE POSSIBLE CARRY um möglichen übertrag zu eliminier«!

GO TO SUPERVISOR Zum überwachungsprogramm gehen

PRINT ALPHA MESS.RESTORE DATA Alpha-Nachricht drucken, Daten zurückstellen

DO NOTHING Nichts tun

DO NOTHING Nichts tun

DO NOTHING Nichts tun

STORE UPDATED INT. FLG. VECTOR Auf den neusten Stand gebrachten internen Kennzeichen-Vektor speichern

DO NOTHING Nichts tun

ro co σ>

0037

0040

0007

	36	0041	0146
	37	0042	0106
	38	0043	0106
	39	0044	0106
	40	00ο 4 5
O
©3	41	0046
KJ
O	42	0047	0017
QO
σ»	43	0050	0007
	44	0051	0121
	45	0052	0106
	46	0053	0106
	47	0054	0106
	48	0055
	49	0056
	50	0057	Ool7

0 010 100 000 LFRLK RMGRB

0 000 100 001 LFXPA JSB LPREP

0 110 011 011 0 100 011 011

0 100 011 011 0 100 011 011

0 011 010 000 LMANZ TKRA

0 100 100 000 LRECL RMGRC

0 000 111 111 0 000 100 001

0 101 000 111 0 100 011 011 0 100 011 011 0 100 011 011 0 110 010 000 0 100 100 000

0 000 111 111 BRN LERRR

	BRN	LERRR
LTWWA	JSB	LPREP
	BRN	LTWWB
	BRN	LDONT
	BRN	LDONT
	BRN	LDONT
LGTl	ROM 3
LSTOR	RMGRC

CALL P BLOCK SOFTWARE.
F.-Block-Software rufen

PREPARE DATA FOR PRINT Daten für Druck rufen

BRN	LEXPB	DO NOTHING Nichts tun
BRN	LDONT	DO NOTHING Nichts tun
BRN ,	LDONT	DO NOTHING Nichts tun
BRN	LDONT

ACCEPT KEYCODE
Tastenkode akzeptieren

RECALL () ROUTINE BEGINNING POINT Anfangspunkt der ()- Routine zurückrufen

D.S. SOFTWARE NOT PRESENT D.S.-Software nicht anwesend

PREPARE DATA FOR PRINT Daten für Druck vorbereiten

CONTINUE
DO NOTHING
DO NOTHING
DO NOTHING

fortfahren nichts tun nichts tun nichts-tun

STORE () ROUTINE BEGINNING POINT Anfangspunkt der ()-Routine speichern

D.S. SOFTWARE NOT PRESENT D.S.-Software nicht anwesend

CO CO CO CO .£- CO

51

0Q60

O3o3

	52	0061	0155
	Seite	109
	53	0062	0106
	54	0063	0106
	55	0064
O co	56	0065	0ol7
OQ NJ rr\	57	0066	0106
980/i	58 59	0067 0070
	'60	0071
	61	0072	0106
	62	0073	0106
	63	0074
	64	0075	0117
	65	0076	0142

66

0077

1 100 010 001 LALFB

0 110 110 111

0 100 Oil Oil O 100 Oil Oil O 100 100 000 LLIST

O 000 111 111

O 100 Oil Oil

O 010 100 000 LTAB2

0 000 000 000 LSHFT2 NOP

1 Ol O 000 100 SSlO

o ioo οαι on

O 100 Oil Oil O 111 101 110

O 100 111 111 O 110 001 Oil

O 000 110 000

LTWW2

LTDCl

LGNT 2

LALF 2

BRN LDONT BRN LDONT RMGRC

LERRR

BRN LDONT RMGRB

BRN	LDONT
BRN	LDONT
W,CPlC
BRN	LOXXD
BRN	LIOC 2
RETURN

GET TWO INSTR* TO BUILD RIGHT PART

2 Instruktionen nehmen, um rechten Teil aufzubauen

DO NOTHING
DO NOTHING

Nichts tun Nichts tun

LIST OR CLEAR DATA BEGINNING POINT

Datenanfangspunkt auflisten oder löschen

D.S. SOFTWARE NOT PRESENT D.S. Software nicht anwesend

DO NOTHING Nichts tun

GO TO F.BLK.SOFTWARE

Zu F.-Block-software gehen

SET SHIFT KEY FLAG

Kennzeichen für Tastenumschaltung setzen

DO NOTHING
DO NOTHING

Ntchts tun Nichts tun

GEN. EXP. VALUE I
Exponentenwert 1 erzeugen

I/O CALL BEGINNING
Beginn des I/O-Rufs

END OF SUBROUTINE
Ende der Subroutine

N3 CO

cn

OO CO

CO

0100

0101 0102 0103

0104

0105

0112 0113

0152

0007

0 110 101 Oil LLAHS BRN LINCR

0354

0001

01ο6

0261

0163

0354

0 000 100 001 LL0G8 JSB

1 000 Oil

1 110 110

0 101 000

0 000 000

LDC

JSB LPRINT

SS5

BRN LLNl

0 000 010 000 LDONT ROM

0 101 100 010 LRETl P,CMlC

1 011 000

0 111 001

0 001 Oil 000 LOXXR

110 110

BRN LJSB2

BRN LEROR

LDCl

JSB LPRINT GO TO LABEL HEAD ROUT.EXECUTION Zur Ausführung der Etiketten-Routine gehen

PREPARE DATA FOR PRINT
Daten für Druck vorbereiten

LOAD SYMBOL CODE FQR LOG Symbolkode für log laden

PRINT AND RESTORE DATA IN C-REG Daten in C-Register drucken und zurückstellen

DEC. LOG ROUTINE EXECUTION START Ausführungsstart für Zehner-Logerithmus-Routine

GO TO COMMON PART WJTH LN ROUTINE Mit LN~Routine zum gemeinsamen Teil gehen

GO TO SUPERVISOR

Zum überwachunsgprogramm gehen

DECREMENT LEVEL INDICATOR Niveauindikator erniedrigen

NO CARRY; O.K. GO TO COMMON PART WITH JSB

Kein Übertrag, in Ordnung zum gemeinsamen Teil gehen

CARRY; SYNTAX ERROR
Übertrag; SYNTAX-Fehler

LOAD SYMBOL CODE FOR I/X Sifribolkode für 1 /X. laden

PRINT AND RESTORE DATA IN C-REG Daten ins C-Register drucken und zurückstellen

CD CO CO .£>· CO

	79	0114
	80	0115
	81	0116
	82	0117
	83	0120
4 098 26/1	84 85 86	0121 0122 0123
^-> OO Ö3>	87	0124
	88	0125
	89	0126
	90	0127
	91	0130

0137

0354

1 100 001 100

1 Oil 101 110 LOXXC

1 111 100 010

1 pll 000 100 LOXXD

0 101 111 111

0 101 Oll 000 LTWWB

1 110 110 101

1 100 001 100 0 110 001 110

0 Oil 001 110 0 001 oll 000

0 01 0 Oil

1 100 001 100

PT12 W, ZTA P,APIA SSIl

BRN
LDC 5

LDIVR

JSB LPRINT

PTl 2 W, CTA

W, ZTC LDCl

LDC 2 PTl 2

SET POINTER
Hinweismarke setzen

CLEAR A-REG
Α-Register löschen

GENERATE "ONE" AS DIVIDEND "1" als Dividend erzeugen

SET SINGLE OPERAND OP. FLAG OP-Kennzeichen für einzel_-ne Operanden setzen

GO TO DIVISION ROUTINE
Zur Divisionsroutine gehen

LOAD SYMBOL CODE FOR X/12 Symbolkode für X/12 laden

PRINT AND RESTORE DATA IN C-REG Daten im C-Register drucken und zurückstellen

SEND NEW DATA TO A-REG (DIVISOR) Neue Daten zum A-REgister senden ,(Divisor)

RESET C-REG TO ZERO

C-Register auf Null zurückstellen

BUILD "12" FOR DIVISOR
"12" als Divisor aufbauen

SET PROPER POINTER VALUE Richtigen Hinweismarken-Wert setzen

92 0131 0074

93 0132 0026

94 0133 0007

95 0134

96 0135 0354

97 0136 0001

98 0137

99 0140

100 0141 0055 Ιοί 0142

1ο2 0X43

103 0144

0 Oil 110 Oil

O 001 Oil Oil LPCHS

O 000 100 001 LLNR

0 111 Oil

1 110 110 O 000 000

O 110 100 100 LDIVR

1. 000 010 000 LDIVQ O 010 110 111 LGRND

0 010 101 000 LT0C2

1 Oil 001 O 010 Oil

BRN LTWW2 BRN LCHSl

JSB LPREP

LDC 7

JSB LPRINT

BRN LLNl

RS6

ROM 4

BRN LGTl

CXM

PTIl
LDC 2

GO TO CH.S. ROUTINE EXECUTION Zur Ausführung der Vorzeichenwechsel Routine gehen

PREPARE DATA FOR PRINT. Daten für Druck vorbereiten

LOAD SYMBOL KODE FOR LN Symbolkode für LN laden

PRINT AND RESTORE DATA Daten drucken und zurückstellen

GO TO EXECUTION PART Zum Ausführungsteil gehen

RESET D.P. FLAG IF SET Dezimalpunktkennzeichen zurückstellen falls gesetzt

GO TO DIVISION ROUTINE Zur Divisionsroutine ghen

GO TO GRAND TOTAL ROUTINE Zur Endsummen_{routine gehen}

GET INT. FLAG VECTOR FOR UPDATE Internkennzeichen vektor nehmen, um ihn auf den neuesten Stand zu bringen

PREPARE DIGIT INTERPRETATION CODE FLAG

Kennzeichen für Zifferninterpretationskode vorbereiten

SET IT TO TWO
auf 2 setzen

co CD oo

0145 0035 0 001 110 111

0146

ο	Io8	0151
co
co K>	lo9	0152
OT
O	110	0153
OO OT NJ-	111	0154

0155

114

0157

0 110 Oil 000 LFXPB 0147 0354 1 110 110 101

0150 0002

0 000 001 Oil

0 01 0 001 110 LINCL

0 111 000 000 LINCR

0 111 000 000

1 oll 110 111

0 100 101 000

0 001 001 100 0 111 110 Oil

LALP

BRN LI0C3

LDC 6

JSB LPRINT

BRN LEKPl

W, BTC

PINC

PINC

BRN LFINl

CTS

PTl

BRN LALF4

GO TO STORE INT.FLG. VECTOR
Zur Speicherung des internen
Kennzeichenvektors gehen

LOAD SYMBOL CODE FOR EXP
Symbolkode für EXP laden

GO TO PRINT AND RESTORE DATA IN C-REG

Zum Drucken und Speichern der

Daten im C-Register gehen

GO TO EXECUTION PART OF THE ROUTINE Zur Ausführung des Teils der
Routine gehen

RESTORE DATA ·
Daten zurückstellen

PROGRAM COUNTER INCREMENT BY ONE Programmzähler um eins erhöhen

PROGRAM COUNTER INCREMENT BY TWO Prog-rammzähler um awei erhöhen

GO TO RESET FLAGS AND ROUTINE

Zurückstellung der Kennzeichen und zum Routinen-Ausgang gehen

STORE RIGHT PART OF MESSAGE IN STACK

Richtigen Teil der Nachricht im

rechten Teil des Stapels speichern,

PREPARE COUNTER
Zähler vorbereiten

CO

CD CO CO

CO

	, 115	0160	0151	1	000	010	000	LCLA9	ROM 4
	116	0161		0	111	000	000	LCLAZ	PINC
	117	0162		0	110	100	111		BRN LINCL
	■ 118	0163		1	110	010	000	LEROR	ROM 7
	110	0164		ο	111	000	000	LCLAN	PINC
	120	0165	0	111	000	000	LCLAD	PINC
O

121 0166 ·.

122 .0167

123 0170 0301

124 0171

125 0172

126 0173 0160

127 0174 0303

O OH 001 110

0 101 001 100

1 100 001 001

1 110 101 110 O 110 001 HO

0 111 000 Oil

1 100 010 001

LALP4

W, 2TC

JSB LGNTl

W, AXC W, CTA

BRN LCLA 9 JSB LGNT2

INCREMENT PROGRAM COUNTER Programmzähler erhöhen

GO TO MESSAGE ROUTINE

Zur Nachrichtenroutine gehen

PREPARE NEXT STEP IN SEARCH ROUTINE nächsten Schritt in der Suchroutine vorbereiten

INCR. P-REG TO REACH THIRD NEXT ADRESSE Jj

Register erhöhen, um nächste 0^s Adresse zn erreichen

PREPARE C-REG C-Register vorbereiten PREPARE COUNTER Zähler vorbereiten

GO TO NEXT INSTRUCTIONS INTO T-REG
Nächste Instruktionen ins
T-Register nehmen

GET MASTER INTO C-REG
Hauptinstruktion ins C-Register
nehmen

COPY IT BACK INTO A-REG FOR NEXT

STEP

Zurück ins A-REgister für den

nächsten Schritt kopieren

OO CD OJ OO -P""· OO

GET SEVEN INSTR. TO BUIL LEFT PART

OF MESS. IN T-REG

Sieben Instruktionen um linken Teil der Nachricht im T-Register aufzubauen

128

129 130

131 132

*33

S ¹³⁴

ζ 135

136

KJ 137 138

139 140

141

0175

0176

0177

Ο2ο3

0204

0212

0213 0214

1 100 101

0 111 000 000 LALF3

0 000 111

0200 0 Oil 101

0201 0176 0 111 111 oil

0202 0031 0 001 100

1 111 001 100 · LRET2

1 001 001 110 LALIG

0205 . 0 000 111

0206 0 011 101

0207 0204 1 000 010

0210 0 lol 010

0211 0214 1 000 110

0 111 110

0 000 110

1 011 110 000 LRET20

DNR

PINC PLS

YP3

BRN LALF3

BRN LALF8 PTl 5

W, SRC

PLS YP 3 BRN LALIG

YS5

BRN LRET20

CTT

RETURN DTDS

RIGHT PART OF MESSAGE INTO C-REG Rechten Teil der Nachricht ins ' C-Reqister

PRGM. COUNTER INCREMENT (+10) (PT=8) Programmzähler erhöhen

COUNT INCREMENTS
Erhöhungen zählen

H-TH ?

NO;' CONTINUE

Nein; fortfahren

GO TO PRINT MESSAGE

Zum Druck der Nachricht gehen

PREPARE FOUR SHIFTS DOWN Vier Verschiebungen nach unten vorbereiten

ALIGNMENT SHIFT
Ausrichtung verschieben

COUNT Zählen
FINISHED? Beendet?

NO;-CONTINUE
Nein; fortfahren

YES, WHO?

Ja; wer?

IT IS RETURN ROUTINE
Ist Rückkehrroutine

COPY SHIFTED ADDR. INTO T-REG Verschobene Adressen ins T-Register kopieren

END OF THE SUBROUTINE
Ende der Subroutine

STORE NEW STACK IN D.S.
Neuen Stapel in D.S. speichern

CO CD CO CO -P-CO

144

0215

1 000 000

TTP

	145	0216	0151	0	110	100	111	LCLAF	BRN	LINCL
	146	. 0217		0	001	101	110		W, CMl
	147	0220	0164	0	111	010	Oil		BRN ■	LCLAN
	148	0221	0161'	0	111	000	111	L JMP 2	BRN	LCLAZ
	149	0222		0	010	101	000		CXM
O re**
1826	150	0223		1	000	101	110	W, BXC

151

157

0224

O 100 010

YS4

152 0225 0244 1 010 010 Oil BRN LJMP3

153 0226 0301 1 100 001 001 LJABl JSB LGNTl

154 0227 0203 1 000 010

JSB LALIG

155 0230 156 0231

0232

O 100 010 000 LJAB2 ROM

O 010 101 000 LJMPA CXM

O 110 001 100 PT6

RETURN ADDR. INTO PRGM. COUNTER Adresse in Programmzähler zurückgeben

MATCH POUND? Passende gefunden?

NO; GO TO NEXT STEP

Nein; zum nächsten Schritt gehen

YES; FINISHED Ja; beendet

STORE INT, FLG* VECTOR

RESTORE DATA ,

Internen Kennzeichenvektor speichern _H

Daten zurückstellen . <

SAVE DATA INTO B-REG ,

Daten im B-Register bewahren

IS THIS JUMP RELATIVE? Ist dieser Sprung relativ?

NO; Nein

YES; GET NEXT TWO INSTRUCTIONS (PT~6) Ja; nächste Instruktionen nehmen (PT=6)

ADDRESS MODIFIER ALIGNMENT Adressenmodifikationsausrichtung

GO TO MODIFY ADDRESS Zur Modifikation der Adresse gehen

GET INT. FLG. VECTOR SAVE DATA

Internen-Kennzeichenvektor nehmen Daten bewahren

PREPARE PROGRAM JUMP CONDITION FLAG Kennzeichen für Programmsprung-Bedingung vorbereiten

158 0233

0 110 100 010

159 0234 0222 1 001 001 Oil

160 0235

167 0244

169 0246

170 0247

0 000 Oil OOo

	161	0236	0275	0	010	101	000
ο	162	0237		0	101	οίο	100
co			0152
σ>	163	0240	1	Oil	110	111
ο
co σ>"	164	0241	1	001	010	100
	165	0242	0	110	101	011

166 0243 0275 1 oil 110 111

168 0245 0320 1 101 000 Oil

1 010 101 000

O 101 Ool 100

P, ZMC

BRN LJMP2

LDCO
CXM

O 001 010 100 LJMP3.

YS5	LFINl
BRN
YS 9	LINCR
BRN	LFINl
BRN
YSl	LJMP4
BRN
MTC
PT5 -

TEST CONDITION FOR BftOGRAM JUMP Bedingung für Programmsprung prüfen

NO CARRY; ZERO; CONDITION MET; GO TO EXECUTE

Kein übertrag;Null; Bedingung traf zu; Zum Ausführen gehen

CARRY; CONDITION NOT MET; RESET CONDITION FLAG

übertrag; Bedingung traf nicht zu; Bedingungskennzeichen zurücksetzen

STORE INT. FL G. VECTOR; RESTORE DATA Internen-Kennzeichenvektor speichern; Daten zurückstellen

IS IT RETURN ROUTINE?
Rückkehrroutine?

YES; SKIP PRGM. COUNTER INCREMENT Ja; Programmzähler-Frhöhung überspringen

IS IT JUMP TO C-EBG CONTENTS? Inhalte zum C-Register springen?

NO; GO TO PRGM COUNTER INCREMENT Nein; zur Programmzähler—Erhöhung gehen

GO TO ROUTINE EXIT

Zum Routinenausgangbehen>

IS THIS A ?JSB" ROUTINE Ist dies eine"JSB"-Routine

NO; IT IS¹¹GO- TO" ROUTINE Nein; es ist ein "GO TO"-Routine

YES; GET INT.FLG. VECTOR Ja; internen Kennzeichenvektor nehmen

PREPARE SUBROUTINE LEVEL INDICATOR Subroutinen-Niveau-IndJc ator vorbereiten

0250

0 IQl 010 100

0251 0107 0 100 Oil 111 Setie 111

0252 1 110 100 010

0 Oil oll 000 0 000 111 100

0 101 000 010

0 111 Oo1 111

1 110 100 010

0 111 IQO OlQ

	174	0253
	175	0254
-Ρ»	176	0255
CD OD	177	0256 0163
CO	178	0257
088;
	179	0260
	180	0261
	181	0262
	182	0263
	183	0264

Q 010 IQl 000 LJSB2

0 Oil 001 110

0 111 lol 110

1 100 QOl 100

YS 5

BRN LRETl

P,ÄXC

LDC3 PLS

P ,AMCC

BRN LEROR

P, AXC

P ,CPlC CXM

W, ZTC

W, CPlC PTl 2

IS THIS RETURN ROUTINE? Rückkehrroutine?

YES

Ja

NO? ITIS JSB; PREPARE LEVEL TEST Nein; es ist JSB; Niveautest vorbereiten

SET LIMIT Grenze setzen

RESTORE POINTER
Hinweismarke zurückstellen

CHECK DIFFERENCE
Differenz prüfen

NO CARRY; LIMIT; SYNTAX ERROR Kein Übertrag; Grenze; SYNTAX-Fehler

CARRY, O.K. RESTORE LEVEL INDICATOR IN C-REG

Übertrag, in Ordnung■,Niveauindikator ins C-Register zurückstellen

INCREMENT LEVEL INDICATOR Niveauindikator erhöhen

STORE UPDATED INT.FLG. VECTOR auf den neuesten Stand gebrachten internen Kennzeichenvektor speichern

START TO BUILD INT. D.S.R. ADDRESS Zum Aufbau einer internen D.S.R,- ■ Adresse

SET EXPONENT TO ONE
Exponent auf 1 setzen

PREPARE PROPER POINTER richtige Hinweismarke vorbereiten

0265

1 111 Oil 000

LDC15 0266 0337 1 101 111 111 BRN LSJB20

0267 0 010 010 000 LFPRINN ROM

0270 0014 O 000 110 Oil LOXXT BRN LOXXA 0271 0040 O 010 000 Oil LEXPT BRN

O 000 010 000 LTRB2 ROM O

O 110 010 000 LCLA2 ROM 3

O 010 001 110 LFIN4 W,BTC

O 010 010 000 LFINl ROM 1

O Oil 001 110 LPLAl W,ZTC

	189	0272
	190	0273
O	191	0274
CD OO NJ	192	0275
σ>	193	0276
ο 00	194	0277
σ>	195	0300

0 110 001 100
1 100 001 001

0301 0273 1 Oil 101 111

197	0302
198	0303
199	0304
200	0305
201	0306

0 111 000 000 ·

1 001 001 110

0 111 110 000

PT6 JSB

BRN

0 111 000 000 LGNTl PINC

PINC

1 001 001 110 LGNT2 W,SRC

W, SRC

CTT

LEXPA

LGNTl

LCLA2 INTERNAL D.S. ADDRESS interne D.S.-Adresse

GO TO 1/X ROUTINE BEGINNING Zum Beginn der Routine für 1/X gehen

GO TO EXP. ROUTINE BEGINNING Zum Beginn der EXP-Routine gehen

GO TO SEARCH FOR LABEL ROUTINE Zur Suche nach Etikettierroutine gehen

■RESTORE DATA IN C-REG Daten zurück ins C-Register stellen

ROUTINE EXIT Routinenausgang

PREPARE C-REG FOR LABEL C-Register für Etikett vorbereiten

PREPARE COUNTER Zähler vorbereiten

GET LABEL NUMBER FROM THE PROGRAM Etikette.nnuinin.er vom Programm nehmen

GO TO SEARCH FOR LABEL ROUTINE Zur Suche nach Etikettierroutine gehen

INCREMENT PROGRAM COUNTER Programmzähler erhöhen

INCREMENT PROGRAM COUNTER Programmzähler erhöhen

ALIGNMENT SHIFT ONE
Ausrichtungsverschiebung eins

ALIGNMENT SHIFT TWO
Ausrichtungsverschiebung zwei

COPY C-REG TO T-REG

C-Register ins T-Register kopieren

	202	0307	1	000	100	000	LJSB4	READ	L0KY2
	203	0310	1	Oil	010	100		YSIl	LTRB2
	204	0311 0364	1	111	010	Oil		BRN
	205	0312 0272	1	Oil	101	Oil		BRN
	206	0313	0	101	000	000		IS2
	207	0314	1	000	101	000		PTT
	208	0315	ί	001	000	000		ISl
	2ο9	0316	ο	111	111	000		TTC
Ο							LJMP 4
co
OO	210	0317	1	Oil	110	000		DTDS
co
O	211	0320	1	000	010	100	YS8	LJABl
OO
σ>	212	0321 0226	1	001	Oil	Oil	BRN
	213	0322	1	001	010	100	YS9 .

0323 0276 1 Oil 111 Oil

100 101 110

215	0324
216	0325
217	0326

O3"27 0313

ο 010 010 000

001 Ol O 100 LJSB40

100 101 111

BRN ' LPLAl W, AXB

ROM YS

BRN

GET NEXT INSTRUCTION Nächste Instruktion holen

EXTERNAL FLAG? Externes Kennzeichen? NO; O.K. Nein; in Ordnung YES; TROUBLE Ja ,-Störung . .

ADD NEW RETURN VECTOR TO STACK Neuen Rückkehrvektor zum Stapel hinzufügen

PREPARE NEW RET. V. STACK FOR STORE Neuen Rückkehrvektor-Stapel für Speicherung vorbereiten

STORE NEW STACK IN D.S. NeuenStapel in D.S. speichern

IS THIS JUMP TO ABS. ADDRESS? Ist dies Sprung zur absoluten Adresse?

YES 'Ja

NO; IT IS JUMP TO LABEL; WHERE? Nein; es ist Sprung zum Etikett; wo?

LABEL IS IN PROGRAM Etikett ist im Programm

LABEL IS IN CPU, GET IT INTO A-REG Etikett ist in CPU, ins A-Register nehmen

LABEL IN C-REG?
Etikett im C-Register?

NO Nein

219	0330	0	101	OQO	000
220	0331	1	001	001	000

221

222 223 224 225

j» 226 ο

co 227

• 228 229

23-0

231 232

0346

0347

0332 0333

0334 0313

0335 0274

0336 0273 0337

03 0341

0342 0343

1 001 001

1 Oil 111

O 111 Ho

0344 O 101 ΟΙΟ

0345 0203 1 000 001

O 000 111

O 101 000

IS2 PDEC

YES

Ja

1	001	000	000	LRETX	ISl
1	100	101	111	LCLAB	BRN
1	Oil	. 110	Oil	LJSB20	BRN
1	Oil	101	Hl		BRN
O	HO	Oil	000		LDC 6
1	001	HO	000	ATDS
O	110	001	100	PT6

LHSB4
LFIN4

LCLA 2

YS5 BRN DECREMENT CURRENT ADDRESS Laufende Adresse erniedrigen

BY TWO FOR PROPER RETURN Um 2 für richtige Rückkehr

GO TO ROUTINE EXIT Zum Routinenausgang gehen

RETURN VECTOR STACK ADDRESS Rückkehr-Vektor—Stapeladresse

D.S. CALL . D.S. rufen

PREPARE PROPER POINTER Richtige Hinweismarke vorbereiten

READ RETURN VECTOR STACK INTO C-REG Rückkehr-Vektor-Stapel ins C-Register lesen

IS THIS RETURN ROUTINE? Ist dies Rückkehrroutxne?

YES

Ja

LJSB3

LRET2 NO; IT IS·JSB, PREPARE STACK-UP (NON RCD-CH.)

Nein; Es ist JSB, Stapelanhebung vorbereiten ( keinRCD-CH.)

COUNT SHIFTS (BEGINNING PT = 10) Verschiebungen zählen (Beginnend mit PT 3 JO)

235

0350

100 001 000

	236	0351	0346	1	001	000	000
	237	0352	0326	0	110	101	100
	238	0353			110	011	011
	239	0354	0267	1	101	011	011
	240	0355		0	101	010	100
Ö CD CO N)	241 242	0356 0357		1 0	011 101	011 100	111 100
O .CO	243 244	0360 0361	0 0	010 000	001 110	110 000
f. S	245	0362	0	010	100	000

246

247
248

249

0350 0 010 100 Oil LTWWT

0364
0365

0366

101 000 000 L0KY2

100 101 000

001 001 000

SLT

ISl YP 6

BRN LiJS Β3

BRN LJSB40
YS 5

BRN LFPRINN

RS5

W, BTC RETURN RMGRB

BRN LTWWA

IS2 IXT

PDEC

250	0367	1	001	000	000	ISl
251	0370	0	111	111	000	TTC

SHIFT T-REG LEFT ONE BIT T-Register um 1 Bit nach links verschieben

WAS IT 16-TH SHIFT? War es die 16. Verschiebung?

NO; CONTINUE Nein; fortfahren

YES, FINISHED Ja, beendet

PRINT OR NOT PRINT? drucken oder nicht drucken

GO TO PRINT Zum Druck gehen

252

0371

000 111 100

PLS CALL F.BLOCK FOR INTERPRETATION F-Block für Interpretation rufen

GO TO X/12 ROUTINE BEGINNING

Zum Beginn der Routine für X/12 gehen

LOAD NEW INSTRUCTION INTO T-REG

Neue Instruktion ins T-Register laden

DECREMENT PROGRAM COUNTER Prograranazähler erniedrigen

COPY NEW INSTRUCTION INTO C-REG

Neue Instruktion ins C-Register kopieren

COUNT Zählen

253	0372	0304	1	000	101	100
254	0373	1	100	010	Oil

0374

0 000 110 000

256 0375 0101 0 100 000 111 .LLOGT 257 0376 0133 0 101 101 111 LLNT

0377 0142

O 110 001 Oil LIOPC

MAIN UNIT LISTING(ROM A-7) Haupteinheit

YP8

BRN

RETURN BRN BRN BRN FINISHED?

Beendet?

LGNT

LIOC

oo Zeilen laufende Abzweig- Betriebs- .

N«> Nr. Adresse Adresse Code

⁰^ ' Bit-Muster

O	3	0000	0014	0	000	110	011	LADJ 2	BRN LSYNG
CO σ>	4	0001		1	101	111	110		^S,AMlA
K>								LADJ 4
	5	0002		1	101	111	110		S,AMlA.
	6	0003	0010	0	000	100	011	BRN LADJ3

0004

0005

o ooa ooi loo

1 001 100 0100

PTl

P,AMl NO; MAKE THE LOOP AGAIN Nein; Schleife erneut durchführen

YES; SUBROUTINE END
Ja; Subroutine zu Ende

GO TO LOG ROUTINE BEGINNING Zum Beginn der LOG-Routine gehen

GO, TO LN ROUTINE BEGINNING Zum' Beginn der LN-Routine gehen

GO TO I/O CALL ROUTINE Zur Routine für I/O-Ruf gehen

RESTORE D.P.L. FLAG .

D.P.L.-Kennzeichen zurückstellen

DECREMENT, CHECK IF CARRY Erniedrigen, prüfen ob übertrag

NO CARRY CONTINUE EXPONENT ADJUST* MENT

Kein Übertrag,Justierung des Exponenten fortsetzen

CARRY, ADJUSTMENT OF THE EXP. IS FINISHED

Übertrag, Justierung des Exponenten ist beendet

CHECK MOST SIGNIFICANT DIGIT OF THE EXPONENT

Wichtigste Ziffer des Exponenten prüfen

9	0006	0322	1	101	Oo 1	Oil
10	0007	0314	1	100	110	Oil

BRN LTRBl BRN LTRB3

0010

1 11.1 101 010 LADJ3 X, APIA

	12	0011	0002	0	000	000	000	LSYNA	NOP	LADJ 4
	13	0012		0	000	001	Oil	LSYNG	BRN
	14	0013	0237	' 1	010	001	100	LGT3	PTlO	LSYNN
ο co OO ro	15 16	0014 0015		- 0 1	000 001	110 111	100 111		CLS BRN
	17	0016		1	001	000	100	LERRR	SS9
O OO	18	0017		0	000	010	000		ROM O
Cf?	19	0020	0221	1	000	101	110	LGTS	W, BXC	LERAO
	20	0021		1	001	000	111		BRN -
	m	0022		1	Oil	Oil	000		LDCIl
	%k	0023	0231	1	Oil	oll	000	LPREPA	LDCIl	LGT4
	23	0024	0165	1	001	100	111	LRES 5	BRN	LPRSA
	24	0025		0	111	010	111	LFPRl	BRN
	25	0026		0	000	010	000	LRESB	ROM O
	26	0027	0365	0	010	010	000	ROM 1	LRES7
	27	0030	1	111	ΟΙΟ	111	BRN

ZERO GO TO SIGN OF EXP.CHECK Null, zur Vorzeichenprüfung des Exponenten gehen

INCREMENT EXPONENT Exponenten erhöhen

TO ELIMINATE CARRY um Übertrag zu eliminieren

SET POINTER FOR NOTE Hinweismarke für ."05" beachten

CLEAR ALL STATUS BITS Alle Zustandsbits löschen

SET SHIFT FLAG Umschaltkennzeichen setzen

R (FROM ROM 6) (von ROM 6) LOAD T T laden

RETURN TO ROM O Zurück zu ROM O

GO TO PRINT PART Zum Teildruck gehen

0031

0032

0033 0024

O	34	0037
co
ca ro	35	0040
cn
/*·» O
00 CD	36	0041
ro	37	0042
	38	0043
	39	0044

0045 0046

0 010 101 0Oo LRES8 CXM

1 101 001 100 PT13

1	111	Oil	Oil	000	LRES 4	LDCl 5
0	001	101	Oll	100		YPl
0	0011101	110	111		BRN LRES4
0	001	000		LDCl
0	111	000		LDC 7
0	111	000		CTT

1 101 001 1 011 011

0 000 000

1 100 Oil

1 Oil Oil 1 111 Oil 0047 0026 0 001 011 PUT INT.FLG. VECTOR INTO M-REG Internen Kennzeichenvektor ins M-Register geben

PREPARE MESSAGE GEN. Nachrichtenerzeugung vorbereiten

"BLANK" "Leerstellen"

BLANKS STILL NEEDED? Leerstellen immer noch benötigt?

JA

Ja

NO, SET "C"
Nein, "C" setzen

SET "L"
"L" setzen

STORE LEFT PART OF THE PRNT. WORD IN T-REG

Linken Teil des gedruckten Wortes im T-Register speichern

PT13	LRES 5	"E"	SET "E"	OF MESSAGE
LDCIl			setzen
NOP	"A"	SET "A"
LDC12		setzen
	"R"	SET "R"
LDCIl		setzen
		SET11BLANK"
LDC15	"Leerstelle" setzen
	END
BRN

Ende der Nachricht

	43	0050	1	111	Oil	000	GONT LDCl5
	44	0051	0	100	101	000	CTS
	45	0052	1	101	Oo 1	100	PTl 3
	46	0053	1	111	Oil	000	' LMESA LDC15
	47	0054	0	111	101	100	YP7
	48	0055 0053	0	010	101	111	BRN
	49	0056	1	100	Oil	000	LDC12
σ CD	50	0057	1	111	Oil	000	LDC15
cn	51	0060	0	000	Oil	000	LDCO
PO. CD	52	0061	1	111	Oil	000	LDCl 5
\ O	Seite	114
00	53	0062	1	Oil	Oil	000	LDCIl
	54	0063	1	111	Oil	000	LDC15
	55	0064	1	Oil	Oil	000	LDCIl
	56	0065	1	111	Oil	OQO	LDCl 5
	57	0066	0	111	110	000	CTT
	58	0067	1	100	101	000	DNR
	59	0070	0	000	110	000	RETURN
	60	0071	0	110	010	000	LPRS6 ROM 3

LMESA

LOAD BLANKS ■Leerstellen laden

STORE PRINT MASK Druckmaske speichern

BLANK O
BLANK

T
BLANK

Leerstelle Leerstelle

Leerstelle

RECOVER PRONT MASK Druckmaske wiedergewinnen

END OF THE SUBROUTINE Ende der Subroutine

0072

1 Oil 111 000 0073 . 0016 0 000 111 Oil 63

64

0074
0075

DSTC

BRN

0 100 101 110 LREDl W,ATB 0 000 Oil 110 S,ZMB

0076 0100 0 100 000 Oil

	66	0077	0001
40 9 8 26	67	0100
/0862	68 69	0101 0102
	70	0103
	71	0104
	72	0105

0 001 110 000

BRN

RED

1 110 110 110 LADJl MS,AXC

0 Oil Oil 010

1 111 111 110

O 000 000 111

XS,ZTC

S,APIA

BRN

O 110 001 110 LSCIl W,CTA

1 Oil 001 100

PTIl

LGT 3

LADJl

LAD J 2

GET GRAND TOTALa. Endsumme nehmen

COPY ORIG. DATA INTO B-REG Original Daten ins B-REgister kopieren

CHECK .SIGN OF MANTISSA Mantissenvorzeichen prüfen

POSITIVE, GO TO DATA ADJUSTMENT positiv, zur Datenjustierung gehen

PREPARE RED TAPE rotes Band vorbereiten

MANTISSA BACK TO C-REG; FLG. VECTOR TO A-REG

Mantisse zurück ins C-Register ; Kennzeichenvektor iris Α-Register

CANCEL OP CODE IN C-REG OP-KOde im C-Register löschen

INCREMENT; CHECK IF CARRY erhöhen; prüfen ob übertrag

NO, CONTINUE TEST Nein, Test fortsetzen

YES, STARTSCI. NOTATION FORMAT PRINT Ja, mit Druck in wissen—schaftliche Notierung beginnen

SET POINTER TO INDICATE DECPOINT LOCATION

Hinweismarke setzen, um Stelle des Dezimalpunktes anzuzeigen

73 0106 74 0107

0 101 000

SS5

1 Oil OIO 100 LDCPl YSIl

75 0110 0133 0 101 101

76 Olli

77 0112

78 0113

79 0114

80 0115

81 0116 0256

82 0117

83 0120

84 0121

85 0122

0 100 010

BRN

ROM

LDC P

1 001 100 100 LFPRM RS9

O 010 001"110 . W,BTC

0 000 110 000 RETURN

1 111 101 010 LTRB4 X,APIA

1 010 111 Oil BRN LTRB5

O Oil Oil 110 LADJ6 S,ZTC

1 001 001

W, SRC

O 000 001 100 LADJ5 PTO

1 111 100

86 0123 0117 O 100 111 87 0124 0261 1 Oil 000

P,APIA

BRN

BRN

LAD J

LAD J SET SCIENTIFIC NOTATION FORMAT FLAG Kennzeichen für wissenschaftliche Notierung setzen

CHECK IF EXTERNAL FLAG IS SET Prüfen, ob externes Kennzeichen gesetzt ist ·

NO, CONTINUE IN PRINT ROUTINE Nein, fortfahren in Druckroutine

YES; GO TO DISPLAY ROUTINE Ja; zur Anzeigenroutine gehen

RESTORE DATA IN C-REG· Daten zurück ins C-Register

PREPARE ALIGNMENT SHIFT Ausrichtungsverschiebung vorbereiten

MANTISSA ALIGNMENT IN FIX FORMAT PRINT Mantissenausrichtung in Fest-Format Druck

PREPARE CHECK OF THE LEAST SIGN DIGIT Prüfung der Ziffer mit Mindest-Vorzeichen vorbereiten

INCREMENT TO CHECK IF IT WAS NINE erhöhen, um zu prüfen, ob es 9 war

NO CARRY, GO TO ROUND AND SHIFT Kein übertrag, zum Runden und Verschieben gehen

GO TO ROUND OFF ROUTINE Zur Abrunde Routine gehen

	88	0125
	89	0126
	90	0127
	91	0130
■Τ Ο	92	0131
ta
co	93	0132
er»
	94	0133
CD
CQ
CD
PO	95	0134

1 110 101 110 LADJ8 W,AXC

1 010 101 000

0 010 001 100

0 101 111 110

0150 0 110 100 Oil 0107 0 100 Oil 111

1 110 101 110

0135

0136

0137

0140

1 001 010 010

0 111 100 010

0 110 001 110

1 010 011 000

1 1000001 100

MTC

PT2 LDCP3 S,CMlC

BRN BRN LDCP4 W₇AXC

WP,SRC P,CPlC

W, CTA LDClO PT12

LDCP 2

LDCPl

DATA TEMP,INTO A-REG

Daten zwischenzeitlxch ins A-Register

PREPARE INT. FLG. VECTOR FOR TEST Internen Kennzeichenvektqr für Test vorbereiten

RESET POINTER FOR FIX O FORMAT Hinweismarke für Fest-Null-Format setzen

DECREMENT DPL FLAG TO CHECK IF IT IS ZERO

DPL-Kennzeichen erniedrigen, um festzustellen ob es Null ist

NOT ZERO, CONTINUE
Nicht Null, fortfahren

ZERO, FINISHED
Null, beendet

BRING PART OF PR(DNT, WORD TO C-REG Teil des gedruckten Wortes in C-Register bringen

MAKE SPACE FOR DEC. POINT PRINT CODE Platz für Dezimalpunkt-Druckkode machen

SET "1" TO INDICATE D.P. LOCATION "1" setzen, um Dezimalpunktstellung anzuzeigen ·

COPY NEW¹¹MASK¹¹ TO A-REG Neue "Maske" ins Α-Register kopieren

SET PRINT CODE FOR D.P. Druckkode für Dezimalpunkt setzen

PREPARE SEARCH FOR LEADING ZEROS Suche nach führenden Nullen vorbereiten

100 0141

O Io5

to 106

1 001 100 010 LDCP5 P,AMI

101 0142 0347 1 110 Oil 111 102 0143

1 111 Oil 000

103 0144 0141 0 110 000 111 104 0145

0146

1 110 101 110 LSYM3

1 111 Oil 000 LSYM9

0147 0071 O Oil 100 111

107 0150

O 000 111 100 LDCP2

108 0151 0130 0 101 100 Oil

109 0152 0 101 000 100

110 0153

O 100 101 110

LMSSl

LDCP5

LPRS5

BRN SS5

W, ATB

LPRS6

LDC P 3

111 0154 0071 O Oil 100 111 BRN

112 0155 1110 100 000 LPRS4 YPOC

LPRS6

DECREMENT, CHECK IF CARRY erniedrigen, prüfen ob Übertrag

NON ZERO/ FINISHED Nicht Null, beendet

ZERO, SET CODE FOR BLANK INTO C-REG Null, Kode für Leerstellen ins C-Register setzen

CONTINUE IN SEARCH Suche fortsetzen

COPY EXPONENT INTO C-REG Exponent ins C-Register kopieren

LOAD PRINT CODE FOR BLANK Druckkode für Leerstelle laden

GO TO SUBROUTINE EXIT Zum Subroutinenausgang gehen

INCREMENT POINTER TO INDICATE FIX FORMAT

Hinweismarke erhöhen, um Festformat anzuzeigen

SET "DO NOT PRINT" FLAG Kennzeichen "nicht drucken" setzen

COPY DATA INTO B-REG FOR NEXT EXECUTION STEPS Daten ins B-Register für die nächsten Ausführungsschritte kopieren

CHECK PRINT-ON-COMMAND FLAG Kennzeichen "Auf Befehl drucken" prüfen

114

116

117

119
120

121

122

1 Oil 010 100

0242 1. 010 001 Oil ' 0160

0161

011 100 100

101 010 100 LPRS50

0152 0 110 101 011 0276 1 011 111 oll

0166

0167

0170

010 101 000 LPRSAA

100 001 100

110 100 010

0171 0155 0 110 110 111 0172 0161 0 111 000 111

YSIl BRN

RSIl YS5

0014 0 000 110 011 LERROR BRN

0 110 001 110 LPRSA W,CTA

MTC PTl 2

P, ZMC BRN

LPRS 5

LFPRS

LSYNG

LPRS 4

LPRS50

ON COMMAND ONLY?
Nur auf Befehl?

GO TO CHECK AUX. FLAG Zur Prüfung des Hilfskennzeichens gehen

RESET EXTERNAL FLAG Externes Kennzeichen zurücksetzen

IS AUX. FLAG SET?

Ist Hilfskennzeichen gesetzt?

NO, CONTINUE IN DATA ADJUSTMENT Nein, mit Datenjustierung fortfahren

YES, GO TO LEFT PARENTHESIS ROUTINE Ja, zur Routine für die linke Klammer gehen

COPY DATA TO A-REGISTER Daten ins A-REgister kopieren

GET INT. FLG. VECTOR FOR TEST Internen Kennzeichenvektor für Test nehmen

PREPARE OP. MODE CODE FOR TEST OP-Betriebs-KOde für Test vorbereiten

CHECK IF ZERO
Prüfen, ob Null

OP CODE WAS NOT ONE, CONTINUE TEST OP-Kode war nicht eins, Test fortsetzen

GO TO CHECK AUX. FLAG Zur Prüfung des Hilfskennzeichens

gehen

0173

	127	0174	0176
	128	0175	0263
	129	0176	0324
	130	0177	0247
	131	0200
O co	132	0201	0027
826/	133	0202
1^s. O OO
CD K>	134	0203
	135	0204
	136	0205

0 000 110 100

0 111 111 Oil

1 Oil 010 001

LNOT20

LFRIA

1 101 010 101 N0T20

1 010 Oil 111

0 101 01 O 100 LPRTA

0 001 Oil 111

1 010 101 000 LFPR4

CLS

BRN JSB

JSB BRN YS5

BRN MTC

N0T20 LMESS

LFPRZ LSYN 9

LFPRl

O 001 001 100

O Oil 010 010

O 101 1Θ0 100

0206 0220 1 001 000 Oil

0207 O 111 110 000 LSC13

0210

1 100 101 010

PTl WP,ZTC

RS, 5

BRN LFPR5 CTT

X, AXB

CLEAR ALL STATUS BITS TO AVOID TROUBlE TROUBLE

Alle Zustandsbxts löschen, um Störungen zu vermeiden

GENERATE MESSAGE Nachrichten erzeugen

PRINT Drucken

EXIT

Ausgang

PRINT OR NOT
Drucken oder nicht?

PRINT

Drucken

DO NOTi GET INT. FLAG VECTOR FOR UPDATE

Nicht tun; Internen Kennzeichenvektor neh«men, um ihn auf den neuesten Stand zu bringen

PREPARE OP. CODE LOADING OP-KOde-Ladung vorbereiten

MASK PREVIOUS OP. CODE WITH ZEROS Vorherigen OP-Kode mit Nullen ausblenden

RESET "DO. NOT PRINT" FLAG IF SET Kennzeichen "nicht drucken" zurücksetzen, falls gesetzt

STORE LEFT HALF OF THE PRINT WORD linke Hälfte des gedruckten Wortes speichern

SEND EXPONENT TO A-REG Exponent ins Α-Register senden

0211

0 1.00 101 ΟΙΟ

X, ATB

141

0212

O Oil 001 110 LSC14 W,ZTC

	142	0213	0213	0	1	0	100	001	HO	Oil	LSC15	W, SLA	LSC15
	143	0214		0	0	000	111	100	000		PLS
	144	0215	0145	1	0	Oil	101	100	Oil		YPH	LSYM3
O	145	0216		1	0	000	101	111	000		BRN
CO
QO fo	146	0217	0263	0	110	010	111		BRN	LMESS
">,	147	0220		0	000	010	000	LFPR5	ROM 0
O			0373							NOT 2
00	148	0221		1	Oil	olO	001	LFRAO	JSB
INJ	149	0222		1	101	001	100		PT13
	150	0223	007 4	1	111	101	111		BRN	LREDl
	151	0224		0	HO	001	Ho	LPRXA	W, CTA
	152	. 0225	0166	010	101 000		MTg	LPRSAA
	153	0226		Oil	110		BRN
	154	0227	100	101	LPRST	CTS
	155	0230	111	oll		BRN
	156	0231	000	010	LGT 4	ROM 0

RESTORE ORIG, EXPONENT IN B-REG

Ursprünglicher Exponent in B-Register zurückstellen CANCELL NONlBCD CHART IN-C-REG. NIcht-BCD-Kennzeichen in C-Reg¹" ster löschen

ALIGNMENT SHIFT
Ausrichtungsverschiebung

INCREMENT SHIFT COUNTER Verschiebungszähler erhöhen

FINISHED? Beendet?

NO, STAY IN LOOP

Nein, in der Schleife verbleiben

YES, ' Ja

GO BACK TO ROM O
Zurück zum ROM O gehen

GO TO MESSAGE GENERATOR Zur_vNachrichtenerzeugung gehen

LQAD 20 20 laden

GO TO FORCED PRINT DATA ADJUSTMENT Zur Datenjustierung für erzwungenen Druck gehen

STORE SYMBOL TEMPORARILY IN D-REG Symbol zwischenzeitlich im D-Regi ster speichern

GO TO PRINT

Zum Drucken gehen

0232

0233

0234

J60 0235

1 Oil 111 000 LACl

0 000 110 100

1 010 000 100

0 110 000 100

1 100 111 111

0 111 000 100 LSYNN

0 01 0 100 100 LSYNF 0 111 110 111

0 101 olO 100 LREDQ

0 Oil 110 Oil

1 100 101 000

0245 Oo27 0 001 Oil 111

0246 0221 1 001 000 111

0247 1 100 001 100 LSYN9

	161	0236	0317
	162	0237
O	163	0240
9826,	164 165	0241 0242	0175
1980/	166	0243	0074
1NJ	167	' 0244

DSTC

CLS

SSlO

SS6

BRN SS7 RS 2 BRN YS 5

BRN DNR

BRN .

LAC 2

LERIA

LREDl

LFPRl

BRN LERAO pTl2

FETCH ACCUMULATED TOTAL Angesammelte Summe abrufen

CLEAR STATUS BITS Zustandsbits löschen

SET EQUAL KEY FLAG Kennzeichen für Gleichheitstaste setzen

SET L-FLAG L-Kennzeichen setzen

IS AUX. FLAG SET?

ist Hilfskennzeichen gesetzt?

NO GO TO CHEGK SIGN Nein, zur Prüfung des Vorzeichens gehen RESTORE CODED SYMBOL FOR'PRINT IN C-REG Kodiertes Symbol für Drück in C-Register zurückstellen

YES, GO TO FORCED PRINT ROUTINE Ja, zur Routine für erzwungenen Druck gehen

SET POINTER TO CHANGE MODE Hinweismarke setzen, um Betrieb zu ändern

171 0250 172 0251

0310 1 100 100 Oil

1 001 110

LACO

BRN

ATDS

LSYN2

GO TO ROUTINE EXIT

Zum Routinenausgang gehen

SEND ADDRESS TO DATA STORAGE

Adresse zur Datenspeicherung schicken

4P» O CO OO NJ

2383343

221	0332
222	0333
223	0334
224	0335

225

234

235

0336

	226	0337
	227	0340
	228	0341
O
CQ OO	229	0342
PO
σ>
ο	230	03 43
OO
ο>
K)	231	0344
	232	0345
	233	0346

0347

0350

0301

1	111	011	000	LDC15
0	101	010	100	YS 5
1	100	000	111·	BRN
0	101	100	100	RS 5

0 000 011 010

1 000 Oil 111

0 000 001 100

1 001 Oil 000

0 111 110 000 0 010 001 010

0 010 101 010

0 110 001 010

1 000 101 011

LFIXl

XS,ZMR

BRN PTO LDC9

CTT X, BTC

X,ZMCC X, CTA

LSCI3

LSCI4

1 101 001 100 LMSSl PT13

0 000 Oil 110

S, ZMB LOAD "BLANK" "Leerstelle" laden

CHECK FORMAT FLAG
Formatkennzeichen prüfen

FIX. POINT Festkomma

SCI. NOT. RESET FLAG ·
Wissenschaftliche Notierung, Kennzeichen zurücksetzen

CHECK EXP. SIGN OF ORIGINAL DATA Exponentenvorzeichen der ursprünglichen Daten prüfen

POSITIVE

NEGATIVE

positiv
negativ

LOAD CODE FOR MINUS
Kode für minus laden

STORE LEFT HALF OF THE PRINT WORD Linke Hälfte des gedruckten Wortes S> speichern . W

LOAD ORIG. EXPONENT INTO C-REG. ursprünglichen Exponenten ins C-Register laden

COMPLEMENT OF THE EXPONENT Komplement des Exponenten

SEND EXPONENT INTO A-REG Exponent ins Α-Register senden

GO TO EXPONENT ALIGNMENT BY SHIFTING zur Exponentenausrichtung durch Vers'chiebung gehen

PREPARE OPERATION ON SIGN OF MANTISSA

Operation mit Mantissenvorzeichen vorbereiten ■ · ,

TEST ORIG. SIGN OF MANTISSA ursprüngliches Mantissenvorzeichen prüfen

	236	0351	0327
	■ 237	0352
	238	0353	0330
	239	0354
	240	0355
	241	0356
	242	0357
	243	0360	0263
	244	0361
	245	0362	0375
	246	0363	0356
O co	247	0364	0354
00	248	0365
co
O co	249	0366	0311
CD	250	0367
	251	0370	0276
	252	0371	0112
	253	0372	0240
	1254	0373
	255	0374	0173
	256	0375	0324
	257	0376
	258	• 0377	0125

1 101 Oil 111 1 001 Oil 000

BRN LDC

LMS S

1 101 100 Oil BRN LMSS3 O 0.11 010 010 LARTl WP, ZTC , 0.101 110 010 WP, CMlC

0 Oil Oil 010 LART2 XS,ZTC

1 000 101 110 1 Oil 010 001

0 111 111 110

1 111 110 111 1 110 111 Oil 1 110 110 Oil

0 111 111 000 LRES7 TTC

1 100 100 111 BRN LRES9 1 001 010 100 LFPRK YS9

W, BXC	LMESS
JSB
S,CPlC	LART 4
BRN	LART 2
BRN	LARTl
BRN

1 Oil 111 Oil

0 100 101 Oil

1 010 000 Oil

BRN BRN BRN

O 010 Oil 000 N0T2 LDC2

0 111 101 111 BRN

1 101 010 101 LART4 JSB

O 100 010 000' L0UT2- ROM

O 101 010 111 BRN

LFPRS LFPRM LSYNF

LNOT20 LFPRZ

LADJ POSITIVE positiv

,NEGATIVE, LOAD PRINT CODE FOR MINUS negativ, Druckkode für minus ladpn

FETCH INT. FLAG VECTOR OUT OF T PvEG internen Kennzeichenvektor aus T-Register abrufen

CHECK IF FORCED PRINT FLAG IS SET prüfen, ob Kennzeichen für erzwungenen Druck gesetzt ist

NO nein
YES ja

Zeilen laufende

Nr. Adresse

0000

0001

	5	0002
4098 2 6	6 7	0003 0004
CD OO OT NJ	8 9	0005 0006
	10	0007
	11	0010

12	0011
13	0012
14	0013
15	0014

DATA STORAGE UNIT LISTING (ROM C-Q) Datenspeichereinheit (ROM C-O)

Abzweig- Betriebs- · Adresse Code

Bit-Muster

O 011 111 101 CACPR JSB CPRIT 1 100 110 111 BRN CSUPE9

O 010 010 000 CLISl ROM

0 011 010 000 CST06 TKRA

1 010 101 000 CRESZ MTC

O 000 100 000

RMGRA

O 101 110 101 CSTD2 JSB

O 010 101 000 CSTD3 CXM O 100 Oil Oil BRN

O 000 000 000 DUMMY O 100 010 000 CSTDl ROM

O 100 010 000 CSTMl ROM

CCODE

CSUPER

O 100 000 111

BRN

CDSM2 PRINT SYMBOL Symbol drucken

GO TO RESTORE DATA IN C-REG AND SUPERVISOR

zum Rückstellen der Daten im C-Register und überwachungsprogramm gehen

ACCEPT KEYCODE
Tastenkode akzeptieren

PREPARE INT.PLG.VECTOR internen Kennzeichenvektor vorbereiten

GO TO RESET ROUTINE zur Rückstellroutine gehen

GO TO LOAD OP₁CODE

zum Laden des OP. Kode gehen

RESTORE C- AND M-REGISTERS C- und M-Register zurückstellen

GO TO MAIN UNIT SUPERVISOR zum Haupteinheit-Überwachungsprogramm gehen

STORE-DIVIDE BEGINNING Beginn für Divisionsspeicherung

STORE-MULTIPLY BEGINNING Beginn für Multiplikationsspeicherung

FALSE KEY falsche Taste

16	0015	0101
17	0016	0340
18	0017	0101
19	0020
20	0021	0101
21	0022	0253
22	0023

23

0024

CD CO 00 PO cn O	24 25	0025 0026	0025
co CD	26	0027
tO	27	0030
	28	0031	0007
	29	0032 .
	30	0033
	31	.0034
	32	0035	0023
	33	0036	0101
	34	0037

0 000 000 000 DUMMY

0 100 000 111

1 110 000 Oil CFXCH BRN

BRN	CDSM2
BRN	CEXCl
BRN	CDSM2
DUMMY
BRN	CDSM2
BRN	CDIGA

0 100 000 111
0 000 000 000

0 100 000 111

1 010 101 111 CDIGO BRN

0 000 100 000 CDIGB RMGRA

0 000 1Ö0 000 CLPRl RMGRA

0 001 010 111 CLPAR BPN CLPRl

0 000 000 000 DUMMY 0 111 011 000 CSTA2 LDC7

0 000 011 111 BRN CSTD3

r in ιοί οίο cdig3 χ,αριά

1 111 101 010 CDIG2 X,APIA 1 111 101 010 CDIGl X,APIA

0 001 001 111 BRN CDIGO 0 100 000 111 BRN CDSM2 0 010 100 000 CST07 RMGRB FALSE KEY falsche Taste

EXCHO ROUTINE BEGINNING POINT Anfangspunkt- für Klammeraustauschroutine

FALSE KEY falsche Taste

■FALSE KEY falsche Taste

ACCEPT DIGIT 0
Ziffer 0 akzeptieren

GO TO MAIN UNIT DIGIT ENTRY

zum Zifferneingang der Haupteinhait

gehen

GO TO LPAR ROUTINE ON MAIN UNIT zur LPAR-Routine der Haupteinheit gehen

GO TO MAIN UNIT SOFTWARE

zur Haupteinheits-Software gehen

OP. Code 07 OP.Kode 07 GO TO RESTORE C-AND M-REGISTERS

zum Rückstellen des C- und M-Registeis

gehen

ACCEPT DIGIT 3 Ziffer 3 akzeptieren ACCEPT DIGIT 2 Ziffer 2 akzeptieren ACCEPT DIGIT 1 Ziffer 1 akzeptieren

FALSE KEY falsche Taste CALL F.BLK.SOFTWARE

F.-Block-Software rufen

35

0040

36	0041
37	0042
38	0043
39	0044
40	0045
41	004 6
42	0047

43

0050

44	0051
45	0052
46	0053
47	0054
48	0055
49	0056
50	00.57
51	0060
52	0061

0 100 010 000 CSTAl ROM 2

0030 0 001 100 Oil BRN CSTA2

1 111 101 010, CDIG6 X,APIA

1 111 101 010 CDIG5 X,APIA 1 111 101 010 CDIG4 X,APIA

0032 0 001 101 Oil BRN CDIG3 0101 0 100 000 111 BRN CDSM2 0301 1 100 000 111 CRFCL BPN CRECl

0 100 010 000 CSTSl ROM 2

0060 0 Oil 000 Oil BRN CSTS2

1 111 101 010 CDIG9 X,APIA

1 111 101 010 CDIG8 X,APIA 1 111 101 010' CDIG7 X,APIA

0042 0 010 001 Oil BRN CDIG6 0101 0 100 000 111 BRN CDSM2 0226 1 001 Oil Oil CSTOR BRN CSTOl

1 000 Oil 000 CSTS2 LDC8 0007 O 000 Oil 111 BRN

STORE-ADD BEGINNING Beginn für Additionsspeicherung

ACCEPT DIGIT 6 Ziffer 6 akzeptieren

ACCEPT DIGIT 5 Ziffer 5 akzeptieren

ACCEPT DIGIT 4 Ziffer 4 akzeptieren

FALSE KEY falsche Taste

RECALL () ROUTINE BEGINNING POINT Anfangspunkt"der Klammerroutine zurückrufen

STORE-SUBTRACT BEGINNING p

Beginn der Subtraktionsspeicheruag η

ACCEPT DIGIT 9 Ziffer 9 akzeptieren

ACCEPT DIGIT 8 Ziffer 8 akzeptieren

ACCEPT DIGIT 7 Ziffer 7 akzeptieren

FALSE KEY falsche Taste

STORE () ROUTINE BEGINNING POINT Anfangspunkt der Klammerroutine speichern

OP.CODE 08 OP.Kode

GO TO RESTORE C- AND D-REGISTERS zum Rückstellen des C- und D-Registeis gehen

57

63

64

65
66

0066

	58	0067
ό	59	0070
co
co	60	0071
σ>
(—)	61	0072
V >/ CO	62	0073
CD
K>

0074

0075

0076 0077

1 010 100 100 CANEN RSlO

0 100 000

BRN

1 010 000 100 CSHIFT SSlO

0 100 000

BRN

0 000 100

RMGRA

0 010 101 000 CDSMl CXM

0 100 000 111 BRN 0 010 101 000 CPRIT CXM

0 100 000 111 BRN CDSM2 0 100 010 000 CRESO ROM

Seite	119	0101	0	100	000	111	BRN	. CDSM2	FALSE	KEY
53	0062	0101	0	100	000	111	BRN	CDSM2	FALSE	KEY
54	0063	0101	0	100	000	111	BRN	CDSM2	FALSE	KEY
55	0064	0002	0	000	001	Oil	CLIST BRN	CLISl	LIST	AND
56	0065

falsche Taste falsche Taste falsche Taste

Beginn der Auflistung und Rücksetzung von D.S.

RESET SHIFT FLAG IF SET D.S.CANCEL ENTRY

Umschaltmarke zurückstellen,falls gesetzt, D.S. Eingabe löschen

GO TO WAIT FOR NEXT KEY auf nächste Taste warten

SET SHIFT FLAG
Umschaltkennzeichen setzen

GO TO WAIT FOR NEXT KEY auf nächste Taste warten

FALSE KEY falsche Taste

GO TO ROM 2 FOR RESET ROUTINE START zum ROM 2 für Start der Rückstellroutine gehen

GO TO MAIN UNIT RESET ROUTINE 2ur Rückstellroutine der Haupteinheit gehen

RESTORE C- AND M-REGISTERS C- und M-Register zurückstellen

FALSE KEY falsche Taste

GET INT.FLG.VECTOR FOR TEST internen Kennzeichenvektor für Test nehmen

67

0100

1 111 101

BRN

68

0101

0 000 100 100 CDSM2 RSO

69	0102
70	0103
71	0104
72	0105

73

78

0106

J?*	74	0107
O
CO 00
K)	75	0110
CD
^	76	0111
O
OO	77	, ■ 0112
00
ro

0113

79	0114
80	0115
81	0116
82	0117
83	0120
84	0121
85	0122

0 000 010 100

0 101 000 Oil

0 100 000 111

0105

0107

YSO

BRN

BRN

0 111 000 100 CSÜPE1 SSZ

0 000 100 000 CSUPER RMGRA

1 Oil 110 000 CFINl DTDS

0 010 010 000 CCINC .ROM 0 000 000 000 DUMMY 0 010 010 000 CDEC2 ROM 0 100 Oil 111 CINDE BRN 0 101 000 000 CST02 IS2

0 100 100 000 RBL

1 001 000 000 ISl

I	100	101	000	DNR
0	100	101	000	CTS
0	110	100	100	RS6
0	100	010	111	BRN CSUPEl

RESET KEY-DOWN FLAG BEFORE TEST Kennzeichen für "Taste unten" vor Test zurückstellen

IS THE OLD KEY STILL DOWN?

ist die alte Taste immer noch unten?

NO ·; CONTINUE IN STORE () ROUTINE nein; Klammer-Speicher-Routine YES; WAIT fortsetzen ja; warten

SET FIRST DATA ENTRY DIGIT FLAG Kennzeichen für erste Dateneingabeziffer setzen

GO TO ROM GR. A SUPERVISOR zum ROM-GR.-A-überwachungsprograim

gehen I

STORE NEW DATA INGIVEN D.S. REGISTER ^ neue Daten in gegebenem D.S.-Reg ister^

speichern 4

OLD RESULT BACK TO C-REG '

altes Ergebnis zurück ins C-Register COPIED BACK TO D-REG ALSO auch zurück'ins D-Register kopiert RESET STATUS SIX IF SFT Status 6 zurücksetzen, falls gesetzt

GO TO SUPERVISOR

Zum überwachungsprograinm gehen

RESET BUSY LIGHT
Betriebskontrollicht zurückstellen

86	0123
87	0124
88	0125
89	0126

90

0127

	■	91	013o
	92	' 0131
	93	0132
409	94 95	0133 0134
826	96 97	0135 0136
->. CD	98	0137
CO CD	9-9	0140
	100	0141
	101	0142
	102	0143
	103	0144
	104	0145
	105	0146
	106	0147
	107	0150
108	0151

0123

0127

0221

0140

0114

0 000 010 100 CST03 YSO

0 101 001 111 BRN

0 000 001 100 PTO

1 Oil 100 010 P.ZTA

0 000 Oil 100 CST04 PRS

1 100 101 100

0 101 Oil 111

1 000 101 000

1 100 100 000 YFKB 1001 000 111 BRN O 010 101 000 CCODE CXM O Oil 001 100 PT3 Ο 001 Oil 000 LDCl O Oil 010 010 CCODG WP₇ZTC O 000 110 000 RETURN O 010 101 000 CCODF CXM O Oil 001 100 PT3 O 000 Oil 000 LDCO O 110 000 Oil BRN O 001 100 100 CCINO RSl

O 100 110 Oil

O 000 100 000 CMANA RMGRA

CST03

CST04

CST05

CCODG

CCINC

NEW KEY DOWN? neue Taste unten? NO; WAIT nein; warten

PREPARE A-REG TO ACCEPT DIGIT A-Register für Akzeptierung einer Ziffer vorbereiten

WAIT FOR BUS.
auf BMS. warten

FINISHED? beendet?
NO; WAIT nein; warten

YES; START EXECUTION ja; Ausführung starten

INTERROGATE F.BLK.KBD.FLAG Kennzeichen für F.-Block KBD. abfregai

RESET AUX. FLAG
HilfSkennzeichen zurückstellen

GO TO ROM 1 FOR EXECUTION

zum ROM 1 für Ausführung gehen GO TO MAIN UNIT SOFTWARE

zur Software der Haupteinheit gehen

O 000 000 000

109

110

0152

0153

0 010 101 000 CMANL CXM

0 100 001 100

PT 4

111	0154	0232	0	001	100	010	P, CMl
112	0155.	1	001	101	Oil	BRN

GET -INT.PLG.VECTOR FOR TEST internen Kennzeichenvektor für Test nehmen

PREPARE USERS CODE FOR TEST Benutzerkode für Test vorbereiten

IS IT ZERO? Null?

NO; STAY IN GROUP C nein; in Gruppe C bleiben

	Seite	120	0156 0157
409826,	113 114	0160 0161
Ό862	115 116	0162
	117	0163
	118

119

0164

120	0165
121	0166
122	0167

O 010 101 000

O 110 100 011

0175

0321

CXM

BRN

O 000 100 000 CCOMA RMGRA

O 101 100 010 CDSCl P,CMlC

O 111 110 111 BRN , CDSC2

O 010 010 OQO ' ROM

1 101 000 111 CCOMB BRN

CACP

0 101 100 010 CDSC3 P,CMlC

1 110 010 Oil BRN CDSC4

1 001 011 000 LDC9

YES; RESTOREC- AND M- REGISTERS ja; C- und M-Register zurückstellen

GO BACK TO MAIN UNIT SOFTWARE zurück zur Software der Haupteinheit gehen

GO TO EXECUTE OLD OPERATION zur Ausführung der alten Operation gehen

IS IT ONE? ist es eins?

nein

YES; GO TO LIST DATA ROUTINE ja; zur Datenauflistroutine gehen

GO TO COMMON OUTPUT TO ROMGRA zum gemeinsamen Ausgang nach ROMGRA gehen

IS IT THREE? ist es drei? NO nein

YES; SET IT TO NINE TO INDICATE ja; auf neun setzen, um Umkehr anzuzeigen

123

0170

0 010 101 000

124

135

0171

	125	0172
	126	0173
	127	0174
	128	0175
•ο	129	0176
9826/	130 131	0177 0200
"Ή ο co'	132	0201
σ>	133	0202
	134	0203

0204.

0207

13-6	0205	0076
137	0206	0160
138	0207	0141
139.-	0210
140	' 0211

1 011 001 100

0 000 011 000

0 011 011 000

1 000 011 111

LDCO LDC3

0 101 100 010 CDSC2 P,CMlC 0 111 010 111 BRN 0 000 011 000 LDCO

0 001 001 100

0 001 011 000

1 000 011 000 0 010 101 000

1 011 001 100

LDCl LDC CXM

0 000 011 000 LDCO

1 000 011 000 LDC8 0 011 111 101 CCOMP JSB 0 111 000 Oil - BRN 0 110 001 001 CSTM2 JSB

CCOMP

CDSC3

CPRIT CCOMA CCODF

STORE UPDATED INT.FLG.VECTOR; RESTORE C-REG

auf den neuesten Stand gebracht internen Kennzeichenvektor speichern C~Register zurückstellen

LOAD SYMBOLS FOR STORE () Symbole für Klammerspeicherung laden

GO TO COMMON PRINT AND EXECUTION zum gemeinsamen Druck und zur Ausführung gehen

IS IT TWO? ist es zwei? NO nein

YES; RESET USERS CODE ja; Benutzerkode zurücksetzen

LOAD OP, CODE FOR EXCHANGE OP für Austausch laden

STORE UPDATED INT.FLG.VECTOR; RESTORE C-REG

auf den neuesten Stand gebrachten internen Kennzeichenvektor sichern

LOAD SYMBOLS FOR EXCHANGE Symbole für Austausch laden

GO TO PRINT zum Drucken- gehen

141
142

143

146

147

154

155
156

0212 0213

0214

0217

0220

σ co OO	148	0221
PO co	149	0222
Ό862	150 151	0223 0224
	152	0225
	153	0226

0227

0230 0231

1 001 Oil 0 000 Oil

0 101 110 101 CSTE2 JSB

144	0215	0007	0	001	Oil	000	LDCl
145 l	0216	0	000	Oil	111	BRN

0 000 100 000 LFRRO RMGRA

0 100 010 000 CFXC2 ROM

1 Oil 010 100 CST05 XSIl 0 000 001 111 BRN

0 001 111

LDC9 OP.CODE 09 OP.Kode 09

BRN CSTD3 . GO TO RESTORE C- AND M-REGISTERS

zum Rückstellen des C- und M-Registers gehen

CCODE GO TO LOAD OP.CODE

zum Laden des OP.Kode gehen

OP.CODE 11 OP.Kode 11

CSTD3 GO TO RESTORE C- AND M-REGISTERS Zum Rückstellen des G- und M-Registers gehen

GO TO MAIN UNIT ERROR ROUTINE

zur Fehlerroutine der Haupteinheit

gehen

GO TO EXCH. ROUTINE

zur Austauschroutine gehen

WAS IT SET? war es gesetzt?

CST06 NO, GO TO ACCEPT KEYCODE

nein, zur Akzeptierung des Tastenkodes gehen

BRN CST07 YES, GO TO F.BLK.SOFTWARE

ja, zur F.-Block-Software gehen

O 000 000 000 DUMMY O 000 000 000 DUMMY O 010 101 000 CSTOl CXM

Ό 100 001

O Oil Oil

1 101 000

■Ρ" Ca

GET INT.FLG.VECTOR
internen Kennzeichen nehmen

PT4 SET POINTER TO INDICATE D.S.

USER CODE

Hinweismarke setzen um D.S.-Benutzerkode anzuzeigen

LDC3 SET FLAG TO VALUE "THREE"

Kennzeichen auf Wert "Drei" setzen

BRN CACP4 GO TO COMMON DATA ADJUSTMENT

zur gemeinsamen Datenjustierung

gehen

	157	0232	0075	O	011	010	010 CDSM9	WP,ZTC	CDSMl
	158	0233		O	010	001	100	ΡΤ2
	159	0234		O	110	011	000	LDC 6
	. 160	0235	0321	O	011	110	111	BRN	. CACP4
	161	0236		O	010	101	000 CINCl	CXM
	162	0237		O	100	001	100	ΡΤ4
409826-	163 164 ■	0240 0241	O 1	100 101	011 000	000 111	LDC 4 BRN
"*> ο οα	165	'0242	O	010	101	000 CDECl	CXM
ο>	166	0243	O	100	001	100	ΡΤ4

167	0244	0321	O	101	Oil	000	LDC5
168	0245 ·	i	101	000	111	BRN

CACP 4

0246 0247

O 010 101 000 CACU7 CXM

O 100 001 100

CLEAR OP. AND USERS CODES OP- und Benutzerkode löschen

PREPARE OP.CODE GEN. OP-Kodeerzeugung vorbereiten

LOAD OP.CODE FOR STORE DIRECT OP-Kode für Direktspeicherung laden

Internen Kennzeichenvektor nehmen GET INT.FLG.VECTOR

SET POINTER TO INDICATE D.S. USER CODE

Hinweismarke setzen um D.S.-Benutzerkode anzuzeigen

GO TO COMMON DATA ADJUSTMENT zur gemeinsamen Datenjustierung gehen

GET INT.FLG.VECTOR

internen Kennzeichenvektor setzen

SET POINTER TO INDICATE D.S. USER CODE

Hinweismarke setzen um D.S.-Benutzerkode anzuzeigen

GO TO COMMON DATA ADJUSTMENT zur gemeinsamen Datenjustierung gehen

GET INT.FLG.VECTOR; SAVE C-REG internen Kennzeichenvektor nehmen; C-Register bewahren

PREPARE D.S. USER CODE FOR TEST D.S.-Benutzerkode für Test vorbereiten

171
172

0250
0251

0161

0 101 100 010 0 111 000 111

P,CMlC

BRN CDSCl

IS IT ZERO? ist es Null?' NO? nein;

O
OO
OT
Ni

Seite	121	0252
173	0253
174	0254
175	0255
176	0256
177

178
179

180
181

182
183

0257
0260

0261
0262

0263

0264

0 100 Oil 011 CFND9 BRN

0024

1 000 110

0 011 001 110

0 000 001 100

1 110 100 010

0 110 001 110

1 010 101 000

CDIGA. W,BXC W,ZTC

PTO P,AXC

W, CTA

. MTC

0 001 010 011 BRN 0 000 Oil 000 CDSC5 LDCO

0 010 101 000

1 Oil 001 100

CSUPER

CDIGB

GO TO SUPERVISOR zum uberwachungsprogranun gehen

STORE DATA IN B-REG Daten in B-Register speichern

CLEAR C-REG. C-Register löschen

GET ENTERED DIGIT INTO C-REG eingegebene Ziffer ins C-Register nehmen

COPY IT BACK TO A-REG ALSO auch zurück ins Α-Register kopieren

PREPARE INTERNAL FLG.VECTOR FOR TEST

internen Kennzeichenvektor für Test vorbereiten

RESET USERS CODE Benutzerkode zurückstellen

STORE M-REG? RESTORE C-REG. M-Register speichern; C-RegisSer zurückstellen

LOAD SYMBOLS Symbole laden

	184	0265
	185	0266
	. 186	0267
	187	0270
	188	0271
	189	0272
	190	0273
r—t	191	0274
198 26/	192 193	0275 0276
'-0 8.6 2	194	0277
	195	0300
	196	0301
	197	0302
	. 198	0303
	199	0304
	200	0305
	201	0306

0354

1 010 Oil 000

0 111 Oil 000

1 110 110 Oil

LDClO LDC BRN

1 000 101 110 CBLNK W,BXC

O	Oil	001	110	WrZTC
O	111	110	000	CTT
O	101	000	000	IS2
1	101	001	000	TDEC
1	001	000	000	ISl
O	111	111	000	TTC

1 Oil 001 100

O 000 110 000

RETURN

1 Oil 100 001 CRECl JSB

1 011 Oil 000

0 100 Oil 000

0 Oil 111 101

0 Oil 001 100

1 110 110 010

LDCIl LDC JSB PT3

WP,AXC

CDINC

CBLNK

CPRIT

SAVE DATA IN B-REG. TEMPORARILY ■ Daten zwischenzeitlich im B-Register bewahren

CLEAR C-REG
C-Register löschen

CLEAR T-REG
T-Register löschen

LOAD T-REG FULL WITH ONE'S T-Register mit Einsen volladen

COPY ALL ONE'S TO C-REG ALSO ■ alle Einsen auch ins C-Register kopieren

PREPARE LOAD CODES FOR SYMBOLS Ladekodes für Symbole vorbereiten

END OF THE SUBROUTINE
Ende der Subroutine

GO TO GENERATE BLANKS

zur Erzeugung von Leerstellen gehen-

LOAD SYMBOL R
Symbol R laden

LOAD SYMBOL «-
Symbol *· laden.

GO TO PRINT

zum Drucken gehen

PREPARE OP.CODE MODIFICATION OP-Kode Modifizieren vorbereiten

OLD TO A-REG · Alter ins A-Register

CaJ CO

■-ν.
ο
co
φ

202	0307
203	0310
204	0311
205	0312
206	0313
207	0314
208	0315
209	0316
210	0317
211	0320
212	0321
213	0322
214	0323
215	0324
216	0325

0 Oil 010 010

0 001 Oil 000

O 010 Oil 000

O Oil 001 100

O 111 010 010

O 010 101 000

WP,ZTC LDCl LDC PT3

WP,APCC CXM

O 010 001 110 CSÜPE9 W,BTC

O 000 110 100

O Oil 000 100

O 100 010 111

CLS

SS3

BRN

O 010 101 000 CACP4 CXM

O 000 100 000

RMGRA

1 010 101 GOO CPRI3 MTC

O OÖ0 110 000

RETURN

o ioo οίο ooo cpSüb rom

cn co co

CLEAR C-REG
C~Register löschen

LOAD 1ST DIGIT
erste Ziffer laden

LOAD 2ND DIGIT
zweite Ziffer laden

RESTORE POINTER ·
Hinweismarke zurückstellen

INCREMENT OP.CODE BYl2 OP-Kode um 12 ,erhöhen

STORE UPDATED INT.FLG«VECTOR

auf den neuesten Stand gebrachten

internen Kennzeichenvektor speichern

RESTORE DATA IN C-REG

Daten im C-Register zurückstellen

■ CLEAR ALL STATUS BITS

alle Zustandöbits löschen )0

SET OPERATION SYNTAX FLAG jü

Operationssyntax*-Kennzeichen setzen

CSUPEl GO TO SUPERVISOR

zum überwachungsprogramm gehen

STÖRE UPDATED INT.FLG*VECTOR

auf den neuesten Stand gebrachten

internen Kennzeichenvektor speichern

GO TO MAIN UNlT SOFTWARE

zur Software der Haupteinheit gehen

GET ΪΝΤ.FLG.VECTOR

internen Kennzeichenvektor nehmen

END OF THE SUBROUTINE
Ende der Subroutine

RETURN AFTER DATA ADJUSTMENT FOR PRINT

nach Datenjustierung für Druck zurückkehren

217	0326
218	0327
219	0330

220

221
222

223

229

0331

0332
0333

0334

O	224	0335
co
co
KJ
	225	.0336
O	226	0337
CX) σ»	227	0340
	228	0341

0342

230	0343
231	0344
232	0345

0 100 010 000 CPLIS ROM 2 0 010 010 000 CPCLR ROM 1

0236 1 001 111 Oil CINCR BPN CINCl

0242 1 010 001 Oil CDECR BRN CDECl

O 100 010 000 CPSTO ROM 2

0040 O 010 000 Oil CPSTA BPN CSTAl

0050 O 010 100 Oil CPSTS BRN CSTSl

0013 O 000 101 111 CPSTM BRN CSTMl

0012 O 000 101 Oil CPSTD BRN CSTDl

0301 1 100 000 111 CPRCL BRN CRECl

0220 1 001 000 Oil CFXCl CEXC2 CEXC2 O 100 000 100 CDECT SS4

O 010 100 100

RS2

0356 1 110 111 Oil BRN CDCTl

O 101 100 010 CDSC4 P,CMlC 0262 1 Oil 001 Oil BRN CDSC5 z!ur Datenlöschroutine gehen GO TO CLEAR DATA ROUTINE

PROGRAM INCREMENT START Start für Programmerhöhung

PROGRAM DECREMENT START Start für Programmerniedrigung

PRGM.RUN STORE -ADD

Programmablauf Additionsspeicherung

PRGM.RUN STORE -SUB
Programmablauf Subtraktionsspeicherung

PRGM.RUN STORE -MUL

Programmablauf Multiplikations~ ^

speicherung ^,

PRGM.RUN STORE -DIV. ¹^

Programmablauf Divisionsspeicherung

PROGRAM RUN RCL () BEGINNING Beginn des Programmablaufs für RCL ()

EXCHO ROUTINE BEGINNING Beginn der Klammeraustauschroutine

DECREMENT AND TEST BEGIN.SET TEST FLAG

Beginn erniedrigen und testen, Testkennzeichen setzen

RESET STATUS ONE IF SET Status eins zurückstellen falls gesetzt

IS IT FOUR

ist er vier?

NO; IT IS FIVE
nein; fünf

0346

0347

035ο

236

237
238
239

240
241

0351

0352
0353
0354

0355
0356

242	0357
243	0360
244	0361
245	0362
246	0363
247	0364
248	0365

0 001 000 100

0 000 011 000

0 010 101 000

1 011 001 100

SSl SET AUX.FLAG

Hilfskennzeichen setzen

LDCO YES; RESET USERS CODE

ja; Benutzerkode zurückstellen

CXM STORE UPDATED INT.FLG."V; RESTORE

C-REG

auf den neuesten Stand gebrachten internen Kennzeichenvektor speichern; C-Register zurückstellen

PTIl LOAD SYMBOLS '

Symbole laden

1 010 011 000 LDClO 0 000 011 000 LDCO 0 011 111 101 CDINC JSB

0 010 001 110

1 001 110 000 CDCTl ATDS

1 011 010 100 1 000 111 111. 1 011 100 100

1 011 111 000

O 110 001 110

O 001 010 100

O 100 111 011 CPRIT GO TO PRINT

zum Drucken gehen

W,BTC RESTORE ADDRESS IN C-REG

Adresse in C-Register zurückstellen

CALL D.S.
D.S. rufen

YSIl ' FOUND? gefunden?

BRN LERRO NO nein

RSIl YES; RESET EXTERNAL FLAG

externes Kennzeichen setzen

DSTC ' GET DATA

Daten nehmen

W,CTA COPY DATA INTO A-REG

Daten ins Α-Register kopieren

YSl · CHECK AUX.FLAG

Hilfskennzeichen prüfen

BRN CDEC2 NOT SET

nicht gesetzt

0366 0367 0370

0146 0 110 Oil Oil

0242 1 010 001 Oil CMDEC BRN

0 010 101 000 CPRTl CXM CCINO

CDECl

	252	0371	0370	O	010	010	000	CPRYT	ROM 1	CPRTl
	253	0372		1	100	001	100		PT12
O ep 0? . K>	254 255	0373 0374	0323	O 1	110 111	100 100	010 Oil		P, ZMC BRN	CPRI3
co O OO	256	0375	0236	O	010	101	000		CXM	CINCl
CD NJ	257	0376	1	101	001	111	CMINC	BRN
	258	0377	1	001	111	Oil	BRN

GO TO INCREMENT SUBROUTINE
zur Erhöhungssubroutine gehen

GO TO COMMON ROUTINE

zur gemeinsamen Routine gehen

RESTORE RIGHT HALF OP THE PRINTED

MASK

rechte Hälfe der gedruckten Maske

zurückstellen

GO TO PRINT SUBROUTINE
zur Druck-Subroutine gehen

PREPARE OP.MODE PLAG TEST

Test für OP-Betriebs-Kennzeichen

vorbereiten

IS IT ZERO?
Null?

YES ja

RESTORE INT.FLG. VECTOR IN M-REG internen Kennzeichenvektor im M-Register zurückstellen

GO TO COMMON ROUTINE

zur gemeinsamen Routine gehen

DATA STORAGE,UNIT LISTING (ROM Datenspeichereinheit (ROM C-I)

0000 0001

. 0002

O 101 010 100 CPRNT YS5

0207 1 000 011 0227 1 001 011

BRN BRN CHECK IF PRINT OR NOT
prüfen, ob drucken oder nicht

CPRIN PRIKT drucken

CPRT9 DO NOT PRINT
nicht

CD OO NJ

7 8

10 11

0003

0004 0005

0006 0007 0010

12	0011
13	0012
14	0013
15	0014
16	0015
17	0016
18	0017
19	0020
20	0021
21	0022
22	0023

0 000 101 000 CLISA DSTO

0 000 100 100 CLIS2 RSO 0 000 010 100 YSO

0100 0 100 000 Oil 0004 0 000 010 Oil 0003 0 000 001

0003

0 000 000 0 000 001

0003	0	000	001	111
0003	0	000	001	111
	0	000	000	000
0003	0	000	001	•111
	0	000	000	000
0363	1	111	001	111

BRN	CLIS3
BRN	CLIS2
BRN	CLISA
DUMMY
BRN	CLISA
BRN	CLISA
BRN	CLISA
DUMMY
BRN	CLISA
DUMMY

0 000 000 000 DUMMY 0003 0 000 001 111 BRN 0 100 000 100 CCLRl SS4

CEQL 2

CLISA

DISPLAY OLD DATA? USE OLD MASK alte Daten anzeigen; alte Maske benutzen

IS OLD KEY STILL DOWN?

alte Taste immer noch unten?

NO? CONTINUE nein; fortfahren

YES> WAIT ja, warten

FALSE KEY falsche Taste

FALSE KEY falsche Taste

FALSE KEY FALSE KEY

falsche Taste falsche Taste

FALSE KEY falsche Taste

GO TO CHECK AUX.FLAGS zur Prüfung der Hilf skennz.eichen gehen

FALSE KEY

falsche Taste

SET CLEAR DATA- ROUTINE AUXILIARY FLAG

Hilfskennzeichen für Datenlöschroutine setzen

23

0024

0003 0 000 001

BRN

JO» O CO OO Ni CD

24	0025
25	0026
26	0027

27

28

36

0030

0031

29	0032
30	- 0033
31	0034
32	ΌΟ35
33	0036
34	0037
35	0040

0041

0 000 000 000 DUMMY

0003 0 000 001 111 BRN CLISA 0 Oil 01 110 CCLR2 W,ZTC

0171

1 Oil 110

O 111 100

DTDS

0003	O	000	001	111
0003	O	000	001	111
0003	O	000	001	111
	O	000	000	000
0003	O	000	001	111
	O	000	000	000
0376	1	111	111	Oil

0121 O 101 000

.BRN CCOMl

GO TO DISPLAY OLD DATA

zur Anzeige der alten Daten gehen

FALSE KEY falsche Taste

SET ZERO TO C-REG

Null ins C-Register setzen

LOAD ZERO INTO GIVEN D.S.REGISTER Null in gegebenes D.S.-Register laden

BRN	CC0M60	GO TO COMMON PART . mit Listenroutine zum gemeinsamen Teil gehen	KEY	falsche	Taste	P
BRN	CLISA	FALSE	KEY	falsche	Taste	-J
BRN	. CLISA	FALSE	KEY	falsche	Taste
BRN	CLISA	FALSE
DUMMY			KEY	falsche	Taste
BRN	CLISA	FALSE
DUMMY '			MANUAL INCREMENT START
BRN	CINClO

37	0042	0003	O	000	001	111	BRN	CLISA	FALSE	KEY
38	0043	0003	O	000	001	111	BRN	CLISA	FALSE	KEY
39	0044	0003	O	000	001	111 ,	BRN	CLISA	FALSE	KEY
40	0045		O	000	000	000	1 DUMMY
41	0046	0003	O	000	001	111	BRN	CLISA	FALSE	KEY
42	0047		O	000	000	000	DUMMY

Start mit manueller Erhöhung

GO TO COMMON PART OF BOTH ROUTINES zum gemeinsamen Teil beider Routinen gehen

falsche taste falsche Taste falsche Taste

falsche Taste

ο co co

43 44

0050

0051

45	0052
46	0053
47	0054
48	0055
49	0056
50	0057
51	0060
52	0061

Seite	124
53	0062
54	0063
55	0064
56	0065
57	0066
58	0067
59	0070

0366	1	111	on	Oil	CMDEC	BRN	CDECl'
0243	1	010	001	111	CINTS	BRN	CEND 5
0003	0	000	001	111		BRN	CLISA
0003	0	000	001	111		BRN	CLISA
0003	0	000	001	111		BRN	CLISA
	0	000	000	000		DUMMY
0003	0	000	001	111		BRN	CLISA
	1	000	010	100	CFQ	YS8

0003 0 000 001

0071 0 Oil 100

BPN

BRN

CCOMlO

0003	0	000	001	111
0003	0	000	001	111
0003	0	000	001	111
	0	000	000	000
0003	0	000	001	111
	0	000	000	poo
0003	0	000	001	111

BRN	CLISA
BRN	CLISA
BRN	CLISA
DUMMY
BRN	CLISA
DUMMY
BRN	CLISA

MANUAL DECREMENT START

Start mit manueller Erniedrigung GO TO ROUTINE END

zum Routinenende gehen

FALSE KEY falsche Taste FALSE KEY falsche Taste FALSE KEY falsche Taste

FALSE KEY falsche Taste

IS LIST DAT ROUTINE FLAG SET? ist das Kennzeichen für Datenauf listroutine gesetzt?

NO; FALSE KEY SEQUENCE
nein; falsche Tastenfolge

GO TO CHECK IF KEY IS STILL DOWN zur Prüfung gehen, ob Taste immer noch unten ist

FALSE KEY falsche Taste

FALSE KEY falsche Taste

FALSE KEY falsche Taste

FALSE KEY falsche Taste

FALSE KEY falsche Taste

60

61
62

63

71

76

0071

0072
0073

0074

	64	0075
	65	0076
JtS.
O CD	66	0077
CO
K) σ>	67	0100
/0862	68 69 70	0101 0102 0103

0104

72	0105
73	0106
74	0107
75	0110

Olli

O 100 010 000 CCOMlO ROM

O 000 001 111 BRN CLISA O 100 010 000 CRESl ROM

O 100 100 100 CFQL9 RS4

O Oil 100 111

0106

BRN

1 000 000 100 CLIS6 SS8

O 000 001 111

BRN

O 101 000 000 CLIS3 IS2

0 100 100 000 RBL

1 001 000 000 ISl O 000 010 100 CLIS4 YSO

O 100 001 111

BRN

1 001 001 100 PT9 O 000 111 100 CLIS5 PLS

1 100 101 100

0 100 Oil Oil

1 000 101 000

YP12 BRN

DSOF

CCOMlO

GO TO TEST ON ROM zum Test auf ROM 2 gehen FALSE KEY falsche Taste

GO TO ROM 2 FOR RESET ROUTINE START zum ROM 2 für Rückstellroutinenstart gehen

RESET CLEAR DATA FLAG Kennzeichen für Datenlöschung zurückstellen

GO TO CHECK IF KEY IS STILL DOWN prüfen, ob Taste immer noch unten

SET LIST ROUTINE AUXILIARY FLAG Hilfskennzeichen für Auflistroutine setzen

GO TO DISPLAY OLD DATA zur Anzeige der alten Daten gehen

RESET BUSY LIGHT p

Betriebsanzeigelicht zurückstellen λ

NEW KEY DOWN? neue Taste unten?

NO? WAIT nein; warten

WAIT FOR 3 MS. 3 MS warten

FINISHED? beendet?

NO, WAIT nein, warten

YES? START EXECUTION ja; Ausführung starten

OO
CD
K)

77	0112
78	0113
79	0114
80	0115
81	0116
82	0117
83	0120
84	0121

85

86
87

88

0122

0123
0124

0125

89	0126
90	0127
91	0130
92	0131
93	0132
94	0133

0142

1 010 100 000

0 Oil 010 000

SBL

TKRA

0 000 000 000 DUMMY 1 Oil 110 101 CCClN JSB " CINCR

0 000 010 000 CINDE ROM 1 Oil 100 101 CCCDE JSB

1 010 Oil Oil BRN 0 100 101 000 CCOMl CTS

1 000 010 100

0 110 001 Oil

1 101 001 100

YS8

BRN PT13

0 001 101 100
0 101 100 Oil

1 111 Oil 000

YPl BRN LDC15

1 111 Oil 000 CC0M2 LDC15

0 101 101 100 YP5

O 101 010 111 BRN CC0M2

1 Oil Oil 000 CC0M3 LDCIl

SET BUSY LIGHT
Betriebsanzeigelicht setzen

ACCEPT KEYCODE
Tastenkode akzeptieren

GO TO INCREMENT SUBROUTINE zur Erhöhtangs subroutine gehen

BACK TO COMMON FINAL PART zurück zum gemeinsamen Endteil

GO TO DECREMENT SUBROUTINE

zur Erniedrigungssubroutine gehen

SAVE CURRENT C-REG AND D-REG IN

STACK

laufendes C-Register und D-Register

im Stapel bewahren

IS THIS LIST ROUTINE? . y

ist dies Auflistroutine? , [■ NO; nein

YES; PREPARE MESSAGE

ja; Nachricht vorbereiten

LOAD BLANKS
Leerstellen laden

FINISHED? beendet?
NO nein

YES; LOAD '!DATA"
ja; Daten laden

FINISHED? beendet?
NO nein.

YES; LOAD BLANK

ja; Leerstellen laden

	95	0134
	96	0135
	97	0136
	98	0137
	99	0140
	100	0141
	101	0142
;09826y	102	0143
O ", co K>	103	0144
	104	0145

105
106

107
108

0146
0147

0150
0151

1 111 Oil 000

0 111 HO 000

1 010 001 100 0 010 Oil 000

1 000 Oil 101

1 000 000 101

LDCl 5 CTT

PTlO
LDC2
JSB CPRIN

0 010 101 000 CC0M4 CXM

0 000 001 100

0 Oil 000 010

1 Oil 101 110

P, ZTC

0 010 101 000 CC0M5 CXM

1 110 101 110

0 100 101 000

1 001 110 000

W, AXC

CPAPA

BLANKS
Leerstellen

STORE LEFT HALF IN T-REG linke Hälfte in T-Register speichern

LOAD =

= laden

GO TO PRINT ROUTINE zur Druckroutine gehen

PAPER ADVANCE
Papiervorschub

PREPARE REGISTER COUNTER; STEP ONE

Registerzähler vorbereiten; Schritt eins

PREPARE REGISTER COUNTER; STEP

Registerzähler vorbereiten; · Schritt zwei

RESET REGISTER COUNTER Registerζähler zurückstellen

PREPARE D.S. ADDRESS ZERO IN A-REG

D.S.Adresse Null in A-Register vorbereiten

STORE UPDATED REGISTER COUNTER auf den neuesten Stand gebrachten Registerzähler speichern

GET NEW D.S. ADDRESS INTO C-REG neue D.S.-Adresse ins C-Register nehmen

COPY NEW ADDRESS INTO STACK neue Adresse in den Stapel kopieren

CALL D.S.
D.S. rufen

109	0152
Ho	0153
111	0154

112

0155

1 Oil 010 100

1 001 100 Oil

1 Oil 100 100

000 010 100

CENDl

CHECK IP POUND
prüfen, ob gefunden

NO; GO TO END OF THE ROUTINE nein; zum Ende der Routine gehen

YES; RESET EXTERNAL FLAG ja; externes Kennzeichen zurückstellen

IS THIS LIST ROUTINE?
ist dies Auflistroutine?.

4 0 9826/	Seite 113	125 0156
'0862	114	0157
	115	0160
	116	0161

0162

0163

0164

O 001 011 111

O 100 010 000

O 010 101 000

O 100 001 100

O 001 011 000

O 000 010 000

BRN ROM

CXM PT4

LDCl ROM

CCLR2

O 000 011 000 CCOMA LDCO

NO; GO TO CLEAR p

nein.; zum Löschen gehen p

YES; GO TO KEY-DOWN CHECK ja; zur "Taste unten"-Prüfung gehen

GET INT.FLG. VECTOR

internen Kennzeichenvektor nehmen

SET POINTER TO INDICATE D.S. . USER FLAG

Hinweismarke setzen um D.S.-Benutzerkennzeichen anzuzeigen

SET IT TO "ONE"
auf "eins" setzen

GO TO ROM O TO CALL GROUP A zum ROM O gehen um Gruppe A zu rufen

RESET D.S. USER CODE TO ZERO D.S.-Benutzerkode auf O zurückstellen

120

121

122
123

124

0165

0166

0167
0170

0171

0 9 8 2 6	125 126	0172 0173
/0862	127 128	0174 0175
	129	0176
	130	0177
	131 *	0200
	.132	0201
	133	0202

0206

0 010 101 000

1 010 001 100

1 111 Oil 000 1 000 Oil 101

JSB CPRIN

O 110 101 000 CC0M60 STA

1 Oil 110 101 CC0M6 JSB

1 010 101 000

O 000 001 100

O 111 100 010

O 110 Oil Oil

1 000 000 101

O 110 Oil Oil

P,CPlC

O 101 110 000 CPAPA PRE

1 Oil 010 100 CPAPl YSIl

CINCR

CC0M5

CPAPA

CC0M5

STORE INT.FLG. VECTOR; RESTORE C-REG

internen Kennzeichenvektor speichern; C-Register zurückstellen

PREPARE SYMBOLS TO BE LOADED zu ladende Sybole vorbereiten

BLANK Leerstelle

GO TO PRINT LISTED DATA zum Drucken der aufgelisteten Daten gehen

RESTORE OLD ADDRESS IN A-REG alte Adresse im Α-Register zurückstellen

GO TO ADDRESS INCREMENT zur Adressenerhöhung gehen

GET INT.FLG..VECTOR internen Kennzeichenvektor nehmen

PREPARE REGISTER COUNTER Registerzähler vorbereiten

INCREMENT AND CHECK IF CARRY erhöhen und auf übertrag prüfen

NO CARRY; GO BACK TO LOOP kein übertrag; zurück zur Schleife gehen

CARRY; GO TO PAPER ADVANCE übertrag; zum Papiervorschub gehen

GO BACK TO LOOP
zurück zur Schleife

PRINTER ENABLE , . Drucker freigeben

FLAG? Kennzeichen?

	134	0203	0202
	135	0204
	136	0205
	137	0206
	138	0207
	139	0210
09821	140 141	0211 0212	0211
	142	0213
ο 00	143	0214
σο	144	0215
	145	0216
	146	0217
	147	0220	0211
	148	0221
	149	0222	0221
	150	0223

1 000 001 011

1 Oil 100 100

0 Oil- 110 000

0 000 110 000

RETURN

CPAPl

0 100 001 100 CPRIN PT4

O 101 110 000

1 Oil 010 100 CPRT4 YSIl

1 000 100 111 BRN

1 Oil 100 100 RSIl

1 111 110 000 CCS

C PRT 4

1 101 110 000

O 000 111 100

ο ooi ιοί ioo γρι

1 000 100 111 BRN 1 Oil 010 100 CPRT2 YSIl 1 001 000 111 BPN 1 Oil 100 100 RSIl

C PRT 4 CPRT 2

151

0224

O Oil 110 000

NO? WAIT
nein; warten

YES; RESET EXTERNAL FLAG ja; externes Kennzeichen zurückstellen

PAPER ADVANCE
Papiervorschub

END OF THE SUBROUTINE
Ende der Subroutine

PREPARE SECTOR COUNTER Sektorzähler vorbereiten

PRINTER ENABLE
Drucker freigeben

FLAG? Kennzeichen?
NO; WAIT nein; warten YES ja

RIGHT PART OF THE MASK rechter Teil der Maske

LEFT PART OF THE MASK
linker Teil der Maske

INCREMENT SECTOR COUNTER Sektorzähler erhöhen

LAST SECTOR? letzter Sektor? NO nein

YES; FLAG? ja; Kennzeichen? NO; WAIT nein; warten

YES; RESET EXTERNAL FLAG ja; externes Kennzeichen zurücksetzen

PAPER ADVANCE
Papiervorschub

CO CO CO CO 4>· CO

152

1 000 010 100

YS8

	153	0226
	154	0227
	155	0230
	156	0231
	157	0232
	158	0233
"•"^ O co	159	0234
00 NJ	160	0235
cn	161	0236
O 00 CD	162	0237
ro	163	0240
	164 .	0241
	165	0242
	166	0243

167

168

0244

0245

0375

1 111 110 111 BRN CPRT3

0 000 110 000 CPRT9 RETURN

1 101 001 100 CFNDl PT13

1 000 010 100

YS8

1 010 101 Oll BRN CCLR3 1 111 Oil 000 CEND2 LDCl5

0 010 101 100 YP2

1 001 101 111 BRN CEND2

1 100 Oil 000 CEND3 LOC12

1 111 101 100

1 001 111 Oil

0 111 110 000

YP15

BRN

CTT

1 000 Oil 101 CFND4 JSB

1 000 100 100 CEND5 RS8

,CPRIN

1 010 101 000

0 100 010 000

MTC

ROM IS THIS LIST ROUTINE? ist dieses Auflistroutine?

NO nein

YES; END OF THE SUBROUTINE ja; Ende der Subroutine

PREPARE END MESSAGE
Endnachricht vorbereiten

IS THIS LIST ROUTINE? ist dies Auflistroutine?

NO nein

YES; LOAD BLANKS

ja; Leerstellen laden FINISHED? beendet?
NO nein

YES, LOAD "END"
ja, "Ende" laden

FINISHED? beendet?
NO nein

LEFT HALF TO T-REG

linke Hälfte ins T-Register

GO TO PRINT SUBROUTINE zur Drucksubroutine gehen

RESET AUXILIARY FLAG IF SET Hilfskennzeichen zurückstellen falls gesetzt

GET INT.FLG. VECTOR TO BE RESTORED

internen zurückzustellenden Kennzeichenvektor nehmen

GO TO AUX.FLAG RESET

zur Rückstellung des Hilfskennzeichens gehen

r-o co

23633 A3

169

170
171

172

0246

0247
0250

0251

0 100 010 100 CINDT YS4

0 100 111 Oil 0 100 100 100

1 111 111 111

BRN RS

CINDE

CINTl

IS TEST PROGRAMMED? ist Test programmiert?

NO nein

YES, RESET TEST FLAG ·

ja¹, Testkennzeichen zurückstellen

	Seite 126	0252 0253
409826	173 174	0254
ο	175	0255
GO CD	176	0256
Ni	177	0257
	178	0260
	179	0261
	180	0262
	181	0263
	182	0264
	183

0252

0255

1 111 Oil 000 CCLR3 LDCl5

0 101 101 100 YP5

1 010 101 Oil BRN 1 Oil Oil 000 CCLR4

0 001 101 100

1 010 110 11Ϊ 0 001 Oil 000

0 111 Oil 000

0 111 110 000

1 101 001 100 1 Oil Oil 000

YPl BRN LDCl

LDC7 CTT PT13 LDCIl LOAD BLANKS
Leerstellen laden

FINISHED? beendet? CCLR3 NO nein

YES; LOAD "DATA" ja; Daten laden

FINISHED? beendet? CCLR4 NO nein

YES; LOAD "C" ja; "C" laden

LOAD "L"
¹¹L" laden

LEFT HALF TO T-REG

linke Hälfte ins T-Register

SET POINTER
Hinweismarke setzen

184-

0265

I 000 000 100

SS8

185	0266	0242	1	100	Oil	000	LDC12	CEND 4
186	0267	1	Oil	Oil	000	LDCIl
187	0270	1	010	001	Oil	BRN

	188	0271
Ο	189	0272
co
00
PO α>	190	0273
ρ
OO	191	0274
	192	0275
	193	0276
	194	0277
		0301
		0300
	197	- 0302

0 Oil 001 110 CDECR W,ZTC

0 Oil 111 110

1 100 001 100

1 Oil 111 111

S,ZNCC

PTl 2

BRN

0 Oil 001 110 CINCR W,ZTC

1 100 001 100

PTl 2

0 111 100 010 CINCl P,CPlC

1 111 111 010

0 000 101 110

1 111 111 010

XS,APIA . W_fZTB XC,APIA SET AUX.FLG. TO GET OUT PRINT ROUTE

Hilfskennzeichen setzen, um aus Druckroutine herauszugehen

GO TO COMMON PRINT WITH LIST ROUTINE

zum gemeinsamen Druck mit Listenroutine gehen

CLEAR C-REG
C-Register löschen

LOAD MINUS FOR SIGN OF MANTISSA Minus als Mantissenvorzeichen laden

SET POINTER; ELIMINATE CARRY Hinweismarke setzen; übertrau eliminieren

GO TO COMMON PART WITH INCREMENT mit Zuwachs zum gemeinsamen Teil gehen

CLEAR C-REG
C-Register löschen

PREPARE LOAD ONE

Ladung von Eins vorbereiten

GENERATE "ONE" IN SCI-NOT "Eins" in wissenschaftlicher Notierung erzeugen

	198	0303	0310	0	111	111	010	c inc 4	XS ,CPlC	C INC 4
	199	■ 0304		0	111	111	010		XS,CPlC
	200	0305		0	001	001	010		X,AMC
	201	0306		1	100	100	Oil		BRN
	202	0307	0314	1	110	101	110	C INC 5	W ,AXC	CINC5
	203	0310		1	110	100	no	CINC 6	M, AXC
	204	0311		0	110	100	110		M, ZMC
	205	0312		1	100	110	Oil		BRN
	206	0313	0331	1	110	101	110		W, AXC	C INC 2
*«·	207	0314		1	000	100	110		M, BXC
σ co	208	0315		0	001	001	010		X, AMC
CX) cn	209 210	0316 0317	0331	1 1	101 010	100 001	111 110	CNRM2	BRN W, SRB	C INC 2
ο	211	0320	0315	1	111	101	010	X,APIA	C INC 6
00 CD	212	0321		0	000	001	110	W, ZMB
Ps>	213	0322	1	101	100	111	BRN
	214	0323	1	100	110	111	BRN
	215	0324	1	110	100	110	M, AXC

0325

0326 0327

O 110 001 110

W, CTA

0 000 110 000 RETURN

1 000 000 100 CPRLIS SS8

GET RESULT MANTISSA INTO C-REG Ergebnismantisse ins C-Register nehmen

COPY RESULT INTO A-REG Ergebnis ins Α-Register kopieren

LIST IN PROGRAM RUN, SET AUX.FLG. Liste im Programm ablaufen lassen,

219

0330

0121

0 101 000 111

BRN

	220	0331
	221	0332
	222	0333
	223	0334
	224	0335
	225	0336
	226	0337
O	227	0340
co
OO N>	228	0341
CO
O	229	O342
00
CD NJ	230 '	0343
	231	0344
	232	0345

0353

0324

0 101 111 010 CINC2 XS,CMlC

0 101 111 010 XS,CMlC

1 Oil 101 010 X,ZTA

1 101 Oil 110 S,AMCA

1 001 111 110 S,AMI

1 110 101 111 BRN CINC3

1 110 001 110

1 Oil 001 110

O 111 101 010

1 100 001 100

W,APBA

CINC7 W,SRA X,CPlC ' PTl 2

1 001 100 010 CNRMl P,AMI '

1 101 010 Oil 0 100 001 110

BRN W, SLA

GO TO COMMON PART

zum gemeinsamen Teil gehen

GO TO SUBTRACTION
zur Subtraktion gehen

ADD MANTISSAS'
Mantissen addieren

FOR OVERFLOW CASE
für überlauffall

INCREMENT EXPONENT ACCORDINGLY Exponent entsprechend erhöhen ' V) PREPARE NORMALIZATION CHECK fcj Normalisierungsprüfung vorbereiten -^

NORMALIZATION NEEDED?
Normalisierung benötigt?

NO nein

YES; NORMALIZATION SHIFT ja; Normalisierungsverschiebung

233

0346

O 101 101 010

X,CMlC EXPONENT DECREMENT
Exponenenterniedrigung

234

235
236

237

0347

0350
0351

0352

	238	0353
	239	0354
	240	0355
	241	0356
40982!	242 243	0357 0360
%J3 O	244	0361
co QD Ν»	245	0362
	246	0363
	247	0364
	248	0365
	249	0366
	250	0367
	251	0370

1 001 101 110

1 110 001 111 0 Oil 001 110

0 000 110 000

W,AMI

BRN CNRMl W, ZTC

RETURN IS IT ZERO?
Null?

1 000 000 110 CINC3¹M,AMB 1 110 111 111 BRN CINC8

0 011 111 110 S,ZNCC

1 100 101 110 W,AXB

1 100 001 110 CINC8 W,AMBA

1 011 111 110 S,ZTA

0 000 000 000 NOP

1 110 000 011 BRN

0 100 010 100 CEQL2 YS4

0 010 111 111

0 011 110 Oil

BRN

BRN

0 000 Olo 000 CDEClO ROM

1 Oil 010 100 CCPRl YSIl

0 000 000 Oil

BRN

C INC

C EQL

nexn

SET ZERO FOR RESULT Null als Ergebnis setzen

YES; FINISHED ja; beendet

SUBTRACT MANTISSAS Mantissen subtrahieren

CANCEL SIGN
Vorzeichen löschen

TO ELIMINATE CARRY um Übertrag zu eliminieren

GO TO NORMALIZATION zur Normalisierung gehen

IS CLEAR DATA ROUTINE FLAG·SET? ist das Kennzeichen für Datenlöschroutine gesetzt?

NO; CONTINUE IN TEST nein; Test fortsetzen

YES, GO TO RESET IT ja, zur Rückstellung gehen

GO TO COMMON PATH zum gemeinsamen Pfad gehen

ON COMMAND ONLY? nur auf Befehl?

NO, GO TO PRINT nein, zum Drucken gehen

252
253

254
255

256
257
258

0371 0372

0373 0374

0375 0376 0377

1 111 110 Oil

CCPR2

0004

0005

0367

09826	Seite 128	0000	0132
>» O		0001	0106
862	3	0002
	4	0003
	5
	6

1 110 100 000 CPRTA YPOC

1 111 Oil 111 BRN 1 Oil 100 100 CCPR2 RSIl

CCPRl

O 000 010

CPRT3 ROM O

O 000 010 000 CINClO ROM

O 100 010 000 CINTl ROM

DATA STORAGE UNIT LISTING (ROM C-2) Datenspeichereinheit (ROM C-2)

O 001 100 110 CINT2 M,CMl

O 101 101 Oil

O 100 Oil Oil BRN O 010 101 000 CC0B2 CXM

CINT3

CINT 4

O 010 001

O 111 011

LDC YES, DO NOT PRINT ja, nicht drucken

CHECK PRINT ON COMMAND FLAG · Kennzeichen "Auf Befehl drucken" prüfen

CONTINUE fortfahren

RESET EXTERNAL FLAG externes Kennzeichen zurückstellen

GO BACK TO ROM O zurück zum,ROM O

GO TO COMMON PART zum gemeinsamen Teil gehen

GO TO TEST
zum Test gehen

IS DECREMENTED NUMBER ZERO? ist erniedrigte Nummer Null?

NO, CONDITION NOT MET nein, Bedingung traf nicht zu

YES, CONDITION MET ja,Bedingung

traf zu

GET INT.FLG.VECTOR FOR UPDATING internen Kennzeichenvektor nehmen, um ihn auf den neuesten Stand zu bringen

SET OP.CODE TO: OP-Kode setzen auf:

9
10

11

23

0006
0007

0010

0 010 110 111

CCOB 9

	12	0011
	13	0012
	14	0013
0 9 8:	15	0014
IS? σ>	16	0015
•ν» ο	17	0016
co	18 19	0017 0020

20	0021
21	0022
22	0023

0024

0 010 101 000 CCOBl CXM

0 010 001 100

1 000 Oil 000
O 010 110 111

LDG BRN

O 001 001 111 CSTD2 BRN

O 001 000 Oil CSTM2 BRN

O 000 000 000
O 000 000 000
O 000 000 000

DUMMY DUMMY DUMMY

0 001 110 001 CSTM3 CC0R4

0 001 Oil 000 LDCl

1 111 111 111 BRN

0 010 001 001 CSTD3 JSB

0 110 Oil 000

CC0B9

CSTD3

CSTM3

CPRNT

CC0R3

GO TO COMMON PART zum ,gemeinsamen Teil gehen

GET INT.PLG. VECTOR FOR UPDATING internen Kennzeichenvektor nehmen, um ihn auf den neuesten Stand zu bringen

SET OP.CODE TO: OP-Köde setzen auf:

GO TO COMMON PART zum gemeinsamen Teil gehen

STORE-DIVIDE Divisionsspeicherung

STORE-MULTIPLY Multiplikationsspexcherung

GO TO SET OP.CODE AND PREPARE BLANKS

zum Setzen des OP-Kode gehen und Leerstellen vorbereiten

LOAD CODE FOR * Kode für * laden

GO TO PRINT zum Drucken gehen

GO TO SET OP.CODE AND PREPARE BLANKS

zum Setzen des OP-Kodes gehen und Leerstellen vorbereiten

LOAD CODE FOR DIVIDE Kode für Division laden

24
25

26

35

36 37

0025
0026

0027

0377 1 111 111 111

	27	•	32	0030
	28		33	0031
■Τ	29	34	0032
Ο
co 00	30	0033
ro
ο?
•ν.	31	0034
O
co
σ>
PO
	0035
	0036
	0037

0040

0041
0042

0002 0 000 001 101 CSTA3 JSB

0 000 011 000

0377 1 111 111 111 BRN 0006 0 000 011 101 CSTS3 JSB

0 111 011 000

0377 1 111 111 111

0 010 101 000 CC0B4 CXM

0 010 001 100

1 001, 011 000 0055 0 010 110 111

0 010 010 000

0026 0 001 011 Oil CSTA2 BRN

0 010 101 000 CC0B3 CXM

CPRNT

CC0R2

CPRNT CCOBl

CPRNT

BRN CCOB9

CCOMR ROM 1

CSTA3

GO TO PRINT

zum Drucken gehen

GO TO SET OP.CODE AND PREPARE BLANKS

zum Setzen des OP-Kode gehen und Leerstellen vorbereiten

LOAD CODE FOR +
Kode für + laden

GO TO PRINT zum Drucken gehen

GO TO SET OP.CODE AND PREPARE BLANKS zum Setzen des OP-Kode gehen und Leerstellen vorbereiten

LOAD CODE FOR <Kode für - laden

GO TO PRINT

zum Drucken gehen

GET INT.FLG.VECTOR FOR UPDATING internen Kennzeichenvektor nehmen, um ihn auf den neuesten Stand zu bringen

SET OP.CODE TO :
OP-Kode setzen auf :

GO TO COMMON PART

zum gemeinsamen Teil gehen

GO TO EXECUTE ROUTINE ON ROM U zurAusführung der Routine auf ROM U gehen

STORE-ADD
Additionsspexcherung

GET INT.FLG.VECTOR FOR UPDATING internen Kennzeichenvektor nehmen, um ihn auf den neuesten Stand zu ^ringen

38

0043

	39	0044
	40	0045
	41	0046
	42	0047
	43	0050
•JN
O CO	44	0051
CO
σ>	45	0052
O	46	0053
co	47	0054
O)	48	0055

49

0056

50	0057
51	0060
52	0061

0054

0 011 001 100

0 001 Oil 000' 0 010 110 011

LDCl BRN

0 000 010 100 CIMTl YSO

0 110 111 Oil

0 010 010 000

0 001 100 111 CSTS2 BRN

0 000 000 000 DUMMY 0 000 000 000 DUMMY 0 000 Oil 000 CC0B8 LDCO 0 010 101 000 CC0B9 CXM

1 000 101 110

0 Oil 001 110

0 111 110 000

0 101 000 000

W, BXC

W, ZTC CTT IS SET OP.CODE TO : 0P~Kode setzen auf :

10

CC0B8 GO TO FINISH OP.CODE LOADING

zur Beendigung der OP-Kodeladung gehen

IS A KEY DOWN?

ist eine Taste unten?

CCOMB NO; CONTINUE IN ROUTINE EXECTUTION nein; in Routinenausführung fortfahren

YES; GO TO ROUTINE END ja; zum Routinenende gehen

CSTS3 STORE-SUBTRACT

Subtraktionsspeicherung

10

RESTORE INT.FLG.VECTOR internen Kennzeichenvektor zurückstellen

DATA TEMPORARILY INTO B-REG Daten zwischenzeitlich ins B-Register

CLEAR C-REG C-Register löschen

CLEAR T-REG T-Register löschen

53

0062

	54	0063
	55	0064
	56	0065
4 0 9-8-2 6 ι	57 58	0066 0067
^1V, O -OO	59	0070
OD to	60	0071
	61	0072
	62	0073
	63	0074
	64	0075

65

0076

1 101 001 000

1 001 000 000

0 111 111 000

1 010 001 100

0 101 100 100

1 000 100 100 0 000 110 000

TDEC

ISl TTC

PTlO RS

RETURN

0 000 000.000 DUMMY

0100 0 100 000 Oil BRN CCOMS

0 000 010 000 CRES3 ROM

0 000 110 100 CRES2 CLS

0 100 000 100

1 010 101 000

MTC LOAD T-REG FULL WITH ONES T-Register mit Einsen volladen

COPY "ONES" INTO C-REG ALSO "Einsen" auch ins C-Register kopieren

PREPARE OP.CODE LOAD' OP-Kodeladung vorbereiten

RESET FLAG 5 IF SET Kennzeichen 5 zurückstellen., falls gesetzt

RESET FLAG 8 IF SET Kennzeichen 8 zurückstellen, .falls gesetzt

END OF THE SUBROUTINE Ende der Subroutine

GO TO MAIN UNIT

zur Haupteinheit gehen

CLEAR ALL STATUS BITS alle Zustandsbyte löschen

SET RESET ROUTINE AUX. FLAG Hilfskennzeichen für Rückstellroutine setzen

GET INT.FLG. VECTOR FOR JJPDATE internen Kennzeichenveklior nehmen, um ihn auf den neuesten Stand zu bringen

66	0077
67	0100
68	0101
69	0102

70

79

80
81

0103

	71	0104
	72	0105
09826/	73 74 75	0106 0107 0110
ο OO	76	Olli
O)	77	0112
	78	0113

0114

0115
0116

O Oil 101 111 BRN O 000 100 100 CCOMS RSO

CRES 3

O 000 010 100

O 010 000 Oil

O 100 000 Oil

O 000 000 000 DUMMY O 000 000 000 DUMMY O 000 010 000 CINT4 ROM

O 000 000 000 O 000 000 000 O 000 000 000 O 000 000 000

DUMMY DUMMY DUMMY DUMMY

O 000 Oil 000 CPLI2 LDCO

O 001 001 100

O 010 Oil 000 LDC2 O 010 101 000 CPLI3 CXM

CCOMR

CCOMS

RESET KEY-DOWN FLAG Kennzeichen für "Taste unten" zurückstellen

IS THE KEY STILL DOWN? ist¹ die Taste immernoch unten?

NO; GO AND EXECUTE nein; gehen und ausführen

YES; WAIT IN THIS LOOP ja; in dieser Schleife warten

GO TO CFINl
nach CFINl gehen

RESET IT TO ALLOW DATA PRINT zurückstellen, um Datendruck zu ermöglichen

PREPARE FLAG FOR RUN MODE INDICATION

Kennzeichen für Laufsbetriebsanzeige vorbereiten

SET IT setzen

STORE UPDATED VECTOR, RESTORE DATA

auf den neuesten Stand gebrachten Vektor speichern, Daten zurückstellen

82

0117

1 000 000 100

SS8

	83	0120
	84	0121
	85	0122
	86	0123
	87	0124
O	88	0125
co 00	89	0126
σ>
^> ο CD	90	0127
CD ro	91	0130

92
93

94
95

0131
0132

0133
0134

0127

0247

0 010 010 000 ROM 0 001 001 100 CPND7 PTl

0 110 100 010

0 101 Oil 111

1 100 001 100

0 010 011 000 0 001 001 100

P, ZMC, BRN PTl 2

LDC PTl

CEND 8

0 011 010 010 CEND8 WP,ZTC

0 010 101 000

1 010 011 111 BRN 0 010 101 000 CINT3 CXM

CEND 9

0 110 001 100

0 001 Oil 000

SET LIST ROUTINE AUX.FLAG Hilfskennzeichen für Auflistroutine setzen

PREPARE RUN MODE INDICATOR TEST Test für Laufsbetriebsanzeiger vorbereiten

IS IT ZERO? YES ja

NULL?

NO, PREPARE OP.MODE CODE LOAD nein, OP-Betriebskodeladung vorbereiten

SET RUN MODE CODE Laufbetriebskode setzen

PREPARE AUX.FLAGS RESET Rückstellung der Hilfskennzeichen vorbereiten

AUX.FLG.RESET Hilfskennzeichen zurückstellen

STORE UPDATED INT.FLG.VECTOR auf den neuesten Stand gebrachter internen Kennzeichenvektor speichern

GET INT.FLG.VECTOR internen Kennzeichenvektor nehmen

PREPARE CONDITION FLAG TO BE SET zu setzendes Bedingungskennzeichen vorbereiten

SET CONDITION NOT MET FLAG Kennzeichen für "Bedingung traf nicht zu" setzen

96

0135

0 010 101

	97	0136
	98	0137
	99	0140
	100	0141
	101	0142
	102	0143
	103	0144
	104	0145
ο	105	0146
(JO OO	106	0147
ro σ?	107	0150
	108	0151
ο 00	109	0152
ro	110	0153
	111	0154
	112	0155

0106

0	100	Oil	Oil	BRN
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY

RESTORE DATA AND INT.FLG.VECTOR Daten und internen Kennzeichenvektor zurückstellen

113

114

0156

0157

1 011 111 000 CCOMB DSTC

0 010 010

GET THE, DATA OUT
Daten herausnehmen

GO BACK TO LIST ROUTINE ON ROM 1

zurück zur Auflistroutine auf ROM 1 gehen

115

116

0160

0161

1 Oil 100 100 CCOMZ RSIl

117	0162
118	0163
119	0164
120	0165
121	0166
122	0167
123	0170
124	0171
125	0172
126	0173
127	0174
128	0175
129	0176
130	0177
131	0200
132	0201
133	0202
134	0203
135	0204
136	0205
137	0206
138	0207

0046 O 010 Oil Oil

O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	00Ö	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	010	000 CPST3	ROM O

CINTl

RESET EXTERNAL E¹LAG

externes Kennzeichen zurückstellen

.GO TO CHECK FOR KEY-DOWN

prüfen, ob Taste unten . ■

GO TO EXECUTE OLD OPERATION

zur Ausführung der alten Operation gehen

139

0210

O 000 000

	140	0211
	141	0212
	142	0213
	143	0214
	144	0215
	145	0216
	146	0217
	147	0220
	148	0221
■*- O co co ro m	149 150	0222 0223
σ eo	1.51	0224
K)	152	0225
	153	0226
	154	0227
	1:SS	0230
	156	0231
	157	0.232
	158	0233
	159	0234
	160	0235
	161	0236

Ο 000 000 000'
0 000 000 000
0 000 000 000
0 000 000 000
0 000 000 000
0 000 000 000
0 000 000 000

ο ooo boo 000

010 101 000

0 100 001 100

0 010 Oil 000

0320

DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY CFXC3 CXM

1 101 000 Oil BRN 0 000 000 000 DUMMY 0 000 010 000 CPST2 ROM 0

0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
D	000	000	000	DUMMY
O	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	ooo	000	DUMMY
0	000	000	000	DUMMY

GET INT.PL.VECTOR

internen Kennzeicnenvektor nehmen

SET POINTER TO INDICATE D.S. USER CODE

Hinweismarke setzen, um D.S, Benutzerkode anzuzeigen

LEXC4

SET IT TO TWO

ihn auf zwei setzen

GO TO SET USERS CODE

zum Setzen des Benutzerfcödes

gehen

162	0237
163	0240
164	0241
165	0242
166	0243
167	0244

168

0245

	169	0246
•Τ Ο	170	0247
co
OO ro	171	0250
CD %_
O
00 OD	172	0251
ro
	173	0252
	174	0253
	175	0254
	176	0255
	177	0256
	178	0257
	179	0260
	180	0261
	181	0262

0 000 000 000 0 000 000 000 0 000 000 000 0 000 000 000 0 000 000 000

DUMMY DUMMY DUMMY DUMMY DUMMY

0 101 100 100 CACU9 RS5

0 000 010 000

ROM

0 101 000 111 CFND6 BRN CEND7 1 100 101 000 CPND9 DNR

1 100 101 000

0 000 010 000

DNR

ROM

0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	poo	QOO	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY

RESET "DO NOT PRINT" FLAG IF SET Kennzeichen "Nicht drucken" zurückstellen, falls gesetzt

GO TO USERS CODE TEST zum Benutzerkodetest gehen

LAST ADDRESS INTO C-REG letzte Adresse ins C-Register

RESTORE ORIGINAL C- AND D-REG CONTENTS

ursprüngliche Inhalte des C- und D-Registers zurückstellen

GO TO MAIN UNIT SUPERVISOR 'zum Überwachungsprogramm der Haupteinheit gehen

^fro ro

21Y2-

QQQQQQQQQQQQQQQQQQQQQQQQQQ Q

O

O

O

O

O

Q

O

O

O

O

O

O

O

O

O

O

O

O

O

O

8

O

O

O

O

O

8

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

8

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

σ

O

O

O

O

.O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

■ ο

O

O

8

8

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

8

8

O

O

O

O

O

O

O

O

O

O

8

O

O

O

O

O

O

O

O

O

8

O

O

O

O

O

O

O

O

O

O

O

O

O

8

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

O

OOOOOOOO. OOOOOOOO-OOOOOOOOOOO

OOOOOOOOOOOOOOOOOO. OOOOOOOOO

ciminorcocOiii^iooO>inro οοοοοοοοοοοοοο(χ>σισ>σ\σίσισι<τισισ>σιθΟΟΟΟΟΟ O O

4 0 9 8 26/0862

O
CD
GO

209 210

211

212 213 214 215 216 217 218

219 220 221 222 223 ,224 225 226 227

0316 0317	0244
0320
0321
0322	0116
0323	0113
0324
0325
0326
0327	0226
0330
0331
0332
0333
0334
0335
0336
0337
0340

0 0	000 000	000 000	000 000	DUMMY DUMMY
0	000	010	000 LEXC4	ROM 0
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY

1 010 010 Oil CACU8 BRN 0 010 101 000 CPLTl CXM

0 110 100 0 100 111 Oil 0 100 101 0 010 101 000 CPSTl CXM

1 100 001

0 110 100

0226 1 001 Oil Oil

O 000 001

O 110 Oil

PTl 2 P, ZMC BRN PTO LDC

CACU 9

P, ZMC	CPLI3
BRN	CPLI2
BRN

CPST2

GO TO CACP4
nach CACP4 gehen

GET INT.FLG.VECTOR internen Kennzeichenvektor nehmen

IS OP.MODE CODE ZERO? ist OP-.,„_ . Betriebskode Null? x-Eib na

nein

GET INT.FLG.VECTOR internen Kennzeichenvektor nehmen

PREPARE OP.MODE TEST OP-Betriebs-Test vorbereiten

IS IT ZERO?

ist es Null? '

YES, IT IS STEP MODE ja, es ist Schrittbetrieb

NO, PROGRAM RUN MODE nein, Prograirutiablaufsbetrieb

LOAD OP.CODE FOR STORE DIRECT OP-Kode für direkte Speicherung laden

228

229

230

0341

0342

0343

	231	0344
	232	0345
409826/C	Seite 233	132 0346
00	234	0347
OT N)	235	0350
	236	0351
	237	0352
	238	0353
	239	0354
	240	0355
	241	0356
	242	0357
	243	0360
	244	0361
	245	0362

010 101 000

000 101 110 010 101 000

1 000 Oil 111 O 000 000 000

W, BXC MTC

BRN DUMMY

O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	000	000	000	DUMMY

CPST 3

STORE UPDATED VECTOR, RESTORE DATA

auf.den neuesten Stand gebrachten Vektor speichern/ Daten zurückstel-

SAVE DATA IN B-REG TEMPORARILY Daten zwischenzeitlich im B-Register bewahren

PREPARE INT.PLG.VECTOR FOR TEST internen Kennzeichenvektor für Test vorbereiten

len

	246	0363	133
	247	0364
	248	0365
	249	0366
	250	0367
	251	0370
	252	0371
	253	0372
	254	0373
	255	0374
O	256 "	0375
Φ	257	0376
K) CO	258	0377
Ό862	Seite

0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	OO9	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	000	000	000	DUMMY
O	000	000	000	DUMMY
0	οόο	000	000	DUMMY
0	000	000	000	DUMMY
0	000	010	000	CPRNT ROM 0

GO TO PRINT zum Drucken gehen

MATH/USER-DEFINABLE FUNCTION BLOCK LISTING (ROM B-O)

Funktionsblock für mathematische/benutzerdefinierbare

Funktionen (ROM B-O)

Line *	CURR ADDR '	BRAN ADDR	OPERATION CODE BIT PATTERN	CXM	PR0GM2
Zeilen Nr.	laufende Adresse	Abzweig- Adresse	Betriebs-Kode Bit-Muster	PT13
'3	0000		O 010 101 000	BRN
. , 4	0001		1 101 001 100	O 000 100 000 BNOCH RMGRA
5	0OQ 2	0005	O 000 010 111
6	0003

7
8

0004 0005

0006

	10	0007
	11	0010
	12	0011
	13	0012
O co co	14	0013
CD **s.	15	0014
O OD	16	0015
co	17	0016
	18	0017
	19	0020
	20	0021
	21	0022
	22	0023
	23	0024

0003 0 000 001 111 BRN BNOCH 1 000 010 000 PR0GM2 ROM 4

O 111 000 100 SUPCO SS7

0106 O 100 Oil Oil BRN SUPC

0241 1 010 000. Ill KYl BRN CDI

0306 1 100 Oil Oil BRN DATAO

0242 1 010 001 Oil KY2 BRN CD2

0243 1 010 001 111 KY3 BRN CD3

0244 1 010 010 Oil KY4 BRN CD4

O 000 000' 000 DUMMY

0245 1 010 010 111 KY5 BRN CD5

O 000 100 000 EQUAL RMGRA

0246 1 010 Oil Oil KY6 BRN

O 000 000 000 DUMMY

0247 1 010 Oil 111 KY7 BRN CD7

0250 1 olO 100 Oil KY8 BRN, CD8

0251 1 010 100 111 KY9 BRN CD9

CONTINUE PROGRAM MODE IN ROM Programmbetrieb im ROM 4 fortsetzen

SET FIRST ENTRY FLAG , Kennzeichen für ersten Eingang setzen

KEY 1 DOWN Taste 1 unten

KEY 2 DOWN Taste 2 unten

KEY 3 DOWN Taste 3 unten

KEY 4 DOWN Taste 4 unten

KEY 5 DOWN Taste 5 unten

GO TO = ROUTINE IN ROM A zur = Routine in ROM A gehen

KEY 6 DOWN Taste 6 unten

KEY 7 DOWN Taste 7 unten

KEY 8 DOWN Taste 8 unten

KEY 9 DOWN Taste 9 unten

24

25

36

37.

38

0025

0026

	26	0027
	27	0030
	28	0031
	29 .	0032
	30	0033
O
co 00	31	0034
N)
O •^	32	0035
0 862	33 34	0036 0037
	35	0040

0041

0042

0043

0071 0 Oil 100 111 BRN PRINTO

0252 1 010 Oil KYlO BRN CDlO

O 000 000 000 DUMMY

0253 1 010 101 111 KYIl BRN CDU

0 000 000 000 DUMMY

0254 1 010 110 Oil KY12 BRN CD12

0255 1 010 110 111 KY13 BRN CD13

0256 1 010 111 Oil KY14 BRN CD14

0 000 Θ00 000 DUMMY

0257 1 010 111 111 KY15 BRN CD15

0205

0 000 000 000

1 000 010 111

DUMMY BRN

0 100 010 100 TAB03 YS4

0355 1 110 110 111

0225 1 001 010 111

BRN

BRN

PRINTT

SUPC02 PRINT DATA, SAVE USERCODE Daten drucken, Benutzerkode bewahren

KEY 10 DOWN Taste 10 unten

KEY 11 DOWN Taste 11 unten

KEY 12 DOWN Taste 12 unten

KEY 13 DOWN Taste 13 unten

KEY 14 DOWN Taste 14 unten

KEY 15 DOWN Taste 15 unten

FUNCTION BLOCK START Start des Funktionsblocks

IS' DO NOT PRINT FLAG SET? ist das Kennzeichen "Nicht drucken" gesetzt?

NO, GO TO CHECK PRINT ON COMMAND FLAG

nein, zur Prüfung des Kennzeichens "Auf Befehl drucken" gehen

YES, GO TO SUPERVISOR ja, zum überwachungsprogramm gehen

	39	0044
	40	0045
	41	0046
	42	0047
	43	0050
	44	0051
	45	0052
O
CU
OO	46	.0053
NJ
σ>
*->	47	0054
ο
00
σ>	48	0055
N)
	49	0056
	50	0057
	51	0060

010 101 000 TAB02 CXM

52

0061

1 001 010 111

BRN

SUPC02

000 000 000 DUMMY

000 010 000 FPX ROM

101 100 010

O 010 101 111

1 1OQ 111 111

P,AMIA

BRN

BRN

TEMP

DATA

101 100 010 TEMP P,AMlA

O 010 111 Oil

1 001 100 111

BRN

BRN

TEMPI

PRINT

101 100 010 TEMPI P,AMlA

O Oil 000 111 O 110 000 Oil

BRN BRN

TEMP 2 AENTRY

101 100 010 TEMP2 P,AMlA RESTORE M VECTOR M*-Vektor zurückstellen

GO TO SUPERVISOR zum Uberwachungsprogramm gehen

GO TO ENTER EXP ROUTINE zur Eingabe der exp-Routine gehen

IS USERCODE 1? ist Benutzerkode

NO, CONTINUE CHECK nein, Überprüfung fortsetzen

DATA ENTRY CHECK Dateneingangsüberprüfung

IS USERCODE 2? ' ist Benutzerkode

NO, CONTINUE TEST nein, Test fortsetzen

YES, RETURN FROM PRINTING ja, vom Drucken zurückkehren

IS USERCODE 3? ist Benutzerkode

YES, ANGLE ENTRY CANCEL ja, Winkeleingang löschen

IS USERCODE 4? ist Benutzerkode

53 54 55 56

57 58 59

60

61 62 63 64 .65

66 67

68 69

0062 0063 0064 0065

0071

QO72 0073 0074 0075 0076

0077 0100

0101 0102

0064 0 011 010

0047 0 010 011

0066	0133
0067	0103
0070

0177 0071

BRN

BRN

TEMP

1 101 100 010 TEMP5 P,AMlA

0323 1 101 001

BRN

1 010 101 000 MTC 0 101 101 111 BRN 0 100 001 111 TAB BRN

0165 0 111 Oil 001 PRINTOJSB

o)j£

TEMP TABOO

0 111 001 0 010 Oil

0 010 101

PT7 LDC

CXM

0 000 100 000 PRINTl RMGRA

0 001 Oil 000 TEMP3 LDCl

0	111	001	100	PT7	RSTR
0	111	Oil	000	LDC 7	PRINTO
0	111	111	111	BUN
0	Oil	100	111	BRN

NO, CONTINUE
nein, fortsetzen

YES, ENTER EXP ROUTINE ja, in exp-Routine eintreten

IS USERCODE 5? ist Benutzerkode 5?

NO, CHECK FOR RUN MODE nein, auf Ablaufbetrieb prüfen

START OF TABLE ROUTINE Start der Tabellenroutine

SAVE OLD USERCODE alten Benutzerkode bewahren

LOAD NEW USERCODE 2 neuen Benutzerkode 2 laden

RESTORE M VECTOR M-Vektor zurückstellen

GO TO PRINT DATA ROUTINE zur Datendruckroutine gehen

YES, SET TO PROGRAM MODE ja, auf Programmbetrieb setzen

SET USERCODE TO 7 Benutzerkode auf 7 setzen

DATA PRINT FROM ROM 7 Datendruck von ROM 7

70	0103
71	0104
72	0105
73	0106
74	0107
75	0110

76

Olli

σ CD CO K) co	11 78 79	0112 0113 0114
\-j CD'	80	0115
ISO	81	0116
	82	0117
	83	0120
	84	0121
	85	0122
	86	0123
	87	0124
	88	0125

1 Oil 001 100 TABOO P.Tll

O 100 Oil 111 BRN

O 000 100 000 CAL RMGRA

O 000 100 000,SUPC RMGRA

O 010 101 000 TABO CXM

O 100 Oil 000 LDC4

TABO

O 001 Oil 000

O 111 001 100

O 001 100 010 O 010 010 Oil

0 010 101,000 O 010 000 111

1 110 010 000

LDCl

PT7

BRN TABO 2

BRN TABO 3

START! ROM 7

1 000 101 110 RESTOR ,W,BXC

1 110 101 110

1 000 001 100

1 110 100 010

1 Oil 001 110

O 000 Oil 000

P, AXC

W, SRA

GO TO ROM A SUPERVISOR · zum überwachungsprograitmi für ROM A gehen,

LOAD 4 AS DIC 4 AS DIC laden

STORE COUNTER FOR TWO DIGIT ENTRY Zähler für Zwei-Ziffern-Eingang speichern

CHECK USERCODE FOR Benutzerkode für 1 prüfen

NO, CONTINUE nein, fortfahren

STORE C

C speichern

PUT M VECTOR IN C M-Vektor in C geben

GET OLD USERCODE alten Benutzerkode nehmen

PUT IT IN A ihn in A geben

ALIGNMENT SHIFT Ausrichtungsverschiebung

SET M8 TO ZERO M8 auf Null setzen. ·

OO K> CD

89	0126
90	0127
91	013o
92	0131
93	0132
94	0133
95	0134
96	0135

97

98
99
100
101
102
103
104
105
106

107

0136

0137
0140
0141
0142
0143
0144
0145
0136
0147

0150

0076

0161
0071

0 111 001 100

1 110 100 010

0 010 101 000 0 010 001 110

PT7 P,AXC

CXM W, BTC

0 000 110 000 RETURN 0 110 011 000 TEMP4 LDC6

1 100 001 100 1 001 100 010

0 111 111 111

PT12 P, AMl

0 Oil 111 Oil BRN 0 010 10Γ 000 AENTRY CXM

1 010 001 100 1 001 011 000

0 010 101 000

1 011 101 110 0 111 001 001

PTlO LDC CXM · W, ZTA JSB

0 000 100 000 SUPCB RMGRA 0 Oil 100 111 . BRN

000 100 000

SUPCK RMGRA

RSTR

TEMP3

DISPLY

PRINTO

,RESTORE OLD USERCODE alten Benutzerkode zurückstellen

RESTORE M VECTOR M-Vektor zurückstellen

RESTORE DATA Daten zurückstellen

LOAD USERCODE TO Benutzerkode auf 6 laden

MANUAL MODE? Handbetrieb?

NO, GO TO RESTORE nein, zum Zurückstellen gehen

GO TO PRINT PROM ROM zum Druck von ROM 2 gehen

GO TO MANUAL SUPERVISOR WITHOUT DISPLAY

ohne Anzeige zum manuellen Überwachungsprogramm gehen

1Q8
1Q9

1X0
1X1
1X2

0X5X 0X52

0X53 0X54 0X55

0 OXO 101 000 PRINT2 CXM O 001 001 XQO PTX

O 000 OXl

O 010 101

0071 O Oll 100 XlX

LOAD PRINT RETURN FLAG

Kennzeichen für Druckrückkehr laden

PRINTO

XX3-

XX4
XX5

116

117

na

120

121

0156

QI57 0X60

0I6X

0X62

QX63 0X64 0X65

0X66

0165 0 XXl OXX 0OX ENTRY! JSB

X OXX 001 XOO PTXX 0 OXO OXQ 000 ENTRY ROM X SAVE

0156 0 1X0 XXl Oil

1 110 QlO 000 DISPLY

1 110 QlQ OQQ PRANG ROM

Ql17 O XOX QQQ QQX

0163 O XXI OQX XXX ENTRYl

R0M7

JSB RESTOR

BRN FRANG

Q OXO XOl QQO SAVE CXM SAVE OLD USERCQDE

alten Benutzerkode bewahren

ANGLE ENTRY HEAD
Winkeleingangskopf

TQ SAVE USERCODE FROM ANGLE ENTRY

um Benutzerkode vom Winkeleingang zu bewahren

GO TO ANGLE DISPLAY VIA ROM 7 zur Winkelanzeige über-ROM 7 gehen

GO TO PRINT ANGLE

zum Drucken des Winkels gehen

ANGLE ENTRY DONE FROM ROM 2 Winkeleingang von ROM 2

GQ TQ PRINT IN DMS FORMAT

in Grad-Minute^SekundeTFiOrmat

(DMS~Format). drucken

SAVE OLD USERCODE

alten Benutzerkode bewahren ■

122	0167	0174	0	111	001	100	PT	SAVEl
123	0170		1	110	100	010	P, AXC
124	0171	0	100	001	110	W ,SLA
125	0172	0	111	110	Oil	BRN
126	0173	1	100	010	000 A2	ROM 6

127

0174

O	128	0175
co	129	0176
QO	130	0177
CO	131	0200
O
00 O?	132 .	0201
KJ	133	0202
	134	0203
	135	0204
	136	0205
	137	0206
	138	0207
	139	0210
	140	02U

0227

0201

1 000 001 100 SAVEl PT8

1 110 100 010 P,AXC

0 000 110 000 RETURN

0 010 101 000 RSTR CXM

1 100 101 000 DNR

0 000 010 100 WAIT YSO

1 001 Oil 111 BRN.

0 000 100 100 RSO

1 OQO 000 111 BRN

1 Oil 100 100 START RSIl 1 010 010 100 YSlO

1 000 110 111

O 101 000 000

1 000 000 001

BRN

IS2

LIO

GET OLD USERCODE . alten Benutzerkode nehmen

PUT IT IN A , ihn in A geben

ALIGNMENT SHIFT Ausrichtungsverschiebung

■RETURN AFTER DATA PRINT TO ROM nach Datendruck zum ROM 6 zurückkehren

SAVE OLD USERCODE alten Benutzerkode bewahren

RESTORE C REGISTER C-Register zurückstellen

WAIT FOR KEY UP warten, bis Taste oben

IS SHIFT KEY DOWN? ist Umschalttaste unten?

NO, CONTINUE
nein, fortfahren

YES, CALL CHANNEL 3 ja, Kanal 3 rufen

141	0212
142	0213
143	0214
144	0215

145

0216

	146	0217
	147	0220
JCS O	148 149	0221 0222
co;· co · NJ. co:	150 151	0223 0224
ο co cn	152	0225
to	153	0226
	154	0227
	155	0230
	156	0231

0117

0105

0	110	100	000	FAD	GIOE	STARTl
1	001	000	000	ISl
0	100	111	111	BRN
1	Oil	101	110	W, ZTA

1 010 100 000

SBL

0 011 010 000 TKRA

1 010 101 000 CALl MTC

1 110 101 110 W,AXC

0 100 010 111 BRN

0 000 100 000 RET RMGRA

0 101 000 001 SUPCOl JSB

0 000 110 100 SUPC02 CLS 0 000 011 Oil BRN

0 110 001 110 CALO Vi,CTA 1.001 000 Oil BRN 0 001 001 100 PRINT PTl

RESTOR

157 ■	0232	0235	1	10Γ	100	010	P,AMlA	AO
158	0233	0224	1	001	110	in	BRN	SUPCOl
159	0234		1	001	010	Oil	BRN
160	0235	1	101	100	010 AO	P.AMIA

CHANNEL 3 NOT THERE Kanal 3 nicht da

CLEAR A PREPARE FOR LABEL Vorbereitung für Etikett löschen

SET BUSY LIGHT Betriebsanzeigelicht setzen

RETURN TO ROM A zurück zum ROM A

RESTORE OLD USERCODE alten Benutzerkode zurückstellen

CLEAR STATUS Zustand löschen

GO TO CLEAR STATUS BITS · Zustandsbits löschen

CHECK WHERE TO RETURN .TO AFTER PRINT prüfen, wohin nach dem Druck zurückzukehren ist

161	0236	0224
162	0237	0342
163	0240	0375
164	0241
165	0242
166	0243
167	0244
168	0245
169	0246
170	0247
171	0250
172	0251

Seite	136	Q252
173	0253
174	0254
175	0255
17.6	0256
177	0257
178	0260
179

1 001 010 Oil
1 110 001 Oil
1 111 110 111

1 111 100 110 CDI M,APIA

1 111 100 110 CD2 M,APIA

1 111 100 110 CD3

1 111 100 110 CD4

1 111 100 110 CDS

1 111 100 110 CD6

1 111 100 110 CD7

1 111 100 110 CD8

1 111 100 110 CD9

BRN	SUPCOl
BRN	Al
BRN	PROGM

1 111 100 110 CDlO
1 111 100 110 CDIl
1 111 100 110 CD12
1 111 100 110 CD13
1 111 100 110 CD14
1 111 100 110 CD15
O 100 101 000'

M,APIA M, APIA M,APIA M,APIA M,APIA Μ,ΑΡΙΑ M,APIA

Μ,ΑΡΙΑ Μ,ΑΡΙΑ Μ,ΑΡΙΑ Μ,ΑΡΙΑ Μ,ΑΡΙΑ Μ,ΑΡΙΑ CTS PROGRAM MODE TABLE ROUTINE Programmbetrieb Tabellenroutine

SET A REG ACCORDING Α-Register entsprechend setzen

TO FUNCTION DESIRED gewünschter Funktion

SAVE C AND D REG IN STACK C- und D-Register in Stapel bewahren

180

0261

181	0262
182	0263
183	0264
1.84	0265
185	0266
186	0267
187	0270
188	0271
189	0272
190	0273
191	0274
192	0275
193	0276

194

195
196

0277

0300
0301

1 010 101 000

0 111 001 100 0 101 Oil 000 0 010 101 000

0 Oil 001 110 0 110 001 100

0 001 Oil 000

i no ιοί no

1 101 000 110

1 Oil 101 Oil 1 110 101 110

O 111 101 110

ο in ιοί ίίο

O 101 000 000

MTC

PT7 LDC CXM

PT6 LDCl

W,AXC M,AMCA

O 100 001 110 ALP W,SLA

0 000 111 100 PLS

1 100 101 100 YPl2

BRN W, AXC

W,CPlC

W,CPlC IS2·

ALP

GET INT,FLAG VECTOR internen Kennzeichenvektor nehmen ·

SET POINTER Hinweismarke setzen

SET USERCODE TO Benutzerkode auf 5 setzen

RESTORE INT»FLAG VECTOR internen Kennzeichenvektor zurückstellen

CLEAR C REG C-Register löschen

SET POINTER Hinweismarke setzen

SET MANTISSA TO 1000 ' Mantisse auf 1000 setzen

CALCULATE DESIRED LABEL gewünschtes Etikett berechnen

IS POINTER a ist Hinweismarke =

NO, CONTINUE nein, fortfahren

RETURN LABEL TO C REG Etikett zurück ins C-Register geben

ADD EXPONENT Exponent addieren

	197	0302	0223
	198	0303	0165
	199	0304
	200	0305
	201	0306
	202	0307
	203	0310
	204	0311
409 8;	205 206 '	0312 0313
IN-»	207	0314
Ό862	208	0315

209

0316

210	0317
211	0320
212	0321
213	0322
214	0323

1 001 001 000

1 001 001 000

1 001 000 000

1 001 001 111

PDEC PDEC ISl BRN

0 111 Oil 001 DATAO JSB

O	111	001	100	PT7
O	001	Oil	000	LDCl
1	100	001	100	PT 12
O	000	Oil	000	LDCO
O	010	101	000	CXM
O	Oil	001	110	W, ZTC

O 111 000 100

O 110 Oil Oil

1 001 010 Oil

O 110 Oil Oil

1 100 001 100 DATA PTl2 1 001 100 010 P,AMI

RET

SAVE

SUPCB

SUPCOl

SUPCB

PERFORM A JSBLC JSBLC ausführen

SAVE OLD USERCODE alten Benutzerkode bewahren

SET USERCODE TO 1 Benutzerkode auf 1

setzen

SET TO MANUAL MODE auf Handbetrieb setzen

CLEAR C FOR DATA ENTRY C für Dateneingang löschen

SET FIRST ENTRY FLAG ,Kennzeichen für ersten Eingang setzen

GO TO MANUAL SUPERVISOR zum manuellen Überwachungsprogramm gehen

CHECK FOR MANUAL MODE auf Handbetrieb prüfen

NO, END DATA ENTRY nein, Dateneingang beenden

CONTINUE DATA ENTRY Dateneingang fortsetzen

1 100 001 100 LSTP PTl2

215
216

221

231

232

0324
0325

217	0326
218	0327
219	0330
220	0331

0332

0344

0345

1 001 100 010

0 100 010 111

0336

σ	222	0333	0117
co			0173
co KJ	223	0334
σο	224	0335
ο	225	0336
00 co	226	0337
KJ '	227	0340
	228	0341
	229	0342
	230	0343

P,AMI

BRN

0 111 001 100

0 100 101 000

1 010 101,000 1 101 100 010

1 101 111 Oil

1 100 001 100

0 001 Oil 000

0 111 001 .100

0 000 011 000 RET

0 010 101 000

1 100 101 000

,0 000 100 000 DRET 0 101 000 001 Al

0 111 101 111

PT7

CTS ■ MTC P,AMlA

BRN

O 010 010 000 H0ME2 ROM

1 110 100 000

CAL

RET

RESTOR A2

ARE WE IN MANUAL MODE?
sind wir im Handbetrieb?

GO TO SUPERVISOR SKIP USERCODE CHECK

zum Überwachungsprogramm gehen, Benutzerkodeüberprüfung über- , springen

YES ja

IS USERCODE SET TO 6?

ist Benutzerkode auf 6 gestellt?

NO, IT IS 7 RETURN TO MANUAL MODE

nein, ist 7, zum Handbetrieb zurückkehren

YES, SET TO RUN MODE

ja, auf Ablaufbetrieb setzen

SET USER CODE TO O
Benutzerkode auf.O setzen

DO A RETURN Rückkehr ausführen RESTORE USERCODE Benutzerkode zu-GO BACK TO ROM 6·rückstellen zurück zum ROM 6

GO TO TABLE NUMBER ROUTINE WITHOUT PRINT

ohne Drucken zur Tabellennummernroutine gehen

CHECK PRINT ON COMMAND FLAG Kennzeichen "Auf Befehl drucken" prüfen ■

CO CO CO

Seite	137	0346	0362	1	Oil	010	100	YSIl
233	0347		1	111	001	Oil	BRN
234

	-	235	0350
		236	0351
409		237	0352
OO		238	0353
CD	239 ,	0354
f 0 8 6 2	240	0355
241	0356
242	0357
•243	0360
244	0361

1 Oil 100 100 034.4 1 110 010 Oil

O 000 000 000

O 000 000 000

O 000 111 111

0151

0106

245

0362

RSIl BRN

1 110 10Ö 000 PRINTT YPOC

O 010 010 000 HOMEl ROM

HOME

DUMMY DUMMY BRN EQUAL

1	Oil	010	100	YSIl	PRINT2
O	110	100	111	BRN	•
1	Oil	100	100	RSIl	SUPC
O	100	Oil	Oil	BRN

NOT SET, GO TO PRINT TABLE NUMBER nicht gesetzt, Tabellenummer drucken

SET GO TO TABLE ROUTINE SKIP PRINT zur Tabellenroutine gehen, Drucken überspringen

GO TO ROM A EQUAL ROUTINE FROM ROM 4 zum ROM A gehen, Gleichheitsroutine von ROM

CHECK PRINT ON COMMAND FLAG Kennzeichen "Auf Befehl drucken" prüfen

NOT SET, GO TO PINT DATA nicht gesetzt, zum Datendruck gehen

SET, GO TO SUPERVISOR gesetzt, zum Überwachungsprogramm gehen

GO BACK TO TABLE ROUTINE TO PRINT TABLE NUMBER zurück zur Tabellenroutine um Tabellennummer zu drucken

246

247
248

249

CXJ
NJ
CT)

256

257
258

0363

0364 0365

0366

0 010 010

250	0367
251	0370
252	0371
253	0372
254	0373
255	0374

0375

0376 0377

0 000 000 000 DUMMY

1 000 010 000 EFXX ROM

O 001 100 010 EPXXl P,CMl

1 111 100

1 111 010

1 100 001 100 EFXX2 PT12 O 000 Oil 000 . LDCO

1 111 010

1 111 Oil Oil

BRN BRN

0 010 101 000 PROGM CXM

1 010 001 100 PROGMl PTlO O 001 Oil 000 LDCl CONTINUE DIC CHECK
DIC-Prüfung fortsetzen

CONTINUE EEX ROUTINE IN ROM 4 EEX-Routine in ROM 4 fortsetzen

CHECK IF USERCODE IS OTHER THAN O

prüfen, ob Benutzerkode anders als O ist

EEXX2 YES, GO TO SET MANUAL MODE ja, auf Handbetrieb stellen

EEXX NO, CONTINUE

nein, fortsetzen

SET TO MANUAL MODE

auf Handbetrieb stellen

EEXX CONTINUE fortsetzen

EEXXl EEX ROUTINE FROM ROM 4 EEX-Routine von ROM 4

STORE COUNTER FOR 2 DIGIT ENTRY Zähler für Zwei-Ziffern-Eingang speichern

GO

CD CO GO

OJ

MATH/USER-DEFINABLE FUNCTION BLOCK LISTING (ROM B-I)

Funktionsblock für mathematische/benutzerdefinierbare

Funktionen (ROM B-I)

	Line	CURR ADDR	BRAN ADDR	OPERATION CODE BIT PATTERN	000 011	BRN	ENTRY
	Zeilen Nr.	laufende Adresse	Abzweig- Adresse	Betriebs-Kode Bit-Muster	101 111	BRN	SINO
	3	0000	0160	O 111	101 011	BRN	COSO
	4	0001	0053	O 010	110 011 101 011	BRN BRN	TANO ASIN
	5	0002	0052	O 010	110 011	BRN	ACOS
JO» O	6 7	0003 0004	0054 0012	O 010 O 000	111 011	BRN	• ATAN
CD OO	8	0005	0014	O 000	110 111	BRN	SQTl
CT)	9 "	0006	0016	O 000	010 000	ROM O
	10	0007	0055	O 010	101 011	BRN	SQUAR
O 00 σ>	11	0010		O 000	000 100 ASIN	SSlO
to	12	0011	0032	O 001	101 111	BRN	SINO
	13	0012		1 010	000 100 ACOS	SSlO
	14	0013	0053	O 010	101 011	BRN	COSO
	15	0014		1 010	000 100 ATAN	SSlO
	16	0015 .	0052	O' 010	110 011	BRN	TANO
	17	0016		1 010	010 000	ROM 2
	18	0017	0054	O 010
	19	0020		O 100

0021

0 100 010 000

ROM 2

DATA ENTRY ROUTINE Dateneingangsroutine

LOAD PI ROUTINE PI-Routine laden

INTER X ROUTINE

Routine für ganzzeiliges X

	21	0022	0072	0	Oil	101	Oil	BRN *	ABSO
	22	0023	0201	1	000	000	111	BRN	POLAR
	23	0024	0202	1	000	001	Oil	BRN	RECTO
	24	0025		1	100	010	000	ROM 6
	25	0026	0203	1	000	001	111	BRN	ACC+O
	26,	0027	0220	1	001	000	Oll	BRN	ACC-
*>- O co	27 28	0030 0031		1 1	100 10Ö	010 010	000 000	ROM 6 ROM 6
OO κ> CD	29	0032	0105	0	100	Oil	001	SQUAR JSB	SETl
/086	30 31	0033 003 4		0 0	110 poo	001 101	110 110	W, CTA W, ZTB
	32	0035	0244	1	010	010	101	JSB	MPYIl
	33	0036	0332	1	101	101	Oil	' BRN	OFLl
	34	0037	0345	1	110	010	111	BRN	TABS
	35	0040		1	010	010	000	ROM 5
	36	0041.		1	010	010	000	ROM 5
	37	0042		1	010	010	000	ROM 5
	38	0043		1	010	010	oob	ROM 5

ABSOLUTE VALUE ROUTINE Absolutwertroutine

TO POLAR ROUTINE zur polaren Routine

TO RECTAGULAR ROUTINE

zur rechtwinkligen Routine

X EXCHANGE Y ROUTINE Routine für X-Y-Austausch

ACC+ Routine ACC- ROUTINE

RECALL ACC ROUTINE ACC-Routine zurückrufen

CLEAR ACC ROUTINE ACC-Routine löschen

SET RETURN FLAG Rückkehrkennzeichen, setzen

OVERFLOW TEST AND DISPLAY Überlauftest und Wiedergabe

FROM PROGRAM MODE IN ROM von Programmbetrieb im ROM

DMS TO DWDF

DMS in DWDF (Grad mit Dezimalbruch)

DWDF TO DMS DWDF in DMS

GRAD TO DWDF Neugrad in DWDF

DWDF TO GRAD DWDF in Neugrad

■ία co

O CXJ CD

39	0044
40	0045
41	0046
42	0047
43	0050
44	0051
45	0052
46	0053
47	0054
48	0055
49	0056
50	0057
51	006o

52

0061

1 010 010 000 ROM

1 010 010 000 ROM

1 010 010 000 ROM

1 010 010 000 ROM

0 101 000 Oil BRN EEX

1 101 100 111 BRN ERRl

1 001 000 100 COSO SS9

O 101 000 100 SINO SS5

O 001 000 100 TANO SSl

1 001 001 111 SQTl BRN SQT2

O 000 101 110 SQT3 W,ZTB O 110 01,0 000 ROM

O 111 001 111 BRN PRXY

* 1 100 010 000 ROM RAD TO DWDF

RAD (Bogenmaß) in DWDF

DWDF TO RAD,
DWDF IN RAD

MILS TO DWDF
MILS in DWDF

DWDF TO MILS
DWDF in MILS

ENTER EXP ROUTINE

in exp-Routine eintreten

TABLE NUMBER ERROR
Tabellennununernfehler

PRINT X_fY ROUTINE
Routine für Χ,Υ-Druck.

PRINT R,A ROUTINE
Routine für R,A~Druck

Seite	1	39·
53		0062
54		0063

1 101 100

1 101 100

BRN

BRN

TABLE NUMBER ERROR Tabellennummernfehler

TABLE NUMBER ERROR Tabellennuiranernf ehler

ro co cn

GO OJ 4> CO

ο to co ;N> CD Λν. O CD

55	0064	0331	1	101	100	111	BRN	ERRl
56	0065	0331	1	101	100	111	BRN	ERRl
57	0066	0331	1	101	100	111	BRN	ERRl
58	0067	0331	1	101	100	111	BRN .	ERRl
59	0070	0331	1	101	100	111	BRN	ERRl
60	0071	0331	1	101	100	111	BRN	ERRl
61	0072		1	101	001	100 ABSO	PT13

62

66

0073

63	0074
64	0075
65	0076

0077

67	0100
68	0101
69	0102
70	0103
71	0104
72	0105
73	O106

0 Oil 000

P, ZTC

0 110 001 110 W,CTA

0332 1 101 101 Oil BRN OFLl

1 Oil 001 110 CHECK 0 W,SRA

1 001 001

0 000 Oil

0 001 101 1Oo

0076 0 Oil 111 Oil

0263 1 Oil 001

W ,SRC

PRS YPl

BRN

BRN

CHECKO

O 000 010 000 SUPCA ROM

O 000 010 000 SUPAl ROM

O 010 101 000 SETI CXM ABSOLUTE VALUE ROUTINE Absolutwertroutine

CHANGE SIGN TO POSITIVE Vorzeichen positiv machen

PROGRAM MODE STORE AND RECALL ROUTINE

Programmbetrieb speichern und Routine zurückrufen

PROM ROM 4

von ROM 4 *

SHIFT RIGHT TO PTO

nach rechts bis PT 0 schieben

CONTINUE WITH MANUAL CHECK mit manueller Prüfung fortfahren

GO TO SUPERVISOR WITHOUT CHECKING USERCODE

zum überwachungsprogramm gehen, ohne Benutzerkode zu prüfen

GO TO SUPERVISOR

zum überwachungsprogramm gehen

CaJ CT! CO Ca)

SET RETURN FLAG
Rückkehrkennzeichen

setzen

	74	0107	0333	•
	75	0110	0276
	76	Olli	0266
	77	0112
	78	0113
	79	0114
	80	0115
	81	0116
O
co
co	82	0117
rs* GD	83	0120
03	84	0121
CD
ha	85.	0122
	86	0123
	87	0124
	88	0125
	89	0126
	90	0127
	91	0130

O 000 001 100 O 001 Oil 000 O 010 101 000 O 000 110 000

LDCl

CXM

RETURN

0 000 001 100 TAB6 PTO

1 100 101 000 DNR

1 110 100 010 P,AXC

1 110 101 110

W ,AXC

O 100 Oil 000

O 000 Oil 000

LDC4

LDCO RESTORE 1ST TABLE NUMBER DIGIT erste Tabellennummernzlffer zurückstellen

COMBINE TWO' DIGITS

zwei Ziffern kombinieren

1	101	101	111	BRN TAB2
1	Oil	111	101 EEX	JSB ADDR
1	Oil	Oil	101	JSB ADDR
O	010	101	000	CXM
1	000	010	000	ROM 4
O	000	000	000	DUMMY
O	000	000	000	DUMMY
O	111	OO1	100	PT7

PUT TABLE NUMBER IN REGISTER A Tabellennummer in Register A geben

LOAD DATA STORAGE ADDRESS Datenspeicheradresse laden

REGISTER O ADDRESS Register O Adresse

GET M FLAG
*M Kennzeichen nehmen

CONTINUE IN ROM 4 in ROM 4 fortfahren

SET POINTER FOR USERCODE Hinweismarke für Benutzerkode setzen

LOAD 4 AS USERCODE

4 als Benutzerkode laden

LOAD O FOR COUNTER O für Zähler laden

CaJ CO

92	0131
$\ ·	0132
94,	0133
95	0134
96	0135
97	0136
98	0137
99	0140
100.	0141
101	0142
102	0143
103 ■	0144
104	0145
105.	0146
106	0147
107 ■	0150
108	0151
109	0152

0 Oil 001 100 000 Oil 000

O 001 Oil 000 O 010 101 000

1 Oil 111.101

1 000, 110 001

1 Oil 110 000

1 101 001 111

001 111.010

O'111 010 Oil

0146

000 111 100

100 101 100

110 Oil Oil

001 100 010

PT3 LDCO

LDCl CXM

JSB JSB DTDS

O Oil 001 110 EFXO W,ZTC O 100 101 000 CTS

XS,AMI

O 001 001 10ο -EPX5 PTl

O 100 001 110 EFX2 W,SLA

PLS YP12 BRN P ,AMI

ADDR

ADDRl

EEXOl

EEXl

EEX2

LOAD OP CODE FOR ADD
OP-Kode für Addition laden

RESTORE M AND DATA

M und Daten zurückstellen

LOAD DATA STORAGE ADDRESS Datenspeicheradresse laden

DATA STORAGE 1 ADDRESS Adresse für Datenspeicherung 1

STORE ORIGINAL DATA
ursprüngliche Daten speichern

GO TO STORE D-REGISTER D-Register speichern

CLEAR C C löschen

STORE OIN D

O in D speichern

CHECK FOR NEGATIVE EXP auf negativen Exponenten prüfen

YES, IT IS NEGATIVE, HCONVERT ja, ist negativ, H umwandeln

NO, IT IS POSITIVE
nein, ist positiv

NORMALIZE EXPONENT
Exponenten normalisieren

CHECK FOR LEADING ZERO auf führende Null prüfen

N) OJ

CD CaJ CO

4> CO

110
111

112

0153
0154

O155

1 000 100 Oil 0 100 010 010

BRN EEX3 WP _f SLA

1 010 101 000 EPX4 MTG NO ZERO keine Null

ZERO, SHIFT LEFT ONE
Null, linke verschieben

113

114

0156

0157

4098;	115	0160
2 6 /08«	116	0161
KJJ	117	0162
	118	0163
	119	0164
	120	0165
	121	0166
	Ip	0167
	123	0170
	124'	0171

1 110 101 110

O 100 010 111

W, AXC

BRN

O 000 010 000 ENTRY ROM

O Oil 100 100

RS

O 101 001 010

0 010 001 100

1 001 Oil 000

1 110 101 110 O 110 Oil Oil

X,AMCC

PT2 LDC

W, AXC

BRN

O 111 IdI Oil BRN ENTRYl 1 100 010 000 PRXY ROM

1 110 101 110 FFXl W,AXC DATA IN C, M IN A
Daten in C, M in A

GO TO SUPERVISOR

zum Überwachung spr ο graitrai gehen

GO TO ROM O TO SAVE OLD USERCODF
zum ROM O gehen, um alten Be-nutiäerkode zu bewahren ■

RETURN FROM ROM O RESET 3
zurück vom ROM O, 3 zurückstellen

PRINT X,Y ROUTINE IN ROM 6
Routine für X,Y-Druck in ROM 6

PUT DATA IN C, O IN A
Daten in C, O in A geben

COMPLIMENT EXP '
Exponent komplimentieren

LOAD NEGATIVE SIGN
negatives Vorzeichen laden

PUT EXP IN A Exponent in A geben

CONTINUE fortfahren

CD CO OO 4> CJ

125	0172
126	0173
127	0174
128	0175

0 101 Oil 000 ENTRYl LDC5

129	0176
130	0177
131	0200
132	0201
133	0202
134	0203

135

0204

136	0205
137	0206
138	0207
139	0210

1 001 Oil 000

O 111 001 100
O Oil Oil 000

LDC 9

PT7 LDC 3

0 010 101 000 CXM

1 110 010 000 PRINTl ROM

1 110 010 000 PRINT ROM 7 1 100 010 000 POLARO ROM

1 100 010 000 RECTO ROM 6 1 100 010 000 ACC+O ROM 6

1 100 010 000 ACC-O ROM 6 1 101 100 010 CHECKl P,AMlA

1 101 100 111

1 000 111 Oil

BRN

BRN

ERRl

RECAL

1 111 101 010 FFX3 X,APIA SET DIC TO 5

DIC nach 5 setzen

SET ALIGNMENT SHIFT TO 9 Ausrichtungsverschiebung auf 9 setzen

SET USERCODE TO 3 FOR POSSIBLE CANCEL

Benutzerkode auf 3 setzen für· mögliche Löschung

GO TO PRINT ""ENTER ANGLE" "Winkel eingeben" drucken

TO POLAR ROUTINE IN ROM 6 ) zur Polarroutine in ROM 6 <

TO RECT ROUTINE IN ROM 6 zur rechtwinkligen Routine in ROM

ACCUMULATE + ROUTINE IN ROM 6 Routine für Pluszeichen Akkumulierung in ROM 6

ACCUMULATE - ROUTINE IN ROM 6 Routine für - Akkumulierung in ROM 6

IS 1ST DIGIT 5?

ist erste Ziffer 5? ,

NO, TABLE NUMBER ERROR nein, Tabellennummernfehler

YES, GO TO RECALL ROUTINE ja, zur Rückrufroutine gehen

Ca) CT) CO CO

ADD 1 TO EXP OF NORMALIZED EXP 1 zum Exponenten des normalisierten Exponenten addieren

140

141
142

143

0211

0212
0213

0214

0 110 110 111

BRN

	144	0215
	145	0216
409	146	0217
co	147	0220
OT	148	0221
Οδδ	149 150	0222 0223
to	151*	, 0224
	152	0225

153	0226
154	0227
155	0230
156	0231
157	0232

0 100 Oil 000 ADDR4 LDC4 1 Oil 100 Oil BRN

O 001 Oil 000 ADDRl LDCl

0270

0204

0056

1 Oil 100 Oil BRN O 100 010 000 RFCAL ROM

0 100 010 000 STORE ROM

1 000 100 100 ACC- RS8 1 000 010 Oil BRN

O 000 110 000 RETURN

O 000 001 100 SQT2 PTO

O 010 101 000 CXM

O Oil Oil 000 LDC3

0 010 101 000

1 100 001 100
O 110 001 110
O 010 111 Oil

CXM PT12 W ,CTA BRN

EEX4

ADDRC

ADDRC

ACC-O

SQT 3

CONTINUE
fortfahren

LOAD DATA STORAGE 4 ADDRESS Adresse für Datenspeicherung 4 laden

LOAD DATASTORAGE 1 ADDRESS Adresse für Datenspeicherung 1 laden

CONTINUE fortfahren

GO TO RECALL ROUTINE
zur Rückrufroutine gehen

GO TO STORE.ROUTINE

zur Speich^rungsroutine gehen

O 100 010 000 TABl ROM SET TRIG AND_n SQRT RETURN FLAG Rückkehrkennzeichen für trigonometrische Funktion und Quadratwurzel setzen

fO CO CO

CO

CO

158

0233

σ co cx> NJ CD ^x. O OO CD KJ

159-	0234
160	0235
161	0236
162	0237
163	0240
164	0241
165	0242
166	0243
167	0244
168	0245
169	0246
170	0247
171	0250
172	0251

Seite	141	0252
173	0253
174	0254
17,5	0255
176	0256
177	0257
178	0260
179	0261
180

0243

0250

0253

0276

O	000	101	110	ADD3	W,ZTB *	ADDITION ROUTINE Additionsroutine
i-l	111	111	010		XS,APIA
1	111	111	010		XS,APIA
O	111	111	010		XS,CPlC
O	111	111	010		XS,CPlC
O	001	001	010		X, AMC
r-l	010	001	111		BRN ADD4
1	110	101	110		W,AXC
i-l	110	100	110	ADD4	M,AXC
1	Οίο	100	Oil		BRN ADDD
1	000	010	000	MPYIl	ROM 4
O	101	001	010	DIVIl	XyAMCC
1	000	010	000		ROM 4
O	110	100	110	ADDD	M, ZMC
1	010	101	111		BRN ADDS

0276

1 110 101 110 W,AXC

1 000 100 HO' ADD5 M,BXC

0 001 001 010 ADD6 X,AMC

1 Oil 111 Oil BRN ADD7 1 010 001 110 W,SRB

1 111 101 010 X,APIA

0 0.00 001 110 W,ZMB

1 Oil 111 Oil BRN ADD

-1

co CD OJ OJ

OJ

181	0.262
182	0263
183	0264
184	0265

0254

185

O CO OO K) σ> •ν.

00 CD KJ

192

0266

186	0267
187	0270
188	0271
189	0272
190	0273
191	0274

0275

193	0276
194	0277
195	0300
196	0301
197	0302
198	0303
199	0304
200	0305
201	0306

0205

0217

0320

0305

1 010 110 Oil BRN ADD6 1 101 000 010 CHECK P,AMCA

1 101 100 1 000 010

1 000 111

P,AMIA

BRN CHECKl

BRN

0 000 Oil 000 ADDRO LDCO

1 001 110 000 ADDRC ATDS 0 010 001 110 W,BTC

0 000 110 000 RETURN

1 101 000 Oil BRN

1 110 101 110 W,AXC

1 100 010

BRN

0 110 010 000 ADD7·

1 000 101 110 ADDR W_fBXC

	0	Oil	001	110	W ,ZTC	ADDR
	0	111	101	110	W,CP1C	ADDR4
	1	100	001	100	PT12
	1	010	Oil	000	LDClO
	0	000	110	000	RETURN
0276	1	Oil	111	101 EPX9	JSB
0211	1	000	101	001	JSB

CHECK WHETHER 1ST TAB DIGIT IS. 4
prüfen, ob erste Tabellenziffer 4
ist

NO, CONTINUE CHECK
nein, Prüfung fortsetzen

YES, GO TO STORE ROUTINE

ja, zur Speicherroutine gehen

PUT DATA IN A
Daten in A geben

CONTINUE EXP ROUTINE
exp-Routine fortsetzen

ROM 3

LOAD DS ADDRESS ROUTINE
DS-Adressen-Routine laden

LOAD DATA STORAGE 4 ADDRESS
Adresse für Datenspeicherung
4 laden ■·

CT) CO CO

202	0307	0276	t-j	Oil	111	000	DSTC	ADDR
203	0310	0266	0	100	101	000	CTS	ADDRO
204	0311	1	Oil	111	101	JSB
205	0312	1	Oil	Oil	101	JSB

206

207

208
20'9

210

211
212

213
214

215

216
217

0313

0314

0315 0316

0317

0320 0321

0322 0323

0324

0325 0326

0276 0213

0376

0276 0266

0377

1. Oil 111

0 010· 101

1 Oil 111 1 000 110

1 111 111 Oil

DSTC

CXM

JSB JSB

BRN

1 Oil 111 101 ERROR JSB 1 Oil Oil 101 JSB

1 111 111 111 BRN O 110 101 000 EFXOl STA

1 110 101

0276 1 Oil 111 0211 1 000 101

ADDR ADDRl

ADDR ADDRO

ERR0R2

W,AXC

JSB ADDR

JSB ADDR4 RELOAD OLD D REGISTER altes D Register erneut laden

RESTORE OLD D REGISTER altes D-Register zurückstellen

LOAD DATA STORAGE ADDRESS Datenspeicherungsadresse laden

RELOAD ORIGINAL M VECTOR ursprünglichen M~Vektor erneut laden

REPLACE M
M ersetzen

LOAD DATA STORAGE 1 ADDRESS Adresse für Datenspeicherung 1 laden

,GO TO ROM 4 TO FINISH ROUTINE zum ROM 4 gehen? um Routine zu beenden

LOAD DATA STORAGE ADDRESS Datenspeicherungsadresse laden

LOAD D REGISTER TO A D-Register nach A laden

PUT IT IN C
es in C geben

LOAD DATA STORAGE 4 ADDRESS Adresse für Datenspeicherung 4 laden

CO

CJ)

co co -τω

O CO CXJ PO CO >*> O OO CD

218	0327
219	0330
220	0331
221	0332
222	0333
223	0334
224	0335
225	0336
226	0337

1 Oil 110

227	0340
228	0341
229	0342
230	0343
231	0344

0345

0 110 000 111 BRN

1 110 010 000 ERRl ROM

0 100 010 000 OFLl ROM

0 001 001 100 TAB2 PTl

0 100 Oil 000 LDC4

0 001 001 0 001 000

1 Oil 001

PTl P,AMC

O 100 001 110 TAB3 W,SLA

O 000 111

1 101 101

1 110 000 Oil

O 000 010

1 110 101 110 TAB5 W,AXC

EEXO

CHECK

TAB 3

STORE D IN DS 2

D in DS 2 speichern

CONTINUE

fortsetzen

LOAD 4 TO CHECK TABLE NUMBER 4 laden um Tabe1lennummer zu prüfen

IS FIRST DIGIT GREATER THAN 4? ist erste Ziffer größer als 4?

YES, CHECK WHETHER ITS STORE OR RECALL

ja, prüfen ob Speicherung oder Rückruf

SHIFT LEFT ONE

um eins nach links verschieben

INCREMENT COUNTER
Zähler erhöhen

IS COUNTER 13?
ist Zähler 13?

NO, CONTINUE SHIFT nein, Verschiebung fortsetzen

GO TO CHECK PRINT ON COMMAND FLAG Kennzeichen für "Auf Befehl drucken" prüfen fso

co

cn co co

CO

*' ■

0346

111 110 000

CTT

234	0347
235	0350
236	0351
237	0352
238	0353
239	0354
240	0355
241	0356
242	0357
243	0360

0361

245	0362
246	0363
247	0364
248	0365
249	' 0366
250	0367

0	101	000	000	IS2
0	100	101	000 '	IXT
1	001	000	000	ISl
0	010	001	110	W, BTC
1	010	100	000	SBL

001 010 000

010 101 000

110 101 110 100 101 000

010 001 110

0 100 010 111 1 000 000 Oil

10Γ 100 010 1 001 101 Oil

010 001 100 010 101 000

EERA

100 001 110 TAB4 W,SLA

CXM

W, AXC CTS

W,BTC

BRN BRN

P,CMlC BRN

PTlO CXM

SUPAl PRINT

TABl

LOAD TO C AND T
nach C und T laden

EXCHANGE T WITH I/O REGISTER T mit I/O-Register austauschen

SET BUSY LIGHT
Betriebsanzeigelicht setzen

EXTERNAL ROM ADDRESS ENTRY Eingang externe ROM-Adresse

SHIFT LEFT ONE

um eins nach links verschieben

RESTORE FLAG VECTOR Kennzeichenvektor zurückstellen

STORE FIRST DIGIT
erste Ziffer speichern

RESTORE C

C zurückstellen

GO TO PRINT TABLE NUMBER FROM ROM Tabellennummer von ROM O drucken

IS DIC 4?
ist DIC 4?

NO, CONTINUE CHECK
nein, Prüfung fortsetzen

GET COUNTER IN FLAG VECTOR Zähler in Kennzeichenvektor nehmen

ro

co co co co ■t> co

JN O CO 00 KJ CD "*>*. Ö 00 CD K)

0370

0371

0372

254	0373
255	0374
256	0375
257	0376
258	0377
Seite	143

0 101 100 1 110 110

1 Oil 001

0 000 Oil

O 010 101

O 100 101

P,CMlC

TAB4

DECREASE COUNTER
Zähler erniedrigen

COUNTER GREATER THAN O? Zähler größer als 0?

NO, SET DIC TO O
nein, DIC auf O setzen

TAB 6

1 000 010 000 EFXlO ROM

1 000 010 000 ERR0R2 ROM GO TO ROM 4 TO FINISH ROUTINE zum ROM 4 gehen, um Routine zu beenden

GO TO ERROR ROUTINE zur Fehlerroutine gehen

MATH/USER-DEFINABLE FUNCTION BLOCK LISTING (ROM B-2)

Funktionsblock für.mathematische/benutzerdefinierbare Funktionen (ROM B-2)

Zeilen

Nr.

3 4 5 6 7 8

laufende Adresse

Abzweig-Adresse

Betriebs-Kode Bit-Muster

0000 0001 0002 0003 0004 0005

0006

O 000 001 Oil BRN 1 001 011 000 LDC9 O 011 001 100 DISP2 PT3

DISP2

1 001 011

0 000 011

1 001 100

O 000 100

LDC LDCO P, AMl

NO, CONTINUE nein, fortfahren YES, BLANK IT ja, ausblenden

BLANK DIGITS 2 AND 3 Ziffern 2 und 3 ausblenden

DISP3

IS DIGIT U ZERO?
ist Ziffer U Null?

NO, CONTINUE
nein, fortfahren

cn co co

fsj
CTJ
\

10	0007	0056
11	0010	0027
12	0011
13	0012
14	0013	0056
15	0014	0164
16	0015	0166
17	0016 .
18	0017
19	0020	0136
20	0021	0016
21	0022
22	0023
23	0024 ■
24	0025
25	0026
26	0027
27	0030

1 001 011 000

LDC 9

1 000 101 110 DISP3 W,BXG

0 000 101 000

DSTO

0 000 110 000 RETURN

1 Oil 110 000 STORES DTDS

0 010 111 Oil BRN OPUT

0 001 Oil 111 BRN OPLLO

1 010 010 000 DTRD ROM

1 Oil 111 000 RECALl DSTC

O 010 111 Oil

O 111 010 Oil

O 111 Oil Oil

BRN

BRN

BRN

O 000 110 000 RETURN O Oil 010 100 OFLO YS3

O 100 Oil Oil BRN O 000 111 Oil ' BRN O 000 110 100 OFLLO CLS. O" 111 000 100 SS7

OFLOl DTRD YES, BLANK IT
ja, ausblenden

RESTORE DATA

Daten zurückstellen

DISPLAY ON
Anzeige ein

GO BACK TO ANGLE CONVERSION zurück zur Winkelumwandlung

LOAD DATA TO C
Daten in C laden

GO TO OUTPUT

zum Ausgang gehen

LOAD PI ROUTINE ,
PI-Routine laden

INTEGER ROUTINE
Ganzzahlroutine

CHECK FOR LOAD PI FLAG Kennzeichen für "PI geladen" prüfen

co

co co

CO

	28	0031
	29	0032
	30	0033
	31	0034
	32	0035
	33	003 6
40 9 8 2ί	34	0037
O	35	0040
CXJ co	36	0041
	"37	0042
	38	0043
	39	004 4

0 001 100 110 OFLLl M,CMl

0045

0046

0047

0050

0 001 110 Oil

0 010 010 111

BRN

BRN

0 110 111 010 0FL2 XS,ZMC

0 100 010 111

0 010 101 010

0 101 111 010

0 010 001 111

1 Ho 101 HO

BRN

X,ZMCC

XS,CMlC

BRN

W, AXC

SUPA20

O 100 010 111 BRN SUPA20

0 001 111 010 0FL3 XS,CMl

0 010 Oil 111 BRN 0FL5

0 Oil 001 HO 0FL4 W,ZTC

O 100 010 111

BRN

SUPA20

O Oil 001 HO 0FL5 W,ZTC O 101 101 HO W,CMlC MANTISSA ZERO?
Mantisse Null?

NO, CONTINUE TEST
nein, Test fortsetzen

YES, SET RESULT TO ZERO ja, Ergebnis auf Null setzen

CHECK SIGN OF EXPONENT Vorzeichen des Exponenten prüfen

,RESULT OK
Ergebnis in Ordnung

SIGN CODE DECREMENT
Vorzeichenkode erniedrigen

CONTINUE TEST, EXPONENT COMPLEMENTED

Test fortsetzen, Exponent komplementiert

NO CARRY, TROUBLE
kein Übertrag, Störung

CARRY, RESULT OK

Übertrag, Ergebnis in Ordnung

NO CARRY, OVERFLOW
kein übertrag, überlauf

CARRY, UNDERFLOW, RESULT SET TO ZERO

Überlauf, Unterlauf, Ergebnis auf Null gesetzt

CO

cn

GO TO SUPERVISOR OJ

zum Überwachungsprogramm gehen CO

-P-CO SET ALL 9'S alle Neunen setzen

σ oo cn to

44	0051
45	0052
46	0053
47	0054

48

49

0055

0056

50	0057
51	0060
52	0061
Seite	144
53	0062
54	0063
55	0064
56	0065
57	0066
58	0067
59	0070

0 010 001 0. 000 Oil

1 101 001 0 000 Oil

0 100 001

0156

0072

BT LDCO

PT13 LDCO

BRN

0 010 101 000 OPUT CXM

0 110 111

1 Oil 111 110 NRM21 S,ZTA 1 100 001 100 PT12

0063

0 000 101 110 W,ZTB

1 001 100 010 NRM23 P,AMI 0 Oil 101 Oil BRN

0 100 001 110 W,SLA

0 101 101 010 X,CMlC

1 001 101 110 W,AMI 0 Oil 001 111 BRN

PRINTl

OPUTl

NRM24

SET EXPONENT SIGN TO POSITIVE Vorzeichen des Exponenten positiv machen

SET MANTISSA SIGN TO POSITIVE Mantissenvorzeichen positiv machen

PRINT ERROR MESSAGE FOR OVERFLOW

Fehlernachricht für Überlauf drucken

OUTPUT SYMBOL FOR STORE¹AND RECALL

Symbol für Speicherung und Rückruf ausgeben

GO TO CHECK OP MODE
OP-Betrieb prüfen

NRM23

K)

CO

(J)

CO CO

CO

03
IVJ

60	0071
61	0072
62	0073
63	0074
64	0075
65	0076
66	0077
67	0100
68	0101
69	0102
70	0103
71	0104
72	0105
73	0106
74	0107
75	0110
76	Olli
77	0112
78	0113
79	0114
80	0115
81	0116
82	0117
83	0120

0225

0216

0027

0121

0214

O Oil 001 110 W,ZTC

0 100 101 010 NRM24 X,ATB

1 11ο 001 110 W,APBA 1 001 111 110 S,AMI

1 001 010 111 , BRN 1 110 100 110 M,AXC 0 110 001 110 NRM25 W,CTA

0 000 101 110 W,ZTB

1 000 010 000 NRM26 ROM

1 110 010 000 PRINTl ROM

0 001 100 100 SQRTl RSl

1 000 111 Oil BRN

O 000 010 000 SUPA20 ROM O 010 010 100 OFLOl YS2

O 001 Oil 111
O 010 100 100
O 000 001 100
O 010 101 000
O 110 Oil 000

0 010 101 000

1 001 010 100

0 101 000 111

1 001 100 100
1 000 110 Oil

BRN RS 2 PTO CXM LDC CXM YS9 BRN RS 9 BRN

MPY28

SQRT

PRINT OVERFLOW MESSAGE
überlaufnachricht drucken

RETURN AFTER SQRT
hinter Quadratwurzel zurückkehren

OFLLO

AO

COS

CO CjO

-P-CO

84	0121
85	0122
86	0123
87	0124
88	0125
89	0126
90	0127
91	0130
92	0131
93	0132
94	0133
95	013 4
96	013 5
97	0136

98	0137
99	0140
100	0141
101	0142
102	0143
103	0144
104	0145
105	0146
106	0147

	0	101	010	100	AO	YS5	Al
0125	0	101	010	111		BRN
	0	101	100	100		RS 5	SIN
0213	1	000	101	111		BRN
	1	010	010	100	Al	YSlO	SQRTl
0103	0	100	001	111		BRN
	1	010	100	100		RSlO	ATANl
0215	1	000	110	111		BRN
	0	110	100	100	RFCAL	RS 6	STOREl
0134	0	101	110	011		BRN
	0	110	000	100	STORE	SS6
	0	000	001	100	STOREl PTO
	0	100	001	110	STOREO W,SLA
	0	000	111	100
PLS

0135

015ο

1	011	101	100	YPIl	STOREO
ο	101	110	111	BRN
O	011	001	110	W, ZTC
1	100	001	100	ΡΤ12
O	111	101	110	W,CPlC
1	010	011	000	LDClO	ST0RE2
O	110	100	011	BRN
O	000	000	000	DUMMY

O 000 010 000 SUPBA ROM SHIFT .ENTER DS REGISTER NUMBER
TO PTIl

Nummer für DS-Register-Eintritt nach PTll schieben

LOAD DS ADDRESS
DS-Adresse laden

GO TO SUPERVISOR Ά WITHOUT
DISPLAY

zum überw^chungspragrainm A
ohne Anzeige _g|hen

CO CD CO CO 4>· CO

0150

0151 0152

0153 0154

0155

0017

1 110 100 010 ST0RE2 P₇AXC

1 001 110 1 000 101

0 110 010 0 000 111

0 000 101

ATDS	RECALl
W, BXC	ST0RE3
YS6
BRN
BRN

LOAD DS REGISTER ADDRESS DS-Register-Adresse laden

YES, RESTORE C SAVE DS ADDRESS ja, C zurückstellen, DS-Adresse bewahren

NO, GO TO RECALL

nein, zum Rückruf gehen

409826	Seite 113 114	145 0156 0157
O	115	0160
co co
	116	0161
	117	0162
	118	0163
	119	0164
	120	016 5

121

122
123

0166

0167 0170

0223

0221

1 100 001 100 OPUTl PTl2

0 001 100 010 P,CMl

1 001 001 111 BRN

1 001 000

0 000 000 000 DUMMY 0 000 010 000 PRINT3 ROM

0.001 100 100 PTl RSl 0 110 010 000 ROM

0 110 001 110 INTl W,CTA SUPA4

0PUT2

PROGRAM MODE? Programmbetrieb?

YES, GO TO SUPERVISOR

ja, zum Überwachungsprogramm

gehen

NO, GO TO PRINT SYMBOL nein, zum Drucksymbol gehen

0 010 001 O 001 100

PT P, CMl GO TO RESTORE USERCODE IN ROM O Benutzerkode in ROM O zurückstellen

LOAD PI IN ROM 3
PI in ROM 3 laden

STORE ORIGINAL DATA
ursprüngliche Daten speichern

CHECK WHETHER EXPONENT IS

cn co co

NEGATIVE ^ . . prüfen ob Exponent negativ ist

CD
OO
K)

124 0171

125 0172

126 0173

127 0174

128 0175

129 0176

130 0177

131 0200

132 0201

133 0202

134 0203

135 0204

136 0205

137 0206

0211 1 000 100

0 001 001

0 001 100 0105 0 100 010

0 000 001

0 001 100

0202 1 000 001 Oil

1 Oil 001

0206 1 000 Oil Oil

BRN

PTl

PTO

, CMl

BRN

PTIl

BRN

1 100 001 100 INT4 PTl2 O 000 Oil 100 INT5 PRS -

O 101 101

X,CMlC

0203 1 000 001 111 BRN INT5 O Oil 010 010 INT6 WP,ZTC YES,, SET VALUE TO ZERO ja, Wert auf Null setzen

NO, CHECK IF EXPONENT IS GREATER THAN 10

nein, prüfen ob Exponent, größer als 10 ist

P, CMl	SUPA20	YES	, DO NOTHING
BRN		ja,	nichts tun

CHECK IF EXPONENT IS LESS THAN IO

'prüfen ob Exponent kleiner als 10 ist

BUT GREATER THAN ZERO aber größer als Null

YES, PREPARE TO ZERO DIGITS ja, für Null-Ziffern vorbereiten

NO, EXPONENT IS ZERO nein, Exponent ist Null

ZERO ALL DIGITS EXCEPT THE FIRST alle Ziffern auf Null stellen mit Ausnahme der ersten

SET POINTER
Hinweismarke setzen

ZERO DIGIT AFTER DECIMAL POINT Nullziffer hinter Dezimalpunkt

138	0207
139	0210
140	0211
141	0212
142	0213
143	0214
144	0215
145	0216
146	0217

1 110 101 010

X, AXC

0220

148	0221
149	0222
150	0223
151	0224
152	0225
153	0226
154	0227
155	0230
156	0231

0232

0233

0105
0105

0131

0133

0245

0227.

0060

0105

0 100 010 111 BRN

0 Oil 001 110 INT2 W,ZTC

0 100 010 111 BRN

1 100 010 000 SIN ROM 1 100 010 000 COS ROM 1 100 010 000 ATANl ROM 1 100 010 000 SQRT ROM O 101 100 111 BRN

O 101 101 111

0 010 101 000 0PUT2 CXM

1 010 010 111 BRN

0 010 101 000 SUPA4 CXM

1 001 Oil 111 BRN

1 000 010 000 MPY28 ROM O Oil 000 Oil BRN O 000 110 100 SUPA41 CLS O 111 000 100 SS7 O 100 010 111 BRN

O 010 010 000 ADD31 ROM

SUPA20

SUPA20

REGAL

STORE

0PUT3

SUPA41

NRM 21

SUPA20

RESTORE ORIGINAL EXPONENT
ursprünglichen Exponenten
zurückstellen

RETURN IN ROM 6 zurück nach ROM 6

RETURN IN ROM 6 "

RETURN IN ROM 6 "

RETURN IN ROM 6 "

NO, REGAL

nein, zurückrufen

YES, STORE

ja, .speichern '

GO TO PRINT SYMBOL IN ROM 7
zum Drucksymbol in ROM 7 gehen

O 101 100 010

P,CMlC

GO TO SUPERVISOR K5

zum überwachungsprogramm gehen ^

öl GO TO ADD ROUTINE _ω

zur Additionsroutxne gehen co IS DIC 5? ist DIC 5? * "¹^

CO

159	0234	0105
160	0235	0247
161	0236
162	0237
163	0240
164	0241

0242

	166	0243
O	167	0244
co 00	168	0245
KJ
σ> "Ν,	169	0246
O
CO σ>	170	0247
	171	0250
	172	0251
	Seite	146 '
	173	0252
	174	0253
	175 ·	0254

0163

0 XOO 010 111 BRN

1 010 Oil 111 BRN

0 010 101 000 PRINT2 CXM

1 000 101 110 W,BXC 1 010 101 000 MTC

1 110 101 110 W,AXC

1 OQO 101 110

W, BXC

0 111 001 111 BRN

0 000 000 000 DUMMY

1 000 101 110 0PUT3 W,BXC

1 110 010 000

O 010 001 110 ENTRY W,BTC

0 000 001 100 PTO

1 110 100 010 P,AXC

O 101 010 100

1 100 001 111

O 010 101 000

SUPA20 ENTRY

PRINT3

ENTRY2

PUT M IN A FOR RESTORE ROUTINE M in A geben um Routine zurückzustellen

RESTORE C

C zurückstellen

PUT DS ADDRESS IN C, DATA IN B DS-Adresse in C geben, Daten ir. B

PRINT SYMBOL AND DATA IN ROM 7 Symbol drucken und Daten in ROiy.¹ 7

IS D.P. SET?

ist Dezxitialpunkt gesetzt?

NO, ENTER DIGIT
nein, Ziffer eingeben

YES, GET FLAG VECTOR ja, Kennzeichenvektor nehmen

176	0255
177	0256
178	0257
179	0260
180	0261
181	0262
182	0263

183	0264
184	0265
18'5	0266
186	Ο267
187	0270
188	0271
189	0272
190	0273

0274

0275

0276

0273

0 110 001 110

1 010 001 100

0 110 Oil 000

1 010 001 100

0 001 000 010

1 Oil 101 111

0 010 Oil 000

W, CTA

PTlO LDC PTlO P, AMC BRN

1 010 001 100

0 001 000 010 1 100 000 111

1 Oil 001 100 0 000 Oil 000

O 111 000 100 1 001 111 oll

0 101 Oil 000 ENTRY3 LDC5

O 010 101 000 ENTRY5 CXM

O 110 001 110 O 101 100 100 W, CTA
RS 5

PREPARE TO CHECK IF MlO IS 9

vorbereiten zur Prüfung ob MIO
gleich 9 ist

ENTRY3 MIO IS 9
• MIO ist 9

NO, PREPARE TO CHECK IF MIO
IS. 5

nein, Prüfung vorbereiten ob
MIO gleich 5 ist

PTlO	•ENTRY 4	MIO MIO	IS 5 ist 5	O setzen
P ,AMC		NO	nein
BRN		SET • DIC	DIC TO auf O
PTIl
LDCO	PRINT2
SS7
BRN ι

SET MIO TO 5, ONE DECIMAL

ENTERED

MIO auf 5 setzen, eine Dezimale

eingegeben

RESTORE FLAG VECTOR
Kennzeichenvektor zurückstellen

RESET D.P. FLAG

Dez imalpunktkennzeichen

zurückstellen

cn co co •ο

194

0277

	195	0300
	196	0301
	197	0302
	198	. o303
	199	0304
	200	0305
	201	0306
■Ρ*
O co	202	0307
00 ro	203	0310
cn	204	0311
O	205	0312
OO
to	206	0313
	207	0314
	208	0315
	209	0316
	210	0317
	211	.0320
	212	0321

0352
0147

0274

22

0325

1 110 101 101 ENTRl2* JSB

0 110 Oil 111 BRN

0 001 Oil 000 , ENTRY4 LDCl

1 Oil 110 Oil BRN

1 000 101 110 ENTRY2 W₁BXC 1 010 101 000 MTC

0 110 001 110 ι W,CTA

1 010 001 100 PTlO

0327

0 110 Oil 000

1 010 001 100

0 001 000 010

1 101 001 Oil

0 010 Oil 000

1 010 001 100

0 001 000 010

1 101 010 111

1 100 101 110

0 010 001 100

1 101 Oil 111

LDC PTlO P,AMC BRN

PTlO P, AMC BRN

W ,AXB

DISPO SUPBA

ENT RY 5

GO TO DISPLAY
zur Anzeige gehen

SET MIO TO 1, TWO DECIMAL ENTERED

MIO auf 1 setzen,zwei Dezimalen eingegeben

PREPARE TO CHECK IF MIO IS 9 Prüfung vorbereiten ob MIO gleich 9 ist

ENTRY7 MIO IS 9
MIO ist 9

PREPARE TO CHECK IF MIO IS 5 prüfen ob MIO 5 ist

ENTRY8 MIO IS 5 ,

MIO ist 5

RESTORE ENTERED DATA
eingegebene Daten zurückstellen

SET POINTER TO 2
Hinweismarke auf 2 setzen

ENTRY9 GO TO SHIFT ROUTINE

zur Umschaltroutine gehen

CO CO CO

	2X3	0322
	214"	0323
	2X5	0324
	2X6	0325
	2X7	0326
	2X8	0327
	2X9	0330
19 8 2 6	220 221	O33X 0332
"'s» ο	222	0333
co	223	0334
	224	0335
	225	0336
	226	0337
	227	0340
	228	O34X
	229	0342

X XOO XOX XXO ENTRY7 W,AXB

0327

0336

0334 0024

0342

0277

6

X XOO 001 XOO

X XOX OXX XXX

PTX

BRN

X XOO XOX 1X0 ENTRY8 W,AXB

0 XXO 0OX XOO

PT6

0 XQO 0X0 OXO ENTRY9 WP,SLA

1	100	101	XOO	YPX 2	ENTRXC
r-t	XOX	XXX	OXl	BRN	ENTR
i-t	XOl	XXO	on .	BRN	OFLO
O	001	oxo	Oil	BRN
1	oox	oox	100 FNTR	PT9	ENTRXX
1	110	oox	Ol X	BRN

O XlO 101 100 ENTRXO YP6

1 Oil 111

O 1OX OOX XOO

X XXO OXX OXl

BRN PT BRN RESTORE ENTERED DATA
eingegebene Daten zurückstellen

■SET POINTER TO X2
Hinweismarke auf X2 setzen

ENTRY9 GO TO SHIFT ROUTINE

zur Umschaltroutine gehen

RESTORE ENTERED DATA
eingegebene Daten zurückstellen

SET POINTER TO 6
Hinweismarke auf 6 setzen

SHIFT LEFT ONE

um eins nach links verschieben

ENTRlO NO, CONTINUE CHECK

nein', Prüfung fortsetzen

ENTRl2

ENTRX3

SHIFT LEFT 8 PLACES

um 8 Plätze nach links verschieben

IS POINTER 6?

ist Hinweismarke 6?

NO, GO TO DISPLAY ROUTINE nein, zur Anzeigeroutine gehen '

YES, SET POINTER TO 5

ja, Hinweismarke auf 5 setzen

SHIFT LEFT 4 PLACES

um 4 Plätze nach links verschieben

O 100 OXO OXO ENTRXX WP,SLA CO CD CO CO

	230	0343
	231	0344
	232	0345
	Seite	147
	233	0346
	234	0347
	235	0350
	236	0351
ο	237	0352
co OO	238	0353
ΙΌ	239	0354
80/9	240	0355
σ>	241 ·	0356
	242	0357

243

247

0360

244	0361
245	0362
246	0363

0364

0277

0374

0 100 010 010 0 100 010 010 0 100 010 010

0 100 010 010 ENTRl3 0 100 010 010 0 100 010 010

0 100 010 010

1 Oil 111 111

1 110 101 110 DISPO

0 110 001 110

1 Oil 001 110

1 000 101 110 W, BXC

1 111 110 Oil

WP, SLA WP,SLA WP,SLA

WP,SLA WP,SLA WP,SLA WP,SLA BRN W,AXC. W, CTA W,SRA

O	Oil	001	110	W, ZTC
1	100	001	100	PTl 2
1	001	Oil	000	LDC 9
O	000	000	000	NOP
1	001	100	010	P,AMI

ENTRl2

SHIFT RIGHT FOR DISPLAY FORMAT
nach rechts verschieben für
Anzeigeformat

STORE C C speichern

PREPARE MASK
Maske vorbereiten

BLANK DIGIT 12
Ziffer 12 ausblenden

DISPl

IS DIGIT 11 ZERO?
ist Ziffer 11 Null?

NO, CONTINUE
nein, fortsetzen

ro co Φ

co co -ρου

	248	0365
	249	0366
	250	0367
	251	0370
	252	0371
	253	0372
409	254	0373
OO Ni	255	,0374
ο	256	0375
862	257 258 .	0376 0377
	Seite	148

Zeilen laufende

Nr. Adresse

0000

0001

0002

0374

0374

1 001 Oil 000

1 001 100 010

1 111 110 Oil

1 001 Oil 000

1 001 100 010

1 111 110 Oil

1 001 Oil 000

1 001 Oil 000 1 001 Oil 000 1 001 100 010

LDC P, AMI BRN LDC P,AMI BRN LDC

O 111 001 100 DISPl PT7

LDC LDC

P,AMI YES, BLANK IT
ja, ausblenden

IS DIGIT 10 ZERO?
ist Ziffer 10 Null?

DISPl NO, CONTINUE

nein, fortsetzen

YES, BLANK IT
ja, ausblenden

• IS. DIGIT 9 ZERO?
ist Ziffer 9 Null? .

DISPl NO, CONTINUE

nein, fortsetzen

YES, BLANK IT
ja, ausblenden

BLANK DIGIT 6 AND 7
Ziffern 6 und 7 ausblenden

IS DIGIT 5 ZERO?
ist Ziffer 5 Null?

MATH/USER-DEFINABLE FUNCTION BLOCK LISTING (ROM B-3)

Funktionsblock für mathematische/benutzerdefinierbare

Funktionen (ROM B-3)

Abzweig-Adresse

0363

0047

Betriebs-Kode Bit-Muster

1 111 001 111 1 100 101 110 O 010 100 001

TAN

BRN W, AXB JSB TAN 13

TNMIl

NORMALIZE DATA
Daten normalisieren

CD CO CO **> CO

6	0003
7	0004
8 ·	0005
9	0006
10	0007
11	0010
12	0011
13	0012

14

24

0047

0011

0013

0025

0022

0	110	101	000	STA
0	010	100	001	JSB TNMIl
0	110	101	000	STA
1	001	010	100'	YS 9
0	000	100	111	BRN 1
1	110	101	110	Wj1AXC
0	101	010	100 TANl6	YS5
0	001	001	Oil	BRN A

O Oil Oil

OO	15	0014	0245	1	010	Oil	001	JSB
σ>	16	0015		0	100	101	000 ASNIl	CTS
CD
0»	17	0016	0244	1	010	010	101	JSB
σ>	18	0017	0227	1	001	100	001	JSB
	19	0020	0044	0	010	010	101	JSB
	20	0021		0	110	101	000	STA
	21	0022	0245	1	010	Oil	001 ASNl2	JSB
	22	0023		1	010	010	100	YSlO
	23	0024	0332	1	101	101	Oil	BRN

1 Oil 101 110 ATNIl W,ZTA TAN 16

ASNl 2

DIVIl

MPYIl

ADDlO

SQTIl

DIVIl

RTNl 2

SEE WHETHER COS IS ASKED sehen ob cos gefragt ist

FORM TAN BY DIVISION OR' Tangens durch Division formen oder

PREPARE TO FORM SIN OR COS Formung von sin oder cos vorbereiten

CALCULATE SIN OR COS FROM sin oder cos berechnen aus

TANGENT, OR FORM ARC TAN Tangens, oder arc tan bilden

FROM ARC SIN OR ARCCOS aus arc sin or arccos -

SIN OR COS OUTPUT
sin oder cos ausgeben

ARC TAN ROUTINE
arc tan-Routine

K) CaJ CO CaJ CjO

-P-CjO

25

26

27

28

0026

0027

0030

0031

	•	29	0032
		30	0033
40 9		31 32	0034 0035
826		33	0036
-ν. O		34	0037
OO co		35	0040
		36	0041
		37	0042
	38	0043
39	0044
40	0045
4Χ	0046
42	0047
43	0050
44	0051
45	0052
46	"0053

0031

0035

0101

0336

1 111 100 010

0 100 100 110

1 110 100 110

1 010 010 010 0 110 111 010

0 001 100 111

1 Oil 010 010 ATN13

O 111 101 010

P,APIA

M, ATB M ,AXC

O 101 101 010 ATN12 X,CMlC

WP,SRB XS, ZMC

BRN ATNl2

WP,SRA

X,CP1C

0055

0	001	110	111	W,SRA	BRN
1	Oil	001	110
1	010	001	110		W, SRB
O	100	101	000	ATNl 4	CTS
1	000	101	110		W, BXC
0	100	000	111	SQTIl	BRN
1	000	101	110		W, BXC
O	100	001	100	BRN	PT4
1	101	111	Oil	TNMIl	SQT14
0	100	101	000		CTS
1	110	101	110		W, AXC
0	110	100	010		P ,ZMC
0	010	110	111	BRN

ATN13

ATN18

ATNIl TO ATNl3 PREPARE DATA ATNIl nach ATN13, Daten vorbereiten

FOR PINDING MULTIPLIERS OF um Multiplikatoren zu finden

TAN O WHERE TAN O=IOf-N tan o, wobei tan ο =10+-N

N FROM O TO 4
N von O nach 4

Y VALUE IS SET TO 1 Y-Wert ist auf 1 gesetzt

X VALUE THE DATA VALUE X-Wert ist der Datenwert

CO CD CO CO

TNMl 2

47	0054 .	0313	0	010	101	110	TNMl 2	W7ZMCC
48	0055		0	Ho	001	110		W, CTA
49	0056		0	010	001	010		X, BTC
50	0057		1	100	101	111	SINIl	BRN
51	0060	0045	0	110	001	110		W, CTA
52	0061		0	001	010	100		YSl
Seite	149	0155
53	0062		0	010	010	111		BRN
54	0063	0025	1	010	010	100		YSlO
55	0064		0	110	110	111		BRN
56	0065		0	101	010	100		YS5
57	0066	0015	0	ooi	010	111		BRN
58	0067		0	on	111	110		S,ZNCC
59	0070		1	110	111	110		S,AXC
60	0071	0072	0	000	110	111	ATNl 5	BRN
61	0072		1	010	010	010	ATN16	WP,SRB
62	0073		1	ιοί	111	110		S,AMlA
63	0074		0	Oil	101	Oil		BRN
64	0075		0	111	111	110		S,CPlC
65	0076		1	100	110	010		WP,AXB
66	0077	0	111	010	010		WP ,APCC
67	0100	1	100	101	110	ATNl 8	W, AXB
68	0101	0	100	101	110	W, ATB

ADD15

SQTIl

TAN 12

ATNIl

ASNIl

ATNl 5

ATNl4 TO ATNl8 ACTUALLY
ATNl4 nach ATN18 gegenwärtig

CD GO CO

69

0102

	70	0103
	71	0104
	72	0105
	73	0106
	74	0107
	75	0110
	76	0111
	77	0112
	78	0113
Q	79	0114
CD 00 hO	80 81	0115 0116
CD *"s	82	0117
O CD	83	0120
CO ro	84 85	. 0121 0122
	86	0123
	87	0124
	88	0125
	89	0126

90
91

0127
0130

0073

0043

0261

0243

0232

1 101 010 010 WP,AMCA

0 Oil 101 111 BRN ATN16

0 110 101 000 STA

1 Oil 001 110 W,SRA 1 110 110 010 WP,AXC 1 100 101 110 W,AXB 0 100 010 010 WP,SLA

0 100 101 000 CTS

1 111 111 110 S,APIA 1 111 111 110 S,APIA

0 010 001 111 BRN ATNl4

0 Oil 001 110 W,ZTC

0 000 101 010 X,ZTB

1 Oil 010 110 MS,SRA

1 Oil 001 001 JSB DIV14

0 101 100 010 P,CMlC

0 110 101 000 STA

1 110 101 110 W,AXC

0 100 001 100 PT4

1 010 010 001 ATN17 JSB PQ013 0-110 001 100 PT6

1 001 101 101 JSB PMUIl

1 000 001 100 PT8

FINDS THE MULTIPLIER
findet den Multiplikator

FORM TAN10t-4XFIND PSEUDO
MULTIPLIER

tanlO+-4 X bilden, Pseudomult iplikator

CD GO GO

92

0131

0232

93	0132
94	0133
95	0134
96	0135

0232

	97	0136	0215
1098;	98	0137	0232
2 6/0862	99 100	0140 0141	0313
	101	0142	0232
	102	0143
	103	0144	0312
	104	0145	0313
	105	0146
	106	0147	0245
	107	0150

1 001 101 101

0 010 001 100·

1 000 Oil 000 1 010 001 100 1 001 101 101

1 000 111 001 1 001 101 101

1 100 110 001

0 100 001 110

1 001 101 101

0 010 001 110

1 100 101 101 1 100 110 001 1 010 101 110

1 010 Oil 001 1 001 010 100

PT 2 LDC PTlO JSB

JSB JSB

W, SLA

PMUIl

PMUl 1

ATCDl PMU11

ATCl

JSB PMUIl W, BTC

JSB ADD15

JSB ATCl W, CPCC

DIVIl

FORM TAN10+-3 X,FIND PSEUDO MULTIPLIER

ta-nl0+-3 X bilden, Pseudomultiplikator finden

FORM TAN ΙΟΐ-2 X FIND PSEUDO

MULTIPLIER

tan.10+-2 X bilden,■Pseudo-

muliplikator finden

FORM TAN 10+tI X FIND PSEUDO MULTIPLIER

tan 1Ot-I X bilden, Pseudomultiplikator finden

LOAD PI/4=TAN1 X FORM Pi/4=tanl X,

PSEUDO MULTIPLIER Pseudomultiplikator bilden

CONVERSION FROM RADIAN Umwandlung von Bogenmaß

TO DEGREE in Grad

108 109 110 111 112

0151 0152 0153 0154 0155

0154 0227

0 110 110 Oil

o on in

1 001 100

0 001 100 100 ATNl9

0 Oil 001 110 TANl2

BRN ATNl9

S,ZNCC

JSB ADDlO

BEGINNING OP TANGENT Beginn von Tangens

OO
CD
N)

113 114

115 116 117 118 119 120 121

122 123 124 125

0156 0157

0160 0161 0162 0163 0164 0165 0166

0167 0170 0171 0172

0245 0245 0313

0244 0313

0224

0 101 100 DlO 0 111 101

0 001 010

1 010 010 1 010 Oil 1 100 110 1 010 101 1 010 010 1 100 110

1 010 1Oi 1 010 101 1 001 010 1 010 101

P,CMlC

X,CPIC

ROUTINE, CONVERSION Routine, Umwandlung

OP DEGREE TO RADIAN von Grad in Bogenmaß

YSl	MPYIl	LOAD Pi/4	PI/4 laden
BRN	DIVIl
JSB	ATCl	PI	Pi
JSB
W, CPCC	MPYIl	LOAD	2 PI
JSB	ATCl
JSB
W,CPCC
W,CPCC	RTNIl
JSB
W ,CPCC

2 Pi laden

ho

OO

cn

OJ OJ

OJ

126	0173	03 52
127	0174	0313
128	0175
129	0176	0233

1 HO 101 101

1 100= ItD 001

ι οίο ©οι iöö

1 001 HO QOl

	130	0177	0215
	. 131 -	0200
	132	0201 ,	0234
O
co
00
CD	133	0202
O	134	0203
co	135	0204
	136	0205	0233

1 000 111 001 ϊ 000 001 100

ι ooi no ιοί

0 010 OOI 100

ι ooo on 000 ο no ooi ioo ι ooi no ooi

137
138

0206
0207

Ο·233

σ loo 0Oi ίσο ι 0Oi no ooi

139

0210

0233

1 001 110 001

140

0211

1 100 101 110

JSB

JSB

PMEIl

ATCl

JSB PQOIl

JSB" ATCDl

JSB PQOl2

JSB PQOIl

PT 4 JSB

W, AXB

PQOIl

PQOIl

GET RID OF INTEGER CIRCLE RID von Ganzzahlkreis nehmen

LOAD PI/4 Pl/4 laden

FORM PSEUDO QUOTIENT FOR TANt-I l-Pl/4 Psieudoguotient für tant-1 bilden, l=Pi/4

FORM PSEUDO QUOTIENT FOR TANt-I

lOt-1

Pseudoquotient für tant-1

bilden, lOt-1

FORM PSEUDO QUOTIENT FOR TANt-I 10t-2

Pseudoquotient für. tant-1 bilden, lOt-2

FORM PSEUDO QUOTIENT FOR TANt-I 1Ot-3

Pseudoguotient für tant-1 bilden, 10t~3

FORM PSEUDO QUOTIENT FOR TANt-I lQt-4

Pseudoquotient für tant-1 bilden, 10t-4

CN

■Η

L/1 i-l

σ ft

in ο

co νο ld cn

cn

<! r-i r-i
EH ft

CQ

rf! Pi O

J ω χ

ΙΛ

- CQ . .
■■η - pi

O rf!

H Β

ft S

O !

O ! S

- - Pi

rf!

CQ ft

S rf!

	O	O	i-l	1-1	O	O	O	O	O	O	r-i
	O	O	r—I	Q	O	O	O	O	O	O	r-i
	O	O	r-i	O	O	O	O	O	O	O	£5
	r-i	i-j	r-i	Eh	r-l	r-l	r-i	r-i	i-l	i-l
	r-i	1—1	O	rf!	i-l	r-i	r-i	r-i	r-i	i—l	Pi
O	O	O	r-{	O	O	O	O	O	O	O	O
	i-l	r-i	,_,	O	O	O	r-i	O	O	r-i	O
■"Η	O	O	!-Η	i-l	O		O	r-i	O	O	i-H
r-i	■-H	r-i	1-1	1-1	O	"-H	r-i	O	■-H	O	Q
O	O	O		O	i-l	O	O	O	O	r-i	i-l
O			O						O
r-l			O						r-i
O			i-l						O
O			r-i						O
i-l			O						O

Q !D Q S

r-i CN

rH iH

O O

α α

<; ft ft ft

ήΟΟΟΟΟΟΟΟή

rH -Or-Ir-I O Or-Ii-Ii-Ii-I OOl-H-OOOi-tl-lrHiH

r-l O r-l O' O O Ή O i-H O Or-IOOrH-HOrHOO 1-Jr-li-lrHOOOOi-lO

in VD

r-i r-i

O O

α σ

ft ft

O O r-l O i-l i-l i-i i-l r-i r-i O i-H

i-H I-H O r-i

-HOOO

r-i O O O

iH'OrHrHOO-OOOOi-IOOO OO'-Hr-frHOO'-HO'-ii-HOi-li-l γ-ηΟΟγ-ιΟΟι-ηΟΟΟ'-ηήΟ'-η

ro O

CN

CN

CNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCNCN cn

OOOOOOOOOOOOOOOOOOOOOOOOOO O

I-H r-t r-i

in in in

i-l r-i r-l

cn ro *3* in KO r^·

VD VD VD VD VD VO

r-i i-l r-l r-l r-i r-i

4098 2 6/0862

in
O

cn

VD CM

.-H ^H

EH S

σ S

Ui Eh

i-r

Ln csj
> S

Q Eh

	U	^v	U	U
	O		r-l	Jg
		S	ft	2,
	S3	O	O
O	-	PJ
	X!		ft	VD
F-J	r-H		in	■-I ι- .
lH	ς!		i-H	S
ft			σ	cn
S	Q	O	cn	O
O	O	O	O
VJ O	^^ O	O	O
O	l-l	r-l	O	O
ι-Ι	O	O	O	O
O	O	O	r-H	rH
O	i-l	O	r-H	O
O	O	O	i-l	τ-1
O	1—i	<—I

ι—I

ft

cn ω

* Cu & ft

O O

O "-Η ι-Η -Ή O O O -H -HOOO

O O

O O

O S

ft αί

ο ο ο ο -η ο

ι-Η O <-Ι

υ
.-ι
ft

CJ

O O O

	in i-H
Q	H Q
O	O Ή
O	-H O

O O O O O

O O

O O O- O O O

O
O

ft

cn ^ cn ο

O O

H
Q

O O O O

i-H i-H O O

O O O O O

O O

-H O

O O O O

r-l O O O

O O O

O O O O O

O O

Eh
Oi

cn

ο ο O -ι

r-H O

O O

O O O

O /Ή

O
in

CM

»-Η	in	CM
in	in
CM	O	CM
O	O	O

ro in

<o in

cm O

O O

in	VD	•η«	O	<r-i	i-l in
		CM	in	in	(U
CM	CM	O	CM	CM	+J
O	O		O	O	-rH
					Φ
		O			cn
co	CTl	-P-	F-I	CM
	VD	i-l	: l>	r-
		r-i

cm ro ^r invor~-0'-HCMro'a'invDr~O^rH^CN)rr>'^^t ininLninininvovovDVDVDvDvovDr-r- r~ r~ r^· cmcmcmcmcmcmcmcmcmcncmcmjcmcmcmcncmcmcm OOOOOOOOÖOOO-OO. OOOOO

409 8 26/0

ο ο

τΗ τΗ

υ ο

S O CQ XO
CQ OJ X X

P
P

CQ CQ

PQ

O - ΐϋ * -

« S M m S; ElH>ffllflr)»<OH»W

tsr -H OUOOUOOUU

» O
& Pi

_ P P _Ρ P

C4 1-3 1-1 1-} W

P P

P P

O
O
O

Oi 1-Η

τΗ O

°³

τΗ τΗ

O O

t-i τΗ

O «Η

t-i τΗ

O ίΗ

τ-Η O

•-i O

O ^

O
O

τΗ

O
O

O ·τΗ· τΗ τΗ O τΗ

tn

τΗ

O Ö

τΗ O

O O

O O O -η O

O O O -ι O

O O Ή O Ή

•-i r-i τΗ O Ή

ADD

ADD

U a

ioo

000

D 8

O 8

000

000

000

000

000

000

110

ÖOO

OTT

TOO

O

Oil

•Η TH *-\,

O

O

TTO

TTO

Oil

011

TOO

010

TOO

TTO

111

000

TTO

TH O O

000

TOO

OTT

Oil

100

000

TTO

O

TH

O

O

(H

O

O

O

τΗ

τΗ

O

το
cn cn O

VO	CM
O
cn	cn
O	O

rOo^OoorO^M^no

l~- r~ Γ~ O O O O Ö O O O Ή τΗ τΗ τΗ iH τΗ τΗ tH Ol fSI ίΝ <N CM <N ίΝ CMCMCMi^rororoi^roroforoforOMMMMrOM^ororororofo OOOOOOOOOOOOOOOOÖOOOOOOOÖO

οΟΟΟΟΟΟΟθ

CMiMCMCMCMCMiMCMCMCNCMCMCMCMCMfMCMfM

409826/0862

	218	0327
	219	0330
	220	0331
	221	0332
	222	0333
	223	0334
	224	0335
	225	0336
	226	0337
	227	0340
■Ο ' O	228	0341
co	229	0342
00 ro	230	03 43
CD	231	0344
980	232	0345
	Seite	152
	233	0346
	234	0347
	235	0350
	236	0351
	237	0352
	238	0353

	0 101	Oil	000	LDC 5
	1 100	001	100	PT12
	0 000	110	000	RETURN
	0 100	010	000 RTN12	ROM 2
	1 110	001	010 SQT18	X,APBA
0336	1 101	111	Oil	BRN
0 101	100 010			P, CMlC
	0 111	111	110 SQT14	S,CPlC
	0 000	101	100	YPO
0273	1 Oil	101	111	BRN
	1 110	101	010	X, AXC
	1 Oil	101	010	X, ZTA
	0 001	100	010	P, CMl
0346	1 110	Oil	Oil	BRN
	1 Oil	001	110	W,SRA

0256

1 001 001 110 SQT13 W,SRC 1 000 101 010 X,BXC

0 Oil 001 010 X,ZTC

1 100 001 100 ■ PTl2
1 010 111 Oil BRN

1 000 010 000 PREIl ROM 4

SQTl 4

SQT12

SQT13

SQT17

CONTINUE IN ROM 4
in ROM 4 fortfahren

ro

GJ CO CO CO

J>· CO

239

0354

1 010 010 010 TAN18 WP,SRB

	240	0355
	241	0356
	242	0357
	243	0360
	244	0361
	245	0362
	246	0363
O CO	247	0364
OO	248	0365
K) cn	249	0366
O	250	0367
862	251 252	0370 0371
	253	0372
	254	0373
	255	0374
	256	0375
	257	0376
	258	0377

0354

0356

0001

1 010 010 010

WP,SRB

0 101 111 110 TAN19 S,CMlC

TANl4 TO TANl9 USES THE tan 14 nach tan 19 benutzt die

PSEUDO QUOTIENTS FORMED Pseudoquotienten gebildet

BEFORE ON THE FOLLOWING vor den folgenden

1	110	110	Oil	BRN TAN18	.EQUATIONS Gleichungen	*
O	111	010	010	WP,APCC
1	100	010	010	WP,AMBA
1	000	110	010	WP,BXC
O	010	001	110 TANl3	W, BTC
1	101	111	110	S,AMlA
1	110	in	Oil	BRN , TANl9
1	110	110	010	WP,AXC
O	110	101	000	STA
O	000	Oil	110	S, ZMB
O	000	000	111	.BRN TAN15
O	100	001	110	W, SLA
1	110	110	010 TAN14	WP,AXC
O	100	101	000	CTS
1'	010	010	010	WP,SRB
O	101	111	110	S,CMlC
1	000	111	110	S,BXC .

ro co

CD

co co

CO

Q CO CO

Zeilen laufende Nr. Adresse

.3

5
6
7
3
9

10
11

0000 0001

0002 0003 0004 0005 0006 0007 0010

MATH/USER-DEF!NABLE FUNCTION BLOCK LISTING (ROM B-4)

Funktionsblock für mathematische/benutzerdefinierbare

• Funktionen (ROM B-4)

Abzweig-Adresse

0374

12	0011	0075
13	0012	0300
14	0013
15	0014
16	0015
17	0016
18	0017
19	•0020
20	0021
21	0022

Betriebs-Kode

Bit-Muster

1 011 111 000

DSTC

1	111	110	011	RTN41	BRN . ERR0R2
1	100	101	000		DHR
0	000	110	000	PROGMl	RETURN
0	010	101	000		CXM
1	100	001	100	PROGM	PTl 2
0	111	000	000		PINC
1	000	100	000		READ
1	011	110	010		WP,ZTA
0	001	010	000	PR0GM2	EERA
1	101	001	100	PR0GM4-	PT 13
0	100	011	000		LDC 4
1	101	001	100		PT13
0	001	000	010		P, AMC
0	011	110	111		BRN CHECK
1	100	000	011	RTN610	BRN PR0GM5
1	100	010	000	RTN 31	ROM 6
1	100	101	000		DNR
0	100	010	000	ROM 2

RELOAD OLD M

altes M erneut laden

GO TO PRINT ERROR MESSAGE Fehlernachricht drücken

von ROM O Programmbetrieb FROM ROM O PROGRAM MODE

READ THE 2 TABLE DIGITS die 2 Tabellenziffern lesen

GO Ol C-O CO

co cx> ro

O OO CD

22	0023	■	0004	1	010	001	100	DIGTO	PTlO	PROGMl	GO TO ROUTINE BEGINNING	ro
23	0024			0	010	101	000		CXM		zum Routinenbeginn gehen	cn
24'	0025		0	101	100	010		P,CMlC			co co
25	0026	0012	0	000	010	Oil		BRN	PR0GM2	•
26	0027		0	010	101	000		CXM		RTN510	* co
27	0030		1	000	101	110		W, BXC
28	0031		0	000	101	Oil		BRN
29	0032	0023	1	111	100	010	DIGT3	P,APIA	DIGTO
30	0033		1	111	100	010	DIGT2	P,APIA
31	0034		1	111	100	010	DIGTl	P,APIA
32	0035		0	001	001	111		BRN
33	0036		0	010	010	000	PR0GM3	ROM 1		STORE C c speichern
		0037
34	0037		1	010	010	000	RTN510	ROM 5
35	0040		1	100	101	000	RTN51	DNR
36	0041		0	001	111	111		BRN
37	0042	0032	1	111	100	010	DlGT	P,APIA	DIGT3
38	0043		1	111	100	010	DIGT 5	P,APIA
39	0044	0020	1	111	100	010	DTGT 4	P,APIA	RTN610
40	0045		0	001	101	Oil		BRN
41	0046	0056	1	100	101	000	RTN 61	DNR	EEXO
42	0047		0	001	000	Oil		BPN
43	0050		1	000	101	110	EFX	W,BXC
44	0051	0	010	111	Oil		BRN
45	0052	1	111	100	010	DIGT9	P,APIA
46	0053	1	111	100	010·	D IGT 8	P,APIA

o 0 P

47	0054
48	0055
49	0056
50	0057
51	0060

0061

1 111 100 010 DIGT7 0 010 001 Oil

1 010 101 000 EFXO 0 110 001 0 101 100

0 Oil 001

P,APIA BRN DIGT6

P,CMlC

EEXOl

CHECK IF COUNTER IS O prüfen ob Zähler Null ist

NO, CONTINUE CHECK
nein, Prüfung fortsetzen

53
54
55
56
57
58
59
60
61

0062 0063 0064 0065 6 0067

0316

0072

' 0066

0316

0071 0316 0071

0323

1 100 111

O 101 100 010 EEXOl P,CMlC

O 011 011

1 100 111

O 101 100 010 EFX02 P,CMlC

O 011 100

1 100 111 BRN EEXl ■ YES, INCREMENT COUNTER

ja, Zähler erhöhen

IS COUNTER 1
ist Zähler 1?

BRN EEX02 NO, CONTINUE CHECK

nein, Prüfung fortsetzen

. YES, INCREMENT COUNTER ja, Zähler erhöhen

IS COUNTER 2
ist Zähler 2?

EEX03 NO, CONTINUE

nein, fortsetzen

BRN EEXl

BRN EEXl YES, GO TO INCREMENT COUNTER ja, Zähler erhöhen

O 101 100' 010 EFX03 P,CMlC

1 101 001

EEX3

IS COUNTER 3?
ist Zähler 3?

NO, IT IS 4

nein, er ist 4

CO ■ΤΟ)

	62	0073	0350
	63	0074
	64	0075
	65	0076
	66	0077	0333
	67	0100
	68	0101	0170
	69	0102
	70	0103
O co 00 IVJ σ>	71	0104
ο	72	0105
00	73	0106 ·
PO	74	0107

75

76
77

78

0110

Olli
0112

0113

79	0114
80	0115
81	0116

0116

1	010	101	000	CHECK	MTC
1	110	100	Oil	EFX5	BRN
0	010	010	000		ROM 1
1	100	001	100		PT12
1	001	010	010		WP, SRC
1	101	110	001		JSB
0	000	000	000		DUMMY
0	111	100	Oil	SUPCA	BRN
0	000	000	000	DUMMY
0	000	010	000	ROM 0

0 000 010 000 SUPA4 ROM 0 0 000 000 000 DUMMY

0 001 100 IiO DIV61 M,CMl

0 100 111 Oil -BRN

1 100 001 100 PT12 0 001 Oil 000 LDCl

0 001 000 100 SSl

1 Oil 110 010 WP,ZTA 1 110 101 110 W,AXC 0 000 101 110 DIV41 W,ZTB

EEX30

EEX6

NRM26

DIV41

PROGRAM MODE CHECk Prograinmbetriebsprüfung

GO TO SUPERVISOR SKIP USERCODE CHECK

zum uberwachungsprogramm gehen, Benutzerkodeprüfung überspringen

CHECK FOR ZERO X
.prüfen, ob X Null ist

NO, GO TO DIVIDE

nein, zur Division gehen

GO

cn· co

OJ LO

LOAD 1 IF X IS ZERO 1 laden, wenn X Null ist

SET Sl TO INDICATE TRIG ROUTINE Sl setzen um trigonometrische Routine anzuzeigen

O CD CD ISJ

82	0117	0250	0	101	001	010	. X,AMCC
83	0120		1	100	001	100	PTl 2
84	0121	0105	1	010	100	Oil	BRN DIV21
85	0122	0367	1	100	101	000,	SUPA40 DNR
86	0123	0	100	010	111	BRN SUPA4
87	0124	1	111	Oil	111	BRN EEXXl

88

■0125

89	0126
90	0127
91	0130
92	0131
93	0132
94	: 0133
95	0134
96	0135
97	0136
98	0137
99	0140
100	0141
101	0142
102	0143
103	0144
104	0145
105	0146
106	0147

0302

0135

0133

010 010 000 EEXX

SET

0153

0	010	101	000
0	000	001	100
0	100	Oil	000
0	010	101	000
0	000	110	000
1	001	111	010
1	100	001	on
1	100	010	110
0	101	110	111
1	110	010	110
0	100	001	110
0	101	101	010
0	101	101	111
1	Oil	001	110
0	Oil	010	010
1	110	101	010
0	110	111	110
0	110	101	111

PRE29

PRE 2

PRE 2

PRE 2

ROM

CXM PTO LDC4 CXM RETURN .XS,AMI

BRN PRE27 MS,AMBA BRN PRE24 MS,APBA W, SLA EEX ROUTINE FROM ROM 1
EEX~Routine von ROM 1

CONTINUE EEX ROUTINE IN ROM EEX-Routine in ROM 1 fortsetzen

X,CMlC BRN W,SRA WP,ZTC X, AXC S, ZMC BRN

CO

CD CO CO

CO

W O G"

U rf O XJ

x a s Pi x eh

<; <! Ν CQ PQ Ν

is !S X IS IS IS

	O	-	O	co	η	O
	pH		pH	(N	(N	f—\
	pH		O	Pn	O	pH
	pH	pH	05	σ	pH
	O	O	ft	ft	O
O	O	rH	O	O	O
pH	O	pH	pH	pH	iH
iH	O	pH	pH	pH	pH
pH		rH	pH
O		O	O
pH	O	rH
O	pH	O
O	pH	O

O O O O O

ft

οο

VD

1-1

Γ^

U

U

ft

1-Η

O

ω

U

U

r-i

ID

U

O

CM

U

ft

(N

Ph

Pi

O

CN

Eh

Eh

i-i

<

Q

r-i

O

Q

>i

O

ω

ω

-ft.

U

S

σ

Hq

οο

σ

■ι.

£η

U

ft

r-~

(N

ft

[2

CN

U

CN

O

ft

ft

pH

O

σ

CN

Ph

ft

σ

ft

O

PQ

O

U

O

2

ft

ο

σ

O

Jg

O

O

O

O

O

Ph

ο

ο

Ph

ft

O

Ph

O

O

O

O

r-i

O

CQ

O

1-1

PQ

ο

ο

O

PQ

ιΗ

O

O

O

<

O

O

1-1

■Η

γ-Η

O

^H

1-1

O

O

O

O

1-)

O

1-1

■Η

O

O

O

O

1-1

O

O

i—i

1-1

ιΗ

^H

O

O

■Η

r-i

O

■Η

8

O

O

O

1-1

O

O

O

O

O

O

O

-H

O

O

O

O

ο

O

O

O

O

O

!-Η

O

O

O

O

O

■Η

ιΗ

ο

rH

1-1

1—1

O

■Η

O

γΗ

O

i-l

r-1

r-i

pH

1-1

1-Η

1-1

O

O

1-1

i-H

i-H

1-1

O

ιΗ

O

O

O

O

ιΗ

O

O

1-1

O

O

i-H

i-H

O

O

O

>-1

■Η

1-1

O

O

. O

■-Ι

■Η

1-1

O

pH

1-1

O

1-1

■Η

1-1

O

O O O O O O

O O

O O O O

CN V£>

r-H

CN CN

KD

r-i O

O	r-i	CN	CO	in	in	in
LO	LO	in	in	rH	in	in
i-l	r-i	rH	rH	O	rH	pH
O	O	O	O		O	ω
						+J
				rH		-H
				•S		Qi
		OS		pH		ω
Γ~·	οο	O	O	CM
O	O	r-i	rH	pH
ρ-ί	r-H	rH	pH

vo r^ O r—i c^ - ro *φ in vo r-* O ^ c^ ro ^ in vo

ρΗγΗρΗρΗρΗρΗγΗγΗρΗρΗρΗρΗρΗιΗρΗρΗρΗ

ΟΟΟΟΟΟΟΟΟΟΟΟΟΟΟί'Ο

rHi—lrHpH<HfHCsJCNCNCN(NCNCNCNiCNCN pH rH ι—Ι ι-Ί' iHpHpHpHpHpHpHpHpHpHpHpH

9826/0862

	130	0177	0201	1	000	000	111	A2	BRN	A2
	131	0200	0220	1	001	poo	Oil		BRN	RTNIl■
	132	0201		0	101	100	010		P,CMlC
	133	0202	0204	1	000	010	Oil	A3	BRN	A3
	134	0203	0021	0	001	000	111		BRN	RTN 31
	135	0204		0	101	100	010		, P,CMlC
	136	0205	0207	1	000	Oil	111	AO	BRN	AO
	137	0206	0222	1	001	001	Oil		BRN	RTN 20
4098	138 139	0207 0210	0212	0 1	101 000	100 101	010 Oil	A4	P,CMlC BRN	A4
NJ CO	140	0211	0002	0	000	001	Oil		BRN	RTN 41
O OO	141	0212		. 0	101	100	010	A5	P,CMlC
co ro	142 143	0213 0214	0215 0040	1 0	000 010	110 000	111 Oil		BRN BRN	A5 RTN 51
	144	0215		0	101	100	010		P,CMlC
	145	0216	0122	0	101	001	Oil	RTNIl	BRN	SUPA40
	146	0217	0046	0	010	Oil	Oil		BPN	RTN 61
	147	0220		1	100	101	000	RTN20	DNR
	148	0221		0	010	010	000	ROM 1
	149	0222		1	100	001	100	PTl 2

RETURN IN ROM 1 zurück nach ROM

RETURN IN ROM 2 zurück nach ROM

RETURN IN ROM 3 zurück nach ROM

RETURN IN ROM 4 zurück nach ROM

RETURN IN ROM 5 zurück nach ROM

RETURN IN ROM 6 zurück nach ROM

NJ Ca)

cn co co

cn 2

CM 2

00

P

I

CM rH

pH 2

cn 2

VHS

BXC .

CM

Sj

CMlC

cn

O

CQ

U

00

cn

U

DDWV

CM

O

O

CM

D

EH

O

O

D

·.

CM

CQ

CM

«.

CM

Oi

Cu

^H

P

Oi

Oi

&

2

CQ

£3

pH

2

!2

O

04

X

CQ

£»

rH

pH

04

rH

rH

CM

04

cn

<*

JE]

pH

σ

rH

■ CM

pH

H

CM

CM

2

^*

CM

CM

CM

CM

CM

04

O

CU

CM

CM

CM

P

Oi

Ϊ3

JSj

P

O

D

OS

D

D

pH

EH

2

K

8

σ

i

2

CQ

2

Oi

O

Oi

Oi

04

H

Oh

P

Oi

CQ

O

<

Oi

04

04

04

04

CQ

CQ

2

2

P

CQ

'

O

O

O

o'

O

O

O

O

O

O

O

pH

O

O

O

O

O

O

O

O

O

O

O

O

pH

pH

pH

pH

pH

rH

pH

O

rH

pH

O

O

O

O

rH

O

O

l-l

pH

rH

pH

rH

pH

O

pH

O

O

O

O

pH

O

O

i-l

rH

rH

O

,_,

r-l

pH

rH

rH

pH

O

O

O

pH

O

O

pH

O

rH

pH

O

O

O

rH

O

O

O

iH

O

O

O

O

O

O

pH

pH

O

rH

pH

O

rH

I-l

O

O

O

pH

O

O

O

i-l

O

O

O

O

O

■-Η

8

O

O

rH

r-l

O

O

pH

rH

pH

pH

pH

O

pH

O

r-l

O

O

i-l

rH

rH

O

O

pH

O

<-i

O

pH

O

rH

pH

O

pH

!-Η

pH

pH

,_,

O

O

pH

O

pH

O

pH

rH

,_,

pH

rH

O

O

pH

pH

pH

O

O

O

rH

O

rH

O

O

pH

O

pH

O

rH

O

,_,

pH

O

σ

O

O

1-4

O

O

rH

pH

O

O

rH

i-l

O

O

O

O

O

O

pH

pH

pH

rH

i-H

O

pH

O

r-l

rH

O

pH

O η O

O	cn	·«*	m
	CM	in	in
CM	O	pH	CM
O	O	O

CSCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCNCMI¹OtM OOOOOOOOOOOOOOOOOOOOcMino

⁰ S

cm

409826/0862

	Seite	156
	173	0252
	174	0253
	175	0254
	176	0255
	177	0256
	178	0257
	179	0260
4098	180 181 182	0261 0262 0263
	183	0264
/08	184 185	0265 0266
CD	186	0267
	187	0270
	188	0271
	189	0272
	190	0273
	191	0274
	192	0275
	193	0276
	194	0277
	195	0300

0305 0266 0271

0272 0271

O	ΟΙΟ	111	110	, DIV22	DIV23	S1ZMCC
1	100	100	110			M, AXB
1	Oll	101	110	/		W1ZTA
1	100	101	100		ERRO	YP12
1	100	010	111		. ERROR "	BRN MPY2:
0	001	100	110		FFX8	M, CMl
1	Oil	Oil	Oil		EFX7	BRN DIV2:
0	001	010	100			YSl
1	Oil	100	111			BRN ERRO
0	010	010	010			WP,BTC
1	101	100	110		PR0GM5	M,AMlA
0	111	111	010	XS,CPlC
1	000	110	010	WP,BXC
1	110	100	110	M,AXC
0	110	010	000	ROM 3
1	110	010	000	ROM 7
0	010	010	000	ROM 1
0	010	010	000	ROM 1
0	Oil	Oil	110	S, ZTC
0	010	101	010	X, ZMCC
1	Oil	101	101	JSB EEX8
1	Oil	100	111	BRN ERRO
0	Oil	100	100	RS 3

GO TO FINISH EEX ROUTINE
EEX-Routine beenden

COMPLIMENT EXP

Exponent komplementieren

	196	0301 "	0036	0	001	111	011	PRE 2 7	-.	BRN	PR0GM3
	197	0302		1	111	100	110			M,APIA
	198	0303	0143	0	110	001	111	MPY26	BRN	PRE 2 5
	199	0304		1	110	001	110	MPY27	W,APRA
	200	0305		0	101	100	010		P,CMlC
	201	306	0304	1	100	010	011	MPY28	BRN	MPY26
	202	0307		1	Oil	001	110		W,SRA
	203	0310		0	000	111	100		PLS
	204	0311		1	101	101	100		YP13
	205	0312	0305	1	100	010	111		BRN	MPY27
*«·	206	0313		0	111	101	010		X,CPlC
Q co 00	207 208	0314 0315	0225	0 1	000 001	000 010	000 111	EFXl	NOP BRN	NRM21
ro σ>	209	0316		1	010	101	000		MTC
ο co	210	0317		0	111	100	010		P,CPlC
o> Is.»	211	0320		0	010	101	000	CXM
	212	0321		1	000	101	110	W, BXC
	213	0322	0104	0	100	010	Oil	BRN	SUPCA

214 0323

215 0324

216 0325

0272

1 000 101 110 EFX3

0 001 111 010

1 Oil 101 Oil

W ,BXC

XS,CMl

BRN ERROR

INCREMENT COUNTER BY Zähler um 1 erhöhen

RESTORE DATA

Daten zurückstellen

GO TO SUPERVISOR SKIP USER-CODE CHECK

zum Überwachungsprogramm gehen, Benutzerkodeprüfung' überspringen

RESTORE DATA

Daten zurückstellen

NEGATIVE, UNDERFLOW
negativ, Unterlauf

cn co co

σ
co
co

O OO O)

217 .	0326
218	0327
219	0330
220	0331
221	0332
222	0333
223	0334
224	0335
225	0.336
226	0337
227	03 40
228	0341
229	0342
230	03 43
231	0344
232	0345

0346

0 101 101 010

1 101 100 111

0 Oil 111 Oil

0 101 101 010 EFX4

1 Oil 101 Oil

1 100 001 100

1 001 010 010 EFX6

O 000 Oil 100

O 001 101 100

1 101 110 Oil

O 001 111 110

1 Oil 110 0.11

1 Oil 101 111

1 Oil 111 000 EFXlO DSTC

1 Hi 111 111

O Oil 100 100

1 100 001 100

X,CMlC	EEX4
BRN	EEX 5
BRN ·
X,CMlC	ERRO
BRN
PT12
WP, SRC
PRS ..
ypi	EEX6
BRN
S, CMl	EEX7
BRN	EEX8
BRN

X,AXC RS3

1 DIGIT EXP

Exponent mit 1 Ziffer

CHECK FOR SIGN

auf Vorzeichen prüfen

NEGATIVE negativ

POSITIVE, GO TO FINISH ROUTINE positiv, Routine beenden

LOAD ORIGINAL DATA
ursprüngliche Daten laden

LOAD NEW EXPONENT
neuen Exponenten laden

RESET OPERATION FLAG Betriebskennzeichen zurückstellen

RESET POINTER TO 12
Hinweismarke auf 12 zurückstellen

cn co co

O 00 CD IO

234	0347
235	0350
236	0351
237	0352
238	0353
239	0354
240	0355
241	0356
242	0357
243	0360
244	0361
245	0362
246	0363
247	0364
248,	0365
249	0366
250	0367

0105

0370

0371

0372

0135

0362 0146 0125

0	100	010	111	EFX30	BRN	SUPA4	INCREMENT COUNTER Zähler erhöhen
0	111	100	010		P,CPlC
0	010	101	000		CXM		RESTORE DATA Daten zurückstellen
1	000	101	110	EQUAL	W, BXC
0	000	010	000	PRE 21	ROM 0
1	110	101	110		W, AXC
0.	100	101	110		W, ATB
0	110	000	110		M, CTA
1	010	111	010		XS, CPCC
0	101	110	111		BRN	PRE 2 4
0	111	111	010	PRE 2 2	XS,CPlC
1	Oil	001	110		W,SRA
0	111	101	010		X,CPlC
1	111	001	Oil		BRN	PRE 2 2
0	110	Oil	Oil		BRN	PHE 2 6	PROM ROM O von ROM 0
0	101	010	111	BRN	EEXX

1 Oil 110 000 EEXXl DTDSi

1 001 001 100 PT9

O 000 Oil 000 LDCO

O 000 Oil 000 LDCO

STORE M REGISTER IN DATA

STORAGE

M-Register in Datenspeicher

speichern

LOAD O FOR = SIGN INTERPRETATION

O für = Zeichen Interpretation
laden

cn co co

254 0373

255 0374

256 0375

257 0376

258 0377

0 000 010

^v ROM

O 010 101 000 ERR0R2 CXM

0343

0 Oil 001

1 110 010

1 110 001

W, ZTC ROM

BRN CONTINUE IN ROM

in ROM O fortfahren

RESTORE M

M zurückstellen

GO TO ROM 7 FOR ERROR MESSAGE 3 5 nach ROM 7 für Fehlernachricht
3 5 gehen

EEXlO

O
CX)
CD

MATH/USER-DEFINABLE FUNCTION BLOCK LISTING (ROM B-5)

Funktionsblock für mathematische/benutzerdefinierbare

Funktionen (ROM B-5)

Zeilen laufende Abzweig- Betriebs-Kode Nr. Adresse Adresse Bit-Muster

3 0000

4 0001

5	0002
6	0003
7	0004
8	0005
9	0006
10	0007
11	0010

000.0

O	000	011	100	TESTl	PRS
1	001	001	110		W, SRC
1	010	101	100	TEST	YPlO
O	000	000	011		BRN
O	000	110	000		RETURN
O	011	001	HO	ATC 7	W, ZTC
1	100	001	100		PTl 2
O	001	011	000		LDCl
O	101	011	000		LDC 5

TESTl

TEST IF THERE ARE 2 DIGITS
prüfen, ob 2 Ziffern da sind

SHIFT RIGHT ONE IFF NOT

wenn nicht, um eins nach rechts verschieben

LOAD 0.00015 FOR ROUND OFF
0,00015 für Abrundung laden

K) CO

CO CO CO

CO

O CO CD

12 0011

13 0012

14 0013

15 0014

16 0015

17 0016

18 0017

19 0020

20 0021

21 0022

22 0023

23 0024

24 0025

25 0026

26 0027

27 0030

28 0031

29 0032

30 0033

31 0034

32 0035

33 0036

34 0037

35 0040

0331

0	Oil	Oil	000	ATCCO	LDC 3	LOAD PI Pi laden
0	101	101	010	SFT	X,CMlC
0	101	101	010		X,CMlC
0	101	101	010		X,CMlC
0	101	101	010		X,CMlC
0	000	110	000		RETURN
1	101	100	111	OFLl	BRN DTRD2
0	100	010	000	ATC 5	ROM 2	LOAD 60 60 laden
0	000	001	100		PTO
0	010	101	000		CXM
0	101	Oil	000		LDC 5
0	010	101	000		CXM
0	000	110	000		RETURN'
0	100	010	000	TEMP	ROM 2	RELOAD DATA - Daten erneut laden
0	Oil	001	110		W,ZTC
1	100	001	100		PT12
0	110	Oil	000		LDC 6
0	111	101	010	X,CPlC
1	100	001	100	PT12
0	000	110	000	RETURN
1	000	ioi	110	• W7BXC
0	110	101	000	STA
1	110	101	no	W, AXC
0	000	110	000	RETURN

σ*) oo co

U)

	36	0041	0051
	37	0042	0126
	38	0043
	39	0044	0263
	40	0045
	41	0046	0311
*«· σ co 00 ro	42 43	0047 0050	0340
!6/0862	44 45 46	0051 0052 0053	0020

47	0054	0110
48	0055
49	0056	0026
50	0057	0247
51	0060
52	0061

0 010 100 111

0 101 Oil Oil

1 000 000 100 1 Oil 001 111 1 000 000 100 1 100.100 111 1 000 000 100 1 110 000 011

001 000 101 TDWD

0 010 001 100

1 Oil 101 110

1 110 110 010 0 100 101 000

0 100 100 101

1 111 101 010

0 001 Oil 101

1 010 100 001

BRN TDWD

BRN TDMS

SS8

BRN DTGR

SS8

BRN DTRD

SS8

BRN DTML

JSB ' SET

PT 2 W, ZTA

WP,AXC

CTS

JSB NORMl

X,APIA

DMS TO DWDF DMS in DWDP

DWDF TO DMS DWDF in DMS

GRAD TO DWDF Neugrad in DWDF

DWDF TO GRAD DWDF in Neugrad

RADIAN TO DWDF Bogenmaß in DWDF

DWDF TO RADIAN DWDF in Bogenmaß

MIL TO DWDF Mil in DWDF

DWDF TO MIL DWDF in Mil

SET RETURN FLAG Rückkehrkennzeichen setzen

TAKE SECOND PART AND STORE THE REST

zweiten Teil -nehmen und den Rest speichern

JSB JSB

ATC 5 DIV51

SHIFT LEFT 10 PLACES um 10 Stellen nach links verschieben

CORRECT EXPONENT Exponent korrigieren

LOAD 60 60 laden DIVIDE dividieren

CD GO CO

	Seite 159	0062	0034
	53	0063
	54	0064
	55	0065
	56	0066
	57	0067
	58	0070	0110
■£■■* O	59
CO		0071
co	60	ΌΟ72	0230
co	61
co		0073 '	0026
co	62	0074	0247
	63	007 5	0034
	64	0076
	65	0077
	66	0100	0106
	67	0101
	68	0102	0117
	69

0 001 110 101

0 110 001 100

1 Oil 101 110

1 110 110 010

0 100 101 000

1 000 101 110

0 100 100 101

1 111 101 010 1 001 100 101

0 001 Oil 101

1 010 100 001

0 001 .110 101

0 110 001 110 0 110 101 110

0 100 Oil Oil

1 100 001 100 0 101 000 001

JSB PT6 W, ZTA

WP,AXC CTS W, BXC JSB

X,APIA JSB

JSB JSB

JSB

W₁CTA W, ZMC BRN PTl 2 JSB

TEMP

NORMl

ADD 51

ATC 5 DIV51

TEMP

TDWDl

N0RM4

RELOAD DATA

Daten erneut laden

TAKE THE MINUTE PART
den Minutenteil nehmen

AND STORE THE REST
und den Rest speichern.

NORMALIZE IT
normalisieren

ADD DIVISION RESULT TO MINUTE Divisionsergebnis zu Minuten addieren

LOAD 60 60 laden

DIVIDE MINUTE BY 60 , Minuten durch 60 dividieren

RELOAD DATA AND GET DEGREE PART Daten erneut laden und Gradteil nehmen

CHECK FOR LEADING ZERO auf führende Null prüfen

CD CO CO

co
σ>
ro

70 0103

71 0104

72 0105

73 0106

74 0107

75 0110

76 0111

77 0112

78 0113

79 0114

80 0115

81 0116

82 0117

83 0120

84 0121

85 0122

86 0123

87 0124

88 0125

0230 0026

0125

0114

0125

0120

1 111 101 1 111 101

1 111 101 010 ■

1 000 101 110 TDWDl

1 001 100'101

0 001 Oil

0 000 001 0 101 010

0 100 001 110 N0RM2

0 000 111

1 100 101

0 100 110

1 001 100 010 N0RM4

0 101 010

1 101 101 0 100 010

0 101 000

0 000 110 000 N0RM3

X,APIA X,APIA

X,APIA

W, BXC

JSB ADD51

0 100 101 110 NORMl W,ATB

W, ZMB

OFLl

N0RM3

W,SLA	N0RM2
PLS
YPl 2	N0RM3
BRN
P, AMI
BRN	N0RM4
X,AMlA
MS,SLA
BRN
RETURN

CORRECT EXPONENT
Exponent korrigieren

ADD EXPONENT
Exponent addieren

ADD RESULT TO DEGREE
Ergebnis zu Grad addieren

GO TO OVERFLOW TEST· AND DISPLAY
zum überlauftest gehen und anzeigen

NORMALIZATION ROUTINE
Normalisierungsroutine

CHECK IF DATA IS ZERO
prüfen, ob Daten Null sind

IF SO, RETURN

wenn ja, zurück , '

SHIFT LEFT UNTIL POINTER IS AT 12
nach links verschieben bis Hinweismarke auf 12 steht

CHECK FOR LEADING ZERO
auf führende Null prüfen

ro

co

CD CO CO 4> CO

	89	0126	0020
	.90	0127
	91	0130
	92	0131	0240
	93	0132	0004
	94	0133	0230
	95	0134
O tr»	96	0135	0225
1826/0!	97 98	0136 0137
cn	99	0140
	100	0141
	101	0142	0376
	102	0143
	103	0144
	104	0145
	105	0146	0252
	106	0147	0152
	107	0150

0 001 000 101 TDMS

JSB

SET'RETURN FLAG

Rückkehrkennzeichen setzen

0	110	001	110	TDMSOl	W, CTA	TDMSO2
0	001	111	110	S, CMl	ATC 7
1	010	000	Oil	BRN
0	000	010	101	JSB

1 001 100 101

0 001 111 010

1 001 010 111

1 100 101 110

JSB

XS,CMl

BRN

O	Oil	001	110	W, ZTC
O	000	001	100	PTO
0	100	Oil	000	LDC 4
0	001	ooi	010	X, AMC
1	111	111	Oil	BRN

W, AXB

ADD

O	010	001	110	W, BTC	XRMl
1	100	001	100	PTl 2	TDMS 7
1	010	101	101	JSB
O	110	101	Oil	BRN
O	000	Oil	1OO TDMS8	PRS

LOAD O.OOO153 FOR ROUND OFF 0,000153 für Abrundung_: laden

ADD ROUND OFF NUMBER abgerundete Zahl addieren

CHECK IF DATA IS LESS THAN 1 prüfen, ob Daten kleiner als 1 sind

YES, CONVERT TO MINUTE ja, in Minuten umwandeln

CHECK IF NUMBER IS TOO LARGE prüfen, ob Zahl zu groß ist

IS SO GO TO ERROR MESSAGE wenn ja, zur Fehlernachricht gehen

IF NOT, CONTINUE
wenn nein, fortfahren

DETERMINE SIZE OF DEGREE PART Größe des Gradteiles festlegen

IF LESS THAN 4 DIGITS MOVE wenn kleiner als 4, Ziffern

	108	0151	0150	1	001	001	110	W, SRC	TDMS 8
	109	0152		1	000	101	100 TDMS7	YP8
	110	0153		0	110	100	Oil	BRN
	111	0154		0	100	101	000	CTS
	112	0155		0	010	001	110	W, BTC
	Seite	160	0252 0110						XRMl NORMl
	113	0156	0026	1	ιοο·	001	100	PTl 2	ATC 5
09826/C	114 115	0157 0160	0243	1 0	010 100	101 100	101 ' 101	JSB JSB	MPY51
1862	116 117	0161 0162		1 0	101 001	101 Oil	010 101 TDMS6	X,AMlA JSB
	118	0163	1	010	010	001	JSB
	119	0164	0	001	111	01Q	XS,CMl

120 0165

121 0166

122 0167

123 0170

0205

0252

1 000 010 111

0 100 101 110

1 100 001 100 1 010 101 101

BRN W, ATB

PTl 2 JSB

TDMS 2

TO RIGHT ACCORDINGLY entsprechend nach rechts bewegen

RESET POINTER TO DECIMAL

LOCATION

Hinweismarke auf Dezimalstelle

zurückstellen

NORMALIZE DECIMAL PART Dezimalteil normalisieren

LOAD 60 60 laden MULTIPLY multiplizieren

CHECK IP MINUTE PART IS LESS THAN 1

prüfen, ob Minutenteil kleiner als 1 ist

YES, CONVERT TO SECOND
ja, in Sekunden umwandeln

STORE DATA IN B
Daten in B speichern

SAVE INTEGER PART AS MINUTE
Ganzzahlteil als Minute bewahren

cn co co

124 0171

125 0172

126 0173

127 0174

128 0175

0001

0 000 001 001 JSB

1 100 001 100 ΡΤ12

1 001 001 110 TDMS3 W,SRC. 0 000 Oil 100 PRS O 110 101 100 YP6

TEST IF MINUTE HAS 2 DIGITS
prüfen, ob Minuten 2 Ziffern
haben

	129	0176	0173	O	111	101	111	TDMS 2	BRN	TDMS 3
409826/	130 131	0177 0200	0232	1 O	001 010	101 001	101 110		JSB W, BTC	STORE
O OO	132	0201		1	100	001	100		PTl 2	•
o> N>	133	0202	0252	1	010	101		JSB	XRMl
	134	0203	0110	O	100	100	101	JSB	NORMl
	135	0204		1.	101	101	010	X ,AMlA
	136	0205	0026	O	001	Oil	101	JSB	ATC 5
	137	0206	0243	1	010	010	001	JSB	MPY51
	138	0207		O	001	111	010	XS,CMl

MOVE MINUTE PART TO CORRECT
.LOCATION

Minutenteil an die richtige
Stelle bewegen

SAVE MINUTE PART IN PROPER

LOCATION

Minutenteil an richtiger Stelle

bewahren ■

RESTORE DATA, IN C

Daten in C zurückstellen

SET POINTER TO DECIMAL LOCATION
Hinweismarke auf Dezimalstelle
setzen

NORMALIZE DECIMAL PART
Dezimalteil normalisieren

CORRECT EXPONENT
Exponenten korrigieren

LOAD 60 60 laden

CHECK IF SECOND PART IS LESS
THAN 1

prüfen, ob Sekundenteil kleiner
als 1 ist

	139	0210	0222
	140	0211
	141	0212	0252
	142	0213	0001
	143	0214
	144	0215
O co OO	145	0216
Ni co	146	0217
CD	147	0220	0215
862	148 149	0221 0222	0232
	150	0223	031C
	151	0224
	152	0225
	153	0226
	154	0227
	155	0230	016;

1 001 001 Oil - BRN TDMS5

1 100 001 100 PTl2

1 010 101 101 . JSB XRMl

0 000 001 001 JSB TEST

1 100 001 100 PTl2

1 001 001 110 TDMS4 W,SRC

0 000 Oil 100 PRS

0 010 101 100 YP2

1 000 110 111 BRN TDMS4

1 001 101 101 JSB STORE

0 110 101 000 TDMS5 STA

1 100 100 Oil , BRN PRINT

O 000 000 000 DUMMY

O 110 001 110 TDMSl W,CTA

O Oil Ό01 110 W,ZTC

O 100 101 000 CTS

O 111 001 Oil BRN TDMS6

IP SO, RESULT IS ZERO, DONE wenn ja, ist Ergebnis Null, fertig

DETERMINE SIZE OF SECOND PART Größe des Sekundenteils festlegen

TEST IF IT HAS 2 DIGITS prüfen, ob er 2 Ziffern hat

MOVE SECOND PART INTO RIGHT LOCATION

Sekundenteil auf rechte Stelle bewegen

STORE RESULT
Ergebnis speichern

GO TO PRINT ANGLE ROUTINE zum Druck der Winkelroutine gehen

STORE ZERO INTO DEGREE Null im Gradteil speichern

PART AND CONVERT TO SECOND und in Sekunden umwandeln

CO CO CO CO

0231

0232

0233

159	0234	0252
160	0235	0253
161	0236
162	0237
163	0240
164	0241
165	0242
166	0243
167	0244
168	0245
169	0246
170	0247
171	0250
172	0251
Seite 161
173
174

0365

0230 0132

0246

1 100 001 100 ADD51 ΡΤ12 0 010 010 000 ROM I

0 110 101 000 STORE STA

0	110	010	010	TDMSO2	WP,CTA	ATC 6
1	110	101	110		W, AXC
0	100	101	000		CTS	ADD 51
0	000	110	000		RETURN	TDMSOl
1	111	Oil	001	MPY51	JSB
1	110	101	110		W, AXC
1	001	100	101	DIV510	JSB
0	101	101	Oil		BRN
0	000	101	110	DIV51	W,ZTB
1	000	010	000		ROM 4	DIV510
0	101	001	010	X,AMCC
1	000	010	000	ROM 4
Ό	000	101	110	W, ZTB
1	010	Oil	Oil	BRN

0	000	Oil	100	XRM2	PRS
0	101	101	010	XRMl	X,CMlC

ADD ROUTINE
AdditiQnsroutine

STORE PROPERLY LOCATED DATA
IN STACK

richtig angeordnete Daten im
Stapel speichern

ISOLATE INTEGER PART
ganzzahligen Teil isolieren

co co .τα»

	175	0254	0252
	176	0255
	. 177	0256
	178	0257
	179	0260
	180	0261
	181	0262
	182	0263	0020
	183	0264
■τ ο co
00 κ>	184	0265	0365
CD >^_	185	0266
Ό 8 6 2	186 187	0267 0270	0272 0243
	188	0271	0273
	189	0272	0247
	190	0273
	191	0274
	192	0275
	193	0276
	194	0277
	195	0300
	196	0301

1 010 101 011 0 000 Oil 100

0 Oil 001 010

1 Oil 101 110 0 110 010 010 0 Oil 010 010 0 000 110 000

0 001 000 101

1 110 101 110

1 111 Oil 001

1 000 010 100

1 Oil 101 Oil

1 010 010 001

1 Oil 101 111

1 010 100 001

1 Oil 101 110

1 110 101 110

1 100 001 100

0 100 Oil 000

O 000 001 100

0 010 Oil 000

1 100 001 100

DTGR

DIW
CONTl

BRN PRS X, ZTG W, ZTA WP,CTA WP,ZTC RETURN JSB

W, AXC

XRM 2

JSB BRN JSB W, ZTA W, AXC PTl 2 LDC 4 PTO LDC 2 PT 12

SET

JSB ATC6

YS8

BRN DIW

MPYSl CONTl DIVSl

SET RETURN FLAG
Rückkehrkennzeichen setzen

DEGREE TO GRAD OR GRAD TO
DEGREE CONVERSION
Umwandlung Grad in Neugrad
oder Neugrad in Grad

LOAD 360 360 laden

IF SET CONVERT GRAD TO DWDF
wenn gesetzt, Grad in DWDF umwandeln

LOAD 400 400 laden

0302

	198	0303
	199	0304
	200	0305
	201	0306
	202	0307
•ο*	203	0310
O co	204	0311
00
σ>	205	0312
ο
00
ro	206	0313
	207'	0314
	208	0315
	209	0316
	210	0317
	211	0320
	212	0321
	213	0322
	214	0323

0306

0247 0307 0243 0026

0020

0326

1 000 010

1 100 Oil Oil

" YS8

BRN

1 Oil 101

W ,ZTA

1	110	101	110	W, AXC
1	100	001	100	PT12
0	001	0,11	000	LDCl
1	000	011	000	LDC 8
0	000	001	100	PTO
0	010	Oil	000	LDC 2
1	100	001	100	PTl 2
1	000	010	100	YS8

1 101 Oil Oil

BRN

1	010	100	001	MPYY	JSB	DIV51
1	100	Oil	111	C0NT2	BRN	C ONT 2
1	010	010	001	PRINT	JSB	MPY 51
0	001	Oil	Oil	DTRD	BRN	OFLl
1	110	010	000	ROM 7
0	001	000	101	JSB	' SET

IS S8 NOT SET CONVERT DWDF TO GRAD

wenn S8 nicht gesetzt, DWDF in Grad umwandeln

IF SET CONVERT GRAD TO DWDF wenn gesetzt, Grad in DWDF umwandeln

SET RETURN FLAG
Rückkehrkennzeichen setzen

DEGREE TO RADIAN OR RADIAN TO DEGREE

Grad in Bogenmaß oder Bogenmaß in Grad

IF S8 NOT SET CONVERT RAD TO DWDF wenn S8 nicht gesetzt, Bogenmaß in DWDF umwandeln

IF SET CONVERT DWDF TO RAD wenn gesetzt, DWDF in Bogenmaß umwandeln

CD LO CO

OO
ho
σ>

0324 0325 0326 0327

0330

0331

0332

0344

0243 0327 0247

0020

222	0333	0336
223	0334	0247
224	0335	0337
225	0336	0243
226	0337	OÖ26
227	0340	0020
228	0341
229	0342	0365
230	0343

0347

1	010	010	001	*	DIWl	JSB	ΜΡΥ51
1	101	011	111	DTRDl	BRN	DTRDl
X	010	100	001		JSB	DIV51
0	011	000	100	DTRD 2	SS3
0	001	000	011	BRN	ATCCC
0	011	100	100	RS3

1 000 010 100 YS8

1 101 111 Oil BRKi MPYYl

1 010 100

1 101 111

1 010 010 001 MPYYl

0 001 Oil Oil DTRD3

0 001 000 101 DTML ,

1 110 101 110 W,AXC

1 111 Oil 001 JSB ATC6 1 000 010 100 YS8

1 110 Oil 111 BRN ' DIW2

JSB	DIV51
BRN	DTRD 3
JSB	MPY 51
BRN	OFLl
JSB	SET

SET LOAD PI PLAG Kennzeichen für "Pi laden" setzen

GO TO LOAD PI

zum Laden von Pi gehen

RESET LOAD PI FLAG Kennzeichen für "Px laden" zurückstellen

IF S8 NOT SET CONVERT DWDF TO RAD wenn S8 nicht gesetzt, DWDF in Bogenmaß umwandeln

IF SET CONVERT RAD TO DWDF wenn gesetzt, Bogenmaß in DWDF umwandeln

DONE fertig '

SET RETURN FLAG
Rückkehrkennzeichen setzen

DWDF TO MIL OR MIL TO DWDF DWDF in Mil oder Mil in DWDF

LOAD 360

360 laden

IF S8 NOT SET CONVERT DWDF TO MIL

wenn S8 nicht gesetzt, DWDF in Mil umwandeln

IF SET CONVERT MIL' TO DWDF wenn gesetzt, Mil in DWDF umwandeln

CO CD CO CO

O OO O

232	0345
233	0346
"234	0347
235	0350
236	0351
237	0352
238	0353
239	0354
240	0355
241	0356
242	0357
243	0360
244	0361
245	0362
246	0363
247	0364
248	0365
249	0366
250	0367
251	0370
252	0371
253	0372
25.4	0373
255	0374
256	0375
257	0376

0243	1	010	010	001	DIW2	JSB	MPY51
0350 ■	1	110	100	Oil	DTMLl	BRN	DTMLl
0247	1	010	100	001		JSB	DIV51
	1	Oil	101	110		W, ZTA
	1	110	101	110		W, AXC
	1	100	001	100		PTl 2
	0	110	Oil	000		LDC 6
	0	100	Oil	000		LDC4
	0	000	001	100		PTO
	0	100	Oil	000		LDC 4
	1	100	001	100		PTl 2
	1	000	010	100		YS8
0364	1.	111	010	Oil		BRN	MPYY2
0247	1	010	100	001	MPYY2	JSB	DIV51
0365	1	111	010	Γ11	DTML 2	BRN	DTML 2
0243	1	010	010	001	ATC 6	JSB	MPY 51
0026	0	001	Oil	Oil		BRN	OFLl
	0	Oil	001	110		W, ZTC
	1	100	001	100		PT12
	0	Oil	Oil	000		LDC 3
	0	110	Oil	000		LDC 6
	0	000	001	100		PTO
	0	010	Oil	000		LDC 2
	1	100	001	100	ERRl.	PTl 2
	0	000	110	000	RETURN
	1	110	010	000	ROM 7

LODAD 6400 6400 laden

DONE fertig

LOAD 360 360 laden

LOAD 360 360 laden

Zeilen laufende Abzweig-Nr. . Adresse Adresse

3	0000
4	0001
5	0002
6	i 0003
7	0004
8	0005
9	0006
10	0007
11	0010
12	0011
13	0012
14	0013
15	0014
16	0015
17	0016
18	0017
19	0020
20	0021
21	0022

0367

MATH/USER-DEF!NABLE FUNCTION BLOCK LISTING (ROM B-6)

Punktionsblock für mathematische/benutzerdefinierbare

Punktionen (ROM B-6)·

Betriebs-Kode Bit-Muster	010	010	000	SIN	ROM 1
O	010	010	000	cos	ROM 1
O	011	111	110	ACC 3 O	S,ZNCC
O	000	000	000		NOP
O	111	011	111		BRN
1	010	010	000	ATAN	ROM 1
O	010	010	000	SQRT	ROM 1
O	000	000	000		DUMMY
O	000	101	110	ADDR	W, BXC
1	011	001	110		W,ZTC
O	111	101	110		W,CPlC
O	100	001	100		PTl 2
1	010	011	000		LDClO
1	000	110	000		RETURN
O	000	011	000	ADDRO	LDCO
O

1 001 110 000 ADDRC

O 010 001

O 000 110 O 001 011

ADDRl

ATDS W, BTC

RETURN LDCl

ACC 4

SAVE C C bewahren

PREPARE TO GENERATE DS ADDRESS Erzeugung der DS-Adresse vorbereiten

LOAD DS ADDRESS
DS-Adresse laden

LOAD DS REGISTER ADDRI3S DS-Registeradresse laden

LOAD DS ADDRESS
DS-Adresse laden

RESTORE C

C zurückstellen

LOAD DS REGISTER ADDRESS DS-Registeradresse laden

cn co co -Ρα)

	22	0023	0017
	23	0024
	24	0025
	25	0026	0063
	26	0027
	27	0030	0260
	28	0031	0321
4 09826>	29 30	0032 ΌΟ33	0220
Ό862	31 32	0034 . 0035
	33	0036	0001
	34	0037	0007
	35	0040	0015
	36	0041
	37	0042

0 000 111 111

0 000 010 000 PRINT

0 000 000 000

0 Oil 001 111

0 100 000 100 PRXY

1 Oil 000 Oil 1 101 000 111

1 001 000 Oil

O 010 001 110 TRECT O 100 101 000 O 010 000 100

O 000 000 111

0.000 100 001 RCOS

0 000 111 001

1 Oil 111 000 O 100 101 000

BRN ROM O DUMMY BRN

SS4

BRN BRN

BRN

W, BTC

CTS

ADDRC CONTINUE fortfahren

XEXY X EXCHANGE WITH Y ROUTINE Routine für X- Y-Austausch

PRINT X, Y ROUTINE Routine für X- Y-Druck

POPUT RECAL

CLEAR

RECALL ACCUMULATED VALUE ROUTINE Routine für akkumulierten Wert rückrufen

CLEAR ACCUMULATED VALUE ROUTINE Routine für akkumulierten Wert löschen

TO RECTANGULAR ROUTINE zur Rechwinkel-Routine ■

SAVE ANGLE Winkel bewahren

, SET RETURN PROM TRIG FLAG Kennzeichen für Rückkehr von Trigonometrie setzen

COS COMPUTECOS

cos berechnen

JSB	ADDR	LOAD DS ADDRESS DS~Adresse laden	ro
JSB	ADDRO	LOAD R IN C R in C laden SAVE R IN STACK R im Stapel bewahren	363343
DSTC CTS

	38	0043	0243
	39	0044
	40	004 5
	41	0046
	42	0047
	43	0050	-
O co co ro CD	44 45 46	0051 0052 0053	0000
O OO	47	0054	0243
σ>	48	0055	0007
	49	0056	0021
	50	0057
	51	0060
	52	0061	0257

1 010 010 001

1 Oil 110 000

JSB MPY61 COMPUTE X BY R COS

X mal R cos berechnen

PTDS STORE X IN DS REGISTER 0

X Im DS-Register 0 speichern

1	100	101	000	DNR	SIN	LOAD R R in C	IN C laden
0	110	101	000	STA	LOAD in	IN A A laden
0	100	101	000	CTS
1	110	101	110	W, AXC	LOAD in	IN C C laden
0	010	000	100	SS2
0	000	000	011	BRN	COMPUTE SIN '

0 110 101 000 RSIN STA

1 010 010 001 JSB MPY61

0 000 100 001 JSB ADDR

0 001 001 001 J&B ADDRl

1 011 110 000' DTDS

0 100 000 100 SS4

1 010 111 111 BRN OPUT

sin berechnen

LOAD R TO A
R nach A laden

COMPUTE Y BY R SIN

Y mal R sin berechnen

LOAD DS DS REGISTER 1 ADDRESS DS laden, DS-Register 1 Adresse

STORE Y IN DS 1

Y in DS 1 speichern

SET FLAG FOR SYMBOL X,Y

i^{fÜ b1 X}'^{Y setzen}

CjO

CD U) CO

zum Ausgang gehen

	Seite 164	0062	0246	1	010	Oil	Oil	BRN	PRRA
	"53	0063	0007	0	000	100	001	XEXY JSB	ADDR
	54	0064	0021	0	001	001	001	JSB	ADDRl
	55	0065.		Ι	Oil	111	000	DSTC
	56	0066		Ο	100	101	000	CTS
	57	0067	0007	O	000	100	001	J&B	ADDR
	58	0070	0015	O	000	111	001	JSB	ADDRO
■Ρ-	59	0071 0072		1 O	Oil 110	111 101	000 000	DSTC STA
09826 >	60 61	0073		1	110	101	110	W,AXC
980/	62	007-4		1	Oil	110	000	DTDS
Γν> -	63	0075		1	110	101	110	W, AXC
	64	0076	0007	O	000	100	001	JSB	ADDR
	65	0077	0021	O	001	001	001	JSB	ADDRl
	66	0100		1	Oil	110	000	DTDS
	67	0101	0105	O	100	010	111	BRN	SUPA6
•	68	0102		O	010	101	000	SUPA60 CXM
	69

LOAD DS REGISTER 1 ADDRESS Adresse von DS-Register 1 laden

LOAD Y TO C
Y nach C laden

SAVE Y Y bewahren

LOAD DS REGISTER O ADDRESS Adresse von DS-Register O laden

LOAD X TO C
X nach C laden

LOAD Y IN A

Y nach A laden

Y IN C AND X IN A

Y in C und X in A

LOAD Y IN DS REGISTER O

Y ins DS-Register O laden

Y IN A AND X IN C

Y in A und X in C

LOAD DS REGISTER 1 ADDRESS Adresse von DS-Register 1 laden

LOAD X IN DS 1 . X in DS 1 laden

	70	0103	0174
	71	0104	O24'3
	72	0105.	0007
	73	0106	0015
	74	0107
	75	0110
	76	0111	0243
	77	0112
	78	0113	O23C
f09826.	79 80	0114 0115
ο co	81	0116	0006
co ro	82	0117
	83	0120
	84	0121
	8-5	0122
	86	0123
	87	0124
	88	0125

0 000 110 100 SUPA61 CLS

0 111 000 100 SS7

Q. 000 010 000 SUPA6 ROM 0

1 000 010 000 DIV61 ROM 4 Q 010 001 110 TPOLR

0 100 101 000 0 110 001 110

0 111 UQ 101

1 010 010 001 0 100 101 000

0 000 100 001

0 000 111 001

1 Oil 111 000

0 HO 001 110

1 010 010 001

0 110 101 000

1 001 100 101

0 010 000 100 0 000 Oil: Oil

W,BTC TO POLAR ROUTINE
zur Polar-Routine

CTS	SET	SAVE Y Y bewahren	2363
W, CTA	MP Y 61		co
JSB
JSB	ADDR
CTS	ADDRO	SET RETURN FLAG Rückkehrkennzeichen setzen
JSB		COMPUTE Y2, Y2 laden
JSB		SAVE Y2 Y2 bewahren
DSTC ·	ΜΡΥ61
W, CTA
JSB	ADD 61
STA	SQRT
JSB , SS2	LOAD DS REGISTER O ADDRESS Adresse von DS-Register O 1
BRN	LOAD X IN C X in C laden
	COMPUTE X2 X2 berechnen
LOAD Y2 IN A Y2 in A laden
ADD THE TWO, die beiden addieren
COMPUTE R R berechnen

	89	0126	0137
	90	0127
	91	0130
	92	0131
	93	0132	0140
	94	0133	•1 00
	95	0134	0105
O
co 00	96	0135	0005
KJ
co	97	0136	0147
O	98	0137	0164
OO co	99	0140	0230
	100	0141
	101	0142
	102	0143
	103	0144
	104	0145
	105	0146
	106	0147

1 Oil 111 000 RSQRT DSTC

1 110 101 110

1 Oil 110 000

1 110 101 110

W, AXC DTDS W, AXC

0	110	101	000	STA	TPOLRl
0	001	111	110	S, CMl
0	101	111	111	BRN

1 000 100 100

0 110 000 Oil BRN

100 TPOLRl SS8

O 100 Oil 001 TP0LR2 JSB

O 010 000 100
O 000 010 111

SS2 BRN

1 000 010 100 RATAN YS8

O 110 Oil 111

O 111 010 101

1 001 100 101 . JSB O 001 111 110 TP0LR3 S,CMl TP0LR2

DIV61

ATAN

TP0LR3

ADD61

LOAD X IN C
X in C laden

LOAD X IN C
X in C laden

STORE R IN DS REGISTER O

R im DS-Register O speichern

LOAD R IN C, S IN A
R in C, S in A laden

Y IN A Y in A

CHECK IF X IS NEGATIVE
prüfen, ob X negativ ist

YES, PREPARE TO ADDl80

ja, Addition von 180 vorbereiter

NO, RESET 8

nein, 8 zurückstellen

FIND Y/X
Y/X finden

COMPUTE ARCTAN Y/X
arctan Y/X berechnen

IS S8 SET

ist S8 gesetzt?

NO, CONTINUE
nein, fortfahren

YES, LOAD 180
ja, 180 laden

ADDl80 180 addieren

CHECK IF ANGLE IS NEGATIVE
prüfen, ob Winkel negativ ist

cn co co

	107	0150	0156	0152
	108	0151	0157	0155
	109	0152	0160	0164
	110	,0153	0161
	111	0154	0162	0230
	112	0155	0163	0007
CO	Seite 16 5	.0164
1826/	113	0165	0021
σ co σ>	114	0166
	115
	116	0257
	117
	118	0017
	119	0027
	120
	121

* BRN TP0LR4 YES, ADD 360.

ja, 360 addieren

BRN TP0LR5 NO, CONTINUE

nein, fortfahren

O 111 010 101 TP0LR4 JSB ATCl LOAD 180

180 laden

O 110 101 Oil O 110 110 111

1 010 100 110 1 001 100 101 M,CPCC

ADD TO 360

zu 3 60 addieren

JSB ADD61 ADD 360 TO RESULT

3 60 zum Ergebnis addieren

O 000 100 001 TP0LR5 JSB ADDR

0 001 001 001

1 Oil 110 000

0 100 100 100

1 010 111 111

O 010 Oil 000 ADDR2

O 000 111 111 O 001 Oil 111

0 Oil 001 110 ATCl

1 100 001 100

JSB

ADDRl

DTDS	OPUT
RS4
BRN	ADDRC
LDC 2	PRXY
BRN
BRN
W,ZTC
PTl 2

LOAD DS REGISTER 1 ADDRESS Adresse von DS-Register 1 laden

STORE ANGLE IN DS REGISTER 1 Winkel im DS-Register 1 speichern

SET FLAG TO LOAD SYMBOL A AND R Kennzeichen setzen, um Symbol A und R zu laden

GO TO" OUTPUT

zum Ausgang gehen

LOAD DS REGISTER ADDRESS 2 Adresse vom DS-Register 2 laden

PRINT X, Y PROM ROM 1 ⁰^ X, Y von ROM 1 drucken °*^

	122	0167	0275	O	001	OU	000	LDCl	0PUT3
	123	0170		1	000	OH	000	LDC8
	124	0171		O	000	001	100	PTO
	125	0172		O	010	Oil	OQO	LDC 2
	126	0173		O	QOO	HO	000	RETURN
	127	0174		1	on	UO	111	BRN
	128	0175	Ql 07	O	010	101	000 set	CXM	TPOLR
	129	0176	QQ 3 3	.0	000	001	100	PTO	TRECT
	130	0177		O	110	OU	000	LDC 6
O CD	131	0200	Q337	O	QlO	101	000 SETI	CXM	ACC+
CO	132	0201	O34Q	Q	000	UO	000	RETURN	ACC-
CD	133	0202		O	IQO	OH	111	BRN
O OO	134	0203	0017	O	001	101	111	BRN	ADDRC
CD
	135	0204		1	101	Ul	111	BRN
	136	0205	0210	r-l	11Q	000	OH	BRN	SYMBL
	137	0206	0240	O	Oil	OU	QOO ADDR3	LDC 3	SYMBLO
	138	0207	0053	O	000	in	IU .	BRN	RSIN
	' 13 9	0210	1	111	OU	000 SYMBL	LDC15
	14O	0211	O	000	101	100	YPO
	141	0212	1	000	100	Oil	BRN
	142	0213	1	010	000	OU	BRN
	143	0214	O	010	101	111	BRN

LOAD 180 180 laden

PRINT DATA RETURN
Datenrückkehr drucken

SET RETURN FLAG
Rückkehrkennzeichen setzen

TO POLAR ROUTINE FROM ROM 1 zur Polar-Routine von ROM 1

TO RECT.ROUTINE FROM ROM 1

zur Rechtwinkel-Routine von ROM 1

ACC+ ROUTINE FROM ROM 1

+ Akkumulierungsroutine von ROM 1

ACC-ROUTINE FROM ROM 1

- Akkumulierungsroutine von ROM 1

LOAD DS REGISTER ADDRESS 3 DS-Register-Adresse 3 laden

cn co co

RETURN AFTER SIN
hinter sin zurückkehren

	144	0215	0037
	145	0216	0143
	146	0217	0126
	147	0220
	148	0221
	149	0222	0007
*■*	150	0223	0161
CD
CD ep	151	0224
co	152	0225	0007
GD	153	0226	0205
OD
CO	154	0227
	155	0230	0321
	156	Q231
	157	0232
	158	0233
	159	0234
	160	0235
	161	0236	0102

O OQl 111 111

ο 110 001 111

O IQl Oil Oil

O 000 100 QOl

0 111 001 001

1 Oil 110 000

0 000 100 001

1 QOO Oil 001

1 011 110 000

1 101 000 111

1 100 001 100

0 001 100 010

O IQO 001 Oil

BRN BRN BRN

1 QOO 101 HO CLEAR Vf,EKC' 0-011 001 110 W,ZTC

JSB JSB

JSB JSl

1 100 QOl 100 ADD61 PT12 O 010 010 000 ROM O 010 101 000 CHECK CXM

P ,CMl BRN

RCOS

RATAN

RSQRT

ADDR
ADDR2

ADDR
ADDR3

REGAL

RETURN AFTER COS
hinter cos zurückkehren

RETURN AFTER ACTAN '
hinter actan zurückkehren

RETURN AFTER SQUARE ROOT hinter Quadratwurzel zurück" kehren

SAVE B B bewahren

LOAD O IN C
O in C laden

LOAD DS REGISTER 2 ADDRESS Adresse von DS Register 2 lader.

LOAD O IN DS REGISTER 2 O in DS-Register 2 laden

LOAD DS REGISTER 3 ADDRESS Adresse von DS-Register 3 lader

LOAD O IN DS 3
O in DS 3 laden

OUTPUT THE O CONTENT
O-Inhalt ausgeben

CHECK FOR PROGRAM MODE ROUTINE Routine für Prüfung auf Programme betrieb ·

SUPA60

0237

0240

0241 0242 0243

0244 0245 0246 0247

0250

0251

0253

1 010 101

CHECKl

0102

0260

0002

1 110 010 000 SYMBLO ROM

0 000 000 000 DUMMY

1 Oil 100 100 CHECK2 RSIl O 100 001 Oil

0 000 101 110 MPY61

1 0Ö0 010

0 100 100 100 PRRA

1 Oil 000 Oil

1 110 101 110 ACC3 O 000 001 Oil

BRN	SUPA60
W,ZTB	•
ROM 4
RS4
BRN .	POPUT
W, AXC
BRN	ACC30

CONTINUE TO CHECK PRINT ON COMMAND FLAG

mit Prüfung des Kennzeichens "Auf Befehl drucken" fortfahren

PRINT SYMBOL ROUTINE Routine für Symboldruck

<30 BACK TO SUPERVISOR zum überwachungsprogramm zurückgehen

PRINT DS 0,1 WITH SYMBOL R,A DS Ο,ί mit Symbol R,A drucken

COMPLIMENT ENTERED X eingegebenes X komplementieren

0252 0253

0254 0255

0200

0,000 000 OQO DUMMY

1 110 100 000 CHECKl YPOC

1 Oil 010 1 000 000 Oil

YSIl BRN CHECK PRINT ON COMMAND FLAG Kennzeichen für "Auf Befehl drucken" prüfen

SETI NOT SET, CONTINUE WITH OUTPUT _ nicht gesetzt, mit Ausgabe fort- 4>. fahren go

	177	0256	0242
	178	0257	0232
	179	0260
	180	0261
	181	0262
	182	0263
	183	0264
	184	0265	0311
D X) "	185	0266
O y>	186	0267
S':.:.	187	0270	0210
30 ■: ■ ·., 73 ·	188	0271	0007
	189	0272	0015
	190	0273
	191	0274	0024
	192	0275
	193	■ 0276
	194	0277

1 010 001 Oil

1 001 101 101 OPUT JSB

0 010 101 000 POPUT CXM

0 001 001 100 'PTl

0 001 Oil 000 LDCl

0 010 101 0o»0 CXM

0 100 010 100 YS4

1 100 100 111 BRN

1 101 001 100 , PT13

0 000 Oil 000 LDCO

1 000 100 Oil SYMBLl BRN 0 000 100' 001 OPUTl JSB

0 000 111 001 JSB

1 Oil 111 000 0PUT4- DSTC

0 001 010 Oil

0 001 001 100 0PUT3 PTl 0 010 101 000 CXM CHECK2 SET, GO TO SUPERVISOR

gesetzt, zum überwachungsprogranun gehen

CHECK

POLAR

SYMBL

ADDRO

PRINT

CHECK FOR PROGRAM MODE auf Programmbetrieb prüfen

IS S4 SET

ist S4 gesetzt

NO, PREPARE SYMBOL R
nein, Symbol -R vorbereiten

YES, LOAD SYMBOL X "
ja, Symbol X laden

GO TO ROM 7 TO PRINT SYMBOL

zum ROM 7 gehen, um Symbol zu

drucken

LOAD DS REGISTER O ADDRESS

Adresse von DS-Register O laden

LOAD X OR R IN C
X oder R in C laden

GO TO ROM A DATA PRINT ROUTINE zur Datendruckroutine,des ROM A gehen

LOAD SECOND PRINT RETURN PLAG Rückkehrkennzeichen für zweiten Druck laden

o oio on ooo

195 0300

196 0301

197 03p2

198 0303

199 0304

200 0305

201 0306

202 0307

203 0310

204 0311

205 0312

206 0313

207 0314

208 0315

209 0316

210 0317

211 0320

0314

0210

0007 0021

0273

0270

0305

0271

0 010 101

0 100 010

1 100 110 Oil

1 101 001

CXM YS BRN

0 001 Oil 000 LDCl

1 000 100 Oll SYMBL2 BRN

O 000 100 001 OPUT2 JSB

O 001 001 001 JSB

1 Oil 101

1 101 001 100 POLAR PT13

1 Oil Oil 000 LDC11

1 QIl 100 Oil BRN

1 101 001 100 POLARl PT13

0306

O	100	on	000	LDC 4
1	100	010	111	BRN
1	Oil	100	111	BRN
1	100	Oil	on.	BRN

S4 SET S4 gesetzt

POLARl NO, GO TO LOAD SYMBOL A nein, zur Ladung von Symbol A gehen

YES, LOAD SYMBOL Y
ja, Symbol Y laden

SYMBL

ADDR
ADDRl

0PUT4

SYMBLl

SYMBL2

OPUTl

0PUT2

GO TO ROM 7 AND PRINT SYMBOL zum ROM 7 gehen und Symbol drucken

LOAD DS REGISTER 1 ADDRESS Adresse von DS-Register 1 laden

LOAD ¹YORAIHC
Y oder A in C laden

LOAD SYMBOL R
Symbol R laden

GO TO PRINT SYMBOL AND DATA zum Drucken von Symbol und Daten gehen

LOAD SYMBOL A
Symbol A laden

GO TO PRINT .SYMBOL AND DATA zum Drucken von Symbol und Daten gehen

RETURN PROM PRINT SYMBOL IN ROM 7 zurück von Symboldruck in RÖM7

RETURN FROM PRINT SYMBOL IN ROM' 7 zurück von Symboldruck in ROM 7

O) CO CO

O
CiD
CO

212	0321	0007
213	0322	0161
214	0323
215	0324	0007
216	0325	0015

0 000 100 001 RFCAL JSB

0326

218
219

0327
0330

0331

221
222

0332
0333

0334

224	0335
225	0336
226	0337
227	0340
228	0341

0007
0205

0007
0021

0257

0 111 001 001

1 Oil 111 000

0 000 100 001

0 000 111 001

1 Oil 110 000

0 000 100 001

1 000 Oil 001

1 Oil 111 000

O 000 100 001

0 001 001 001

1 Oil 110 000

JSB DSTC

JSB JSB

JSB JSB

JSB JSB

O	100	000	100	ACC+	SS4
1	010	111	111	ACC-	BRN
1	000	000	100		SS8 "
O	010	001	110	W, BTC
O	100	101	000	CTS

ADDR

ÄDDR2

ADDR ADDRO

ADDR ADDR3

ADDR ADDRl

OPUT

RECALL ACC ROUTINE
Akkumulationsroutine zurückrufen

LOAD DS REGISTER 2 ADDRESS Adresse von DS-Register 2 laden

LOAD X IN C
X in C laden

LOAD DS REGISTER O ADDRESS Adresse von DS-Register O laden

LOAD X IN DS REGISTER O X in DS-Register O laden

LOAD DS REGISTER 3 ADDRESS Adresse von DS-Register 3 laden

LOAD Υ IN C
Y in C laden

LOAD DS REGISTER 1 ADDRESS Adr se von DS-Register 1 laden

LOAD Y IN DS REGISTER 1 Y in DS-Register 1 laden

GO TO OUTPUT

zum Ausgang gehen

SAVE ENTERED Y IN STACK eingegebenes Y im Stapel bewahren

K)

co co co co

co

229	0342	0174
230	0343	0007
231	0344	0021
232	0345

0 111 110 101 JSB · SET

0 000 100 001 JSB

0 001 001 001 JSB

1 Oil 110 000 DTDS

SET RETURN FLAG,
Rückkehrkennzeichen setzen

ADDR ADDRl LOAD DS REGISTER 1 ADDRESS Adresse von DS-Register 1 laden

STORE ENTERED IN DS REGISTER eingegebenes in DS-Register laden

	Seite	167	0007	O	110	001	110	W ,CTA	ADDR
	233	0346	0205	O	000	100	001	JSB	ADDR3
O CO	234	0347		1	000	Oil	001	JSB
OD K>	235	0350		1	Oil	111	000	DSTC '
CD ι—ι	236	0351	0374	1	000	010	100	YS8	ACCl
1862	237	0352 ■	0230	1	111	110	Oil	BRN	ADD 61
	238"	0353		1	001	100	101 ACC2	JSB
	239	0354	0007	1	Oil	110	000	DTDS	ADDR
	240	0355	0015	O	000	100	001	JSB	ADDRO
	241	0356		O	000	111	001	JSB
	242	0357		1	Oil	111	000	DSTC
	243	0360

LOAD DS REGISTER 3 ADDRESS Adresse von DS-Register 3 laden

LOAD Y IN C
Y in C laden

IS S8 SET

ist S8 gesetzt?

NO, IT IS ACC-

nein, es ist Akkumulation-

YES, GO TO ADD

ja, zum Addieren gehen

STORE FINAL Y IN DS REGISTER letztes Y in DS-Register 3 speichern

LOAD DS REGISTER O ADDRESS Adresse von DS-Register O laden

LOAD X IN C?
X in C laden

OO CO CO OJ -F-CO

00
NJ
CD

O
OO
CD
KJ

244 0361

245 0362

246 0363

247 .0364

248 0355

249 0366

250 0367

251 0370

252 0371

253 0372

254 0373

255 0374

256 0375

257 0376

258 0377

0007 0161

0250

0230

0105

0354

O 110 001 110 W,CTA

0 000 100 001 . JSB

0 111 001 001 JSB

1 Oil 111 000 DSTC 1 000 010 100 YS8

1 010 100 Oil BRN

1 001 100 101 ACC4 JSB

1 Oil 110 000 DTDS

1 000 100.100 RS8

1 100 101 000 DNR

0 100 010 111 BRN

1	110	101	110 ACCl	W, AXC
O	Oil	111	110	S, 2NCC
O	000	000	000	NOP
1	110	110	Oil	BRN

ADDR ADDR2

LOAD X TO A
X nach A laden

LOAD DS REGISTER 2 ADDRESS Adresse von DS-Register 2 laden

IS S8 SET

ist S8 gesetzt

ACC3' NO, IT IS ACC-, COMPLIMENT nein, es ist -Akkumulation, komplementieren

ADD61 YES, GO TO ADD

ja,- zum Addieren gehen

STORE FINAL X IN DS REGISTER 2 letztes X in DS-Register 2 speichern

RESET S8 S8 zurückstellen

SUPA 6

RESTORE ENTERD Y
eingegebenes Y zurückstellen

GO TO SUPERVISOR

zum Überwachungsprogramm gehen

COMPLIMENT ENTERED Y . eingegebenes Y komplementieren

Zeilen laufende Abzweig Nr ο Adresse Adresse

	3 4	OOOO 0001
	5 6	0002 0003
4 0 9 8 2 8	7 8 9	0004 0005 0006
/0882	10 11 12	0007 0010 0011
	. 13	0012
	14	0013
	15	0014
	16	0015
	17	0016

0002

0002

0012

PTO	PRINTER Drucker	ENABLE freigeben
PRE		FLAG? Kennzeichen?
YSIl	MESB	NO, WAIT nein, warten
BRN

MATH/USER-DEFINABLE FUNCTION BLOCK LISTING (ROM B-7)

Funktionsblock für mathematische/benutzerdefinierbare

Funktionen (ROM B~7)

Betriebs-Kode Bit-Muster O 000 001 100 FPRT O 101 110 000

1 011 010 100 MESB

0 000 001 011

1 011 100 100 1 111 110 000 1 101 110 000

0 000 111 100

1 101 101 100 MESBB

0 000 001 011

1 011 010 100 MESC

0 000 101 011

1 011 100 100 O 011 110 000 O 000 110 000

RSIl CCS

TCS PLS

YP13

BRN

YSIl

BRN

RSIl

ADV

RETURN

YES, RESET IT ja, zurückstellen

RIGHT PART OF PRINTER MASK rechter Teil der Druckermaske

LEFT PART OF PRINTER MASK linker Teil der Druckermaske

INCREMENT SECTOR COUNTER Sektorzähler erhöhen

LAST SECTOR letzter Sektor

MESB

MESC

No	F FLAG	, RESET
	Kennzeichen	zurückstellen
nein	WAIT
YES,	nein, warten"
ja,	YES,
NO,	ja,

PAPER ADVANCE Pap i ervor s chub

OT ISJ

18 0017

19 0020

20 0021

21 0022

22 0023

23 0024

24 0025

25 0026

26 0027

27 0030

28 0031

29 0032

30 0033

31 0034

32 OQ35

33 0036

34 0037

35 0040

36 0041

37 0042

38 0043

39 0044

40 0045

0021

1 101 001 100 NOTE PTl3

1 000 101 110 W,BXC

1 111 011 000 MESA LDCl5

GENERATE MESSAGE "NOTE"
Nachricht "Beachten" erzeugen SAVE C REG
C-Register bewahren

PREPARE "NOTE 19" MESSAGE
Nachricht "19 beachten"
vorbereiten

O	111 101 100	YP7	N
O	001 000 111	BRN MESA
1	100 Oil 000	LDC12	O
1	111 Oil 000	LDCl 5
O	000 Oil 000	LDCO	T
1	111 Oil 000	LDCl 5,
1	Oil Oil 000	LDCIl	E
1	111 Oil 000	LDC15
i-l	Oil Oil 000	LDCIl
1	111 Oil 000	LDC15
O	111 110 000	CTT
O	000 110 000	RETURN	L
1	101 001 100 ENTER	PT13
1	111 Oil 000	LDClS	E
O	000 000 000	NOP	N
1	Oil Oil 000	LDCIl	T
1	100 Oil 000	LDCl 2	E
1	010 Oil 000	LDClO	R
1	Oil Oil 000	LDCIl
1	Oil Oil 000	LDCIl

LOAD SPACE Abstand laden '

	41	0046	0062
	42	0047	0063
	43	0050	0064
	44	0051	0065
	45	0052	0066
	46	0053	0067
	47	0054	0070
	48	0055	0071
	49	0056	0072
•IS*	50	0057
09826/C	51 0060 52 0061 Seite 169
QO
ro	53
	54,
	55
	56
	57
	58
	59
	60
	61

0056

0066

7777

1	111	Oil	000	HOME	LDCl 5
0	ooo	110	000	PRANG7	RETURN
1	111	Oil	000	PRANG3	LDC15
0	001	001	100		PTl
1	111	Oil	000		LDC15
1	111	Oil	000		LDCl 5
0	111	110	000		CTT
0	010	001	100	PRANG4	PT 2
0	100	001	110		W, SLA
0	000	111	100		PLS
1	101	101	100		YP13
0	010	111	Oil	BRN

1 110 101 110 O 001 100 010

0 Oil Oil Oil

1 111 Oil 000

1 Oil 001 100 1 111 Oil 000 1 111 Oil 000

0 000 000 001

1 100 001 110

PRANG5

W, AXC P, CMl

BRN LDC15

PTIl LDC15 LDC15 JSB

W, AXB

PRANG4

PRANG5

FPRT

SECOND zweiter

LEFT PART OF PRINT MASK linker Teil der Druckmaske

LOAD IT IN C in C laden

CHECK FOR LEADING ZERO ¹ auf führende Null prüfen

NO, CONTINUE
nein, fortfahren

YES, BLANK IT
ja, ausblenden

GO TO PRINT IT
zum Druck gehen

RELOAD DATA

Daten erneut laden

co

OT

CO

co

CO

	62	0073	0113	■	0125	1 010	101	000	•	■ SS4	MTC	SUPA70
1	63	0074	0 100		1 100	001	100			PTl 2
	64	0075	0351		0 001	100	010		PRINTA	P, CMl	DISPLY
	65	0076		0362	0 100	101	111		BRN
	66	0077	0332		000 100					ERR 5
	67	0100	0016 OlOf	0114	1 110	100	111	SUPA7 ERR3-	BRN	NOTE ERR3
	68	0101		0016	0 000	010	000		ROM 0
	69	0102		1 101	101	Oil		BRN
O co OO	70 71	0103 0104		0 000 0 100	111 Oil	101 Oil		JSB BRN
126/	72 73	0105 0106	0 000 1 101	010 001	000 100		ROM 0 PT13
ο OO	74	0107	0 Oil	Oil	000	SUPA70.	LDC 3	ERR 2
σ>	75	oiio·	0 000	000	000	WAIT	NOP
	76	Olli	0 001	Oil	000		LDCl
	77	0112	0 101	010	111		BRN,	0PUT9
	78	0113	1 110	101	110		W, AXC
	79	0114	0 000	010	100		YSO	WAIT
	80	0115	1 111	001	Oil	BRN	NOTE
	81	0116	0 000	100	100	RSO
	82	0117	0 100	110	Oil	BRN
	83'	0120	0 000	111	101	JSB

PROGRAM MODE TABLE NUMBER ERROR
Tabellennuinmernf ehler im Programmbetrieb

OVERFLOW ERROR MESSAGE
Überlauf-Fehlernachricht

FINISH ROUTINE CLEAR STATUS ETC
Routine für Statuslöschung usw.
beenden

WAIT FOR KEY UP
warten,, bis Taste oben

ERROR NOTE 19 ROUTINE FROM ROM O
Fehler, 19 beachten, Routine
von ROM O

co co ro

84	0121
.85	0122
86	0123
87	0124
88	0125
89	0126
90	0127
91	0130
92	0131
93	0132
94	0133
95	0134
96	0135
97	0136
98	0137
99	0140
100	0141
101	0142
102	0143
103	0144
104 .	0145
105	0146
106	0147
107	0150
108	0151

7777

0362

0317

0141 0244

0155

1	101	001	100
0	Oil	011	000
0	000	000	000
0	000	Oil	000
0	000	000	001
0	010	001	110
0	010	101	000
1	100	001	100
0	000	Oil	000
0	010	101	000
1	111	001	Oil
0	000	000	000
0	000	000	000
1	101	000	001
0	100	101	000
1	101	001	100
Ι	111	Oil	000
Ο	000	101	100
0	110	000	111
1	111	Oil	000
1	010	010	Oil
1	111	Oil	000
0	001	100	010
0	110	110	111
1	111	Oil	000

ERR2

OPUT

OPUTl

PRANG6

PT13

LDC3

NOP

LDCO

JSB

W, BTC

CXM

PTl 2

LDCO

CXM

BRN

DUMMY DUMMY JSB CTS PT13 LDC15 YPO BRN LDC15 BRN LDCl 5 P ,CMl • BRN LDC15

FPRT

0PUT9

TO RESET STATUS BIT Statusbit zurückstellen

CHECK 1

OPUTl

0PUT3

PRANGl NO, CONTINUE nein, fortfahren

YES, BLANK IT
ja, ausblenden..

CD CO OJ -P-

0152

0153

0154

0155

0 001 100 010

0 110 110 111

1 111 Oil 000

BRN LDC15

0 101 001 100 PRANGl PT5 CHECK FOR LEADING ZERO . auf führende Null prüfen

PRANGl NO, CONTINUE ne in, fortsetzeη

YES, BLANK IT ja, ausblenden

BLANK BETWEEN DEGREE AUD MINUTE Leerstelle zwischen Grad nand Minute

	Seite	170	0051
IN O OD	113	0156	0050
CO	114	0157	0351
2 8/0!	115	0160
	116	0161	0345
	117	0162
	118	0163
	119	0164
	120	0165
	121	0166
	122	0167
	123	0170

1 111 Oil 000 1 1.11 Oil 000 0 001 100 010

0 010 100 111

0 010 100 Oil

1 110 100 111

1 001 001 110 1 001 001 110

LDC15 LDC15 P/CMl

0 110 001 110 PRANGG W,CTA

1 110 010 111 BRN

1 001 001 110 PRANN Wj¹SRC

W, SRC W, SRC CHECK FOR LEADING. ZERO ON MINUTE auf führende 'Null bei Minuten prüfen

PRANGS NO, CONTINUE, nein, fortsetzen

PRANG7
DISPLY

GO TO DISPLY .FROM BQM von ROM O zur· Anzeige gehen

GO TO CHECK PRINT ON COMMAiPID FLAG Kennzeichen "Auf Befehl drucken" prüfen

ALIGNMENT SHIFT Ausri-ehtungsver Schiebung

124	0171
125	0172
126	0173
127	0174
128	0175
129	0176
130	0177
131	0200
132	0201
133	0202
134	0203
135	0204
136	0205
137'	0206
138	0227
139	0210
140	0211
141	0212
142	0213
143	0214
144	0215
145	0216
146	0217

0172

0155

0146 0242

0201

7777 0344

1	101	001	100	• PT13	PRANGO
1	111	Oil	000	PRANGO LDC15
1	001	101	100	YP 9
0	111	101	Oil	BRN
0	001	100	010	P, CMl

0 110 110

0 110 Oil Oil

1 010 001 Oil

1 111 Oll 000 PRINT

0 Oil 101

1 000 000

1	Oil	Oil	000
1	Oil	Oil	000
O	000	Oil	000
1	111	Oil	000
O	111	110	000
1	110	101	110
O	•110	001	110
1	Oil	001	100
1	111	Oil	000
1	111	Oil	000
O	000	000	001
1	110	010	Oil

BRN LOAD LEADING SPACES
führende Leerstellen laden

CHECK FOR LEADING ZERO ON DEGREE
auf führende Null bei Grad
prüfen

PRANGl · NO, CONTINUE

nein, fortsetzen

BRN	PRANG6
BRN	PRINO
LDC15
YP3
BRN .	PRINT
LDCIl
LDCIl
LDCO
LDC15
CTT
W, AXC
W, CTA
PTIl
LDC15
LDCl 5
JSB	PPRT
BRN	TAB

LOAD SPACE FOR PRINTER
Platz für Drucker laden

•B

t-O CO

cn

OO CjO

CO

GO BACK TO TABLE ROUTINE IN ROM 1 zurück zur Tabellenroutine in ROM

147	0220
148	0221
149	0222
150	0223
151	0224
152	0225
153	0226
15,4	0227
155	0230
156	0231
157	0232
158	0233
159...	0234
160	0235
161	0236
162	0237
163	0240
164	0241
165	0242
166 "	0243
167	0244
168	0245
169	0246

0035

O 000 000 000 O 001 111 001

0222

0232
7777

0351
0256
0324
0221

1 111

0 010

1 001
1 Oil
1 100
1 000

0 111

1 101
1 111
1 001
1 001

0 000

1 Oil

Oil 101 001 Oil Oil Oil 110 001 Oil 101 101 000 101

000 100 Oil 000 000 000 000 100 000 100 Oil 001 110

O 000 000 000

. DUMMY PRINTl JSB

PRINT3 LDC15 YP2 BRN IiDCIl LDC12 LDC

PRINT4 CTT PT13

PRINT5 LDC15 YP BRN JSB

PRINT6 W,ZTA

ENTER

0305

1 110 100 111 BRN

1 010 111 Oil BRN

1 101 010 101 PRINO JSB

1 001 000 111 BRN

O 111 110 000 0PUT3

0 110 101 000 STA

1 100 010 111 BRN

PRINT3

PRINTS FPRT

DISPLY SYMBL CHECK2 PRINTl

CTT
0PUT5

LOAD MESSAGE "ENTER" Nachricht "ENTER" (eintreten) laden

CLEAR A FOR ZERO DISPLAY löschen für Nullanzeige

TO PREVENT CARRY

um Übertrag zu vermeiden

FROM ROM 6

GO TO PRINT ANGLE

zum Winkeldrucken gehen

co

CD CO CO

J^

CO

CQ

H
O

	H	O
	£-1	ω
	D	-H
	Q	*>
	PS	-H
		P
	PS
	Q
	PS	M-i
		Q)
	PS	C
	O	•H
	CQ	+J
	H	j3
	J>	Q
	H	U
	P	U
		φ
	O
	CU
	W	φ
	fcq	fa
Eh
P	Eh
CM	O
O	£3

O O

O O

Ai

*

Ol

in

Eh

ro

in

σ\

(N

EH

U

rH

ro

236:

O

3:

343

Φ

r-i

•

U

U

O

Cu

rH

EH

rH

rH

Ai

hl

OS

9h

Eh

•μ

PS

rH

rH

Cu

U

Eh

U

X

CQ

A4

CU

CQ

N

Φ

JgJ

W

CM

P

fa

S

4J

tn

W

U

O

i-q

£H

O)

Φ

■»

CM

CO

CO

Eh

in

O^

Ai

Ai

CQ

CQ

W

φ tn

-H

ro

!3

Si

gj

CQ

CO

Φ

J3

CQ

O

PS

O

O

CO

o

O

S;

N

PS

S

O

CQ

CO

O

O

CO

O

O

O

ig

P

H

ß

CQ

O

Q

Q

O

O

<-·

PS

O

iH

PS

φ

<

CO

O

8

O

rH

O

rH

CQ

rH

i-H

'CQ

rf

Ai

O

O

O

rH

rH

,_,

Q

O

O

O

O

rH

rH

O

rH

rH

O

rH

rH

rH

O

Eh

JJ

Ρ»

O

O

O

Q

rH

O

rH

rH

O

rH

Q

D

U

N

O

O

O

rH

r-H

rH

rH

O

O

rH

O

U

O

<ö

O

O

O

i-H

rH

rH

O

rH

O

O

O

O.

ta

M

rH

<H

rH

O

r-i

rH

O

(H

rH

iH

rH

O

rH

O

EH

rH

Ό

O

rH

O

rH

rH

rH

rH

O

rH

O

tH

O

O

O

rH

rH

--H

8

rH

EH

JS

φ

U

O

rH

O

O

O

rH

ΜΗ

P

rH

O

O

rH

ο

O

O

H

Φ

Φ

O

O

O

O

PS

CQ

rH

rH

O

rH

CM

Ai

M-I

r;

O

CN

Q

1—I

CQ

O

■H

rj

O

O

H

P

rH

rH

Ai

P

CQ

H

P

Q

Jg

O

PS

co

Q

rH

CQ

U

f-H

rH

P

ι—ι

CQ

O

O

rH

O

O

W

rH

O

te

rH

U

iH

O

O

O

O

O

O

O

rH

rH

rH

O

O

rH

O

rH

O

rH

rH

!-Η

rH

rH

rH

rH

O

O

O

rH

U3 VO

ΓΟ r-i

•-ι Ο

O O

in

(N

rH	r-	ro	rH	O
			in	in
(N	r-	CM	ro	Ol
Q		O	O	O

	O	rH
	in
CM	CM	rH
O	O
		Φ
O	i-H	-H
	r^	φ
rH	i-i .	CQ

CMOJCM(N(NOl(N(N(N(NCN(NOl(NiNOJ

O O O O OQO OO O OQ Ο", O¹ O O

Ojro

Γ~ t^· Ο· Γ^ t> Γ^ ^; f~'"- CO OO OO OQ 'Off OO OO OO OO

i-H i-i rH Ή i-H rH- rH ' rH r-frH rH rH rH rH ' rHrH

cn m ·# r^ r> r~

OJ CM Ol

QOO

(Ti O rH OO O\ O\ rH rH rH

409826/0.882

192	0275	0317	1	100	111	111	BRN	SYMBL4
193	0276	0316	1	100	111	Oil	BRN	SYMBL5
194	0277	0016	0	000	111	101	JSB	NOTE
195	0300		1	101	001	100	PT13
196	0301		0	Oil	Oil	000.	LOC 3
197	0302		0	000	QOO	000	NOP
198	0303		0	Oil	Oil	000	LDC 3
199	Q3O4	0125	O	101	010	111	BRN	ERR 2
200	0305		0	100	001	110	0PUT5 W,SLA
201	0306		1	110	101	110	W, AXC
202	0307		1	101	001	100	PT13
203	0310	0313	1	100	101	111	BRN	0PUT6
204	0311		1	110	101	110	W, AXC
205	0312	0164	0	111,	010	Oil	BRN	PRANGG
206	0313		1	100	Oil	000	0PUT6 LDC12
207	0314		1	Oil	001	100	PTIl
208	0315	0354	1	110	110	pll	BRN	OPUT 7
209	0316		1	100	010	000	SYMBLS ROM 6

210 0317

211 0320

1 100 010 000 SYMBL4 ROM

1 110 100 000 CHECKl YPOC SQUARE ROOT OF A NEGATIVE NUMBER

Quadratwurzel aus negativer Zahl

LOAD NOTE 30
Merkwort 30 laden

RETURN TO ROM 6 AFTER SYMBOL PRINT I

zurück zum ROm 6 nach Symboldruck 1

RETURN TO ROM 6 AFTER SYMBOL PRINT 2

zurück zürn ROM 6 naöh Symboldruck 2

PRINT ON COMMAND FLAG CHECK Kennzeichenprufung "Auf Befehl drucken"

ro co er, cc

CO

0321

0322

	214	0323
	215	0324
	216	0325
	217	0326
	218	0327
O φ 00
ts> , CD	219	0330
-s. en	220	0331
1862
	221«	0332
	222	0333
	223	0334
	224	0335
	225	0336
	226	0337
	227	0340
	228	0341
	229	0342

0047

0047

0236

0016

0125

0047

1 Oil 010 O 010 Oil

YSIl BRN

1	Oil	100	100	RSIl
1	111	QlO	111	BRN
1	110	100	000	CHECK 2 YPOC
1	Oil	010	100	YSIl
O	010	Oil	111	BRN

1 Oil 100 100 RSIl

1 001 111 Oil BRN

O 000 111 101 ERR5 JSB

1	101	001	100	PT13
O	Oil	Oil	000	LDC3
O	000	000	000	NOP
O	100	Oil	000	LDC 4
O	101	010	111	BRN
1	110	100	000 CHECK3	YPOC
1	Oil	010	100	YSIl
O	010	Oil	111	BRN

HOME NOT SET, GO BACK TO PRINT
STORE AND RECAL SYMBOL
nicht gesetzt, zurück zum Drucken gehen, Symbol speichern und zurückrufen

SUPA71

PRINT ON COMMAND FLAG CHECK
Kennzeichenprüfung "Auf Kommando
drucken"

HOME NOTSET, GO BACK TO PRINT

ENTER ANGLE

' nicht gesetzt, zurück gehen
zum Drucken, Winkel eingeben

PRINT6 SET, GO TO ANGLE DISPLAY WITHOUT
PRINT

gesetzt, ohne Druck zur Winkelanzeige gehen

NOTE

ERR2

TABLE NUMBER ERROR
Tabellennummernfehler

PRINT ON COMMAND CHECK
Prüfung "Auf Befehl drucken"

CO

cn

CO CO 4>· CO

NOT SET, GO BACK TO ANGLE PRINT
nicht gesetzt, zurück zum Winkel-

230	0343	0346
231	0344	0347-
23,2	0345	0350
Seite 172	0351
233	0352
234	0353
235	0354
236	0355
237	0356
238	0357
239	0360
240	0361
241	0362
242	0363
243	0364
244	0365
245
246
247
248

0270

0337

0166

0105

0367 7777

0105

1 Oil 100 Oil

0 010 010 000 TAB 0 100 101 110 PRAN

BRN

ROM W, ATB CHECK4

SET, GO TO DISPLAY
gesetzt,- zur Anzeige gehen

1 110 000

0 111 Oil Oil

JSB

BRN

0 100 010 111 BRN

1 000 101 110 SUPA71 W,

CHECK3

O	000	000	000	DISPLY	DUMMY	SUPA7
O	100	010	000	CLEAR3	ROM 2
O	010	001	110		W, BTC
O	100	010	111	0PÜT7	BRN	0PUT2
1	111	Oil	000		LDCl 5
O	110	010	100		YS6	FPRT
1	111	Oil	111		BRN
O	Oil	Oil	οοο·	0PÜT8	LDC 3
O	000	000	001		JSB
O	010	001	110	OPUT 9	W ,BTC
O	000	110	100		CLS
O	111	000	100	SS7

SUPA7

CHECK PRINT ON COMMAND FLAG Kennzeichen "Auf Befehl drucken" prüfen

NOT SET, GO BACK TO PRINT ANGLE nicht gesetzt, zum Winkeldrucken gehen

• co

SET FIRST DIGIT ENTRY FLAG Kennzeichen für erste Zifferneingabe setzen

249	03 66	0105	0	100	010	111	OPUT 2	BRN	SUPA7
250	0367		0	100	011	000		ΙΛΟ 4
251	0370	0360		111	000	011	ERR4	BRN	QPUT8
252	0371	0016	0	000	111	101	JSB	ΝΟΤΕ

NUMBER TOO LARGE ERROR FOR CONVERSION

Zahl zu groß,Fehler für Umwandlung

	253	0372	0125	1	101	001	100	PT 13	ERR 2
	254	0373	0371	0	Oil	Oil	000	LDC 3	ERR4
	.255	0374	0	000	000	000	NOP
	256	0375	0	101	Oil	000	. LDC5
σ	257	0376	0	101	010	111	BRN
co co	258	0377	1	111	100	111	BRN

CO

στ

O
CO
OO

ro
ω
■^,

Zeilen laufende Abzweig-Nr. Adresse Adresse

0175 0351

0003 0257

0257

0005 0043 0257

0257

23 0257

3	0000
4	0001
5	0002
6	0003
7	0004
8	0005
9	0006
10	0007
11	0010
12	0011
13	0012
14	0013
15	0014
16	0015
17	0016
18	0017
19	0020
20	0021
21	0022

STATISTICS FUNTION BLOCK LISTING , (ROM,0) Statistik-Funktionsblock (ROM 0)

Betriebs-Kode

Bit-Muster

0 111 110 111 BRN ' SKIP- 0

1 110 100 0 110 011

0 000 100 000 PON 0 000 001

1 011 000 001 PLOT

1 000 001

1 010 010

1 011 000 001 KFYl

1 010 010

0 000 010 111 KFY2

0 010 001 111 KFY3

1 Oil 000 001 KFY4

1 100 010

1 Oil 000 001 KFY5

1 101 001

1 Oil 000 001 KFY6

0 110 010

1 100 010 000 KFY7

BRN	SKIF-	PREP	PREP
BRN	TESPRT
BRN	XROOT	5	PLOT
	PON	5
RMGRA
BRN
JSB
PT 8
ROM
JSB
ROM
BRN

CT

PREP

ROM	6	PREP
JSB		OFST
BRN		PREP
JSB
ROM	3.
ROM	6

POWER ON ACCESS TO RMGRB -' Netz ein, Zugriff zu RMGRB

10 HIST KEY ENTRY
Tasteneingabe 10 HIST

PLOT ItBY ENTRY
Tasteneingabeplotter

CHAR= KEY EHTRY
Tasteneingabe =

AXES KEY ENTRY

Ta st eneingabeachsen.

OFFSET/WIDTH KEY ENTRY Tasteneingabeversetzung/Breite

20 LINEAR KEY ENTRY
Tasteneingabe 20 linear

RECALL KEY ENTRY
Tasteneingaberückruf

rs*

GJ (T GJ CO

CO

	22	0023	0372
	23	0024	0257
	24	0025
	25	0026	0257
	26	0027
	27	0030	0257
	28	0031
	29	0032	0144
19826/086	30 31 32	0033 0034 0035	0237 0257
PO	33 *	0036	0257
	34	0037
	35	0040
	36	0041	0373
	37	0042	0207
	38	0043	0257
	39	0044
	40	0045

1 Oil 101 Oil KFY8 BRN T

1 Oil 000 001 KFY9 JSB PREP

1 100 010 000 ROM 6

1 Oil 000 001 KPYlO JSB PREP

1 000 010 000 ROM 4

1 Oil 000 001 KFYIl JSB PREP

O 110 010 000 ROM 3

0 110 010 Oil KFYl2 BRN ' EVAL

1 001 111 111 KFYl3 BRN BASIC 1 Oil 000 001 KFY14 JSB PREP

1 100 010 000 ROM 6

1 Oil 000 001 KFYl5 JSB PREP

1 100 010 000 ROM 6

1 010 010 100 FRKD YSlO

1 .111 101 111 BRN AK

1 000 Oil 111 BRN PRGMR

1 Oil 000 001 CI JSB PREP

0 010 101 000 CXM

1 Oil 001 100 ' PTIl

T KEY ENTRY
Tasteneingabe T

SAMPLE KEY ENTRY '
Tasteneingabeprobe

VAR KEY ENTRY
Tasteneingabevariation

30 PAR KEY ENTRY
Tasteneingabe 30 PAR

EVAL KEY ENTRY
Tastenexngabeauswertung

BASIC KEY ENTRY
Tasteneingabebasis

DELETE KEY ENTRY'
Tasteneingabe auslöschen

DATA ENTRY KEY ENTRY ■ Tasteneingabe Dateneingabe'

CHAR = KEY
Taste =

41 0046

42 0047 43. 0050

44

45
46

47

0051

0052 0053

0054

O co	48	0055
00	49	0056
ro
CD
^.	50	0057
O
00	51	0060
CD
ro	52	0061
	53	0062

54 0063

55 0064

56 0065

57 0066

58 0067

0345

0361

0 101 Oil - LDC5

1 110 010 111 BRN 0 000 110 100 RFTROUT CLS

EC

0 100 101

0 111 001

1 111 001

0 010 101

PT7 JSB

CHlA

1	Oil	110	000	DTDS
1	100	101	000	DNR
0	101	000	000 CONT	IS2
0	111	000	000	PINC
0	111	000	000	PINC
0	101	101	000	SRI

1	001	000	000	ISl
0	010	101	000	CXM
0	110	001	110	W, CTA
0	010	101	000	CXM
0	000	000	000	DUMMY

50 RETURN FROM EXT.ROUTINE

50, zurück von externer Routine

DATA TO D
Daten nach D

53- STAT FLAG TO M .

53 , Statistikkennzeichen

nach M

HENRY'S FLAG TO Rl7

Henry's Kennzeichen nach R17

DATA TO, C
Daten nach C

60 INCREMENT FROM 2ND BIT
60, erhöhen vom 2. Bit

OF PRGM COUNTER
des Prograiranzählers

NEW INSTRUCTION ADDRESS TO LS BITS OF 10

neue Instruktionsadresse nach LS-Bits von 10

FLAGS TO A
Kennzeichen nach A

CO CO .ρω

O
CO
OO

59	0070
60	0071
61	0072
62	0073
63	0074
64	0075
65	0076
6 6	0077
67	0100
68	0101
69	0102
70	0103
71	Q104
72	0105
73	0106
74	0107
75	0110
76	Olli

0257 0173 0347

0103 0104 0360

0112

O	111	001	100	T	PT7	PREP
O	οίο	010	000		ROM 1	T4
1	Oll	000	001	XPRINT	JSB	EXM712
O	111	101	111		BRN
1	110	100	001	SÜITE3	JSB
O	000	100	000		RMGRA
O	100	001	100		PT4	DN2
1	001	100	012	FX30	P, AMI
O	100	001	111		BRN	DNl
O	000	001	100	DN 2	PTO
O	100	010	Oil	DNl	BRN	CHOA
1	001	001	100	OUT	PT 9
1	111	000	101		JSB
O	111	000	100	NOTE	SS7
O	000	100	000		RMGRA	TO
1	Oil	111	110	INC	S, ZTA
O	100	101	101	JSB
1	111	111	110	SyAPlA

77	0112	Olli	0	001	Oil	100	TO	PRS	INC
78	0113	0366	0	000	101	100		YPO	BLANK
79	0114	0	100	100	111	Ν0ΤΕ3Ό	BRN
80	0115	1	111	Oil	101	JSB

SEARCH ROM 1 FOR PRGM
ROM 1 für Programm suchen

WHICH SAMPLE IS BEING ENTERED¹? welche Probe ist eingegeben

FETCH N2 N2 abrufen

Kennzeichen für erste Ziffer setzen SET FIRST DIGIT FLAG

RETURN TO HENRY'S SUPERVISOR zurück zu Henrys Überwachungsprogramm

SET AB TO PREVIOUSLY SET POINTER VALUE

AB auf vorher gesetzten Hinweismarkenwert setzen

FILL C WITH BLANKS

C mit Leerstellen füllen

Ol CO CO

	81	0116
	82	0117
	83	0120
	84	0121
	8.5	0122
	86	Q123
	87	0124
■IN	88	0125
W CP	89	0126
OQ ΙΌ	90	0127
σ>
*-%	91	0130
co
CD PO	92	0131
	93	0132
	94	0133
	95	0134
	96	0135
	97	0136
	98	0137
	99	0140
	IQQ	0141

0371

0366

0370

0 101 001 100

0 Oil Oil 000

1 111 101 QOl

1 Oil 001 HO

1 HO 100 010 0 QlQ IQl 000 0 000 OH 000

0 QQQ QH 000 Q QlO 101 OQQ

1 111 OH 101

0 111 QQl IQO

O 111 010 100

PT 13 LDC 3 JSB ADV

P ,AXC

CXM JSB

1	100	on	000	LDCl 2
Q	101	001	100	PT5
O	000	Oil	000	LDCQ
O	Oil	001	100	PT3
1	on	Oil	OQQ	LDCl 1
Q	QQl	QOl	IQQ	PTl
1	Oil	QH	QQO	• LDCH
1	111	IQQ	101	JSB

BLANK

PRINT

3 TO C13 3 nach C13

120 ADVANCE PAPER
Papiervorschub

SHIFT DIGIT IN A13 TO A12 Ziffer in Al3 nach Al2 verschieben

Al2 TQ Cl2 Al2 nach C12

O TO Fl2 AND FH
O nach Fl2 und FH

127C TO T AND BLANK C C nach T und C Leerstelle

130 LOAD "NOTE" IN C "NOTE" (Merkzeichen) In C laden

140 PRINT "NOTE 3 X"
"NOTE 3X" drucken

IS THIS NOTE 30?
ist dies NOTE 30?

Ca; CO

	101	0142	0156
	102	0143	0157
	103	0144	0160
	104	0145	0161
	105	0146	0162
	106	0147
	107	0150
O to	108	0151
Um/ 30	109	0152
\J 0)	110	0153
	111	0154
DO 7>	112 0155 Seite 175
	113
	114
	115
	116
	117

0217

0101
0257

0347

1 000 111 111 ' BRN

0 100 000 111

1 Oil 000 001 FVAL 1 010 010 000

1 110 100 001 XROOT

1 100 001 100

0 Oil 001 110 W,ZTC

0 101 Oil 000 LDC5

0 Oil 001 100 PT3

0 101 101 010 X,CMlC

1 001 101 110 W,BXC 1 010 101 000 MTC

FIN NO, GO THROUGH NORMAL EXIT

nein, durch normalen Ausgang
gehen

BRN	EX30	YES, ja,	TO C nach C
JSB	PREP
ROM 5
JSB	EXM712	, STRAIGHT OUT geradeaus
PTl 2
EXCHANGE FLAGS , Kennzeichen austa
1/2 1/2

O 010 101 000 START CXM

O 111 110 000

150

1/2 TO B 1/2 nach B

HENRY'S FLAG TO C

Henrys Kennzeichen nach C

Q 000	Oil	000	LDCO	O	+ F3
O 101	Oil	000	LDC 5	5	■* F2
O 000	100	000	RMGRA	160 EX

TO X TO Y
Ausgang nach X nach Y

STAT FLAGS TO M
Statistikkennzeichen nach M

LOAD STARTING ADDRESS TO PRGM

COUNTER

Startadresse zum Programmzähler

laden

co σ> co co

.ρ-co

	118	0163
	119	0164
	120	0165
	121	0166
	122	0167
	123	0170
	124	0171
	125	0172
O	126	0173
co OO	127	0174
ro CD	128	0175
■^ O 00	129	0176
CD
TO
	130	0177

0257

0 101 000 000 IS2

0 100 001 000 " SLT

1 000 000 000 TTP 1 001 000 000 , ISl 1 010 100 000 SBL

1 000 101 000 DSOF

0 000 101 000 DSTO

0 010 111 111 BRN

1 000 010 000 T4 ROM 0 000 000 000 DUMMY

0 101 000 000 SKIP- IS2

1 001 001 000 PDEC 1 001 001 00Q PDEC

131	0200	0175	1	001	000	000	ISl	SKIP
132	0201	0057	0	000	Oil	100	. PRS	CONT
133	0202	0107	0	000	101	100	YPO	NOTE
134	0203		0	111	110	111	BRN
135	Ό2Ο4	0	010	111	111	BRN
136	0205	0	100	011	111	BRN
137	0206	0	000	110	000	RETURN

SET BUSY LIGHT
Betriebsanzeigelicht setzen

TURN DISPLAY OFF
Anzeige ausschalten

TURN DISPLAY ON
Anzeige einschalten

DECREMENT THE PRGM COUNTER FROM Programmzähler erniedrigen von

THE 2ND BIT A NUMBER OF TIMES dem 2. Bit mehrmals hintereinander

EQUAL TO THE PREVIOUSLY SET POINTER ·.

gleich der vorher gesetzten Hinweismarke

RETURN FROM ROM 7 ROUTINES zurück von den Routinen des ROM 7

CO OJ CO 4>.

	138	0207
	"139	0210
	140	0211
	141	0212
	142	0213
	143	0214
O CO	144	0215
00 ro	145	0216
cn	146	0217
Ό 8 6 2·	147 148	0220 0221
	149	0222
	150	0223
	151	0224
	• 152	0225

1 Oil 111 110 PRGMR S,ZTA

0226

0177

0115

0361

0361

0 101 000 000

1 000 000 001

0 110 100 000

1 001 000 000 0 QOO 110 100

IS2 LlO

GIDE

ISl CLS

0	111	000	100	SS7	NOTE 30
0	100	Ho	111	BRN
1	OQO	001	100 FTN	PT8	CHlA
1	111	001	001	JSB
0	111	110	000	CTT
1	000	000	000	TTP
0	111	001	100	PT7	CHlA
1	111	001	001	JSB
0	010	101	000	CXM

0 TO A13 FOR NOTE 30 GENERATION 0 nach A13 zur Erzeugung von "NOTE 30"

210

EGRESS TO PRGMR IN 103 Ausgang zum Programmierer in 103

PRGMR NOT CONNECTED PRINT NOTE 30 Programmierer nicht verbunden, "NOTE 30" drucken

SET FLAG FOR NOTE 30 TERMINATION Kennzeichen für Festlegung von NOTE 30 setzen

FETCH LAST PRGM ADDRESS letzte Programmadresse abrufen

'22O AND RESTORE IT TO
und Zurückstellen nach

THE PRGM COUNTER
dem Programmzähler

HENRY'S FLAGS TO C
Henrys Kennzeichen nach C

1 011 110 000

DTDS HENRY'S FLAGS TO M? STAT FLAGS TO C

Henrys Kennzeichen nach M; Statis'tikkennzeichen nach C

STORE STAT FLAGS IN Rl7 . Statistikkennzeichen in R17 speichern

CO U) CO

O in

m ·<* in vo r- co σν

χ t* >< χ χ tu >4

H W Kl W W W H

W fc^ £^ £4 W fcw W

η a) Set) et) tu η

1-ί ■-Η	1-1 O	1-1 O	i-l O	1-t ©	■-1 i-l	f-1 O
TOT	OTT	111	000	TOO	TOO	010
οοο	000	000	TOO	TOO	TOO	TOO

O O O O O O O

co	O	VO	O	CM	η	CN
1-1	O	i-l	OJ	Ol	CN	O
O	O	O	O	O	O
O	O	O	O	O

η «* in vo P- G r-i

ι¹ ^ ·* ^ w in in

OI CN CNJ CN (N OJ CN

O O O O O O O

UJ |> OO <X» Q i-l

vo vo vo vo r^ r-

i-l ■ i-l i-l i-l i-l i-l

-CN

409826/0862

154	0227	0252
155	0230	0253
156	0231	0254
157	0232	0255
158	0233	0256
159	0234	0257
160	0235
161	0236
162	.0237
163	0240
164	0241
165	0242
Seite 176
173
174
175
176
177
178

0355 0257

0010 0012

0026 0030 0032 0033 0034 0036

1	no	101	110	W ,AXC
0	010	101	000	CXM
1	110	100	010	P, AXC
0	111	σοι	100	PT7
0	on	000	010	P, ZTC

1 011 001

PTIl

1	1.10	100	010	BASIC	P,AXC ·	SOITEl
1	no	110	111		■ BRN	PREP
1	on	000	001	BRN	JSB
0	100	010	000	ROM "2
0	000	100	on	KEYl

1 000 101 Oil

BRN

0	001	on	Oil	BRN	KEYlO
0	001	100	Oil	BRN	• KEYIl
1	001	101	Oil	BRN	KEYl 2
		0	001 101 111	BRN	KEYl 3
0	001	110	Oil	BRN	KEYl 4
0	001	111	Oil	BRN	KEYl 5

STAT FLAGS TO A
Statistikkennzeichen nach A

230 HENRY'S FLAGS TO C
Henrys Kennzeichen nach C

SET FLAG FOR MAIN UNIT CONTROL Kennzeichen für Steuerung der
Haupteinheit setzen

IMPOSE DIGIT INTERP. ON HENRY
Zifferninterpretation auf Henry aufsetzen

ACCESS TO STAT FUNCTIONS
Zugriff zu Statistikfunktionen

IN PROGRAM MODE
in Programmbetrieb

CO

cn to co

CO

co. co

179	0260
180	0261
181	0262
182	0263
183	0264
184	0265
185	0266
186	0267
187	0270
188	0271
189	0272
190	0273
191	0274
192	0275
193	0276
194	0277
195	0300
196 .	0301
197	0302
198	0303

1 100 101 110 PREP

W ,AXB

0	110	101	000	STA	D TO A	D	D
0	100	101	000,	CTS	DATA TO	Rl 9 R19
0	011	001	110	W/ZTC	ADDRESS Adresse
0	111	101	110	W,CPlC
1	100	001	100	PT 12 .
1	011	011	000	LDCIl
0	000	110	100	CLS

0 101 100 010 P,CMlC

1 001 110 000 ATDS 0 100 101 000 CTS

1 110 101 110 1 Oil 110 000

1 100 101 000 0 101 100 010

i ooi no ooo

0 100 101 000

0 101 000 000

1 000 101 000 1 001 000 000

W₁AXC DTDS

DNR P,CMlC ATDS CTS IS2

PTT ISl 260 DIGIT ENTRY TO B Zifferneingabe nach B'

D nach A

Daten nach D

ADDRESS TO D Adresse nach D

STORE D-REG IN Rl9 D-Register in Rl9 speichern

BRING DOWN ADDRESS Adresse nach unten bringen

DECREMENT ADDRESS Adresse erniedrigen

ADDRESS Rl8 Adresse Rl8

300 ADDRESS TO D Adresse nach D

PRGM AQDRE.SS TO C Programmadresse nach C

	199	0304
	200	0305
	201	0306
	202	0307
	203	0310
	204	0311
	205	0312
409826/	206 207	0313 0314
σ OO	208	0315
ro	209	0316
	210	0317
	. 211	0320
	212	0321
	213	0322
	214	0323

0	111 111 000	TTC
1	Oil 110 000	DTDS
1	100101 000	DNR
0	101 100 010	P,CMlC
1	001 110 000	ATDS
1	100 001 100	PT12
1	Oil 111 000	DSTC
1	110 101 110	W, AXC
0	010 101 000	CXM
1	Oil 110 000	DTDS
1	110 100 010	P, AXC
1	110 101 110	W, AXC
0	110 001 110	W, CTA
0	010 101 000	CXM
0	000 110 000	RETURN
0	100 001 100 OPST	PT4

STORE PRGM ADDRESS IN Rl8 Prograxnmadxesse in R18 speichern

BRINGDOWNADDRESS Adresse nach unten bringen

DECREMENT ADDRESS Adresse erniedrigen

310 ADDRESS Rl7
Adresse Rl7

FETCH STAT FLAGS FROM Rl7 Statistikkennzeichen von R17 abrufen

STAT. FLAGS TO A
Statistikkennzeichen nach A

HENRY'S FLAGSTO C Henrys Kennzeichen nach C

STORE HENRY'S FLAGS Henrys Kennzeichen speichern

OPERATION MODE TO STAT FLAG Betriebsart zum Statistikkennzeiclien

NEW STAT FLAGS TO A AND M neue Statistikkennzeichen nach A und M ·

DIGIT ENTRY IN BO, DATA IN D Zifferneingabe in BO, Daten in

OFFSET KEY Versetzungstaste

Q OQ CF>

215	0324
216	0325
217	0326
218	0327
219	330
220	0331
221	0332
222	O333
223	0334
224	0335
225	0336
226	0337
227	0340
228	0341
229	0342
230	0343
231	Ο344
232	0345

0107 0371 0366

0366

0370

1 101 111 1 101 111

0 100 Oil

1 111 101

1	111	on	101
1	010	001	100
0	010	Oil	000
1	111	Oil	101
0	010	001	100
0	000	Oil	000
0	Oil	Oil	000
1	111	100	101
0	010	101	000
1	101	001	100
0	Oil	Oil	oob
0	110	001	100
0	001	Oil	000

O 010 101 000 EC

XS,AMIA XS,AMlA

PRN JSB

JSB

PTlO

LDC 2

JSB

PT 2

LDCO

LDC3

JSB

CXM

PTl 3

LDC3

PT6 IiDC 1

CXM

IS THIS IN 1 VAR MODE? ist dies im Betrieb 1 VAR?

NOTE NO, PRINT NOTE34

nein, NOTE 34 drucken

ADV YES, PRINT "OF "
ja, "VON"

BLANK 330

BLANK 333

PRINT

340

SET FLAG FOR HISTOGRAM Kennzeichen für Histogramm setzen

SET FLAG FOR OFFSET ENTRY Kennzeichen für Versetzungseingabe setzen

	Seite	177	0217'	1	000	in	111	DIGIT	BRN	FIN
	233	0346		1	100	010	000	FXM712	ROM 6
	234	0347		1	110	010	000	TFSPRI	ROM 7
	235	0350		1	100	001	100		PTl 2
	237	0351		1	001	100	010		P, AMI
	237,	0352	0057	0	010	111	111		BRN	CONT
	238	0353	0074	0	Oil	110	Oil	SUITEl	BRN	XPRINT
	239	0354		0	010	101	000		CXM
O	240	0355		1,	001	001	100		PT 9
ep OO	241	0356	0361	1	111	,001	001		JSB '	CHlA
σ>	242	0357	0365	1	111	010	111	CHOA	BRN	SUITE2
ο 00	243	0360		1	000	000	100	CHlA	SS8	*
σ>	244	0361		1	110	010	000		ROM 7
N)	245	0362	0257	1	Oil	000	001		JSB	PREP
	246	0363	0347	1	110	,011	111	SUITE2	BRN	DIGIT
	247	0364		1	100	101	000		CTS
	248	0365	' 0076	0	Oil	111	Oil	BLANK	BRN	SUITE3
	249	0366		1	110	010	000		ROM 7
	250	0367		0	000	000	000	PRINT	DUMMY	• 370
	251	0370		1	000	0OQ	100	ADV '	SS8
	252	0371		1	110	010	000	AK	ROM 7
	253	0372		0	Oil	010	000		TKRA
	254	0373

DIGIT EGRESS TO ROM 6 Ziffernausgang nach ROM 6

350

HENRYS FLAGS TO M

Henrys Kennzeichen nach M

RETURN STORED D REGISTER gespeichertes D-Register zurück

DIGIT INTERPRETATION ENTRY Eingang Zifferninterpretation

CD OJ OJ 4>

255	0374	0217
256	0375	0107
257	0376	0057
258	0377
Seite	178

Zeilen laufende Abzweig-Nr. Adresse Adresse

0166

0161

0330

0043

0203

	3	0000
O co	4	0001
co	5	0002
NJ
CD
^	6	0003
O
OO
CFJ	7	0004
	8	0005

9	0006	Olli
10	0007	0114
11	0010
12	0011	0163
13	0012	0376

1 000 111 111 O 100 011 111 O 010 111 111 O 000 000 000

STATISTICS FUNCTION BLOCK LISTING (ROM Statistik-Funktionsblock (ROM 1)

BRN	FIN
BRN	NOTE
BRN	CONT
DUMMY

377

Betriebs-Kode Bit-Muster

O 111 Oil Oil PXACC

O 011 001 100

0 111 000 111

1 101 100 011

0 010 001 111

1 000 001 111

O 100 100 111

ο loo no" on

O 011 001 100

0 111 001 111

1 111 111 011

PT 3
BRN

MINCN O INCREMENT N
N erhöhen

BRN MSUMl

MSTORE STORE X IN 'Rl 3

■ X in Rl3 speichern ■

ADD TO SX

zu SX addieren

BRN MSUM2 ADD TO SX2

zu SX2 addieren

BRN MVATl IF NOT IN 2 VARIABLE MODE SKIP

2 STEPS

wenn nicht im 2-Variablen-Betrieb, 2 Schritte überspringen

K) CO CD CO

BRN	MSUM3	ADD TO SX4 zu SX4 addieren
BRN	MSÜM4	ADD TO SX3 zu SX3 addieren
PT 3		10
BRN	MFCH	FETCH X X abrufen
BRN	XPRINT	PRINT X X drucken

14 0013

0213

1 000 101

15	0014	0255	-	0161	1	010	010	000	XPLOT	ROM 5
16	0015		0015	1	010	111	001	MSUM5	JSB
17	0016	0332	0040	0	100	001	100		PT 4
18	0017	0164	0205	1	101	101	Oil		BRN
19	0020	0	111	010	Oil	PYACC	BRN
20	0021	0	100	001	100		PT 4
21	0022	0	111	000	111		BRN
22	023	0	000	110	111		BRN
23	0024	0	010	000	Oil		BRN
24	0025	1	000	010	111		BRN

25 0026

26 0027

27 0030

28 0031

29 0032

30 0033

0055 0 010 110

0066 0 Oil Oil Oil

0223 1 001 001

0263 1 Oil 001

0275 1 Oil 110

0250 1 010 100 Oil¹

BRN BRN

BRN BRN BRN MTSDEL CANCEL DELETE IF DATA SET IS COMPLETE

Herausnahme löschen, wenn Datensatz vollständig

TQ X PLOT
FILREG Y,Y,Y,Y

X zeichnen

COMS STORESYY, Y,Y,Y speichern MINCN2 20 INCREMENT N2 N2 erhöhen

MSTORE STORE Y IN Rl4

Y in Rl4 speichern

MSUM 5
MSUM6
MVAT 2

MSUM7
MSUM8

MPLOT'

MLODCO

MCHAR

XPENÜP

ADD TO SY

zu SY addieren

ADD TO SY2

zu SY2 addieren

IF NOT IN 2 VARIABLE MODE

SKIP 6 STEPS

wenn nicht im 2 Variable-Betrieb,

6 Schritte überspringen

ADD TO SX2Y

zu SX2Y addieren

TEST FOR PLOT AND PEN RAISING auf Zeichnen und Schreibstiftanhebung prüfen NJ

CO

cn

LOAD COORDINATES

Koordinaten laden

PLOT POINT
Punkt zeichnen

RAISE PEN
Schreibstift anheben

CaJ CO

CO

	31	0034	0163
	32	0035	0376
	33	0036	0213
	34	0037	0355
	35	0040
	36	0041	0332
	37	0042	0355
	38	0043
	39	0044
α CD	40	0045
OO	41	0046	0332
κ> CD >*,	42	0047
O 00	43	0050
co
to	44	0051
	45	0052
	46	0053	0155
	47	0054
	48	0055	0360
	49	0056 ,
	50	0057
	51	0060
	52	0061

0	100	001	100	PT 4
0	111	001	111	BRN
1	111	111	Oil	BRN
1	000	101	111	BRN
1	110	111	001 MSUM6	JSB
0	101	001	100	PT5
1	101	101	Oil	BRN
1	110	111	001 MSUM2	JSB
0	100	101	000	CTS
1	100	"101	000	DNR
0	010	001	100	PT 2
r-4	101	101	Oil	BRN

1 Oil IiO 000 SÜITE2 DTDS

O 001 001 100 BPXACC PTl

1 111 Oil 000 1 111 Oil 000 O 110 110 111

0 Oil 001 100

1 111 000 101 1 100 101 000 O 110 101 000 O 110 101 000

MSUM7

LDCl 5

FETCH Y Y abrufen MFCH XPRINT PRINT Y Y drucken

MTSDEL CANCEL DELETE

Herausnahme löschen

MULT Y2, Y2, Y, Y
40

COMS STORE SY2, Y,Y,Y,Y
speichern

MULT X2, X2, X₇X
X2, X2, X,X2

COMS

ROMID

STORE SX2, X2,X2,X,X2

speichern

50 STORE NEW FREQ.
neue Frequenz speichern

LOAD STARTING ADDRESS FOR PXACC Startadresse für PXACC laden

53

CBlA X,Y,Y,A

60
,Λ ,Λ ,Λ

	Seite 179	0062 .	0355
	53	0063
	54	0064
	55	0065 ' ,	0332
	56	^ 0066.
	57	0067	0355
	58	0070
	59	0071	0332
O	60	0072
co 00 NJI	61	0073 0074 007 5 '	0075
!6/0862	62 63 64	0076
	65	0077
	66	0100
	67	0101
	68	0102
	69	0103	'0105
	70	0104	0364
	71	0105
	72

1 110.111 001 JSB

0 100 101 000 CTS

0 Oil 001 100 PT3

1 101 101 Oil BRN

1 100 101 000 MSUM8 DNR

1 110 111 001 JSB

1 000 001 100 PT8

1 101 101 Oil BRN

1 101 100 010 P,AMlA

O	Oil	110	111	R2	BRN
O	001	010	000	TESTCOR	EERA
O	100	010	000		ROM 2
O	010	101	000		CXM
O	110	001	110		W, CTA
O	010	101	000		CXM
O	101	001	100	PT 5
1	001	100	010	P. AMI

O 100 010 111 BRN

1 111 010 Oil BRN

O 110 101 000 COR STA

MULT

COMS

MULT

COMS

R2

COR

PLUS

XY,XY

XY, XY, XY', X

STORE SXY X,X, XY,X speichern

X,XY, X,XY
X2Y, X2Y
70

STORE SX2Y
speichern

IS PRGM IN ROM 1?

ist Programm in ROM 1?

NO nein
YES ja

FLAG TO A
Kennzeichen nach A

100

ro

co

CD CO CO 4>· CO

IS THIS IN DELETE MODE? ist dies im Herausnahmebetrieb?

YES, SUBTRACT D PROM C ja, D von C subtrahieren

NO, ADD D AND C

nein, D und C addieren

O
CO
CD

73	0106
74	0107
75	0110
7,6	Olli
77	0112
78	0113
79	0114
80	0115
81	0116
82	0117
83	0120
84	0121
85	0122
86	0123
87	0124
88	0125
89	0126
90	0127
91	0130
92	0131
93	0132
94	'-Ο133

0363

0355

0332

0355

0332
0344

0363

0 100 101 000 CTS

1 110 101 110 * W,AXC 1 111 001 111 BRN

1 110 111 001 MSÜM3 JSB

0 111 001 100' PT7

1 101 101 Oil BRN

1 100 101 000 MSUM4 DNR 1 110 111 001 JSB

0 110 001 100 PT6

1 101 101 Oil BRN 1 110 010 101 MFREN JSB

O 100 101 000 CHALK CTS

O 100 100 000

O Oil 001 110

0 111 101 110

1 100 001 100
O 001 Oil 000

0 Oil Oil 000

1 111 010 001

1 100 001 100
O 101 100 010
O 101 100 010

PT12
P₁CMlC P,CMlC

MINUS MULT X4, X4, X,X2

COMS STORE SX4, X2, X2,X,X2'

speichern

X2,X,X2,X2 MULT X3,X3

COMS STORE·SX3, X2,X2,X2,X2 speichern

DS 120, ACCESS TO. MFREN Zugriff.zu MFREN

ACCESS TO CHALK FROM ROM Zugriff von CHALK von ROM

CTS	I.I	.1.	DATA Daten	DATA Daten	ro co
W,ZTC					CTi co
W,CPlC
PT12 LDCl
LDC3	127	13	, I,I,

PLUS 130, 1+13, ", I, DATA Daten

IS CELL I IN CHIP 10 OR ist Zelle I in -Plättchen 10 oder

CO¹

ο oo σ>

•95 0134

96 0135

97 0136

98 0137

99 0140

100 0141

101 0142

102 0143

103 0144

104 0145

105 0146

106 0147

107 0150

108 0151

109 0152

110 0153

111 0154

112 0155

0137 0140

0375

0316

0	101	111	111	LDIl	BRN
1	010	Oil	000	F	LDClO
0	110	000	Oil		BRN
1	Oil	Oil	000		LDCIl
1	001	110	000	ATDS
0	110	101	000	STA
1	Oil	111	000	DSTC

LDIl 11
10

1 001 010

140 ADDRESS CELL I
Adresse Zelle I

FREQ(I), I, DATA, DATA
Frequenz (I), I, Daten, Daten

SHOULD FREQ BE INCRENTED?
soll Frequenz erhöht werden?

1	111	110	111	■BRN	CONT	NO	nein
1	100	001	100	PT12		YES.	ja
0	110	001	110	W,CTA
0	011	001	110	W,ZTC
0	001	011	000	LDCl		150
1	100	111	011	BRN	SÜITE1
0	001	001	100	BPYACC PTl		LOAD	STAR

PYACC PRGM

Startadresse für PYACC-Programm

laden

0 000 011

1 111 011 O 010 101

ROMID

LDCO LDC15 CXM CO O'j CO CO -ΓΟΟ

VO

<; ω

<; ie

Q Q

Ö
Φ
-μ
id
Q

Io

S r-t

	CU	ß
	-μ	Cl)
β	(U	id
Q>	Q	D
-μ
«β
Q

CJ

EH =

Q -

Oi O Ü Eh CQ H Eh

O O

CV|

O O

cn O

CVJ

f- CJ S HQO Pj .4 PS

O D Pi Q

S O OJ

σι

CiI

υ υ

« rij N

CJ

cvi i-i χ; co

--lOCQfiCQQPiPiiSCVJS^ EhQEh "CQEnSSOiEHOiEH CUi^CJ&hjQQQCQCUCQCU

O O O O O O

i-i

O O

O O

O O

O O

O B co

O O O

O O

O O

O O -ι Ο

CG U

O

O

O -H

O -H

-ι Ο

O

O O

tu

H
CJ

O O O r-l O O O .-I f-J O ι-*

-i O O O

O O O -H

■Η Ο Ή Ο

i-l O Ή t-i

•Η Ο *"· r-i

0-"Hi-H

100

000

000

OTT

TOO

000

000

000

111

MVATl

TTO

MVAT 2

110

TOO

TTO

TOT

TOT

111

OTT

TOT

TOT

OTT

100

TTO

100

TOO

100

TOO

100

OTT

TTO

TTO

100

100

111

TOO

000

TOO

TTO

i-l

O

O

O

i-l

r-l

i-l

f-l

010

i-l

OTT

O

O

O

Γ-	r-
VO	IT)
«Η	η
O	O

in

O O

in

O	vo	Γ-	O	■—]	tN	CO	VD
co	in	ιη	VO	VO	VO	VO	r-l
iH	■-I	t-i	i-l	iH	ir-l		O
(U	O	O	O	O	O	O	(Ts
•Η	η		in	VO	I^	co	r-l
φ	r-l	s—l	■—I	f-l	r-i		i-l
CQ	,-H	r-l	i-l	r-l	r-i	«-j

liHiliH^liHrHiH^liHCVICJCVJCJCVICVJ

OOOOOOOOOOOOOOOOO

409826/08 6 2

O
OO
CO

0206 0207 0210

0211 0212 0213 0214

0215 0216

0217 .0220 0221 0222 0223 0224

0225 0226 0227

0230 0231

0232

0347 0375

0373

0373

0230 0347

0250

1 101 111 010 CVT 1 101 111

■Ν

1 101 111

1 110 Oil 1 111 110 111·

0 Oil 001 100 MISDEL

1 001 100

1 111 101 O 010 101

O 101 001 O Oil 000

0 010 101

1 111 101

1 000 001 100 MPLpI" 1 001 100

1 001 100 Oil O Oil 001 1.110 Oil

0 101 001 100 TIN

1 101 100

1 010 100 Oil

XS, AMlA XS,AMIA XS,AMIA

BRN BRN PT3 P, AMI

BRN GXM

PT 5 P, ZTC CXM BRN PT8 .P,AMI

BRN PT3 BRN

PT5

P,AMlA '

BRN

SKIP+ CONT

FIN

FIN-

TIN SKIP+

210 IS THIS IN 2 VAR MODE? 2-Variblen-Betrieb?

NO nein
YES ja

IS DATA SET COMPLETE? ist Datensatz vollständig? NO nein

YES, CANCEL DELETE, O -+FS ja, Herausnahme löschen, 0-KF5

220

XPENUP

IS THIS IN PLOTTING MODE? Zeichenbetrieb?

YES ja
NO nein

SKIP TO PRINT

nach Drucken springen

230

IS THIS IN DELETE MODE? Herausnahmebetrieb?

YES, RAISE PEN

ja, Schreibstift anheben

•CD CO

	173	0250	03 60	0	000	000	000	DUMMY
	174	0253		0	000	000	000	DUMMY
	175	0254	0344	0	000	000	000	DUMMY
	176	0255		0	000	000	000·	DUMMY
	177	0256		0	100	101	000 FTLREG	CTS
	178	0257		0	100	101	ooo	CTS
	179	0260	0360	0	100	101	000	CTS . .
	180	0261		0	001	100	100	RSl
	181	0262	0014	0	000	110	000	RETURN
O co	182	0263		0	Oil	001	100 MLODCO	PT3
co	183	0264		1	111	000	101	JSB CHlA
	184	0265	0	100	101	000	CTS
ο 00 CfJ	185	0266	1	110	010	101	JSB DS
K>	186	0267	1	100	101	000	DNR
	187	0270	1	Oil	110	000	DTDS
	188	0271	0	100	001	100.	PT4
	189	0272	1	111	000	101	JSB CHlA
	190	0273	1	010	001	100	PTlO
	191	0274	0	000	110	011	BRN XPLOT
	192	0275	0	101	001	100 MCHAR	PT5
	193	0276	1	001	100	010	P,AMI

257
260

RETURN FROM ROM 7 ROUTINES zurück von den Routinen· des ROM

FETCH X DATA
X-Daten abrufen

ADDRESS DEDICATES STORAGE Adresse ordnet Speicherung zu

270 STORE X DATA IN DS

X-Daten in DS speichern ^

FETCH Y DATA ^

Y-Daten abrufen '~"

■' 4>- ,

SEND PEN TO NEW COORDINATES Schreibstift zu neuen Koordinaten schicken

IS THIS IN DELETE MODE? Herausnamebetrieb?

	,194	0277
	195	0300
	196	0301
	197	0302
	198	0303
	199	0304
	200	0305
	201	0306
+*"■ O co 00	202	0307
r-o CT)	203	0310
	204	0311
5 9Si	205	0312
	206	0313
	207	0314
	208	0315
	209	0316
	• 210	0317
	211	0320
	212	0321

0312

0306

0014

0307

0075

1 100 101 Oil

0 000 001

BRN

.PTO

SCRATCH

0	101	Oil	000	ATC	LDC 5
0	000	001	100	CTA	PTO ■
1	111	000	010		P,APCA
1	100	Oil	on		BRN ATC
1	101	000	Olo	SCRATCH	P,AMCA
1	110	100	010		P,AXC
1	Oil	101	110		W, ZTA
1	110	100	010		P, AXC
0	000	110	Oil	SUITEl	BRN XPLOT
0	000	001	100		PTO
1	001	Oil	001		LDC 9
0	000	001	100	PTO
1	100	Oil	111	BRN CTA
0	100	101	000	CTS
1	110	101	110	W, AXC
1	Oil	111	001	JSB TESTCOR

YES, SET UP SCRATCH CHARACTER
ja, Streichungszexchen aufsetzen

.300 N, SET UP SELECTED CHARACTER ausgewähltes Zeichen aufsetzen ,

IS PLOT CONNECTED

ist Plotter angeschlossen?

YES, ja

NO, RESTORE PLOT CHARACTER
nein, Plot-Zeichen zurückstellen

CHARACTER TO C
Zeichen nach C

ARRANGE A FOR XPLOT
A für X-Plot anordnen

310

PLOT CHARACTER
Zeichen zeichnen

O 110 101

STA

PREQ, 1, !,.DATA
Frequenz, 1,1, Daten

3 20 NEW FREQ. ", I, DATA
neue Frequenz ', " , I, Daten

NEW FREQ. I, DATA, DATA .
neue Frequenz, I, Daten, Daten

213	0322
214	0323
215	0324
216	Ό325
217	0326
218	0327
219	0330
220	0331
221	0332
222	0333
223	0334
224	0335
225	0336
226	0337
227	0340
228	0341
229	0342
230	0343
231	0344
232	03 4 5

0374

0050 0255

0357 0075

0 110 101

1 001 100 0 101 001

0 001 111

1 111 110 Oil

0375

0	010	100	Oil
1	010	111	001
0	001	001	loo
1	111	000	001
0	on	111	001
1	Oll	110	OQO
0	110	101	000
0	110	101	000
1	110	101	110
0	110	101	000
0	100	101	000
ί	110	101	110
ο	100	101	000
1	111	110	111
0	001	000	100

STÄ

RS9 PT5 S, CMl

BRN

MSUMl

COMS

DS

JSB

PTl

JSB

JSB

DTDS

STA

STA

W, AXC

STA

CTS

W,AXC

CTS

BRN

SSl

NEW FREQ, DATA* DATA', DATA neue Frequenz,, Daten, Daten, Daten

WAS CELL COUNT O?

war Zellensählung O?

NOTE YES, NOTE 35 NO DELETION

j a j,¹ NOTE 35, keine Herausnahme

SUITE2 HO nein FILREG 330 X, X,X, X

CHOA SX, X,X,X TESTCOR 333

Dl, D2, D3, D4

Dl, D4, D4, D4 D3
340

D3, D3, D4, D4 ι

D4

D4, D4, D3, D4 CONT

Seite	182	0347	1	110	010	000	SKIP+	ROM 7
233	0346	0375	0	111	000	000		PINC
234	0347		0	111	000	000		PINC
235	0350		0	000	Oil	100		PRS
236	0351		0	000	101	100		YPO
237	0352		1	110	Oil	111		BRN SKIP+
238	0353		1	111	110	111		BRN CONT
239	0354		0	000	000	000	MULT	DUMMY
240 ,	0355		0	001	000	100		SSl
241	0356		1	110	010	000	CHOA	ROM 7
242	0357		1	000	000	100	CHlA	SS8
243	0360		0	001	000	100		SSl
244	0361		1	110	010	000	MTNUS	ROM 7
245	0362		0	Oil	111	110	PLUS	S, ZNCC
246	0363		0	001	000	100		SSl
247	0364 ·		1	no	010	000		ROM 7
248	0365		0	000	000	000		DUMMY
249 *	0366		0	000	000	000		DUMMY
250	0367		0	000	000	000		DUMMY
251	0370		0	000	000	000		DUMMY
252	0371	0347	0	000	000	000	PIN	DUMMY
253	0372		0	000	010	000	NOTE	ROM 0 ■
254	0373	0	000	010	000	CONT	ROM O .
255	0374	0	000	010	000	XPRINT·	ROM O
256	0375	0	100	010	000		ROM 2
257	0376	1	110	Oil	I'll		BRN SKIP-t
258	0377

ACCESS TO SKIP
Zugriff zu überspringen +

co

cn co co

co

	S@!t©	XS3	ι Abzweig·= Adresse	STÄTIS	010	010	FUNCTION	BIiOCK LISTING (ROM	MLDN	•	O	MPRINTNl	PRINT NI NI drucken ..	PRINT MEAN OF X Bedeutung von X drucken	:hi<
	Nr.,	η lauf Adre		ITlQS	101	011	QÜ®		MLDSQ	FETCH N AND ADVANCE PAPER N abrufen und Papier vorsc	XPRINT	CALC. THE MEAN OP X Bedeutung .von X berechnen	UX, UX
	3	0000	0127	Betriebs-lC Bit-Muster	IH	HO	000 XROOT	ROM 5		PRINT 08NI=" "MI" drucken	ΜΞΑΝΧ		UX/(N-I) , ■"
	4	0001	0174	1	001	on	Hl PRAS	BRN		STORE MSAN OF X IN Rl3 Bedeutung von X in Rl3 sps	SDX
	5	0002	0227	0	111	111	OH	■BRN	MSTORE	10 PRINT 00XM=" drucken
	6	0003	■ 0377	0	100	111	111	BRN	MLDEQ	MPRINTXM	STORE SDX IN Rl4
Qi-	7	0004	0116	1	011	001	Hl	BRN	■ XPRINT		sie
CO CD	δ	0005		1	111	on ,	on	BRN	MSTX
CD	9	0006	0167	0	Hl	HO	100 ■	PT3	MCALl
O CO	10	0007	0174	0	001	001	111 .	BRN	XROOT
ro	11	0010	0222	0	111	111	on	BRN
	12	0011	0377	0	OH	111	on	BRN	MSTORE	K)
	13	0012	0276	1	101	101	IU'	BRN	CO
	14	0013	0133	1	000	000	011	BRN	cd CO
	15	0014	0000	1	100	001	Hl	BRN	CO
	16	0015		0	IH	on	OH	BRN
	17 ■	0016	0167	0	100	PT4
	18	0017	0	Hl	BRN
	0

SDX in Rl4 speichern

1.9	0020	0174
20	0021	0214
21	0022	0377
22	0023	0203

0024

0102

co	24	0025	0127
00
co	25	0026	0174
O
OO co	26	0027	0350
ro'	27	0030	0377
	28	0031	0120
	29	0032
	30	0033	0167
	3JL	0034	0174
	32	0035	0225
	33	0036	0377

0 111 110 Oil

1 000 110 Oil 1 111 111 111 1 000 001 111

0 100 001 Oil

0 101 Oil 111

0 111 110 Oil

1 110 100 Oil 1 111 111 111

0 101 000 Oil

0 000 001. 100 0 111 Oil 111

0 111 110 Oil

1 001 010 111 1 111 111 111

BKN

BRN BRN BRN

MLDEQ 20 PRINT "SI="
drucken

BRN

BRN

BRN

BRN

BRN

BRN

PTO

BRN

BRN

BRN BRN

MPRINTSl

XPRINT PRINT SDX

drucken

MIVl IP 2 SAMPLE, CONT; IP 1 VAR, PIN; IF 2 VAR, SKIP 5 wenn 2 Proben, Inhalt; wenn 1 Variable, beenden; wenn 2 Variablen, 5 überspringen

MEXNS EXCHANGE Nl AND N2 IN DATA STORAGE

Nl und N2 in Datenspeicherung austauschen

MLDN FETCH N2 AND ADVANCE PAPER N2 abrufen und Papier vorschieben

MLDEQ PRINT "N2="
drucken

MPRINTN2

XPRINT 30 PRINT N2
drucken

MEANY CALC. THE MEAN OF Y

Bedeutung von Y berechnen

MSTORE STORE MEAN OF Y IN RIO Bedeutung von Y in RIO speichern

MLDFQ PRINT "YM="
drucken

MPRINTYM

XPRINT PRINT MEAN OF Y

Bedeutung von Y drucken

CaJ CD OO 00

00
CTJ

34 0037

35 0o40

36 0041

37 0042

38 0043

39 0044

40 0045

41 0046

42 0047

43 0050

44 0051

45 0052

46 0053

47 0054

48 0055

49 0056

50 0057

51 0060

52 0061

0275 0133 0000

0167 0174

0217 0377

0205 0102

0252 0276 0275 0145 0000 0273 0277

0167

1 Oil 110 0 101 101 0 000 000 Oil O 001 001 0 111 Oil

0 111 110 Oil

1 000 111 1 111 111

1 000 010

O 100 001 Oil

1	010	101	Oil
1	Oil	111	Oil
f-f	Oil	110	111
O	110	010	111
O	000	000	Oil
1	Oil	101	111
1	Oil	111	111
O	010	001	100
O	111	on	111

BRN	MSTY	UY, UY
BRN	MCALl	40 UY/(N-I)
BRN	XROOT	SDY
PTl
BRN	MSTORE	STORE SDY IN RIl SDY In RIl speichern
BRN	MLDEQ	PRINT "S 2=»" drucken
BRN	MPRINTS2
BRN	XPRINT	PRINT SDY drucken

BRN MTV2 IF 2 SAMPLE, CONT; IF 2 VAR

SKIP2

wenn 2 Proben, Inhalt;
wenn 2 Variablen, 2 überspringen

BRN MEXNS 50 EXCHANGE Nl AND N2 IN DATA

STORAGE

Nl und N2 in Datenspeicherung
austauschen

BRN	BOUT	UX, UX
BRN	MSTX	53 UY, UY, UX
BRN	MSTY	UYUX."
BRN	MCAL 2	R(UXUY)
BRN	XROOT	UXY, UXY, R(UXUY)
BRN	NLUKXY	R,R
BRN	MCAL 3	60
PT 2		STORE R IN Rl2 R in Rl2 speichern
BRN	NSTORE

CT! CO CO 4>· CO

O
00
CD
NJ

Seite 184	0062	0174
53	0063	0234
54	0064	0377
55	0065	0252
56	0066
57

58 0067

59 0070

60 0071

61 0072

62 0073

63 0074.

64 0075

65 0076

66 0077

67 0100

68 0101

69 0102

70 0103

71 0104

0155 0326

0167 0252

0101

0357

0	111	110	Oil	WIDTH	BRN	MLDEQ	PRINT "R=" drucken
1	001	110	Oil	BRN	MPRINTR
1	111	111	111	BRN	XPRINT	PRINT R d
1	010	101	Oil	BRN	BOUT
0	001	001	100	PTl		LOAD STAR!

O	Oil	Oil	000	LDC 3	ROMID
1	001	Oil	000	LDC 9	MDPRT
O	110	110	111	BRN
1	101	Oil	011 PRTW	BRN	MSTOR
O	101	001	100	PT5	BOUT
O	111	Oil	111	BRN
1	010	101	Oil	BRN	R3
1	101	100	010	' P,AMlA
O	100	,000	111	BPN
O	001	010	ooo Ί	EPRA
6	110	010	000 R3	ROM 3

1 001 001 100 MFXNS PT9

1 111 000 1 110 101

JSB W ,AXC

PRTW PRGM

.Startadresse für PRTW'-Programm laden

PRINT CELL WIDTH
Zellenbreite drucken

STORE CELL WIDTH IN Rl5 Zellenbreite in Rl5 speichern

IS PRGM IN ROM 2?

ist Programm in ROM 2?

NO nein

100 YES ja

LOOK POR PRGM IN ROM 3 nach Programm in ROM 3

FETCH N2
abrufen

N2 TO A
N2 nach A

sehen

CO CO CO CO

CO

	72	012S	0357
	73	0106
	74	0107
	75	0110
	76	Olli	0357
	77	0112
	78	0113
O CD OO	79	0114	0375
co	80	0115	0121
180/	81 82	0116 0117
	83	0120	0357
	84	0121
	85	0122
	86	0123	0357
	87	0124	0247
	88	0125	0375
	89	0126
	90	0127	0357
	91	013ο	0370
	92	0131

0 000 001 100

1 1X1 000 001 1 110 101 110

1 Oil 110 000

1 001 001 100

1 111 000. 001

'1 110 101 110

1 Oil 110 000

1 111 110 111 O OpI 001 100 O 101 000 .111

0 100 001· 100

1 111 000 001 C0M21

O 100 101 000

0 000 OpI 100

1 111 000 001 1 010 100 001 1 111 110 111

0 000 001 100 MLDN

1 ill 000 001 1 111 100 101

PTO JSB

w,axc

DTDS

PT9
JSB

CHÖÄ

CHOA

FETCH Nl
abrufen

Nl TO A, N2 TO C
Nl nachA, N2 nach C

110 STORE N2 IN ROO
N2 in ROO speichern

ADDRESS R09
Adresse R09

Nl TO C
Nl nach C

STORE Nl IN R09

ΝΪ in R09 speichern

BRN	CONT	120
PTl		SX (ALSO FOR Y) (auch für Y)
BRN	C0M21	SX, SX
PT4
JSB· ,	CHOA	N7SX
CTS		SX/N,"
PTO
JSB	CHOA	127
JSB	DIVIDE	130 N + C
BRN	CONT	ADVANCE PAPER Papier vorschieben
PTO
JSB	CHOA
JSB	ADV

Ca) CD Ca) CO

•το
co

σ
οο
cn

93	0132
94	0133
95	0134
"96	0135
97	0136
98	0137
99	0140
100	0141
101	0142
102	0143
103	0144
104	0145
105	0146
106	0147
107	0150

0151

0152

0153

0154

0155

0375

0357

0362

0247 0375

0355 0375

0066

.1 111 110

0 000 001 100 MCALl

1	111	000	001
0	100	101	000
0	Oil	001	110
1	100	001	100
0	001	Oil	000
1	111	001	101
1	100	101	000
1	010	100	001
1	111	110	111
0	110	101	000
1	110	111	001
1	111	110	111
1	101	no	010

MCAL

BRN	CONT	UX, UX ALSO F auch für Y
PTO		N,UX
JSB	CHOA	N,N,UX ■
CTS
W, ZTC
PTl 2		140, 1, N, UX
LDCl		N-I, N-I, UX
JSB	MINUS	N-I, UX
DNR		UX/(N-I) ."
JSB	DIVIDE
BRN	CONT	UY,'UX
STA		UYUX,"
JSB	MULT
BRN	CONT	150 ACCESS TO
P ,AMlA

0 Oil Oil Oil

O 001 001 100 BPRTO BRN
PTl

1 100 Oil O 010 Oil O 010 101 000 ROMID LDC12
LDC 2
CXM

WIDTH

Entries

Zugriff zu Eingabe zu Versetzung/Breite

LOAD STARTING ADDRE.SS FOR PRTO

PRGM

Startadresse für PRTO-Programm

laden

fs)

CO CD

OO

■ρω

0156

0157

0160

0161

0162

0163

0164

0165

0166

0167

088:	123	0170
	124	0171
	125	0172
	126	0173
	127	0174
	128	0175
	129	0176
	130	0177

0167
0174
0360

0376
0360

0165

0370

0365

0 111 001 100 ΡΤ7

0 001 Oil 000 LDCl

0 000 010 000 ROM

0 000 000 000 DUMMY

O 111 Oil 111 BRN

0 111 110 Oil ; BRN

1 111 000 101 JSB

0 001 001 100 FCOM PTl

1 111 111 Oil BRN

0 100 101 000 MSTORE CTS

1 111 000 101 JSB

MSTORE

MLDEQ

CHlA

SKIP+ CHlA

1 100 101 000
1 Oil 110 000

DNR DTDS

O 111 010 111 BRN

0 100 101 000 MLDEQ CTS

1 111 100 101 JSB

1 111 Oil 001

010 001 100

JSB PTlO

FCOM

ADV BLANK

MSTORE ACCESS
Zugriff

MLDEQ ACCESS
Zugriff

MECH ACCESS
Zugriff

SKIP 1 STEP DUE TO POINTER IN FRGM einen Schritt überspringen entsprechend Hinweismarke im Programm

170 ADDRESS REGISTER CORRESPONDING TO POINTER
Adressenregister entsprechend
Hinweismarke

STORE DATA ORIGINALLY IN C
ursprüngliche in C befindliche
Daten speichern

ADVANCE PAPER
Papier vorschieben

LOAD BLANKS IN C
Leerstellen in C laden

LOAD "=" laden

to

CH CO CO

CO

	131	0200	0365	0375	0376 0252
	132	0201	0375
	133	0202
	134	0203	0206	0231
	135	0204
	136	0205
	137	0206	0211	0352
	138	0207
	139	0210
a	140	0211	' 0236
1982	141 142	0212 0213
cd "^*.	143	0214	0231
O OO	144	0215
CD	145	0216 '
KJ	146,	0217
	147	0220
	148	0221
	149	0222
	150	0223
	151	0224
	152	0225
	153	0226
	154	0227
	155	0230
	156	0231

0	010	Oil	000	, LDC 2	BLANK	Tl XS, AMlA	T2	T2 XS,AMlA	SKIP+
1	111	Oil	001	JSB	CONT	BRN	CONT	BRN	BOUT
1	111	110	111	BRN		BRN	BRN
0	101	001	100	MTVl PT5	Tl	MPRINTSl PTl3
1	000	Oil	Oil	BRN		LDC 6	LDl '
0	010	001	100	MTV2 PT2	BRN
1	101	111	010		MPRINIS2 PT13
1	000	100	111	LDC 6	LD 2
1	111	110	111	BRN
1	101	111	010	MPRINIXM PTl3
1	111	111	Oil	\ LDCO	COMPT
1	010	101	Oil	BRN
1	101	001	100	MPRINTYM PTl3	" LDl
0	110	Oil	000	ί BRN
1	001	100	111	MPRINTNl PTIl
1	101	001	100	LDCl 2
0	110	Oil	000	LDl LDCl
1	110	101	Oil
1	101	001	100
0	poo	Oil	000
1	001	111	Oil
1	101	001	100
1	001	100	111
1	Oil,	001	100
1	100	Oil	000
0	001	Oil	000

200

TRANSFER C TO T AND BLANK C C nach T übergeben und C leeren

WHICH DATA ENTRY MODE? •welcher Dateneingabebetrieb?

210 2 SAMPLE . 2 Proben

2 VARIABLE 2 Variablen

220

230

U) CD CO CO

	157	0232	0252	0236
	158	0233	0253
	159	0234	0254
	160	0235	0255
	161	0236	0367
	162	0237
	163	0240	0375
	164	0241
	165	0242
CD CO 00 co	166 167	0243 0244	0374
Ό 8 6 2	168 169	0245 0246
	170	0247	0155
	171	0250
	172	0251	0355
	Seite 186
	173	0370
	174	0370
	175	0370
	176	0370

1 001 111 Oil

0 000 000 000

1 101 001 100 1 Oil Oil 000 1 111 100 001 1 100 101 000 1 111 110 111

0 Oil 001 100

1 001 100 010

1 111 110 Oil

BRN.

DUMMY MPRINTR PTl3

LDCIl COMPT JSB

DNR

BRN BASIC PT3

P ,AMI

BRN COMPT

O 001 001 100 BPRÄS PTl

O 000 Oil 000 O 000 Oil 000 O 110 110 111

0 010 000 100

1 110 HO 111

LDCO LDCO BRN

DIVIDE SS2 BRN PRINT
CONT

NOTE.

ROMID

DIVl

1	111	100	101	BOUT	JSB	ADV
1	111	100	101		JSB	ADV
1	111	100	101		JSB	ADV
1	111	100	101		JSB	ADV

240

BASIC STAT KEY
Grundstatistiktaste

IS DATA SET COMPLETE?

ist Datensatz vollständig?

NO, PRINT NOTE 33
nein, "NOTE 33" drucken

YES, LOAD STARTING ADDRESS FOR PBAS PRGM.
ja, Startadresse für PBAS-Programm laden

250

CO CO 4?* CO

	177	0256
	178	0257
	179	0260
	180	0261
	181	0262
	182	0263
	183 1S	0264
	184	0265
	185	0266
O
co co	186	0267
26/	187 188	0270 0271
O CO	189	0272
o> Cs)	190	0273
	191	0274
	192	0275
	193	0276
	194	0277
	19.5	0300
	196	0301
	197	0302
	198	0303

0370	1	111	100	101	LINJ	JSB	ADV
0266 .	1	Oil	Oil	Oil		BRN	SUITEl
	0	000	000	000		DUMMY
	0	000	000	000		DUMMY
	0	001	001	100	SUITEl	PTl
0330	1	101	100	Oil		BRN	SUITE2
	0	010	100	100		RS 2
	0	000	110	000		RETURN
	0	010	101	000		CXM
	0	110	001	100	MIUKXY	PT 6
	O	000	Oil	000	MSTXY	LDCO
	0	010	101	000	CXM
0373	1	111	101	111	BRN	FIN
	0	100	101	000	CTS
	0	110	010	000	ROM 3

0143 0326

O 110 010 000 MSTY ROM 3

O 110 010 000 MSTX ROM 3

1	100	101	000 MCAL3	DNR	COD
1	100	101	000	DNR	MDPRT
O	110	101	000	STA
O	110	001	111	BRN
1	101	Oil	Oil PRTO	BRN

ACCESS TO LINJ Zugriff zu LINJ

RETURN FROM ROM 7 ROUTINES zurück von den Routinen des ROM

SET F6 FOR VARIABLE ENTRY F6 für Variableneintritt setzen

270 .

EGRESS TO MSTXY Ausgang nach- MSTXY

EGRESS TO MSTY Ausgang nach MSTY EGRESS TO MSTX Ausgang nach MSTX UXY, R(UXUY), -, UXY 300 R(UXUY) — ,UXY, UXY R(UXUY), UXY . UXY/R(UXUY)-R PRINT OFFSET Versetzung drucken

K) Ca)

<T>

,ω ω

	199	0304	0167	0	110	001	100	PT6	MSTORE
	200	0305	0370	0	111	Oil	111	BRN	ADV
	201	0306	0365	1	111	100	101	JSB	BLANK
	202	0307		1	111	Oil	001	JSB
	203	0310		1	101	001	100	PT13
	204	0311		1	Oil	Oil	000	LDCIl
	205	0312		1	Oil	001	100	PTIl
	206	0313		1	001	Oil	000	LDC9
O	207	0314	0365	0	010	Oil	000	LDC 2	BLANK
%ο CO	208	0315		1	111	Oil	001	JSB
N)	209	0316		0	001	001	100	PTl
■»%.	210	0317	0367	0	001	Oil	000	LDCl	PRINT
03	211	0320		1	111	100	001	JSB
cn »ο	212	0321		0	010	101	000	CXM
	213	0322		0	110	001	100	PT6
	214	0323		0	010	Oil	000	LDC2
	215	0324	0373	0	010	101	000	CXM	FIN
	216	0325		1	111	101	111	BRN
	217	0326	0377	1	100	101	000	MDPRT DNR	XPRINT
	218	0327	0360	1	111	111	111	BRN	CHlA
	219	0330		1	111	000	101	SUITE2 JSB
	220	0331		0	100	101	000	CTS
	221	0332	0	001	001	100	PTl

STORE OFFSET IN Rl6
Versetzung in RX€ speichern

ADVANCE PAPER
Papier vorschieben

PRINT "CEL*="
drucken

310

32,0

SET F6 FOR CELL WIDTH ENTRY
F6 für Zellenbreiteneintritt

setzen

330 R, CSC2, ■-,
B, B, CSX2, -

CD CjO CO 4r^ CO

	222	033 3	0346
	223	0334	0347
	224	0335
	. 225	0336	0350
	226	0337	0351
	227	0340	0352
	228	0341	0353
	229	0342	0354
	230	0343	0355
	231	0344	0356
O	232	0345	0357
co			0360
00			0361
κ>	Seite 187
co
*»*	233
O 00	234
KD
Ν»	235.
	236
	237
	238
	239
	240
	241
	242
	243
	244

0357 0355

0363

0357 0362

0357 0247

0167

0236 0252

1	111	000	001
1	110	111	001
1	100	101	000
1	111	010	001
0	100	001	100
1	111	000	001
1	111	001	101
0	000	001	100
1	111	000	001
0	Oil	111	110
1	010	100	001

JSB	CHOA	333 SX/ B, CSX2,
JSB	MULT	BSX, BSX, CSX2, -
DNR		BSX, CSX2, -, BSX
JSB	PLUS	BSX+CSX2, "
PT 4
JSB	CHOA	34o SY, BSX+CSX2
JSB	MINUS	BSX+CSX2-SY,"
PTO
JSB	CHOA	N
S,ZNCC		-N
JSB ' '	DIVIDE	(SY-DSX-CSX2)/N=A

O	000	001	100	MPRININ2	PTO	MSTOR
O	111	Oil	111		BRN
1	Oil	001	100	LD 2	PTIl
1	100	Oil	000		LDC12
O	010	Oil	000		LDC 2	COMPT
1	001	111	Oil	DIVl	BRN	BOUT
1	.010	101	Oil	MULT	BRN
1	110	010	000		ROM 7 '
O	010	000	100	CROA ■	SS2
1	110	010	000	CRlA	ROM 7
	000	000	100	SS8
O	010	000	100	SS2

STORE A IN RlO

A in RIO speichern

ACCESS TO BOUT
Zugriff nach BOUT

360

U)

cn

LO Lu 4> CO

O
O

r» ja

CM _ CM g

to O W O

Γη

ro

r- O O O

CQCOOOOOOO

« Q

λ 5}

H Pm

B CU

S H

O «

O CQ

H _ _ XJ

oooooooooooooo o^oooooooooooo O ·-· «-· O "-· O r-t . ι-ί

O O

O -*
O O

_
O O

O O

O
O

8 ο

^ O

ι-) i-r

O O

O O O
O O O

r-i O O

ooooooooo

O O O O O O

ιΗ i-l i-l ι-<

oooooooooooo

O O O

O O O O O

O O O O -t

€*> co cy cy ro ro ro ro ro co fo ro co co O O O O O O O O O O OO O O

in \o"r*-oo σι O r-t cm ro ^ in vor-oo

CMOIdCMCMCMCMCMCMCMCMCMCMCM

40 9826/0862

STATISTICS FUNCTION BLOCK LISTING (ROM 3)

	Zeilen laufende Nr. Adresse	0000	Abzweig- Adresse	Statistik-	100	101	000	MCALlO	DNR	3)	O	MULT	20	PC	SET F13 TO
	3	0001		■Punktionsblock (ROM	110	111	001	MCALH	JSB		CONT	V2? LINEAR KEY Lineartaste
	4	0002	0355	Betriebs-Kode Bit-Muster	111	HO	Hl		BRN .
	5	0003	0375	1	100	101	000	MCALl2	DNR	MINUS
	6	0004		1	11.1	001	101		JSB	CONT	NOTE
	7	0005	0362	pH	111	110	111		BRN
	δ	0006	0375 ·	1	100	101	000	MCAL15	DNR	DIVIDE
	9	0007		1	HO	110	001	MCAL17	JSB	CONT 10
	10	0010	0353	1	111	HO	Hl		BRN
*·»	11	0011	0375	1	100	101	000	MCAL19	DNR	PLUS
ö to	12	0012		1	111	010	001	MCAL16	JSB	CONT
CO	13	0013	0363	1	111	HO	111		BRN
	14	0014	0375	1	001	001	100	MPRINTA	PTl
O	15	0015		1	001	οι i	000		LDC 9	PC
oo CD	16	0016		1	100	000	011		BRN
	17	0017	0100	0	001	001	100	MPRINTB	PTl
	16	0020		1	000	011	000		LDCO
	19	0021		0	100	000·	011		BRN
	20	0022	0100	0	011	001	101		JSB
	21	0023	0262	0	011	001	100		PT3
	22	0024		0	001	100	010		P,AMl
	23	0025		1	111	110	011		BRN
	24	0026	0374	0	010	101	000'		CXM
	25			1
	1
	0

ISJ CO

CD CO CO

F13 setzen um Linearregister
anzuzeigen

	26	0027	0072
	27	0030	0262
	28	0031
	29	0032
	30	0033	0374
	31	0034
	32	0035
	33	O036
	34	0037
O	35	0040
CD SO	36	0041
K) 135 *s. O CO	37 38	0042 0043
a 10	39	0044	0155
	40	0045	0326
	41	0046	O277
	42	OO47	0206
	43	0050
	44	0051	0161
	45	0052	0253
	46	0053
	47	OO54

O Oil Oil 110 S,ZTC

O 111 111 110 S,CPlC

0 Oil 101 Oil BRN SUITE2

1 Oil 001 101 JSB V2?

0 Oil 001 100 PT3

1 001 100 010 P,AMI

1 111 110 Oil . BRN NOTE

O 010 101 000 CXM

O Oil Oil 110 S,2TC

O 111 111 110 , S,CiIC

O 111 111 110 S,CPlC

O 010 101 000 CXM

O 001 001 100 BPARA PTl

O 111 Oil 000 LDC7

O Oil Oil 000 ^ LDC3

0 110 110 111 BRN ROMID

1 101 Oil Oil PLIN BRN MSTXY

1 Oil 111 111 BRN MSTX O 000 Oil Oil · BRN MCAL15

O 001 001 100 PTl

0 111 000 Ul BRN MSTORE

1 010 101 Ul BRN MCALA

PAR KEY
Klammertaste

LOAD STARTING ADDRESS FOR PARA PRGM Startadresse für Klammerprograimn laden '

LIN. REG. PRGM UXY, UXY

UX, UX, UXY
UXY/UX=B

53 STORE B IN RIl
B in RU speichern

CALC A AND STORE RIO

A berechnen und RIO speichern

N)

U)

CT5 CO U)

J>

U)

	48	0055	0326
	49	0056	0001
	50	0057	0277
	51	0060	0006
	52	0061
	Seite	189	0316
	53	0062	0306
	54	0063	0161
4098	55 56	0064 0065
PO co	57	0066
Ό862	58	0067
	59	0070	0155
	60	0071
	61	0072
	62	0073	0360
	63	0074	0150
	64	0075
	65	0076
	66	0077	0367
	67	0100

Q 000 000 000 1 101 Oil Oil

0 000 000 111

1 Oil 111 111 O 000 Oil Oil

1 100 111 Oil O 000 Oil Oil O Oil 001 100 O 111 000 111

1 001 001 100 BPRINTS PTl

0 100 Oil 000

1 100 Oil 000 O 110.110 111 O 010 101 000

0 010 001 100

1 111 000 101

0 110 100 Oll

1 101 001 100 1 000 Oil 000 1 111 100 001

DUMMY	MSTXY	UXY, UXY	(UXY) 2
BRN	MCALIl	(UXY)2, "
BRN	MSTX	60 UX, UX,
BRN	MCAL15	(UXY)2/UX
BRN

BRN	MSTY
BRN	MCAL15
PT 3
BRN	MSTORE

LDC4	ROMID
LDC12
BRN
SUITE2 CXM	. CHlA
' PT2	BPLIN
JSB
BRN
MPRINTR2 PT13	PRINT
. LDC 8
PC JSB

UY, UY, (UXY)2/UX
(UXY) 2/(UXUY) =R2

STORE R2 IN Rl3

R2 in Rl3 speichern

LOAD STARTING ADDRESS FOR

PRINTS PRGM

Startadresse für Druckprograitim

laden

70

SET R12 (C) TO O
R12 (C) auf O setzen

K) CO cn co co

co

100

	68	0101
	69	0102
	70	0103
	71	0104
	72	0105
	73	0106
	74	0107
	75	0110
*"»	76	0111
σ co	77	0112
co PO	78	0113
cn	79	0114
*>< O	80	0115
00
O to	81	0115
	82	0117
	83	0120
	84	0121
	85	0122
	86 ,	0123

0271 1 Oil 100 111 1 101 100 010

0135 0 100 010 111 0 001 010 000

BRN P,AMIA

BRN EFRA

SUITEl

	1	000	010	000 R4	ROM 4.	MULT'	SXSY, SXSY
0355	1	110	111	001 · STAT	JSB
	0	000	001	100	PTO	CHOA	110 N, SXS
0357	1	111	000	001	JSB	DIVIDE	SXSY/N, ",
0353	1	110	110	001	JSB ·	*
	1	100	101	000	DNR	MINUS	SXY-SXSY/N
0362	1	111	001	101	JSB	CONT
0375 s,	1	111	110	111	BRN		FETCH A abrufen
	0	000	001	100 PRINTS	PTO .	NFCH
0163	0	111	001	111	BRN	MLDEQ	PRINT "A=" drucken
0162	0	111	001	Oil .	BRN	MPRINTA	120
0114	0	000	110	Oil	BRN	XPRINT	PRINT A drucken
0377	1	111	111		BRN		FETCH B abrufen
	0	001	001	100	PTl	MFCH
0163 .	0	111	001	111	BRN

IS PRGM IN ROM 3?

ist Programm im ROM 3?

NO, LOOK IN ROM 4

nein, in ROM 4 nachsehen

YES, GO TO NEXT STEP

ja, zum nächsten Schritt gehen

Beispiel

SXY

87	0124.	0162	O	111	001	Oil	BREJ	MLDEQ	PRINT "R=" drucken
.88	0125	0017	0	000	111	111	BPI?	MPRINTB
89	0126	0377	ι	111	111	111	BRN	XPRINT	PRINT B drucken

0127

	91	0130
	92	0131
	93	0132
σ «0	94	0133
ISS» m	95	0134
■■Ν» O	96	Ο135
m ■CO	97	0136
	98	0137
	99	0140
	100 .	0141
	101	0142
	• 102	0143
	103	0144
	104	0145
	105	0146
	106 '	0147

Ο143 0 110 001 111

0 010 001 1OO

0163	0	111	001	111
0162	O	111	001	Oil
0350	1	no	100	Oil
0377	1	111	111	111
	0	Oil	O01	100
0163	0	111	001	111
0162	0	111	001	Oil
0076	0	Oil	111	Oil
0377	1	111	111	111

BRN MTR 127 SKIP C PRIIaTOUT IF LINEAR

C überspringen, ausdrucken,
wenn linear

0353 1 110 101 111

0 101 001 100 MTR

1 101 111 110 1 101 111 110

0375 1 111 110 111

0376 1 111 111 Oil

PT2	MFCH	130 FETCH C abrufen	PRINT R2 drucken
BRN	MLDEQ
BRN	MPRINTC	PRINT 11C=" drucken
BRN	XPRINT
BRN		PRIiNT C drucken	IS THIS A L linearer Rü
PT3	MFCH	FETCH R2	NO nein
BRN	MLDFQ		YES ja
BRN	PRINT 11RS=" drucken
BRN	MPRINTR2 140
BRE	XPRINT
BRN	BOUT
PT5
S ,AMlA
S,AMIA
BRN	CONT
BRN	SKIP+

abrufen

U) CD U) CO •Ρ"· OO

0150

0151

0152

0153

0154

0155

0156

CD 00	114	0157
cn	115	0160
	116	0161
O
co φ	117	0162
ro
	118	0163
	119	0164
	120	0165
	121	0166
	122	0167
	123	0170
	124	0171
	125	0172

0 Oil 001 110

1 Oil 110 000 O 001 001 100

O 010 Oil 000 O 110 Oil 000 O 010 101 000

BPLIN W,ZTC DTDS PTl

LDC LDC ROMID * CXM

0 111 001 100 0 010 Oil 000 O 000 010 000 0 100 010 000

PT LDC2 ROM MSTORE ROM

O 100 010 000 MLDEQ ROM 150

LOAD STARTING ADDRESS FOR

PRGM

Startadiresse für PLIN-Prc-grattiitt

laden

LOAD ROM IDENTIFICATION FLAG RQM-Ident if i ζ ierungskennzeichen laden

	O	100	010	000 MFCH	ROM 2	EGRESS
0304	1	100	010	Oil PARA	BRN	MSTX2
0277	1	Oil	111	111	BRN	MSTX
	O	000	001	100	PTO
0161	O	111	000	111	BRN	MSTORE
0000	O	000	000	Oil	BRN	MCALlO
0311	1	100	100	111	BRN	MSTXX2
	O	0Oi	OOI	100	PTl

160 .

EGRESS TO MSTORE
Ausgang nach MSTORE

EGRESS TO MLDBQ
Ausgang nach MLDBQ

EGRESS TO MFCB Ausgang nach MFCH PARA, REG, PRGM UX2, 0X2

UX_r

STORE UX IN RIO

UX in RIO speichern

170 UXÜX2, *
ÜXX2, UXX2, UXÜX2

O CO OO hO CD -χ. CJ OO

126	0173
127	0174
128	0175
129	0176
130	0177
131	0200
132	0201
133	0202
134	0203
135	0204
136	0205
137·	0206
138	0207
139	0210
140	0211
141	0212
142	0213
143	0214
144	0215
145	0216
146	0217
147	0220
148	0221
149	0222

0161

0 111 000

0001	0	000	000	111
0003	0	000	001	111
	0	010	001	100
0161	0	111	000	111
0322	1	101	001	Oil
	0	000	001	100
0163	0	111	001	111
0001	0	000	000	111
0326	1	101	Oil	Oil
	ο	001	001	100
0163	0	111	001	111
0001	0	000	000	111
0003	1	000	001	111
	0	010	001	100
0163	0	111	001	111
0007	0	000	Oil	111
	0	010	001	100
0161	0	111	000	111
	0	001	001	100
0163	1	111	001	111
0001	0	000	000	111
0326	1	101	Oil	Oil
0303	0	000	001	111

BRN

BRN BRN PT 2 BRN

BRN

PTO

BRN

BRN

BRN

PTl

BRN,

BRN

BRN

PT 2

BRN

BRN

PT 2

BRN

PTl BRN BRN BRN BRN

MSTORE STORE UXX2IN RIl

UXX2 in RIl speichern

MCALIl (UXX2)2, "

MCAL12 UXUX2 - (UXX2)2=DEN (C)

MSTORE STORE DEN (C) IN Rl2

DEN (C) in Rl2 speichern

MSTX2Y 200 UX2A, UX2Y

MFCH UX/ UX2Y

MCALIl 203 UXUX2Y, »

MSTXY UXY, UXY, UXUX2Y

MFCH UXX2, UXY, UXUX2Y

MCALIl UXX2UXY, " , UXUX2Y

MCAL12 210 UXUX2Y - UXX2UXY, "=NUM(C)

MFCH * DEN.(C), NUM (C)

MCAL17 C,C

MSTORE STORE C IN Rl2

C in Rl2 speichern

MFCH UXX2,C

MCALIl 220 CUXX2, CUXX2

MSTXY DXY, UXY, CUXX2

MCALl2 CUXX2 - UXY, "

N) CO

cn

CO

CO

Ö CO 00 fO CT)

150	0223
151	0224
152	0225
153	0226
154	0227
155	0230
156	0231
157	0232
158	0233
159	0234
160	0235
161	0236
162	0237
163	0240
164	0241
165	0242
166	0243
167	0244
168	0245
169	0246
170	0247

0 000 Ool 0163 0 111 001 0366 1 111 Oil Oil

0 001 001 0161 0 111 000

0253 1 010 101

	0	000	000	000
0326	1	101	Oil	Oil
	0	001	001	100
0163	0	111	001	111
0001	0	000	000	111
0322	ο	101	001	Oil
	0	010	001	100
0163	0	111	001	111
0001	0	000	000	111
0011	0	000	100	111
0316	1	100	111	Oil
0006	0	000·	Oil	Oil
	0	Oil	001	100
0161	0	111	000	111
0066	0	Oil	Oil	Oil

171 0250

O 000 000

PTO BRN BRN PTl BRN

BRN

DUMMY

BRN

PTl

BRN

BRN

BRN

PT2

BRN

BRN

BRN

BRN

BRN

PT3

BRN

BRN

DUMMY

MFCH UX, CUXX2 - UXY
MCALl8 UXY -CUXX2/UX = B

MSTORE STORE B IN RIl

B in RIl speichern

MCALA 230 A CALC₁AND STORED IN RlO A berechnet und in RIO gespeichert

MSTXY UXY, UXY

MFCH B

MCALIl B UXY, "

MSTX2Y UX2Y, UX2Y, BUXY

MPCH 240 C

MCALIl CUX2Y, ", BUXY

MCALl9 CUX2Y+BUXY = NUM (R2)

MSTY UY, UY, NUM (R2)

MCAL15 R2

K) CO

. cn

ω co

CO

MSTORE STORE R2 IN Rl3

R2 in R13 speichern

BPRINTS LOAD STARTING ADDRESS FOR PRINTS PRGM

Startadresse für Druckprogfranim ■ laden

250

0251

0 000 000

DUMMY

0252 0253 0254 0255 0256 0257 0260 0261

0262 0263 0264 0265 0266 0267

0270 0271 0272 0273 0274 0275 0276

0357

0360 0355

0373

0375

0326 0316

0 000 000

0 010 001 100 MCALA

1 111 000 0 100 101

0 010 001

1 111 000 1 110 111

0 100 010 000 LINJ

0 000 000

1 101 111 010 V2? 1 101 111

1 101 111 1 111 101 0 Oil 100

0 000 110

1 100 101 000 SUITEl 1 111 110

0 000 000

0 000 000

1 101 Oil Oil 1 100 111 Oil

DUMMY PT2 JSB CTS PT 2 JSB JSB ROM 2

CHOA

CHlA MULT

DUMMY XS,AMlA XS,AMlA XS,AMlA BRN FIN RS3

RETURN

DNR

BRN CONT

DUMMY

DUMMY

BRN MSTXY

BRN MSTY

SX2, SX2 ;■'■■

257 C, SX2
260 CSC2, CSX2

EGRESS TO LlNJ
Ausgang nach LINJ

1X5

m co co

4> CO

RETURN PROM ROM 7 ROUTINES
zurück von Routinen des ROM 7

ACCESS TO MSTXY Zugriff zu MSTXY

ACCESS TO MSTY
Zugriff zu MSTY

X	X	CM	ο	CM
O	P Φ	X	«-Η	X
<tJ	P".	cn	X
(JlJ O '			P
Q Ϊ4	K
O	α		W
U -	ο		Q
X	ο		O
XEH			ϋ
Eh cq
CQ S
S
O N
«Η
co m
CQ -Κ
W M
CJ Ο» O
U 3 O
rttf N m

	ο	CM	χ	ο
	CM	X	w Q	cn
ρ	m	Q	ο	m
Q		O	υ
O	O
α

rf

CMrHrH Γ^· CM CM VOrH CM LO ■<# OOCM (Ί H CM ÜÜOSCMCJOUacMCJOOSCMCJiOacMOOlaCMÜO Eh QQQKEHQQQSEHQQQPiBQQPSEHQ Q PiEHQQ

Qj ι_3 ι_3 ι_3 ΓΩ Qj 1-3 ι_3 lJ3 CQ Oj u3 t-3 ι—ί CQ Oj t-3 u3 CQ Oj u3 i_3 CQ Oj u3 i_3

O

O

O r-l

CM

O

O

O

rH

CN

O

O

O

,_,

Jx

O

O

rH

CM

O

O

i-i

X

O

O

O

8

8 ο

X

8

O

O

rH

X

O

O

O

rH

B

O

rH

X

O

rH

B

O

O

X

O

i-H

rH rH

B

,_,

O

O

O

X

O

O

O

CQ

O

O

r-i

B

O

O

i-i

CQ

O

O

B

i-H

rH

<-! O

CQ

,_,

,_,

B

rH

r-i

rH

i-H

S"

i-H

O

CQ

r-l

r-l

O

rH

rH

CQ

rH

O

O rH

S

O

rH

i-H

O

CQ

i-H

O

O

rH

rH

O

S

i-i

r-i

O

O

rH

rH

S

O

rH

i-t <-i

O

O

O

O

O

O

rH

O

O

O

rH

O

O

O

rH

O

O

O

O

O

O

Cr O

O

O

O

r-i

O

O

r_,

ο

iH

r_(

8

rH,

O

O

O

rH

rH

rH

O

O

O *

i-H

rH

rH

O

O

O

O

rH

O

rH

O

rH

8

r-i

O

rH

i-H

Q

rH

σ

O

O *-i

,_,

O

O

O

r-t

rH·

O

O

"-»

O

r-t

O

r-i

rH

r-i

O

r-i

O

O

O

O

O

O

O

1-4

i-H

b

O

O

,H

O

O

r-t

O

O

r-i

O

O

O

O

O

O

O

O

O

O

O

O

rH

O

T-i

O

O

O

i-i

O

O

O

O

O

O

O

O

O

O

O

CM

cn cn O

CM

cn cn O

CM	■-H	rH
cn	cn	cn
cn	cn	cn
O	O	O

OOOiOOOOifO fncnmcofntncncofncncncnrncncncncncncnncnmtn-mcn O O O O O O O O O O O O O O O O O O O O O O O O O

mOOOOOOOOOOOHlrHil i-HrHi-HrHrHCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCMCM

400826/0862

	220	0331
	221	0332
	222	0333
	223	0334
	224	0335
	225	0336
	226	0337
	227	0340
	228	0341
;0 9 82ί	229	0342
3/086 2	230 231	0343 0344

0345

0 100 Oil 000 LD4

0 Oil 010 110 LOAD

1 010 001 100

0 001 Oil 000

1 110 101 110

1 111 001 100 NPUF

0 000 111 100 INC

1 101 111 010 1 101 111 111

57 1 111 000 001

0 100 001 110

1 101 111 HO

0 100 Oil Oil

LDC 4 MS, ZTC PTlO LDCl

W ,AXC

PTl 5

PLS

XS, AMlA

BRN INC

JSB CHOA W,SLA

S,AMlA

BRN

STAT

LOAD END TEST DIGIT Ende laden, Ziffer prüfen

CODE WORD TO A
Kodewort nach A

DECODE XS TO SET POINTER XS dekodieren, um Hxnweismarke zu setzen

FETCH CODED REGISTER kodiertes Register abrufen

SHIFT TO NEXT CODED DIGIT auf nächste kodierte Ziffer verschieben

HAVE ALL 3 REGISTERS BEEN FETCHED?

Sind alle 3 Register abgerufen worden?

YES, CALC CORRECTED SUM OF SQUARES

ja, korrigierte Summe der Quadrate berechnen

233	0346
234	0347
235	0350
236	0351
237	0352
238	0353
239	0354
240	0355
241	0356
242	0357
243	0360
244	0361
245	0362
246	0363
247	0364
248	•0365
249	0366
250	0367
251	0370
252	0371
253	0372
254	0373
255	0374
256	0375
257	0376

0 100 101

CTS

0336

0100

0006

1	101	111	Oil	MPRINTC	BRN	2	7	7
0	001	001	100		PTl		S, ZNCC	O
0	001	Oil	000		LDCl	7	JSB	O
0	100	000	Oil	BCUT	BRN		SS8	O
0	100	010	000	DIVIDE	ROM	7	SS3	1
0	Oil	000	100		SS3		ROM
1	110	010	000	MULT	ROM		ROM
0	Oil	000	100		SS3	7	ROM
1	110	olO	000	CHOA	ROM	S,ZNCC	ROM
1	000	000	100	CHlA	SS8	SS3	ROM
0	011	000	100		SS3	ROM
1	110	010	000	MINUS	ROM
0	Oil	111	110	PLUS
0	Oil	000	100
1	110	010	000	MCAL18
0	Oil	111	110
0	000	Oil	IQl	PRINT
1	ooo·	000	100
0	Oil	000	100
1	110	010	000	PIN
0	000	010	000	NOTE
0	000	010	000	CONT
0	000	010	000	SKIP+
0	010	010	000

NEUF

NO¹, FETCH NEXT REGISTER
nein, nächstes Register

350

abrufen

360

MCALl7

370

NO

GO CO U) CO 4> CO

0377

1 010 010 000 XPRINT ROM 377

Zeilen laufende Abzweig-Nr. Adresse Adresse

	3	0000
	4	0001
	5	0002
	6	0003
409826-	7 8	0004 0005
Ό862	9	0006
	10	0007
	11	0010
	12	0011
	. 13	0012
	14	0013
	15	0014
	16	0015

..

STATISTICS FUNCTION BLOCK LISTING (ROM 4)

Statistik-Funktionsblock (ROM 4)

Betriebs-Kode

Bit-Muster

1 010 010 000

0 101 001 100

1 011 011 000
1 Oll 010 011
O 000 011 100

XROOT ROM

MPRINTD PT5

LDCIl BRN

MSCALEX PRS PCOM

O 000 011 100 MSCALEY PRS

O 000 011 100 MDTIC PRS

O 000 011 100 MDAXES PRS

O 000 011 100 PRS

0 000 Oil 100 PRS

1 100 101 000 DNR 1 100 101 000 DNR

1 010 010 000 XPLOT ROM

O 000 001 100 MLDNS PTO

SET POINTER CODE FOR X SCALING

Hinweismarkenkode für X-Skalenfeilung setzen

SET POINTER CODE FOR Y SCALING Hinweismarkenkode für Y-Skalenteilung setzen

SET POINTER CODE FOR TICS Hinweismarkenkode für Punktmarken setzen

SET POINTER CODE FOR AXES Hinweismarkenkode für Achsen setzen

¹ IN3

ω αν

EGRESS TO XPLOT ^ω

Ausgang nach X-Plot - T^

	17	0016	0357
	18	0017
	19	0020
	20	0021
	21	0022
	22	0023	0375
	23	0024
	24	0025	0357
	25	0026
ΐ-	26	0027	0163
Ο
	27	0030
QO K)	28	0031
05
>»	29	0032
G?
00	30	0033
CD	31	0034	0373
	32	0035	0276
	33	0036	0077
	34	0037	0101
	35	0040	0275
	36	0041	0301
	37	0042	0102
	38	0043	0101

1 111 000 001 0 100 101 000 0 100 101 000

0 100 101 000

1 001 111 010

1 111 110 111 1 001 001 100 1 111 000 001 1 100 101 000 0 111 001 111

0 010 101 000

1 Oil 001 100

0 100 Oil 000

0 010 100 000 EC

1 111 101 111

1 Oil 111 Oil PT O Oil 111 111

0 100 000 111

1 Oil 110 111 1 100 000 111 O 100 001 Oil

O 100 000 111

JSB CTS CTS CTS XS, AMI

BRN PT9 JSB DNR BRN CXM PTIl

LDC 4

CXM

BRN

BRN

BRN

BRN

CHOA

CONT

CHOA

SUITEl

FIN

MSTX

MPl?

MEXNS

BRN	MSTY
BRN	MCAL20
BRN	MP2?

Nl, Nl, Nl,, Nl

170 IS THIS IN 2 SAMPLE MODE? 2-Proben-Betriefo?

NO nein YES ja

Nl, Nl, Nl, N2

170 VAR KEY Variationstaste

4 TO FIl 4 nach FIl

BRN

MEXNS

UX, UX SKIP 1 IF 2 VAR

1 überspringen» wenn 2 Variablen

EXCHANGE Nl AND N2 Nl und N2 austauschen UY, UY, UX UX+UY," SKIP 4 IF 2 VAR

4 überspringen, wenn 2 Variablen

EXCHANGE Nl AND N2 Nl und N2 austauschen

	39	0044	0376
	40	0045	02,74
	41	0046	0277
	42	0047
	43	0050	0161
	44	0051
	45	0052	0015
O			0205
CO OO KJ	46	0053	0000
σο -^	47 ·	0054
ο 00	48	0055	0161
CD	49	0056
ts>	50	0057

1 10Ö 101 000

0 100 001 100

1 111 111 Oil

ι on no on

1 Oil 111 111

0 101 001 100

0 111 000 111

DNR

0 000 110 111

1 000 010 111 0 000 000 Oil 0 101 001 100 0 111 000 111

BRN,
BRN
PT 5
BRN

BRING DOWN UX+UY FOR STORAGE UX+UY für Speicherung herunterbringen

PT 4	SKIP+	UXY, UXY, UX+UY
BRN	MSTXY	UX+UY-2UXY, "
BRN	MCAL30 ,	120
BRN		STORE UX+UY (2
PT 5	MSTORE-
BRN

MLDNS

MCALNS
XROOT

MSTORE

51	0060	0062	0015	0	000	110	111	BRN	MLDNS
52	0061	0063	0227	1	001	Oil	111	BRN	MCALT
Seite 194	0064
53		0	101	001	100	PT5 .
54	0161.	0	111	000	111	BRN	MSTOR
55	0162	0	111	001	Oil	BRN	MLDEQ

-2UXY (2 VAR.)

UX+UY speichern (2 Proben) oder UX+UY-2UXY speichern (2 Variablen)

Nl, N2, N2, Nl (2 SAMPLE CASE) (2 Proben)

(N1+N2-2) / (UX+UY) (NH+N2)N1N2 R ( ) ·

STORE ABOVE PARTIAL RESULT IN

Rl 5

obiges Teilergebnis in Rl5

speichern

127 Nl, N2, N2, Nl
130 T

STORE T IN Rl5

T in Rl5 speichern

PRINT "\="
drucken

K) CO CD OO CO ■P* CO

	56	0065	0304	1	100	010	Oil
	57	0066	0341	1	110	000	111
	58	0067	0015	0	000	110	111
		0070	0245	1	010	010	111
	60	0071		0	110	001	100
	61	0072	0161	0	111	000	111
	62	0073	0162	0	111	001	Oil
	63	0074	0001	0	000	000	111
098 21	64 65	0075 0076	0341 0353	1 1	110 110	000 101	111 111
-%,	66	0077		0	001	001	101 MPl?
O OO	67	0100	0103	0	100	ooi	Ill
σ» PO	68	0101		0	010	010	000 MFXNS
	69	0102		0	100	001	100 MP2?
	70	0103		1	001	111	010 LT .
	71	0104	0376	1	111	in	Oil
	72	0105	0375	1	111	110	111
	73	0106		1	101	100	010
	74	0107	0 111	0	100	100	111
	75	0110		0	001	010	000
	76	Olli		1	010	010	000 R5

BRN BRN ■

BRN BRN

PT 6 BRN

BRN

BRN BRN

BRN PTl BRN ROM 1

PT 4 XS, AMI

BRN BRN

P,AMlA BRN EERA ROM 5

MPRINTT MDPRT

MLDNS MCALD

MSTORE MLDEQ

MPRINTD MDPRT

BOUT LT

PRINT T
drucken

Nl, N2, N2, Nl

DEGREES OF FREEDOM
Freiheitsgrade

STORE DEG. FROM IN Rl 6 Freiheitsgrade in,Rl6 speichern PRINT ":="
drucken

SKIP+ CONT

R5

PRINT DEGREES OF FREEDOM Freiheitsgrade drucken

EGRESS TO MEXNS
Ausgang nach MEXNS

IS THIS 2 VAR OR 2 SAMPLE? 2 Variablen oder 2 Proben?

2 VAR

2 Variablen

2 SAMPLE
2 Proben

CO

<T> CO CO 4> CO

0112

0113

0114

0115

	81	0116
	82	0117
	83	' 0120
	84	0121
O to	85	0122
1826
*«■«. ο	86	0123
00 CO N)	87 88	0124 0125
	89	0126
	90	0127
	91	0130
	92	0131
	93	0132
	94	0133

0120

0155

0125

0155

0132

0155

0200

1	101	101	110	SFP	W,AMIA
1	101	101	110		W,AMIA
0	101	000	011		BRN
0	111	011	000	BPRGl	LDC 7

0	101	011	000	T 2	LDC 5	ROMID
0	110	110	111		BRN
1	101	101	110	BPRG2	W, AMIA	Τ3
0	101	010	111	BRN
0	101	011	000	LDC 5

IS THIS AN X RANGE ENTRY? X-Bereichs^Eingang?

NO nein

YES LOAD STARTING ADDRESS FOR PRGl .

ja, Startadresse für Programm 1 laden

IS THIS A Y RANGE ENTRt? Y-Bereichs-Eingang?

nein'

1	110	Oil	000	T3	LDC14	ROMID
O	110	110	111		BRN
1	101	101	110	BPTIC	W,AMIA	T4
O	101	101	Oil		BRN
1	101	Oil	000		■ LDC13
O	000	Oil	000	T4	LDCO	ROMID
O	110	110	111		BRN
1	101	101	110	W,AMIA	ZEROFIl
1	000	000	Oil	BRN

30 YES, LOAD STARTING ADDRESS FOR PRG2

ja,' Startadresse für Programm 2 laden

40 IS THIS A TIC ENTRY? Punktmarken-Eingang?

NO nein

YES, LOAD STARTING ADDRESS FOR PTIC

ja, Startadresse für PTIC laden

IS THIS AN AXES ENTRY? Achsen-Eingabe?

NO, SET FIl FOR DATA ENTRY nein, FIl für Dateneingabe setzen

0134

1 100 Oil 000 BPORG LDC12

	96	0135	0155
	97	0136	0005
	98	0137	0162
	99	0140	0201
	100	0141	0366
	101	0142	0341 0347
σ CD	102 103	0143 0144
OO Nj	104	0145
CO	105	0146	0331
CD CO o>	106 107	0147 0153
K)	108	0154

0152

0153

0154

0155

0112

1 010 Oil 000 0 110 110 111 0 000 010 111

0 111 001 Oil"

1 000 000 111 1 111 Oil Oil 1 110 000 111 1 110 Oil 111

0 Oil 001 100

1 Oil Oil 000

0 001 001 100

1 101 100 111

BRN PRG2 BElN

BRN BRN BRN BRN BRN

MPRINTI PT3

1 100 101 110 . AX W,AXB

O 001 001 100 PTl

O	100	101	Oil	RPT	BRN
1	100	Oil	000	ROMID	LDC12
O	010	101	000	CXM

YES, LOAD STARTING ADDRESS

FOR PROG

ja, Startadresse für Programm

laden

ROMID

MSCALEY STORE Y LIMITS

Y-Grenzen speichern

MLDFQ

MPRINTG2 PRINT "RG2-" drucken

MSPRT PRINT YMIN drücken

MDPRT PRINT YMAX drucken

DATRES

SET FIl TO O

FIl auf O setzen

ACCESS TO AX FROM ROM 6, DIGIT TO AO

Zugriff zu AX xron ROM 6, Ziffer nach AO

SET POINTER TO LOAD STARTING ADDRESSES

Hinweismarke setzen, um Startadresse zu laden

113 0156

114 0157

115 0160

116 0161

117 0162

118 0163

119 0164

120 0165

121 0166

122 0167

123 0170

124 0171

125 0172

126 0173

127 0174

128 0175

129 0176

130 0177

131 0200

132 0201

133 0202

134 0203

0 111 001 0 Oil Oil 0 000 010

0 100 010 0 100 010

0 110 101

1 100 101 0375 1 111 110 0004 0 000 010 Oil

0162 0 111 001 Oil 0262 1 Oil 001 Oil

0366 1 111 Oil Oil 0341 1 110 000 0347 1 110 Oil

1 101 111 1 101 111

0333 .1 101 101 0373 1 111 101

1 100 010 0265 1 Oil Oil

O 010 Oil 0264 1 Oil 010 Oil

PT7 LDC 3 ROM O

MSTORE ROM 2 MLDEQ ROM 2 SUITEl STA

DMR

BRN PRGl BRN

BRN ' BRN

BRN BRN BRN

T . XS,AMlA XS,AMlA

BRN BRN

ZEROFIl ROM 6 MPRINTG2 JSB

LDC2

BRN

160 EGRESS TO START Ausgang zum Start

Nl, Nl, N2, N2
Nl, N2, N2, Nl
CONT

MSCALEX STORE X LIMITS

X-Grenzen speichern

MLDEQ

MPRINTGl PRINT "RGl="
drucken

PRINT XMIN drucken PRINT XMAX drucken

MSPRT
MDPRT
DATRES

SET FIl TO O
FIl auf O setzen

T KEY
T-Taste

IS THIS IN 1 VARIABLE MODE? 1-Variablen-Betrieb?

COMP?
FIN

PCOM

NO

nein

YES, DO NOT ACCEPT
ja, nicht akzeptieren

150

K) CO CD CO

Ol

CM

r-l ·» +
S CN rH

r-l r-l —

Z !3 OJ

OI r-l r-l

J3 w !3

co

04

Ol

Ol

OJ

S3

r-l oT

Oi

OJ	J5	=	H	+	25	r-l	X	CQ	X	CQ	CQ
55		Ol	Q			S3	CQ	Ol	CQ		OJ
r-4	1-1	S3		13	3		O		01
S3	S3	+					00		!3
OJ	01 S3	r-l			i	Ol	01			O	X CQ
-f-		J3	Ω		+	J2			«.		Ol
•Η	•-I			1—1	X				i-l	U
J2J	.!3	Ol		SJ			1^*
		S3		U	"—'	Ol	O	S
	01	r-I			S3	K		Ol
	jg	S3		^^		O		!3	CQ
	r-{	O		OI	r-l				iH
01		OJ		I
I		Ol		OI
01 ty	01			S3
^s									CQ
r-4	r-l			J3
21								2
				W
CO		S		Q
				H Eh				£_{
p3			> S3
M			H O
S			Ω U

U E

oi oj

Bl ffl ßi (Ü * « (J) CQ CQ S3 S3 E-t CQ CQ •"3 hi Ω Ω PU hi hJ

r-l O "■-» "-I r-l
O -f O O O

r-i O ή O O

00

•Η Ο Ή Ο

rH O »-4 O

O Ö

O

ι-ί

O

O

l-l

O

1-1

O

r-4

r-l

r-4

Q

r-l

r-l

O

O

O

I-l

fH

O

O

O

O

O

O

O

O

O

O

r-4"

O

O

O

O

O

O

8

8

O

r-l

O

O

O

O

O

r-l

r-l

O

i-l.

r-4

O

O

O

O

r-l

0

rH

r-4

r-4

r-l

r-l

r-4

r-l

O

r-l

O

O

O

,_,

O

r-l

r-l

i-l

0

rH

t-l

O

O

O

r-l

O

r-4

O

O

r-4

r-4

O

O

i-l

O

O

8

0

tH

O

O

r-f

r-4

r-l

r-4

r-l

O

O

r-4

rH

O

O

i-l

r-l

iH

0

i-l

O

r-l

i-l

O

O

O

O

O

r-l

r-l

O

r-4

r-l

i-l

O

O

O

0

i-l

rH

■Η

r-4

O

O

r-l

O

r-4

O

r-l

r-l

r-l

O

r-l

r-l

O

O

r-l

r-l

rH

O

r-4

r-t

r-l

r-l

r-l

r-4

r-l

r-l

r-l

r-4

O

r-l

i-l

r-l

r-l

VD

00 O

Ol	in	η	O	ro	in	m	in	r»	in
VO	Ul	in		m	r>	ro	in	in	in
CO	ro		co	co	CO	O	ro	oo	oo
O	O	O	O	O	O		O	O	O

^οΓΟίΓορΓΟο^ΓΟο ΟΟΟΟι-ιι-'Ήι-ιιΗι-ιήι-ιοιοιοιοιοιοιοιοιοοοοοοοοοοοοοο oioioioioioioioioioioioioioioi "ol oioioioioioioioioiojoi OOOOOOOOOOOOOOOOOOOOOOOOQOO

in vo r~- co g\ ο «π· οίοο^ριηνοΓ^οοίΛΟ'-ιοίΓΟ'α'ΐηνοΓ^οοσ'νΟ ¹^ tororo(O(o^i^|^^|^^|^i^|^i^>^ⁱ^ⁱ'*'a^t'*inminmmmmmininvovo

409826/0862

Ol

rsi

P
Q

S Φ

Φ ■Η

«.

in

rH

•4*

CN rH

Eh

—

O

Ol

·»

Φ

-

m

A

OJ

1O

ftJ

Eh

O

OJ

RDM

Φ

Eh

O

EC

TN)

53

Eh

C2J

•Ö

a Ρ»

Φ

-H

■n

13

J

tzi

Ό

!3

Pi

CQ

Pi

CJ

O

OJ

O

W

Hi

2!

■Η

£η

O

iH

■

«J

O

Ρ?

Ol

U

m

P

M

co

M

PQ

O

J3

CD

U

U

CQ

J3

!3

+

IS

OJ

Il

Ol

OJ

IzI

ö>

CQ

CQ

»**

rH

Ol

OJ

Φ

. JjQ

CQ

P

na

Hj

X!

CQ

CQ

•H

S3

■s

-P

PQ

P

Xi

H

JS

»>.

H

4J

IS

CQ

rH

2

■ri

JS

I

M

O

>*

PI

Ol

-H

Pi

O

CN

■—'

PQ

Ol

Φ

H

Λ

[>

U

frl

tH

Φ

CQ

Β

O

1

CO

I

c\

Φ

H

0

j*)

Γ-

I

Xl

JS

O

>t

D

OI

-H

CQ

Λ

P

SS

in

rH

-H

H

O

rH

CQ

D

O

JS

Φ

O

Η

O

O

OJ

J3

Φ

CU

iH

OJ

Pi

iH

Ol

JH

53

M

·.

Ή

H

CN

O O

j2'

X

1-1

O

rH

EH

Pi

O

rH

O

tzi

rH

rH

rH

—-<■

D

rH

P

•■Η

tH

VD

O

CQ

O

O

Il

rH

PQ

O O

.CQ

Ol

Φ

rH

O O

Ol

rH

O

ID

rH

rH

rH

CQ

rH

co

HI

C

tH

•H

W

■H

rH

is

O

O

rH

rH

Pn

rH

rH

P

rH

rH O

H

O O

O

O

ΙΗ1

P

O

O

HI

O

rH

a

rH

EH

tH rH

O

H

rH · rH '

O

OJ

J^

rH rH

rH

tH

P

O

rH

O

H

rH

O

<"H

«H

O

rH

P

P

rH

r-i

PQ

•Η

*

rH

O

O

rH

h)

rH

CQ

rH

U

O

CQ

rH

rH S

ts

rH

rH

rH

O

CQ

O rH

CJ

Pi

CQ

CQ

O

■H

O

PQ

8

CQ

13

CQ

O

rH O

rH

CQ

O

Q

^D

O

O

O

■H

O

rH

O

r-H

O

O

O

rH

O

O

O

,_,

rH

tH

O

O

rH

•H

rH

•H

rH

O

rH

rH O

O

rH

iH

rH

O

O

O

O

O

8

O

_,

rH

rH

iH

O

O

rH

O

8

O

rH rH

O

O

rH

rH

iH

rH

rH

-

O

O

rH

O rH

rH

rH rH

rH

rH

rH

O

O

iH

O

«H

rH

O

rH

O

rH

rH

O

rH

i-i

rH

rH

O

rH

rH

O

CN	O	in	in	ro	OJ
VO	VD	in	γ-	ID	ID
CO	co	η	οο	PO	ro
O	O	O	O	O	O

VD	in	co	in	in
in		in	Γ	VD
CN	co	PO	ΟΟ	Ol
O	O	O	O	O

Γ

O

Ol

CN

co

^*

in

VO

t—

O

•H

vo

Ol

CO

in

in

VO

Γ-

O

■Η

CN

ΟΟ

O

^<

·«*

^S1

in

in

cn

in

in

OJ

in

in

in

VO

VO

VD

CN

CN

CN

CN

OJ

Ol

CN

Ol

Ol

Ol

Ol

CN

O

Ol

OJ

Ol

Ol

OJ

Ol

O

O

VO

O

O

O

O

O

O

O

O

φ

O

O

in

O

O

O

O

O

O

CN

OO

rH

in

VD

γ

OO

Ch

O

rH

Ol

-H

co

r-

\o

r-

OO

cn

O

rH

VO

vo

VO

vo

ιο

vo

VO

r-

I--

Γ-

Φ

Γ-

Γ-.

rH

r-

r-

OO

OO

rH

rH

rH

rH

rH

rH

rH

(H

CQ

f-|

i-H

rH

rH

rH

409826/0862

182	0263
183	0264
184	0265
185	0266
186	0267
187	0273
188	0271
189	0272
180	0273
181	0274
192	0275
193	0276
194	0277
195	0300
196	0301
197	0302
198	0303
199	0304
200	0305
201	0306
202	0307
203	0310
204	0311
205	0312

0367
0375

0363

0363
0375

0311
0264

0264

0 001 011 000

1 111 100 001 PCOM 1 Hl HO Hl

0 101 001 100 RG

1 100 OH 000 1 100 Oil 000 0 QH 001 100 0 100 100 100

0 000
0 110
0 HO

0 HO

1 111
0 Oil

0 HO

1 111
1 111
1 010
1 010
1 001
1 100
1 OH
1 010
1 Oil

HO 010 010 010 010 Hl 101 010 HQ 001

on

111 100 010

on

010

000 000 000 000 001 110 000 001 111 100 000 010 Hl Oil 000 Oil

LDCl JSB BRN PT 5

LDCl 2 LDCl 2 PT 3 RS 4

RETURN ROM 3 ROM 3 ROM 3

MCAL30 JSB

S,ZNCC

MCAL2o STA JSB BRN

MPRINTT PTlO LDClO XS,AMI BRN BRN

P LDClO BRN

PRINT
CONT

LOAD "RG¹¹IN C
"RG" in C laden

27Q

PCOM
PCOM

RETURN FROM ROM 7 ROuTINES von den Routinen des ROM 7 zurückkehren ·

PLUS 2UXY₁", ÜX+UY

300 ·*2ϋΧΥί 2TO, -2UXY;, tJX+üY ■

PLUS UX+ÜY-2UXY

to

U)

o>

UJ

	206	0313	0007
	207	0314	0162
	208	0315	0327
	209	0316	0366
	210	0317	0341
	211	0320	0347
O CO	212	0321. .	0006
co
NJ CO	213'	0322	0162
/0862	214 215 216	0323 03 24 0325	0145 0366 0341
	217	0326	0347
	218	0327
	219	0330
	200	0331
	221	0332	0244
	222	0333
	223	0334

0 000 Oil 111 PORG BRN MDAXES

0 111 001 Oil BRN MLDEQ

1 101 Oil 111 BRN MPRINTO

1 111 Oil Oil BRN MSPRT

1 110 000 111 BRN MDPRT -

110 Oil 111 BRN DATRES

O 000 Oil Oil PTlC BRN MDTIC

O 111 001 Oil BRN MLDPQ

110 010 111 BRN MPRINTI

111 Oil Oil BRN MSPRT

110 000 111 BRN MDPRT'

110 Oil 111 BRN DATRES

010 001 100 MPRlNTO PT2

Oil Oil 000 LDCIl

110 Oil 000 LD6 LDC6

Oil 010 Oil BRN · PCOM
1 Oil 001 100 COMP? PT3

001 100 010 ' P,AMI

PLOT AXES
Achsen zeichnen

PRINT "ORG="
drucken

320 PRINT X COOR. OF ORIGIN X-Koordinaten des Ursprungs drucken

PRINT Y COOR. OF ORIGIN Y-Koordinaten des Ursprungs drucken

SET FIl TO O
FIl auf O setzen

DRAW TICS
Punktmarken zeichnen

PRINT "T I=" drucken

PRINT X TIC INTERVAL X-Punktmarkenintervall drucker

PRINT Y TIC INTERVAL Y-Punktmarkeninterval1 drucken

SET FIl TO O
FIl auf O setzen

ioo

IS THE DATA COMPLETE? Daten vollständig?

224 0335

225 0336

0374

226	0337	0346
227.	0340	0347
228	0341	0352
229	0342	0351
230	0343	0352
231	0344	0353
232	0345	0354
Seite 197	0355
233	0356
234	0357
235	0360
236	0361
237
238
239
240
241
242
243
244

0154 0377

1 111 110 Oil

0 001 001 100

0 001 Oil 000

0 110 110 011

1 100 101 000 1 111 111 111

0 100 000 100

1 110 010 000 0 100 000 100

MDPRT

CHP

BRN PTl

LDCl

BRN

DNR

BRN

SS4

ROM

SS4

NOTE

NO, NOTE nein, NOTE

YES, LOAD STARTING ADDRESS FOR PT PRGM

ja, Startadresse für PT-Programm laden

BPT

XPRINT

1	110	010	000	DATRES	ROM	7	SET FIl TO O FIl auf O setzen
0	010	101	000		CXM
1	Oil	001	100		PTIl
0	000	Oil	000		LDCO
0	010	101	000	BOUT	CXM
0	100	010	000	DIVIDE	ROM	2
0	100	000	100		SS4
1	110	010	000	MULT	ROM	7
ρ	100	000	100		SS4
1	110	010	000	CHOA	ROM	7	360
1	000	000	100	CHlA	SS8
0	100	000	100	SS4

cn co co

	245	0362	0344
	246	0363	0377
	• 247	0364
	248	0365
	249	0366
	250	0367
	251	0370
	252	0371
	253	0372
	254	0373
O en	255	0374
OO	256	0375
N) C7>	257	0376
O	258	0377
86.2	• Seite	198

Zeilen laufende Abzweig-

Nr. Adresse Adresse

0000

0001

0002
" 6 0003

0004

0005

0006 0373

1 110 010 000 0 011 111 110

0 100 000 100

1 111 010 000 1 110 010 101

1 111 111 111 1 000 000 100

0 100 000 100

1 110 010 000 O 000 010 000 0 000 010 000 0 000 010 000

0 010 010 000

1 010 010 000

	ROM	7	7	DS	7
MINUS	S,ZNCC	XPRINT	O
PLUS	SS4		O
	ROM		O
MSPRI	JSB	1
	BRN	5
PRINT	SS8
	SS4
	ROM
FIN	ROM
NOTE	ROM
CONT	ROM
SKIP+	ROM
XPRINT	ROM

PRINT CONTENTS OF DS
Inhalte von DS drucken

STATISTICS FUNCTION BLOCK LISTING (ROM 5) Statistik^-Funktionsblock (ROM 5)

Betriebs-Kode

Bit-Muster

O 000 010 000

0 000 010 000

1 101 111 110 1 101 111 110 1 101 111 110 1 101 111 110

ι in ιοί iii

XPRINT

XROOT

HIST

ROM ROM S,AMlA S,AMlA S,AMlA S,AMlA BRN

FIN

KJ OO

cn co co

CO

0007 0010

0011 0012

0013 0014

0015

0016 00ϊ7 0020

0021 0022 0023 0024 0025

0026

0027 0030

0031

0055 0035

0365 0002

0020 0025

0021

0346

0 010 110 p 001 110

0 000 000

1 111 Oil

0 000 001 Oil

1 Oil OO1

O 000 101 100 XPLOT

O 001 000 Oil

0 001 010

1 Oil 101 110 DFCOP

1 000 Oil 100 INC 1 111 101 O 000 101 O 0Oi 000

0 100 001 110 ADA

1 111 101

1 111 111 1 110 Oil

O 010 101

	BRN	HISTl	10 PLOT KEY Plot-Taste
	BRN	PLOT
	DUMMY		HIST KEY HIST-Taste
	JSB	BLANK
	BRN	HIST	SET POINTER
XPFNUP	PTIl

YPO

BRN DECOP,
BRN ADA
W, ZTA

PRS

W,AP1A

YPO

BRN INC

W, SLA

W,APIA

XS,APIA

JSB EXM712

CXM

Hinweismarkenkode der Anhebung des Schreibstiftes setzen

20 ACCESS TO XPLOT
Zugriff zu X-Plot

SET AO TO PREVIOUSLY SET POINTER VALUE

AO auf zuvor gesetzten Hinweismarkenwert setzen

30 SHIFT AO TO Al

Ao nach, Al verschieben

LOAD U¹S IN AO AND A2 Ü's in AO und A2 laden

EXCHANGE FLAGS
Kennzeichen austauschen

K)

CO CD CO CO

CO

0032

	30	0033
	31	0034
	32	0035
	33	0036
	34	0037
	35	0040
O	36	0041
CD OO
ro CD	37	0042
/0862	38 39 40	0043 0044 0045
	41	0046
	42	0047
	43	0050
	44	0051
	45	0052

0041

0374

0045

0374

0153

0 010 Oil 000 ' LDC2

0 010 101 000 CXM

0 000 100 000 RMGRA.

1 001 .100 010 PLOT P,AMI

0	010	QOO	111	BRN
0	111	001	100	PT 7
1	Hl	110	Oil	BRN ·
1	101	111	110 TO	S,AMlA
0	010	010	111	BRN
0	110	001	100	PT 6
1	111	110	Oil	BRN
1	101	001	100 Tl	PTl 3
0	010	Oil	000	LDC 2
0	001	001	100	PTl
0	001	Oil	no	S,AMC
0	110	101	111	BRN
0	111	Oil	000 BPLOT	LDC 7

TO

NOTE

Tl

NOTE

SET HENRY'S FIl TO 2 TO INDICATE I/O CALL

Henrys FIl nach 2 setzen, um
I/O-Ruf anzuzeigen

EGRESS TO PLOT ROUTINES
Ausgang zu den Plotter Routinen,

IS THIS IN PLOTTING MODE?
PIotterbetrieb?

YES ja

NO, PRINT NOTE 37
nein, NOTE 37. drucken

40

HAS A REG. OR HIST. BEEN PERFORMED ist Register oder Histogramm
durchgeführt worden

YES j a

NO, PRINT NOTE 36 j

nein, NOTE 36 drucken

50 WHAT KIND OF PLOT?
was für eine Zeichnung?

BPLOTZ HISTOGRAM
Histogramm

REG. LOAD STARTING ADDRESS
FOR PLOR PRGM
Register, Startadresse für
PLOR-Programm laden

N) co

cn

OJ CO •P-CO

	46	0053	0062 0063	0155	0	001	Oil	000	LDCl	ROMID
	47	0054	0064 0065 0066	0365	0	110	110	111	BRN	BLANK
	48	0055	0067		1	111	Oil	001 HISTL	JSB
	49	0056	0070		0	001	001	100	PTl
	50	0057	0071		0	101	Oil	000	LDG 5
	51	0060	0072	0367	1	001	Oil	000	LDC 8	PRINT
	52	0061	0073		1	111	100	001	JSB
	Seite 199	0074	0344						DS
4098	53 54	0075		1 0	110 Oil	010 001	101 110	JSB W, ZTC
N) CD O QO1 CD NJ	55 56 57			1 0 0	Oil 001 100	110 001 Oil	000 100 RPHOUT 000	DTDS PTl LDC 4
	58.	0155	0	000	Oil	000	LDCO	ROMID
	59	0167	0	110	110	in	BRN	MLB
	60	0000	0	111	111	111	BRN	XPRINT
	61	0117	0	000	000	Oil	BRN	MFREN
	62	0000	' 0	100	111	111	BRN	XPRINT
	63	0265	0	000	000	Oil	BRN	MRF
	64	1	Oil	010	111	BRN

53

PRINT HG
drucken

O TO DS
O nach DS

LOAD STARTING ADDRESSF FOR
PHOUT PRGM

Startadresse für PHOUT-Progranun laden

CALC LOWER ROUND
untere Grenze berechnen

PRINT LOWER ROUND
untere Grenze drucken

FETCH FREQ
Frequenz abrufen ,

PRINT FREQ.
Frequenz drucken ·

CALC REL FREQ

relative Frequenz berechnen

N) CO CD CO CO 4>CO

	65	0076	0000	0	000 000 Oil	BRN	XPRINT
	• 66	0077	0223	1	001 001 111	BRN	MINCAD
	67	0100	0325	• ι	101 010 111	BRN	MTI
	68	0101	0224	1	001 010 Oil PHOUT	BRN	MINCI
	69	0102	0000	0	000 000 Oil	BRN	XPRINT
	70	0103	0200	1	001 000 Oil	BRN	MQECI
	71	0104		1	100 001 100	PT12
O co CD	72	0105	0377	1	111 111 111	BRN	SKIP-
cn	73	0106	0353	1	110 101 111	BRN	BOUT
	74	0107		1	100 101 000 MDPRT	DNR
!8 6 2-	75	0118 .		1	Oil 110 000	DTDS
	76	0111	0033	.0	000 000 Oil	BRN	XPRINT
	77	0112		0	001 010 000	EFRA
	78	0113		0	000 000 000	DUMMY
	79	0114		0	000 000 000	DUMMY
	"80	0115		0	000 000 000	DUMMY
	81	0116		0	000 000 000	DUMMY
	82	0117		0	010 010 000 MFREN	ROM 1

PRINT RELATIVE FREQ relative Frequenz drucken

ADV PAPER, INC I

Papier vorschieben,! erhöhen

IF 10 CELLS PRINTED, GO TO FIN wenn 10 Zellen gedruckt, zum Ende gehen

INC I, I erhöhen

100 PRINT CELL NUMBER Zellennummer drucken

GO TO, MLB
nach MLB gehen

XDATA TO C
X-Daten nach C

110 STORE X DATA INDS X-Daten in DS speichern

PRINT X DATA
X-Daten drucken

GO TO NEXT PROGRAM STEP

zum nächsten Programmschritt

gehen

CO CO CO

EGRESS TO MEREN - £j Ausgang nach MEREN

	82	0117
	'B3	0120
	84	0121
	85	0122
	86	0023
O CD OO	87	0124
co
Ό862	88	Ql 25

89

0126

90	0127
91	0130
92	0131
93	0132
94	0133

0 010 010 000

0014 0 000 110 041

0236 1 001 111 Oil

0215 1 000 110 111

0147 O 110 Oil 111

0325 1 101 010 111

0200 1 000 000 Oil

0150 O 110 100 Oil

0224 1 001 010 Oil

O 111 001 100

0377 1 111 111 111

0014 O 000 110 Oil

0373 1 111 101 111

MFREN	ROM 1	XPENUP	EGRESS TO MFREN Ausgang nach "MFREN
PLOTH	BRN	MPRE	120 RAISE PEN Schreibstift anheben
	BRN	MEG	O TO DS O nach DS
	BRN	HLBO	FREQ TO G Frequenz nach C
	BRN	O TO C PEN TO COOR ' (LB, O) O nach C, Schreibstift zu den Koordinaten (LB,O)

BRN

BRN

BRN

MTI

MTLH

XCOOR

IF 10 CELLS'PLOTTED GO TO FIN

Wenn 10 Zellen gezeichnet sind, zum Ende gehen

IF T EXCEEDS XMAX-I,

GO TO FIN

Wenn I^max - 1 überschreitet,

zum Beenden gehen

130 PEN TO COOR. (LB,NEWF) Schreibstift zu den

Koordinaten (LB,NEWF)

BRN	MINCT
PT7
BRN	SKIP-
BRN	XPENUP
BRN	FIN

BACK TO MEC

Zurück nach MEC

CD CO CO

95

0134

i οίο ooi loo

XPLINC

PTlO

96
97

0135
0136

0223 0 001 000 Oil 0107 0 100 Oil 111

	98	0137	0161	0	011	001	100
	99	0140		0	111	000	111
			0243
O co	100	0141		1-1	010	001	111
	101	•0142	0161	0	100	001	100
K) σ>	102	0143	0000	0	111	000	111
ο 00	103	0144		0	000	000	OU
ο			0353
K)	104	0145	0341	1	110	101	111
	105	0146		1	110	000	Ul
	106	0147		0	Oil	001	110
	107	0150	1-1	110	001	100

108	0151	0020	0	001	000	Oil
109	0152		O	000	000	000

PEV

BRN BRN

PT3

BRN DUMMY

DECOP MDPRI

	BRN	MSTORE
	BRN	MEVAL
	PT4
	BRN	MSTORE
	BRN	XPRINT
	. BRN	BOUT
EK	BRN	EVAL
MLBO .	W,ZTC
XCOOR	PT14

DECOP

SET POINTER CODE FOR PEN
TO COOR. WITH INCREMENT
Hinweismarkenkode für
Schreibstift auf Koordinaten mit Erhöhung setzen

PRINT X DATA AND
STORE IT IN DS
X-Daten drucken und
in DS speichern

STORE SDATA IN Rl3

S-Daten in R13 speichern

STORE Y IN Rl4

Y in Rl4 speichern

PRINT Y

Y drucken

EVAL KEY

Taste auswerten

SET CODE FOR PLOT WITHOUT

INCREMENT

Kode für Plotten ohne Er- ^j

höhung setzen _w

CD co co

■P-CO

0153

0154

0156

0157

0160

O CjD	116	0161
00 ro	117	0162
ο	118	0163
862
	119	0164
	120	0165
	121	0166

0167

. 0170

0171

0014

0277

0 100 Oil 000 !

1 111 Oil 000 0 010 101 000

0 111 001 100 0 100 Oil 000 0 000 ΌΪ0 000 Q 100 010 000

0 000 110 011

1 011 111 111

BPLOTH

LDC 4

1 010 001 111

0 101 110 011

1 100 110 Oil

1 110 010 101 0 100 101 000 0 101 001 100 LOAD STARTING ADDRESS FOR PLOTH PRGM

Startadresse für PLOTH-Programm laden

	LDC15	XPENUP	■	160
ROMID	CXM	MINIT
	,PT7		RAISE PEN Schreibstift anheben
	LDC 4		INITIALIZE REGRESSION PLOT Rückschritt-Plot initial isieren
	ROM 0
MSTORE	ROM 2
PLOR.	BRN
	BRN

BRN

BRN
BRN

MEFAL

XPLINC
MTL

EVAL Y FOR CURRENT X IN DS Y für laufendes X in DS auswerten

PEN TO (X/Y)
Schreibstift nach (X,Y)

IF X IS GREATER THAN XMAX PLOT IS FINISH

Wenn X größer als X

max

JSB
CTS
PT5

DS

ist, Plotten zu Ende

I.

I.I

-O-CO

	125	0172	0363	1	111	000	101
	126	0173	0355	1	110	111	001
	127	0174		0	110	001	100
	128	ol75	. 0360	1	111	000	101
	129	0176	0363	1	111	010	001
	130	0177	0375	1	111	110	111
	131	0200		0	010	001·	100
£■»
O CD	132	0201	0342	1	110	001	101
OO t"O	133	0202		0	100	101	000
GD	134	0203		0	Oil	001	110
O	135	0204		1	100	001	100
00 cn	136	0205		0	111	100	010
	J37	0206	0362	1	111	001	101
	138	0207	0344	1	110	010	101
	139	0210	0362	1	111	001	101
	140	0211		0	100	001	100
	141	0212		0	001	111	110

142

0213

0376

1 111 111 Oil

MTLH

JSB	CHlA	CW, I	LB,LB,
JSB	MULT	I (CW) , " .
PT6			FETCH Xmax
JSB	CHlA	OFST, I(CW)	abrufen
JSB	PLUS
BRN	CONT
PT2
JSB	CHP	1 .ΧΜΔΧ
CTS		XMAX-I
W, ZTC		1 ,XMAX-I
PTl 2		XMAX-I-DS
P,CPlC
JSB	MINUS	IS THERE ROOM TO I
JSB	DS
JSB	MINUS
PT4
S, CMl

SKIP+

ANOTHER WINDOW
Ist Platz für die Zeichnung eines anderen
Fensters vorhanden?

NO, PLOT IS FINISHED

Nein,zeichnen ist
beendet

CD CO CO ■*>· CO

0214

0117

144
145
146
147
148

149

150

151

^ 152

S ¹⁵³

oo 154

σ) 155
156
°° 157

ro 158
159
160
161
162
163
164
165
166

0215
0216
0217
0220
0221

0222

0223

0224.

0-2; 2 5

0226

0227

0230

0231

0232

0233

0234

0235

0236

0237

0240

0241

0242

0243

0150

0224
0370

0344
0363

0375
0344

0376
0344

0 100 111 111

1 100 101 000 1 100 101 000

0 110 100 Oil

1 Oil 101 110

ι ιοί in no

1 001
1 111
1 Oil
1 100
1 111

0 100

1 110

0 100

1 110
1 111
1 Oil

ι in

1 110

0 Oil

1 Oil

0 001

1 111
1 110

010 100 101 001 100 101 101 101 010 010 110 110 010 001 110 001 111 010

101 101 110 100 010 000 110 000 101 001

111 101 110 000 100 Oil 101

MFC

MDFCl

MINCAD

MINCI

CINC

MPRE

MEVAL

0244

O 100 101 000

BRN

DNR DNR . BRN W, ZTA

S,AMlA

JSB

JSB

W,-Z TA

PTl 2

P,APIA

CTS

W, AXC

CTS

JSB

JSB

DTDS

BRN

JSB

W,ZTC

DTDS

PTl

BRN

JSB

CTS

MFREN

YES, CALC FREQ Ja, Frequenz berechnen

XGOOR

CINC ADV

DS PLUS

CONT DS

SKIP+

DS

LOAD MINUS SIGN Negatives Zeichen laden

1 ,F
IvI,F
1 ,1 ,F
1,1,F

O TO DS

FETCH X
X abrufen

X ,X

NJ GJ

Ol OJ OJ

CO

	168	0245	0355	1	110	111	001
	169	0246		0	010	001	100
	170	0247	0360	1	111	000	101
	171	0250	0355	1	110	111	001
	172	0251	0344	1	110	010	101
	Seite	201
	173	0252		0	100	101	000
	174	0253		0	001	001	100
	175	0254	0360	1	111	000	101
σ	176	0255	0355	i	110	111.	001
CD OO ro	177 178	0256 0257	0363	0 1	110 111	101 010	000 001
σ>	179	0260		0	000	001	100
σ 00	180	0261	0360	1	111	000	101
σ>	181	0262	0363	1	111	III	III
	182	' 0263	0375	1	111	110	111
	183	0264		0	000	000	000
	184	0265		0	100	101	000
	185	0266		0	000	001	100
	186	0267	0357	1	111	000	001
	187	0270	0353	1	110	110	001
	188	0271		0	111	101	010
	189 .	0272		ο·	111	101	010
	190	0273		0	000	000	000

MRF

JSB	MULT	■	CHIA	X2, X2	257	270
PT2			MULT		26OA '
JSB	CHIA		C	Y,Y
JSB	MULT	PLUS	CX2, CX2
JSB	DS		250 X
CTS	CHIA	X, X, CX2,	F ,F
PTI	PLUS
JSB	CONT.	R	N ,F
JSB		RX,RX,CX2	RF, RF
STA		RX,CX2	CONVERT TC
JSB		RX+CX2, "	In % umwar
PTO	CHOA
JSB	DIVIDE
JSB
BRN
DUMMY	•
CTS
PTO
JSB
JSB
X,CPlC
χ,CPic
DUMMY

ro co

cn co co

co

191
192

0274
0275

0375

	193	0276	0301
	194	0277
	195	03Ö0
	196	0301
	197	0302
	198	0303	0342
O co	199	0304	0353
OO	200	0305
CD	201	0306	002C
O	202	0307
00 co	203	0310 ·	O36C
	204	0311
	205	0312
	2o6	0313
	207	0314
	208	0315
	209 ·	0316
	210	0317

1 111 110 111 0 101 100 100

0 000 110 000

0 Oil 001 110 MINIT

1 100 001 100

0 Oil Oil 000

1 000 101 100 1 100 000 111 O 000 001 100 O 010 Oil 000 O 100 101 000

0 111 001 100

1 110 001 101

1 110 110 001

LDC

.BRN, RS

RETURN W, ZTC

PTl 2 LDC YP BRN , PTO LDC CTS PT7 JSB

JSB

CONT

1	101	001	100	MTL	•PT13
O	OOl·	000	Oil		BEN
O	111	Oil	100		PT7
1	111	000	101		JSB
O	110	001	100	PT 6
O	101	100	010	P,CMlC

LDC 3

CHP
DIVIDE

DECOP

CHIA

RETURN FROM ROM 7 . ROUTINES

Von ROM 7 Routinen' zurückkehren

LOAD 333.3
333.3 laden

FETCH x'
abrufen

GENERATE XINC
erzeugen

FETCH HENRY'S FLAGS Henry's Kennzeichen abrufen

HAS PLOT REACHED LIMIT Hat das Zeichnen die

Grenze erreicht?

K)

OJ CJ)

co

OJ

-ί>· OJ

	211	0320	0323	•1	101	001	111
	212	0321		0	Oil	001	100
	213	03222	0377	1	111	111	111
	214	0323		1	Oil	110	000
	215	0324	0373	1	111	101	111
	216	0325	0344	1	110	010	101
■Ρ"* O CD ca	217 218	0326 Ο3'27		0 0	100 Oil	101 001	000 110
ro σ>	219	0330		1	100	001	100
O	220	0331		0	111	101	110
OO	221 222	0332 0333	0362	0 1	111 111	100 001	010 101
	223	0334		0	101	001	100
	224	0335		0	110	111	110

225

228

0336 0376

0341

1 111 111 Oil

226	0337	0375	1	111	110	111
227	0340	0155	O	110	110	111

1 010 000 100

RF

MTI

EVAL

BKN PT3 BRN DTDS

BRN JSB

CTS W₁-ZTC PTl 2 WrCPlC P,CPlC JSB PT5 S, ZMC

BRN

BRN BRN

SSlO

SKIP-

FIN
DS

MINUSI

SKIP+

CONT
ROMID

YES
NO

Ja
Nein

RESTORE HENRY'S FLAGS Henry's Kennzeichen zurückstellen

ADDRESS DS
Adresse DS

10,1
I-IO,¹¹

Is I LESS THAN 10? 1st I kleiner als 10?

NO, PRGRM IS FINISHED Nein, Programm ist beendet

Κ»,

CJ"

co co

3 40 ACCESS TO ROM 5

ROMID

Zugriff zu. ROM 5, ROMID co

EGRESS TO- ROM 7 EVAL f"

ROUTINE

Ausgang, zur Auswertungs-

^routine von T?dm7

in ro O ro

in CQ

Γ-

S. "1 S m

O CQ O CQ

Ρί ■ CQ Ά CQ

O CO Pi EQ CS

Q Q

S in S-O co

Pi CQ Pi

S OO O CQ Pi CQ

Q -

in

CQ

Q CQ CQ Pi

CQ

CN]

S X

< rf! O .-)

CQ

O CQ

μ a

oooo ooooooooooooooooo

oooo ooooooooooooooooo

O t-i O ή O'-iOOOO'-iO'-iO'-ΐ'-ιθΉίΗθ«-)

OOOO OOOOOOOOOOOOO-tOOO

OOOO OOOOOOOOOOOOOr-fOOO

r-)

r-i O ·-* O O O -O

θΉ-'Ήθ<ΗΟΟ·-·Ο

co - "a·"

in

in

in in in in ir)

ro rororooj roro ro ro ro ro ro ro ro OOOOOOOOOO

OOOO

σ» ο ή cm ro · ro

ro

O O

OJ 4J Ή ΓΟ ^*

OOOOOOO

in	VO	VD	vO	vo	vo	vo	VO
ro	ro	ro	ro	ro	ro	ro	ro
O	O	O	O	O	O	O	O

4 09826/0862

	250	0367
	251	0370
	252	0371
	253	0372
	254	0373
	255	0374
	256	0375
	257	0376
	258	0377
-ί- Ο	Seite	203
co
826	Zeilen Nr.	laufende Adresse
/0862	3 4	0000 0001
	5	0002
	6	0003
	7	0004
	8	0005
	9	0006
	10	0007
	11	0010
	12	0011
	13	0012

1	110	010	000	PRINT	ROM	7
1	000	000	100	ADV	SS8
0	101	000	100		SS5
1	110	010	000	FIN	ROM	7
0	000	010	OQO	NOTE	ROM	O
0	000	010	000	CONT	ROM	O
0	000	010	000	SKIP+	ROM	O
0	010	010	000	SKIP	ROM	1
0	000	010	000	ROM	O

370

377

STATISTICS FUNCTION BLOCK LISTING (ROM 6) Statistik-Funktionsblock (ROM 6)

Abzweig Betriebs-Kode Adresse Bit-Muster

O 010 101 000

O 101 001 100 O 001 011 000

0 010 101 000

1 111 011 001

O365

0365

1 101 001 100 1 011 Oll 000 1 011 001 100 1 001 011 000 1 111 011 001 O 001 001 100

PT5 LDCl CXM JSB

O 1 TO F5 TO INDICATE DELETE nach FS, um Herausnahme anzuzeigen

BLANK

PRINT "DEL"
"DEL" drucken

BLANK

ro

co

co

OO

co

CO

14	0013	0367	0	010	Oil	000
15 .	0014	0373	1	111	100	001
16	0015	0342	1	111	101	111
17	0016	1	110	001	101

	18	0017
	19	0020
** O co OO	20	0021
ro cn	21	0022
/0882	22	0023
	23	0024
	24	0025
	25	0026

26
27

0027
0030

0253

0302

0373

AXES

0 100 101 000

0 001 Oil 000

1 Oil 110 000

LDC 2	PRINT	AXES KEY, FETCH PLOTTER REG2 Axentaste, Plotter-Regi ster 2 abrufen
JSB	FIN	SAVE REG 2 Register 2 bewahren
BRN	CHP	20 1 TO C6 1 nach C6
JSB
CTS
LDCl

1 010 101 111 BRN

1 101 001 100 RECALL PT13

1 010 Oil 000 LDClO

1 100 001 Oil < BRN

1 001 111 .010 SAMPLE XS,AMI SUITEl

SUITE2

STORE IN REG2

In Register 2 speichern

RECALL KEY, LOAD 10 IN

C13

Rückruftaste, 10 in C13

laden

SAMPLE KEY IS THIS IN 2 SAMPLE MODE?
Probetaste, ist dies in 2-Probenbetrieb?

1 111 101 111 0 Oil 001 110

BRN W, ZTC FIN

30

NO
YES

Nein Ja

CO OO OJ

0031
0032

30	0033
31	0034
32	0035
33	0036
34	0037
35	0040

0041

ο οο 37	0042
2-38	0043
39	0044
40	0045
41	0046
42	0047
43	. 0050

0051

0323

0323

0375

0147

0051

0151

0 100 001 100

1 001 100 010

1 101 001 111

0 111 101 110

PT P,AMI

BRN

W,CPlC

1 101 001 111 BRN

0 Oil 001 100 DELETE PT3

1 111 110 111

0 110 001 100

1 101 100 010

BRN PT6

P,AMlA

0 110 Oil 111· BRN

1 101 111 010 VAREN XS,AMIA

O 010 100 111

0 100 001 100

1 001 100 010 O 110 100 111 O 010 010 000

BRN PT4 P,AMI BRN BPXACC ROM

1 001 111 010 TVl

XS,AMI

BPYACC

WHICH IS THE NEW SAMPLE

MODE?

Welches ist der neue

Probenbetrieb?

DATA 1 1 TO AO Daten 1, 1 nach AO

DATA 2 2 TO AO Daten 2, 2 nach AO

DELETE KEY
Herausnahmetaste

40 DATA ENTRY KEY Dateneingabetaste

IS THIS VARIABLE DATA? Variablen Daten?

NO

YES, IS THIS IN 2 SAMPLE

MODE?

Ja, Im 2-Probenbetreib?

NO
YES

Nein
Ja

50 EGRESS TO BPXACC Ausgang "nach BPXACC

IS THIS IN 1 VARIABLE MODE?
1-Variablen-Betrieb?

CO

CO CO CO .£- CO

	45	0052	0216	1	000	111	Oil	BRN	TOGGLE
	46	0053		1	101	111	110 HACC	S,AMIA
	47	0054	0056	0	010	111	Oil	BRN	HG
	48	0055	0050	0	010	100	Oil	BRN	BPXACC
	49	0056		1	100	101	000 HiS	DNR
	50	0057		0	100	101	000	CTS
	51"	0060		0	100	101	000	CTS
4*.	52	Q061		0	110	001	100	PT6
O CP	Seite	204. ·
OO PO	53	0062	0360	1	111	000	101	JSB	CHIA
CT) O co CD	54 55	00,63 0064	0362	1 .0	111 101	001 001	101 100	JSB PT5	MINUS
	56	0065	0360	1	111	000	101	JSB	CHIA
	57	0066	0353	1	110	110	001	JSB	DIVIDE
	58	0067		0	100	101	000	CTo
	59	0010		0	001	111	110	S, CMl
	60	0071	0110	0	100	100	Oil	BRN	PRINTL
	61	0072		0	Oil	001	110	W, Z TC

NO Nein

53 YES, IS THIS IN HISTOGRAM MODE? Ja, Histogramm-betrieÖ

YES Ja

Nein

NO
DATA

Daten

60 DATA, DATA,DATA Daten, Daten, Daten

OFFSET, DATA, DATA Versetzung, Daten, Daten

DATA-OFFSET, " , DATA Daten-Versetzung,", Daten

CW

DATA-OFFSET / CW =1 Datenversetzung /CW =1

I, I, I, DATA
I, I, I, Daten

70 IS I NEG?
1st I negativ?

YES, PRINT ¹¹L"
Ja, ¹¹L" drucken

NO

	62	0073	0362
	63	0074
	64	0075	0115
	65	0076	0365 0365
	66	0077	0105
	67	0100
409826/	68 69	0101 0102
ο OO σ> NJ	70 71	0103 . 0104	0267
	72	0105	0365
	73	0106	0365
	74	0107
	75	0110
	76	Olli	0267
	77	0112
	78	0113
	79	0114

1	100	001	100	PTl 2
0	111	101	110	W,CPlC
0	111	100	010	P,CPlC
1	111	001	101	JSB
0	001	111	110	S, CMl
0	100	110	111	BRN

1 111 Oil 001

1 111 Oil 001 0 100 010 111 0 000 010 000 0 001 001 100

0 101 Oil 000

1 Oil Oil 111 1. Ill Oil 001 1 111 Oil 001 0 000 0011100

0 111 Oil 000

1 Oil Oil 111

MINUS

DAAD

BLANK

	JSB	BLANK
	BRN	SUITE5
OUT	ROM O
SÜITE5	PTl
	LDC 5
	BRN	CP
PRINTL	JSB	BLANK
	JSB	BLANK
	PTO
	LDC7'
	BRN	CP

IO, I, I, DATA
Daten

1-10, 1-10, I, DATA
Daten

IS I LESS THAN 10?
1st 1 kleiner als 10?

YES, DATA IS IN RANGE OF HISTOGRAM
Ja, Daten im Bereich
des Histogramms

NO, PRINT "H"
Nein, "H" drucken

EGRESS TO OUT
Ausgang nach aus

110

ro co cn co co

CO

0115
0116

0117

0120

	84	0121
	85	0122
O
co CX)	86	0123
N) co	87	0124
O
co
co	88	0125
	89	0126
	90	0127
	91	0130
	92	0131
	93	0132

0227

1 100 101 000 1 100 101 000

1 001 000 100

0 010 010 000

DAAD

0 100 001 110

DNR DNR

1 Oil 001 100 DIGIT PTIl

1 101 000 010 P,AMCA

1 001 Oil 111 BRN

1 100 101 110 VARDEC W,AXB

W, SLA

0	0	100	001	110	W, SLA
0	010	001	100	PT2
0	Oil	Oil	000	LDC 3
0	010	001	100	PT2
001	Oil	010	XS,AMC

CHAR

!,DATA
Daten

SET FLAG FOR S.HALK

ROUTINE

Kennzeichen setzen für

SHALK-Routine

120 EGRESS TO CHALK Ausgang nach CHALK

IS All LESS THAN 5 1st AU kleiner als 5?

NO

Nein

YES, All = 4. VAR. NUM.. ENTRY. DIGIT TO AO Ja, All = 4, Variablenzahleingahgziffer auf AO

DIGIT TO A2
Ziffer auf A2

127

130 3 TO C2
3 nach C2

IS VARIABLE NUMBER GREATER THAN 2?

Ist Variablenzahl grosser als 2?

CJ) OJ OJ

94	0133	0374	1	111	110	Oil	BRN	NOTE	YES, Ja,	NOTE 32 NOTE 32
95	0134	0370	1	111	100	101	' JSB	ADV	NO	Nein
96	0135		0	Oil	001	110	W, ZTC		O TO	STAT Rf

0136

	98	0137
	99	0140
Q to	100	0141
CO ro CXJ.	101 102	0142 0143
Ό862	103	0144
	104	0145
	105	0146
	106	• 0147

0150
0151

0344

0152

0 111 101 110

1 100 001 100 1 Oil Oil 000

0 110 Oil 000

1 Oil 001 100 1 110 000 101

1 100 001 100

1 010 Oil 000 O 110 101 Oil O 100 010 000

Tl

1 000 010 000 AX

W,CPlC

PT12 LDCIl LDC PTIl JSB

PT12

LDClO 'BRN ROM

ROM LOOP

SUITE3

THROUGH J 7

O zu den Zustandsregi·' stern OO bis 17

BUILD ADDRESS FOR Rl7 Adresse für Rl7 aufbauen

140

INITIALIZE REGISTERS 10

TO 17

Register 10 bis 17

initialisieren

BUILD ADDRESS FOR R09 Addresse für R09 auf bauart

EGRESS TO OFFSET / WIDTH

ENTRIES

Ausgang zu denEingaben

von Versetzung/ Breite

150 EGRESS TO AX Ausgang nach AX

O 010 010 000 BPYACC ROM

110

0152

0153

0344

1 110 010 JOl SUITE3 . JSB LOOP

0154

09826	112 Seite	0155 205
9 8 0/	113	0156
	114	0157
	115	0160
	116	0161
	117	0162
	118	0163
	119	0164

0365

0365

120

0165

0161

0206

1 110 101

0 110 001

0 010 101 OOO

1 111 Oil

W, AXC

W, CTA

BLANK

1	111	Oil	001	JSB	BLANK
1	000	001	100	PT8
1	010	Oil	000 L 2	LDClO
0	001	101	100	YPl
O	111	000	111		12
1	101.	111	010	XS,AMlA
1	000	Oil	Oil	BRN	ONETWO

INITIALIZE REGISTERS OO TO 09

Register OO bis 09 initialisieren

INITIALIZED FLAGS TO M. ALL FLAGS O EXCEPT Initialisierte Kennzeichen nach M_r ausgenommen alleO-Kennzeichen

F2 WHICH MAY BE O, 1 OR F2, welches O, 1 oder 2 sein kann

PRINT VARIABLE ENTRY MODE Variableneingabe-Betrieb drucken

160 LOAD DEC! POINTS

IN C

Dezimalpunkte in·C laden

IS THIS IN 2 SAMPLE MODE? 2-Proben-Betrieb?

NO

Nein

120	0165	0206
121	0166
122	0167
123	0170
124	0171	0370
125	0172.	0367
126	0173	0365
127	0174	0365
128	0175	0333
129	0176
130	0177	0370
131	0200	0367
132	0201 .

0202
0203
0204
0205
0206

Ö2O7

3

1 000 Oil Oil 1 Oil 001 100

0 010 Oil 000

1 010 Oil 000 1 111 100 101 1 111 100 001 1 111 Oil 001

1 111 Oil 001 1 101 110 001

0 001 Oil 000

1 111 100 101 1 111 100 001 O 010 101 000

1 O 11 001 O Oil 000 010

0 010 101 000 FIM

1 111 101 111

1 101 001 100 ONETWO

O 101 Oil 000

	BRN	ONETWO	NO Nein
	PTIl		YES, PRINT "2T" Ja, "2T" drucken
	LDC 2
	LDClO		170
	JSB	ADV
	JSB	PRINT
	JSB	BLANK	PRINT "DATA 1" Daten 1"
	JSB	BLANK
	JSB	DATA
VARPl	LDCl
VARP	JSB	ADV
	JSB	PRINT	200
ZEROE 11	CXM	4	SET FIl FOR VARIABLE DATA ENTRY FIl für Variablen-Daten gang

PTIl
P, ZTC
CXM
BRN
PT13 .

LDC5

FIN

203

PRINT Vl OR ν2

Vl oder V2 drucken

LOAD "V2" IN C
"V2" in C laden

CD Ca)

139	0210
3.40	0211
14X	0212
142	0213
143	0214
144	0215
145	0216

146

147
148
149
150

151

0217

0220
0221
0222
0223

0223

0177
0176

0 000 000 000

0 010 Oil 000

1 100 001 100 ' 1 001 111 010

0 111 111 111

0 111 111 Oil

0 010 1OJ 000 TOGGLE CXM

0 Oil Oil 110

O Oil 001 100 O Oil 100 010

0 010 101 000

1 001 100 010

O 110 100 111

DUMMY	VARP	IS THIS IN 1 VARIABLE MODE? 1-Variablen-Vertrieb?
LDC 2	VARPl	NO PRINT "V2" Nein/ "V2" drucken
PTl 2		YES PRINT "Vl" Ja, "Vl" drucken
XS,AMI		SET CALCULATION FLAG F13 TO O Berechnungskennzeichen F13 auf O setzen
BRN
BRN
CXM

S, ZTC

P, ZNCC
CXM
P,AMI

BPYACC

AND TOGGLE COMPLETENESS
FLAG F3

und Vollständigkeitskennzeichen F3 verbinden

220

WHICH VARIABLE IS BEING
ENTERED?

Welche Variable wird eingegeben?

Y, GO TO PRGM FOR Y

ACCUMULATION

Y, zum Programm für

Y-Akkumulation gehen

OJ CD CO U)

152	0225	0370	1 111	100 101	JSB	ADV-
153	0226	0050	0 010	100 Oil	BRN	HPXACC

co co to

0227

0230 0231

0232

158	0233
159	0234
160	0235
161	0236
162	0237
163	0240
164	0241
165	0242
166	0243
167	0244
168	0245

0150

0365

0241

1 10 1 100 010 CHAR P,AMlA

0 110 100 Oil

1 100 101

0 000 001

BRN W, AXB

1	010	101	000	MTC
1	110	100	010	P ,AXC
0	110	000	010	P, CTA
0	010	101	000	CXM
1	111	Oil	001	JSB
0	000	001	100	PTO
0	100	001	110	SHIFT W,SLA
0	000	111	100	PLS
1	101	101	100	YP13
1	010	000	lii	BRN
1	110	100	010	P, AXC

AX

BLANK

SHIFT

GO TO PRGM FOR X

ACCUMULATION

Zum Programm für X-

Akkumulation gehen

IS THIS A CHARACTER
DIGIT ENTRY
Ist dies ein Zeichen-Ziffer-Eingang?

230 NO Nein

YES DIGIT TO AO
Ja, Ziffer nach AO

DIGIT TO FO
Ziffer nach_vFO

PRINT "CT" AO

Drucken

240

co co co

	169	0246	206	0252
	170	0247	0253
	171	0250	0254
	172	0251	0255
	Seite	0256
	173	0257
	174
	175
O co OO	176
ro OT	177
Ό862	178

0365

Ο26Θ 0261

0177

03-74

1	111	Oil	001	JSB
0	001	001	100	PTI
0	001	Oil	000	LDCl
1	010	Oil	000	LDClO
0	111	111	111	BRN
0	111	001	100	SUITEl PT7
1	Oil	111	000	DSTC
0	110	101	110	W, ZMC
1	111	110	Oil	BRN

BLANK

1 100 101

1 Oil 110

0 010 101 NOTE

250

RETREIVE PROM REG2 . Wiederbekommen von Register 2/

IS CO?
1st C O?

YES, PLOTTER WAS NOT PRESENT NOTE 37
Ja, Plotter war nicht anwesend, NOTE 37

257 NO, REG 2 DATA TO C Nein, Daten aus Register 2 nach C

260 RETURN ORIGINAL DATA

Ursprüngliche Daten zurück

6 TO Pll TO INDICATE AXES DIGIT ENTRY
6 nach FIl, um Achsen-Ziffern-Eingabe anzuzeigen

co co co

181	0262
182	0263
183	0264

0277

1 Oil 001 100

0 110 Oil 000

1 000 001 100

PTIl LDC6 PT8

	184	0265	0204	0	001	Oil 000	LDCl	.	•	*
	185	0266	0367	1	000	010 Oil	BRN	FIM
	186	0267		1	111	100 001 CP	JSB	PRINT
■Ρ-	187	0270		1	100	101 000	DNR
σ CO	188	0271	0052	1	100	101 000	DNR
1826/	189 190	0272 0273		0 0	010 Oil	100 Oil 001 110 SUITE4	BRN W, ZTC	BPXAC
	191	0274 .		1	Oil	110 000	DTDS
	192	0275		1	100	101 000	. DNR
	193	0276	0	101	100 010	, P,CMlC

0345

1 110 010 111

BRN

LOOP

1 TO F8 TO INDICATE PLOTTING MODE
1 nach F8, um Plotter-Betrieb anzuzeigen

270

I, DATA
Daten

O TO ADDRESSED REGISTER O zum adressierten Register

BRING DOWN ADDRESS Adresse runterbringen

DECREMENT ADDRESS: WAS ADDRESS O?
Adresse erniedrigen: war Adresse O?

NO, CONTINUE TO INITIALIZE CHIP " ·
Nein, mit Initialisierung dieses Plättchens fortfahren

CO CO CO

0300

0 110 100

	196	0301
	197-	0302
	198	0303
	199	0304
■ί- Ο co 00	200	0305
■*»» O 00	201	0306
O)	202	0307
so	203	03 ΊΟ
	204	0311

0312 0313

0314

0313

0124

0	000	110	000	SUITE2	RETURN
0	001	101	010		X, CMl
1	100	101	111		BRN
1	001	001	110	W, SRC

LIl

0305

0 Oil 001 010 AD X,ZTC

0 111 101 010 X,CPlC

1 001 110 000 ATDS

0 000 110 100 CLS

1 011 111 000 DSTC

0 100 010 011 BRN

1 Oil Oil 000 LIl LDCIl

1 100 010 111 BRN

OUT

300 RETURN FROM R0M7 ROUTINES

Zurück von den Routinen des ROM 7

IS THIS EXPONENT 0? Ist dieser Exponent 0?

NO Nein

YES, SHIFT RIGHT
MANTISSA OF ADDRESS IS READY

Ja, nach rechts verschieben, Mantisse der Adresse ist fertig

SET EXPONENT TO 1
Exponent auf 1 setzen

310

CONTENTS OF SELECTED REGISTER TO C
Inhalt des ausgesuchten Registers nach C

LOAD 11 IN C12, MANTISSA OF ADDRESS IS READY 11 in C12 laden, Mantisse der Adresse ist fertig

AD

CD CO CO

208

209
210

211
212
213

** 214

«ο 215

ro 216

217
218

219
220
221
222
223

224
225
226
227

0315

0316 0317

0320 0321 0322 0323 0324 0325 0326 0327

0330 0331 0332 0333 0334

0335 0336 0337 0340

0365

0365 0333

0176

0 000 000

0 000 000

0 000 000

0	000	000	000
0	000	000	000
0	000	000	000
0	111	101	110
1	110	101	110
0	Oil	100	010
0	010	101	000
1	111	Oil	001
1	111	011	001
1	101	110	001
1	110	100	010
0	111	111	101
0	101	001	100

1 011 011

1 Oil Oil

1 Oil Oil

1 Oil Oil

Dl

DATA

DUMMY	BLANK
DUMMY	BLANK
DUMMY	DATA
W,CP1C
W, AXC	VARP
P, ZNCC
CXM
JSB
JSB
JSB
PfAXC
JSB
PT5
LDCIl
LDCIl
LDCIl
LDCIl

ADDRESS SELECTED REGISTER

ausgewähltes Register adressieren

RETURN D-DATA TO D D-Daten nach D zurück

REGISTER DATA TO C Register-Daten nach C

320

PRINT¹¹DATA" AO
"Daten", drucken AO

330

LOAD WORD DATA IN C W-Daten in C laden

OJ CO CO CO

	228	0341	207	0346
	229	0342	0347
	230	0343	03 50
	231	0344	0351
	232	0345	0352
	Seite	0353
	233	0354
	234	0355
ο ca	235	0356
1826/	236	0357
"•ν O	237	0360
GO σ>	238	0361
PO	239	0362
	240	0363
	241	0364
	242	0365
	243
	244
	245
	246
	247
	248

0273

0121

0 000 001 100 PTO

0 000 110 000 RETURN

0 110 000 100 CHP SS6

1 110 010 000 ROM 1 001 110 000 LOOP ATDS

0 100 101,000 CTS

1 011 101 111 BRN 1 Oil 0Ol 100 DF PTIl

O 101 011 000 LDC5

O	101	000	111	DIVIDE	BRN
O	000	000	000		DUMMY
O	110	000	100		SS6
1	110	010	000		ROM 7
O	000	000	000		DUMMY
O	)000	000	000	CHIA	DUMMY
O	000	000	000		DUMMY
O	110	000	100	MINUS	SS6
1	110	010	ooo	PLUS	ROM 7
O	011	111	110		S,ZNCC
O	110	000	100	SS6
1	110	010	000	ROM 7

SUITE4

DIGIT

ADDRESS REGISTER
Register addressieren

ADDRESS TO D
Adresse nach D

350 DIGIT INTERPRETATION Zifferninterpretation

5 TO CIl
5 nach CIl

360

hO CO CD CO GO

Ca)

3 0

249	0366	0374 .	0	110	000	100	BLANK	SS6	NOTE
250	0367	0370	1	110	010	000		ROM 7	•ADV
251 .	0370	1	000	000	100	PRINT	SS8
252	0371	0	110	000	100	ADV	SS6
253	0372	1	110	010	000		ROM 7
254	0373	0	000	010	000	FIN	ROM O
255	0374	0	000	010	000	NOTE	ROM Ο
256	0375	1	001	100	010	DFL	P, AMI
257	0376	1	111	110	Oil		BRN
258	0377	1	111	100	101		JSB

370

IS DATA SET COMPLETE? Ist Datensatz vollständig?

NO, PRINT NOTE 33 .
Nein/¹NOTE 33"drucken

377 YES Ja

cn. co

Seite 2o8

Zeilen
Nr,

laufende Addresse

0000

0001

	5	0002
	β	0003
D	7	0004
30
O
D
>».	8	0005
IO
TS	9	0006
	10	0007
	11	0010
	12	0011

0012

0013 0014

STATISTICS FUNCTION BLOCK LISTlNg(ROM 7) Statistik-Funktionsblock (R0M7)

Abzweig-Adresse

0001

0313

0001

0254

Betriebskode Bit-Muster

0 101 110 000 PRE

1 Oil 010 100 WAIT YSIl

0 000 000 111	BRN
1 Oil 100 100	RSIl
1 000 010 100	YSÖ
O 000 101 111	BRN
1 101 110 000	TCS
1 111 110 000	CCS
0 000 Oil 100	PRS
1 110 101 100	YPl 4

WAIT

O 000 000 111 BRN

O Oil 110 000 ADV ADV

1 010 110 Oil BRN

WAIT

TERM

NO, PRINT (S8) -OR

ADVANCE

Kein,Druck (S8) oder

Vorschub

WAIT FOR PRINT FLAG Auf Druckkennzeiehenen warten

IS THIS A PRINT OR

ADVANCE?

Druck oder Vorschub?

ADVANCE
Vorschub

PRINT, LOAD IO REG. Druck, Register ID lader.

10

IS PRINT FINISHED? Ist druck beendet?

NO, WAIT FOR NEXT FLAG •Nein, auf nächstes Kennzeichen warten

YES, ADVANCE PAPER Ja, Papier vorschieben

CO ■P-CO

0015

0 010 101 000

STUP.

CXM

	17	0016	0254	1	010	110	Oil
	18	0017		1	101	011	000
	19	00 2Ο		1	111	101	100
	20	0021	0217	0	000	111	111
	21	0022	0254	1	010	110.	Oil
409826/	22 23	0023 0024		0 0	111 000	111 011	110 100
ο	24	0Ο25		0	000	toi	100
Uj σ>	25	0026	0023	0	001	001	111
ro	•26	0027		1	001	001	110
	27	0030		1	001	001	110
	28	0031		0	111	101	110
	29	0032		1	100	001	100
	30	0033		1	000	010	100
	31	0034	0037	0	001	111	111
	•32	0035		1	010	Oil	000

BLK

INClO

BRN	TERM
LDC13
YP15
BRN	BLK
BRN	TERM
S,CPlC

TO

PRS YPO BRN . W, SRC

W, SRC W,CPlC PTl 2 YS8

BRN LDClO

INClO

FLAG BACK TO M- DATA BACK TO C

Kennzeichen zurück nach M - Daten zurück nach C

FILL C WITH BLANKS
Mit Leerstellen füllen

20

SET C13 TO POINTER
VALUE

Cl3 auf Hinweismarkenwert setzen

C13 to CIl
C13 nach CIl

30

WHICH CHIP SOUGHT?
Welches Plättchen gesucht?

CHIP 11
Plättchen 11

CHIP 10'
Plättchen 10

CD CO OJ

HS*

in

(N

co

rH

in

CNJ

S3

E-f

POi

rH

rH

U

U

O

S3

O

O

U

J3

O

O

U

rH

Q

■H

CO

E^

Pu

Pu

rH

rH

S

S

X

SI

Pi

X

X

υ

£4

a

-«

Pi

PU

«

ft»

SlJ

m

KtJ

m

Q

<

P*

S

·.

O

O

S=:

^.

•

E5

CO

co

X

is

S

X

rH

CQ

X

X

CO

co

CN

η

m

rH

Q

O

X

X

S

S

S

D

rH

O

rH

D

rH

D

O

O

rH

O

rH

O

co

H

W

co

O

O

O

rH

l-f

O

O

O

rH

O

O

O

O

O

O

O

O

rH

rH

O

rH

O

O

rH

O

r-t

rH

O

rH

rH

rH

rH

O

O

,_,

rH

fi

rH

rH

O

O

O

rH

rH

iH

r-i

O

rH

r-i

O

rH

rH

rH

O

rH

O

rH

O

O

rH

rH

rH

rH

O

O

8

O

rH

O

rH

O

rH

rH

O

rH

rH

O

l-f

rH

O

O

8

O

rH

O

rH

rH

O

O

O

O

O

rH

O

Q

rH

rH

rH

rH

rH

rH

H

rH

O

rH

O

rH

rH

rH

O

O

rH

O

O

O

O

O

rH

rH

rH

rH

O

O

rH

O

rH

O

O

O

O

rH

O

>H

rH

O

rH

rH

rH

rH

O

O

rH

rH

i-t

O

rH

O

O

O

O

rH

rH

O

rH

rH

rH

rH

O

■H

rH .

O

rH

O

O

rH

iH

O

rH

rH

rH

rH

Ή

■H

rH

O

O

rH

•H

rH

rH

O

O

O

CM

in O O

O O

OOOOOOOOOOOO oooooooooooo

O O O OQOO

O O O O

409826/08 62

4-B3

O O

LD	in	S
S	S	D
	ED	cn
	co

VD VO (N

D PW CQ 2

CQ

(N

CQ ή

Oi CM

S cn <;

CQ IS ><

O U

O U B 2

Oi Oi CQ CQ *» »· CQ CQ X X X CQ

Pi Oi CQCQCQ

CQ

U rfj

U PQ CQ

CQ O

O

O

O

rH

r-i

in

O

O

O

O

rH

r-i

VD

r-i

O

*

CQ

-

O

r-i

CM

O

O

i-i

r-i

O

rH

2

rH

rH

rH

rH

<-H

r-t

r-i

r-i

O

ο

rH

rH

O

O

rH

D

O

O

r-i

<-·

rH

O

D

,_,

rH

r-i

O

O

P

<-«

O

r-i

rH

rH

O

O

CQ

r-i

rH

rH

rH

r-i

r-i

CQ

O

rH

rH

r-i

i-H

rH

rH

O

O

O

rH

O

O

rH

O

rH

rH

rH

O

O

O

rH

O

rH

O

O

O

O

O

rH

•Η

O

O

rH

•-i

O

rH

rH

O

r-t

O

rH

r-i

O

O

r-i

O

i-H

O

O

O

i-4

8

f-H

,_,

O

rH

rH

rH

rH

rH

O

r-{

rH

rH

O

O

O

O

O

rH

8

i-4

rH

O

O

pH

<-i

O

r-i

O

O

r-i

rH

O

rH-

rH

r-i

O

Q

r-i

r-i

Q

·-·

O

■H

O

O

O

rH

rH

O

rH

O

O

rH

O

O

O

O

O

r-i

O

O

rH

rH

rH

O

1-4

O

r-i

rH

O

O

O

O

·-*

iH

o·

O

rH

O

O

rH

rH

O

O

O

O

O

Q

r-4

O

O

rH

i-t

O

rH

O

O	O	!-Η
Γ-		VO
O	CN	O
O	O	O

r^ cm

O -ι

O O

CN

ιη .O

cm .cn *#

O O O O O O

CQ ιη

rrOOOOOOOO ΟΟΟΟΟΟΟΟΟθΉΉ'-''-f'-i'-t'-tr-ti-i

/Π061

I	ί
Oi	Φ
>	Λ
O	£3
Oi	%j
O	Φ
	Ό
Oi	O
O
CQ	M
H	O
£>	CQ
H	■Η
Q	•Η ι«
O 12	Q 3
Oi O	1 cd
W Γ-q	Or-J
ta Pm

γ- O
οι η

Ο4

H Q

cn

OJ H

in

O CQ

N

oi

CQ Μ CQ S

Ol

ι-Η ^

* α* οί

O S " Oi

X PQ S PQ CW

Oi CM

m & 2

U CQ

cw <!

S5 O ^ £2

PQ' Cw 2 PQ

CW t-3

< CQ

- ·> CQ ο a

CQ CQ Oi Hl Oi

2 2 CW X ffl.

Ol

ψ—ι

O

OJ

O

O

i-H

O

i-l

P4

r^

η

O

i-i

<-l

in

I-H

O

O

rH

O

O

r-l

i-l

O

r-l

i-H

r->

i-H

OJ

i-H

i-H

^>

iH

r-t

r-i

rH

O

O

r-i

H

i-H

i-l

rH

O

O

r-l

i-l

O

H

J>

r-l

i-H

r-H

i-H

rH

Q

r-H

rH

i-l

O

O

!S

,_,

H

' o

Q

H

o

Q

H

rH

r-i

O

O

O

O

8

O

O

Q

O

O

O

Q

rH

iH

rH

Q

O

O

O

r-i

O

rH

i-t

O

■-Η

rH

O

O

O

.H

rH

i-l

O

O

O

O

O

i-H

r-H

O

O

i-H

rH

O

O

r~^ iH

O

rH

O

i-H

O

iH

O

•-Η

,_,

O

O

O

O

I-H

rH

■-Η

r-l

O

r-(

O

i-l

r-l

O

O

T-I

O

Q

r-l

O

O

r-H

O

rH

O

O

8

O

i-H

r-l

O

O

8

O

o

·-*

r-l

O

o

rH

rH

rH

rH

O

rH

O

l-l

r-t

rH

O

O

i-i

i-H

r-l

rH

O

i-H

r-H .

O

O

rH

O

O

O

O

i-l

rH

O

O

rH

O

O ·

O

•Η

O

O

O

rH

O

O

rH

O

O

rH

t-i

O

O

r-i

O

O

rH

rH

O

Ol

i-l

O cn

CM

1-JrHrHrJJrHrHrHrHrHrH oooooooooo

rirtriftt4tttiwtrtf4ltt OOOOOOOOOOOO

in a Q o Q / η &ao

O .

-Η

νο

CM

CN

CN

ο cq

rfj Ü

CQ -π

cm a

CQ IS CU CQ

cn CM

CM Pi

CQ En IS]

^ a

CQ CJ !2 X

O CQ S ή Ϊ3 N rfj fJj 3! Z CQ & X! X CQ CQ

VO Γ*· CN CN

a a

co

CN

CN

CN

O O ή O O

»-4 i-i rH i-l ^H

-H O O »-»

O O O O

O O -H O

O O O O

i-H i-H r-l -H

-H O -H -H

O O O r-i

O O ή

O -H -H

O O O

Ή O O

r-4 i-l

O O

O O O

-■too

O r-4 O

O O

O O rH

οοοοο

O O O

^H O Ή

r-i >-H f-i O

-hOOO

i-i O -H "-H -HOO-H

-HOOO O- -i O O

O O -H -H O

O -H -H

O -H

O O O

O O

O -H

O ή O

-HOO

O O O O

-H-Hi-Ii-I

O O

-H O

O -η O Q -H

-H -H O -H O

-Η O -H -H O

O O O -H -H

r-4 O -Η -Η ■Η Ο

CN

in

CN

ro

-H

in in

i-H

cu

i-Hr-li-HrHrH-Hi-l-H-Hi-li-H-H

oooooooooooo inmvovovovovovovovo -H-H-HrH-H-Hi-H-Hf-Hi-I OOOOOOOOOO

oocnOOOOOOOOOO'-i-H-H Q)-H-H (TvCft-Ht-HrHi-Hi-Ji-H-H-H-Hi-H-H-H-HCQi-t-H

409826/086 -H -H CN CN CN

rH -Η -H i-H -H

	123	0170	0206	1	110	100	110	NRM25	M, AXC	OFL 2
	124	0171	0220	0	110	001	110		W, CTA	OFL 4
	125	0172		0	000	101	110		W,ZTB
	126	0173		1	100	001	100	OFLl	PTl 2
	127	0174		0	001	100	110		M, CMl
	128	0175		1	000	Oil	Oil		BRN
	129	0176	0234	1	001	000	Oil	DSl	BRN	AC
	130	0177		0	Oil	001	110		W,ZTC
	131	0200	1	111	Oil	000		LDC15
co
OO NJ CO	132	0201	1	ooi	Oil	000		LDC 9
'086	133	0202	1	001	110	Oil	NOTE	BRN
NJ	134	0203	0	000	110	100	CLS

170

0204

0205 0206

O 000 010 000 ROM O

O 000 010 000 ZERO ROM O

O 110 111 010 0FL2 XS,ZMC

200

203

BUILD ADDRESS OF Adresse aufbauen von

DEDICATED STORAGE IN C

Zugeordnete Speicherung in C

INSURE RETURN TO ROM O

Rückkehr nach ROM O sicherstellen

AFTER NOTE SUBROUTINES

Nach "NOTE" Subroutinen

RETURN TO ROM O
Zurück nach ROM 0

co

CD OO CO

CO

138 139 140 141 142 143 144 145

O 146 S 147 σ> ¹⁴⁸

^ 149

αο 150

151 152 153 154 1S5 156

157

0207 0210 0211 0212 0213 0214 0215 0216 0217 0220 0221 0222 0223·

0224 0225 0226 0227 0230 0231

0232

0221

0215 0221

0122 0254

0224

1	001	000	111	0FL3	BRN	CLOSE
0	010	101	010		X,ZMCC
0	101	111	010		XS,CMlC
1	000	110	111	OFL 4	BRN	0FL3
1	110	101	110	CLOSE	W, AXC
1	001	000	111		BRN	CLOSE
1	110	111	010	CHPl	XS,AXC
1	001	111	010	INC 12	XS,AMI
0	101	001	Oil		BRN	NOTE 31
0	011	001	110		W,ZTC
0	100	101	000		CTS ·
1	010	110	011		BRN	TERM
0	011	001	110		W,ZTC
0	111	111	110	S,CPlC	•
0	000	011	100	PRS
0	000	101·	100	YPO
1	001	010	Oil	BRN	INC 12
1	001	001	110	W, SRC
1	001	001	110	W, SRC

210

220

SET CB TO POINTER VALUE CB auf Hinweismarkenwert setzen

230

CB TO CIl
CB nach CIl

1 100 001

PT12

0233

0340

1 110 000 Oil

ACl

	159	0234
	160	0235
	161	0236
	162	0237
	163	0240
	164	0241
O Ό O	165 166	0242 0243
Γ) >Ν	167	0244
O O τ>	168	0245
	169	0246
	170	0247
	171	0250

0251

0254

0	111	101	010 AC	X CPlC
1	001	110	000	ATDS
0	110	001	100	PT6
1	Oil	111	000 COMT	DSTC
1	010	110	Oil	BRN
1	Oil	Oil	000 FX	LDCIl
0	111	Oil	000	LDC 7
1	001	110	000	ATDS
0	111	001	100	PT7
1	Oil	111	000	DSTC
1	001	Oil	000	LDC 9
1	100	001	100	PTl 2
0	001	Oil	000	LDCl

O 010 101

BUILD REMAINDER OF
ADDRESS FOR PLOTTER DS Rest der Adresse für Plotter-DS aufbauen

240

FETCH HENRY'S FLAG
Henrys Kennzeichen abrufen

250

SET TO PRGM MODE AND RMGRB USER
Auf Programmbetrieb und RMGRB-Benutzer
setzen

HENRY'S FLAG TO M,
STAT FLAG TO C
Henry s Kennz eichen noch M,Status Kennzeichen nach C

cn co co

0252

0253

	175	0254
	176	0255
	177	0256
O	178	0257
co
ίο	179	0260
2?	180	0261
O	181	0262
00 co	182	0263
	183	0264
	184	0265
	185	0266
	186	0267
	H87	0270
	188	0271
	189	0272
	190	0273
	191	0274
	192	0275

0261

0264

0267

0272

0275

1 Oil 110 000

1 100 101 000

1 000 100 100 1 Oil 100 100

0 001 010 10.0

1 Oil 000 111

TERM

O	010	οίο	000	TEST 2	ROM 1
O	010	010	100		YS2
1	Oil	010	Oil		BRN
O	100	010	000	TEST 3	ROM 2
O	Oil	010	100		YS 3
1	Oil	Oil	111		BRN
O	110	010	000	TEST4 ,	ROM 3
O	100	010	100		YS4
1	Oil	101	Oil		BRN
1	000	010	000	TEST5	ROM 4
O	101	010	100		YS5
1	Oil	110	111		BRN
1	010	010	000	TEST6	R0M5
O	110	010	100	YS 6

TEST2

TEST3

TEST 4

TESTS

TEST6

STORE STAT FLAG Status Kennzeichen speichern

DATA TO C
Daten nach C

FIND CALLING.ROM AND Rufendes RIM finden und

257. RETURN CONTROL Steuerung zurück

260

270 .

CO

cn co

CO

CO'

193	0276	0300	1	100	000	Oil
194	0277		1	100	010	000
195	0300		1	010	010	100
196	0301	0205	1	000	010	111
197	0302		O	000	110	000
198	0303		1	101	111	11ώ
199	0304		1	101	111	110
4^ 200 O	0305	0323	1	101	001	111
cd 201 co N) cn 202	0306 0307		■1 1	101 Oil	001 oil	100 000
ο 203	OiIO	0367	1	111	100	001
co 2O4 cn	0311		O	000	001	100
NJ 205	0312		O	111	oil	000
206	0313	0372	1	111	101	101
207	0314		1	000	000	100
208	0315	0372	1	111	101	101
209	0316	0340	1	110	Oil	lol
210	0317		O	001	001	100

TESTlO

EVALl

CP

BPEV

BRN ROM 6

YSlO BRN

RETURN S,AMlA S,AMlA

BRN PT13

LDCLl JSB PTO LDC 7 JSB

SS8 JSB

JSB PTl"

TESTlO

ZERO

BLANK

P/A
DS

300

IS THIS A LINEAR REGRESSION
Linearer Rückschritt?

NO

Nein

YES, PRINT LE
Ja, LE drucken

310

ADVANCE PAPER
Papier vorschieben

PRINT
drucken

LAOD STARTING . CO ADDRESS FOR PEV PRGM. CD Startadresse für PEV- co Programm laden <~0

211	0320
212	0321
213	0322
214	0323
215	0324

216

217

0325

0326

0 9 8 2 6	218 219	,0327 0330
■•■ν. ο	220	0331
CD	221	0332
	222	' 0333
	223	0334
	224	0335
	225	0336
	226	0337
	227	0340
	228	0341
	229	0342

0336

0203

0367

0313

0234

0 101 oll 000

1 101 011 000 1 101 111 Oil

0 110 001 100

1 101 111 110

1 000 001 111

1 111 100 001

T2

LDC 5

LDC13

BRN

P.T6

S,AMlA

BRN

JSB

320

1	001	001	100	PT9
1	010	Oil	000	LDClO
1	100	Oil	000	LDC12
1	100	101	111	BRN
0	000	000	000	DUMMY
O	ooO	poo	000	DUMMY
0	000	000	000	DUMMY
1	010	100	100	ROMID RSlO
1	010	010	000	ROM 5
1	101	Oil	000	ACl LDC13
1	001	110	Oil	BRN
0	000	000	000	DUMMY

ROMID

NOTE

BLANK

IS THIS A PARABOLIC
REGRESSION?
Parabolischer Rückschritt?

NO, PRINT NO36
Nein, "NOTE 36"
drucken

YES,PRINT PE
Ja, PE drucken

330

333

EGRESS TO ROMID IN ROM 5 Ausgang nach ROMID in
ROM 5 V\

CO CO U) 4> CO

O
CD
OO
N>

co
σ>
ro

230	0343	212	0346	0367	•	0177	1	111	100	001	EVAL	JSB	BLANK	ACCESS TO EVAL Zugriffe zu EVAL
231	0344	0347	0303		1	100	001	111		BRN	EVAL 1
232	0345	0350		0	000	000	000	CHP	DUMMY		CHP ACCESS . CHP-Zugriff
Seite	0351
233	0223	1	001	001	111		BRN	CHPl
234	1	100	001	100	DS	PT12		D.S ACCESS' DS-ZUgriff
235	0	111	111	111		BRN	DSl	350
236 '	0	100	101	000	EXM712	CTS		EXM712 ACCESS

237

238
239
240
241

242
243

244
245
246

0352

0353 0354 0355 0356

0357 0360

0361 0362 0363

0241

0106

0106

0 Oil 001 110

W, ZTc

O	111	101	110	010	„	W,CPlC
1	100	001	100	100	DIVIDE	PTl 2
1	010	000	111	Oil		BRN
1	100	001	100	110	MULT	PT12
O	100	0110011			BRN
O	010	101			X,ZMCC
O	Oil	001	CH	PT3
O	100	Oil	BRN
O	Oil	001	W, ZTC

LDV2

LDV 2

EXM712-Zugriff

ADDRESS FLAG VECTOR

Kennzeichenvektor

adressieren

DIVIDE ACCESS
Zugriff Division

360 MULT ACCESS Zugriff Multiplikation

CHOA/CHIA ACCESS Zugriff C.H0A/CH1A

	247	03 64
	248	0365
	249	0366
	250	0367
	251	0370
	252	0371
■ί ο CD OO	253 254	0372 0373
PO cn	255	0374
σ	256	0375
862	257	0376

258

0377

0025

0043

0017

0315

O	000	000	000	PLUS	DUMMY
O	001	OtDO	111		BRN
1	100	001	100	BLANK	PT12
O	010	001	111		BRN
O	111	110	000		CTT
1	101	001	100	P/A	PT13
O	000	111	111		BRN
O	010	101	000		CXM
1	100	001	100	PTl 2
O	001	100	010	P, CMl

0 000 110

0 010 101

PLUS ACCESS Zugriff Addition

370 BLANK ACCESS Leerstellen-Zugriff

PRINT ADV/ACCESS Druck/Vorschub-Zugriff

IS THIS IN PRGM MODE? Programmbetrieb?

YES,DON ¹T PRINT OR ADVANCE

Ja, nicht drucken oder Papier vorschieben

NO, CONTINUE Nein, fortfahren

ro

co

co

OO

co

Zeilen laufende Abzweig-Nr. Adresse Adresse

0000 0001 0002 0003 0004 0005 0006 0007 0010 0011 0012

TYPEWRITER INTERFACE LISTING (ROM 0) Schreibmaschinenanschluß (ROM 0)

0013

0014

0015

0016

0017

0313

Betriebs-Kode Bit-Muster

0 000 000 0 000 000 0 000 000 0 000 000 0 000 000 0 000 000 0 000 000 0 000 000 0 000 000

0 000 000

1 000 010

DIV

1 100 101 111 MUL

1 110 010 000 UP

0 100 010 000 CPAR

DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY ROM

BRN ROM

0 100 010 000 XMEM ROM

ROM

O 011 010 000 ACKEYO TKRA GO TO ROM 4
zum ROM 4 gehen

CONTINUE ROUTINE
Routine fortsetzen

GO TO ROM 7 TO TEST OP LEVEL zum ROM 7 gehen, um OP-Niveau zu testen

GO TO ROM 2 FOR ERROR MESSAGE, NO MEMORY

zum ROM 2 für Fehlernachricht gehen, kein Speicher

GO RO ROM 2 TO PROCESS CLOSED PAR.

zum ROM 2 gehen, um geschlossene Klammern zu verarbeiten

ACCEPT KEYCODE
Tastenkode akzeptieren

19 0020 1 000 010 000 EQUAL ROM 4

20 0021 O 100 010 000 SYNTAX ROM 2

21 0022 O 100 010 000 DECPT ROM 2

22 0023 O 100 010 000 DIGITO ROM 2

23 0024 O 010 010 000 ACKEYl ROM 1

24 0025 0344 1 110 010 Oil BRN
.25 00,26 O 100 010 000 OPAR ROM 2

26 0027 ■ 1 Oil 101 110 PMS5 W,ZTA

27 0030 O 010 101 000 CXM

28 0031 O 001 010 000 EERA

29 0032 1 111 101 010 DIGIT3 X,APIA

30 0033 1 111 101 010 DIGIT2 Χ,ΑΡΙΑ

31 0034 1 111 101 010 DIGITl Χ,ΑΡΙΑ

32 0035

STEPl

0023 O 001 001 111

BRN

DIGITO

GO TO ROM 4
zum ROM 4 gehen

GO TO ROM 2 TO PROCESS SYNTAX zum ROM 2 gehen, um SYNTAX zu verarbeiten

GO TO ROM 2 TO PROCESS DFCPT zum ROM 2 gehen, um DFCPT zu verarbeiten

GO TO ROM 2 TO PROCESS DIGIT zum ROM 2 gehen, um Ziffer zu verarbeiten

GO TO ROM 1 TO ACCEPT KEYCODE zum ROM 1 gehen, um Tastenkode zu akzeptieren

CONTINUE ROUTINE
Routine fortsetzten

GO TO ROM 2 TO PROCESS OPEN PAR. zum ROM 2 gehen, um offene Klammer zu verarbeiten

CLEAR A-REG
Α-Register löschen

■DATA TO C-REG, FLAG TO M-REG Daten ins C-Register, Kennzeichen ins M-Register

ACCEPT STARTING ADDRESS Startadresse akzeptieren

LOAD DIGIT 3 IN A-REG Ziffer 3 in Α-Register laden

LOAD DIGIT 2 IN A-REG Ziffer 2 in Α-Register laden

LOAD DIGIT 1 IN A-REG Ziffer 1 in Α-Register laden

GO TO DIGIT O ENTRY zum Eingang für Ziffer O gehen

GO

cn co co

CO

	33	003 6	0056	1	010	000	100	PERCENT	SSlO	STORE
	34	0037	0317	0	010	111	Oil		BRN	PLUSl
	35	0040		1	100	111	111	PLUS	BRN
	36	0041		0	110	010	000	FLGEXC	ROM 3
	37	0042		1	111	101	010	DIGIT6	X,APIA
	38	0043		1	111	101	010	DIGITS	X,APIA
»ν D	39	0044	0032	1	111	101	010	DIGIT4	X,APIA	DIGIT3
O J	40	0045		0	001	101	Oil		BRN
D D	41	004 6	0315	1	000	101	110	RECALL	W, BXC	RECALLl
O J	42	0047	0277	1	100	110	111		BRN	MINUSl
	43	0050		ι-	Oil	111	111	MINUS	BRN
	44	0051		0	000	000	000		DUMMY
	45	0052		1	111	101	010	DIGIT9	X,APIA
	46	0053		1	111	101	010	DIGIT8	X,APIA
	47	0054	0042	1	111	101	010	DIGIT7	X,APIA	DIGIT6
	48	0055	0	010	001	Oil		BRN

SET ECHANGE FLAG Austauschkennzeichen' setzen

GO TO STORE ROUTINE

zur Speicherroutine gehen

CONTINUE ROUTINE Routine fortsetzen

GO TO ROM 3 FOR SUBROUTINE zum ROM 3 gehen für Subroutine

LOAD DIGIT 6 IN A-REG Ziffer 6 in Α-Register laden

LOAD DIGIT 5 IN A-REG Ziffer 5 in Α-Register laden

LOAD DIGIT 4 IN A-REG Ziffer 4 in A-Register laden

GO TO DIGIT 3 ENTRY

zum Eingang für Ziffer 3 gehen

SAVE DATA IN B-REG

Daten in B-Register bewahren

CONTINUE ROUTINE Routine fortsetzen

CONTINUE ROUTINE Routine fortsetzen

LOAD DIGIT 9 IN A-REG Ziffer 9 in A-Register laden

LOAD DIGIT 8 IN A-REG Ziffer 8 in Α-Register laden

LOAD DIGIT 7 IN A-REG Ziffer 7 in Α-Register laden

GO TO DIGIT 6 ENTRY

zum Eingang von Ziffer 6 gehen

	49	0056	0062
	50	0057	0063
	51	0060	0064 0065
	52	0061	0066
	Seite 214	0067
	53	0070
	54	0071
409826/	55 56	0072
Ό862	57	0073
	58	0074
	59
	60
	•61
	62
	63

0172

0102

0366

0 010 010 000 STORE

O 000 000 000
O 000 000 000
O 000 000 000

O 111 101 Oil RUN

0 100 001 Oil LAST

1 111 Oil Oil START

Olli O 100 100 111

DUMMY DUMMY DUMMY

BRN BRN

BRN BRN GO TO ROM 1 TO PROCESS STORE zum ROM 1 gehen, um Speicherung zu verarbeiten

1 000 101 110 . CANCEL W,BXC O 111 001 Oil

Olli 0 100 100 111 SHIFT

O 000 000 000

O 110 000 111 RND

1 101 000 111 RESET

O 000 100 000 RESET2 RMGRA

RUNl

LASTl

STARTl

SUPVR2

BRN	CANCELl
BRN ·	SUPVR2
DUMMY
BRN	RNDl
BRN	RESETl

GO TO RUN ROUTINE

zur Ablaufroutine gehen

GO TO LAST ENTRY ROUTINE zur Routine für letzten Eingang gehen

CONTINUE ROUTINE
Routine fortsetzen

RETURN TO SUPERVISOR FROM DIGEX zurück zum überwachungsprogramm von DIGEX

SAVE DATA IN B-REG

Daten in B-Register bewahren

CONTINUE ROUTINE
Routine fortsetzen

ACCEPT SHIFT KEY, NOP Umschalttaste akzeptieren, NOP

CONTINUE ROUTINE
Routine fortsetzen

CONTINUE ROUTINE
Routine fortsetzen

CO CaJ

GO TO ROM GROUP A RESET -ROUTINE .Jrzum ROM Gruppe A gehen, Rou- CO tine zurückstellen

	64	0075
	65	0076
	66	0077
	67	0100
	68	0101
	69	0102
	70	0103
Jf- O CD CO ro OO	71	Ο1Ό4
O. OO	72	0105

0106

0107

0110

Olli

0112

0113

0 000 OOO 000 DUMMY

1 000 101 110 PEINT W,,BXC

O OIO 010 000 BOM 1

O 000 000 000 DGMMY

O 000 110 000

1 IQO 000 001 LASTl . JSB. O 111 Ö00 100, SS?

O ΟΙΟ ΟΟΌ 101 JSB

1 000 1Oi 110 W ,,BXC

O 000 100 OOO RMGRA

O Oil 001 110 ENTERl W,ZTC

1 000 101 110 SUPVRl W,BXC

O 010 101 OOO SUPVR2 CXM

1 100 001 100 SUPVR3 PT12

o 0Oi ioo oio supvr4 p.cmi SAVE DATA IN B-REG

Daten in B-Register bewahren

GO TO ROM 1 PRINT ROUTINE

zum ROM 1 gehen, Routine drucken

RETURN TO CALLING ROUTINE zurück zur rufenden Routine

OPLEV=O? DOES OPLEVEL =0?
ist QP-Niveau = O?

SET FIRST DIGIT ENTRY FLAG Kennzeichen für ersten Zifferneingang setzen

PLGEXC CALL D,S.FLAG REG AND EXCHANGE FLAGS

D,S.-Kennzeichen-Register rufen und Kennzeichen austauschen

RESTORE DATA IN C-REG

Daten in C-Register zurücksteller.

RETURN TO MAIN ROM GROUP zurück zur Haupt-ROM-Gruppe

CLEAR C-REG
C-Register löschen

RESTORE DATA TO C-REG Daten zum C-Register zurückstellen

PREPARE TO TST OP MODE DIGIT Test für OP-Betriebs-Ziffer vorbereiten

SELECT OP MODE DIGIT
OP-Betriebs-Ziffer auswählen

DOES OP MODE = O?
OP-Eetrieb =0?

CD CO CO

0114

0256

■ν, O CO

80	0115	0200
81	0116
82	0117
83	0120	0202
84	0121
85	0122
86	0123 '	0147
87	0124	0125
88	0125	0363
89	0126
90	0127
91	0130
92	0131

1 010 111 011

0 010 101 000

PMSl

0 010 010 000 DISPLAY ROM I

0 000 100 000 IC

1 001 000 000

1 000 000 Oil

0 000 100 000 2C

1 001 000 000

1 000 001 Oil

O 000 100 000 3C

1 001 000 000

O 110 100 001

O 101 010 111

1 111 001 111

RMGRA	IOPWOl
ISl
BRN	•
RMGRA '	IOPWO2 ·
ISl
BRN
RMGRA	. PRESET
' ISl	"3C
JSB	ILLEGALl
BRN
BRN

NO, GO TO PROGRAM MODE SUPERVISOR

nein, zum uberwachungsprograinm für Programmbetrieb gehen

YES, RESTORE DATA IN C-REG ja, Daten in C-Register zurückstellen

GO TO ROM 1 FOR DISPLAY ROUTINE
zum ROM 1, um Routine anzuzeigen

CONTINUE POWER ON "Netz ein" fortsetzen

BEGIN POWER ON "Netz ein" beginnen

GO TO TURN-ON ROUTINE zur Einschaltroutine gehen

CONTINUE POWER ON "Netz ein" fortsetzen

BEGIN POWER ON "Netz ein" beginnen

GO TO TURN-ON ROUTINE zur Einschaltroutine gehen

CONTINUE POWER ON "Netz ein" fortsetzen

BEGINN POWER ON "Netz ein" beginnen

PRESET FLAG
Kennzeichen vorsetzen

CONTINUE POWER ON "Netz ein" fortsetzen

CJ

cd co co

-P-CO

ILLEGAL KEY CODE OR S.A. unerlaubten Tastenkode oder S.A.

	93	0132
	94	0133
	95	0134
	96	0135
	97	0136
	98	0137
D O	99 100	0140 0141
"•Ν O η ο	101	0142
	102	0143
	103	0144
	104	0145
	105	0146
	106	0147
	107	0150

1 110 111 001 MMSl JSB KEYUP

0 101 000 000 MMS2 IS2

0 100 100 000 RBL

1 001 000 000 ISl

0237, 1 001 111 111 BRN MMS6

0 000 000 000 DUMMY

1 111 001 111 BRN ILLEGALl

0 010 101 000 RNDl CXM

1 000 001 100 , ΡΤ8

0 000 Oil 000 LDCO

O 000 Oil 000 LDCO

O 100 101 Oil BRN SUPVR3

0 000 000 000 DUMMY ■ O 000 000 000 DUMMY

1 Oil 010 100 PRESET YSIl

WAIT FOR OLD KEY UP CONDITION auf alte Bedingung "Taste oben" warten

PREPARE TO TURN BUSY LIGHT OPF Abschaltung des Betriebsanzeigelichtes vorbereiten

TURN BUSY LIGHT OFF
Betriebsanzeigelicht abschalten

WAIT FOR KEY DOWN
warten, bis Taste' unten

CONTINUE SUPERVISOR überwachungsprograiran fortsetzen

ILLEGAL KEY'CODE OR S.A. unerlaubter Tastenkode oder S.A.

PREPARE TO CLEAR FLAGS Löschen der Kennzeichen vorbereiten

SET POINTER TO FIRST FLAG Hinweismarke auf erstes Kennzeichen setzen

CLEAR CR/LF FLAG
CR/LF-Kennzeichen löschen

CLEAR TAB FLAG
Tabellenkennzeichen löschen

RETURN TO SUPERVISOR" zurück zum überwachungsprograinm

NORMAL CALL?
normaler Ruf?

	108	0151	0160 0161
	109	0152	0162
	110	0153	0163
	111	0154	0164
	112	0155	0165
409826^	Seite 215 113 0156 114 0157	0166
Ό862	115 116
	117
	118
	119
	120
	121

0153

0214

110 101 111

000 110 Oil

O Oil 001 110 PRESETl W,,2.TC

O. 010 001 100

O 010 Oil 000

001 001 100

O 010 Oil 000

O 010 101 000

O 010 000 111

O Oil 001 HO CANCELl W,ZTC,

O 111 110 000

100 101 000

O 001 100 110

O 111 100 Oil

M, CMl

MIESETl

SCODE

FLGEXC

•NO,, POWER ON
nein_;, Netz ein

¹YES₁, CONTINUE
ja_:, fortsetzen

CLEAR C-REG
C-Registerlöschen

SET POINTER TO RND
Hinweisinarke auf RND setzen

SET RND TO 2
RND auf .2 setzen

SET POINTER TO SELECT.CODE Hinweismarke auf Auswahlkode setzen

SET SELECT CODE TO 2 Auswahlkode auf 2 setzen

STORE FLAG
Kennzeichen speichern

STORE FLAG IN DATA STORAGE Kennzeichen in Datenspeicherung speichern

CLEAR C-REG
C-Register löschen

CLEAR T-REG .

T-Register löschen ^

CANCEL2

CHECK STACK CONTENTS Stapelinhalt prüfen

REAL DATA?
reelle Daten?

YES, RESTORE DATA

ja, Daten zurückstellen

CJ cn

CO CO

co

0167

0170

0171

0172

0 Oil 001 110

W, ZTC

	126	0173
O co 00	127 128	0174 0175
O	129	0176
co
EsJ	130	0177
	131	0200
	132	0201
	133	0202
	134	0203
	135	0204

0355

0271

0147

0 100 101 000 CANCEL2 CTS

0 100 Oil 111

0 010 101 000 RUNl

1 100 001 100

0 001 Oil 000

1 010 100 000

1 110 111 001 RUN2

1 Oil 100 111

0 100 111 111

0 101 001 Oil

BRN CXM

PT12 LDCl SBL JSB

O 110 100 001 I0PW.01 JSB

O 110 100 001 I0PW02 JSB

O 110 100 100 INITIAL RS6 NO, CLEAR DATA ENTERED

nein, eingegebene Daten löschen

RESTORE STACK
Stapel zurückstellen

ENTERl RETURN TO SUPERVISOR

zurück zum Überwachungsprogramm

FLAG TO C-REG FOR UPDATE Kennzeichen ins C-Register, um es auf den neuesten Stand zu bringen

SELECT OP MODE DIGIT OP-Betriebs-Ziffer auswählen

SET OP MODE TO 1
OP-Betrieb auf 1 setzen

SET BUSY LIGHT
Betriebsanzeigelicht setzen

KEYUP WAIT FOR KEYUP CONDITION vor dem Fortschreiten auf Bedingung "Taste oben" warten

MPS2 GO TO INC. AND READ ROUTINE

zur Erhöhungs- und Leseroutine gehen

PRESET PRESET FLAG

Kennzeichen vorsetzen

IC CONTINUE POWER ON

"Netz ein" fortsetzen

PRESET PRESET FLAG

Kennzeichen vorsetzen

2C CONTINUE POWER ON

"Netz ein" fortsetzen

RESET STATUS BIT 6
Zustandsbit 6 zurücksetzen

Ol OO CO ■ΓΟΟ

0205

0206

0207

0210

3 O O	141 142	0212 0213
O D O J	143 144 145	0214 0215 0216
	146	0217
	147	0220
	148	0221
	149	0222
	150	0223

1 000 100 100

1 010 100 100

1 Oil 100 100

RS

RSlO

0 111 100 100 INITIALl RS7 0211 0040 0 010 000 101 ENTER JSB

0 100 Oil 111

O 111 001 Oil

O 111 101 110

1 100 001 100

1 110 Oil 000

1 001 110 000

1 001 0Ö1 100

1 Oil 111 000

O Oil 001 110 SCODE W,ZTC

W,CPlC PT12 LDC14 ATDS PT

1 001 001 110 SHIFTSC W,SRC RESET STATUS BIT 8
Zustandsbit 8 zurücksetzen

RESET STATUS BIT 10
Zustandsbit 10 zurücksetzen

RESET STATUS BIT 11
Zustandsbit 11 zurücksetzen

RESET STATUS BIT 7
Zustandsbit 7 zurücksetzen

FLGEXC CALL D.S. FLAG REG AND EXCHANGE FLAGS

■ D.S.-Kennzeichen-Register rufen und Kennzeichen austauschen

ENTERl CONTINUE ROUTINE

Routine fortsetzen

CANCELl CONTINUE

fortsetzen

PREPARE TO CALL D.S.
D.S.-Ruf vorbereiten

BEGIN LOADING ADDRESS
Laden der Adresse beginnen

SET POINTER
* Hinweismarke setzen

LOAD ADDRESS
Adresse laden

ENABLE REGISTER
Register freigeben

SET POINTER TO SELECT CODE DIGIT Hinweisitiarke setzen, um Kodeziffer auszuwählen

RECALL FLAG
Kennzeichen zurückrufen

SHIFT SELECT CODE TO PROPER POSITION

Auswahlkode auf richtige Position verschieben

	151	0224
	152	0225
	153	0226
	154	0227
	155	0230
	156	0231
O
co
00	157	0232
ro
CD	158	0233
O
00 . co	159	0234
ro
	160	0235
	161	0236
	162	0237
	163	0240
	164	.0241
	165	0242

0 000 Oil 100 PRS

0 000 101 100 YPO

1 001 001 111 BRN SHIPTSC

0 101 000 010 P,AMCC

0 001 100 010- P₁CMl

1 100 010 011 BRN RET

1 001 100 100 RS9 0 100 100 100 RS4 0 101 100 100' RS5

" 1 000 010 Oil BRN ■ , INITIAL

0 000 000 000 ' DUMMY 0 000 010 100 MMS6 YSO

1 001 111 111 BRN MMS6

0 000 100 100 RSO

0 000 001 100 PTO

SHIFT POINTER
Hinweismarke verschieben

IS SHIFT DONE?
Verschiebung fertig?

NO, CONTINUE SHIFT

nein, Verschiebung fortsetzen

YES, PREPARE SELECT CODE TEST ja, Test für Auswahlkode vorbereiten

IS THIS THE RIGHT SELECT CODE? ist dies der rechte Auswahlkode?

NO, EXIT FROM THIS CHANNEL nein, aus diesem Kanal herausgehen

YES, RESET STATUS BIT 9 ja, Zustandsbit 9 zurücksetzen

RESET STATUS BIT 4
Zustandsbit 4 zurücksetzen

RESET STATUS BIT 5
Zustandsbit 5 zurücksetzen

CONTINUE
fortsetzen

IS NEW KEY DOWN?

ist neue Taste unte.n?

NO, WAIT FOR NEW KEY

nein, auf neue Taste warten

YES, WAIT FOR BOUNCE TO SETTLE ja, warten bis"Kontaktprellen abgeklungen ist

BEGIN DELAY ROUTINE
Verzögerungsroutine beginnen

	166	0243
	167	0244
	168	0245
	169	0246
	170	0247
409826	171 172	0250 0251
ο *	Seite	216
co OD	173	0252
	174	0253
	175	0254
	176	0255
	177	0256
	178	0257

0 000 111 100 MMS4

0 Oil 101 100

1 010 001 111

1 100 100 000

1.000 101 000 MMS5

000 101 110

1 Oil 101 110

1 Oil 010 100

O 000 111 111

1 Oil 100 100

O 001 010 Oil

O 101 100 100 PMSl

O 000 010 100

PLS YP3 BRN YFKB

DSOF W,ZTB W ,ZTA

MMS 4

YSIl	ACKEYO
BRN
RSIl	ACKEYl
BRN
RS 5
YSO

COUNTDOWN LOOP
Schleife runterzählen

IS COUNTDOWN COMPLETE? ist Herunterzählung vollständig?

NO, CONTINUE TO WAIT FOR 3 MSEC, nein, 3 weitere ms warten

WAS IT FUNCTION BLK KEY? war es Funktionsausblendungstaste?

TURN DISPLAY OFF
Anzeige ausschalten

CLEAR B-REG
B-Register löschen

CLEAR A-REG
A-Register löschen

TEST FUNCTION BLOCK FLAG Funktionsblock-Kennzeichen testen

NO, MAIN UNIT KEY

nein, Haupteinheitstaste

YES, RESET FLAG

ja, Kennzeichen zurücksetzen

GO TO ROM 1 TO ACCEPT KEY zum ROM 1 gehen, um Taste zu akzeptieren

RESET STATUS BIT 5
Zustandsbit 5 zurücksetzen

IS A KEY DOWN ? (STOP PROGRAM) ist Taste unten? (Prograjnm anhalten)

co cn ω co

179	0260	0271
180	0261
181	0262
182	0263
183	0264
184	0265 ·
185	0266	0112
186	0267	0363
187	0270	0363
188	0271
189	0272

0273

0274

0275 0276

0305

192 193

1 Oil 100 111 BRN PMS2

0 000 100 100 RSO

0 010 101 000 CXM

0 010 101 000 PSTOP CXM

1 100 001 100 PTl2

0 Oil 000 010 P,ZTC

0 100 101 101 JSB SUPVR4

1 111 001

1 111 001

0 111 000 000 PMS2

1 000 100

0 110 Oil 110 . S,CTA

1 100 010 111 BRN PMS4

0 000· 000 000 DUMMY

0 010 010 000 POCTFLG ROM

BRN	ILLEGALl
BRN	ILLEGALl
PINC
READ

NO, CONTINUE ROUTINE . nein, Routine fortsetzen

YES, RESET STATUS BIT ja, Zustandsbit zurücksetzen

RESTORE DATA

Daten zurückstellen

BEGIN MAN. AND PROG. STOP anhalten für "manuell" und Programm beginnen

SELECT OP MODE DIGIT OP-Betriebs-Ziffer auswählen

SET OP MODE TO O (MANUAL) ,OP-Betrieb auf O setzen (manuell)

GO TO SUPERVISOR

zum Überwachungsprogramm gehen

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A.

INCREMENT PROGRAM COUNTER· Programmzähler erhöhen

READ NEXT PROGRAM INSTRUCTION nächste Programminstruktion lesen

LOAD OP LEVEL IN A-REG FOR TEST OP-Niveau in Α-Register für laden

CONTINUE ROUTINE
Routine fortsetzen

GO TO ROM 1
zum ROM 1 gehen

0277

195	0300	0021
196	0301
197	Ό3Ο2
198	0303
199	0304
200	■ 0305	0320
201	0306	0276
202.	0307
203	0310
204	0311
205	0312
206	0313

0314

0341

0 100 010 000 MINUSl ROM

1 000 101 110 OPLEV=O? W,BXC 1 010 101 000 MTC

O 001 111 110 S,CMl

O 001 000 111 BRN SYNTAX

0 000 110 000 RET RETURN

1 101 111 110 PMS4 S,AMlA 1 101 111 110 S,AMlA 1 101 111 110 S,AMlA

1 101 000 Oil BRN PMS3

1 Oil 111 Oil BRN POCTFLG

0 000 000 000 DUMMY

1 001 000 100 MULI SS9

1 110 000 111 BRN MUL2

GO TO ROM 2 TO CONTINUE HSPACEB zum ROM 2 gehen, um HSPACEB fortzusetzen

SAVE DATA IN B-REG

Daten in B-Register bewahren

RECALL TFLAG FOR OP LEVEL TEST TFLAG für OP-Niveau-Test zurückrufen

DOES OP LEVEL=O?
ist OP-Niveau = O?

NO, GO TO SYNTAX ERROR ROUTINE nein, zur SYNTAX-Fehler-Routine gehen

YES, RETURN TO CALLING ROUTINE ja, zurück zur rufenden Routine

DOES OP LEVEL = O?
OP-Niveau =0?

DOES OP LEVEL =1?
OP-Niveau =1?

DOES OP LEVEL =2?
OP-Niveau =2?

NO, CONTINUE TEST
nein, Test fortsetzen

YES, GO AND PROCESS OCTAL DATA ja, gehen und Oktal-Daten verarbeiten

SET STATUS BIT FOR FAST SPACE Zustandsbit für schnellen Abstand setzen

CONTINUE ROUTINE
Routine fortsetzen

ro co co

-JO-CO

0315

	209	0316
	210	0317
	211	0320
	212	0321
409826	213 214	0322 0323
/0862	215	0324
	216	0325

032

0 010 010 000 RECALLl ROM

0 000 000 000 DUMMY

1 110 010 000 PLUSl ROM

O 110 010 000 PMS3

O Oil Oil 110

O 010 101 000

O 100 000 100

1 Oil 001 100 0327 0074 O Oil 110 Oil

O 010 101 000 RESETl CXM

0330

O 000 000 000

S, ZTC

CXM JSB

SS4 PTIl

BRN DUMMY

FLGEXC

RESET2

GO TO ROM 1 TO FINISH RECALL ROUTINE

zum ROM 1, um Rückrufroutine zu beenden

GO TO ROM 7 TO TEST OP LEVEL ^a zum ROM 7 gehen, um OP-Niveau zu testen

GO TO ROM 3 TO CONTINUE TEST zum ROM 3 gehen, um Test fortzusetzen

RECALL TFLAG
T-Kennzeichen zurückrufen

CLEAR OP LEVEL .
OP-Niveau löschen

STORE NEW OP LEVEL neues OP-Niveau speichern

CALL D.S. FLAG REG AND EXCHANGE FLAGS

D.S.-Kennzeichen-Register rufen und Kennzeichen austauschen

SET STATUS BIT FOR RMGRA CLEAR ROUTINE

Zustandsbit für RMGRA-Lösch-Routine setzen

SET POINTER FOR ROMGRA CLEAR ROUTINE T

Hinweismarke für ROMGRA-Lösch- < routine setzen

CONTINUE ROUTINE
Routine fortsetzen

CO CO

-ρου

	220	0331
	221	0332
	222	0333
	223	0334
	224	0335
	225	0336
O	226	0337
co CX) N)	227	0340
σ>	228	0341
ο 00 '	229	0342
	. 230	0343
	231	0344
	.232	0345

0363

0363

0363

0363

0363

0363

0363

.0176

1 111 001 111 1 111 001 111 1 111 001 111 1 111 001 111 1 111 001 111 1 111 001 111 1 111 001 111

0 000 000 000

0 100 010 000 MÜL2

0 000 000 000 0 000 000 000 0 010 101 000 STEPl

0 111 111 Oil

BRN	ILLEGALl
BRN	ILLEGALl
BRN	ILLEGALl
BRN	ILLEGALl
BRN	ILLEGALl
BRN	ILLEGALl
BRN	ILLEGALl
DUMMY
ROM 2
DUMMY
DUMMY
CXM ·

STEP

BRN

RUN 2

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A.

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A.

ILLEGAL KEY CODE.OR S.A. unerlaubter Tastenkode oder S.A.

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A.

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A.

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A,

ILLEGAL KEY CODE OR S.A. unerlaubter Tastenkode oder S.A.

GO TO ROM 2 TO CONTINUE HSPACEF zum ROM 2 gehen, um HSPACEF fortzusetzen

PREPARE DATA FOR OP LEVEL TEST Daten für OP-Niveau-Test vorbereiten

WAIT FOR KEYUP
warten, bis Taste oben

CO CO CO CO

	Seite	217	0304
	233	0346
	234	0347
	235	0350
	236	0351	0356
	237	0352	0363
	238	0353
	,239	0354
	' 240	0355
	,241	0356
4P».	242	0357
ο
OO K)	243	0360
CD •ta.
Ό862	244	0361
	245	0362
	246	0363
	247	0364
	248	0365
	249	0366

0	000	000	000
0	000	000	000
0	000	000	000
0	000	000	000
0	000	000	000
0	000	000	000
0	000	000	000
0	000	000	000
0	000	010	100

100 010 Oil

O 000 100 100

110 111 Oil

111 001 111

KEYUP

DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY YSO

BRN
RSO

000 101 110 ILLEGALl W,BXC

: rom2

O 000 000 000 DUMMY

O 010 101 000 STARTl CXM

RET

KEYUP ILLEGALl

IS KEY DOWN?
Taste unten?

NO, RETURN TO CALLING ROUTINE nein, zurück zur rufenden Routine

YES, RESET STATUS BIT AND CHECK KEY DOWN AGAIN ja, Zustandsbit zurücksetzen und wieder prüfen, ob Taste unten

CHECK KEY STATUS
Tastenzustand prüfen

ILLEGAL KEY CODE OR S.A. Unerlaubter Tastenkode oder S.A.

, SAVE DATA IN B-REG Daten in B-Register bewahren

GO TO ROM 2 TO PRINT MESSAGE zu ROM 2 gehen, um Nachricht zu drucken

PREPARE TO MODIFY SELECT CODE Modifizierung des Auswahlkode·⁰ vorbereiten

0367

0370

0371

0372

0373

0373

	255	0374	0363
O co
00
ro
CD	256	0375	0363
O
co	257	0376	0363
CD ISJ	258	0377	0015

1 001 001 100

0 111 100 010

1 111 101 111

0 111 100 010

P,CPlC

P_fCPlC

0 010 101 000 PRINTSC CXM

1 111 001 111

1 111 001 111

1 111 001 111

0 000 110 111 NOMEMORY BRN SET POINTER TO SELECT CODE DIGIT

Hinweismarke auf Auswahlkodeziffer setzen

INCREMENT SELECT CODE ' , Auswahlkode erhöhen

PRINTSC IP NO CARRY PRINT SELECT CODE wenn kein Übertrag, Auswahlkode drucken·

CARRY I INCREMENT ONCE MORE Übertrag1 nocheinmal erhöhen

RESTORE DATA

Daten, zurückstellen

ILLEGALl ILLEGAL KEY CODE OR S.A. (PCTN BLK KEY)

unerlaubter Tastenkode oder S.A. (Punktionsblock-Taste)

ILLEGALl ' ILLEGAL KEY CODE OR S.A.

unerlaubter Tastenkode oder S.A.

ILLEGALl ILLEGAL KEY CODE OR S.A.

unerlaubter Tastenkode oder S.A.

XMEM TRIED TO STEP OR RUN W/NO MEMOR* _r GO TO ERROR

es ist versucht worden zu springen oder W/NO-Speicher ablaufen zu lassen

TYPEWRITER INTERFACE LISTING (ROM 1) Schreibmaschinenanschluß (ROMl)

Zeilen läufende Nr. Adresse

0000

	4	0001
	5	0002
4P*	6	0003
O
CO
00
PO ,
σ> -
■*-·« . - O	7	0004
OO
CD	8 -	0005

10

0006

0007

Abzweig-Adresse

0357

0001

0011

Betriebs-Kode Bit-Muster

1 010 100 000

0 000 010 100

1 110 111 111

0 000 100 100

S8L

YSO

SET BUSY LIGHT

Betriebsanzeige—licht setzen

IS KEY STILL DOWN? ·

Ist Taste immer noch unten?

BRN LISTl NO, CONTINUE ROUTINE

Nein, Routine fortsetzen

RSO

0 000 000 111

0 101 110 010 SMl

0 000 100 111

0 110 010 000 FTS

BRN LISTK

WP,CMCl

BRN SMIF

ROM 3

YES, RESET STATUS BIT AND TEST KEY DOWN AGAIN Ja, Statusbit zurücksetzen · und nochmal prüfen, ob Taste unten.

TEST FOR KEY DOWN Prüfen, ob Taste unten

SUBTRACT I FROM SPACES

WAS SPACE = O?

1 von Abständen subtrahieren

Waren Abstände =0?

NO RETURN TO CALLING PROGRAM

Nein, zurück zum rufenden Programm

YES, GO TO ROM 3 FOR FIELD TOO SMALL ROUTINE Ja, zum ROM 3 gehen für Routine "Feld zu klein"

OO CO CO CO 4> CO

0010 0011

0373

1 111 101 111

BRN

XKEYl

0 000 110 000 SMIF RETURN

	13	0012	0373	1	111 101	111	BRN	XKEYl
	14	0013	0373	1	111 101	111	BRN	XKEYl
	15	0014	0373	1	111 101	111	BftK	XKEYl
	16	0015		0	000 000	000	DUMMY
.»Ν	17'	0016	0373	1	111 101	111	BRN	XKEYl
CD
OO Ν>	18	0017		0	1100010	000	POCTFLG 2' R0M3
CD
O
00	19	0020	0373	1	111 101	111	BRN	XKEYl
Κ>					•
	20	0021		0	100 010	000	SYNTAX ROM 2

INVALID KEYCODE Ungültige Tastenkode

RETURN TO CALLING

ROUTINE

zurück zur rufenden

Routine

INVALID KEYCODE Ungültige Tastenkode

INVALID KEYCODE Ungültige Tastenkode

INVALID KEYCODE Ungültige Tastenkode

IKVALID KEYCODE· Ungültiger Tastenkode

GO TO ROM = TO TEST FOR CODE "377" Zum ROM 3 gehen, um Code "377" zu testen.

INVALID KEYCODE Ungültige Tastenkode

GO TO ROM 2 TO PRECESS

SYNTAX

Zum ROM 2 gehen, um

SYNTAX zu verarbeiten.

21	0022	+373
22	0023	0373
23	0024

1 111 101 111

1 111 101 111

BRN

BRN

0 000 010 000 STEPl ROM 0

XKEYl

XKEYl

INVALID KEYCODE Ungültige Tastenkode

INVALID KEYCODE Ungültige Tastenkode

GO TO ROM ofco PROCESS

STEP

Zum ROM 0 gehen, um

Schritt zu verarbeiten.

CO CO CO ■£> CO

26 27

28 29 30 31 32

33

34 35 36 37

0025

0 Oil 010

0026	0373	1	111	101	111
0027		0	000	000	000
003o	0373	1	111	101	111
0031		0	000	000	000
0032	0373	1	111	101	111
0033	0373	1	111	101	111
0034	0373	1	111	101	111
0035		0	000	000	000
0036		1	000	101	110 LIST

0037 0000 0 000 000 Oil

0040 0041 0042

XKEYl

BRN XKEYl

BRN XKEYl

BRN XKEYl BrN XKEYl

DUMMY W,BXC

BRN LISTM

1 000 010 000 RECALLD R0M4

0 101 101 010 MASK3 X,CMlC

1 000 101 110 W,BXC

ACCEPT FUNCTION BLOCK KEY-CODE

Tastenkode für Funktionsblack akzeptieren

INVALID KEYCODE Ungültige Tastenkode

INVALID KEYCODE Ungültige Tastenkode

INVALID KEYCODE Ungültige Tastenkode

INVALID KEYCODE Ungültige .Tastenkode

INVALID KEYCODE Ungültige Tastenkode

SAVE DATA IN B-REG Daten in B Register verwahren

CONTINUE ROUTINE Routine fortsetzen

GO TO ROM 4 TO CONTINUE ROUTINE

Zum ROM 4 gehen _f um Routine fortzusetzen

BLANK EXPONENTPART OF WORD. 4>*

Exponententeil des Wortes ausblenden.

DATA BACK TO C-REG, MASK TO E-REG. Daten zurück ins C-Reg. Maske ins B-Hegister

38

0043

0 110 010 100

YS6

39

40

46
47

oo44 0073

0045

	41	0046	0075
ο CD 00 ro co	42 43	0047 • 0050
Ό862	44 '	0051
	45	0052

0075
0054

0 Oil 101 111

0 000 101 010

0 110 111 Οίο

0 Oil 110 111

0 001 001 100 COMPL

0 010 110 010

1 110 110 ΟΙΟ

O Oil 110 111

O Oil Oil 110 DSHIFT2

BRN EXITl X, ZTB

XS,ZMC BRN EXIT PTI

WP₁ZMCC WP/AXC

BRN EXIT S, ZTC

IS DATA IN SCIENTIFIC NOTATION?

Sind Daten "Wissenschaftlicher Notierung"

NO, PREPARE TO EXIT Nein, zum Ausgang vor~ bereiten.

YES, UNBLANK EXPONENT MASK

Ja, Exponentenmaske nicht ausblenden

IS EXPONENT POSITIVE? Ist Exponent positiv?

YES, PREPARE TO EXIT Ja, für Ausgang vorbereiten

NO, SET POINTER FOR EXPONENT COMPLEMENT
Nein, Hinweismarke für Exponent-Komplementierung setzen

COMPLEMENT EXPONENT Exponent komplementieren

ORIGINAL EXPONENT TO C-REG., COMPL. TO A-REGi Ursprüngliche Exponent ins C-Register, kompelementierte Exponent ins A-Register

PREPARE EXIT

Für Ausgabe vorbereiten

SET SIGN TO ZERO BEFORE SHIFT

Vorzeichen vor Verschiebung auf O setzen.

NJ CO

CO CO

co co

■"^ CD OO CD

48 49

50 51

54

0055 0056

0057 0060

0222

0063

55	0064
56	0065
57	0066

1 001 001 .110

1 001 OQl

1 000 101

1010 101

52	0061	0324	0	101	111	110
53	0062	1	101	010	Oil

STORE

1 101 001

0 101 Oil

0 000 000

0 010 101 000 DSRET

W,SRC SHIFT ONCE

einmal verschieben

JSB DSHIFTl CHECK IF SHIFT IS

COMPLETE

Prüfen, ob Verschiebung vollständig

W,BXC SAVE C-REG IN B-REG

C-Register in B-Register bewahren

MTC RECALL TFLAG FOR OP

LEVEL TEST

T-Flag fürOP-Niveau-, Test zurückrufen

S,CMlC DOES OP-LEVEL » O?

OP-Niveau = O?

BRN NO, CONTINUE TO TEST

OP-LEVEL

Nein, OP-Niveau-i-Test

fortsetzen

PTl3 YES, PREPARE TO UPDATE

OP -LEVEL

Ja, Aktuali—sierung des OP-Niveaus vorbereiten

LDC5 SET OP-LEVEL TO FIVE

OP-NIveau auf fünf setzen

NOP SOFTWARE DELAY

•Software-Verzögerung

CXM STORE NEW FLAG IN M-REG

NeuesKennseichen in M-Register speichern

CD Co U)

58	0067
59	0070
60	0071
61	oo72
62	0073

63

68

69

0074

0101

0102

0 Oil 001 110

1 010 010 000

0 000 000 000 0 000 000 000 0 110 001 010 EXITl

0 110 Oil 110

09826,	64	0075	0126	1	000 010 10
/0862	65	0076	.0132	0	101011 Oil
	66	0077		0	101 101 01
	67	0100	1	000 000 10

1 01Ό.101 000

0 101 111 110

W, ZTC ROM 5

DUMMY DUMMY X ,CTA

S, CTA

YS8

BRN

BRN
ss8

MTC
S ,CMIC

MANEX

PRINT12

CLEAR C-REGl
C-Register löschen

GO TO SUPERVISOR Zum Überwachungsprogramm gehen

STORE EXPONENT'IN A-REG FOR PRINT ROUTINE Exponent in A-Register für Druckroutine speichern

LOAD .SIGN OF DATA IN

DISPLAY

Vorzeichen der Daten in

der Anzeige laden

DID PRINT ROUTINE CALL? Rief die Druckroutine?

NO, GO TO SUPERVISOR (IN ROM O)

Nein, zum Überwachungsprogramm (in ROM O)

YES, CONTINUE ROUTINE Ja, Routine fortsetzen

SET PRINT ROUTINEFLAG Druckroutinen-'-Zeichen setzen

RECALL TFLAG FOR OP LEVEL TEST

T-Kennzei'chen für OP-Niveau-Test zurückrufen

CO CO CO W

DOES OP-LEVEL ■ 0P~N±veau « O?

O?

70
71

80

81

0103

0104

	72	0105
	73	0106
	:74	0107
O	75	0110
co 00	76	Olli
co	77	0112
980
!SO	78	0113
	79	0114

0115

0116

0 010 000 Oil

0 111 010 111

0 101 000 000 SHIFT

0 100 001 000

0 100 001 000

0 100 001 000

0 100 001 000

1 001 000 000

0 000 Oil 100

O 000 101 100

O 100 010 111

O 110 010 000 BRN RECALLD BRN ADJDATA

IS2 SLT SLT SLT SLT ISl

NO, CONTINUE TEST Nein, Test fortsetzen

YES, GO TO ADJUST DATA

ROUTINE

Ja, zur Routine für Daten-

justion gehen

SHIFT ROUTINE Routine verschieben

SHIFT Verschieben

SHIFT verschieben

SHIFT verschieben

SHIFT ' verschieben -

PREPARE TO TEST IE SHIFT IS COMPLETE Test auf vollständige Verschiebung vorbereiten

PRS	SHIFT	SHIFT POINTER Hinweismarke verschieben
YPO		IS SHIFT COMPLETE? Ist Verschiebung voll-·
	ständig?
BRN	NO, CONTINUE SHIFT Nein, Verschiebung fort setzen.
ROM 3	YES, CONTINUE STORE ROUTINE Ja, Speicherroutine fort setzen.

82

83

84

91

92

0117

0120

0344

	85	0122	0164
	86	0123	0362
i09826	87	0124	0164
/0862	88	0125
	89	0126
	90	0127

0130

0131

1 000 101 110 DISPLAY!

1 010 101 000

1 110 01 0 Oil

1 00 1 111 010 PRINT6

0 111 010 Oil

1 111 001 101

0 111 010 Oil

0 000 101 000 MANEX

0 101 100 100

0 110 100 100

0 000 010 000 DISFIN2

W, BXC

MTC

BRN DATA?

XS,AMI

BRN SPOUT

JSB SMEXP

BRN SPOUT

RS 6
ROM 0

SAVE DATA IN B-REG Daten in B-Register bewahren

PREPARE FOR OP-LEVEL

TEST

Op-Niveau-Test vorbereiten

TEST FOR DATA TO BE

DISPLAYED

Auf anzuzeigende Daten

prüfen

IS EXPONENT POSITIVE? Exponent positiv?

NO, PREPARE TO OUTPUT SPACES

Nein, Ausgabe von Abstände vorbereiten

YES, SUBTRACT EXPONENT FROM SPACES
Ja, Exponenten von Abständen subtrahieren

GO TO SPOUT ROUTINE Zu SPOUT-Routine gehen

TURN ON DISPLAY Anzeige aschalten

RESET STATUS BIT 5 ^, Zustandsbit 5 zurücksetzen.

RESET STATUS BIT6 Zustandsbit 6 zurücksetzen.

CO CJ)

GO TO ROM O AND PROCEED IN SUPERVISOR Zum ROM O gehen und in überwachungsprogramm fortschreiten

93

94

95

96

97

98

99

100

101

10 2

0132

Ο133

0134

0135

0136 0141

/137

0140

0141 0004

0142

0143 0367

0 100 101 000

1 010 101 000

0 001 001 100

PRINTl2

CTS

MTC

PTl

0 001 110 010 0 110 000 111

0 010 011 000

0 001 001 100

0 000 010 101 FNZ

0 001 111 010

1 111 011 111

WP, CMl.

BRN FNZ

JSB SMl

XS,CMl

BRN PRINT9

STORE DATA IN STACK Daten im Stapel speichern

RECALL TFLAG FOR FIELD WIDTH

T-Kennzeichen für Feldbreite zurückrufen

SET POINTER FOR SPACE ADJUSTMENT
Hinweismarke für Abstandseinstellung setzen

IS WIDTH = O?
Ist Breite = O?

NO, FIELD IS NOT ZERO, CONTINUE ROUTINE Nein, Feld ist = Q, Routine fortsetzen

YES, SET FIELD WIDTH

TO 20

Ja, Feldbreite auf 20

setzen

RESET POINTER
Hinweismarke zurücksetzen

DECREMENT SPACES BY ONE FOR MSD

Abstände für MSD um eins tsj erniedrigen CO

IS D = O? ⁰^

• Ist D=O?

NO, ADJUST SPACES FOR DNOT EQUAL TO O
Nein, Abstände für D nicht gleich Ο justieren

0144

014 5 0303

0146

0332

	106	0147
σ OO OO	107	Ol 50
co O co .	108	0151

0362

0152

0153 0164

0154

1 001 111 110 PRINT2

1 100 001 111

0 101 010 100 . PRINT3

1 101 101 Oil

0 000 100 110

1 111 001 101 1 001 100 010

0 111 010 Oil

1 100 001 100

S,AMI

BRN PRINT8
YS5

BRN PRINT7
M, ZTB

JSB SMEXP

P, AMI

BRN SPOUT

YES., CONTINUE ROUTINE, IS MANTISSA POSITIVE? Ja, Routine fortsetzen, Mantisse positiv?

NO, ADJUST SPACES FOR MINUS SIGN

Nein, Abstände für Minus-Vorzeichen justieren YES, CONTINUE ROUTINE DID DATA FIT?
Ja, Routine fortsetzen, paßten. Daten?

YES, CONTINUE ROUTINE Ja, Rout_.ine fortsetzen

NO, CLEAR DECIMAL POINT

MASK

Nein, Deziitialpunkt-Maske

löschen

SUBTRACT EXPONENT FROM

SPACES

Exponent von Abständen

subtrahieren

IS MOST SIGNIFICANT DIGIT OF EXPONENT =0? Ist wesentliche Ziffer des Exponenten = O?

NO, GO TO OUTPUT SPACE ·

ROUTINE

Nein, zur Routine für

Abstandsausgabe gehen

YES, PREPARE TO LOCATE DECIMAL POINT
Ja, Lokalisierung des Dezimalpunktes vorbereiten...

CO CD CO OO -P-CO

0155

0156 0263

0157

0160

9826,	116	0161
'086	117	0162
	118	0163

119

120

0164

0165

1 101 101 010 DPADJl 1 Oil 001 111

0 111 100 010

1 000 100 010

1 Oil 101 Olo

0 000 101 010 0 001 001 100

0 110 010 000 SPOUT 0 Oil 001 100 ADJATA

X,AMIA

BRN DPADJ2

P,CPlC

P, BXC

X, ZTA

X ,ZTB
PTl

ROM 3
PT3

■DECREMENT EXPONENT, IS ADJUSTMENT COMPLETE? Exponent erniedrigen, ist Justierung vollständig?

NO, ADJUST DECIMAL POINT co LOCATION cn

Nein, Dezimalpunktstellung co justieren , co

YES, LOAD DECIMAL POINT CODE (I WILL WORK) Ja, Dezimalpunkt-Kode laden (1 funktioniert)

LOAD DECIMAL POINT CODE IN MASK REGISTER Dezimalpunktkode in Maskenregister laden

CLEAR EXPONENT IN DATA Exponent . in Daten löschen

CLEAR MASK IN B-REG!

Maske in B-Register löschen

INITIALIZE POINTER FOR SPOUT ROUTINE
Hinweismarke für SPOUT-Routine initialisieren

GO TO ROM 3 TO FINISH PRINT

ROUTINE

Zu R0M3 gehen um Druckroutine

zu beenden

SET POINTER FOR SCIENTIFIC NOTATION TEST
Hinweismarke für Testauf "Wissenschaftliche Notierungen" setzen.

121 122

123

124

125 126 127 128 129

0166 0167 0246

0170

0171

0172 0173 0174 0242 0174 0176

0 001 100

1 010 Oil Oil

1 100 101

O 100 101

O 010 010 110 ADJDATAl

O 101 111 010 EXPADJl

1 010 001 Oil

O Oil 001 010 FPl

O 001 001

P, CMl

BRN SCINOT

W ,AXB

W,ATB
MS,BTC

XS,CMlC
BRN EXPADJ2
X,ZTC
PTI

IS FIXED POINT SPEC-fied? * ■■■'■'■■■

Ist Festpunkt (Festkomma) spezifiziert?

NO, GO TO SCIENTIFIC NOTATION ROUTINE
Nein, zur Routine für wissen-schaftliche Notierung gehen

YES, LOAD DATA IN A-REG Ja, Daten im Α-Register laden.

LOAD DATA'IN B-REG Daten in B-Register laden

LOAD MANTISSA IN C-REG

FOR, ADJUSTMENT

Mantisse in C-Register für

Justierung laden

DECREMENT RND
CHECK IF CARRY?
RND erniedrigen, auf übertrag prüfen.

NO CARRY, CONTINUE EXP! ADJUSTMENT

Kein Übertrag, Exponentjustierung fortsetzen

YES, CLEAR C-REG EXP, ELIMINATE FALSE ROUNDUP Ja, C-Register-Exponent löschen, falsche Aufrundung

K)

CO CD CO CO 4>CO

PREPARE TO TEST MSD OF

EXP + RND)

Test von MSD von (EXP +

vorbereiten

RND)

130 131

132

138

0177

0204

0201

	133	00202	0217
4098 26/	134 . 135	0203 ' 0204	0223
:980/	136	O2o5
INJ	137	0206

0246

1 001 100

1 000 010 Oil ' 1 001 111

1 000 111 1 001 001

1 001 111 010 EXPl 1 000 100 Oil

0 101 000 100 DTL

1 010 011011

P,AMI

BRN EXPl XS,AMI

BRN EXP3 BRN DSHIFT

XS, AMI
BRN EXP2 SS5

BRN SCINOT

IS MOST SIGNIFICANT DIGIT OP EXPONENT = O? Ist wesentlichste Ziffer des Exponenten =0?

NO, DAT MAY NOT FIT Nein, Daten könnten nicht passen.

YES, CONTINUE TEST, IS EXP! POSITIVE? Ja, Test fortsetzen, Ist Exponent positiv?

NO, CONTINUE TEST Nein, Test fortsetzen

139

0210

1 111 101 010 EXP2 X, APIA

YES, DATA- WILL FIT, GO TO SHIFT ROUTINE Ja, Daten passen, zur Verschieberoutine gehen _ω

IS EXPONENT POSITIVE? *■* Ist Exponent positiv?

NO, CONTINUE TEST Nein, Test fortsetzen

YES, DATA W^LL NOT FIT, SET STATUS BIT
Ja, Daten passen nicht, Zustandsbit setzen

GO TO SCIENTIFIC NOTATION

ROUTINE

Zur Routine für wissen»

schafltiche Notierungen

gehen

IS EXP = 999?

Ist Exponent = 999?

140
141

142

143
144

0211
0212

0213

0214
0215

0215

09826/	145	0216
?0862	146	0217
	147	0220
	148	0221

0222

0222

0206

149

150

0222

Ο223

0214

1 000 110 111

0 Oil Oil 110

1 001 001 110

1 001 001 101

0 Oil 001 110

1 001 001 101

1 111 111 010 1 000 Oil Oil 1 101 111 010

1 000 110 101 0 000 001 100

DTS

BRN DTS
S, ZTC

W,SRC

JSB DSHIFTl
W, ZTC

DSHIFTl

EXP3

XS,APIA

BRN DTL

XS, AMlA

DSHIFTl

DTS

NO, DATA IS TOO SMALL Nein, Daten sind zu klein

YES, CLEAR SIGN FOR SHIFT Ja, Vorzeichen für Verschiebung löschen

SHIFT DATA ONCE,

(WILL SHIFT9 MORE TIMES) Daten einmal verschieben,

(verschiebt 10 mal mehr)

GO TO SHIFT ROUTINE Zur Verschieberoutine gehen

CLEAR C-REG
(DISPLAY = O)
C-Register löschen, (Anzeige =0)

GO TO DATA SHIFT

ROUTINE

Zur Datenverschieberoutme

gehen

is exponent negative? Ist Exponent negativ?

NO, DATA TOO LARGE Nein, Daten zu groß

YES, RESTORE SIGN OF EXPONENT

Ja, Vorzeichen des Exponenten zurückstellen

BUT DATA IS TOO SMALL TO BE DISPLAYED

Aber Daten sind zu klein, um angezeigt zu werden

PREPARE POINTER FOR DATA SHIFT

Hinweismarke für Datenverschiebung vorbereiten

CD OO CO

.ίο co

σ co σ>

152 153

154

155 156 157 158 159

0224

0225 0054 0226

0227

0230 0231

0232 0233 0234

1 111 100

0 010 110 Oil

1 Oil 101 110 DSHIFT3

0 110 001 Olo

1 111 001

1 010 101

0 010 001

0 000 111 100 DSHIFT4

0 101 111 P,ApIA DOES LSD OF EXPONENT

=9? (IS SHIFT COMPLETE?) 1st LSD des Exponenten = (Ist Verschiebung vollständig?)

BRN DSHIFT2 NO, SHIFT DATA ONCE

Nein, Daten einmal verschieben

W,ZTA PREPARE A-REG FOR

ROUNDUP

Α-Register für Aufrundung vorbereiten

X,CTA	LOAD GUARD DIGIT IN
	A-REG-
	SchutzZiffer in A-Register
	laden
W,APCA	ROUNDUP
	aufrunden
MTC	GET ROUND DIGIT FOR

XS,CMlC

DECIMAL POINT LOCATION Rundungsziffer für Dezimal punkt Stellung nehmen

INITIALIZE DECIMAL POINT LOCATION

Decimalpunktstellung initialisieren

ADJUST DECIMALPOINT LOCATION

Dezimalpunktstellung justieren

IS RND - O?
Ist RND =0?

160 0235 0233 1 001 101 111

161 0236 0 Oil 101 100

162 0237 0252 1 010 101 Oil

163 0240 0 Oil 001 110

0253 1 010 110 001

■IN O	164	*	0241
co
00
K) cn	165	0242
■*■»» ο 00	166	0243
CD
ro

BRN DSHIFT4

BRN MASK
W₁ZTC

JSB MASKl

1 111 101 010 EXPADJ2

0172 0 111 101 101

167 0244 1 101 010 010 SMEXpl

168 0245 0 000 110 000

169 0246 1 100 001 100 SCINOT

X,APIA

EXPADJl

WP,AMCA

RETURN

NO, CONTINUE DECIMAL POINT ADJUSTMENT
Nein, Dezimalpunktjustierung fortsetzen

YES, WAS ORIGINA RND = 0? Ja, war ursprüngliches RND =0 ?

NO, LOAD DECIMAL POINT Nein, Dezimalpunkt laden

YES, CLEAR C-REG for MASK GENERATION
Ja, CrRegister für Masker.-erzeugung löschen

DO NOT LOAD DECIMAL

POINT

Dezimalpunkt nicht laden

INCREMENT EXPONENT Jgg Exponent erhöhen «4>

CHECK IP EXP. ADJUSTMENT IS COMPLETE Prüfen ob Exponentjustierung vollständig it.t

RESTORE EXPONENT IN

A-REGISTER

Exponent in A-Register

zurückstellen

GO TO CALLING ROUTINE Züf rufender! Routine zurückgehen

LOCATE DECIMAL POINT FOR SCIENTIFIC NOTATION Dezimalpunkt für
wissenschaftliche Notierung lokalisieren

U) CD CO OO J> CO

170

0247

171	0250
172	0251
173 .	0252

Λ·»	174	0253	0041
»09826/	- 175	0254
ο 00	176	0255
CD ro	177	0256
	178	0257

179

180

0041

0261

0 110 000 100

1 100 101 110

0 100 101 110

0 Oil 001. 110 MASK

0 010 Oil 000

1 100 001 100 MASKl

1 001 100 010 MASK2

0 010 000 111

0 001 100 010

0 010 000 111

1 001 Oil

W, AXB
W ,ATB
W,ZTC

LDC 2
PT12

P, AMI

'BRN MASK3
P, CMl

BRN MASK3
Ldc 9

SET SCIENTIFIC NOTATION Kennzeichen für wissenschaftliche Notierung setzen

DATA TO A-REG

Daten ins A-Register

DATA TO B-REG

Daten ins B-Register

CLEAR C-REG FOR MASK GENERATION

C-Register für Maskenerzeugung löschen

LOAD DECIMALPOINT CODE Dezixnalpunktkode laden

BEGIN SEARCH FOR LEADING

ZEROES

Suche.für führende Nullen

beginnen

IS THIS DIGIT O ? Ist diese Ziffer 0?

NO, TEST OVER
Nein, Prüfen

YES, IS DECIMALPOINT AT THIS LOCATION? Ja, Ist Dezimalpünkt an dieser Stelle?

YES, END OF SEARCH FOR LeaDING ZEROES. Ja, finde der Suche auf leitende Nullen.

NO, BLANK THIS DIGIT Nein, diese Ziffer . ausblenden

181
182

183
184

185

. 0265
0263

0155
0265

1 Oil 010 111

MASK4

0266

0255

O CD OO Ν.»	186	0267	004
!6/08	187 188	0270 0271
co	189	0272
	190	0273
	191	0274
	192	0275
	193	0276
	194	0277
	195-	0300
	196	0301
	197 ■	0302	0306

O OO Oil 100 DPADJ2 PRS

O 110 HO 111

1 010 HO 111

O 010 000 111

O 000 000 000 O 000 000 000 O 000 000 000 O 000 000 000 O 000 000 000 O 000 000 000 O 000 000 000

O Oil 101 100 MASK4 YP3

DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY

O 010 101 000 POCTFLG CXM

1 000 101 HO

O 111 HO 000

1 100 Oil Oil

W, BXC

DPADJl

MASK2

MASK3

POCTFLGl

CONTINUE ROUTINE
Routine fortsetzen

ADJUST POINTER AND CHECK EXPONENT AGAIN
Hinweismarke justieren und Exponent wieder prüfen

CHECK EXPONENT
Exponent prüfen

IS THIS THE LAST DIGIT TO BE BLANKED?
Ist dieses die letzte auszublendende Ziffer?

NO, CONTINUE SEARCH FOR LEADING ZEROES
Nein, SuGhe nach führenden Nullen fortsetzen

YES. CONTINUE ROUTINE Ja', Routine fortsetzen

GO <T5 OO OO -!>-OO

RESTORE DATA AND FLAG Daten und Kennzeichen zurückstellen

SAVE DATA IN B-REG

Daten in B-Register bewahren

CLEAR T-REG
T-Register löschen

CONTINUE ROUTINE
Routine fortsetzen

198

0303

0004

0 000 010 101 PRINT8

JSB

199

204

207

0304 0305

0306

	202	0307
■Ρ*
O
CD	203	0310
OD
N)
OT

0311

0312 0313

0314 0315 0316

0146

0017

0 110 011

0 000 000

O 101 000 000 POCTFLGl

O 100 101

1 001 000

1 101 001

1 111 011

O 000 000

1 111 011

O 000 111

1 010 101 000 RECALL2

BRN

DUMMY IS 2

IXT ISI

ΡΤ13

LDCl 5 NOP LDC15 BRN MTC

PRINT3

POCTFLG2

SUBTRACT 1 FROM SPACES (FOR MINUS SIGN)
1 von Abständen subtrahieren (für negatives Vorzeichen)

CONTINUE ROUTINE
Routine fortsetzen

PREPARE TO LOAD DATA IN

T-REG

Laden der Daten ins

T-REgister vorbereiten

LOAD DATA IN T-REG

Daten ins T-REgister laden

PREPARE TO CHECKTOR "377" Prüfung für "377"vorbereiten

SET POINTER FOR "377" MASK Hinweismarke für "377"-Maske setzen

LOAD CODE
Kode laden

FOR "377"
für "377"

MASK
Maske

CONTINUE ROUTINE
Routine fortsetzen

RECALL TFLAG FOR OP LEVEL

TEST

T-Kennzeichen für OP-Niveau-

Test zurückrufen

CO CO £-■ CO

210	0317	0040
211	0320
212	0321

0322

0323 0066

0324

0325

0326

0327 0347

0330

0331 0105

0 101 111 110

0 010 000 011

1 101 001 100

0 100 011 000

0 011 011 011

1 010 1 00 100 ST0RE2

0 101 111 110

0 101 111 110

1 110 011 111

1 100 001 100

0 100 010 111

S,CMlC DOES OP LEVEL = 0 ?

OP-Niveau gleich 0?

BRN RECALLD NO, CONTINUE TEST

Nein, Test fortsetzen

PT13 YES, SET POINTER TO

UPDATE OP LEVEL
Ja, Hinweismarke zur . Aktualisierung des
OP-Niveaus setzen

LDC4 SET OP LEVEL TO FOUR

OP-Niveau auf 4 setzen

BRN DSRET PREPARE TO RETURN TO

SUPERVISOR

Rückkehr zum Überwachunosprogramm vorbereiten

RSlO . RESET STATUS BIT

Zustandsbit zurücksetzen

S,CMlC ' DOES OP LEVEL = 1?

OP-Niveau = 1?

S,CMlC DOES OP LEVEL = 2?

OP-Niveau =2?

BRN STORES NO, CONTINUE TEST

Nein, Test fortsetzen

PT12 YES, INITIALIZE POINTER

FOR SHIFT

Ja, Hinweismarke für Verschiebungjinitialisieren

BRN SHIFT CONTINUE ROUTINE

Routine fortsetzen

co .co

0332

0333 0122

0334

0 110 010 100

0 101 001- Oil 0 101 100 010

PRINT7

	224	0335	0337	1	101	111	111
409826/	225	0036	0007	0	000	Oil	111
ο OO	226	0337	0004	O1	000	010	101
CD							•
	222	0340	0004	0	000	010	101
	228	0341	0004	0	000	010	101
	229	0342	0004	0	000	010	101
	230	0343	0164	0	111	010	Oil
	231	0344		0	101	010	100

YS6 WAS SCIENTIFIC NOTATION SPECIFIED?

War wissenschaftliche Notierung spezifiziert?

BRN PRINT6 NO, CONTINUE TEST

Nein, Test fortsetzen

P,CMlC YES, SUBTRACT 10 FROM '. SPACES, ARE SPACES < 10? Ja, Io von den Abständen subtrahieren, sind Abstände kleiner als 10?

BKN PRINT71 NO,CONTINUE TO SUBTRACT 13 FROM SPACES ' ' Nein, fortfahren um 13 von den Abständen abzuziehen

BRN

PRINT71

DATA?

JSB SMl

JSB SMl

JSB SMl

BRN SPOUT

YES, GO TO FIELD TOO SMALL ROUTINE
Ja, zur Routine "Feld zu klein" gehen

SUBTRACT I FROM SPACES (11) 1 von den Abständen (11) subtrahieren

SUBTRACT I FROM SPACES (12) 1 von den Abständen (12) subtrahieren

SUBTRACT I FROM SPACES {13) 1 von den Abständen (13)· nj subtrahieren

SUBTRACT I FROM SPACES (14) 1 von den Abständen (14) subtrahieren

GO TO SPOUT ROUTINE Zur SPOUT-Routine gehen

IS DATA ENTRY FLAG SET? Ist Kennzeichen für Dateneingabe gesetzt?

co

cn co co

co

232

0345

0165

0 111 010 111 BRN ADJDATA

	Seite 233	222 0346
	234	0347
	235	0350
40 9 8:	236 237	0351 0352
ISJ CJ)	238	0353
'08 62	O1Q	η "a C/i

240

241

0355

.0.356

0350

0254

1 110 100 011

1 000 010 000

1 100 101 000

0 100 101 000

1 110 101 110

0 100 001 110

0 100 001 110

0 100 001 110

1 010 110 011 BRN YENTRY

ST0RE3 ■ R0Mi4

YENTRY DNR

W, AXC

LREG W,SIa

W ,SLA

W, SLA

NO, GO TO DATA ADJUSTMENT ROUTINE

Nein, zur Daten.justierungsroutine gehen ' ·

BRN MASKl

YES, DISPLAY DATA ENTRY Ja, Dateneingabe anzeigen

CONTINUE TEST
Test fortsetzen

RECALL DATA FROM STACK Daten vom Stapel zurückrufen

RESTORE STACK
Stapel zurückstellen

LOAD DATA IN A-REG

Daten in A-REgister laden

SHIFT DATA TO PROPER POSITION

Daten in. richtige Position verschieben

SHIFT DATA TO PROPER POSITION

Daten in richtige Position verschieben

SHIFT DATA TO PROPER

.POSITION

Daten in richtige Position

verschieben

FINISH DISPLAY WITH MASK Anzeige mit Maske beenden

CO CO OO

242

243
244

245
246
247

248

249

250

0357

0360 0361 0362 0363 0364

0365

0366 03 67

1 010 101 000 LISTl

0 101 111

0021 0 001 000

1 010 010 000 LIST2

1 110 110 010 SMEXP

0 101 010

0244 1 010 010 Oil

0007 0 000 Oil

0004 0 000 010 101 PRINT9

MTC

S,CMIC

BRN SYNTAX

ROM 5

WP, AXC

WP,AMCC

BRN SMEXPl

BRN FTS

JSB SMl

RECALL TFLAG FOR OP LEVEL TEST

T-'Kennzeichen für OP-NIveau-Test zurückrufen

DOES OP-LEVEL =0? OP-Niveau =0?

NO, GO TO SYNTAX ERROR ROUTINE J^₀

•Nein, zur SYNTAX-Fehler- ^ Routine gehen

cn

CjO OO

OO

GO TO ROMS TO CONTINUE LIST

Zu ROM 5 gehen, um Liste fortzusetzen

EXCHANGE EXPONENT AND SPACES

Exponent und Abstände austauschen.

SUBTRACT EXPONENT FROM SPACES, IS SPACE < O? Exponent von Abständen abziehen, ist Abstände kleiner als O?

NO, PREPARE TO RETURN Nein, für Rückkehr vorbereiten

YES, GO TO FIELD TOO SMALL ROUTINE ' .

Ja, zur Routine "zu klein" gehen

SUBTRACT I FROM SPACES (FOR D NOT EQUAL TO O) 1 von den Abständen subtrahieren (für D ungleich O)

0370

0371 0367

0372 0144

0373

O	255	0374	0352
co
OO	256	0375
cn
	257	0376
O
OO
CD	258	,0377
ro
	Seite	223

0 101 111 010 XS,CMlC

1 111 Oil 111 BRN

0 110 010 Oil BRN

0 000 010 000 XKEYl ROM

O 010 101 000 DISLREG CXM

0 Oil 001 110 W,ZTC

1 110 101 101 JSB

O 000 000 000 DUMMY

TYPEWRITER INTERFACE LISTING R0M2

Schreibmaschinenanschluß (ROM 2)

Zeilen laufende Abzweig Betriebs-Kode
Nr. Adresse Adresse Bit-Muster

0000
0001
0002
0376

1 101 110 000

O 000 111 100

i loo ιοί loo

1 111 111 011

TCS PLS YPl 2 BRN

PRINT9

PRINT2

LREG

FLGl

DECREMENT RND DIGIT.
IS ADJUSTMENT COMPLETE?
RND-Ziffer erniedrigen.
Ist Justierung vollständig?

NO, CONTINUE TO ADJUST
SPACES.

Nein, Justierung der Abstände fortsetzen

YES, CONTINUE ROUTINE
Ja, Routine fortsetzen

GO TO ERROR MESSAGE ROUTINE Zur Fehlernachricht-Routir.e gehen

STORE NEW OP LEVEL

Neues OP-Niveau speichern

CLEAR C-REG
C-Register löschen

DISPLAY. LAST REGISTER
USED

letztes benutztes Register anzeigen

ro

CO

cn

OO

COMPARE T-REG OJ

T-Register vergleichen -F-

SHIFT POINTER
Hinweismarke verschieben

INTERROGATE POINTER
Hinweismarke abfragen

TEST FLAG
Kennzeichen testen

0004

0005

0006

0007

0010

0212

12

13
14
15

0011
0012
0013
0014

0057

0232

0015 0235

0016 0013

0017

1 000 101 101

0 Oil 110 000

1 110 101 110

0 111 110 000

0 010 101 000

0 000 Oil 000

O 010 111 111

1 000 101 110

1 001 101 Oil

1 001 110 111

O 000 101 111

1 000 101 110

LiERR

CPARl

JSB PLAG

ADV W, AXC

CTT CXM

LDCO

BRN LDCO

W, BXC

BRN LERR0R3

BRN VSPACEF BRN LERR

W, BXC

TEST IF PRINTER FLAG HAS RETURNED

Prüfen, ob Druckkennzeichen zurückgekehrt ist

ADVANCE PAPER
Papier vorschieben

PREPARE TO RESTORE T-REG Zurückstellung des T-Registers vorbereiten

RESTORE T-REG
T-REgister zurückstellen

PREPARE TO SET ZERO FOR OP MODE

Nullsetzung für OP-Betrieb vorbereiten

SET'OP MODE TO O
OP-Betrieb aufO stellen

CLEAR SHIFT DIGIT
Verschiebeziffer löschen

SAVE DATA IN B-REG Daten in B-REgister bewahren

GO TO ERROR MESSAGE ROUTINE 2_UrFehlernachricht-Routine gehen

CONTINUE ROUTINE
Routine ,fortsetzen

NO MEMORY
KEIN Speicher

SACE C-REG IN B-REG C-Register in B-Register bewahren

ho co

CD CO CO -J>> CO

19 0020

1 010 101 000

MTC

O
CXt .

20 0021 0352 1 110 101 Oil 21 0022 0206

23

29

0024

0025

26 0027

27 0030

28 0031

0032 0211

30 - 0033

31 0034

1 000 Oil Oil

22 0023 0037 O 001 111 111

1 000 101 110

1 010 101 000

25 0026 0065 0 Oil 010 111

1 000 101 110

ι οίο ιοί ooo

O 101 111 110

1 000 100 111

σ οίο in no

O 111 111 110

DECPTl

DIGITl

OPARl

BRN	CPAR5	S,CMlC	0PAR2	S,ZMCC
BRN	SYNTAX	BRN
BRN	DECPT2
W, BXC
MTC
BRN	DIGIT2
W, BXC
MTC

S,CPlC

RECALL TFLAG FOR OP LEVEL TE)ST

■T-Kennzeichen für OP.Niveau-Test zurückrufen

CONTINUE ROUTINE
Routine fortsetzen

GO TO SYNTAX ERROR ROUTINE Zur SYNTAX-Fehlerroutine gehen

GO TO DECPT ROUTINE Zur DECPT-Routine gehen

SAVE DATA IN B-REG Daten in B-rRegister bewahren

RECALL TFLAG FOR OP LEVEL TEST T-Kennzeichen für 0P-Niveau-Test zurückrufen

CONTINUE ROUTINE
Routine fortsetzen

SAVE DATA IN B-REG Daten in B-Register bewahren

RECALL TFLAG FOR OP-LEVEL TEST T-Kennzeichen für OP-Niveau-Test zurückrufen

DOES OP LEVEL = O? OP-Niveau >■ O?

NO, CONTINUE TEST
Nein, Test fortsetzen

YES, SET OP LEVEL TO 1 Ja, OP-Niveau auf 1 setzen T^.

SET OP LEVEL TO 2
OP-Niveau auf 2 setzen

0035

0 010 101 000 0036 0212 1 000 101 Oil

	34	0037
	35	004o
	36	0041
-Τ» ■σ'	37	0042
co co K)	38	0043
C75 \	39	0044
0862
	40	0045
	41	0046
	42	0047

1 000 101 110 DECPT2

1 010 101 000

0 101 111 110

0 101 111 110

0 110 101 000

1 010 101 000

0 001 001 100

1 110 110 010 0050 0331 1 101 100 111

CXM

BRN CANCEL

W, BXC MTC

S,CMlC

S,CMlC

BRN DECPT3

STA

MTC PTl

WP,AXC BRN DECPT4

STORE NEW OP, LEVEL

Neues OP-Niveau speichern GO TO CANCEL ENTRY ROUTINE ' Zur Löschung der Eingangsroutxne gehen

SAVE DATA IN B-REG

Daten im B-Register bewahren

RECALL TFLAG FOR OP LEVEL TEST T-Kennzeichen für OP-Niveau-Test zurückrufen

DOES OP-LEVEL » O? .
Op-Niveau =0?

DOES OP-LEVEL= 1?
OP-NIveau =1?

NO, CONTINUE TEST
Nein, Test fortsetzen

YES, BRING STACK DOWN TO A-REG FOR WIDTH UPDATE

Ja, Stapel herunter ins A-Register bringen, um die Breite auf den neuesten Stand zu bringen

RECALL TFLAG FOR WIDTH UPDATE T-Kennzeichen fürAktualisierung der Breite zurückrufen

SET POINTER FOR WIDTH UPDATE Hinweismarke für Aktualisierung der Breite setzen

LOAD NEW WIDTH IN TFLAG Neue Breite in T-Kennzeichen laden

CONTINUE ROUTINE
Routine fortsetzen

OO CD CO CO

.f> CO

0051

0052

0053

0054

0055

O	49	0056
co
00
K) CD	50	0057
O
00
CD	51 '	0060
	52	0061
	Seite	224
	53	0062
	54	0063
	55	0064

0206

0 10.1 111 110 DECPT3

0 101 111 110

1 000 Oil Oil

0 011 Oil 110

0 Oil 001 100

0 001 Oil 000

0 000 Oil 000 LDCO

1 Oil 101 110

0 000 101 110

S₁CMlC S,CMlC BEN S ,ZTC PT

0 010 101 000 DIGEXl CXM

1 000 101 110 DIGEX2 W,BXC

W, ZTA

0 000 010 000 CPAR4 · ROM DOES OP LEVEL » 2?
OP-NIveau = 2?

Does OP LEVEL =3?
OP-NIveau * 3?

SYNTAX NO, GO TO SYNTAX ERROR

Nein, zum SYNTAX-Fehler gehen

YES, SET OP LEVEL TO O Ja, OP-NIveau auf O setzen

' SET POINTER FOR SCIENTIFIC

NOTATION

Hinweismarke für wissen—schaftliche Notierung setzen ^

SET SCIENTIFIC NOTATION wissen—schaftliche Notierung setzen

SET DISPLAY XTO O

(CLEAR SHIFT DIGIT)
Anzeige auf O setzen

(oder Schiebeziffer löschen)

STORE NEW TFLAG

Neues T-Kennzeichen speichern

RESTORE DATA IN C-REG

Daten im C-Register speichern

zurückstellen

CLEAR A-REG
A-Register löschen

CLEAR B-REG
B-Register löschen

GO TO SUPERVISOR IN ROM O Zum Überwachungsprogramm in ROM O gehen

NJ OJ CO U) CJ

0065

0 101 111 110 DIGIT2 S.CMlC 0066 0075 0 Oil 110 111

0 010 111 110

0 010 101 000

	58	0067
	59	0070
	60	0071
	61	0072
409826/	62 63	0073 0074
'08 6 2	64	0075

0076 0105

0077

0100

0 101 000 100

0 100 101 000 0 Oil 000 111

0 100 010 111

1 100 101 000 ■STADIG

1 110 101 110

BHN S,ZMCC CXM

DIGENT2

1 110 101 110 STACK W, AXC

SS5

CTS

BRN DIGEX2

0 101 111 110 DIGENT2 S,CMlC

BRN DIGENT3

DNR

W, AXC DOES OP LEVEL = O?
OP-Niveau = O?

NO, CONTINUE TEST
Nein, Test fortsetzen

YES, SET OP LEVEL TO 1 Ja, OP-NIveau auf 1 setzen,

STORE NEW TFLAG

Neues Kennzeichen speichern

PUT A-REG CONTENTS IN· C-REG Inhalt des A-REgisters ins C-REgister geben

SET DATA ENTRY FLAG
Dateneingabe-Kennzeichen setzen · *

STORE DATA IN STACK
Daten im Stapel speichern

RETURN TO SUPERVISOR Zum Überwachungsprograinm zurückgehen.

DOES OP LEVEL »
OP-Niveau ψ 1?

1?

NO, CONTINUE TEST
Nein, Test fortsetzen

YES, BRING STACK DOWN TO UPDATE NUMBER

Ja, Stapel herunterbringen, um Zahl auf den neuesten Stand zu bringen

NEW DIGIT TO C-REG, OLD DATA TO-A-REG

Neue Ziffer ins C-Register, alte Daten ins A-Register.

co
r-o

O
OO .

68 0101

69 0102

70 0103

72
73
74
75

76

77
78
79

0105

0107 0110

Olli 0112 0113 0114

0 100 001

0 000 001

0 110 000

71 0104 0071 0 Oil 100

X, SLA

P, CTA

BRN STACK

0 101 111 110 DIGNET3 S,CMlC

0106 0117 0 100 111

BRN DIGENT4

1 110 101 110 BCODE W,AXC 0 101 000 000 IS2

0 100 001

0 100 001

0 100 001

0 Oil 001

SLT. SLT SLT IOR SHIFT OLD DATA LEFT TO ACCEPT NEW DIGIT

Alte Daten nach links verschieben, um neue Ziffer zu akzeptieren

SET POINTER FOR UPDATE Hinweismarke für Aktualisierung setzen

STORE NEW DIGIT
Neue Ziffer/speichern

STORE RESULT IN STACK AND RETURN TO SUPERVISOR

Ergebnis im Stapel speichern, undzurück zum Überwachungsprogramm gehen

DOES OP LEVEL =2?
OP-Niveau = 2?

NO, CONTINUE TEST
Nein, Test fortsetzen

YES, LOAD DIGIT IN C-REG Ja, Ziffer in C-Register laden PREPARE TO BUILD CODE IN T-REG Aufbau des Kodes im T-Register vorbereiten

SHIFT PREVIOUS CODE
vorherigen Kode verschieben

TO MAKE ROOM FOR

Um Raum zu schaffen für

NEXT OCTAL DIGIT
Nächste Oktalziffer

LOAD NEW DIGIT IN T-REG Neue Ziffer ins T-Register* laden

CD CO CO

80

0115

	81	0116
	82	0117
	83	0120
	84	0121
■Ρ-
O CD	85	0122
CO
Ni
CO *»*	86	0123
O
co
co
PO

87
88

89
90

0124
0125

0126
0127

0061

0130

1 001 000 000

0 Oil 000 111

0057

0 101 100 Oil

0 Oil 001 100 RND

0 000 Oil 000

0 100 001 010

0 100 001 010

1 110 100 010

0 Oil Oil 110 SETO

O Oil 000 001

BRN DIGEx2

O 101 111 110 DIGENT4 S,CMlC

BRN DIGENT5

X ,SLA

X, SLA

S, ZTC

PREPARE TO LOAD DIGIT IN DISPLAY DATA
Ladung dör -Ziffer-in ι Datenanzeige vorbereiten

GO TO EXIT ROUTINE

Zur Ausgangsroutxne gehen

DOES OP LEVEL =3?
OP-Niveau =3?

NO, CONTINUE ROUTINE Nein, Routine fortsetzen

YES, SET POINTER «0 LOAD RKfD DIGIT

Ja, Hinweismarke setzen, um RND-Ziffer zu laden

CLEAR SCIENTIFIC NOTATION FLkG Wissen_schaftliche Notierung löschen

POSITION RND DIGIT FOR STORAGE

RND-Ziffer ftar Speicherung

positionieren

POSITION RND DIGIT FOR STORAGE

RND-Ziffer für Speicherung positionieren

LOAD NEW RND DIGIT IN TFLAG

Neue RND-Ziffer in T-Kennzeichen .laden

DIGEXl

SET OP LEVEL TO O
OP-Niveaujauf O setzen

GO TO EXIT ROUTINE

Zur Ausgangsroutxne gehen

ro

co

co

CO GO 4>.

CO

' 0127 0057

0130

0131 0313

0132

_o 94 0133 0135

0 Oil 000 001

DIGEXl

	95	0134
O
OO
σ>
ro
	96	,0135

0136

0137

0140

0333

0 101 111 110 DIGENT5 S,CMlC

1 100 101 111

1 001 101 110 SRE

0 101 110 111

1 101 111 111

0 001 001 100

0 100 001 110

0 000 111 100

α ioo ιοί ioo

DSl

DIGENT6

DSERR

SHIFT ι · W,SLA

GO TO EXIT ROUTINE Zur Ausgangsroutine gehen

DOES OP-LEVEL =4? OP-NIveau * 4?

NO, CONTINUE TEST Nein, Test fortsetzen

YES, WAS DIGIT ENTERED A ZERO?
Ja, war eingegebene Ziffer eine 0?

NO, DO NOT ADJUST

DIGIT

Nein, Ziffer nicht

justieren

YES, GO TO ERROR

ROUTINE

Ja, zur Fehlerroutine

gehen

INITIALIZE POINTER FOR DIGIT SHIFT Hinweismarke für Ziffernverschiebung initialisieren

SHIFT DIGIT LEFT Hinweismarke nach links verschieben

SHIFT POINTER LEFT Hinweismarke nach links verschieben

IS SHIFT COMPLETE? Ist Verschiebung vollständig?

ro co

CD OJ CO

J>

CJ

0141 0136

0142

0143

103

104

105

0144

0145

0146

0147

0150 0321

0151

0 101 111 Oil

1 111 101 110

1 110 101 110

1 110 Oil 000 1 001 110 000

1 000 101 110

1 111 111 110 1 101 000 111

1 Oil 111 000

BRN SHIFT

W,APIA

W ,AXC

LDCl 4 ATDS

W, BXC

S,APIA

BRN . DS2

NO, CONTINUE TO SHIFT Nein, Verschiebung fortsetzen

YES, LOAD EXP PART OF DATA STORAGE ADDRESS Ja, Exponententeil der Datenspeicherungsadresse laden

LOAD ADDRESS IN C-REG FLAG TO A-REG Adresse ins C-REgister laden, Kennzeichen ins A-Register

FINISH LOADING DATA . STORAGE ADDRESS Ladung der Datenspeicherungsadresse beenden

ENABLE SELECTED REGISTER

ausgewähltes Register freigeben

BRING DATA BACK TO C-REG Daten zurück ins C-Register bringen

DOES OP LEVEL =4? OP-NIveau =4?

NO, STORE OR EXCHANGE

DATA

Nein, Daten speichern

oder austauschen

YES, RECALL,DATA FROM DATA STORAGE

Ja, Daten von Datenspeicherung zurückrufen

109

0152

	110	0153
	111	0154
	112	0155
	Seite	225
	113	0156
Ο
co
OO
NJ
OD
	114	0157
ο
CO	115	0160
NJ ■
	116	0161
	117	0162

118

0163

0060

1 Oil 110 000 DS3

1 Oil 111 110 DS4

1 000 101 110

1 110 101 110

O Oil 000 Oil

1 000 100 100 XNOTE5

O 111 111 000

O 110 001 110

1 101 001 100

1 010 101 000

DTDS LOAD DATA IN DATA STORAGE

Daten in Datenspeicherung .laden

S,ZTA SET OP LEVEL TO O

OP-Niveau auf O setzen

W,BXC SAVE DATA IN B-REG

Daten im B-Register bewahren

W,AXC RESTORE FLAG IN C-REG

Kennzeichen in C-Register zurückstellen

BRN DIGEXl RESTORE ALL DATA AND RETURN

TO SUPERVISOR

Alle Daten zurückstellen und zum Überwachungsprogramm zurückkehren

RS8 RESET PRINT FLAG

Druckkennzeichen zurücksetzen

TTC PREPARE TO SAVE T-REG CONTENTS

Bewahrung der Inhalte des T-Registers vorbereiten

W,CTA SAVE IN A-REG

In A-Reg±ster bewahren

PT13 GENERATE MESSAGE FOR PRINT

OUT

Nachricht für Ausdrück erzeugen

MTC RECALL TFLAG FOR CHANNEL

NUMBER

T-Kennzeichen für Kanalnummer zurückrufen

GJ CD GO GO 4>OO

119 120

121 122

123

0164 0165

0166 0167

0170

0164

1 111 Oil 000 BLANK

1 001 101

0 111 010 Oil

0 000 Oil

1 111 Oil

124	0171	1	100	Oil	000
125	0172	1	111	Oil	000
126	0173	0	000	Oil	000
127	0174	1	111	Oil	DOO
128	0175	1	Oil	Oil	000
129	0176	1	111	Oil	000
130	0177	1	Oil	Oil	000
131	0200	1	111	Oil	000
132	0201	0	111	110	000
133	0202	1	101	001	100

LDC15 YP 9

BRN
PRS

LDCl 5

LDCl 2 LDC15 LDCO
LDCl 5 LDCIl LDCl 5 LDCIl LDCl 5 CTT
PTl 3

BLANK

LOAD CODE FOR BLANK Kode für Leerstelle laden

IS POINTER AT DIGIT9? Ist Hinweismarke bei Ziffer 9?

NO, CONTINUE LOADING BLANKS

Nein, Ladung der Leerstellen fortsetzen

SHIFT POINTER TO SKIP SELECT CODE

Hinweisxaarke verschieben, um Ausfallkode zu überspringen

X WHERE X = CURRENT SELECT CODE wobei- X =laufende Auswahlkode

GM PN
EE R
NS IO
ESON
RANTT
AG E
TE RE
E

K)

CO CO CO CO

4>. CO

Nachricht auf Hinweismarke "Note 5"

erzeugen

134 0203

135 0204

0 101 Oil 000

0 000 110 000

LDC

RETURN

136 0205 0263 1 Oil 010 001 SYNTAXl JSB RS89

137 0206 0156 O 110 111 101 SYNTAX JSB XNOTES

X · WHERE Y = O - 4 Wobei X = 0 - 4

RETURN TO CALL ROUTINE Zurück zur rufenden Routine

RETURN STATUS BITS
Zustandsbits zurücksetzen

BEGIN NOTE GENERATION "NOTE" - Erzeugung beginnen

138 0207

O 000 Oil 000

139 0210 0372 1 111 101 oil

O	140	0211
co
OO
co	141	0212
O
co
σ>
ΙΌ	142	' 0213

144 0215

145 0216

146 0217

LDCO

BRN

1 000 010 000 0PAR2 ROM

O 000 010 000 CANCEL ROM

1 Oil 010 100 FLAG YSIl

143 0214 0213 1 000 101 111

1 Oil 100· 100

O 000 110 000

BRN

RSIl

RETURN

O 101 000 000 TEST 1S2

PRINTER

FLAG FINISH NOTE
"NOTE" beenden

GO TO PRINT ROUTINE
Zur Druckroutine gehen

GO TO ROM 4 TO CONTINUE TEST Zum ROM 4 gehen, um Test fortzusetzen

GO TO ROM O TO PROCESS CANCEL ENTRY

Zum ROM O gehen, um Löscheingabe zu verarbeiten

•HAS FLAG RETURNED ?
Ist Kennzeichen zurückgekehrt?

NO, CONTINUE TO TEST FLAG Nein, Kennzeichen Test fortsetzen

YES, RESET FLAG STATUS BIT Ja, Kennzeichen-Zustands-Bit zurücksetzen

RETURN TO PRINTER ROUTINE Zur Druckerroutine zurückgehen

TEST DATA ACCORDING TO MASK Daten entsprechend Maske testen

ro

co

CD U> U)

.ΓΟΟ

	147	0220	■
	148	0221
	149	0222	0317
	150	0223
	151	0224
	152	0225
£86Q<	153	0226
6/ O8θ2	154 155	0227 0230
	15*	0231

157	0232	0156
158	0233
159	. 0234	0372

0 010 001 000

1 101 001 000

1 110 001 000

1 110 001 000

1 100 001 000

0 010 001 000

1 001 000 000

0 Oil 001 110

0 000 000 000

1 100 111 111

0 110 111 101 LERR0R3

0 Oil Oil 000

1 111 101 Oil

XOR

TDEC

YBC·

YBC

TlNC

XOR

ISl

NOP

BRN RETURN

JSB XNOTE5

LDC 3

BRN PRINTER

PREPARE TEST RESULTS Testergebnisse vorbereiten

DECREMENT TEST RESULTS Testergebnisse erniedrigen

WAS THERE A CARRY ?

War ein Übertrag vorhanden?

WAS THERE A CARRY ?

War ein Übertrag vorhanden?

RESTORE TEST RESULTS. Testergebnisse zurückstellen

RESTORE ORIGINAL DATA

Ursprüngliche Daten gurück-» stellen

PREPARE TO RETURN
Rückkehr vorbereiten

CLEAR C-REG
C-Register löschen

ELIMINATE CARRY
übertrag eliminieren

RETURN TO ROM 3 TO CONTINUE

STORE ROUTINE

Zurück zum ROM 3, um

Speicherung fortzusetzen

BEGIN NOTE GENERATION "NOTE"-Erzeugung beginnen co

GO TO PRINTER ROUTINE Zur Druckerroutine gehen

FINISH NOTE
"NOTE" beenden

160 0235 161

O
OO
OT

168
169

170
171

0236 0001

162 0237

163 0240

164 0241

165 0242

166 0243

167 0244

0245 0246

0247 0250

0205

0 101 000 000 VSPACEP IS2

0 000 001 001 LlO

1 001 000 000 ISl

1 000 101 110 MP W,BXC

1 010 101 000 MTC

0 101 111 110 S,CMlC

0 101 111 110 S,CMlC

1 000 010 111 BRN SYNTAXl

0 Oil Oil 110 . S_fZTC

0 010 101 000 CXM

0 101 000 000 1S2

0 101 101 000 SRl

PREPARE TO LOAD LP CODE Laden des LF-Kode vorbereiten

LOAD LF CODE

LF-Kode laden ■ '

PREPARE TO OUTPUT CODE Kodeausgabe vorbereiten

SAVE DATA IN B-REG

Daten in B-Register bewahren

RECALL TFLAG FOR OP LEVEL TEST

T-Kenrt2eichen für OP-Niveai¹-test zurückrufen

DOES OP LEVEL = O?
OP-Niveau = O?

DOES OP LEVEL =1?
OP-Niveau -I?

NO, GO TO SYNTAX ERROR ROUTINE

Nein, zur SYNTAX-Fehler-Routine gehen

YES, SET OP LEVEL TO O Ja, OP-Niveau auf O setzen

STORE NEW TFLAG
Neues T-Kennzeichen speichern

PREPARE TO LOAD CODE IN OUTPUT POSITION

Ladung des Kodes in Ausgabeposition vorbereiten

LOAD CODE IN OUTPUT POSITION

Kode in Ausgabeposition laden

72 Q2S1

f ■ 00* ÖÖO?

ist

	Seite 173	226;	ο» on όόΐ	öoö>
	ί«	o$m	& iii iio*
	175	0254	& OI0! OOli	oöo
co CO!''	176'	O2S5	ο iöö; löi	lio?
m	177	0256/	i ιοί ιοί	öbo^
o·· 00	178;	0257

179	0260	0272
ISO	0261	0262
iai	0262	0061
18'2	0263

ι on ιοί oil

1 Oil 001 101

ο oii ooo in

1 100 NMi 000' Mß

, AMlA

BRN	WAIT
JSB	MP5
BRU	DIGEX2
DNR;

Φ0 RECALL DATA PROM STACK

Rückruf der Daten vom Stapel vorbereiten

BRING DATA DOWN FROM STACK Daten vom Stapel herunterbringen

CLEAR C^REG
C^Register löschen

GLEAR T-REG
T-Regifeter löschen

SAVE DATA IN C AND B-REG Daten: im C- und B-Register bewahren

SAVB DATA IN STACK ALSO Daten im Stapel ebenfalls bewahren

DECREMENT COUNTER, IS OUTPUT FINISHED?
Zahler erniedrigen, ist Ausgabe beendet?

NO, OUTPUT FUNCTION Nein, Funktionsausgabe

YES, EXIT FROM ROUTINE Ja, Ausgang von Routine

EXIT FROM ROUTINE Ausgang von Routine

RECALL DATA FROM STACK Daten vom Stapel zurückrufen

K) CO CD CO CO -P^ CO

OO PsJ

183	0264
184	0265
185	0266
186	0267 0217

0270

0271 0372

0272

0273

0274 0153

0275

0276 0304

0277 0257

1 000 100 100 RS89

1 001 100 100

0 000 110 000

1 000 111 111

1 111 101 Oil

O 110 010 000 WAIT

1 000 101 110 DS5

O 110 101 111

1 001 010 100

1 100 010 Oil

1 010 111 111

RETURN BRN TEST

0 001 Oil 000 ILLEGAL LDCl BRN PRINTER
ROM 3

W,BXC

BRN DS4

C09NT1

MP2

RESET STATUS BIT8 Zustandsbit 8 zurücksetzen

RESET STATUS BIT 9 Zustandsbit 9 zurücksetzen

RETURN TO CALLING ROUTINE Zurück zur rufenden Routine

GO TO TEST ROUTINE Zur Testroutine gehen

FINISH NOTE FOR ILLEGAL KEY CODE OR S.A. "NOTE" für unerlaubten Tastenkode oder S.A.

PRINT ERROR MESSAGE Fehlernachricht drücken

GO TO WAIT ROUTINE.IN

ROM 3

Zur Warteroutine in ROM

gehen

PREPARE DATA Daten vorbereiten

CONTINUE ROUTINE Routine fortsetzen

IS HSPACEF FLAG SET? Ist HSPACEF-Kennzeichen gesetzt?

NO, WAIT
Nein, warten

YES, OUTPUT SPACE Ja, Ausgabeabstand

0300

0301 0003

	197	0302
	198	0303
	199	0304
O	200	0305
(O
CX)
ro
σ>
>».	201 '	0306
ο
00
CD	202	0307
Κ>

0240

0310 0307

0311 0257

0312

" 0313

0314 0357

0 101 000 000 HSPACEF

0 000 010 001

1 001 000 000

1 010 000 Oil 0 Oil 001 010 0 010 001 100

0 101 Oil 000

0 111 101 010

1 100 011 111

1 010 111 111

0 000 000 000

0 101 111 110

1 110 111 111

C0ÜNT1

COUNT2

DIGENT6

1S2 LIO

ISl

BRN X, ZTC PT2

LDC 5 X,CPlC

BRN

BRN

DUMMY S,CMlC

BRN

COUNT2

MP2

PREPARE TO LOAD CODE FOR BACKSPACE
Ladung des Kodes für Rückschritt vorbereiten

LOAD CODE FOR BACKSPACE

Kode für Rückschrift laden

PREPARE TO OUTPUT CODE Kodeausgabe vorbereiten

OUTPUT CODE
Kodeausgabe

CLEAR GOUNTER
Zähler löschen

SET POINTER TO INITIALIZE COUNTER

Hinweismarke setzen, um φ Zähler zu initialisieren ρ

INITIALIZE COUNTER \ /° Zähler initialisieren

INCREMENT COUNTER,

CARRY? '

Zähler erhöhen, Übertrag?

NO, CONTINUE TO COUNT Nein, Zähl—ung fortsetzen

YES, OUTPUT"FUNCTION Ja, Funktion ausgeben

DOES OP LEVEL - 5? OP-Niveau =5?

DIGENT7 NO, CONTINUE TEST

Nein, Test fortsetzen

208

0315

0 111 ill 110

209

Ö316 0131 0 ΙΟΙ ΙΟΊ 001

210
2U
212

213

0317

' O IIÖ OlOÖOÖ 0346 1 HO Oil Oli 0321

Ol &2 O iiO IÖ1 ©11

214	Ο323
215	0324
216	O325
217	0326
218	0327

1 010 100 tÖÖ

1 000 101 ΪΙΟ

1 Oil 111 OOÖ

1 000 101 110

1 Oil I1Ö 000

JOB

SRE

RETURN

1 010 ölö ,*ÖÖ

RÖi4 3

ÖRN

YSiO

BRN RSiÖ

TAB

DS3

D¹STC

W_rBXC DTDS

YES, RESTORE OP LEVEL FOR LATER TEST
Ja» OP-Kiveau für
späteren TeSt zurückstellen

GO TO DATA STORAGE

STORE/RECALL/EXCHANGE ROUTINE

Zur Datenspeicherung gehen Speicher/Rückruf/Austausch-Routine

RETURN TO ROM 3
Zurück zum ROM 3 gehen

CONTINUE ROUTINE
Routine fortsetzen

IS EXCHANGE FLAG SET? Ist Austauschkennzeichen gesetzt?

NO, GO TO STORE ROUTINE Nein, siur Speicherung der Routine gehen

YES, RESET FLAG

Ja, Kennzeichen zurücksetzen

SAVE DATA IN B-REG

Daten im B-Register bewahren

RECALL DATA FROM DATA STORAGE

Daten von Datenspeicherung zurückrufen

EXCHANGE DATA
Daten austauschen

STORE OLD DATA IN DATA STORAGE

Alte Daten in Datenspeicherung speichern

GO CD GO GO

2i9 22Ö

Ö33Ö

221 222

223

Ö332 0333

ÖÖfeÖ

224

225 226

227

Ö336 0367 Ö1Ö6

ι oil löi iii

ι iöi 6öi iöö

BRN

bS5

Ö oil Oil ÖÖÖ

ö Öii ÖÖÖ oil

Ö 101 IÖÖ 1ÖÖ

ö iiö löö. iöö

BRN

RS 6

i iii öii in.

o iiö iii iöi öseRr

ο oiö öii ööö

BRN

jsb

IjDC 2

RESETD
XN0TE5

ÖÖNtf INUE ROU' ''NE . , Routine f'ortöetzett

POINTER FOR OP LEVEL UPDATE
Hihweismarke setzen, um oP-Niveau auf den neuesten Stand zu bringen

SOT OP LEVEL TO 3 öP-Niveau auf 3 setzen

RETURN TO SUPERVISOR

Zurück zum Überwäch-Ungsprögramm

RESElT, DID DATA FIT FLAG?

Kennzeichen für "Paßten Daten ?" zurücksetzen

RESET SCIENTIFIC NOTATION FLAG
Kennzeichen für wissenschaftliche Notierung zurücksetzen

CONTINUE ROUTINE Routine fortsetzen

BEGIN NOTE GENERATION ¹¹ NOTE "-Er zeugung beginnen

FINISH NOTE
"NOTE" beenden

σ
co
οο
κ>
ο>

228
229

230
231
332

0341
0342

0343
0344
0345

0372

234	0347
235	0350
236	0351
237	0352
238	0353
239	0354
240	0355

0000

0240

0037

0240

111 101 Oil BRN

101 000 000 HSPACEF IS2 PRINTER

0362

000 000 Oil

001 000 000

010 000 Oil

101 000 000 TAB

010 000 001

001 000 000

010 000 Oil

O 101 111 110

O 101 111 110

O 101 111 110

111 001 Oil

LlO ISl BRN

LlO ISl BRN

CPAR5 S,CMlC CPÄR2 S,CMlC S,CMlC BRN

PRINTER ERROR MESSAGE Drucker-Fehler-Nachricht

PREPARE TO LOAD CODE

FOR SPACE

Kodeladung für Abstand

vorbereiten

LOAD CODE FOR SPACE Kode für Abstand laden

PREPARE TO OUTPUT CODE Kodeausgabe vorbereiten

OUTPUT CODE
Kode ausgeben

PREPARE TO LOAD CODE FOR TAB

Ladung des Kodes für Tabelle vorbereiten'

LOAD CODE FOR TAB Kode für Tabelle laden

PREPARE TO OUTPUT CODE Kodeausgabevorberexten

OUTPUT CODE
KOde ausgeben

DOES OP LEVEL « O? OP-NIveau = O?

DOES OP LEVE =1? OP-Niveau =1?

DOES OP LEVEL =2? OP-Niveau = 2?

CO CaJ

CPAR6

NO, CONTINUE TEST ^₀ Nein, Test fortsetzen

241	0356
242	0357
243	0360

0126

0362

0077

0361 0107

O CD'." OO σ>	246	0363	0262
ο ;■;.-'■'■ 00 -.	247	0364	0334
	248	0365	0156
	249	0366	0270
	250	0367
	211	0370	0156
	252	0371
	253	0372

101 Oil Oil BRM:

O 101 111 110 * DIGENT7 S,CMlC

O Oil 111 111 BRN

O 100 Oil 111 BRN

000 010 000 CPAR6 R0M4

1 Oil 001 101 JSB

1 101 110 Oil BRN

O 110 111 101 ILL JSB

1 Oil 100 Oil BRN

1 000 101 110 RESETD W,BXC

O 110 111 101 FAILURE JSB

SETO

O 100 Oil 000

STADIG

BCODE

RESET

XNOTE5

ILLEGAL

XNOTE5

1 111 Oil 000 PRINTER LDC15 YES, SET OP LEVEL TO 0
Ja, OP-NIveau auf 0 setzen

DOES OP LEVEL =6?
0P-Niveau =6?

NO, BUILD NUMBER IN STACK
Nein, Zahl in Stapel
aufbauen

YES, BUILD OCTAL CODE IN

T-REG ,

Ja, Oktal-KOde in T-REgister
aufbauen

GO TO ROM 4 TO CONTINUE

TEST

Zum ROM 4 gehen, um Test

fortzusetzen

RECALL DATA AND RESET Ü

STATUS BITS · >

Daten zurückrufenjund ^c Zustandsbits zurücksetzen

CONTINUE ROUTINE
Routine fortsetzen

BEGIN NOTE GENERATION
"NOTE"-Erzeugung beginnen

FINISH NOTE GENERATION.
"NOTE"-Erzeugung beenden

SAVE DATA IN B-BEG N)

Daten im B-Register bewahren °°

BEGIN NOTE GENERATION CO "NOTE"-Erzeugung beginnen co

FINISH NOTE ^

"NOTE" beenden

BEGIN PRINTER ROUTINE
Drucker-Routine beginnen .

254
25-S

256
257

0373
0374

0375
0376

258

0377

228

Zeilen laufende

Nr. Adresse

ÖÖÖO

oooi

5
6

0002
0003

0004

0212

i in öii boo

i ill ooi iöö

O 101 ilO öoo

ι ööö ioi löl

LDCl 5 PTl 5

JSB FLAG

i ill no oöö

LISTING (ROM 3) i )

Sehreibmäsehi.nehänsehiüB (ROM 3)

Abzweig
Adresse

ÖO37

Betriebs -Kode •Bit - Muster

ο ioi öoo oöo

0 Öl Ö ÖÖÖ ÖÖl

ι iöö iöo oöo

1 001 OÖO ÖÖO

ι oil oi öiöo 1S2
LIO

TG9
ISl

loo

FINISH NOTE GENERATION "NOTE"-Erzeugung beenden

SET POINTER FOR PRINTER

OPERATION

Hinweismarke für Örucker-

betrieb setzen

ENABLE PRINTER
Drucket freigeben

TEST IF PRINTER FLAG HAS RETURNED

Prüfen, ob Druckerkennzeichen zurückgekehrt

ist

COMPARE C-REG
C-Register vergleichen

PREPARE TO TEST FOR EOL Test für EOL vorbereiteα

LOAD SELECT CODE FOR EOL TEST

Auswahlkode für EOL-Test laden ' · ,

TEST FOR EOL
EOL testen

PREPARE TO TEST RESULT Test des Ergebnisses vorbereiten

WAS IT EOL?
War es EOL?

oo ω oo oo

0005 0363 0006

0007 0376

0008

0011

ο	13	0012
co
OO
κ>	14	0013
σ>
ο
OO	15	0014
CO	16	0015
IsJ

0370

0353

0016

0017 0334

1 111 001

1 Oil 100

1 111 111 Oil

1.010 10J 000 FTS

0 101 110 010 FTSl

1 111 100 Oil

1 110 101

BRN TCAl

rsll

BRN TCASPA

MTC

WP,CMlC

BRN

BRN

FTS2

PREXIT

1 000 101 110 0CTFLG3 W,BXC

0 000 010 000 ICPAR ROM

0 000 Oil 100 PTADJ2 PRS

1 101 110 Oil BRN

PTADJl

YES, OUTPUT TAB CLEAR ALL CODE

Ja, Ausgabetabelle,"CODE", alles löschen

NO, RESET STATUS BIT
Nein, Zustandsbits zurücksetzen

CONTINUE TO SPACE

Zum Abstand fortsetzen

FIELD IS TOO SMALL,

RECALL FIELD WIDTH

Feld ist zu klein,Feldbreite zurückrufen

DECREMENT SPACES, IS FIELD = 0 YET?

Abstände erniedrigen, ist Feld = 0?

NO, CONTINUE TO OUTPUT "#" Nein, fortfahren mit Ausgabe von "0"

YES, GO TO EXIT ROUTINE Ja, zur Ausgangsroutine gehen

RESTORE DATA

Daten zurückstellen

GO TO ROM 0 TO ENTER CPAR ROUTINE

Zum ROM O gehen, umin CPAR-Routine einzutreten

ADJUST POINTER
Hinweismarke justieren

CHEKC IF ADJUSTMENT IS COMPLETE

Prüfen, ob Justierung vollständig ist

CO CD CO CO -C--CO

0020 0021

0265

0022 0014 0023

0024

0025 0026 0027 0030 0031

0032

0033

0034

0117

1 Oil Oil

1 Oil 01 0

O 000 110 Oil

1 Oil 100

JSB

YSIl

BRN

RSIl

0CTFLG3

O	100	111	111	EXEC	BRN	LPTESTP
O	000	000	000	DUMMY
O	000	010	000	ROM O

O Oil 001 110 FLGEXCl W,ZTC

O 111 101

1 100 001

1 110 Oil

1 001 110

1 100 001

W,CPlC PT12

LDC14 ATDS PTl 2 IS THIS CODE "377"?
Ist diese Kode "377"?

WAS CODE "377"?
War KOde "377"?

YES, GO TO CPAR ROUTINE Ja, zur CPAR-Routine gehen

NO, RESET STATUS BITS FOR NEXT TEST

Nein, Zustandsbits für nach· sten Testjzurücksetzen

GÖ TO LINE FEED TEST

Zum Test für "Zeile voll" gehen

EXECUTE NEXT INSTRUCTION Nächste Instruktion ausführen

CLEAR C-REG FOR ADDRESS C-Register für Adresse löschen

LOAD EXPONENT ADDRESS Exponentenadresse laden

SET POINTER FOR MANTISSA · ADDRESS

Hinweismarke für Mantissenadresse setzen

LOAD MANTISSA PART OF ADDRESS Mantissenteil der Adressen

laden ^

SELECT CHIP 14B, REGISTER O ^O Plättchen 148, Register O aus- ⁰^

wählen °°

CO

START FLAG EXCHANGE, SELECT 4>UPDATE DIGIT CO

Kennzeichenaustausch starten, ^Aktualisierungsziffer auswählen

0035

	33	0036	0X52 0027 0256
	34	0037	0232
	35	0040	7777
409826/	36 37 38	0041 0042 0043
Ό862	39 4Θ	0044 0045
	41	0046
	42	0047
	43	0050

1 Oil 111 000

0 110 001 110

1 010 101 000

0 110 000 010

0 110 101 Oil

0 001 Oil 111

W, CTA

P, CTA

1 010 111 101 SETCNTL JSB

1 001 101 101 .SETCNTLl JSB

0 101 000 000

0 000 000 001

0 101 101 000

1 001 000 000

FLGEXC2 FLGEXCl IXT
WAIT

000

CALL D.S. REG TO C-REG D.S.-Register ins C-Register rufen

STORE FLAG IN A-REG FOR UPDATE Kennzeichen in Α-Register zur Aktualisierung speichern

RECALL FLAG TO C-REG Kennzeichen ins C-Register zurückrufen

ro OO co

OO

LOAD OP MODE IN NEW FLAG OP-Betrieb im neuen Kennzeichenjladen

CONTINUE ROUTINE
Routine fortsetzen

CONTINUE *Z

fortsetzen

LOAD I/O REG

I/O Register laden

WAIT FOR FLAG AND OUTPUT DATA Auf Kennzeicherjwarten und Daten ausgeben

PREPARE TO OUTPUT NOP Ausgabe von NOP vorbereiten

LOAD NOP KODE
NOP-Kode laden

SHIFT NOP TO OUTPUT POSITION NOP zur Ausgabeposition schieben

PREPARE TO WAIT FOR FLAG Warten auf Kennzeichen vorbereiten

0051 0232

0052 0355

0053 0254

0054 0232

O	48	0055
co co
co	49	0056
/086;	50	0057
	51	0060

0061 0176

11001 101 101

1 110 110 111

1 010110 101 DATA0UT9

1 001 101 101

1 101 111 110

1 001 111 110

1 110 010 Oil

1 100 1Φ1 100 DATA0ÜT2

0 111 111 Oil

WAIT

RETURN

LOADIGIT

JSB MAIT

S,AMlA

BRN DPOUTl

BRN SHIFT

WAIT FOR FLAG AND OUTPUT

NOP

Auf Kennzeichen warten und

NOP ausgeben

PREPARE TO RETURN TO

SUPERVISOR

Rückkehr zum überwachungs-

programm vorbereiten

LOAD DIGIT IN I/O REG Ziffer inl/O-Register laden

WAIT. FOR FLAG THEN OUTPUT

DATA

Auf Kennzeichen warten und

Daten ausgeben *

RESTORE ORIGINAL DIGIT IN MACX Ursprüngliche Ziffer in Maske· (J] zurückgeben ip

IS DECIMAL POINT NEXT? Kommt Dezimalpunkt als nächster?

YES, GO TO DPOUT ROUTINE Ja, zur DPOUT-Routine gehen

NO, WAS THIS THE LAST DIGIT? Nein, war dies die letzte Ziffer?

NO, EXAMINE NEXT DIGIT Nein, nächste Ziffer überprüfen J₀

cn co co

§4 0063 0206

0064

0065

_φ 57 0066

82 6	58	0067
ό 00	59	0070
ro	60	0071
	61	0072
	62	0073
	63	0074

O 101 010 100

1 000- Oil Oil

1 Oil 101 110

0 000 1Ol 110

1 100 101 000

O 100 101 000

1 110 1Ol 110

O 000 001 100

1 001 Oil 000

1 101 001 010

1 Oil 110 110

YS 5

BRN DATA0UT3

W, ZTA

W, ZTB PNR CTS W, AXC PTO

LDC9 X ,AMCA MS, ZTA

YES, DID DATA FIT?
ja, paßten Daten?

YES, TEST FOR OUTPUT MODE (FIXEDDOR FLOATING POINT) Ja, auf Ausgabebetrieb prüfen (Fest- oder Gleitpunkte)

NO, CLAER A-REG

Nein, Α-Register löschen 'CLEAR B-REG
B-Register löschen

RECALL DATA FROM STACK Daten vom Stapel zurückrufer

RESTORE DATA IN STACK Daten im Stapel zurückst el le-n

DATA TO C-REG

Daten ins C-Register

PREPARE TO LOAD CONSTANT Ladung einer Konstanten vorbereiten

LOAD 9
9 laden -

SUBTRACT 9 FROM EXPONENT 9 vom Exponent abziehen

REMAINING PART OF DATA WILL BE ALL ZEROES

Verbleibende Teil der Daten sind nur Nullen

CO CJ) OO CO

CO

236ο

O OO O

64 007 5 65 0076 0275

66 0077 0346 67

68 69

•7Λ»

/V

0100

0101 0102 0103

71 0104

72 0105

73 0106

0000

1 101 101 010 DATA0UT4 X,AMlA

1 Oil 110

ι no on on

BRN ZOUT

BRN DP0UT2

O 000 010 000 FLGEXC3 ROM

O 101 000 000 SPACE IS2

O 000 000 Oil LIO

O 101 iOl 000 SRI

1 001 000 000 ISl

O 000 110 000 RETURN

1 001 010 100 DSROUT YS9

001

DECREMENT EXPONENT, IS EXP. = O? Exponent erniedrigen, Ist Exponent = O?

NO, PREPARE TO OUTPUT ZEROES Nein, Ausgabe von Nullen vorbereiten

YES, GO TO DECIMAL POINT OUTPUT ROUTINE Ja, zur Dezimalpunkt-Routine gehen

RETURN TO CALLING ROUTINE IN ROM O Zurück zur rufenden Routine in ROM Ogehen

GENERATE CODE FOR SPACE Kode für Abstand erzeugen

LOAD CODE FOR "SPACE" Kode für Abstand laden

SHIFT CODE TO OUTPUT POSITION Kode zur Ausgabeposition verschieben

PREPARE TO CHECK IF OUTPUT IS COMPLETE Prüfung vorbereiten, ob Ausgabe vollständig ist

RETURN TO CALLING ROUTINE Zurück zur rufenden Routine

NORMAL RETURN? Normale Rückkehr?

74

0107

75	0110
76	Olli
77	0112

0 111 000 Oil

0 Oil 001 110

0 111 110 000

1 000 010 000

O	78 .	*	80	0113
CD./
CO ro,	79	0114
co
O
co co	0115

0116

0117

0120

1 Oil 101 110

1 100 101 000

1 000 000 100

0 010 010 000

1 000 101 110

0 100 101 000

BRN

W,ZTC CTT ROM 4

EX

(PRT)

LFTESTP

W, ZTA

DNR

SS8 ROM 1

W, BXC CTS

cn

co co

-P-CO

YES, GO TO EXIT Ja, zum Ausgang gehen

CLEAR C-REG
C-Register löschen CLEAR T-REG'
T-Register löschen

NO, GO TO ROM 4 TO CONTINUE·ROUTINE Nein, zum ROM 4 gehen, um Routine fortzusetzen

CLEAR A-REG.
Α-Register löschen

RECALL DATA FROM STACK

Daten vom Stapel zurückrufen

SET PRINT KEY HIT FLAG

Druckkennzeichen für gedrückte Taste setzen

GO TO ROM 1 TO DISPLAY ROUTINE
Zum ROM 1 gehen, um Routine . anzuzeigen

PREPARE TO STORE DATA IN STACK

Speicherung der Daten im Stapel vorbereiten

STORE DATA IN STACK Daten im Stapel speichern

0121

0122

0123

0124 0265

88 0125
co

S 89 0126 0043

0127

0130

0131

0132

0 011 001 110

1 100 001 100 LFTEßT

0 100 011 000

1 Oil Oil 001 1 Oil 010 100

ο oro ooi in

ι on loo ioo

1 101 001 1OO

1 000 Oil 000

O 000 000 000

W, ZTC

PT12

LDC4

JSB TEST
YSIl

BRN
RSIl

LDC8
NOP

SETCNTL

CLEAR C-REG FOR TESTS C-Register für Tests löschen

PREPARE POINTER FOR LINE FEED MASK
Hinweismarke für Zeilenfüllungsmaske vorbereiten

LOAD LINE FEED TEST MASK Zeilenfüllungstestmaske laden

TEST CODE FOR LINE FEED Testkode für "Zeile voll"

WAS THERE A CARRY DURING TEST?
Ist während des Tests ein übertrag aufgetreten?

NO, CODB IS LINE FEED Nein, Kode ist "Zeile voll"

YES, CODE IS NOT LINE

FEED

Ja, Kode ist

"Zeile nicht voll';

SET POINTER TO LOAD TCA TEST

Hinweismarke setzen, um TCA-Test zu laden

LOAD TAB
TAB laden

DELAY FOR LDC
Verzögerung für"LDC .

CO CD CO CO •t> CO

0133

Öl34

Ö26S

Oils

0136

0376

co Gb	98	Öl 37
•ν CJ co	99	0140
	100
	100	0141
	101	0142

0265

0 010 Oil ÖÖÖ

1 Oll Oll Ö01

ι on dio iöö

ι in in oil

1 Oll 1Ö0 100

ο in in no

1 Oil Oil 001

ι oil οίο iod LDC 2 .

JSB TEST

BRN T(SASPA

PRTEStf

S /CPlG

JSB TEST

MASK
Maske

TEST CODE TO SEE IF IT IS TAB CLEAR ALL Code testen, um zu sehen,ob "Tabelle alles löschen" vorhanden ist

WAS THERE A CARRY DURING THE TEST?
Ist während des Tests ein Übertrag aufgetreten? - · .

NO, CODE IS TAB CLEAR ALL, OUTPÜTSPACE, CHECK EOL

Nein, Kode ist "Tabelle, alles löschen", Ausgabeabstand, EOL prüfen

YES, CODE IS NOT TAB CLEAR ALL
Ja, Kode ist nicht "Tabelle, alles löschen"

LOAD CODE FOR PRINT TEST Kode für Drucktest laden

TEST CODE FOR PRINT Testkode für Druck

WAS THERE A CARRY DURING TEST?

Ist während des Tests ein übertrag aufgetreten?

CO CO OO GO 4-^ CaJ

0143

0144 0145

0113

	105	0146
	106	0147
σ	107	0150
co
00
co	108	0151
O
00
σ>
ro

109

110
111

0152

0153 0154

0155

0 100 101

1 Oil 100

0 101 000 000 LCIOl

0 100 101

1 001 000

1 001 101 101 LCI02

1 110 110

1 Oil 110 000 FLGEXC2

0 Oil 001

1 110 101

0 010 101 BRN (PRT) NO, CODE IS PRINT

Nein, Kode ist "Druck"

RSIl YES, CODE IS NOT PRINT

Ja, Kode ist "nicht Druck"

IS2 PREPARE TO LOAD CODE IN ,

I/O-REG

Ladung des Kodes in I/O-Register vorbereiten

IXT LOAD CODE IN I/O-REG

Kode in I/O-Register laden

ISl · PREPARE TO OUTPUT CODE

Kodeausgabe vorbereiten

JSB WAIT WAIT FOR FLAG AND OUTPUT

DATA

Auf Kennzeichen warten und · Daten ausgeben

BRN RETURN PREPARE TO RETURN TO SUPER-

VIS OR

Rückkehr zum tiberwachungsprogramm vorbereiten

DTDS STORE OLD FLAG IN D.S.

Altes Kennzeichen in D.S. speichern

W,ZTC CLEAR C-REG

C-Register löschen

W,AXC ' NEW FLAG TO C-REG

Neues Kennzeichen ins C-Register

CXM STORE NEW FLAG IN M-REG

Neues Kennzeichen ins M-Register speichern

113 0156 0100 0 100 000 Oil

	114	0157
	115	0160
	116	0161
O

co 117 0162 0302 1 100 001 101

O 118 0163 0232 1 001 101 101

era
to

119 0164 0171 0 111 100 111

120 0165

122 0167

0 101 110 010

121 0166 0263 1 Oil 001 111

1 001 111 110

BRN FLGEXC3 RETURN TO CALLING ROUTINE IN ROM 0

Zurück zur rufenden Routine in ROM 0

0	000	000	000	EX	DUMMY
1	000	,100	100	■ CANCEL	RS8
0	000	010	000	ROM 0

MINUS

SPOUT

DATAOUT

JSB JSB

BRN WP,CMlC

BRN S, AMI YES, RESET PRINT KEY FLAG Ja, Drucktastenkennzeichen

zurücksetzen

PREPARE TO GOTTO CANCEL ENTRY ROUTINE

Vorbereiten, um zur Eingangslöschroutine zu gehen

MINUSl GENERATE'CODE FOR MINUS SIGN

Code für Minuszeichen erzeugen

WAIT WAIT FOR FLAG THEN OUTPUT MINUS SIGN

Auf Kennzeichen warten,dann negatives Vorzeichen ausgeben

DATAOUTl BEGIN OUTPUTING DATA ' Datenausgabe beginnen

DECREMNT SPACES, READY TO OUTPUT DATA?

Abstände erniedrigen, Datenausgabe fertig? '

SPOUTl NQ, CONTINUE TO OUTPUT

Nein., Ausgabe fortsetzen

YES, BEGIN DATA OUTPUT ROUTINE, IS NUM. POS? Ja, Datenausgaberoutine beginnen, NUM. POS?

CO CD CO CO 4>. CO

iß l/i

0170 ÖlS2 0 111 ÖQl Oil

MINUS

0171 0172 0173

0174

0175

0176

130	0177
131	0200
132"	0201
133	0202

O 011 001 lÖÖ DAtfÄÖUTl PT3

o on on no SuT^ s, isipc

oiöi in Ho sterne

1 iOÖ 1Ö1 110 #,ÄXB

1 000 001 Oil BRN

O 000 111 iÖÖ ' SHIf¹T PLS

1 100 ΙΟΙ 110 W>ÄXB

O 100 001 110 W,SLA

1 1OO Ιοί 110 W,AXB

O 100 001 HO SSIFTI W,SLA

SHIF¹Tl

CO CT) CO CO

NO» GO TO ROUTINE OUTPUT MINUS SIGN

Nein, zur Routine gehten, um Minuszeichenausgeben YES, SET POINTER

Ja, Hinweismärke setzen CLEAR SIGN DIGIT
Vorzeiehenziffer löschen co

SET DIGIT TO 9
VörzejLchenzifrer auf 9 setzen

STORE DATA IN B-REG, MASK TO A-REG

Daten ins B-Register speichern, zum Α-Register ausblenden SHIFT MASK ONCE TO THE LEFT Maske einmal nach links ver- υ'

schieben __§

SHIFT POINTER ONCE TO THE LEFT

Hinweismarke einmal nach links verschieben

PREPARE TO SHIFT DATA Datenverschiebung vorbereiten SHIFT DATA ONCE TO THE LEFT Daten einmal nach links verschieben

RESTORE DATA

Daten zurückstellen

SHIFT MASK ONCE TO THE LEFT Maske einmal nach links verschieben

0203

0204 _;Q0S3

136

141

03-7(6

	137	0206
co PO	13:8	0207
σ>
ο	139	0210
ρο
fs»	140	0211

0212

0213 0062

0214

1 111 liiL HP S,AP1A

0 PlO 101 H 3- BKN

p 111 H3- PH

0 110 pip lip© DATA0UT3

1 lip Ii)J. Hi BRN 1 jLQO 1:01 QPp DNR 0 3.00 101 ©Op CTS

O 101 000 OOP IjS 2

O Oil 001 Oil ' IjIO

O IPl IPl PPO SRI

PATA0UT9

;SH|FT

IS THIS DIGIT
Ist di.eses eine ausgeblendete Ziffer?

NO, OUTPUT THIS DIGIT Nein, diese Ziffer ausgeben

YES, SHIFT DATA AND EXAMINE NEXT DIGIT

Ja, Daten verschieben und .nächste Ziffer überprüfen

WAS SCIENTIFIC NOTATION

SPECIFIED?

War wissenschaftliche

Notierung spezifiziert?

NO₇ GO TO EXIT ROUTINE Nein, ^zur Ausgangsroutine gehen

YES, RECALL DATA FROM STACK Ja, Daten vom Stapel zurückrufen

RESTORE DATA IN STACK Daten im Stapel zurückstellen

PREPARE TO OUTPUT E, Ausgabe von E vorbereiten

LOAD CODE FOR "E"
Kode für "E" laden

SHIFT CODE TO OUTPUT POSITION

Kode zur Ausgabeposition verschieben

0215

0216

0217

0220

O co	148	■	149	0221
co
co
--S. O	0222
co
co

0223

151	0224
152	0225
153	0226

1 001 000 000

1 001 101 101

0 001 111 010

1 Oil 100 111

O 100 000 101

1 001 101 101

1 100 101 110

O 100 001 110

O 100 001 110

O 110 100 100

EXP

EXPl

ISl JSB

XS,CMl BRN

JSB ' JSB

WAIT

MINUS2

SPACE

W, AXB

W, SLA W ,SLA RS6

PREPARE TO OUTPUT CODE Kodeausgabe vorbereiten

WAIT FOR FLAG AND OUTPUT E

Auf Kennzeichen warten und E ausgeben

IS EXPONENT POSITIVE? Ist Exponent positiv?

NO, PREPARE TO OUTPUT MINUS SIGN

Nein, Minuszeichen-Ausgabe vorbereiten

YES, GENERATE CODE FOR SPACE

Ja, Kode für Abstand erzeugen

WAIT FOR FLAG THEN OUT- ' put "SPACE" OR MINUS SIGN Auf Kennzeichen warten, dann "Abstand" oder Minuszeichen ausgeben

■PREPARE TO SHIFT DATA Datenverschiebung vorbereiten

SHIFT DATA

Daten Verschieben

SHIFT DATA

Datei verschieben

RESET SCIENTIFIC NOTATION ,FLAG

Kennzeichen für wissen schaftliche Notierung zurücksetzen

CO CD CO GO

154 0227 1 Oil 001 100

155 0230 0172 0 111 101 Oil

156 0231 0 000 000

157 0232 0 000 000 000

158 0233 0 111 110 000

159 0234 0 Oil 001 010

0 101 000 000

0 000 100 000

1 001 000 000

163 0240 1011 010 100

164 0241 0246 1 010 Oil Oil

165 0242 1 Oil 100 100

O co	. 160	0235
OO
ro
co 1—■,	161	0236
O
c»
σ>
rs>'	162	0237

PTIl

BRN SET9

DUMMY DUMMY WAIT CTT

X, ZTC TESTFLG IS2

YINTF ISl

YSIl

BRN ' OUTPUT

SET POINTER
HInweiemarke setzen

OUTPUT EXPONENT
Exponent ausgeben

SAVE CONTENTS OF C-REG IN T-REG

Inhalt vom C-Register im T-Register bewahren

INITIALIZE COUNTER Zähler initialisieren

PREPARE TO TEST FLAG Kennzeichentest vorbereiten

INTERROGATE FLAG STATUS BIT

Kennzeichen-Zustands-Bit * abfragen

PREPARE TO CHECK FLAG STATUS

Prüfung des Kennzeichenzustandes vorbereiten

IS PERIPHERAL READY?

Ist Peripheriegerät fertig?

YES, OUTPUT DATA
Ja, Daten ausgeben

NO, RESET STATUS BIT AND CHECK FLAG AGAIN
Nein, Zustandsbit zurücksetzen und Kennzeichen nochmals prüfen

CO CO CO 4>CO

0243

0244

0245

40 9826/	169 170	0245 0247
ο	171	0250
	172	0251
	Seite	232
	173	0252
	174	0253

0254

0255

0 111 101 010

1 001 110 111

1 111 000

Q 111 Hl 000 OUTPUT

1 010 100 000

Q 101 000 000

O O01 O00 001

O 110 100 OQO

1 001 000 QOQ

Q OQQ 110 000

O 010 OQO HO

i£,CPlC

SRN

BRN

SBL

INCREMENT COUTNER, WAS THERE A CARRY? fahler erhöhen, war ein Übertrag vorhanden?

TEßTFLG NO, TEST FLAG AGAIN

Nein, Kennzeichen erneut überprüfen

FAIL₁URE YES, GO TO FAILURE ROUTINE

Ja, zur Ausfallroutine gehen

RECALL DATA TO C-REG Daten ins C-Register zurückr'ufen

SET BUSY LIGHT . Betriebsanzeigelicht setzen

LIQ

IgI

RETURN

L0ADH5IT

PREPARE TO OUTPUT DATA Datenausgabe vorbereiten

LOAD I/O SELECT CODE I/Q-Auswahlkode laden

OUTPUT DATA
Daten ausgeben

PREPARE TO RETURN TO CALLING

ROUTINE

Rückkehr zur rufenden Routine

vorbereiten

RETURN TO CALLING ROUTINE Rückkehr zur rufenden Routine

LOAD DIGIT IN C-REG Ziffer im C-Registe"r laden

ο in no ooo

0 IQl 000 000

Q IQQ IQl 000

I 001 OQO 000

0 QQO 110 000

0 100 QQO 101

a 1 001 IQl 101

Q16S Q 111 010 111

O 100 010 QQQ

0267 0265 1 OH QH QQl

	177	0236
	178	0257
	173	Q26Q
	180	0261
	181	0262
O Cß CQ	182	0263
N) CD1 'S-	183	0264
O
ZBi	184	0265
	185	0266

IXT

CTT IS 2

IXT ISl RETURN

SPQOT 1 JSB

JSB

BRN

SPACE

WAIT

SPOUT

TEST

0270

I QlQ QlQ QQQ

ROM 2

JSB

ROM 5

TEST

LOAD DIGIT IN T-REG Ziffer in T-Register laden

PREPARE TO LOAD I/O-REG Ladung des I/O-Registers vorbereiten

LOAD DIGIT IN I/O-REG Ziffer im I/O-Register laden

PREPARE TO RETURN
Rückkehr vorbereiten

RETURN TO CALLING ROUTINE Zur rufenden Routine zurück

GENERATE CODE FOR SPACE Kode für Abstand erzeugen

WAIT FOR FLAG THEN OUTPUT SPACE

Auf Kennzeichen warten, dann Abstand ausgeben

TEST IF OUTPUT IS COMPLETE Prüfen, ob Ausgabe vollständig ist

GO TO ROM 2 TO TEST OCTAL DATA

zum ROM 2 gehen, um Oktaldaten zu testen

TEST FOR 377
Auf "377" prüfen

RETURN TO ROM 5

Zum ROM 5 zurückgehen

188 0271

ο co σα ro σ> -■*«. ο σο

189	0272
190	9273
191	0274
192	0275
193	0276
194	0277

195 . 0300

196 0301

197 0302

198 0303

0302 1 100 001 101 MINUS2

0222 1 001 001

0232 1 001 101

0 100 010

0 101 000 000 ZOUT

0107 0 100 100

0 101 101

1 001 000

0232 1 001 101

0075 0 011 110

.0 101 000 000 MINUSl

JSB

BRN	EXP
JSB	WAIT
ROM 2
IS2
LIO	220
SRI

ISl JSB

BRN IS2

MINUSl LOAD CODE FOR MINUS SIGN IN I/O - REG

Kode für Minuszeichen in I/0-Register laden

WAIT FOR FLAG

Auf Kennzeichen warten

OUTPUT FUNCTION / NOP Ausgabefunktion / NOP

RETURN TO ROM 2
Zum ROM 2 zurück

PREPARE TO OUTPUT ZEROES Nullenausgabe vorbereiten

LOAD "O" CODE
"0"-Kode laden

SHIFT CODE TO OUTPUT POSI -

TION ' "

Kode verschieben zur Ausgäbe Position

PREPARE TO OUTPUT 0 Ausgabe von 0 vorbereiten

WAIT WAIT FOR FLAG THEN OUTPUT ZERO

Auf Kennzeichen warten, dann O ausgeben

DATA0UT4 GO TEST IF OUTPUT IS COMPLETE

Prüfen, ob Ausgabe vollständig ist .

PREPARE TO OUTPUT MINUS SIGN Minuszeichen-Ausgabe vorbereiten

0304

0305

	201	0306
	202	0307
„■;:-■	203	0310
co»'·' CD
	204	0311
Ό862	205 206	0312 0313
	207	0314
	208	0315
	209	0316
	210	0317
	2ΐί	0320

0 100 111 Oil

0 101 101 000

1 001 000 000

0 000 110 000

LIO SRI

235

1 010 111 101

1 Oil Oil 001

1 Oil 010 100

0 000 110 Oil

1 Oil 100 100

1 000 010 000

0 000 110 000

1 101 001 100 PMS6

1 111 Oil 000 RETURN

LDC15	IXT
JSB	TEST
JSB
YSIl	0CTFLG3
BRN
RSIl
ROM 4
RETURN

LOAD MINUS SIGN- CODE MInuszeichen-Kode laden

SHIFT CODE TO OUTPUT POSITION

Kode zur Ausgabe Position verschieben

PREPARE TO RETURN Rückkehr vorbereiten

RETURN TO CALLING ROUTINE Zur rufenden Routine zurückgehen

SET POINTER TO FINISH

MASK

Hinweismarke setzen, um

Maske zu beenden

FINISH MASK Maske beenden

LOAD I/O-REG I/O-Register laden

TEST FOR

auf "377" prüfen ·

WAS CODE 377? War Kode "377"?

YES, GO TO CPAR ROUTIINE Ja, zjur CPAR-Routine gehen

NO, RESET STATUS BIT

Nein, Zustandsbit zurücksetzen

GO TO ROM 4 Zum ROM 4 gehen

RETURN TO CALLING ROUTINE CO Zurück zur rufenden RoutineOQ

212	0321
213	0322
214	0323
215	0324
216	0325

217

222

0326

*>	218	0327
to	219	0330
QO
cn
Q	220	0331
OQ	221	0332
σ>
κ»'

0333

0334

0335

1 101 111 110

1 101 111 110

1 101 111 110

1 101 111 110

0 001 Oil Oil

O 010 101 000

1 000 101 HO

1 111 Oil 000

1 100 100 Oil

1 001 Oil 000

Q 000 111 Oil

S,AMIA

S₁AMlA

S,AMIA

S,AMlA

BRN

CXM

LDC15

BRN

1 101 001 100 DP0UT3 PTl3

LDC

O 101 111 010 PTADJl XS,CMlC

BRN

EXEC

PMS 6

PTADJ2

DOES OP LEVEL =3? OP-NIveau = ·=?

DOES OP LEVEL =4? OP-Niveau =4?

DOES OP LEVEL =5? OP-Niveau =5?

DOES OP LEVEL «6? OP-Niveau «6?

NO, EXECUTE NEXT INSTRUCTION Nein, nächste Instruktion ausführen

YES, RESTORE FLAG AND DATA Ja, Kennzeichenund Daten zurückstellen

SAVE DATA IN B-REG Daten im B-REgister bewahren

LOAD LAST HALF OF MASK Letzte Hälfte der Maske laden

CONTINUE ROUTINE Routine fortsetzen

SET POINTER FOR FACIT CODE Hinweismarke für Fazit-Kode setzen

LOAD FACIT DIGIT CODE (POINTER SET FOR PTADJ) Fazitziffernkode laden (Hinweismarke gesetzt für PTADJ)

DECREMENT RND, IS RND =0? RND erniedrigen, ist RND =0?

NO, GO TO POINTER ADJUSTMENT Nein, zur Justierung der Hinweismarke gehen

ho co

CD

CO

225 0336

226 033?

227 Ö34O

228 UUt

229 0342

230 0343

231 0344

232, 0345

Ö 101 ÖÖÖ DÖÖ

ÖÖ16 0 ÖÖÖ 111 !Öl

Ö 1Ö1 ΙΟΙ ÖÖÖ

1 OtSl ÖÖÖ ÖÖÖ

0232 1 001 101 lot

ÖÖ6Ö O Oll ÖÖO Oll

Ö336

ο ιοί oiö löö

1 101 Hl Öll

SRI

JSB BRN

tss

WAI¹T

DATÄOÜT2

DP0UT4

, PREPARE TO OUTPUT DECIMAL· POINT
Ja* Auägabe des Dezimalpunktes vorbereiten

LÖÄD CODE FOR DECIMAL POINT Kode füi: Dezintalpünkt laden

SHIFT DATA TO OUTPUT POSITION

Daten zur Ausgabeposition verschieben

PREPARE TO OUTPUT DECIMAL·

POINT

Ausgabe des Dezimalpunktes

vorbereiten

WAIT FOR FLAG THEN OUTPUT Auf Kennzeichen warten, dann ausgeben

CONTINUE ROUTINE
Routine fortsetzen

DID DATA FIT?
Paßten Daten?

YES, OUTPUT DECIMAL POINT AND RETURN

Ja, Dezimalpunkt ausgeben 'und zurückkehren

K)

cn

GO CaJ) -Ρ» CO

0346

0347

0350

0351

409826/C	237 238	0352 • 0353
1862	239	0354
	240	0355
	241	0356
	242	0357
	243	0360
	244	0361

0 101 100 100

0 110 100 100

1 010 101 000

0 001 111 010

1 101 101 Oil

O 101 100 100

1 110 010 000

1 Oil 101 110

1 100 101 000

1 000 101 110

O 100 Oil Oil

O 111 111 000

DPOUT2 RS5 RS 6 MTC

XS/CMl BRN

PREXIT RS5

ROM 7

RETURN W,ZTA ^v

DNR

W, BXC

BRN . DSROUT FAILURE TTC

NO, RESET DID DATA FIT FLAG Nein, Kennzeichen für "Paßten Daten " zurücksetzen

RESET SCIENTIFIC NOTATION FLAG Kennzeichen für wissen-schaftliche Notierung zurücksetzen

RECALL TFLAG FOR RND DATA T-Kennzeichen für RND-Daten zurückrufen

IS ROUND EQUAL TO O? Ist Rundung gleich O ?

NO, PREPARE TO OUTPUT DECIMAL POINT

Nein, Ausgabe des Dezimalpunkr tes vorbereiten

YES, RESET DID DATA FIT FLAG Ja, Kennzeichen für "Paßten Daten" zurücksetzen

GO TO ROM 7 TO CHECK FOR TAB Zum ROM 7 gehen, um auf TAB zu prüfen

CLEAR A-REG
A-Register löschen

RESTORE STACK
Stapel zurückstellen

SAVE DATA IN B-REG Daten im B-REgister bewahren

CHECK FOR NORMAL RETURN Auf normale Rückkehr prüfen

RECALL DATA TO C-REG Daten ins C-Register zurückrufen

co

CD CO CjO ■P-CO

0362

0 100 010 000

FAILUREl

246

0363

0364

0365

O	249	0366
co
co	250	0367
N)
σ>
	251	0370
O
00
cn	252	0371
	253	0372

0373

0374

0 101 000 000

0 100 000 101

0 101 101 000

1 001 000 000

0 010 010 Oil

0 101 000 000

0 010 101 001

0 101 101 000

1 001 000 000

1 001 101 101

ROM 2 GO TO ROM 2 TO PROCESS

FAILURE (EOL)

Zum ROM 2 gehen, um ausfall· zu verarbeiten (EOL)

TCAl

FTS 2

LIO SRI

ISl BRN IS2 LIO SRI

ISl JSB

PREPARE TO RELOAD TCA CDDE Rückladung des TCA-KOdes vorbereiten

RELOAD TCA CODE

TCA-KOde zurüqkladen

SHIFT CODE TO OUTPUT POS-. ITION

Kode zur Ausgabeposition verschieben

PREPARE TO OUTPUT CODE KOdeausgabe vorbereiten

SETCNTL GO TO OUTPUTJROUTINE

Zur Ausgaberoutine gehen

CONTINUE TO OUTPUT "#" Fortfahren mit Ausgabe νοη"{ί"

LOAD CODE FOR "$"

Kode für "$" laden "

SHIFT CODE TO OUTPUT POSITION

Kode zur Ausgabeposition verschieben

PREPARE TO CHECK IF OUTPUT IS.COMPLETED

überprüfung vorbereiten, ob Ausgabe beendet ist

.WAIT WAIT FOR FLAG THEN OUTPUT "$" Auf Kennzeichen warten, dann "$" ausgeben

256 0375 OOli

257 0376 ÖlÖÖ

258 0377 0232

O 000 100 Hl

ο ioo öoo ioi i όοι ιοί ioi

rfSB

JSB

SPACE

WAIT

TEST IF OUTPUT IS
COMPLETED ,
Prüfen, ob Ausgäbe
vollendet ist

GENERATE CODE FOR SPACE
Kode für Abstand erzeugen

OUTPUT SPACE
Abstand ausgeben

CO

cd

U)

co co

TYPEWRITER INTERFACE; LISTING (ROM 4)

Nr
3:

IQ

11

12

13 14

15 16

QQOO QQQl OQQX QQ03 QQQ4 QQQ 5 QQQ6 QQQ? QQlQ QOIl

QQl 2 QQl 3

OQ14

OQl 5

Schreibmasqhinenanschluß(ROM 4)	Betriebs-KO(3e	DUMMY
Abaweif	Bit-Muster	DUMMY
Adresse	Q QQQ OQO QQO	DUMMY
	Q QQQ QQQ QOO	DUMMY
	O QQQ QQQ QQQ	DUMMY
	Q OQQ QOO OQQ	DUMMY
	Q QQQ QQQ QOQ	DUMMY
	Q QQQ OQO QOQ	DUMMY
	Q QOQ QQQ OQQ	DUMMY
	Q QQQ QOQ QOQ	X, APIA
	O QQQ QQO QQQ
	1111 IQl QlQ INCREG2

QQ64 02 5

QQ23

Q QH QlQ OU

1 QlQ XlQ

O QQl QOl

1 010 101 QOQ ΑΙ,ΡΗΑΙ

AGAIN

INCREMENT REG
Register erhöhen

DO IT ALL AGAIN
Alles nochmal tun

JSB OPLEV=I?DOES OP LEVEL =1? (RECALL STACK)
OP-Niveau =1?
(Stapel zurückrufen)

BRN SAVE
MTC

CONTINUE ROUTINE
Routine fortsetzen

RECALL TFLAG FOR SHIFT DIGIT

T-Kennzeichen für Umschaltziffer zurückrufen

0016

0017

0020

0021

409826/	ΔΧ. 22	UUÜ 0023
0862	23	0024
	24	0025
	25	0026
	26	0027
	27	0030

0374

0254

0274

0106

1 011 001 100

0 110 011 000

1 111 110 011

PTIl

IDC

BRN

1 010 110 101 EQUAL JSB

1 111 111 110 S,APIA

1 Oil 110 101 SAVE JSB

O 100 Oil 101 JSB

O Oil 001 110 W,ZTC

O 100 101 000 CTS

1 010 101 000 MTC

1 101 001 100 PT13

ALPHA2

OPLEV =1?

ADTEST

STOAID

SET POINTER TO SHIFT DIGIT Hinweismarke auf Umschalt-· ziffer setzen

LOAD SHIFT DIGIT
Umschaltziffer laden

CONTINUE ROUTINE
Routine fortsetzen

DOES OP LEVEL =1?

(RECALL STACK)
OP-Niveau = i?

(Stapel zurückrufen)

SET TYPEWRITER REG INDICATOR

Schreibmaschinen-Register-Indikator setzen

TEST ADDRESS
Adresse testen

SAVE ADDRESS IN D-REG Adresse in D-REgister bewahren

CLEAR C-REG
C-Register löschen

SAVE CLEARED REG IN STACK Gelöschstes Register im Stapel bewahren

RECALL TFLAG FOR UPDATE T-Kennzeichen für Aktuali~ sierung zurückrufen

SET POINTER FOR OP LEVEL OPDATE

Hinweismarke für Aktualisierung des OP-Niveaus setzen

CO OO -Ο-

0031

-29 0032

0033

003 4

860V	32	003 5
σ>	'.'. 33	0036
*^^ CD
OO CD to	• 34	0037
	35	0040
	36	0041
	37	0042
	38	0043

0 111 Oil 000 LDC7

0 010 111 111 BRN DIGEXl

1 010 101 000 NCHAR MTC

1 Oil 001 100 PTIl

0 101 100 010 P,CMlC

1 111 110 Oil BRN ALPHA2

1 Oil Oil Oil BRN INCREGl

O 000 000 000 DUMMY-

1 110 001 001 RECALLD JSB 0PLEV=7?

1 100 101

O 111 110

DNR

CTT N5 CO

cd co co

CO

SET OP LEVEL TO 7
OP-Niveau auf 7 setzen,

RETURN TO SUPERVISOR Zum überwachung sprogJcairan zurückgehen

RECALL TFLAG
T-Kennzeichen]zurückrufen SET POINTER TO SHIFT DiGIT Hinweismarke auf Umschaltziffer setzen

WAS THIS THE LAST CHARACTER? War dies das letzte Zeichen?

NO, CONTINUE IN SAME REG Nein,- im selben Register fortfahren

YES, TEST FOR NEXT REG Ja, Test für nächstes Register

DOES OP LEVEL =7?
OP-NIveau =7?

YES, RECALL RELATIVE ADDRESS Ja, relative Adresse zurückrufen

SAVE. RELATIVE ADDRESS' IN T-REG

Relative Adresse im T-Register bewahren

0044

0045

0046 0274

	42	0047
■Ρ· α φ QO CTJ	43 44	0050 0051
co m	45 46	0052 0053
	47	0054
	48	0055
	49	0056
	50	0057

0 110 101 000

1 111 001 010

1 Oil 110 101

O 111 111 000

1 101 oOl 010

1 110 101 110

O 100 001 110

O 100 001 HQ

O 100 001 HO

STA X,APCA

JSB TTC

X,AMCA W, AXC

W₁SLA W, SLA W, SLA

1 Hl 001 HO . RECALLE W,APCA

O Oil 010 001 JSB

O 010 101 000 DIGEXl CXM

ADTEST

AGAIN

RECALL ADDRESS TO A-REG Adresse ins Α-Register zurückrufen

ADD RELATIVE & ABSOLUTE ADDRESS

Relative und absolute Adresse addieren

CAN REGISTER BE CALLED ? Kann Register gerufen werden?

YES, RECALL RELATIVE ADDRESS Ja, relative Adresse zurückrufen

RESTORE STARTING REG ADDRESS Startregister-Adresse zurückstellen

.EXCHANGE REL/ABS ADDRESS ' Relative/absolute Addresse austauschen

SHIFT RELATIVE
Schieben die Relative

ADDRESS TO MANTISSA
Adresse zum Mantissen-

PORTION OF REG.
teil des Registers

LOAD SHIFTED RELATIVE ADDRESS Verschobene relative Adresse laden

CONTINUE ROUTINE
Routine fortsetzen

STORE NEW T FLAG

Neues T-Kennzeichen speichern

CD CO OO

|2 53

OQ&l 0062 QO63

O 1OQ QlQ OQQ

Q QOl IQl

O Ul QIl Oil

033,3, 1 IQl 101 Ul

ROM ?

GQ TQ

BRN BRN

NOTQ

IS RES Q

Igfc Registeir Null geyufen?

NO, CONTINUE TEST

Test fortsetzen

GO TQ ERROR ROUTINE
f zur Feiiler-'RQUtine gehen

CO CD CO

Seite	235	OI66	.0	111	Oil	Oil	BRN ΝΟΤΟ
53	0062	0333	1	101	101	111	BRN DSERR
54	0063	OIO6	0	100	Oil	101 AGAIN	JSB STOAI
55	0064	0274	1	Oil	110	101 JSB	ADTEST
56	0065		1	001	000	100	SS9
57	0066		1	010	101	000	MTC
58	. 0067		0	Oil	Oil	110	S, ZTC
59	0070		0	010	101	000	CXM
60	0071		1	Oil	111	000	DSTC
61	• 0072		1	000	010	100	YS8
62	0073	OOI5	0	000	110	111	BRN ALPHi
63	0074		0	000	010	000 PRT	ROM O
64	0075

65

0076

1 000 001 100 SLEPT ■ PT8 NO, CONTINUE TEST
Test fortsetzen

YES, GO TO ERROR ROUTINE ja, zur Pehlerroutine gehen

STORE COMPACTED ADDRESS IN STACK

kompakte Adresse im Stapel speichern

ENABLE REG
Register freigeben

SET RETURN FLAG
Rückkehrkennzeichen setzen

RECALL TPLAG

T Kennzeichen zurückrufen

SET OP LEVEL TO O

OP Niveau auf O setzen

STORE NEW PLAG

neues Kennzeichen speichern

RECALL CONTENTS OP D.S. TO C-REG

Inhalt von D.S. ins C-Register zurückrufen

ALPHA OR NUMERIC?
alpha oder numerisch?

ALPHA, GO TO ALPHA ROUTINE alpha, zur Alpha-Routine gehen

NUMERIC, GO TO PRINT ROUTINE numerisch, zur Druckroutine gehen

SET POINTER FOR SHIPT Hinweismarke für Verschiebung setzen

	66	0077
	67	0100
	68,	0101
	69	0102
	70	0103
	71	οιο4
409826;	72 73	0105 0106
O1' ca. ■ ma NJT.i	7·1ΐ·	m Π7

75	0110
76	Olli
77	0112
78	0113

0077'

0264

O 101 000 000 CONT

O 100 001 000

1 001 000 000

O 000 Oil 100

O 000 101 100

O Oil 111 111

O 000 110 000

O 100 101"000

1 110 101 110

ο ooo no ooo

ι on οίο on OUTD

IS2 SLT ISl

PRS

YPO

BRN CONT

RETURN

O 110 101 000 RCLDTA STA

1 110 1.01 110 STOAID W, AXC

CTS W, AXC

RETURN

BRN TESTPA

PREPARE TO SHIFT
Verschiebung vorbereiten

SHIFT LEFT ONE BIT · ein Bit nach links verschieben

PREPARE TO SHIFT POINTER Verschiebung der Hinweismarke vorbereiten

SHIFT POINTER
Hinweismarke verschieben

IS SHIFT COMPLETE?

ist Verschiebung vollständig?

NO, CONTINUE SHIFT

nein, Verschiebung fortsetzen

YES, RETURN TO CALLING ROUTINE ja, zur rufenden Routine zurückkehren

RECALL CONTENTS-OF D-REG TO A-REG

Inhalt des D-Registers ins A-Register zurückrufen

PREPARE TO STORE CONTENTS OF A-REG IN STACK
Speicherung des Inhalts des Α-Registers im Stapel vorbereiten

STORE IN STACK

im Stapel speichern

RESTORE REGISTERS
Register zurückstellen

RETURN TO CALLING ROUTINE zurück zur rufenden Routine

RETURN FROM PRINT/ALPHA, OUTPUT MORE?
zurück von Druck/Alpha, mehr ausgeben

K) CO

CD CO CO

-C*~ CO

79	0114
80	0115
81 ·	0116
82	0117
83"	Qiao
84	oiai
85	Q1S2
86	0123
87	01P4
88	0125
89	0126
90	0127
91	0130
92	0131
93	0132
94	0133
m	0134
96	0135
97	Ql:s6
98	0137
99	0140
100·	0141
101	. 0142

102

103

0143

0144

0	000	QQQ	QQQ	ALPHA9	DUMMY	GQ OUTPUT CHARACTER aur Zeicherausgäbe gehen
Q	010	010	OQQ		ROM 1
O	OQO	000	OQQ		DUMMY
O	QQO	QQQ	QQQ		DUMMY
Q	QOQ	OQQ	QQQ		DUMMY
Q	OQQ	QQQ	QQQ		DUMMY
Q	QQQ	QQQ	QQQ		DUMMY
Q	QQQ	QQQ	000		DUMMY
Q	QOQ	QQQ	QQO		DUMMY
Q	QOO	QQQ	QOQ		DUMMY
Q	QQQ	QQQ	QQO		DUMMY
Q	QQQ	OQQ	QQQ		DUMMY
Q	QQQ	QQO	QQQ		DUMMY
Q	QQQ	QQQ	QQQ		DUMMY
Q	QQQ	QQQ	QQQ		DUMMY
O	QQQ	QQQ	QQQ		DUMMY
Q	QQQ	QOO	000		DUMMY
Q	QOQ	QQQ	QQQ-		DUMMY
O	000	OQQ	QQQ		DUMMY
O	QOQ	QQQ	QQQ		D'UMMY
O	QOQ	QQQ	OQQ		DUMMY
Q	000	OQQ	QOQ	ALPHA3	DUMMY	LOAD IN T-REG im T-Register laden
O	IU	no	QQQ		CTT	INITIAUZiE POINTER FOR SHIFT Hinweismarke für Verschie bung initialisieren
1	IQQ	QQl	IQQ	PT12

Q QQO Oil 1OQ ROTATE PRS

SHIFT POINTER
Hinweismarke verschieben

K) co cn co co 4^ co

	104	0145
	ίθ5ν;	0146
	106/	0147
	]C7	0150
	108	0151
	109	0152
O α? co ISJ CD	110 111	0153 0154
0 8 6 2	112	0155
	Seite 113	236 0156

0144

0075

114

115

116

0157

οιβο

οι6ι

1	001	001	110	W, SRC
0	000	101	100	YPO
0	110	010	Oil	BRN
0	101	000	000	IS2
0	100	101	000	IXT
1	001	000	000	ISl
0	Oil	111	001	JSB

0 101 000 000

0 Oll 001 000

1 001 000 00c

0 111 111 000

1 Oil 110 COO

0 101 000 COO

DTDS IS2 SHIFT DATA

Daten verschieben

IS .SHIFT COMPLETE?'

ist Verschiebung vollständig?

ROTATE NO, CONTINUE TO SHIFT

nein, Verschiebung fortsetzen

YES, SHIFT I/O REG

ja, I/0-Register verschieben

SAVE 8 BITS FIRST
zuerst 8 Bits bewahren

PREPARE TO SHIFT
Verschiebung vorbereiten

SLEFT ' SHIFT I/O REG LEFT 8 BITS

l/0-Register um 8 Bits nach links verschieben

PREPARE TO FINISH ROTATE Beenden des Rötierens vorbereiten

LOAD FIRST 8 BITS AT END OF REG

erste 8 Bits am Ende des Registers laden

PREPARE TO STORE DATA Datenspeicherung vorbereiten

SAVE ROTATED WORD IN C REG rotiertes Wort im C-Register bewahren

STORE IN DATA STORAGE

in Datenspeicherung speichern

PREPARE TC RECALL 8 BITS Rückruf von 8 Bits vorbereiten

OO U) •ΓΟΟ

	11.7	0162
	ιιδ	öl 63
	119	0164
	120	0165
	121	OI66
	122	0ΐβ7
4 0 9 8 2 6/	123 124	0170 . 0171
ο CD to	125	OI72
	126	0173
	127	0174
	128	0175
	129	0176
	130	0177
	131	0200

0115

0333

0333

0311

0 010 001 000

0 100 101 000

1 001 000 000

0 100 110

0 001 111 010 ΝΟΤΟ

1 101 101 111

0 001 001 100

0 001 100 010

XOR

IXT

131

BRN

XS,CMl

ALPHA9

BRN DSERR

PTl

P ,CMl

CLEAR T REG FIRST

zuerst T-Register löscher.

RECALL FIRST 8 BITS

erste 8 Bits zurückrufen. ' ■

PREPARE TO OUTPUT
Ausgabe vorbereiten

GO TO OUTPUT ROUTINE zur Ausgaberoutine gehen ,

IS REG ADDRESS GREATER THAN 99? ist Registeradrsse größer als 99?

YES,.GO TO ERROR ROUTINE ja, zur Fehlerroutine gehen

No, SET POINTER FOR GREATER THAN 9 TEST

nein, Hinweismarke für · "größer als 9" -Test setzen IS REG ADDRESS GREATER THAN' 9? ist Registeradresse größer als 9?

1	101	101	111	STO	BRN DSERR	YES, GO TO ERROR ROUTINE ja, zur Fehlerroutine gehen
1	110	101	110	W, AXC	LOAD ADDRESS IN C -REG Adresse im C-Register laden
1	Oil	001	100	PTU	SET POINTER TO LOAD ADDRESS Hinweismarke setzen, um Adresse zu laden
1.	110	Oil	000	LDCl 4	LOAD ADDRESS Adresse laden
1	Oil	000	100	SSH	SET FLAG Kennzeichen setzen
1	100	100	111	BRN EREG	ENABLE REG Register freigeben
1	100	101	000	DNR	RECALL ALPHA WORD FRCM STACK Alpha-Wort vom Stapel zurück rufen

CO

cn co co

co

O CD OO IS) O)

132

133

135

144

0201

0202
0203

0204

0326

136	0205	0200
137	0206
138	0207
139	0210	0365
i4o	0211	O34I
141	0212
142	O213
143	0214

0215

0274

0 000 001 100

0 Oil 000 010

1 101 011 101

0 100 01Q 000 SYNTAX ROM

0 100 010 100 CPARl

1 000 000 Oil

0 100 100 100

0 110 101 000

1 111 010 111

1 110 001 001 OPAR

0 110 101 000

0 110 101 000

1 Oil 110 101 PREP STO '

PTO SET POINTER TO CLEAR SHIFT

DIGIT

Hinweismarke setzen, um Schiebeziffer zu löschen

P,ZTC CLEAR SHIFT DIGIT

Schiebeziffer löschen

JSB STOREG PREPARETO STORE WORD IN DATA

STORAGE

Wortspeieherung in,Datenspeicherung vorbereiten

GO TO ROM 2 ERROR ROUTINE zur Fehlerroutine des ROM 2 gehen

WASLASTREGFILLED?'

war letztes· Register gefüllt?

NO, COMPLETE LAST WORD nein, letztes Wort vollenden

YES, RESET FLAG

ja, Kennzeichen zurücksetzen

RECALL NEW ALPHA WORD (TO BE:DESTROYED)

neues Alpha-Wort zurückrufen (um es zu zerstören)

CONTINUE ROUTINE
Routine fortsetzen

DOES OP LEVEL 7?

OP-Nlveau 11 . . . .

YES, PREPARE STACK
ja, Stapel vorbereiten

RECALL REG ADDRESS TO A-REG Registeradresse ins A-Register zurückrufen

JSB ' ADTEST TEST ADDRESS AND ENAELE REGISTER

Adresse testen und Register freigeben

BRN EXIT

JSB OPLEV 7?

CD OJ OJ -P-OO

145
146

148

149
150

0216

0217
0220
0221

0222
0223

0106

ο co	151	0224
8.2 6/	152	0225
0862	153	0226
	154	0227
	155	0230
	156	0231
	157	0232
	158	0233

0057

0 100 011-101

0 011 001 110

0 111 110 000

0 000 OCl 100

0 110 011 000

0 100 101 000

1 010 101 000

1 101 001 100

0 110 011 000

C 010 111 111

JSB STOAID

W, ZTC

BRN DIGEXl

0 000 001 100 ST0RE9 PTO

0 110 000 010

■ P,CTA

0 101 100 010 SHIFTl P,CMlC

0316

1 100 111 011

BRN SHIFT

STORE .NEW ADDRESS IN STACK neue Adresse im Stapel soeichern,

CLEAR C-REG
C-Register löschen

CLEAR T-REG
T-Register löschen

SET POINTER FOR SHIFT DIGIT Hinweismarke für Sohiebeziffer setzen

LOAD SHIFT DIGIT
Schiebeziffer laden

SAVE ALPHA WORD IN STACK Alpha-Wort in Stapel bewahren

RECALL TFLAG FOR UPDATE T--Kennzeichen für Aktualisierun zurückrufen

SET POINTER TO UPDATE OP LEVEL Hinweismarke setzen, um OP-Niveau auf den neuesten Stand zu bringen

SET OP LEVEL TO 6
0P-Niveau auf 6 setzen

RETURN TO SUPERVISOR zurück zum Überwachungsprogramm

SET POINTER ON SHIFT DIGIT Hinweismarke auf Schiebeziffe? setzen

LOAD SHIFT- DIGIT IN A-REG Schiebeziffer in A-Register laden

DECREMENT SHIFT DIGIT, WA3 It U? Schiebeziffer erniedrigen, war sie 0?

NO, SHIFT DATA

nein, Daten verschieben

159

0234

160 %	0235
161	0236
162	0237
163	0240
164	0241
165	0242
166	0243
167	0244

168

0250

0245

169	0246
170	0247
171	025c
172	0251

0215

0 Oil 000 010

0 101 000 000

0 Oil 001 000

1 001 000 000

0 111 111 000

P ,ZTC

1 101 IOO 010 LASTCH? P,AMlA

1 010 100 Oil

1 Oil 110 000

0 100 000 100

0 110 101 000

1 111 101 010

1 QCO HC 111

BRN ST0RE2

X,APIA

BRN FRE?

1 110 100 01.0 3T0RE2 P,AXC

O 100 101 000

CLEAR THE 9 LEFT PROM SHIFT DIGIT

die 9 Linken von Schieberegister löschen

YES, PREPARE TO ADD CHARACTER ja, Zeichenhinzufügung vorbereiten

PLACE CHARACTER AFTER LAST CEARACTER

Zeichen hinter letztes Zeichen plazieren

PREPARE TO STORE WORD Wortspeicherang vorbereiten

BRING WORD TO C-REG Wort ins C-Register bringen

WAS THIS THE LAST CHARACTER? war dies das letzte Zeichen?

NO, SAVE ALPHA WORD nein, Alpha-Wort bewahren

YES, LOAD ALPHA WORD IN D.S. ja, Alpha-Wort in D.S. laden

SET RSG FILLED FLAG Kennzeichen "Register gefüllt" setzen

RECALL LAST ADDRESS TO A-REG letzte Adresse ins Α-Register zurückrufen

INCREMENT REG ADDRESS Registeradresse erhöhen

PREPARE NEXT REG

nächstes Register vorbereiten

RESTORE SHIFT DIGIT Schiebeziffer zurückstellen

RESTORE ALPHA WORD IN STACK Alpha-Wort in Stapel zurückstellen

O
CD
CO
NJ
CO
^
O

215 216 217 218

219 220

221.

222 225 224 225 226 22? 228

0325 O326 O327

O33O O33I

O332 0333 O334 0335 0336 0337 O34O 0341

C321

O36O

O367

1 101 000

0 111 110

1 111 000 Oil

BRN

CTT

BRN PMS7

1 Oil 110 000 STOREG DTDS

1 010 101 000 MTC

O 110 101 000 STA

1111011111 BRN SOL

1 010 101 000 DSERR MTC

O Oil Oil 110 S,ZTC

O 010 101 000 CXM

O 100 010 000 ROM

O 111 111 110 OPLEV-^5? S,CPlC O 111 111 110 CPLEV 6? S,CPlC NO, CONTINUE SHIFT nein, Verschiebung fortsetzen

YES, RELOAD IN T-REG ja, erneut im T-Register laden

CONTINUE ROUTINE · Routine fortsetzen

STORE LAST ALPHA WORD IN DATA STORAGE letztes Alpha-Wort in Datenspeicherung speichern

RECALL TFLAG FOR UPDATE T-Kennzeichen für Aktualisierung zurückrufen

RECALL LAST REG ADDRESS FOR DISPLAY

letzte Register-Adresse für Anzeige zurückrufen

CONTINUE ROUTINE Routine fortsetzen

RECALL TFLAG T-Kennzeichen zurückrufen

SET OP LEVEL TO O OP-Niveau auf O setzen

STORE NEW FLAG neues Kennzeichen speichern

GO TO ERROR ROUTINE zur Fehlerroutine gehen DOES OP LEVEL 6? (3) OP-Niveau 6?

DOES OF LEVEL OP-Niveau - β?

6? (2) (2)

O 111 111

S,CPlC DOES CP LEVEL 5? OP-Niveau 5?

co

O) OO

co

CO

0306

0 001 Ul UO

* S, CMl

	202	O3O7	OO6I	0	Oil	000	111	EREG	BRN TYPE
	203	. O3IO		1	.110	101	HO		W, AXC
	204	03II		1	001	110	000		ATDS
	205	O312		1	OU	010	I1OO		YSIl
O	206	O3I3	0333	1	101	101	Hl		BRN DSER
CO CXJ	207	O314		1	Oil	100	100 '	SHIFT	RSIl
0/3	208	O3I5		0	000	HO	000	RETURN
OO co	209	C316	0075	0	Oil	Ul	0ül	JSB SLEF

O317

032c

0232

1 001 101 Oil

SHIFTl

O 111 111 000 SRIGHT TTC

212	O32I
213	O322
214	0323

1 001 001 110 SR

O 000 Oil

O 000 101

W, SRC

IS TYPEWRITER REG CALLED? Sohreibmaschinenregister gerufen?

YES, FINISH ADDRESS ja, Adresse beendet

NO, FINAL ADDRESS TO-C-RSG nein, endgültige Adresse ins C-Register

ENABLE REG.
Register freigeben

WAS REG FOUND?
Register gefunden?

NO₅ GO TO ERROR ROUTINE Neinj, zur Fehlerroutine gehen

YES, RESET FLAG

$a_s Kennzeichen zurücksetzen

RETURN TO CALLING ROUTINE Zurück zur rufenden Routine

SHIFT LEFT 8 BITS
um 8 Bits nach links verschieben

CHECK IF SHIFT IS COMPLETE prüfen, ob Verschiebung vollständig ist

LOAD IN C-REG FOR RIGHT SHIFT im C-Register für Rechtsverschiebung laden

SHIFT RIGHT

nach rechts verschieben

SHIFT POINTER
Hinweismarke verschieben

OJ CO

IS SHIFT COMPLETE? Co

Ist Verschiebung vollständig?

186

0267

	187	0270
	188	0271
	I89	0272
	190	0273
	191	0274
*·*
O	192	0275
CD
CO NJ	193	0276
cn
CD	194	0277
CO
CD ·
KJ	195	0300
	196	0301
	197	0302
	• 198	0303
	199	0304
	200	0305

0011

οοβο

0300

1 101 100 110

0 000 100 111

1 000 100 100

1 001 100 100

0 Oil 000 Oil

0 000 Oil loO

0 000 101 100

1 100 000 Oil

1 111 100 010

M,AMlA

INCREG2

DIGEX2

0 000 000 000 DUMMY

1 110 101 110 ADTEST W,AXC

0 110 001 010 RPGO X,CTA

1 010 001 IOC PTlO

0 100 001 110 SHIFTR W₁SLA

1 111

010

BRN SHIFTR

P,APIA

P,APIA DECREMENT REL ADDRESS, LAST REG?

relative Adresse erniedrigen, letztes Register?

NO, INCREMENT REG
nein, Register erhöhen

YES, RESET STATUS BIT ja, Zustandsbit zurücksetzen

RESET STATUS BIT
Zustandsbit zurücksetzen

RETURN TO SUPERVISOR

zurück zum Überwachungsprogramm

LOAD ADDRESS IN C-REG Adresse in C-Register laden

ADDRESS TO A-REG
Adresse ins A-Register

SET POINTER FOR SHIFT Hinweismarke für Verschiebung setzen

SHIFT ADDRESS
Adresse verschieben

SHIFT POINTER
Hinweismarke verschieben

IS SHIFT COMPLETE?

ist Verschiebung vollständig?

NO, CONTINUE SHIFT

nein, Verschiebung fortsetzen

LOAD EXPONENT

laden den Exponenten -

PART OF ADDRESS
Teil der Adresse

CD OO Ca) ■$> CO

	Seite	237
	173	0252
	174	0253
	175	0254
	176	0255
	■ 177	0256
O	178	0257
co
OO N)	179	0260
CO
O	I80	0261
CX)

181

0060

0204

0262

182	0263
183	0264
184	0265
185	0266

0033

0 Oil 001 110 ST0RE3 W,ZTC

O 111 110 000

0 on 000 011

BRN DIGEX2

1 000 101 110 OPLEV-I? W,BXC

1 010 101 000

O 101 111 110

O 101 111 110

1 000 010 on

O 110 101 000

O 000 110 000

, CMlC

S₁CMlC

BRN SYNTAX

RETURN

1 OCO 010 100 TESTPA YS8

O 001 101 111

BRN NCHAR

O 110 101 000 INCREGl STA CLEAR C-REG C-Register löschen

CLEAR T-REG T-Register löschen

RETURN TO SUPERVISOR zurück zum Überwachungsprogramm

SAVE DATA IN B-REG Daten in B-Register bewahren

RECALL TPLAG T-Kennzeichen zurückrufen

DOES OP LEVEL O? OP-Niveau ■■ O?

DOES OP LEVEL 1? OP-Niveau =1?

NO, GO TO SYNTAX ERROR ROUTINE

nein, zur SYNTAX-Fehler-Routine gehen

YES, RECALL ADDRESS PROM STACK ja, Adresse vom Stapel zurück rufen

RETURN TO CALLING ROUTINE zurück zur rufenden Routine

IN PRINT ROUTINE? in Druck-Routine?

NO, CHECK NEXT CHARACTER nein, nächstes Zeichen prüfen

YES, RECALL ADDRESS TO A-REG , ja, Adresse 5ns A-Register zurückrufen

	229	0342
	230	0343
	231	0344
	232	Ο345
	Seite	238 0346
■Ρ» O co co	234	0347
26/	235	^ 0350
0862	236	0351
	237	0352
	238 ·	03'53
	239	0354
	240	0355
	241 242	0356 0357

0 111 111 110 OPLEV 7? -S,CPlC

0204

O336

0 111 111 110

0 111 111 110

0 Ul 111 110

1 000 010 OU

0 000 no 000 ■

0 Oil 001 HO

S,CPlC S,OPlC 3,CPlC

RETURN

1 101 111 101 STORE JSB

W, ZTC

0	001	001	100	PTl
1	111 ·	Oil	000	LDC15
1	111	Oil	000	LDC15
0	101	000	000	IS2
0	010	101	000	AND
1	001	OCO	000	ISl

DOES OP LEVEW? (6)
OP-Niveau 7? (β)

DOES OP LEVEL 9?
OP-Niveau 9?

DOES OP LEVEL-8?
OP-Niveau 8?

DOES OP LEVEL-7? (6)
OP-Niveau 7? (6)

SYNTAX NO, GC TO SYNTAX ERROR ROUTINE nein, zur SYNTAX-Fehler-Routine gehen

YES, RETURN TO CALLING ROUTINE

ja, zurück zur rufenden Routine q

OPLEV-5? DOES OP LEVEL -6?
OP-Niveau -6?

YES, CLEAR C-REG FOR BIT MASK ja, C-Register für Bit-Maske löschen

SET POINTER FOR MASK Hlnweismarke für Maske setzen

LOAD MASK
Maske laden

. IN C-REG
im C-Register

SELECT ONLY
nur Auswahl

8 LSB

OF T-REG

des T-Registers

CD CO CO

CD
(si

244
245
246
247
248

249

0260

0561 0562 0563 0364

0365 0366

0 100 100 100 PMS7 " RS4

O23O 0336 0205

250	. 0367
251	0370
252	0371
253	0372
254	.0373
255	0374

0057

1 100 101

1 001 100 Oil

1 101 111 101 CPAR

1 000 010 111.

0 110 101 000 EXIT

1 101 101

0 Oil Oil 110 SOL

1 100 001

0 001 100

0 010 111

0 010 010

ST0RE9

JSB OPLEV-5?

X,AMlA

CPARl

S_S.ZTC

P, CMl

BRN DIGEXl

RESET. REG FILLED FLAG Kennzeichen für "Register gefüllt" zurücksetzen

RECALL ALPHA FROM STACK Alpha vom Stapel zurückrufen

CONTINUE ROUTINE
Routine fortsetzen

DOES OP LEVEL -6? 0P-Niveau 6?

ro ω cn

0 010 101 000 ALPHA2 CXM YES, CONTINUE ROUTINE ja, Routine fortsetzen

RECALL REG FOR DISPLAY Register für Anzeige zurückrufen

RESTORE PROPER VALUE OF LAST REG USED

richtigen Wert des letzten benutzten Registers zurückstellen

SET OP LEVEL TO 0 OP-Niveau auf C setzen

SET POINTER TO OP MODE Hinweismarke auf OP-Betrleb setzen

PROGRAM MODE ?
Programmbetrieb?

YES, DO NOT DISPLAY REG Ja, Register nicht anzeigen

NO, DISPLAY LAST REG nein, letztes Register anzeigen

STORE NEW FLAG

neues Kennzeichen speichern

256

257 258

03575

0376 0377

0142

1 Oil 111

0 110 001 Oil 0 000 000

DSTC

BRN ALPHA? DUMMY

RECALL CONTENTS OF DATA STORAGE Inhalt der Datenspeicherung zurückrufen

CONTINUE ROUTINE
Routine fortsetzen

O CO CT? NJ ro

CO

co

CO

co

"CO

Zeilen laufende Ur. Adrösse

0000 0001 0002 0003 0004

10

0005

0006

0007,

TYPEWRITER INTERFACE LISTING (ROMg)

'Abzweig ,Betriebs-Kode , ■ ■ Adresse Bit^Muster

1 010 001

0313

0 101 000 000 LOAJDP IS2

ι oöo ιοί ooo

1 OO1 000

1 100 110 001 ^LOADED JSB BIH-BCD

ι ioo ιοί no

W, AXB

O 100 001 110 LSHIPT W,SLA

ο ooo in ioo

SET POINTER TO CONVERT iö bits , ; Hinweismarke setzen, um 10 Bits umzuwandeln

PREPARE TO LOAD PROGRAM COUNTER

Ladung des Programm-Zählers vorbereiten

LOAD PROGRAM, COUNTER IN TREG

Prdgräitimzähler in Τΐ-Register laden

PREPARE TO CONVERT PROGRAM CNTR TO BCD Umwandlung des Prögrammzählers in BCD vorbereiten CONVERT PROGRAM'COUNTER TO BCD NUMBER

Programmzähler inBCD*-2ahl umwandeln

PROGRAM COUNTER TO A-REG Programmzähler ins'.Ä^Regi-■· ster

SHIFT A-REG LEFT Ä-Register nach links verschieben

SHIFT, POINTER. LEFT Hinweismarke nach links verschieben , .. -; ·Χ·

	11	0010
	12	0011
	13	0012
	14	0013
	15	0014
σ	16	0015
co
00 K)	17	0016
cn		•
O	18	0017
00
OT NJ	19	0020
	20	0021
	21	0022
	22	0023
	23	0024
	24	0025

1 001 101 100

0 000 Oil Oil

0 Oil Oil 110

O 101 111 110

1 000 100 001

1 100 010 000 CPAR

O Oil 001 110 T377

O 111 110 000

O 101 000 000

O 100 101 000

1 001 000 000

1 101 001 100

1 111 Oil 000

O 000 000 000

YP 9 BRN

S, ZTC S,CMlC

JSB ROM 6 W,ZTC CTT IS2

IXT ISl PT13

LDC15 NOP

LSHIFT

PCOUT

IS ADJ.COMPLETE?
Justierung vollständig?

NO,. CONTINUE TO SHIFT Nein, Verschiebung fortsetzen

CLEAR SIGNDIGIT
Vorzeichenziffer löschen

LOAD 9 IN SIGN DIGIT ■ 9 in Vorzeichenziffer laden

CONTINUE ROUTINE
Routine fortsetzen

GO TO MNEMONIC FOR ) Zur MNEMONIKJfür )

CLEAR C-REG
C-Register löschen

CLEAR T-REG
T-Register löschen

PREPARE TO LOAD CODE IN T-REG

Kodeladung in T-REgister vorbereiten

LOAD CODE IN T-REG Kodejin T-Register laden

PREPARE TO TEST CODE KOdetest vorbereiten

SET POINTER FOR 377 TEST Hinweismarke für "377" Test setzen

LOAD MASK
Maske laden

FOR END OF
Für Ende von

N) CO

CD CO CO

■P*

co

0026

26

0266

0030

0031 0073

0032

09826	30	0033
/0862	31 32	0034 0035
	33	0036

0037

0040

1 111 011 000

1 011 011 011

1 Oil olO 100 TESTl .

0 Oil 101 111

0 101 000 000

0 101 001 000

0 101 001 000

1 001 000 000

1 101 001 100

0 110 000 010

BRN IS2

SET SRT ISl PT13

0 111 1111000 BIN-OCT TTC

P, CTA TEST

OCTAL FIELD TEST
OKtalfeld. Test

GO TO TEST ROUTINE Zur Testroutine gehen

WAS THERE A CARRY DURING j£ TEST? · ^,

Ist währenddes Tests ein Übertrag aufgetreten?

NO, CODE IS 377
Nein, Kode ist "377"

YES, BEGIN BIN-OCT CONV BY LOADING 2 ZEROES Ja, Bin/Oktal-Umwandlung beginnen durch Ladung von 2 Nullen

FIRST ZERO
Erste Null

SECOND ZERO
Zweite Null

LOAD T-RE₁G
T-Register laden

SET POINTER FOR BINARY TO OCTAL CONVi

Hinweismarke setzen für Binär/Oktal-Umwandlung

INTO C-REG
Ins C-Register

LOAD DIGIT IN A-REG

Ziffer ins Α-Register laden

36

37

46

47

0041

0042

	38	0043
	3 9	0044
	40	0045
*»*	41	0046
O
gö
co tv)	42	0047
'cn
^.	43	0050
O
CO
CD	44	0051
JxJ
	45	0052

0053

0054

0055

0056

0037

Olli

O Oil 000

O 111 110

O 101 000

OO 101 001

1 001 000 000

O 000 Oil 100

1 010 101 100

O 001 111 111

1 Oil 001 110

O Oil 001 110

O 101 111 110

1 110 100 110

O 110 000 110

O 100 101 001

P, ZTC

CTT

IS2

SRT

ISl

PRS

YPlO

	BRN BIN-OCT
	W,SRA
OUTPUT	W, ZTC
	S,CMlC
0ÜTPÜT1	M, AXC
	M,CTA

JSB

CTl

CLEAR DIGIT' IN C-REG Ziffer in C-Register löschen

RELOAD IN T-REG

erneut ins T-Register laden

INSERT ANOTHER
Einfügen einer anderen

ZERO IN THE
Null in der

BINARY NUMBER
Binärzahl

SHIFT POINTER
Hinweismarke verschieben

IS CONVERSION DONE?
Umwandlung fertig?

NO, CONTINUE
Nein, fortsetzen

YES, SHIFT BCD NUMBER Ja, BCD-Zahl verschieben

CLEAR C-REG
C-Register löschen

SET SIGN DIGIT TO 9 Vorzeichenziffer auf 9 .■setzen . , .

LOAD. DATA IN C-REG

Daten ins C-Register laden

RELOAD IN A-REG

Zurück ins A-Registe'r laden

OUTPUT FIRST DIGT
Erste Ziffer ausgeben

to

CO

cn

CO CO

CO

0057

0060

0061

54

55

α> 56

^ 57

ot 58

61

0063

0065

0067

0070

0071

0072

0073

0 000 111 100

0 100 001 110

1 101 101 100

0062 0054 0 010 110 Oil

0 000 010 100

0374 1 111 110 Oil

0 000 100 100

0102 0 100 001 101

1 100 101 000

1 000 101 UO

1 100 101 000

0 100 010 000

0 111 100 100

•KEY

RETURN

377

PLS W, SLA YP13

BRN OUTPUTl

YSO

BRN

LIST2

RSO

JSB CR/LF DNR ■

W, BXC DNR

ROM 2 RS 7

SHIFT POINTER
Hinweismarke verschieben

SHIFT DATA

Daten verschieben

IS OUTPUT COMPLETE?
Ausgabe beendet?

NO, CONTINUE ,
Nein, fortsetzen

YES, IS KEY DOWN?
Ja, Taste unten?

NO, CONTINUE TO LIST NEIn, auflisten fortsetzen

YES, RESET STATUS BIT Ja, Zustandsbit zurücksetzen

DO A CR/LF
CR/LF ausführen

RECALL DATA FORM STACK Daten vom Stapel zurückrufen

SAVE DATA IN B-REG

Daten im B-Register bewahren

PREPARE STACK FOR STORE Stapel für Speicherung vorbereiten

RETURN TO SUPERVISOR VIA R0M2 Zurück zum uberwachungsprogramm über ROM 2

RESET QUOTE FIELD FLAG "-^FeId" Kennzeichen
setzen

CO

CJ) CaJ CO

CO

63

0074

	64	0075	0015	-	0002
	65	0076
	66	0077	0037
	67	0100
co CX),	68	0101
ro
cn	69	0102	0351
O
QO OT	70	0103
KJ
	71	• 0104
	72	0105

0106

0107 0351

0110

1 Oil 001 100

0 000 110 111

0 101 000 000

0 010 000 001

0 101 101 000

1 001 000 000

1 110 100 111

0 101 000 000

0 000 001 101

0 101 101 000

1 001 000 000

1 110 100 111

TAB

CR/LF

BRN IS2 LIO SRI

BRN IS2 LIO SRI

ISl BRN

CPAR

100

WAIT

006

WAIT

1 Oil 001 100 MNEMONIC PTIl SET POINTER FOR MNEMONIC GENERATION

Hinweismarke für MNEMONIK~ Erzeugung setzen

GO TO ")"
Zu ")" gehen

PREPARE TO OUTPUT TAB Tabellenausgabe vorbereiten

LOAD CODE FOR TAB
Kode für Tabelle laden

SHIFT CODE TO OUTPUT POSITION

Kode zur Ausgabeposition verschieben

PREPARE TO OUTPUT
Ausgabe vorbereiten

OUTPUT TAB
Tabellenausgabe

PREPARE TO OUTPUT CR/LF Ausgabe von CR/LF vorbereiten

LOAD CODE FOR CR/LF Kode für CR/LF laden

SHIFT CODE TO OUTPUT POSITION

Kode in Ausgabeposition verschieben

PREPARE TO OUTPUT *£

Ausgabe vorbereiten jg

OUTPUT CR/LF **

CR/LF-AUSGABE

SET POINTER TO BEGIN MNEMONIC GENERATION

Hinweismarke setzen, um Mnemonik-Erzeugung zu beginnen

O 00 OT IsJ

76 0111

77 Q112

78 0113

79

82

84

86

0114

80 0115

81 0116

0117

85 0122

0351

1 100 010 000

0 111 110 000

0 101 000 000

- 0 100 101 000

1 001 000 000

1 110 100 111

0 101 010 100

83 0120 0144 Ό 110 010 Oil

0121 · 0240

1 010 000 101

0 101 100 100

0123 0126 0 101 Oil Oil

CTl

ROM 6

CTT IS2

IXT

LBLl

ISl	WAIT
BRN
YS5	JMP/SUB
BRN	STACK2
JSB

RS 5

BRN

LBL

GO TO ROM 6 TO GENERATE

MNEMONICS

zum ROM 6 gehen, um

Mnemonik zu erzeugen

NJ

CO

cn

LO

co

CO

LOAD DATA IN T-REG

Daten in T-Register.laden

PREPARE TO LOAD DATA IN

I/O-REG

Laden der Daten ins 1/0-

Register vorbereiten

LOAD DATA IN I/O-REG
Daten ins I/O-Register
laden

PREPARE TO'OUTPUT
Ausgabe vorbereiten

OUTPUT DATA
Daten ausgeben

WAS LAST INSTR A LBL?

War letzte Instruktion ein

LBL?

NO, TEST FOR JMP/SUB
Nein, auf JMP/SUB prüfen

YES, READ NEXT 2 INSTRUCTIONS & STACK IN C-REG

Ja, nächste 2 Instruktionen

lesen und im C-Register

stapeln

RESET LBL FLAG
LBL-Kennzeichen zurücksetzen

CONTINUE ROUTINE
Routine fortsetzen

0124

0125

0126

σ to	91	0130
00 ΓΌ OD
O	92	0131
CO CP	93	0132
	94	0133
	95	0134
	96	0135

1 110 100 101 1 110 010 000

0 110 001 110 . LBL

1 Oil 001 110 1 010 001 100

0 110 010 100

0 101 111 Oil 0 110 100 100

0 Oil 111 001 LBL3 0 010 101 Oil

JSB ROM 7

W, CTA

W, SRA PTlO

YS 6

BRN RS 6

JSB

BRN

WAIT

CR

TAB

OUTPUT

OUTPUT MNEMONIC
Mnemonik ausgeben

RETURN TO SHIFT MNEMONIC
Zurück zur Mnemonikverschiebung

LOAD COMPLETED LABEL IN
A-REG

Vervollständigtes Etikett ins Α-Register laden

SHIFT LBL

LBL verschieben

SET POINTER FOR LAST DIGIT OUT

Hinweismarke für letzte

Ausgangsziffer setzen

WAS LAST INSTR SUB OR JMP? War letzte Instruktion
SUB oder JMP?

NO, DO A CR

Nein, CR ausführen

YES, RESET FLAG
Ja, Hinweismarke zurücksetzen

TAB FOR LBL POSITION
Tabelle'für Etikett
Position

DUTPUT LBL
Etikett ausgeben

CO

cn

CO CO

CO

OO PO CD

97
98
99
100

102
103
104
105

0136 0137 014ο 0141

101 0142

0143 0144 0145 0146

106 0147

107 0150 J08 0151

0 101 000

0000 0 000 000

0 101 101

1 001 000

0350 1 110 100

0134 0 101 110 Oil

0 110 010

0204 1 000 010 Oil

0240 1 010 000

0 110 100

1 000 010

0154 0 110 110 Oil

CR IS2 LIO SRI ISl JSB BRN

JMP/SUB YS6

JMPl

BRN

JSB

RS 6

YS8

BRN

002

WAIT LBL 3

LEND STACK2

LOAD CODE
Kode laden

FOR A CARRIAGE Für Wagen-

RETURN AND
Rücklauf und

THEN OUTPUT
dann ausgeben

THAT CODE
diesen Kode

NOW TAB AND OUTPUT LBL. nun TAB und LBL ausgeben.

WAS INSTR JMP OR SUB? War Instruktion JMP ODER SUB?

NO, TEST FOR END Nein, Test auf Ende prüfen

YES, READ NEXT 2 INSTRUCTIONS & STACK IN C-REG Ja, die nächsten 2 Instruktionen lesen, und imC-Register stapeln RESET REL/ABS FLAG REL/ABS-Kennzeichen zurücksetzen

WAS INSTR SUBC? War Instruktion SUBC?

NO, OUTPUT ABS/REL ADDRESS Nein, ABS/REL-Adresse ausgeben

0152

110

111

112

0153

0154

0155

	Seite	241
-ί-	113	0156
Ο
co
co	114	,0157
CD
•ν.	115	0160
O
α>
co
	116 %	0161

117

0162

0163

0164

0165

1 000 100 100

0 Oil 001 111

1 001 001 110

0 000 111 100

1 010 101 100

0 110 110 Oil

0 111 110 000

0 111 010 100

0 111 100 111

0 111 100 100

0 101 000 000

0 010 001 000

JMP 4

RS 8

W, SRC

RS 7 IS2

KEY

yPlO	JMP 4	•
BRN		CONVERT
CTT
YS7
BRN

YES, RESET FLAG

Ja, Kennzeichensurück-

setzen

TEST FOR KEY DOWN Prüfen, ob Taste unten

SHIFT ADDRESS.TO Adresse verschieben zum

LOW END OF WORD unteren Ende des Wortes

IS SHIFT DONE? Verschiebung fertig?

NO, CONTINUE Nein, fortsetzen

YES, RELOAD IN T-REG Ja, erneut im T-Register laden

IS JMP-FLAG SET?

Ist JMP-Kennzeichen gesetzt?

NO, CONVERT ADDRESS TO BCD

NUMBER

Nein, Adresse in BCD-Zahl

umwandeln

YES, RESET FLAG

Ja, Kennzeichen zurücksetzen

PREPARE TO COMPLEMENT ADDRESS Komplementierung der Adresse vorbereiten

CLEAR T-REG T-Register löschen

0166

0167

	123	0170
	124	0171
409826/	125 126	0172 0173
Ό862	127 128	0174 0175
	129	0176
	130	0177
	131	0200
	132	0201

0313

1 101 001 000

0 010 001 000

1 101 001 000

0 101 000 000

1 100 001 000 1 001 000 000

1 100 110 01
1 100 101 110 0 000 001 100 0 100 001 110

0 000 111 100

1 001 101 100

CONVERT

JMP 5

JMP 6

TDEC XOR

SET T-REG TO ALL ONES T-Register mit 1 füllen

COMPLEMENT C-REGMID LOAD RESULT IN T-REG
C-Register komplementieren und Ergebnis in T-Ilegister laden

ADJUST ADDRESS FOR LATE TINC Adresse für spates TINC justieren

PREPARE TO MAKE FINAL ADJUSTMENT ON ADDRESS Endgültige Justierung der Adresse vorbereiten

ADJUST ADDRESS
Adresse justieren

ISl	BIN-BCD	PREPARE TO CONVERT NUMBER TO BCD Umwandlung der Zahl in BCD vorbereiten
JSB		CONVERT TO BCD In BCD umwandeln
W, AXB		LOAD ADDRESS IN A-REG Adresse in Α-Register lade
PTO		FOR SHIFT für Verschiebung
W, SLA		SHIFT ADDRESS Adresse verschieben
PLS		SHIFT POINTER Hinweismarke verschieben
YP9 .	IS SHIFT DONE? ■

Verschiebung fertig?

23633 A3

0202 0177

0203 0052

0204

0205 0063

σ co	137	0206	0066
00
K) CD	138	0207
σ
00 OT	139	0210	Olli
	140	0211
	141	0212

0213

0214

' 0215

0 111 Hl 111

0 010 101 Oil

1 000 010 100

0 Oil 001 111

1 000 100 100

0 Oil Oil Oil

1 HO 100 HO 0 HO 000 HO 0 100 101 001

0 100*001 HO

0 000 111 100

1 101 101 100

LEND

PCOUT

BCTl

BRN	JMP 6
BRN	OUTPUT
YSB
BRN	KEY
RS8
BRN	RETURN

M, AXC

M, CTA

•JSB

PCOUTl W,SLA

PLS
YP13

CTl

NO, CONTINUE

Nein, fortsetzen

YES, OUTPUT ADDRESS Ja, Adresse ausgeben

WAS INSTR END? War Instruktion "Ende"?

NO, TEST FOR KEY DOWN Nein, prüfen, ob Taste unten

YES, RESET FLAG Ja, Kennzeichen zurücksetzen

RETURN TO SUPERVISOR Zum Überwachungsprogramm zurückgehen

LOAD DIGIT IN C-REG Ziffer ins C-REgister laden

RESTORE DATA IN A-REG Daten ins Α-Register laden

LOAD DATA IN I/O-REG AND OUTPUT

Daten in I/O-Register laden und ausgeben

SHIFT DATA LEFT ONCE Daten einmal nach links verschieben

SHIFT POINTER Hinweismarke verschi-eben

IS OUTPUT COMPLETE? Ist Ausgabe vollständig?

0216 0210

0217 0075

147

149

154

0075

0221

0222

O	150	0223
co
co
NJ
CD	151	0224
O
CO (Jj	152	0225
K>

0226

0110

0230

0232

1 000 100 Oil O Oil 111 001 0011 111 001

0 101 000 000

1 Ool 001 000

0 111 000 000.

1 001 000 000 1 000 100 000

1 001 Ol 0100

0 100 100 Oil

1 001 101 Oil

READ

BRN	PCOUT	NO, CONTINUE Nein, fortsetzen
JSB	TAB	YES, TAB ONCE Ja, einmal TAB
JSB	TAB	TAB AGAIN NOcheinmal TAB
IS2		PREPARE TO READ

i/o

ISI	MNEMONIC
READ	YS7
YS9
BRN
BBN

INSTRUCTION

Lesen der nächsten Instruktion vorbereiten

DECREMENT PROGRAM

COUNTER

Programmzähler erniedrigen

INCREMENT PROGRAM COUNTER AND LOAD ADDRESS Programmzähler erhöhen Adresse laden

PREPARE TO READ Lesen vorbereiten

READ NEXT PROGRAM INSTRUCTION Nächste Programminstruktion lesen

INSIDE I/O CALL? Innerhalb I/O-Ruf?

NO, GENRATE MNEMONIC Nein, Mnemonik erzeugen

YES, TEST FOR INSIDE '■!) " Ja, Prüfen, ob innerhalb der Klammer

0231

157

160

165

166

167

168

0232

0233

0234

0110

0016

0235

0242

0243

0244

0245

0 100 010 000

0 111 010 100

0 100 100 Oil

0 000 111 Oil

1 110 010 000

LERRORl R0M2

	161	0236	0350	1	110	100	101
co		ι ■ ■
ÖS*
ro	162	0237	0235	1	001	110	111
σ>		-
ο	163	0240		0	000	000	000
co	164'	0241		0	111	000	000
05 ro

1 000 100 000

0 111 00Π00

0 101 000 000

0 100 101 000

YS7

CR/LP3

STACK2

YS7'

BRN BRN ROM 7

GO TO ROM 2 FOR ERROR ROUTINE Zum ROM 2 gehen für Fehlerroutine

INSIDE "("?

Innerhalb der Klammer?

MNEMONIC NO, GENERATE MNEMONIC

Nein, Mnemonik erzeugen

T377

JSB	WAIT
BRN	CR/LF3
DUMY
PINC
READ
PT7

YES, CONTINUE ROUTINE Ja, Routine fortsetzen

RETURN TO ROM 7 TO CHECK TAB FLAG

Zum ROM 7 gehen, um TAB-Kennzeichen zu prüfen

OUTPUT CR/LF
CR/LF ausgeben

CONTINUE ROUTINE Routine fortsetzen

INCREMENT PROGRAM COUNTER Programmzähler erhöhen

READ NEXT INSTRUCTION Nächste Instruktion lesen

SET POINTER FOR SHIFT Hinweismarke für Verschiebung setzen

PREPARE TO LOAD DATA IN T-REG Laden der Daten ins T-Register vorbereiten

LOAD DATA IN T-REG

Daten ins T-Register laden

169

0246

	•	170	0247
	171	0250
	172	0251
*"* O	Seite	242
CO 00 K) cn	173	0252
Ό862	174	0253
	175	0254
176	0255

1 001 000 000

0 111 000 000

1 000 100 000

0 101 000 000

0256

0 100 101 000

0 101 000 000

0 101 001 000,

1 001 000 000

0 000 Oil 100

ISl

PINC READ IS2

IXT SHIFT2ND IS2

SRT ISl

PRS

PREPARE TO READ SECOND INSTRUCTION

Lesen der zweiten. Instruktion vorbereiten, ,

•.INCREMENT PROGRAM COUNTER Prograjnmzähler erhöhen

READ SECOND INSTRUCTION Zweite Instruktion lesen

PREPARE TO LOAD IN T-REG Ladung in T-Register vorbereiten'

FIRST TO I/O, SECOND TO T-REG '

Erstes ins I/O, zweites ins T-Register

PREPARE TO SHIFT SECOND INSTRUCTION

Verschiebung der zweiten Instruktion vorbereiten

SHIFT DATA

Daten verschieben

PREPARE TO CHECK -IF SHIFT DONE

Prüfung auf ausgeführte Verschiebung vorbereiten ·

SHIFT POINTER
Hlnweismarke verschieben

178 0257

179 0260

180 0261

' 181 0262

182

183

184

185

0263

0264

0265

0266

1 111 101 100

0253 1 010 101 111

0 101 000 0Od

0 100 101 000

1 001 000 000

0 111 111 000

0 000 110 000

0 110 010 000

	186	0267	0030	0	000	000	000
	187	' 0270	0	000	000	000
COPY	188	0271	0	001	100	Oil

TEST

YPl 5 BRN

IS 2 IXT ISl

TTC RETURN ROM 3

DUMMY DUMMY BRN

IS SHIFT DONE?
Verschiebung fertig?

SHIFT2ND NO, CONTINUE TO SHIFT

Nein, Verschiebung fortsetzen

YES, PREPARE TO LOAD FOR FIRST INSTRUCTION Ja, Ladung der ersten Instruktion vorbereiten

LOAD FIRST INSTRUCTION IN FRONT OF SECOND Erste Instruktion vor die zweite laden

PREPARE TO BRING RESULT TO

C-REG

Vorbereitung um Ergebnis

ins C-Register zu bringen

BRING RESULT TO C-REG Ergebnis ins C-Register bringen

RETURN TO CALLING ROUTINE Zur rufenden Routine zurückkehren

GO TO ROM 3 TO TEST DATA Zum ROM 3 gehen,, um Daten zu prüfen

TESTl CHECK TEST RESULTS

Testergebnisse prüfen

(J) ÖD Δ

	189	0272
	190	0273
	191	0274
	192	0275
	193	0276
	194	0277
	195	.0300
O	196	0301
CD OO (NJ	197 198	0302 0303
Co	199	0304
CO	200	0305
σ> ro	201 202	0306 0307
	203	0310
	204	0311
	205	0312

0017

0 000 000 000	OUTPUTL	DUMMY
0 000 000 000		DUMMY
0 000 000 000		DUMMY
0 000 000 000		DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 000 000 000	DUMMY
0 101 000 000	IS2
0 001 000 001	LIO
0 110 100 000	GIOE
1 001 000 000	ISl

OJ

cn

00 CO -f> CO

206

0313

0 000 110

RETURN PREPARE TO OUTPUT DATA Datenausgabe vorbereiten

ό40 LOAD I/O SELECT CODE I/0-Auswahlköde laden

OUTPUT DATA
Daten ausgeben

PREPARE TO RETURN TO CALLING

ROUTINE

Rückkehr zur rufenden Routine

vorbereiten

RETURN TO CALLING ROUTINE Zur rufenden Routine zurück

0314

0315

0316

0 000 101 110 BIN-BCD W,ZTB

210

211

215

216

217

218

0317

0320

co	212	0321
co
cn	213	0322
O	214	0323
co co

0324

0325

0326

0327

1 Oil 101 110

1 111 101 110

0 111 111 000 BCDl

0 100 101 000

0 101 000 000

0 101 001 000

0 100 001 000

0 010 001 000

1 Ό01 000 000

0 111 111 000

0 001 101 110

W, ZTA W,ApIA

TTC CTS-

IS2 SRT SLT XOR ISl

TTC W, CMl CLEAR B-REG SO SUM = B-Register löschen, SUM = 0

CLEAR A-EEG
Α-Register löschen

INITIALIZE A-REG TO FOR LSB

Α-Register initialisieren auf 1 für LSB

LOAD BINARY NUMBER IN C-REG Binärzahl ins C-Register laden

STORE BINARY NUMER IN STACK Binärzahl in Stapel speichern

SHIFT BINARY Binärzahl verschieben

NUMBER IN T-REG in T-Register

TO SET LSB TO 0 um LSB auf 0 zu setzen

COMPARE T & C-REG T- und C-Register vergleichen

PREPARE TO CHECK RESULTS Prüfung der Ergebnisse vorbereiten

LOAD COMPARISON RESULT IN C-REG Vergleichsergebnis ins C-Register laden

WAS THAT BIT A ONE? War dieses Bit eine

219 0330 220 0331 221 0332

CO hO CD

222 223 224

0333

0334

0335

225 0336

226 0337

0333 1 101 101

0 010 001

0335 1 101 110

0 010 001

0 111 001

0 100 101

1 110 001

1 000 101

BRN
W, BTC BRN

BCD2 W,BTC W,APCC

BCD3 W,ATB

W,APBA W, BXC

BCD 2

BCD 3

YES, ADD BINARY VALUE IN A TO SUM IN B Ja, Binärwert in A zur Summe in B addieren

NO, LOAD PREVIOUS SUM IN B-REG

Nein, vorherige Summe in B-Register laden

DOUBLE PRESENT BINARY NUMBER

gegenwärtige Binärzahl verdoppeln

LOAD PREVIOUS SUM IN C-REG

vorherige Summe ins C-Register laden

ADD PREVIOUS SUM AND PRESENT BINARY VALUE vorherige Summe und gegenwärtiger Binärwert addieren

LOAD PRESENT BINARY VALUE Ih B-REG

gegenwärtigen Binärwert ins B-Register laden

DOUBLE BINARY VALUE IN A-REG

Binärwert im A-Register

BCD SUM IN Β—REG '

letzte BCD-Summe im B-Register bewahren

227

228

229

230

0340

0341

0342

0343

	231	0344	0317
»09826	232 Seite	0345 243
ο	233	0346
co
σ> to	234	0347

0350

236	0351
237	0352
238	0353

239

0354

1 100 101 000

0 111 110 000

0 101 000 000

0 101 001 000

1 001 000 000

0 000 Oil .100

0 000 101 100

1 100 111 111

0 00Ö 110 000

1 Oil 101 010

0 101 000 000

0 000 100 000

1 001 000 000

WAIT

DNR

CTT

IS2 SRT ISl

PRS

YPO

BRN BCDl RfiTÜRN

X, ZTA

TESTFLG IS2

YINTF

ISl

RECALL BINARY NUMBER FROM STACK

Binärnummer vom Stapel zurückrufen

LOAD BINARY NUMBER IN T-REG Binärzahl ins T-Register laden

SHIFT BINARY
Binärzahl verschieben

NUMBER TO
N ummer nach

EXAMINE NEXT BIT

nächste Ziffer überprüfen

SHIFT POINTER
Hinweismarke verschieben

IS CONVERSION COMPLETE? Ist Umwandlung vollständig?

NO, CONTINUE ROUTINE
Nein, Routine fortsetzen

YES, RETURN TO GALLING ROUTINE Ja, Rückkehr zur rufenden Routine

INITIALIZE COUNTER
Zähler initialisieren

PREPARE TO TEST FLAG
Kennzeichen-Test vorbereiten

INTERROGATE FLAG STATUS BIT Kennzeichen*-Zustands-Bit abfragen

PREPARE TO CHECK FLAG STATOSBIT Kennzeichen~Statu s-überprüfung vorbereiten

ro co

cn

OJ OJ

CO

240

241

242.

243

244

245

246

0355

0307

0357

247	0364
248	0365
249	0366

0360

0352

0362

0363

0077

1 Oil 010 100

1 100 Oil 111

1 011 100 100

YSIl

RSIl

OUTPUTL

1 111 101 010

1 110 101 Oil

X,APIA

TESTFLG

0 100 010 000 FAILURE R0M2

0 101 000 000 LISTE IS2

0 100 000 001

1 110 100 000

1 001 000 000

LIO TG8 ISl

200

iS PERIPHERAL READY?

Ist Peripheriegerät fertig?

GO TO OUTPUT DATA ROUTINE Zur Datenausgabe-Routine gehen

NO, RESET STATUS BIT AND CHECK FLAG AGAIN
Nein, Status-Bit zurücksetzen und Kennzeichen erneut prüfen

INCREMENT COUNTER, WAS THERE A CARRY?
Zähler erhöhen, war ein übertrag vorhanden?

NO, TEST FLAG AGAIN

Nein, Kennzeichen nochmals prüfen

YES, GO TO ROM 2 TO PRINT ERROR MESSAGE
Ja, zum ROM 2 gehen, um Fehlernachricht zu drucken

PREPARE TO CHECK IF MEMORY IS PROTECTED
Prüfung vorbereiten, ob Speicher geschützt ist

LOAD TEST CODE
Testkode laden

TEST MEMORY
Speicher testen

PREPARE TO CHECK TEST RESULTS

Prüfung der Testergebnisse vorbereiten

OJ OJ -O-OJ

250 0367

1 Oil 010 10ο

251 0370 0231 1 001 IQQ 111

252 0371 1 Oil 100 100

253 0372 1 000 101 110

0 100 101 000

0102 0 100 OQJ. 101 LIST2

0 111 OOQ 000

0 Oil 001 110

258 0377 0 111 110 000

	254	0373
O
co	255	0374
CD
NJ
Φ	256	.' 0375
CD
00	257	0376

YSIl

BRSN LERRQRl

RSIl W,BXC

CTS

JSB CR/LF

PINC

W, ZTC

CTT

JS MSMORY PROTECTED Ist Speicher

YES, MEMORY IS PROTECTED» GO TO ERROR ROUTINE Ja, Speight ist

NO, RESET STOTS BIT Nein,2iustg,ncls&it

RESTORE DATA TO Q-REG Daten ins Gestellen

SAVE DATA IN STACK Daten im Stapel bewahren

OUTPUT CR/LF ■ Ausgabe CR/LF

INCREMENT PROGRAM COUNTER Progjraromaähler erhöhen

CLEAR C-REG C-Register löschen

CLEAR T-REG T-Reg±ster

	Seite 244	laufende Adresse	Abzweig- Adresse	TYPEWRITER :	LISTING	111	000	100	COMPFLG	SS7	(R0M6)	WP,SRC	LOD	/
		0000		ENTERFACE	Schreibmaschinenanschluß (ROM	010	100	011		BRN	6)	LDC9		*
	Zeilen Nr. .	0001	0050	Betriebs-Kode Bit-Muster	in	OU	101	BSUBX	JSB		BRN		STQX
	3	0002	0166	0	111	OH	001		JSB
	4	0003	0165	0	101	110	OH		BRN			)
	5	0004	0134	0	101	on	000 .		LDC5	SSUB
	6	0005		O	010	PU	000	LlOD	LDClQ	SLBL		=
	7	0006		O	100	100	Hl		BRN	BLBLX
	8	0007	Olli	O	HO	110	001	B/	JSB
	9	οοα<ό	0153	1	100	100	Hl		BRN			O
O	10	0011	Olli	0	000	100	OU	/	BRN	DONE
CO	11	0012	0010	0	000	010	Hl	AST	BRN	S/
CD	12	0013	0005	0	110	110,	101	STOX	JSB	DONE
O	13	0014	0154	0	101	000	on		BRN	B/
CO CO	14	0015	0320	O	101	011	000	)·	LDC 5	B*
ro	15	0016		0	100	010	Ul		BRN	SSTO
	16	0017	0105	1	101	OU	000		LDC 5	BX
	17	0020		0	100	001	Ul		• BRN
	18	0021	0103	0	UO	010	Ul		BRN	L9d
	19	0022	0145	0	001	010	010	O
	20	0023		0	001	OU	000		L13D
	21	0024		0	OU	010	IU		B,
	22	0025	0265	1
	23			1
	24			1

fs?

CD

VV

Cv

cn οι

vo in

CTi CO

CQ

Q in

U ro cn

ro

CJ

vo ω

	U	U	U
	■Η	rH	■Η
	CU	CU	CU
	3 U	U	U
CQ O
CQ C		CU

in

UUU

rH ΐΗ ιΗ

Cu CU CU

υ υ υ a PQ

UUU

■Η ιΗ ιΗ

(T) CU CU CU

υ· S υ υ υ

CQ CQ CQ CQ

	TTO	100	TTO	cn	Ol	■Η	111	dp	111	000	111	VO	in	020	TTO	CRCL	TTO	I	111	010	oo	010	TTO	CSTO	TOT
100	TOO	000	TOO	010	OTO	OTO	TOO	000	000	TTO	000	OTO	010	100	TOT	TOO	100	000	TOO	100	OTO	100	TOO	TOO	OTT
010	OTT	111	OTT	100	οοτ	100	TOO	TTO	100	TOT	TTO	100	100	111	TOO	010	111	TTO	100	111	100	111	OTO	010	OTT
TOO	-O	ο	O	111	111	111	O"	TOT	O	O	O	111	111		O	111	r-i	TOO	O	O	111	O	o'	111	O
rH	0142		0142	O	ο	O	0023	O	TOTO		0061	O	O		0032	O	0370	rH	0103		O		- 0042	O	0154
	0027	0030	0031				0035		0037	0038	0041			0044	0045	0163	0047		TSOO	0052		0054	0055	0163	0057
0026			0032	0033	0034	0036			0042	0043		0046	0050		0053		0056

Oiro^mDroocTi
r>4 οι οι οι oj ro ro ro ro ro ro ro ro ro ro

409826/0862

H-	J3	• >H	W
IZ ·	O	ω
O	Q	ο
Q		Q

	in	Q	O5	a	Eh	X	H	W	W	W
	cn		ti		05	cn	2;	Ϊ5		!3
	O5	Oi	U	*3	CM		O	O	O	O
	Q				Q	Q	Q	Q
		IH*	Pi
X	O5	CJ	CM
cn	CQ	U)	cn

σ> CQ a vo cn οι « cn

cn

ο; cn α ο; cn cn

ld jh

üSZü
α oJ α

ο is s; S s

Q OJ O O O

X!

IH

CQ cn

t-D PQ

Q S κ! S U

X Eh O5

	a	Q	U	K]
a	cn	CTi	U
in	fH .	(H	<<	O
a		CQ	Q

iH rH	O O	rH rH	O O	rH O	rH rH	8	O O	fH O	rH rH	fH iH
r-i	O	iH	<H	r-i	rH	fH	rH	rH	rH	iH
O	rH	O	O	r-i	O	O	fH ϊ	rH	O	r-l
O	iH	O	O	r-i	O	O	O	O	O	O
iH	O	rH	iH	r-i	r-i	fH	O	O	iH	rH
O	-H	O	rH	O	O	O	rH	fH	O	O
O	rH	O	O	fH	O	fH	O	rH	fH	O
rH	O	rH	O	iH	fH	fH	O	r-i	rH	O

rH	O	rH	fH	rH tH	O	rH O
O	O	fH	O	O r-i	O	rH O
fH	O	O	O	«H rH	O	rH O

O O O O

OrHfHWrH O r-i O r-i

O'-i'-iOOO'-fO'-f

O O r-i O O r-i O r-i O iHrHrHrHrHO'-'O·-'

fH fH O Ή H O O O O fHiHfHrHfHrHrHfHfH

OOOOOO. ΟΟΉ

r-i O r-i O O Ο

Ή O rH O O O

r-t O r-l O O O

O r-l O OQ O

O r-i O r-i O r-i

rH O Ή O O O

O ή O O O O

O O O -H O -rH

fH O r-i r-i O r-i

rH	VO	rH	OJ	tH	m	O	VD	fH	rsj	rH
r^L	IT)	rH	VO	in	rH	VO	Γ0	VO	VO	rH
r-i	fH	rH	fH	η	OJ	rH	r-i	rH	tH	t-i
O .	O	O	O	O	O	O	O	O	O	O

οΓΓι>ι>Γι>Γ·>θ

O O O O O O O O O O O O O O O O Ή

0-00.0.00000000000 0 Ή Η

0 0

fH rH -H -H ■ rH

0 0000

!— t—■ ι—-

409826/0862

CU

	Oi	ύ	CQ	!3	S
	CU	2 CQ	Q	O	g]
	CQ	Q CQ	CQ	Q	D-
O
Έτ> ι=
	CQ	^
	CQ	Ctf

VO

	Q	O
O	OO	CQ
Q

VD

CQ

CQ
CQ

	£-1	O	W
	Oi	O	2
ο	CM	rf	O
Q	CQ	CQ	Q

οι in co

O S CQ !S O O a Q CU CQ (ϋ Q Q oi

CQ Q

CU CQ

O O Ή Ή ή O O O <-> O O O

■Η O O Ή

O O

■Η O Ή >Η O O Ή Ή

O O O O

VO f~ iH ■-i iH i-H O O

OOOOOOO OOOOO

OOO

OOOO

OOOO

O O-O

OO

τη--)ΟΟΟΟΟΟΟ

οοοοοοοο

ΟΟΟΟΟΟΟ-»

rHOOOOOO'-i

οοοοοοοο

CQ

ιΗ

CQ

O

O

κ"»

ιΗ

Q

100

O

ιΗ

—'

Q

rH

O

■Η γΗ

53

O O

O O

rH rH

O

O

ιΗ rH

CQ

OO

rH rH

8

■Η

O

O

O

CQ

iH __|

O

<:

•Η

O

O

rH

O

^

O

ιΗ

^^ O

O

ιΗ

EH

O

O O

O

iH

O

O

O O

O

O

CQ

rH

8

O

C4

O

»Η ,_j

O O

O

O

O

tH

O

O

tH

rH

CM

O

O

γΗ ,_!

O

ιΗ

tH

ιΗ

O

!-Η

O

O

O

ο

"rH

ιΗ

O

■-<

ιΗ γΗ

«Η

O

■Η

°

O

O

ο

pH O

8

O

O

O

O

O

O

ro

γΗ

O

t^.

jH

>Η

O

iH

■Η

γΗ

O

VO

O

O

O

O

O

iH

O

O

O

O

8

O

O

rH

rH O

O

ro

O

rH

rH

vo

»Η

O

i-f O

O

rH

■Η

VO

ιΗ O

O

O. OOOOOOOOOOOO'OOOOOOOOOOOOOO

409826/0862

104	0145	Olli 0
105	0146	0164
106	0147
107	0150

«ir O	110	0153
co 00 So co	111 112 Seite	0154 0155 246
O 00	113	0156
cn	114 115	0157 0160
	116	0161
	117	0162
	118	0163
	119	0164
	120	0165
	121	0166
	122	0167
	123	0170
	124	0171
	125	0172

0040

0 001 Oil 000

1 110 Oil 000 O 100 100 111 O 111 010 101

108	0151	0000	O	000	000	Oil
109	0152	0164	O	111	010	101

B.	LDCl	DONE	JMP-XXXX	WHERE XXXX = NUMBER OF STEPS Wobei XXXX .« Zahl der Schritte
Ll 4D	LDC14	SJMP
	BRN	COMPFLG	JMP+XXXX	WHERE XXXX =
JMP-	JSB	SJMP
	BRN
JMP4-	. JSB

O	010	000	Oil	S/
1	110	010	000	SSTO
1	110	010	000	SD
i-l	110	010	000	SLE
1	110	010	000	SRND
1-1	110	010	000	SCL
1	110	010	000	SPRT
1	110	010	000	SX
1	110	010	000	SC
1	110	010	000	SJMP
1	110	010	000	SLBL
1	110	010	000	SSUB
1	110	010	000	SEX
1	110	010	000	SIF
1	110	010	000	SDS
1	110	010	000

BRN
ROM 7 ROM 7

RDM7 ROM 7 ROM 7 RQM 7 ROM 7 ROM 7 ROM 7 ROM 7 ROM 7 ROM 7 ROM 7 ROM 7. ROM 7

NUMBER OF STEPS Wobei XXXX -Zahl der Schritte

K) CO

cn

CO CO

4>

CO

15

CQ

CQ J CQ D

CM

CM

CM

i-H

X

X

CQ

CT\

r-i

CM

CQ

j "j

W

D

D

Q

W

U

T-i

U

O

W

CQ

O

U

O

CQ

S3

is

Q

U

Q

Q

Q

Q

CO

O

Pi

O

Q

CQ

CQ

'CQ

Q

CQ

Q

r-

53

CQ

CQ

Cd

Pi

CQ

S

CQ

CQ

CQ

O

CQ

CQ

K

CQ

S

	W	CQ
	S3	D
Q	O	CQ
CQ	Q	CQ

VD	in	VO	U C
TJ	r_)	f_)	Q c
Q	α	Q
	q co
Q CQ

	X	X
	is	52
Pm	J	CQ
CQ	CQ

	CQ	Q	Q	P	Q	co	X
J	(J		is		CQ	CQ	CQ
CQ	CQ	et; _..	W	CQ		CQ	J
o		CQ	CQ			CQ
CQ						CD
CQ				CQ

O

O

O

O

T-i

O

O

8

Q

T-i

O r-1

1-1

r-i

O

O

r-l

T-i

O

O

O

O

t—1

O

T-i

T-i

O

r-l

T-i

r-i

rH

T-i

O

1-1

O

T-i f-i

r-i

O O

r-i

O O

O O

O O

T-S T-i

O O

O O

O O-

O O

8

O

T-i r-i

r-i O

O

i-l

—i

r-j

r-1

O

8

r-1

i-l

r-1

r-l

i-H

O

O

O

O

O

r-1

r-l

iH

rH

r-i

O

O

r_|

iH

O

O

O

O

O

,_,

i-l

O

r-l

O

O

i-t

O

O

O

O

O

r-l

r-i

r-1

r-l

T-i

O

O

O

O

O

8

O

O

Q

rH

O

r-1

O

•Η

r-l

O

r-i

O

O

O

O

O

O

O

O

O

O

r-l

rH

r-l

I—1

i-l

r-1

O

r-t

r-1

r-l

r-i

ό

O

O

i-l

O

O

r-1

O

O

O

O

Q

O

T-i

O

r-l

O

T-i

O

O

i-l

O

O

O

r-\

ι—1

O

O

O

1—i

O

rH

O

■Η

i-l

r-1

O

o

O

r-l

O

O

-

CM

O

r-l

O

O

O

r-1

r-1

O

O

■-Η

r-1

r-1

T-i

r-i

T-i

O

T-i

O

r-1

VO

ro

O

O

vo

O

O

O

O

O

O

O

O

O

FH

O

T-i

O

O

-

O

in

VO

in

T-i

r-l

in

r-l

CM

CM

O

r-1

VO

r-1

m

r-l

m

r-1

O

ro

Q

O

T-i

r-1

r-i

r-i

r-l

r-i

O

O

O

O

O

O

O

O

O

OOOO

OOOOO

i-jCMCMCMCMCMCM(NCMCMCMCMCMCMCMCMCMCMCMCMCMCM OOOOOOOOOOOOOOOOOOOOOO

409826/0862

152 0225 0206 1 000 Oil Oil

153 0226 0166 0 111 Oil 101

	154	0227	Olli	0	100	100	111
	■ 155	0230		1	001	Oil	000
	156	0231		0	001	Oil	000
O «Ο	157	0232	0153	0	110	110	001
826	158 159	0233 0234	0162 Olli	0 ο	111 100	001 100	101 111
ο	160	0235	0154	0	110	110	101
co	161	0236	Olli	0	100	100	111
lsi	162	0237		0	000	000	000
	163	0240		0	111	101	110
	164	0241		0	111	101	110
	165	0242		0	111	101	110
	166	0243		0	111	101	110
	167	0244		0	111	101	110
	168	0245		0	111	101	110
	169	0246		0	111	101	110
	170	0247		0	111	101	110
	171	0250		0	111	101	110
	172	0251		0	111	101	110

SUBLBL	BRN	BSUBL	SUBLBL	WHERE XXXX = LO
SUB	JSB	SSUB	SUBXXXX	CATION OP SUB
				ROUTINE
				Wofcei XXXX 3 Ort
				der Subroutine

BRN	DONE	FOl
LDC 9		F02
LDCl		F03
JSB	S/	F04
JSB	SX	F05
BRN	DONE	FO 6
JSB	SSTO	F07
BRN	DONE	F08
DUMMY		F09
W,CPlC		Fin
W,CPlC
W,CPlC
W, CPlC
W,CPIc
W,CPlC
W,CPlC
W,CPlC
W, CPlC
W,CPlC

co co co

rH	CM	ro	r-i	in	-	CQ	O	O
rH	rH	pH	fa	i-H	,_3	Q	Q
fa	fa	fa		fa	O	ω	CQ
					CQ		O
							CQ
						CQ

X CM H W

H X

53 *v. X

O H ClJ

Q CQ cn

S fa

O H

Q ca O

cn cn
Q Q

CQ + CQ I

OUUOO

pH r-H iH 1-1 rH t->

CU P4 Oi CM Cu

oouoosipqpq

-K ■» »■ *· O CQ CQ

CQ

Γ-

ο co

Q Pi

	C-	O	CQ Ϊ	P-
CQ	O	O	cn c	3 O
CQ	Q	Q		2 Q
	5 CQ E
q CQ 0
Z CQ S
ί W 0
3 CQ £
5 CQ C

O

O

O

O

O

cn

pH

pH

CM

O

P

pH

X

X

■

O

O

pH

pH

O

pH

CQ

rH

I

pH

CD

rH

r-i

pH

rH

8

P

O

pH

O

O

O

pH

CM

O

O

O

pH

fa

pH

P

rH

U)

pH

i_3

rH

1-1

pH

pH

O

j

O

pH

O

ρ3

pH

H

X

O

O

pH

pH

H

pH

PQ

O

P

O

fa

rH

rH

pH

r-i

pH

υ

O

CQ

r-i

O

W

pH

pH

pH

O

pH

pH

pH

O

PQ

O

CQ

O

O

O

O

O

CQ

O

O

pH

O

O

pH

pH

pH

O

O

O

O

O

rH

O

PQ

r-i

rH

rH

rH

O

pH

pH

pH

O

O

pH

pH

pH

O

O

O

pH

pH

O

O

O

O

pH

O

O

rH

r-i

pH

,H

pH

pH

pH

O

O

rH

pH

8

O

O

pH

O

pH

8

O

'rH

rH

O

O

O

O

rH

r-i

r-i

pH

pH

pH

O

pH

O

pH

rH

pH

pH

O

O

pH

O

pH

pH

O

O

O

r-i

pH

pH

O

rH

rH

rH

rH

pH

pH

pH

rH

O

pH

pH

O

8

pH

O

pH

pH

O

rH

O

O

O

pH

pH

O

pH

O

pH

pH

pH

pH

pH

pH

O

8

pH

O

pH

pH

pH

rH

pH

O

pH

pH

O

O

O

pH

r-i

rH

pH

pH

pH

pH

pH

O

O

pH

pH

pH

pH

pH

rH

pH

pH

O O O O "O

O O

oooooooooo

ro

in

in

VO

in

O

rH

rH

in

VO

in

rH

O

r-

in

CN

in

in

CM

VO

r-

rH

rH

CN

VO

rH

ro

vo

CN

O

CM

CN

O

pH

1—I

rH

O

O

CN

r-i

pH

O

O

O

O

O

O

ro

O

O

O

O

CN

O

r-i

CM

vo

VO

^

O

in

VO

VO

VO

CN

VO

VO

r-

CN

CN

CM

CM

O

CM

CN

CM

O

O

O

O

O

O

O

CN i-l O CO pH O Ή Ο VDpHF- CMP-'tfP-in pHi-HrHOi-HO'-fO

oooooooo

pH CN CO "Ψ UI VO Γ— OHM

Γ-Γ-Γ-Γ-ϊ-Γ-Γ-ΟΟΟ

CNCNCMCMCNCNCNrOrOrO

oooooooooo

ro O ro O

CM-CO

ro^invDr^cocTiOrHCNro^invor-oocnO'-tcNro'^i'tnvoc— co Γ— r~-C— C— Γ— Γ— Γ— OOO!}QO<OCOOO!S(DCOCOCftn0tCllO\O\n Ct O\ pHrHpHrHi-irHpHpHrHrH.pHpHrHpHpHpHrHp-äpHrHrHpHF-frHpH'pH

409826/0882

πι*

fa

fa H

co

Q co

B Q

Pi J CO CQ

CW U Q Q CQ

fa CQ

H	CM	CQ	- J	fa	I	)J|	W	fa	X!	W	fa
53	S	rl	CQ	K	T	O	£3	H	I CQ	S3	M
O	f-D	CQ	1-3	CQ		CQ	O	CQ I	8	CQ
Q	CQ	hD		Q

CQ

Q CQ .

B Q I O

CtI J CQ CQ E-I

CW O Q Q co

Cq CQ CQ CQ CQ

CQE5CQ53CQS35d52 53 53 53 S3

b ffl b ffl b PQ Q CQ CQ CQ CQ CQ

fa
CQ"

CQ

	O	I	x:	W	CQ	CQ
	CQ	fa	CQ		Q	Q
				fa
fa			H	Ph	O
H		' Ch

^τ ι ο

CQ CQ E4

ρ α cq

r-l

O O

O O

r-l r-i

Or-IO

r-i O ■-*

O O

fiOOOOOOr-i r-ιθθΉΐ-ΐι-ιθΟΟΟΟΟΟ Ο^ΐ-··-ιΟΟΟ·-ιΟΟ^ι"Η'-··-ιΟ

O Ή

ι-< ι-Η O -H

fH

O O

F-I r-l O i-l Ή

O ■-· O ή r-i

^ O O O O

O O O O O

O »-ι Q r-i ο

r-l O O Ή Ο

fH O <-i

F-I O Ή O O

O O
O O

oooboooooooooooooo

r-l O O ι-« Ο Ή

F-IO^1-H •Η Ο ¹H

O O

CMr-i^invoO^Oi-H

t^iHVOvOlOr^OVOiH r-l §H F-I r-l O ¹H r-lrH

OOOOOOOOO

O	O	CM	F-I	O	vo	•Η	O	r»	F-I	in
	in	vo	■Η	Γ-	O	γΗ	VO		O	cn
i-l	8	r-i	,_;	r-i	O	O	CM	«si	ro	CM
O	O	O	O		O	O	O	O

•>#invot^O'-icMn^i^<invor>»Oⁱ-icMn'i'invor--O ή

OOO'Oi-Hr-ir-lr-lr-lr-li-li-ICMCMCMCMCMCMCViCMmn

cncncncncncncncncncycncncncncncncncnencncncn OOOOOOOOOOOOOOOOOOOOOO

osOrHCMn^invor'.ooavO'-HCMr^^'iLnvpf^.oomO

CnOOOOOOOOOOr-lF-lr-lf-l.i-iFHFHF-ii-liHCM

r-liMCMCMCMCMCMCSSCMCMCMCMCMCMCMCMCNSCMCSICMCMCM

409826/0862

221	0332	0370	i	110	010	000	ACC+	ROM	7	SRCL	ACC +	•
222	0333	0167	1	110	010	000	ACC-	ROM	7	SEX	ACC-
223	0334	0163	1	110	010	000	ACC*	ROM	7	SC	ACC *	WHERE XXXX = ro LOCATION OF co jump cn Wobei XXXX = CO Ort des Sprungs CO
224	0335	0127	1	110	010	■000	ACC/	ROM	7	BH	ACC/
225	0336		1	111	100	011	RCL	BRN			RCL
226	0337	0164	O	111	100	001	EXCH	JSB		SJMP	EXCH
227	0340	0207	O	111	010	001		JSB		BLBL
228	0341		O	101	011	111		BRN
229	0342		1	110	010	000	RET	ROM	7		RET
230	0343	0303	O	111	010	101	BJMPL	JSB		BSFLG
231	0344	0170	1	000	011	111		BRN		SIF
232	0345	0305	O.	000	000	000		DUMMY	BFLG
Seite	248
233	0346	Olli	1	100	001	111 '	SAFLG	BRN	DONE	SFLG
234	0347	0307	O	111	100	101	IFFLG	JSB	BJMPX	IFFLG
235	0350	0343	1	100	010	111		BRN	BJMPL
236	0351	0164	O	101	100	100	RS 5	RS 5	SJMP
237	0352	O	100	100	111 .		BRN
238	0353	1	100	011	111	JMPLBX	BRN	JMPLBX
239	0354	1	110	001	111	JMPLBL	BRN	JMPLBL
240-	0355	O	111	010	101	JMP	JSB	JMPXXXX ■

tM

α ο χ

ί3 Ο Jes-

ρα j ^

	r*|	Q
	"ν»
S	X
Q	Ά

ddp

VOiH IS

üomü
qqcoo

qq

03

Χ3 X O 12

«_4

O

O

O

1-4

O

O

O

O

■—i

O

O

i—i

)—j

O

l-i

O

1-1

O

O

O

ι—Ι

O

O

O

O

O

O

1—)

8

i—(

O

ι-4

O

O

O

*Η

O

O

i-l

O

O

O

O

O

O

O

O

O

O

8

O

•Η

f-l

IM

)

i-4

r-j

O

O

O

O

O

O

8

O

O

t—4

i-l

■H

iH

pH

•H

i-H

f—i

O

1—I

i-l

f-ä

O

O

O

O

O

O

O

O

O

O

O

p-4

O

-<

O

O

O

O

O

8

O

f-4

,_,

O

O

O

i-l

i-l

O

O

O

O

O

O

1-4

O

r~4

■Η

O

i-ä

O

8

1—4

1-4

i-l

O

l-i

O

p-l

O

t-i

i-l

f-l

OÖOO")OOOOOOQ

	in	in	•H	m
O	in	CSI
CSi			O	rq
O	O	O	O

OOOOOOOOOOOOOOOOO

^s¹ "53¹ <* ^¹ "^ "^ -<5}" ■«' ««ι in in m m in m m in £SiriJO3CSifSiOJCS!CV!CSiCS3{%SCSjCS!CSSfSlCSi£N

09826/0862

	Seite	249	laufende	Abzweig
	Zeilen	Adresse	Adresse
	Nr.	0000
	3	0001
	4	0002
	5	0003
	6	0004
		0005
	8	0006
O «Ο	9	0007	0112
OO PO	10	0010
CD	11	0011
O	12	0012
co	13	0013
PO	14	0014
	15 ■

17 18

0015

0016 0017

0013 TYPEWRITER INTERFACE LISTING (ROM 7)
Schreibmaschinenanschluß (ROM 7)

Betriebs-Kode Bit-Muster	110	011	000	CALLl	LDC 6
0	001	011	000		LDCl
0	110	011	000		LDC 6
0	100	011	000	/ '	LDCl2'
1	110	011	000	AST	LDC 6
0	100	011	000	FLGl	LDC12
1	001	000	100		SS9
1	100	101	011		BRN
0	000	000	000	DUMMY
0	100	010	000	ROM 6
1	100	010	000	ROM 6
1	010	101	000	CXM
0	100	010	000	ROM 2 »
0

O 010 101 000

O 001 111 110

O 000 101 111

CXM

S, CMl

BRN

DONE

RESTORE FLAG
Kennzeichen zurück-CONTINUE TESTS stellen IN ROM 2

Tests in ROM 2 fortsetzen

FLGL

EXCHANGE FLAG AND
DATA

Kennzeichen und
Daten austauschen
DOES OP LEVEL = O?
OP-Niveau = O?

NO, CONTINUE ROUTINE
Routine fortsetzen

CD CO CO

0020

0021

0324

1 000 001 100

1 101 010 Oil

21	0022 -	0071	0	111	on	000
22	0023		0	Oil	on	000
23	0024		0	in	on	000
24	0025		0	1OO	on	000
25	0026		0	110	Oil	000
26	0027	0063	0	Oil	100	111
27	0030		0	111	Oil	000
28	0031		0	010	Oil	000
29	0032		0	110	Oil	000
30	0033		1	110	Oil	000
31	0034		0	Oil	001	111
32	0035		0	000	000	οοό
33	0036		0	000	000	000
34	0037	0132	1	100	010	οοό
35	0Q40	0	110	Oil	000
36	0041	0	Oil	Oil	000
37	0042	0	no	Oil	000
38	ΌΟ43	1	100	Oil	000
39	0044	0	101	101	on

BSTO

BRND

BCL

PT8

BRN

LDC 7 LDC3 LDC 7 LDC 4 LDC 6 BRN LDC7 LDC 2 LDC 6 LDC14 BRN DUMMY DUMMY ROM 6 LDC 6 LDC 3 LDC 6 LDC 12 BRN

SETFLG

Ll 5 R

BD

YES, SET POINTER TO LOAD
FIAG

Ja, Hinweismarke auf Kennzeichenladung setzen

CONTINUE ROUTINE '
Routine fortsetzen

RETURN

CO CO JN CO

Ϊ3

γ*- Ö

υ u

ο ο

VO Ή VO OUU

03

Q P

I CQ

A)
03

000	000	000	000	000	000	000	000	Hi Hi Ö	000	000	000	000	011	000	000	011	000	000	000
000	000	010	ττο	ττο	ττο	ττο	ττο	010	TTO	τ το	ττο	TTO	101	ττο	ττο	101	000	010	ττο
000	000	100	111	000	111	010	111	TIO	ΟΤΙ	100	OTT	τοτ	101	110	100	101	000	000	001
O	O		O	ο	ο	ο	O	O	O	i-i	ο	ο	O	ο	ο	ο	Ö	O	ο
■								0064					0132			CJ ■Η O

OOO

ooo

^5 *™4 ί^ ^¹O ίί* Wi ^jD Γ"*· /^ *■■ι έΜ d ^J* ιΛ VO Γ*·*

ιπ ΐΛ υπ trt \f) ιπ ιπ ιτ> Sd \£> O ^o ^o vd ^o vö vD O OOOO O OOOOtnoOOOOO OOOOOOOOOOfNOOOOOO

+3
-H

η w φ <n η* m vo

OO

«pintnincommmtnin in.

409826/0862

cm

05

S O S H

o o o a

Q «; Q H H

	tu
	H
O	tß
P	CQ

«s in h ο UUUUS QP '

J s4

fNj in

H v£> rH vo r~- t-- oo _ .UUUUUUU P Pi P P P P P P P in

PQ	»J	CQ	ffl	PM	S	O	co	03	m
CQ	m	to		SH	ffl	Pi			co
Hd	^D			ft		I'D

OS	£Q	m	a;
in			CO
pH		Hi

ro

O O O

PPP

cn

0000ιΟΟΟΟΟ0 0<Οή

■οοσο-οοοοοσοοοοο

O pH

O Ή

pH pH pH

<-) ο σ

O O M

Ή) r-t l-l O -HO

O O ·**

O O O

pH pH O

pH pH O

pH pH pH

,H pH O

O O O

O O pH

O OO

O O μ

CNI E^- W CM Π Γ-

f-1 CO v-i ^ CN3 CM

'pH f-l pH CM t-3 «H

O O O O O O

fspiDOOOOOOOfHiHirttijHoaoa

QOOeä'-l'H'-l·-·«-'lt-ltHpH«Hf-It-4»-<pHi—ϊρΗρΗρΗ

ÖOOÖOOOOOOOOOOOOAiOOOO

08

	85	0122	0113	0	100	101	111	WAIT	BRN	DONEl
	86	0123		1	010	010	000	BC	R0M5
	87	0124		0	110	Oil	000		LDC 6
	88	0125	0233	1	001	101	111		BRN	L3R
	89	0126	0114	0	100	110	Oil	DONE 2	BRN	DONE 3
	90	0127		1	010	101	100		YPlO
	91	0130	0117	0	100	111	111		BRN	DONE 9
	92	0131	0116	0	100	111	Oil	RETURN	BRN	LIST
	93	0132		1	100	010	000	CHS	ROM 6
	94	0133		0	110	pll	000		LDC 6 ■
1982	95 96	0134 0135		1 0	000 111	Oil Oil	000 000		LDC 8 LDC7
σ>	97	0136		0	Oil	Oil	ooo		LDC J
O ' OO	98	0137	0112	0	100	101	Oil	ACC	BRN	DONE
03	99	Οΐ4θ'		0	no	Oil	000		LDC 6
CO	100·	0l4l		0	001	Oil	000		LDCl
	101	0142		0	110	Oil	000		' LDC6
	102	0143		0	Oil	Oil	000	C	LDC 3
	103	0144		0	110	Oil	000		LDC6
	104 ,	0145		0	Oil	Oil	000		LDC3
	105	• 0146		0	000	110	000	LCI02	RETURN
	106	0147		0	110	010	000	BACC/	ROM 3
	107	0150	0137	0	110	000	001	JSB	ACC

CONTINUE ROUTINE
Routine fortsetzen

K) GO CD CO OO

E^

E-i

PQ
CO

Ρ^ΡίρίΡίΡίΟίΟίΟίΡίΡίρίΟίΡίΡί
CQPQCQPQCQCQCQCQCQCQfQCQCQCQ

VD VD VO >-t

O CJ U O QQQQ

4 P α J

CQ

QE-i fo (J) ff) O

WSJOi SfflDXifoCQJ

Q^OioeMXCJbi-lCQWHQfa
CQCacaCOCiJCQCOCQCQCQCQCQCQCQCQ

E^ Q

O -i
O O

O HI

O O

-ι ο

O O

O O -i ο ο ·-· O O O

O O O O O

1-4 i-l

O Ή

■-Η .-f

O

O

•Η 1-4 f-1 r-l

rH r-t

O O O O ή O <-»
•-iOOOOOOhhihih:

■Η O O O Ή HI •Η rH O HI

hi O O O O

-ι ο ο ο ο

O O- O O O

O O O O

ο ο ο - <-f <-* ο

^ ο ο

HI O !-f O O HI i-i O HI t-t

OOO
O O O O

—i ·-) ■-! O O O O

HI O O HI -Hi

ΟΟΟΟΟΟΟ'-ΐΗίΟΟΟΟΟΉ^

OOOOOOOOⁱ->r-)iHO·-'

O O O

O»-<O
OOO

t
O

0

OOO

000"JMWNOtVrj
OOOQOOOOOO

η ■* in vor^O'-iwcn'^irtvor^-O'-iw-M'sS'tnvor-

irtmmi-immvovoiotoiovoiovof^t^r^p^c*·?·»!*^!^ i-li-ii-iLni-li-rr-ti-ic-Ii-li-ir-liHf-Ir-li-ii-iiHi-Ir-lf-ip-l OOOWOOOeuOOOOOOOOOOOOGO

-μ
Qi-jcsi-i-am^invsr-ooeiO^Nfn^Lnior-esoiO f-l'-l'-ί OS'-ä'-lt-lp-lrtf-Ji-iiNJCMWrvJOäfMfMWfsSrsScn r-liHi-ICQi-tf-tMiHe-IiHrHiHi-lF-Ir-gi-li-ir-Jj-ii-!. <-tt~I

4 0 8 8 2-6 /088-

	131	0200
	132	0201
	133	0202
	134	0203
	135	0204
	136	0205
	137	0206
	138	0207
	139	0210
*·* O	140	0211
CO CO KJ	141 142	0212 0213
	143	0214
ο QJ	144 '	0215
	145	0216
	146	0217
	147	0220
	148	0221
	149	0222
	150	0223
	151	0224
	152	0225
	153	0226
	154	0227

0132

0132

0132

0132

110
111
101
101

110

100
110
010

110

100
101
111
011
111
101
110
010
110
101

110

001
110
110
101

011 011 101 000 011 011 011 011 011 011 101 011 011 011 011 011 011 000 101 011 011 011 011 101

000 000 011 100 000 000 000 000 000 000 011 000 000 000 000 000 000 100 011 000 000 000 000 011

BLBL

BSUB

BLBLl

BIF

LDC 6	RETURN
LDC7
BRN
SS5
LDC6
LDC12
LDC 6
LDC 2
LDC 6	RETURN
LDC12
BRN
LDC 7
LDC 3
LDC7
LDC 5
LDC 6
LDC 2	RETURN
SS6
BRN
LDC 6
LDC 9
LDC 6	RETURN
LDC 6
BRN

Jr-CO

tu

CQ

id «3· r~ ro O O O O

s a s 9

O (H

pi m

5 S S

Q Q Q Eh Eh Eh Eh Eh h5 J 1-5 (-3 f-T CO IO CO CQ CG

cn

ei

H HI

m m

CQ CQ

ο ο ο ο --ι ο ο ο ο ο .η ο O O O O O O

r-l

ooooooooooo ooooooooooo ooooooooooo

4 l i

O O O O

OOOOOO
OOOO-iOOOOOO OOOO -hOOOOOO

ΟΟ'Ήι-ϊ«ηΟΉΟΟΟΟ <-ηΟή·ηΟ>ηΟΟΟΟΟ *Η >-i r-i O " ·** O >-tO O O -(O O O O O O O O O O O iH ΐ-ί ιΗ t-f r-4 ι-Η

OOOOOrHr-fOOOOOOOOOOO

ro

rn Ö

NNIOaNNNNO)NN(S(MNNN

οσοοοο ooooooooooo o

409826/0862

4*3-

Pm H

CQ

SLT

SLT

SLT

IXT

ISl

RETUR

W, CTA

PTl

LDCl

LDC 6

W, AXC

W ,AMC

CO

W, SLA

A CQ 5E

X, SRA

CQ •Χ!

PLS

W ,SLA

ft K X PQ

PTIl

W, AXC

LDC 6

LDC 6

EH

H l-i-f

FBSf

000

000

000

000

000

000

OTT

100

000

000

OTT

OTT

010

OTT

OTT

010

010

100

OTT

O Ή O -H iH rH

100

OTT

000

000

001

TOO

TOO

TOT

000

OTT

TOO

TOO

TTO

TTO

TOT

TOO

111

TOO

TOO

TOO

111

111

TOO

pH γ*Η ο ο ■Η. ιΗ

TOO

TOT

TTO

TTO

100

100

100

100

TOO

000

OTT

TOO

TOO

OTT

OTT

TOT

TOT

100

100

TTO

TOT

000

100

O Ή O <η ■Η O

TTO

OTT

OTT

OTT

O O O O

O O O O O

O O

O O O

HOO

' CM

NNNNNN

CMOOOOOOOOOOO OO

nn csj csl o4 cn cm cs cm π π γο OOOOOOOOOOOO

409826/0 862

	198	0303
	199	0304
	200	0305
	201	0306
	202	0307
	203	0310
	204	0311
	205	0312
	206	0313
	207	0314
09826,	208 209	0315 0316
/0862	210	0317

0112

0320

212	0321
213	0322
214	0323

0221

0316

0	101	001	100
0	100	101	Oil
0	110	Oil	000
1	010	Oil	000
0	110	Oil	000
1	101	Oil	000
0	111	Oil	000
0	000	Oil	000
1	οοα·	000	111
0	000	000	000
0	000	000	000
0	010	101	000

0 100 010 000

0 010 101 000

0 001 111 110

1 100 111 Oil

0 111 001 100

BJMP

FLG2

PT5 BRN LDC 6 LDClO LDC 6 LDC13 LDC 7 · LDCO BRN DUMMY DUMMY CXM

ROM 2

CXM

S, CMl

BRN

PT7

DONE

BLBLl

FLG2

RESTORE FLAG AND DATA Kennzeichen und Daten zurückstellen

GO TO ROM 2 TO CONTINUE TESTS

Zum ROM 2 gehen, um Tests fortzusetzen

EXCHANGE FLAG AND DATA Daten und Kennzeichen austauschen

DOES OP LEVEL = O?
OP-Niveau =0?

NO < CONTINUE TESTS
Nein, Tests fortsetzen

YES, SET POINTER TO LOAD FLAG

Ja, Hinweismarke setzen , um Kennzeichen zu laden

CO CO 4>· CO

O CD OO κ> cn ¹^ σ oo Φ ro

215	0324	0067	1	001	Oil	000	SETFLG	LDC 9	SUPVR
216	0325	0137	0	010	101	000		CXM	ACC
217	0326	0047	0	Oil	Oil	111		BRN	-
218	0327	0137	0	110	000	001	BACC-	JSB	ACC
219	0330	0037	0	010	Oil	111		BRN	+
220	0331	0331	0	110	000	001	BACC+	JSB	BACC+
221	0332	0327	0	001	111	111		BRN	BACC-
222	0333	0152	1	101	100	111	ACC+	BRN	BACC *
223	0334	0150	1	101	Oil	111	ACC-	BRN	BACCy
224	0335		0	110	101	Oil	ACC*	BRN
225	0336		0	110	100	Oil	ACC/	BRN
226	0337	0363	0	111	001	100 ■	TABC	PT7	TAB
227	0340	■0354	0	001	100	010		PyCMl	PRETURN
228	0341		1	111	001	111		BRN
229	0342		1	110	110	Oil		BRN
230	0343		0	111	Oil	000	RET	LDC7
231	0344	0	010	Oil	000		LDC 2
232	0345	0	110	Oil	000		LDC 6

SET FLAG
Kennzeichen setzen

RESTORE FLAG AND DATA
Kennzeichen und Daten
zurückstellen

RETURN TO SUPERVISOR
Zum Überwachungsprogramm zurückgehen

SET POINTER TO TAB FLAG Hinweismarke auf TAB-Kennzeichen setzen

IS FLAG SET ? Ist Kennzeichen gesetzt?

YES, OUTPUT A TAB Ja, Ausgabe ein TAB

NO, RETURN TO ROUTINE Nein, zur Routine zurück

N) U) CO CO OJ 4> GO

	Seite	253
	233	0346
	234	0347
	235	0350
	236	0351
	237	0352
	238	0353
	239	0354
	240	0355
σ
co
co
KJ
	241	0356
O
CX)
NJ	242	0357
	243	0360
	244	0361
	245	0362
	246	0363

0112

0	101	Oil	000	PRETURN	LDC 5
0	111	Oil	000	LDC 7
0	100	Oil	000	LDC 4
0	100	101	011	BRN
0	000	000	000	DUMMY
0	000	000	000	DUMMY
0	110	010	000	ROM 3

110 100 100

010 101 000

000 001 100

001 100 010

1 111 100 Oil

1 101 111 111

101 000 000

CR/LF

TAB

P, CMl

DONE

CR/LF1

TABC

DO NOT TAB
Nicht TAB

RESET SCIENTIFIC NOTATION FLAG

Kennzeichen für wissenschaftliche Notierung zurücksetzen

RECALL TFLAG FOR FUNCTION TEST ·

T-Kennzeichen für Funktionstest zurückrufen

SET POINTER TO CR/LF FLAG Hinweisiuarke auf CR/LF-Kennzeichen setzen

IS FLAG SET?

Ist Kennzeichen gesetzt?

YES, OUT PUT CR/LF '
Ja/ CR/LF ausgeben

NO, CHECK IF TAB IS SET Nein, prüfen ob TAB gesetzt ist

PREPARE TO LOAD CODE FOR TAB

Kodeladung für TAB vorbereiten

CD CO OO

247 0364

248 0365

249 0366

250 0367

251 0370

252 0371

253 0372

254 0373

255 0374

256 0375

257 0376

258 0377

0037 0 010 000

0 101 Ιοί

1 001 000

0147 0 110 011

0 101 000 000 CR/LF

0002 0 000 001

0 101 101

1 001 000 0235 1 001 110

0 110 011 000 LOGX 0100 0 100 000 0143 0 110 010 001 CALL

LI0100 SRI

ISl

BRN IS2 ·

LIO" SRI

ISl BRN

LDC 6

BRN

JSB

LCI02

CR/LF2

LOAD TAB CODE
TAB-Kode laden

SHIFT CODE TO OUTPUT POSITION

Kode zur Ausgabeposition schieben

PREPARE TO RETURN
Rückkehr vorbereiten

OUTPUT TAB
TAB ausgeben

PREPARE TO LOAD CODE FOR CR/LF

Kodeladung für CR/LF vorbereiten

LOAD CODE FOR CR/LF . Kode für CR/LF laden

SHIFT CODE TO OUTPUT POSITION

Kode zur Ausgabeposition schieben

PREPARE TO RETURN
Rückkehr vorbereiten

. OUTPUT CR/LF
CR/LF ausgeben

CO CO CO CO

Betrieb des Rechners

In der Grundausführung enthält der Rechner drei Registerstellen, in welche Zahlen entweder zur direkten Verwendung oder zur späteren Verwendung eingegeben werden. Es handelt sich um das X-Register, das C-Register und RT-Register.

Jede Zahl, welche der Benutzer durch die Tastatur eingibt, gelangt in das X-Register. Falls der Rechner mit einer Einsteck-Leuchtdiodenanzeigeeinheit versehen ist, wird die Zahl bei der Eingabe angezeigt. Das X-Register nimmt auch das Ergebnis jedes mathematischen Vorganges auf.

Jedesmal, wenn die Gleichheitszeichentaste betätigt wird, wird ein Ergebnis erzeugt, das in das X-Register eingegeben · und auch zu dem Inhalt des RT-Registers hinzugefügt wird, um das Gesamtergebnis zu erhöhen.

Das C-Register kann dazu benutzt werden, um irgendeine Konstante für die spätere Verwendung bei der Ausführung von Rechnungen zu speichern. Wann immer die Speichertaste betätigt wird, wird der Inhalt des X-Registers in dem C-Register verdoppelt (gespeichert) .' Jede in dem C-Register gespeicherte Konstante bleibt ungeändert, bis entweder eine andere Konstante in diesem gespeichert ist oder der Rechner abgeschaltet wird. Die "RÜCKRUF"-Taste wird dazu benutzt, um den Inhalt des C-Registers in das X-Register zurückzurufen. Die Betätigung der Löschtaste löscht die Inhalte der X- und RT-Register und bewirkt, daß das Wort "Löschen" durch den Drucker gedruckt wird. Die Befehle "Löschen" lassen den Inhalt des C-Registers unverändert.

Die Betätigung der Taste "LÖSCHE EINGÄBE" löscht den Inhalt des X-Registers, läßt aber die Inhalte der C- und RT-Register unverändert.

409828/08 62

Wenn die Versorgungsieistung für den Rechner abgeschaltet wird, werden alle Speicherregister gelöscht.

Zusätzlich zu dem Ausdrucken des Befehles "LÖSCHEN" und der Anzeige der Tastaturvorgänge wird der Benutzer durch den Rechner über seine Fehler durch Fehlerausdrucke informiert, wenn ein Fehler aufgetreten ist. Eine Tabelle der Fehlernoten erfolgt später. Einige Fehler können schnell korrigiert werden, während andere erfordern', daß die Löschtaste betätigt wird und das Problem von neuem angegangen wird.

Die vier grundlegenden RQchenvorgänge umfassen die Addition, die Subtraktion, die Multiplikation und werden in einfacher Weise durch den Rechner ausgeführt. Es wird der erste Operand eingegeben, die gewünschte Betriebstaste betätigt, der zweite Operand eingegeben und dann die Gleichheitszeichentaste betätigt, um die Rechnung auszuführen. Das Ergebnis wird dann in das Register eingegeben. Wenn Rechnungen ausgeführt werden, die mehr als einen Operator erfordern, benutzt jeder nachfolgende Vorgang das Ergebnis des vorherigen Vorgangs.

Ein rotes Besetztlicht auf eier Tastatur leuchtet auf, wenn der Rechner eine Funktion ausführt und irgendwelche Tasteninformationen nicht verarbeiten kann. Wenn der Rechner ein Programm der Speicherbibliothek ausführt, das in einem Einsteck-ROM oder PROM gespeichert ist, kann das Besetztlicht für mehrere Sekunden eingeschaltet bleiben. Dieses Licht dient einfach dazu, die Bedienungsperson daran zu erinnern, daß der Rechner irgendwelche Tastenbetätigungen ignoriert, welche während der Leuchtdauer der Lampe erfolgen.

Negative Zahlen werden eingegeben, indem zunächst die Zahl eingegeben wird und dann ihr Vorzeichen geändert wird. Das Vorzeichen wird durch die aufeinanderfolgende Betätigung der Umschalttaste und der Taste "LINKE KLAMMER" eingegeben. Negative Zahlen werden rot auf dem Ausgangsdrucker angezeigt. _:

409826/0862

- 62O -

Wie schon erwähnt wurde, führt der Rechner aufeinanderfolgende mathematische Operationen aus, indem er das Ergebnis des vorherigen Vorgangs benutzt. Durch die Verwendung der Tasten "LINKE KLAMMER" und "RECHTE KLAMMER" können die Vorgänge zusammengefaßt werden, wie es bei der üblichen mathematischen Schreibweise mit Klammern der Fall ist. Die Verwendung von Klammern in mathematischen Ausdrücken macht es überflüssig, daß Zwischenergebnisse gespeichert und aufgerufen werden. Der Ausgangsdrucker druckt das Ergebnis jedes Vorganges innerhalb der Klammern zu einem Zeitpunkt, in welchem jeder rechte Kalmmerausdruck eingegeben wird. Die Klammerausdrücke können bis zu fünf verschachtelten Klammern enthalten.

Die Exponententaste wird dazu benutzt, um jede Zahl zu jeder Potenz zu erheben. Die zu einer Potenz zu erhebenden Zahl wird eingegeben, dann wird die Exponententaste betätigt und dann die Potenzzahl eingegeben.

Die Prozenttaste kann in Verbindung mit allen vier mathematischen Operatoren verwendet werden, um beispielsweise einen Prozentsatz einer Zahl in dem X-Register zu berechnen oder einen Prozentsatz einer Zahl in dem X-Register innerhalb einer Rechnung zu ermitteln. Wenn beispielsweise erwünscht ist, daß 6 % von 39,95 berechnet werden, würde die Bedienungsperson 39,95 eingeben, dann die Multiplikationstaste betätigen, dann eine 6 eingeben, dann die Prozenttaste betätigen und schließlich die "IST GLEICH"-Taste drücken, um das Ergebnis 2,40 zu erhalten.

Falls der Benutzer 20 % von 80 abziehen möchte, würde er zunächst die Zahl 80 eingeben, dann die Subtraktionstaste betätigen, dann die Zahl 20 eingeben, dann die Prozenttaste betätigen und schließlich die Taste "IST GLEICH" drücken, um das Ergebnis von 64 zu erhalten. Wenn die linearen Zinsen über ^ zwei Jahre von 500 DM bei 7 % berechnet werden sollen, würde der Benutzer zunächst die Zahl 500 eingeben, dann die Multiplikationstaste drücken, dann die Zahl 7 eingeben, dann die

670862

Multiplikationstaste drücken, dann die Zahl 2 eingeben und schließlich die Taste "IST GLEICH" betätigen, um als Ergebnis die Zahl 70 zu erhalten.

Der Ausgangsdrucker ist verschiedenen Tasten zugeordnet, welche dessen Betrieb steuern. Die Taste "DRÜCKER ABGESCHALTET" unterdrückt den Ausdruck des Tastenbetriebs, läßt aber den Druck von Fehlernotierungen sowie den Löschbefehl zu. Die Betätigung der Taste "DRÜCKEN" druckt den laufenden Inhalt des X-Registers, unabhängig davon, ob der Betrieb "DRUCKER ABGESCHALTET" vorliegt. Das Symbol = begleitet jede Zahl, die durch Betätigung der Drucktaste gedruckt wird. Die Papiertaste wird benutzt, um das Druckpapier schnell weiterzuschalten. Wenn der Rechner eingeschaltet wird, wird das Anzeige- und Druckformat automatisch auf die Abrundung von zwei Stellen eingestellt. Das bedeutet, daß jede angezeigte und/oder gedruckte Zahl mit zwei Ziffern rechts vom Dezimalpunkt angezeigt wird. Das Format kann geändert werden, so daß 0 bis zu 6 Dezimalziffern angezeigt werden, indem die Taste "ABRUNDEN" betätigt wird und die geeignete Zahl angegeben wird. Ausgedruckte und angezeigte Ziffern können in Gleitkomma-Schreibweise oder Exponentenschreibweise eingegeben werden, indem die Taste "ABRUNDEN" und dann die Taste "DEZIMALPUNKT" betätigt werden. Einige der Rechnertasten stellen doppelte Funktionen dar, deren Bedeutung davon abhängt, ob vorher die Umschalttaste betätigt worden ist. Die Betätigung der Umsachalttaste und der Exponententaste bewirken, daß der Rechner den Kehrwert des Inhaltes des X-Registers anzeigt. Die Betätigung der Umschalttaste und die nachfolgende Betätigung der Taste "DIVISION" führt zu der Berechnung des Zehnerlogarithmus der Zahl in dem X-Register. Die Betätigung der Umschalttaste und die nachfolgende Betätigung der Multiplikationstaste bewirken die Berechnung des natürlichen Logarithmus des Inhaltes des X-Registers.

Die Betätigung der Umschalttaste und die,nachfolgende Betätigung der Additionstaste bewirken, daß die Potenz zur Basis e

409826/08 62

des Inhaltes des X-Registers gebildet wird. Die Betätigung der Umschalttaste und die nachfolgende Betätigung der Subtraktionstaste bewirken die Division der in dem Register 12 stehenden Zahl durch 12.

Wenn Probleme gelöst werden, welche die Eingabe mehrerer Zahlen in gleicher Form erfordern, beispielsweise DM und Pfennig, wird die Taste "AOTO-DEZIMALPUNKT" betätigt, so daß der Dezimalpunkt automatisch an der betreffenden Stelle bei jeder Dateneingabe eingesetzt wird. Dadurch braucht die Taste Dezimalpunkt an der richtigen Stelle nicht bei der Eingäbe jeder Zahl gedrückt zu werden. Die Stelle, an welcher der Dezimalpunkt automatisch angeordnet wird, wird durch das laufende Abrundungsformat angegeben. Wenn der Rechner bei-spielsweise in dem Abrundungsformat 2 arbeitet und das Merkmal des automatischen Dezimaipunktes verwendet wird, wird der Dezimalpunkt derart angeordnet, daß zwei Ziffern rechts davon angezeigt werden. Das RT-Register speichert jedesmal die Ergebnisse, die in das X-Register eingegeben werden, wenn die "IST GLEICH"-Taste betätigt wird. Um den Inhalt des RT-Registers in das X-Register zurückzurufen und gleichzeitig den neuen Inhalt des X-Registers anzuzeigen und zu drucken, betätigt der Benutzer einfach die Umschalttaste und dann die Taste "IST GLEICH".

Wie im einzelnen früher in dieser Anmeldung beschrieben wurde, kann der Benutzer in den Rechner wahlweise Datenspeicher einfügen. Dieses ergibt die Möglichkeit, das einzelne C-Register bei der Grundausführung des Rechners um jeweils 30 oder 100 Register zu erweitern. Die zusätzlichen Register werden von 0 bis 29 oder von O bis 99 numeriert. Um die gerade in dem X-Register befindlichen Daten in eines der Register der zusätzlichen Datenspeicher einzugeben, wird zunächst die Umschalttaste betätigt, dann die Speichertaste gedrückt und dann die entsprechende Registernummer angegeben und schließlich die Taste "IST-GLEICH" betätigt. Um eine Zahl von dem zusätz-

40982 6/0862

- C23 ·-

lichen Datenspeicher zurückzurufen/ wird die "RÜCKRUF-TASTE" an Stelle der Speichertaste getätigt. Es ist möglich, eine " ausgedruckte Liste aller in den zusätzlichen Registern enthaltenen Daten zu erhalten, indem die folgende Tastenfolge durchgeführt wird: VERSCHIEBEN* PROGRAMMSTART, DRÜCKEN, IST GLEICH. Die Registerinhalte werden in Blocks von zehn , _; ausgedruckt, wobei mit dem Register 0 begonnen wird. Um alle wahlweisen Datenspeicherregister zu löschen, werden die Tasten wie folgt betätigtt VERSCHIEBEN, PROGRAMMSTART, NULL, IST GLEICH. Die zusätzlichen Datenspeicherregister können erhöht oder erniedrigt werden, indem die Umschalttaste und dann die Programmstarttaste und dann entweder die Additionstaste und die Subtraktionstaste betätigt werden.

Es kann ein Einsteck-Auslesespeicher (ROM) oder ein programmierbarer Auslesespeicher (PROM) zusammen mit dem Rechner verwendet werden» Ein derartiger Auslesespeicher kann eines oder mehrere in der Benutzersprache geschriebene Programme enthalten, die von der Tastatur aus gesteuert werden. Das in einem (programmierbaren) Einsteck-Auslesespeicher gespeicherte Programm kann entweder durch den Benutzer oder durch das Betriebspersonal durch Befehlsprogramme ausgelöst werden, die in dem Speicher A-O der ROM-Gruppe enthalten sind. Jedes dieser Programme hat eine dem ROM A-O zugeordnete Speicheradresse. Wenn ein Programm mit einem Einsteck-ROM oder PROM durchgeführt werden soll, warden die Startadresse jedes auszuführenden Programmes und die Bit-Muster in dem ROM oder PROM in derjenigen Reihenfolge eingegeben, in welcher diese Programme durch das Gesamtprogramm ausgeführt werden. Die verfügbaren Programme, aus denen der Benutzer auswählen kann, wenn er das Gasamtprogramm zusammenstellt, können Unterprogramme enthalten, welche nicht als im manuellen Betrieb durch die Tastatur ausführbare Programme angegeben sind. In der nachfolgenden Tabelle ist jeder verfügbare Befehl zusammen mit seiner Startadresse in dem Auslesespeicher ROM A-O der ROM-Gruppe in der Grundausführung des Rechners angegeben . ·

409826/088 2

Startadresse des Befehlsprogrammes

Bezeichnung

Befehlsbeschreibung

064 012 013 014 016' 020 022 023 026 032 033 034 036 040 042 043 044 046

050 052 053 054 056

062

063 066 070 072 073 076 150 107

START BEGINNE PROGRÄMMAUSFÜHRUNG

/ GLEITKOMMA-DIVISION

+ GLEITKOMMA-MULTIPLIKATION _

STOX POTENZFUNKTION (X^Y)

) RECHTE KLAMMER IST GLEICH DEZIMALPUNKT

0 ZIFFER NULL

( LINKE KLAMMER

3 ZIFFER 3 2 Ziffer 2

1 - Ziffer 1 % PROZENT

+ GLEITKOMMA-ADDITION

6 ZIFFER 6 5 ZIFFER,5

4 ZIFFER 4

CRCL RUFE DIE DATEN VOM BENUTZERSPEICHERREGISTER INS X-REGISTER ZURÜCK

GLEITKOMMA-SUBTRAKTION 9 ZIFFER 9 8 ZIFFER 8

7 ZIFFER 7

STO SPEICHERE DIE DATEN IN DAS BENUTZER-SPEICHERREGISTER

RUN FAHRE MIT PROGRAMMAUSFÜHRUNG FORT

LE SETZE LETZTE EINGABEMARKE

CANCEL LÖSCHE EINGABE

SHIFT VERSCHIEBEN

RND ABRUNDEN

CLR LÖSCHE ARBEITSREGISTER

PRTX DRUCKE DIE DATEN IM X-REGISTER

JMP- SPRINGE ZURÜCK

NOP PROGRAMMIERTE PAUSE

4 0 9 8 2 6/0862

- &2S -

Startadresse des Befehlsprogrammes	Bezeichnung	Befehlsbeschreibung
131 207	CHS LBL	ÄNDERE DAS VORZEICHEN DER DATEN BEGINN DER AUFSCHRIFT
152	JMP+	SPRINGE VORWÄRTS
224	SUBLBX	UNTERPROGRAMMSPRUNG ZUR BERECHNETEN AUFSCHRIFT
225	SUBLBL	UNTERPROGRAMMSPRÜNG ZUR AUFSCHRIFT
226	SUB	UNTERPROGRAMMSPRÜNG ZUR ADRESSE
237	TBL	RUFE DIE FUNKTION DES FUNKTIONSBLOCKS AUF
240	FOl	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 1
241	F02	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS #2
242	F03	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 3
243	FO 4	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 4
224	FO 5	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 5
245	FO 6	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 6
246	F07	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 7
247	F08	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 8
250	F09	RUFE DIE TASTENFUNKTION DES FÜNKTIONSBLOCKS #· 9
251	FlO	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 10
252	FIl	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS #11
253	F12	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 12
254	F13	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 13
255	F14	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS #14
256	F15	RUFE DIE TASTENFUNKTION DES FUNKTIONSBLOCKS # 15
263	STOP 40982 6/	HALTE PROGRAMMÄNFÜHRUNG AN 0862

Startadresse des Befehlsproqrammes

Bezeichnung

Be fehlsbes chreibung

267

270 275 300 312 316 322

14O 325 326

327 330 331

'332 333 334 335 336 337

342 346 347 353

354 355 362 363 373

1/X

EXP

IFO

STEP

IF+

IF-

IFLE

PRTACC

PRTDS

CLDS

DS+ DS-STO

ACC+

ACC-

ACC⁺

ACC/

RCL

EXCH

RET SFLG IFFLG JMPLBX

JMPLBL JMP X/12 ADV

KEHRPfERT DES X-REGISTER-INHALTES

EXPONENTIALFUNKTION (e^X) PRÜFEN, OB DATEN NULL SIND PROGRAMMAUSFÜHRUNG PRÜFEN, OB DATEN POSITIV SIND PRÜFEN, OB DATEN NEGATIV SIND PRÜFE.OB LETZTE EINGABE-MARKE GESETZT IST

DRUCKE GESAMTSUMME DES RECHNERS

SCHREIBE DIE REGISTER DES DATENSPEICHERS AUF LÖSCHE DAS ZUSÄTZLICHE DATENSPEICHERREGISTER

ERHÖHE DATENSPEICHER UM (C) . ERNIEDRIGE DATENSPEICHER UM (C) SPEICHERE DIREKT IN DIE DATENSPEICHERADRESSE ÄNDERE DIE SPEICHERUNG UM ZU SUMMIEREN

ÄNDERE DIE SPEICHERUNG UM ZU SUBTRAHIEREN

ÄNDERE DIE SPEICHERUNG UM ZU MULTIPLIZIEREN

ÄNDERE DIE SPEICHERUNG, UM ZU TEILEN

RUFE VON DER DATENSPEICHERADRESSE ZURÜCK

TAUSCHE MIT DEN DATEN AN DER ADRESSE AUS

KEHRE VOM UNTERPROGRAMM ZURÜCK SETZE MARKE ()

PRÜFUNG OB MARKE GESETZT IST

GEHE ZU DER BERECHNETEN AUFSCHRIFT

GEHE ZUR AUFSCHRIFT GEHE ZUR ADRESSE
X-REGISTER GETEILT DURCH 12 DRUCKPAPIERVORSCHUB

PROGRAMMENDE 0862

5. - 627 -

Startadresse des Bezeichnung Befehlsbeschreibung Befehlsproqraromes

374 LOGX GEMEINSAMER LOGARITHMUS

375 LNX NATÜRLICHER LOGARITHMUS

376 CALL RUFE I/O-EINHEIT AUF

Obigeich ein Einsteck-Auslesespeicher ROM oder PROM verwendet wird, kann der Rechner dennoch im manuellen Betrieb verwendet werden. Ein derartiger Speicher kann irgendeine Anzahl getrennter Programme enthalten, welche lediglich durch die Kapazität des Auslesespeichers begrenzt ist. Getrennte Programme können durch irgendeine Zahl zwischen 0 und 900 bezeichnet werden. Um ein Programm zu fahren, welches das einzige in einem speziellen Auslesespeicher ist, ist es lediglich erforderlich, die Programmlauftaste zu betätigen. Falls das Programm Haltebefehle für die Dateneingabe von der Tastatur aufweist, muß der Benutzer nach jeder Dateneingabe die "LAUF/STOPP"-Taste betätigen. Wenn • der gerade verwendete (programmierbare) Auslesespeicher verschiedene Programme enthält, kann der Benutzer mit der Ausführung eines dieser Programme beginnen, indem er die Taste "PROGRAMMAUSFÜHRUNG¹¹ betätigt, dann die Zahl des Programmes eingibt und dann die Taste "PROGRAMMABLAUF/STOPP" betätigt. Während der Durchführung eines ROM/PROM-Programmes halbieren zunächst aufeinanderfolgende Betätigungen der Taste "PROGRAMMABLAUF/STOPP" die Programmausführung und nehmen sie dann wieder auf.

Bei der Ausführung eines Programms in dem Auslesespeicher können solche Befehlsprogramme verwendet werden, die sich in dem Auslesespeicher A-O des Rechners befinden, welche vorstehend angegeben.wurden. Zusätzlich können weitere Befehlsprogramme durchgeführt werden, wenn einer der Einsteek-Tastatur-Funktionsblocks mit dem Rechner zusammen verwendet wird. Die in dem Einsteck-Funktionsblock "DURCH DEN BENUTZER DEFINIERBARE MATHEMATIK" definierten Funktionen sind nachfolgend aufgeführt. Diese Funktionen werden durch das Aufrufprogramm TBL durch den Funktionsblock aufgerufen, das sich an der Adresse 237 des

409826/0862

Auslesespeiehers ROM A-O befindet, indem der Tastenkode angegeben wird, der jedem.nachfolgend aufgeführten Befehlsprogramm entspricht.

Befehlsprograitme in der Tabelle des durch den Benutzer definierbaren Mathematik-Funktionsblocks

Tastenkode Befehlsprogramm

00 . WINKELEINGÄBE (GRAD, MINUTEN, SEKUNDEN)

01 SINUS

02 KOSINUS
' 03 TANGENS

04 ARKUS-SINUS

05 ARKUS-KOSINUS

06 ARKUS-TANGENS

07 QUADRATWURZEL DES INHALTS DES X-REGISTERS

09 X²

10 ir (PI)

11 GANZZÄHLIGER WERT VON X

12 ABSOLUTWERT VON X

13 XY-KOORDINATEN IN POLARKOORDINATEN

14 POLÄRKOORDINATEN IN XY-KOORDINATEN

15 ZEIGE DEN INHALT DES DATENSPEICHERREGISTERS O AN

16 · VEKTORADDITION

17 VEKTORSUBTRAKTION

18 RUFE ADDITION/SUBTRAKTION DER VEKTOREN ZURÜCK

19 LÖSCHE VEKTOR-ADDITION/SUBTRAKTION

20 WANDLE GRAD, MINUTEN, SEKUNDEN IN DEZIMAL-GRADE UM

21 WANDLE DEZIMALGRADE IN GRAD, MINUTEN, SEKUNDEN UM

22 WANDLE GRAD IN DEZIMALGRAD UM

23 . WANDLE DEZIMALGRAD IN GRAD UM

24 WANDLE RAD IN DEZIMALGRAD UM

25 WANDLE DEZIMALGRAD IN RAD- UM

26 WANDLE "MIL" IN DEZIMALGRAD UM

409826/0862

Tastenkode - Befetilsprogramm

27 WANDLE DEZIMALGRAD IN MIL UM

28 EXPONENTENEINGABE

30 DRUCKE DIE INHALTE DER DATENSPEICHERREGISTER O UND 1 MIT X, Y-AUFSCHRIFTEN

31 DRUCKE DATENSPEICHERREGISTER O UND 1 MIT R, A-AUFSCHRIFTEN

4N SPEICHERE IN N⁺ 0<N<9

5N RUFE VON N⁺0<N<9

Wo N eines der 10 Datenspeicherregister innerhalb des Funktionsblockes ist.

Zusätzlich zu der Möglichkeit, daß Programms für den ROM- oder PROM-Auslesespeicher modifiziert werden können,- können die vorgenannten Befehlsprogramme von der Standard-Tastatur im manuellen Betrieb abgerufen werden. Dieses erfolgt, indem nacheinander die Umschalttaste und die Taste "DEZIMALPUNKT¹¹ und dann der Tastenkode des gewünschten Befehlsprogrammes betätigt werden.

Jede der 15 Tasten in dem durch den Benutzer definierbaren Mathematikblock ist einer speziellen Adresse in einem Einsteckspeicher zugeordnet. Dadurch kann ein in einem Block beschriebenes Programm derart angeordnet werden, daß seine Startadresse einer der Funktionsblocktasten entspricht. Ein derartiges Programm kann dann ausgeführt werden, indem einfach die zugeordnete Funktionsblocktaste gedrückt wird. Diese Tasten haben lösbare transparente Kappen, in welche der Benutzer Aufschriften einsetzen kann, die das Programm oder die zugeordnete Funktion bezeichnen.

Fehleranzeigen .

Wie schon ausgeführt wurde, werden während des Betriebs des Rechners auftretende Benutzerfehler durch eine ausgedruckten Hinweis angezeigt. Eine Aufstellung dieser Hinweise mit der entsprechenden Fehlerbezeichnung folgt:

409826/0862 " - '

- Ö.5U -

NOTE OO ZU VIELE UNTERPROGRAMMAUFRUFE,ODER RÜCKKEHR-BEFEHLE

NOTE 04 SCHON FÜNF KLAMMERAUSDRÜCKE AUFGERUFEN

NOTE 05 DER RECHTEN KLAMMER GEHT DIE LINKE KLAMMER VORAUS

NOTE 08 NEGATIVE ZAHL ZU EINER NICHT GÄNZZAHLIGEN POTENZ ERHOBEN

NOTE 09 LOG ODER LN EINER NEGATIVEN ZAHL

NOTE 11 VORHERIGES ERGEBNIS BEDEUTET REGULÄREN ÜBERTRAG, NACHFOLGENDES ERGEBNIS BEDEUTET ÜBERTRAG DES RT-REGISTERS

NOTE 12 LOG ODER LN VON NULL NOTE 15 NULL ZU NEGATIVER POTENZ ERHOBEN NOTE 16 VERSUCHTE DIVISION DURCH NULL NOTE 20 AUFSCHRIFT NICHT GEFUNDEN NOTE 21 EINHEIT IO NICHT GEFUNDEN

PROGRAMMSPEICHER ÜBERSCHRITTEN

PROGRAMMSPEICHER NICHT FERTIG

DATENSPEICHER SOFTWARE NICHT VERFÜGBAR

FUNKTIONSBLOCK NICHT VERFÜGBAR

NOTE 22 RECHTE KLAMMER NACH EINEM VORGANG NOTE 24 GLEICHHEITSZEICHEN INNERHALB DER KLAMMERN NOTE" 26 DATENSPEICHERADRESSE NICHT GEFUNDEN

Claims (1)

1. Hewlett-Packard Comp. 17. Dez. 1973

   Case 785

   PATENT-ANSPRÜCHE

   Elektronischer Rechner mit einer Eingabeeinheit zur Eingabe von Information in den Rechner, einer Speichereinheit zur Speicherung von Routinen und Subroutinen, die von dem Rechner bei der Durchführung ausgewählter Berechnungen ausgeführt werden sollen, einer Recheneinrichtung zur selektiven Ausführung einer oder mehrerer der in der Speichereinheit gespeicherten Routinen, in Abhängigkeit von Information von der Eingabeeinheit und von Operationszuständen innerhalb des Rechners selbst, um unter Verwendung von von der Eingabeeinheit aus eingegebenen Daten ausgewählte Rechnungen auszuführen und eine Ausgangsanzeige der Ergebnisse dieser Rechnungen abzugeben, gekennzeichnet durch einen modularen Tastenfeldabschnitt, der einen Festwertspeicher mit zusätzlichen Routinen und Subroutinen von Instruktionen enthält, um den Benutzer mit zusätzlichen Tastenfeld-Funktionen zu versorgen.

   2. Elektronischer Rechner, vorzugsweise nach Anspruch 1, gekennzeichnet durch eine Tastenfeld-Eingabeeinheit mit einer Vielzahl von Befehlstasten und einer Vielzahl von Datentasten, die alle einem mnemonischen Kode zugeordnet sind; durch einen Festwertspeicher, der mit der Tastenfeld-Eingabeeinheit in Verbindung steht, um in mnemonischer Sprache des Tastenfeldes geschriebene Programme zu speichern; durch eine HauptspeiGhereinheit für die Speicherung von mikro-programmierten Routinen und Subroutinen, die von dem Rechner bei der Ausführung ausgewählter Befehle in Tastenfeldsprache durchgeführt werden sollen; und durch eine mit der

   409826/0862

   Tastenfeld-Eingabeeinheit, dem Pestwertspeicher und der Hauptspeichereinheit verbundene Prozessor-Einheit, die in Abhängigkeit von einem direkt vom Tastenfeld aus eingegebenen oder in dem Festwertspeicher gespeicherten Tastenfeldbefehl die zugeordneten mikro-programmierten Routinen und Subroutinen ausführt, die in der Hauptspeichereinheit gespeichert sind.

   3, Elektronischer Rechner nach Anspruch 2, dadurch gekennzeichnet , daß der Festwertspeicher programmierbar ist* .

   4. Elektronischer Rechner, vorzugsweise nach einem der vorhergehenden Ansprüche,gekennzeichnet durch eine Tastenfeld-Eingabeeinheit mit einer Vielzahl von Befehlstasten und einer Vielzahl von Datentasten, von denen alle einem mnemonischen Kode zugeordnet sind, sowie mit einer Vielzahl von definierbaren Tasten; durch einen ersten, mit der Tastenfeld-Eingabeeinheit verbundenen und der Vielzahl von definierbaren Tasten zugeordneten Festwertspeicher zur Speicherung einer Tabelle von mikro-programmierten Routinen und Subroutinen, die eine oder mehrere ausgewählte mathematische Funktionen darstellen; durch einen zweiten mit der Tastenfeld-Eingabeeinheit verbundenen Festwertspeicher zur Speicherung von in mnemoiiiischer Tastenfeldsprache geschriebenen Programmen; durch einen Hauptspeicher zur Speicherung¹ von mikro-programmierten Routinen und Subroutinen/ die von dem Rechner bei der Ausführung von Befehlen in Tastenfeld-Sprache durchgeführt werden sollen; durch eine mit der Tastenfeld-Eingabeeinheit, dem ersten und dem zweiten Festwertspeicher sowie der Hauptspeichereinheit verbundene Logikeinheit, um eine ausgewählte definierbare Taste einem ausgewählten, in dem zweiten Festwertspeicher gespeicherten Programm zuzuordnen und um eine oder mehrere ausgewählte, in dem ersten Festwertspeicher gespeicherte Tabellenfunktionen dem ausgewählten Programm zuzuordnen; und durch eine mit der Tastenfeld-Eingabeeinheit, dem ersten und dem zweiten Fest-

   409826/0862.

   - $33 -

   wertspeicher, der Hauptspeichereinheit und der Logikeinheit verbundene Prozessor-Einheit, die bei Betätigung einer der definierbaren Tasten das Programm einschließlich der zugeordneten Tabellenfunktionen ausführt, das vorher dieser definierbaren Taste zugeordnet worden war.

   5. Elektronischer Rechner nach Anspruch 4, dadurch gekennzeichnet , daß die Vielzahl der definierbaren Tasten und der zugeordnete erste Festwertspeicher einen modularen, einsteckbaren Tastenfeldabschnitt aufweisen.

   6. Elektronischer Rechner, vorzugsweise nach einem oder mehreren der vorhergehenden Ansprüche, gekennzeichnet durch eine Tastenfeld-Eingabeeinheit mit einer Vielzahl von Befehlstasten und einer Vielzahl von Datentasten, von denen alle einem mnemonischen Kode zugeordnet sind, sowie mit einer Vielzahl von definierbaren Tasten; durch einen mit der Tastenfeld-Eingabeeinheit verbundenen Festwertspeicher zur Speicherung von zuvor zusammengestellten, in mnemonischer Tastenfeld-Sprache geschriebenen Programmen; durch eine Hauptspeichereinheit zur Speicherung von mikro-programmierten Routinen und Subroutinen, die von dem Rechner bei der Ausführung von Befehlen in Tastenfeldsprache durchgeführt werden sollen; durch eine mit der Tastenfeld-Eingabeeinheit, dem Festwertspeicher und der Hauptspeichereinheit verbundene Logikeinheit, um eine ausgewählte definierbare Taste einem ausgewählten, in dem Festwertspeicher gespeicherten Programm zuzuordnen; und durch eine mit der Tastenfeld-Eingabeeinheit, dem Festwertspeicher, der Hauptspeichereinheit und der Logikeinheit verbundene Prozessor-Einheit, die bei Betätigung einer der definierbaren Tasten das dieser Taste zugeordnete Programm ausführt.

   7. Elektronische Rechner, vorzugsweise nach einem oder mehreren der vorhergehenden Ansprüche, mit einer Tastenfeld-Eingabeeinheit zur Eingabe von Daten und Befehlen in den Rechner, einer Speichereinheit zur Speicherung von durch den Rechner

   409826/0882

   bei der Ausführung ausgewählter Befehle durchzuführender Routinen und Subroutinen, sowie mit einer mikro-progranimierten Prozessoreinheit, die in Abhängigkeit von Eingangsinformationen und von Operationszuständen innerhalb des Rechners selbst selektiv eine oder mehrere der in der Speichereinheit gespeicherten Routinen und Subroutinen ausführt, um unter Verwendung eingegebener Daten ausgewählte Befehle auszuführen und eine Ausgangsanzeige der Ergebnisse abzugeben, gekennzeichnet durch eine Verbindungskarte zur Kopplung einer ausgewählten externen Eingabe/Ausgabe-Peripherie-Einheit mit dem Rechner, wobei die Verbindungskarte eine Logikeinheit zur Übergabe von Daten zwischen dem Rechner und der ausgewählten externen Eingabe/Ausgabe-Peripherie-Einheit sowie einen mikro-programmierten Festwertspeicher enthält, um der Prozessoreinheit die Durchführung · logischer Operationen zu ermöglichen, die der ausgewählten Eingabe/Ausgabe-Peripherieeinheit zugeordnet sind.

   8. Elektronischer Rechner, vorzugsweise nach einem oder mehreren der vorhergehenden Ansprüche, mit einer Tastenfeld-Eingabeeinhei-t zur Eingabe von Daten und Befehlen in den Rechner und mit einer Prozessoreinheit, die in Abhängigkeit von vom Tastenfeld aus eingegebener Information und von Operationszuständen innerhalb des Rechners selbst selektiv Befehle ausführt und eine Ausgangsanzeige der Ergebnisse bewirkt, gekennzeichnet , durch eine Logikeinheit, die bei Auswahl eines automatischen Dezimalpunkt-Betriebs der Rechner-Operation einen Dezimalpunkt an eine vorher ausgewählte Stelle der eingegebenen Daten setzt, um die Notwendigkeit der manuellen Eingabe des Dezimalpunkts durch den Benutzer aufzuheben=

   9. Elektronischer Rechner, vorzugsweise nach einem oder mehreren der vorhergehenden Ansprüche, mit einer Tastenfeld-Eingabeeinheit zur Eingabe von Daten und arithmetischen Befehlen in den Rechner und einer Prozessor-Einheit, die in Abhängigkeit von vom Tastenfeld aus'eingegebener Information und von Operations zuständen innerhalb des Rechners selbst selektiv arithmetische Befehle ausführt und eine Ausgangsanzeige der

   409 8.26/0 86 2

   Ergebnisse bewirkt, gekennzeichnet durch eine Prozent-Taste und eine Lögikeinheit, die bei Eingabe von ersten Daten gefolgt von der Eingabe eines ausgewählten aus den vier arithmetischen Befehlen "Addieren", "Subtrahieren" , "Multiplizieren", "Dividieren", gefolgt von der Eingabe von zweiten Daten, gefolgt von der Betätigung der Prozent-Taste, die ersten Daten vermehrt um den Prozentsatz entsprechend den zweiten Daten, die ersten Daten vermindert um den Prozentsatz entsprechend den zweiten Daten, den den zweiten Daten entsprechenden Prozentsatz der ersten Daten bzw. die ersten Daten dividiert durch den Prozentsatz entsprechend den zweiten Daten berechnet.

   409826/0862