CH662434A5 - Frankiermaschine. - Google Patents

Description

Die vorliegende Erfindung betrifft eine Frankiermaschine.

Es sind elektronische Frankiermaschinen bekannt, die einen oder mehrere Mikroprozessoren aufweisen, um verschiedene Funktionen und Betriebsabläufe der Frankiermaschine zu steuern. Aus Sicherheitsgründen können alle Buchungen betreffende Daten von den anderen Steuerfunktionen betreffende Daten getrennt gehalten werden. Bei diesen Frankiermaschinen ist es schwierig bis unmöglich, dass die Frankiermaschine mit externen Geräten schnittstel-lenmässig in Verbindung treten kann.

Ziel der Erfindung ist es, eine Frankiermaschine zu schaffen, die in einfacher Weise die Ersetzung ihrer Steuergewalt durch ein externes Gerät gestattet, um hierdurch eine im wesentlichen hundertprozentige Übertragung der Steuerung des Frankiermaschinenbetriebes auf ein externes Gerät zu ermöglichen, ohne dass eine Änderung in der System-Hard-ware erforderlich ist.

Dieses Ziel wird erfindungsgemäss mit den kennzeichnenden Merkmalen des Patentanspruches 1 erreicht.

Die Vorteile der Erfindung sind im wesentlichen darin zu sehen, dass die gesamte Steuerung der Frankiermaschine und die gesamte, innerhalb der Frankiermaschine vorhandene Information durch eine Verbindung über einen Schnittstel-lenanschluss gesteuert werden kann und dass sämtliche von der Frankiermaschine ausführbaren Funktionen von einer • Fernstation aus elektrisch steuerbar sind, mit Ausnahme der rein manuellen Funktionen, wie Stromeinschaltung und Datumsänderung.

Weitere Einzelheiten und Vorteile der Erfindung ergeben sich aus der folgenden Beschreibung und den Zeichnungen. Es zeigen:

Fig. 1 eine vereinfachte perspektivische Ansicht einer Frankiermaschine,

Fig. 2 ein vereinfachtes Blockschema einer Ausführungsform einer Frankiermaschine,

Fig. 3 ein Blockschema einer Steuereinheit für die Frankiermaschine,

Fig. 4 ein Blockschema einer Buchungseinheit für die Frankiermaschine,

Fig. 5 ein mehr in Einzelheiten gehendes Blockschema einer bevorzugten Ausführungsform der Steuereinheit für die Frankiermaschine,

Fig. 6 ein mehr in Einzelheiten gehendes Blockschema einer bevorzugten Ausführungsform der Buchungseinheit für die Frankiermaschine,

Fig. 7 ein Blockschema einer bevorzugten Ausführungsform der Druckereinheit für die Frankiermaschine,

Fig. 8 ein den Rückmeldungsbetrieb in der Frankiermaschine darstellendes Zeitablaufdiagramm,

Fig. 9 ein die Übertragung aus der Frankiermaschine darstellendes logisches Diagramm,

Fig. 10 ein die Übertragung in die Frankiermaschine darstellendes logisches Diagramm,

Fig. 11 ein mit der Frankiermaschine im sogenannten «Dasy Chain»-Betrieb verketteter Satz verschiedener externer Geräte,

Fig. 12 ein den Betriebsablauf der Steuereinheit darstellender zusammenhängender Satz von Flussdiagrammen,

Fig. 13 ein den Betriebsablauf der Druckereinheit darstellender zusammenhängender Satz von Flussdiagrammen, und

Fig. 14 ein den Betrieb der Buchungseinheit darstellender zusammenhängenderSatz von Flussdiagrammen.

In der Fig. 1 ist eine auf einer Basis 21 abnehmbar befestigte Frankiermaschine 20 dargestellt. Bei dieser Anordnung ist zwischen der Frankiermaschine 20 und der Basis 21 an deren Vorderkante ein Schlitz 22 vorgesehen, um Umschläge oder dergleichen einzuschieben und eine Portogebühr darauf aufzudrucken. Die Frankiermaschine ist mit einer Anzeigeeinheit 23, die eine elektronische Anzeigevorrichtung hat, und mit einem Schaltpult 24 ausgerüstet. Das Gerät ist über ein Kabel 25 an das elektrische Netz anschliessbar.

Der innere Aufbau der Frankiermaschine ist aus Fig. 2 ersichtlich. Das Gehäuse der Frankiermaschine 20 ist in Abteile unterteilt. In einem ersten Abteil 55 ist die Druckereinheit 56 angeordnet, die eine Druckereinrichtung (nicht dargestellt) steuert.

Innerhalb des ersten Abteiles 55 ist ein zweites Abteil 57 vorgesehen, das vorzugsweise elektromagnetisch abgeschirmt ist. In diesem zweiten Abteil 57 ist eine Buchungseinheit 58 angeordnet.

Die Buchungseinheit ist mit externen, d.h. ausserhalb des Abteils 57 vorgesehenen Geräten durch optische oder ähnliche Koppler 59 verbunden, um jeglichen Schaden davon abzuhalten, sei es zufällig oder absichtlich, der durch die Einwirkung von Rauschstörungen, beispielsweise Überspannungen, an der Druckereinheit hervorgerufen werden kann. Eine derartige Kopplung ist natürlich nicht für dessen Energiequelle vorgesehen, die ebenfalls innerhalb des Abteils 55 eine in einem dritten Abteil 61 vorgesehene Stromversorgung 60 aufweist. Die Stromzufuhr zur Stromversorgung 60 erfolgt über einen innerhalb des Abteils61 angeordneten Filter 62, um Spannungsänderungen zu eliminieren, die die

Druckereinheit nachteilig beeinflussen würden. —

Das Gehäuse der Frankiermaschine 20 hat ein viertes

5

10

15

20

25

30

35

40

45

50

55

60

65

3

662434

Abteil 63. In diesem vierten Abteil 63 ist eine Sicherung 66 für die Frankiermaschine vorgesehen. Dieser Sicherung 66 ist ein Thermostat 67 und diesem ein Filter 68 nachgeschaltet. Der Thermostat verhindert beim Auftreten von Übertemperaturen.die Anlegung einer Spannung an die Frankiermaschine. Zum Schutz ist ein Isolationstransformator 69 und ein Überspannungsabieiter 70 vorgesehen. Die Stromversorgung der Frankiermaschine erfolgt schliesslich über eine Energiespeichervorrichtung 71, wie einen einen grossen Wert aufweisenden Kondensator angelegt, wobei der Kondensator 71 eine angemessene Energiespeicherung ermöglicht, so dass die Daten beim Auftreten eines Stromausfalls in einen leistungsunabhängigen Speicher übertragen werden. Der Abfall der Spannung kann durch einen in dem ersten Abteil 55 vorgesehenen Fühler 72 erfasst werden, wobei ein Ausgangssignal des Fühlers zur Signalisierung einer Änderung der Betriebsweise an die Buchungseinheit gerichtet ist und das andere Ausgangssignal (welches mechanischer Natur sein kann) einer Sperrung weiterer Funktionen des Druckmechanismus dient.

Der Isoliertransformator 69 ist ausserdem mit einer Steuereinheit 75 der Frankiermaschine verbunden. Ferner ist die Buchungseinheit 56 mit der Steuereinheit 75 verbunden. Die Steuereinheit 75 kann auch ausserhalb der Frankiermaschine vorgesehen werden. Die Steuereinheit umfasst eine Tastatur, Anzeigeeinheiten und dergleichen, die für den Betrieb der Frankiermaschine erforderlich sind.

Eine Ausführungsform der Steuereinheit 75 ist in Fig.3 dargestellt. Aus Gründen einer konstruktiven Vielseitigkeit und Wandelbarkeit beinhaltet diese Einheit vorzugsweise einen M ikroprozessor 80, beispielsweise der Serie 6500, die über herkömmliche Datenleitungen, Steuerleitungen und Adressleitungen mit einem herkömmlichen RAM/ROM-Eingabe/Zeitgeber-Logikschaltkreis 81 verbunden ist, der Nur-Lesespeicher, freiadressierbare Speicher, Zeitsteuerelemente und Eingabe/Ausgabe-Schnittstellen-Hardware umfasst. Durch die Verwendung geeigneter Dekoder 82 kann dabei eine Tastatur 83 in der herkömmlichen Weise abgetastet werden, und durch die Verwendung geeigneter Treiber 84 kann eine Anzeigeeinheit 85, vorzugsweise entsprechend herkömmlicher Praxis in einer Multiplex-Betriebsweise gesteuert werden. Die dem Niederdrücken jeder einzelnen Taste der Tastatur entsprechenden Daten können hierdurch dem Prozessor 80 übermittelt werden, um auf den Leitungen 86 serielle Eingabe/Ausgabesignale für eine Kommunikation mit der Buchungseinheit 58 zu bilden. Falls die Steuereinheit mit weiteren Eingabe/Ausgabegeräten, wie externe Anzeigeoder Steuereinrichtungen verbunden ist, können diese über weitere Eingabe/Ausgabeleitungen 88, vorzugsweise serielle Kommunikationskanäle und über optische Koppler mit der Steuereinheit gekoppelt sein. Die Steuereinheit kann eine interne Stromversorgung und Regler 89 aufweisen, die mit der in Fig. 2 dargestellten Spannungsversorgung verbunden ist. Die vorstehend beschriebenen, durch die Steuereinheit erfolgenden Funktionen sind somit solche Funktionen, die in dem Sinne nicht kritisch sind, dass ein Verlust bei der Steuerung oder des I nhalts irgend eines darin vorhandenen Registers nicht mit einem Verlust von Gebühren für die Postverwaltung oder den Benützer verbunden ist. Diese Funktionen sind der Steuereinheit zugewiesen worden, damit die geschützten Bereiche der Frankiermaschine lediglich diejenige Programmierung des Systems umschliessen, die geschützt sein muss. Durch die Steuereinheit können zusätzliche Funktionen bewirkt werden, ebenso wie die Addition von nacheinander eingegebenen Beträgen ebenfalls durch das Programm der Steuereinheit gesteuert werden kann, da derartige Berechnungen für den Schutz der Frankiermaschine nicht wesentlich sind und nicht innerhalb der mechanisch oder physikalisch geschützten Bereiche der Frankiermaschine ausgeführt zu werden brauchen. In gleicher Weise können die rücksetzbaren Wartungsfunktionen durch die Programmierung der Steuereinheit bewirkt werden, da diese Funktionen bezüglich der Buchungseinheit und der Register selbst unkritisch sind. Um jedoch diese Parameter in dem leistungsunabhängigen Speicher festzuhalten, ist die Aufbewahrung in der Buchungseinheit wünschenswert.

Es ist natürlich ersichtlich, dass bei der in Fig. 3 dargestellten Steuereinheit ohne grosse Schwierigkeiten weitere arithmetische Tasten vorgesehen werden können, so dass die Frankiermaschine alternativ auch als ein Rechner verwendet werden kann.

Alternativ kann der Prozessor durch einen mit der Tastatur und der Anzeigeeinheit verbundenen Rechnerchip oder dergleichen erweitert werden, um arithmetische Funktionen auszuführen.

Während die in Fig. 3 dargestellte Steuereinheit vorzugsweise unmittelbar an der Frankiermaschine als deren Bestandteil angeordnet ist, kann diese Steuereinheit offensichtlich auch davon räumlich getrennt oder räumlich trennbar angeordnet sein.

Da bei der in der Frankiermaschine verwendeten seriellen Kommunikation Geld betreffende Informationen und Steuerungen vorherrschen, ist ein hohes Mass von Lauterkeit zwingend. Zu diesem Zweck wird bei der Frankiermaschine eine serielle Kommunikation angewendet, bei der ein übertragenes Bit für Prüfzwecke durch seinen Empfänger rückübertragen oder als «Echo» rückgesendet wird. Wenn der Sender dabei alle der als Echo zurückgesendeten Signale zufriedenstellend empfängt, kann durch ihn ein Impuls «kein Fehler» ausgegeben werden, wodurch der Empfänger der Information informiert wird, dass die empfangene Information gültig ist.

Eine Ausführungsform der Buchungseinheit ist in Fig. 4 dargestellt, die vorzugsweise von einer elektromagnetischen Abschirmung 90 umgeben ist. Die Einheit weist einen Mikrocomputer 91 mit einer damit gekoppelten leistungsunabhängigen Speichersteuerung 92 auf. Die leistungsunabhängige Speichersteuerung steuert die Übergabe gespeicherter Daten zwischen einem leistungsabhängigen Speicher, welcher Bestandteil des Mikrocomputers 91 sein kann, und einem leistungsunabhängigen Speicher 93. Die leistungsabhängigen Speicher, wie frei adressierbare Speicher, können als anwachsende Arbeitsregister, abfallende Arbeitsregister und dergleichen betrieben werden. Der Mikrocomputer weist auch eine Nurlesespeichersteuerung für die notwendigen Buchungsroutinen sowie Steuerroutinen auf. Die Buchungseinheit kann ausserdem serielle Schnittstellen aufweisen, um ihre schnittstellenmässigen Verbindungen mit der Druckerund der Steuereinheit zu ermöglichen. Der Mikrocomputer kann beispielsweise ein Mikrocomputer der Serie 8040 von Intel Corporation, Santa Clara, Californien;sein und einen Steuerschaltkreis aufweisen, der seiner Art nach dem in bezug auf die Steuereinheit 75 beschriebenen gleicht. U m Störungen der Buchungseinheit durch zufällig oder absichtlich angelegte elektrische Spannungsstösse zu vermeiden, und ein durch Erdschleifen induziertes elektrisches Rauschen auszuschliessen, erfolgt die Kommunikation des Mikrocomputers mit den ausserhalb des Abteils 57 gelegenen Geräten durch geeignete Koppler, durch die keine Spannungsstösse auf den Mikrocomputer übertragen werden können. Diese Koppler können beispielsweise opto-elektro-nische Koppler sein und sind ebenfalls vorzugsweise derart angeordnet, dass sie vom Aussenraum der Frankiermaschine her nicht zugänglich sind. Dabei kann ein Koppler 94 für die Zweiwegkommunikation mit der Steuereinheit vorgesehen sein. Ein weiterer Koppler 95 kann für die Zweiwegkommu5

10

15

20

25

30

35

40

45

50

55

60

65

4

nikation mit der Druckereinheit 56 vorgesehen sein. Ein weiterer Koppler 96 kann zur Übertragung des Stromausfallsignals an den Mikrocomputer 91 vorgesehen sein. Darüber hinaus kann ein Koppler 97 zur Steuerung eines im Drucker vorgesehenen nicht dargestellten Sperrgliedes vorgesehen sein, um beispielsweise die Funktionen des Druckers mechanisch zu sperren.

Der leistungsunabhängige Speicher 93 ist beim gegenwärtigen Stand der Technik vorzugsweise ein MNOS-Speicher, für den keine Sicherheitsstromquelle erforderlich ist. Dieser Speicher kann jedoch alternativ aus Elementen gebildet sein, die dauernd mit Strom versorgt werden müssen, wobei in diesem Fall ein Steuerungsschaltkreis verwendet werden kann. Der Zweck des Steuerungsschaltkreises 98 besteht darin, für den MNOS-Speicher Energie zur Verfügung zu stellen, um dadurch dessen Datenübertragungsoperation im wesentlichen während des Einschaltens und Ausschaltens der Energie zu bewirken. Das Programm des Mikrocomputers 91 ist derart organisiert, dass die Inhalte der Register der Computereinheiten in den leistungsunabhängigen Speicher eingegeben werden, sobald irgendein Anzeichen eines Stromausfalls auftritt und dass diese Daten nach dem Stromausfall in die Arbeitsregister zurückgespeichert werden.

Der in Fig. 2 dargestellte Thermostat 67 unterbricht die Stromversorgung für die Frankiermaschine im Falle eines Hoch- oder Tieftemperaturbetriebs. Hierdurch wird die Frankiermaschine infolge der Stromunterbrechung automatisch in ihren Stromausfallzyklus versetzt.

Im Abteil 57 kann ausserdem ein Temperaturfühler 99 mit damit sowie an den Mikrocomputer gekoppelten, geeigneten, nicht dargestellten Schaltkreisen angeordnet sein, um beim Auftreten von Übertemperaturen Daten in den leistungsunabhängigen Speicher zu übertragen. Die Buchungseinheit kann ferner das Solenoid für das Sperrglied beim Auftreten von Übertemperaturen über den Koppler 97 abschalten. Es wird darauf hingewiesen, dass das Sperrglied durch den Mikrocomputer 91 auch derart gesteuert wird, dass der Betrieb des Druckers gesperrt wird, falls für einen Druckvorgang eine nur unzureichende Portogebühr übrig ist, oder durch andere Buchungsdaten angezeigt wird, dass die Druk-kereinheit nicht in Betrieb sein sollte.

Während die Koppler als getrennte Einheiten dargestellt worden sind, wird darauf hingewiesen, dass diese Einheiten natürlich auch Mehrfachanordnungen enthalten können, so dass in den betreffenden Schaltkreisen eine Zweiwegkommunikation aufgebaut ist. Ferner wird darauf hingewiesen, dass Systeme zur Übertragung von Daten zwischen leistungsabhängigen und leistungsunabhängigen Speichern wohlbekannt sind.

In Fig. 5 ist ein mehr in Einzelheiten gehendes Blockschema einer bevorzugten Ausführungsform der Steuereinheit dargestellt. In dieser Figur sind die Blöcke soweit anwendbar durch Teilenummern und Anschlüsse identifiziert. Diese Einheit weist in ihrer Darstellung einen Mikroprozessor 100 des Typs 6503 auf, deren Daten- und Adressenleitungen an einen RAM/ROM-Eingabe/Ausgabe Zeitgeber-Logikschaltkreis 101 des Typs 6531 sowie an einen programmierbaren Nurlesespeicher oder PROM 102 des Typs 2716 angekoppelt sind, wobei in dem PROM 102 das Programm für die Steuereinheit gespeichert ist. Ebenso können mit dem Schaltkreis 101 Steuerleitungen wie die Unterbrechungsleitung INT und die Lese/Schreib-Leitung R/W verbunden sein. Der Schaltkreis 101 weist, wie noch beschrieben wird, eine Anzahl von Anschlussstellen auf.

Die Steuereinheit weist ferner eine Tastatur 103 mit den in Fig. 1 dargestellten numerischen Tasten 31, den Anzeigetasten 35 bis 40 und dem in drei Stellungen betätigbaren Schalter 45 auf. Diese Steuereinheit umfasst ausserdem die

Aufadditionstaste 52 und die Portoeinstelltaste 34. Alle diese Tasten und Schalter sind in einer Matrix in herkömmlicher Weise mit dem Schaltkreis 101 verbunden, um die Abtastung der Tasten und Schalter entsprechend dem Programm zu s ermöglichen und damit das Schliessen einer Taste oder eines Schalters zu erfassen. Die acht Leitungen PA 0 bis PA 7 sowie vier Leitungen PB 0 bis PB 3 des Schaltkreises 101 sind auch mit dem Siebensegment-Sichtanzeigefeld 104 für eine in der herkömmlichen Weise erfolgende Multiplex-Anzeige ver-lo bunden. Der Schaltkreis 101 ist weiter an ein Paar von Anschlussstellen PC-0, PD-0 zur seriellen Kommunikation zu der von der Buchungseinheit 58 angeschlossen. Zusätzlich ermöglicht ein weiteres Paar von Anschlussstellen über opto-elektrische Koppler 107 bzw. 108 eine serielle Kommunika-15 tion mit externen Geräten. Ein weiterer Ausgang ist an eine Leuchtdiode 109 angeschlossen, um auf dem Anzeigefeld eine Anzeige dafür hervorzurufen, dass die Datumgebertür nicht geschlossen ist. Eine weitere Anschlussstelle ist mit einer Leuchtdiode 110 auf dem Anzeigefeld verbunden, um 20 anzuzeigen, dass ein Eingriff der Bedienungsperson erforderlich ist, um den in der Basis vorgesehenen Auslösemechanismus zu lösen. Schliesslich ist eine weitere Anschlussstelle PB-5 mit dem Wartungsschalter 50 verbunden, um die Funktionen der Frankiermaschine in dem Wartungs-Betriebszu-25 stand in Betriebsbereitschaft zu versetzen.

Das Programm der Mikroprozessoren ist auf die Bedienung der Tastatur, des Anzeigefeldes und dergleichen gerichtet, so dass die Speicherung von Daten vorrangig in der Buchungseinheit bewirkt werden. Das Programm beinhaltet 30 dabei diejenigen Funktionen, die für das Abtasten der Tastatur, den Multiplexbetrieb der Anzeigeeinheit, die Formatierung von Signalen für die Kommunikation mit den anderen Einheiten und mit externen Geräten und dergleichen erforderlich sind, so dass jede neue Information auf 35 die Buchungseinheit übertragen werden kann.

Ein Blockschema einer bevorzugten Ausführungsform der Buchungseinheit ist in der Fig. 6 dargestellt. Die Buchungseinheit enthält einen Mikrocomputer 120 des Typs 8039, der über opto-elektrische Koppler 121 und 122mitderSteuerein-40 heit sowie über opto-elektrische Koppler 123 und 124 mit der Druckereinheit verbunden ist. Ausserdem kann eine Anschlussstelle P-12 des Mikrocomputers 120 über einen opto-elektrischen Koppler 125 zur Steuerung eines Sperrgliedes oder dergleichen mit der Druckereinheit verbunden 45 sein. Signale, die einen Stromausfall signalisieren, werden ferner über einen opto-elektrischen Koppler 126 an Anschlussstelle TRG des Microcomputers 120 angelegt. Es ist somit ersichtlich, dass alle Signale von und zu der Buchungseinheit über opto-elektrische Koppler geführt werden so müssen, um die elektrische und physikalische Unbedenklichkeit oder Lauterkeit dieser Einheit sicherzustellen. Die Buchungseinheit weist ferner eine Anzahl von programmierbaren Nurlesespeichern oder PROMS 127 auf, die an die Adressen-und Datenleitungen des Mikrocomputers 120 55 angekoppelt sind, wobei beispielsweise jeder PROM 127 ein löschbarer PROM oder E-PROM des Typs 8755 ist. Die Nurlesespeicher sind mit einem elektrisch veränderbaren Nurlesespeicher (EAROM) 128, beispielsweise des Typs ER 3400 verbunden, der bei Stromausfall als ein leistungsunabhän-60 giger Speicher dient. Der Arbeitsspeicher für die Buchungseinheit einschliesslich der zur Speicherung aller Betriebsdaten dienenden Register ist in dem Mikrocomputer 120 vorgesehen, wobei diese Daten dem elektrisch veränderbaren ROM 128 zu einem solchen Zeitpunkt zugeleitet werden, zu 65 dem ein Stromabfall erfasst wird. Um eine vollständige Übertragung der Daten sicherzustellen, können in herkömmlicher Weise Speicherkondensatoren eingeschaltet sein, um eine angemessene Energie zu speichern, durch die Hip sin.

5

662434

wandfreie Funktion des Schaltkreises sichergestellt ist, bis die Übertragung der Daten bewirkt worden ist.

Ein bevorzugtes Blockdiagramm einer bevorzugten Ausführungsform der Druckereinheit ist in Fig. 7 dargestellt. Die Druckereinheit weist einen Mikrocomputer 130, beispielsweise des Typs 8748-8 auf. Der Mikrocomputer ist über geeignete Puffer mit den in der Druckereinheit vorhandenen Eingabe-Ausgabevorrichtungen verbunden. Die mechanischen und opto-elektrischen Fühlereinrichtungen innerhalb der Druckereinheit sind von herkömmlicher Art. Auf diese Weise ist der Mikrocomputer mit einer Anzahl von nicht dargestellten opto-elektrischen Fühlern zur Erfassung der Lageeinstellung des Druckräderwerks verbunden. Ein nicht dargestellter Zugangsberechtigungsschalter ist innerhalb der Druckereinheit angeordnet und nur über eine durch das Postamt versiegelte Tür zugänglich. Diese Leitungen des Mikrocomputers sind weiter derart geschaltet, dass die Stellung einer Zeitgebertür erfasst wird, wobei der Zeitgebertürschalter und der Zugangsberechtigungsschalter durch weitere Ausgangssignale des Mikrocomputers 130 abgetastet werden. Die Leuchtdioden der optischen Fühler werden zu den geeigneten Zeiten mittels weiterer Ausgangssignale des Mikrocomputers 130 abgetastet und wieder andere Ausgangssignale des Mikrocomputers ermöglichen den Schrittbetrieb der Reihen- und Ziffernschrittmotore für das Druckräderwerk. Ferner weist der Mikrocomputer 130 Anschlussstellen TI, P2-4 zur seriellen Kommunikation mit der Buchungseinheit auf. Ferner wird durch das von der Buchungseinheit herrührende Sperrglied-Ausgangssignal und ein weiteres Ausgangssignal des Mikrocomputers 130 ein Paar von Transistoren angesteuert, um das Solenoid 153 des Sperrgliedes zu erregen, wobei das Solenoid 153 erst dann erregt wird, wenn sowohl in der Buchungseinheit als auch in der Druckereinheit alle Vorbedingungen erfüllt sind. Demzufolge kann solange kein Druckzyklus beginnen, bis die physikalischen und elektrischen Bedingungen innerhalb der Frankiermaschine für einen normalen Druckvorgang realisiert sind.

Bei der RMRS-Ausführungsform, d.h. dem ferngesteuerten Frankiermaschinenrückstellsystem wird durch Einstellung des die drei Schaltstellungen aufweisenden Schalters in die Stellung «Kombinationseingabe» oder die Stellung «Betragseingabe» der Benutzer in die Lage gesetzt, mittels der Tastatur bei einer Anzeige durch die Anzeigeeinheit die Kombination bzw. den Betrag in die Frankiermaschine einzugeben. Beim Verlassen dieser Schaltstellung wird der angezeigte Wert in die Buchungseinheit eingegeben und die Anzeigeeinheit für die nächste Eingabe gelöscht. Durch die Rückkehr des die drei Schaltstellungen aufweisenden Schalters in die Betriebsstellung wird eine vollständige Durchführung der Nachladeroutine durch die Buchungseinheit bewirkt sowie eine Rückkehr der Frankiermaschine in den Normalbetrieb, wonach der Nachladebetrag zu dem Register «unverbrauchte Portogebühren» addiert wird. Die für die RMRS-Ausführungsform erforderliche Kombination wird von einem RMRS-Datenzentrum erhalten und stellt eine Zufalls- oder Pseudozufallszahl dar, die sich aus Sicherheitsgründen bei jedem Nach ladevorgang ändert.

Bei der MMRS-Ausführungsform der Frankiermaschine, d.h. dem handbetätigten Frankiermaschinenrückstellsystem wird der Nachladebetrieb dadurch bewirkt, dass das Siegel der Zugangsberechtigungstür erbrochen und der Zugangsberechtigungsschalter umgeschaltet wird.

Wenn bei der RMRS-Ausführungsform ein Fehler bei der Eingabe erfolgt ist, wird das Auftreten dieses Fehlers als ein Anzeichen für einen Fälschungsversuch der Maschine gezählt. Wenn seit der letzten Einstellung der Frankiermaschine eine bestimmte Anzahl derartiger Fehler aufgetreten ist, beispielsweise neun, wird die Funktion der Maschine für ein Nachladen von Postgebühren gesperrt. Eine Rückführung der Frankiermaschine in ihren Betriebszustand kann unter solchen Umständen beim Postamt ausgeführt werden. Eine Diskussion der Mittel für eine Rückführung der Maschine in ihren vollen Betriebszustand ist für die Erfindung nicht von Belang und bezieht sich auf den Schutz der Frankiermaschine.

Wie vorstehend beschrieben worden ist, weist jede der drei Einheiten der Frankiermaschine einen Mikroprozessor bzw. Mikrocomputer mit einem ein bestimmtes Programm festlegenden Nurlesespeicher auf, und die Kommunikation zwischen den Einheiten wird seriell und asynchron bewirkt.

Dies wird in erster Linie dadurch erreicht, dass jede Einheit mit einem kristallgesteuerten Taktgeber ausgestattet ist. Ferner sind die Signale derartig festgelegt, dass ihre Übergänge genau kontrolliert werden, wodurch sichergestellt ist, dass sofern ein Signal auftritt, dieses innerhalb einer vorgegebenen Zeitspanne auftreten muss. Als eine weitere Sicher-heitsmassnahme für die Richtigkeit der Kommunikation werden zum Zwecke einer Fehlerprüfung beim Sender die Bits eines Signals zum Sender rückübertragen, sobald sie empfangen worden sind, wobei ein Bit «kein Fehler» unmittelbar im Anschluss an eine Datenmeldung übertragen werden kann, wenn die Daten in richtiger Weise erfolgt sind.

Das Programm der Steuereinheit spricht auf den Status der Frankiermaschine in bezug auf vorbestimmte Parameter an. Ein in dem Mikrocomputer der Buchungseinheit vorhandenes Register enthält eine Statusinformation der Frankiermaschinen von beispielsweise zwei Bites, durch deren Bits digital angezeigt wird, wenn der Auslösemechanismus der Frankiermaschine eine Freigabe erfordert, wenn die Zeitgebertür im Anschluss an die letzte Anlegung des Betriebsstroms nicht geöffnet worden ist oder gegenwärtig offen ist, wenn keine ausreichenden Geldmittel vorhanden sind, welche das Drucken des im Druckräderwerk eingestellten Betrags ermöglichen, wenn der untere Portogebührenwert erreicht worden ist, wenn sich die Frankiermaschine in einem Wartungszustand befindet, wenn die Frankiermaschine in Betriebsbereitschaft versetzt ist, wenn die Stapelregister gelöscht sind, wenn ein Auslösevorgang vollständig durchgeführt ist oder wenn verschiedene Arten von Fehlern aufgetreten sind. Die mit diesen Bits verbundene Statusnachricht stimmt nicht mit der ober erwähnten Diagnosenachricht überein, die im Wartungsbetrieb verwendet wird. Die Buchungseinheit hält die Steuereinheit über den gegenwärtigen Status auf dem laufenden, indem sie die Statusnachricht auf die Steuereinheit überträgt, nachdem der Strom angeschaltet worden ist und danach immer dann, wenn eine Änderung des Status auftritt, wobei die Steuereinheit auf alle derartigen Nachrichten anspricht, indem sie sicherstellt, dass die Anzeige der Frankiermaschine mit der oben besprochenen Statusnachricht konsistent ist. Diese letztgenannten Schritte können beispielsweise die Anzeige einer Zeile von Dezimalziffern beim Auftreten bestimmter Fehler beinhalten, sowie einen Blinkbetrieb des Dezimalpunktes beim Auftreten der unteren Portomittelgrenze, einen Blinkbetrieb der gesamten Anzeigeeinheit beim Auftreten einer unzureichenden Portogebühr, die Anzeige von Unterstreichungen anstelle von Leerstellen, wenn sich die Frankiermaschine im Wartungszustand befindet. Ein in der Steuereinheit vorgesehenes Unterbrechungsprogramm unterbricht das Hauptprogramm der Steuereinheit in regelmässigen Zeitabständen, um die Tastatur und den Schlüsselschalter abzutasten und die •Anzeigeeinheit auszusteuern. Um zu verhindern, dass auf der Anzeigeeinheit Scheinzeichen auftreten, die durch unerwünschte Nebenschlussströme erzeugt werden können, wenn mehr als eine Taste niedergedrückt werden, bewirkt das

5

10

15

20

25

30

35

40

45

50

55

60

65

UUX. HM

6

Unterbrechungsprogramm stattdessen eine Leeranzeige der Anzeigeeinheit. Die Bestandsführung der Werte, die sich auf die Zeit, die Tastatur und den Schlüsselschalter beziehen, erfolgt durch das Unterbrechungsprogramm für eine Verwendung durch das Hauptsteuerprogramm.

Das Hauptprogramm'für die Steuereinheit beinhaltet Schritte der Anfangswertsetzung, Programmschritte für die in beiden Richtungen erfolgende Übertragung von Nachrichten zwischen der Buchungseinheit und externen Geräten und für eine Steuerung der zeitgesteuerten Anzeigeeinheit, eine Prüfung der Statusnachricht, um sicherzustellen, dass die Datumsgebertür und die Rückstellbasislichter entsprechend dem Status erleuchtet sind, ein Ansprechen auf die mitgeteilten Stellungen von Schaltern und des die drei Stellungen aufweisenden Schalters, um darin auftretende Zustandänderungen sicherzustellen, so dass die Steuereinheitunterroutine, die der für einen derartigen Zustand oder Änderung eines Zustand definierten Funktion entspricht, ausgeführt wird.

Das Programm der Buchungseinheit weist Prozeduren zur Anfangswertsetzung auf, um sicherzustellen, dass die Arbeitsregister auf den neuesten Stand gebracht werden und dass keine Portogebühr gedruckt worden ist, die nicht gebucht worden ist, sowie ein Stromausfall-Verarbeitungsprogramm, um die Datenübertragung in einen leistungsunabhängigen (elektrisch veränderbaren) Speicher zu bewirken, falls der Strom zusammenbricht oder ausfällt.

Das Hauptprogramm der Buchungseinheit bewirkt die Übertragung der Statusnachricht der Frankiermaschine an die Steuereinheit auf Befehl oder auf eine Änderung des Status, erfasst die Wirkung jedes augenblicklich eingegebenen Portogebührenwertes auf die augenblicklich registrierten Daten über die Gebührenmittel und führt alle notwendigen Änderungen der Statusnachricht durch. Das Hauptprogramm steuert auch den Zeitablauf in der Buchungseinheit für den Empfang von Nachrichten von der Steuereinheit und dem Drucker. Das Programm der Buchungseinheit weist ferner Unterroutinen für die Verarbeitung von Signalen auf, durch die die Register auf den neuesten Stand gebracht werden können, wenn eine Portogebühr gedruckt werden soll und durch die der Betriebsablauf des Systems gesteuert wird, wenn die Frankiermaschine ausgelöst ist. Eine weitere Unterroutine dient dazu, die Statusnachricht der Frankiermaschine auf den neuesten Stand zu bringen. Ferner ist in die Software der Buchungseinheit eine Fehlerprüfroutine einprogrammiert, die eine zyklische Redundanzprüfung ausführt. Dies wird in Einzelheiten unten noch beschrieben.

Das Programm der Druckereinheit weist ein Hauptprogramm auf mit Schritten zur Anfangswertsetzung, Schritten zur Abtastung der Fühler und Steuerung der Auftastungen für die Leuchtdioden der Fühler sowie die Bearbeitung von Nachrichten für eine Kommunikation mit der Buchungseinheit. Es sind Unterroutinen vorgesehen, um das Portoge-bühren-Druckräderwerk einzustellen, um festzustellen, ob Fühlermesswerte richtig sind, und um festzustellen, ob irgendwelche Änderungen in den Ausgangssignalen der verschiedenen Hardwarefühler und Schalter wie des Zugangsberechtigungsschalters und des Zeitgebertürschalters aufgetreten sind.

Hinsichtlich des Programms zur Setzung des oben beschriebenen Anzeige-Entsperrungswertes, des einstellbaren Höchstbetrages und des unteren Portogebührenbetrages sind die eine derartige Setzung bewirkenden Tasten in der oben beschriebenen Art und Weise in der Tastatur als Matrix angeordnet, und sie werden periodisch abgetastet, um festzustellen, ob eine Änderung des Status erfolgt ist. Die Abtastposition tritt auch gegenüber dem Wartungsschalter in der Steuereinheit auf, wodurch die Steuerung jeder Taste und jedes Schalters der Buchungseinheit mitgeteilt wird, um darin gespeichert und verarbeitet zu werden. Wenn beispielsweise der Wartungsschalter in seine Stellung «Ein» einge-s stellt wird, setzt die Abtastung, die auch bezüglich des die drei Schaltstellungen aufweisenden Schalters wirksam ist, in Abhängigkeit von der Stellung des die drei Schaltstellungen aufweisenden Schalters als eine Anzeigeroutine eine Kombinationseingaberoutine oder Betragseingaberoutine in 10 Betiebsbereitschaft.

Durch die Anzeigeunterroutine werden die in einem einer gedrückten Anzeigetaste entsprechenden Register vorhandenen Daten an die Steuereinheit zur Anzeige gesendet. In der Kombinationseingabeunterroutine wird die nächste auf 15 der Tastatur erfolgende Eingabe gespeichert, so dass der auf der Tastatur eingegebene Wert im Falle, dass der die drei Schaltstellungen aufweisende Schalter in eine Betragseingabestellung gedreht worden ist, in das entsprechende Register der CPU der Buchungseinheit eingegeben wird, wodurch der 20 auf diese Weise eingegebene Wert beim künftigen Betrieb der Maschine in den normalen Betriebsprozeduren zur Wirkung kommt. Natürlich ist klar, dass die Prüfung der eingestellten Werte im Normalbetrieb effektiv hinsichtlich eines Wertebereichs durchgeführt wird, beispielsweise einem Bereich von 25 Portogebührenwerten, die kleiner oder grösser als der gespeicherte Betrag sind, so dass die notwendige Anzeige abgegeben werden kann. Der Ausdruck «Anzeige», wie er in diesem Sinne verwendet ist, bezieht sich auf die Anzeigeeinheit. Falls der eingegebene Portogebührenwert den einstell-30 baren Höchstbetrag überschreitet, wird der eingegebene Wert übergangen, und die Anzeige kehrt zu ihrem ursprünglichen Portogebührenwert zurück. Die bei der Wartung einstellbaren Eigenschaften, wie sie oben offenbart worden sind, können ebenfalls als der Steuerung der Frankiermaschine in 35 verschiedene Zustände dienend angesehen werden, wie einen unwirksamen Zustand, wenn der einstellbare Höchstbetrag überschritten worden ist, einen Untergrenzen-Warnzustand, wenn die Untergrenzenanzeige blinkt und einen ein zusätzliches Drücken der Einstelltaste erfordernden Sperrwertzu-40 stand, wenn der in der Anzeige eingestellte Betrag diesen gespeicherten Wert überschreitet.

In weiterer Hinsicht auf die Systemdiagnose, auf die oben kurz bezug genommen worden ist, sind in der Software-Routine der Frankiermaschine zwei grundlegende Fehlerprü-45 fungen vorgesehen. Diese beiden Fehlerprüfungen werden als verhängnisvoll bzw. als prozedurbedingt bezeichnet. Innerhalb der Kategorie der verhängnisvollen Fehlerprüfungen sind zwei Unterkategorien definiert. Diese beiden Unterkategorien werden als hart bzw. als weich bezeichnet, so Die Erfassung harter Fehler erfolgt durch Überwachung von Hardware-Fühlern, wie Gruppenwahl- und Ziffernwahlfüh-lern, Vermittlerstellungsfühlern, Querriegelfühlern und dergleichen. Ein Ausfall von durch diese Fühler erzeugter richtiger Lesewerte wird ein verhängnisvoller harter Fehler 55 genannt, der die Fankiermaschine sperrt und der sich nach Stromeinschaltung nicht wieder behebbar erweist. Es ist dann das Eingreifen einer zentralen Autorität erforderlich, um einen weiteren Betrieb der Frankiermaschine zu ermöglichen.

60 Ein weiteres Beispiel für einen verhängnisvollen harten Fehler ist ein sich ergebender NichtVergleich aus einer zyklischen Redundanzprüfung. Jedes Datenregister wird fortlaufend überwacht. Unter Verwendung standardmässiger Polynomtechniken wird ein zyklischer Redundanzrest für jeden 65 auf den neuesten Stand gebrachten Datenregisterwert errechnet. Wenn ein Stromausfallzyklus in Gang gesetzt wird, wird der Inhalt jedes Datenregisters sowie sein zugehöriger zyklischer Redundanzrest in einen leistungsunabhän

7

662434

gigen Speicher übertragen. Bei Stromeinschaltung wird der zyklische Redundanzrest jedes Datenregisters erneut berechnet und mit dem bei der Stromabschaltung vorher errechneten zyklischen Rest verglichen. Ein NichtVergleich erzeugt einen verhängnisvollen harten Fehler.

Verhängnisvolle weiche Fehler beziehen sich auf die Inter-kommunikationseigenschaften der Frankiermaschineneinheiten. Dabei werden Kommunikationsfehler zwischen internen Einheiten, wie der Buchungs-, Drucker- und Steuereinheit auf der Grundlage der früher beschriebenen Bitrückübertragung erfasst. Zusätzlich sind Kommunika-tionszeitausgabefunktionen vorgesehen, so dass das Ausbleiben der Kommunikation einer Einheit innerhalb einer bestimmten Zeitdauer ebenfalls einen weichen verhängnisvollen Fehler erzeugt. Weiche verhängnisvolle Fehler sperren den Betrieb der Frankiermaschine. Eine Freigabe kann durch eine zyklische Rückführung der Frankiermaschine bewirkt werden; d.h., dass die Frankiermaschine abzuschalten und dann wieder einzuschalten ist, wodurch die zyklische Rückführung und Löschung des Fehlers herbeigeführt wird. Die zyklische Rückführung der Stromversorgung wird in einem Datenregister gezählt und kann, wenn dies gewünscht ist, bei Erreichung einer vorbestimmten Zahl eine totale Sperre hervorrufen. Mit anderen Worten gleicht somit eine vorbestimmte Anzahl von weichen verhängnisvollen Fehlern einem einzigen harten verhängnisvollen Fehler.

Prozedurbedingte Fehler, wie beispielsweise unrichtige (zu hohe) Werteingaben oder der Versuch einer unrichtigen Prozedur äussern sich als Sichtmarken auf der Anzeigeeinheit.

Weitere Diagnoseprüfungen ebenso wie Abänderungen können, wie oben ausgeführt worden ist, leicht in die hierin implementierten Software-Routinen eingepasst werden.

Indem die Kommunikation der Daten zwischen den Einheiten auf der Basis von Nachrichten seriell erfolgt und indem die vorbeschriebene «Echo»-Technik verwendet wird, kann die Implementierung der vorbeschriebenen Fehlerprüfungseigenschaften leicht erreicht werden.

Wie vorstehend erläutert, erfolgt die Kommunikation zwischen den Mikroprozessoren bzw. Mikrocomputern der Einheiten aus einer in seriellem Kanal erfolgenden, bitsynchronen, zeichenasynchronen Start/ Stopp-Kommunikation und kann beispielsweise mit 9.600 baud erfolgen. Die Kommunikation beruht ausschliesslich auf der Basis von Nachrichten, d.h. dass getrennte Steuerleitungen zwischen den Mikroprozessoren bzw. Mikrocomputern zur Steuerung der Kommunikation nicht vorgesehen sind. Die Länge der Nachrichten beträgt 10 Bits;wobei jede ein Startbit und ein darauf folgendes Achtbitwort oder Byte aufweist und mit einem Stoppbit abgeschlossen ist. Der Bedeutungsinhalt des letzten Stoppbits einer Nachricht ist allen anderen Stoppbits der Nachricht entgegengesetzt, um hierdurch das Ende der Nachricht anzuzeigen. Eine logische Null zeigt ein Startbit, ein Nachrichtenendebit und ein Nulldatum oder einen Niedrigwert an. Eine logische Eins ist für eine Aufforderung zum Senden, eine Sendebereitschaft, ein Byteende, einen Datenpegel «1» und auch für die Anwesenheiteines Fehlerfreiimpulses vorgesehen. Das erste Wort jeder Nachricht weist ein kodiertes Zweibitfeld auf, durch das festgelegt wird, ob die Nachricht Informationen, Daten oder Steuerfunktionen enthält. Ein weiteres Bit des ersten Wortes zeigt an, ob die Nachricht lediglich die Anzeigeeinheit betrifft oder nicht, ober ob sie lediglich die Buchungseinheit betrifft. Der Rest der Bits des ersten Wortes bildet spezifische Nachrichtenidentifikationsbits.

Wenn die Nachrichten aus mehr als einem Wort bestehen, kann das zweite Wort der Nachricht ein Formatbyte aufweisen, das aus zwei Nibbles, d.h. Vier-Bitgruppen, besteht. Das erste Wort jeder Nachricht weist ein kodiertes Zweibitfeld auf, durch das festgelegt wird, ob die Nachricht Informationen, Daten oder Steuerfunktionen enthält. Ein weiteres Bit des ersten Wortes zeigt an, ob die Nachricht lediglich die Anzeigeeinheit betrifft oder nicht, oder ob sie lediglich die Buchungseinheit betrifft. Der Rest der Bits des ersten Wortes bildet spezifische Nachrichtenidentifikationsbits.

Falls die Nachrichten mehr als ein Wort aufweisen, kann das zweite Wort der Nachricht ein Formatbyte enthalten, das aus zwei Nibbles, d.h. Vier Bitgruppen, besteht. Der erste Nibble gibt die Anzahl von Datennibbles in der Nachricht an, und der zweite Nibble gibt die Anzahl der rechts des Dezimalpunktes der Daten stehenden Ziffern an oder entspricht einer Hexadezimalen F, falls kein Dezimalpunkt vorhanden ist.

Falls in einer Einheit eine Nachricht zum Senden bereitgestellt ist, wird zuerst die Empfangsleitung der Einheit geprüft. Liegt sie auf niedrigem Pegel, so hebt der übertragende Vorrichtung eine Sendeleitung auf einen hohen Pegel an und prüft erneut die Empfangsleitung. Wenn diese weiterhin auf niedrigem Pegel liegt, ist die Einheit zur Übertragung freigegeben, andernfalls muss er die Rolle eines Empfängers übernehmen. Hierdurch wird eine Kontroverse zwischen zwei Einheiten vermieden. Im Hinblick auf Einheiten der Frankiermaschine selbst erteilen die Programme der verschiedenen Einheiten im Falle einer möglichen Kontroverse in absteigender Ordnung die Priorität der Druckereinheit, Buchungseinheit, Steuereinheit oder dem externen Gerät. Wenn an die Frankiermaschine, d.h. an die Steuereinheit externe Geräte angeschlossen sind, wird der Steuereinheit die Priorität erteilt.

Die Zeitablaufsteuer der Nachrichten stellt das schwierigste Problem der Kommunikation dar, wobei die Nachrichten asynchron erfolgen können. Ein typischer Zeitablauf ist daher in Fig. 10 dargestellt, in der die relative Zeitsteuerung der Leitungen des Senders für das Senden einer gegebenen Nachricht und der Leitungen eines Empfängers für den Empfang dieser Nachricht dargestellt ist. Da die Ausgangsleitung des Senders mit der Eingangsleitung des Empfängers übereinstimmt ist klar, dass diese beiden Signalleitungen identisch sind. Dasselbe gilt natürlich hinsichtlich der Eingangsleitung des Senders und der Ausgangsleitung des Empfängers.

Bei einer erfolgreichen Übertragung in einem derartigen System prüft der Sender seine Eingangsleitung zum Zeitpunkt ti und erhöht, falls ein niedriger Pegel festgestellt wird, seine Ausgangsleitung innerhalb 50 Mikrosekunden auf einen hohen Pegel, wie es bei ti dargestellt ist. Der Sender prüft sodann erneut innerhalb 50 bis 100 Mikrosekunden zum Zeitpunkt t3 seine Eingangsleitung. Wenn die Eingangsleitung weiterhin den niedrigen Pegel aufweist, kann der Sender nach Ablauf einer Mindestwartezeit von 120 Mikrosekunden zu einem Zeitpunkt ts mit der Sendung seiner Nachricht beginnen, indem diese Ausgangsleitung auf niedrigen Pegel abgesenkt wird, um das Anfangsbit der Nachricht zu bilden. Zwischenzeitlich hat zum Zeitpunkt t-t der Empfänger seine Ausgangsleitung innerhalb einer Minimalzeit von 100 Mikrosekunden auf einen hohen Pegel angehoben, wodurch angezeigt wird, dass er zum Datenempfang bereit ist. Hierdurch wird ein «Sendebereitschafts»-Zustand angezeigt. Der Zeitablauf zwischen den aufeinanderfolgenden Bytes einer Multibytenachricht, der durch das Zeitintervall zwischen ts und t's angezeigt ist, beträgt mindestens 1134,375, um sicherzustellen, dass der Empfänger für die Durchführung eines richtigen Empfangs und einer richtigen Speicherung der Signale in Bereitschaft gesetzt woïden ist.

Die Zeit zwischen dem Beginn ts des letzten Nachrichten-bites und der Übertragung eines Impulses «Fehlerfrei» zur Zeitt-, ist auf 1031,25 bis 1157,291 Mikrosekunden einge-

5

10

15

20

25

30

35

40

45

50

55

A0

65

OOZ434

stellt, und der Impuls «Fehlerfrei» weist eine Breite von. 309,375 Mikrosekunden bis 368,228 Mikrosekunden auf. Der Empfänger muss das Auftreten eines Impulses «Fehlerfrei» zur Zeit ts zwischen 1187,291 bis 1340,625 Mikrosekunden nach der Einleitung des Startimpulses des letzten Bytes der Nachricht prüfen. Die Bitübergänge des Senders müssen sich in Einklang mit Tabelle I befinden und die Empfängerabtastung der Daten- und Stoppbits müssen sich im Einklang mit der in Tabelle II dargestellten Zeitgabe befinden.

Tabelle I

n

BIT

Minimum

Maximum i

Start o

O

2

Daten 1

103,125

105,208

3

Daten 2

206,250

210,417

4

Daten 3

309,375

315,625

5

Daten 4

412,500

420,833

6

Daten 5

515,625

526,042

7

Daten 6

618,750

631,250

8

Daten 7

721,875

736,458

9

Daten 8

825,000

841,667

10

Stop

928,125

946,875

Tabelle!!

n

BIT

Minimum

1

Start

2

Dl

115,208

3

D 2

220,416

4

D3

325,624

5

D4

430,832

6

D 5

536,040

7

D 6

641,248

8

D7

746,456

9

D 8

851,664

10

Stop

956,872

Durch den obigen Zeitablauf und durch eine Kristallsteuerung der Taktgeber jeder Einheit ist dabei eine asynchrone Übertragung ausführbar, so dass Steuerleitungen für diesen Zweck zwischen den Einheiten unnötig sind.

Um sicherzustellen, dass die Information durch den Empfänger in richtiger Weise fehlerfrei empfangen wird, werden die Daten sequentiell auf der Empfängerausgangsleitung an den Sender zurückübertragen. Die Zeiten für die Rücküber-tragung der Daten sind ausgehend von dem Beginn der Befehlsschleife zur Erfassung der Startbits in Tabelle III angegeben, und die Zeiten zur Abtastung dieser Daten auf der Eingangsleitung für den Sender sind in Tabelle IV angegeben.

Der Impuls «Fehlerfrei» wird nur dann am Ende der Nachricht übertragen, wenn die vom Sender empfangenen Daten mit den gesendeten Daten übereinstimmen.

Für eine weitere Kontrolle über die Nachrichtenkommunikation wartet der Sender nach der Ausgabe einer Sendeaufforderung für eine Übertragung 3,5 Millisekunden lang auf ein Sendebereitschaftssignal des Empfängers und ebenso der Empfänger ungefähr maximal 3,5 Millisekunden lang auf den Beginn einer Nachricht, nachdem er die Sendeberei-t-schaftsnachricht ausgegeben hat. Eine Konverse zwischen den Einheiten wird weiter dadurch auf ein Minimum herabgesetzt, dass bestimmte Zeitabstände festgesetzt werden können, die zwischen aneinander angrenzenden Sendeaktivitäten einer Einheit sowie auch zwischen aneinander angrenzenden Empfängern vorhanden sein müssen.

Tabelle III

n

BIT

Minimum

Maximum

1

Start

32,083

73,125

2

D 1

137,292

176,250

3

D 2

242,500

279,375

4

D3

347,708

382,500

5

D4

452,917

485,625

6

D 5

558,125

588,750

7

D6

663,333

691,875

8

D 7

768,542

795,000

9

D 8

873,750

898,125

10

Stop

978,958

1001,250

* Ermöglicht 10 Mikrosekunden für Programmschleifenunsicherheit bei der Erfassung des Startimpulses. Falls die Unsicherheit grösser als 10 |isec ist, ist der Überschuss von jedem Maximalwert abzuziehen.

Tabelle IV

n

BIT

Minimum

Maximum i

Start

103,125

135,208

2

Dl

206,250

240,416

3

D 2

309,375

345,625

4

D 3

412,500

450,833

5

D 4

515,625

556,041

6

D 5

618,750

661,250

7

D6

721,875

766,458

8

D7

825,000

871,667

9

D 8

928,125

976,875

10

Stop

1031,250

1082,083

Alle Steuer- und Datensignale verwenden dasselbe Leiterpaar in jeder Richtung mit einem genau definierten Zeitablauf zum Zwecke der Steuerung.

Um eine externe Steuerung zu schaffen, verläuft der Steuerfluss in einer Richtung und der Informationsfluss in der anderen Richtung.

Die gesamte Steuerung der Frankiermaschine sowie die gesamte innerhalb der Frankiermaschine vorhandene Information kann über eine Schnittstellen-Verbindungseinrich-tung längs der Leitungen 88 von Fig. 3 gesteuert werden. Alle von der Frankiermaschine ausgeführten Funktionen sind von einer Fernstation aus elektrisch steuerbar, mit Ausnahme von rein lokalen manuellen Funktionen, wie Stromeinschaltung und Datumswechsel. Dies ergibt sich aus der Kommunikationsfähigkeit der Dateneinheiten. Durch die Softwareroutine erfolgt eine Abtastung in bezug auf die Anwesenheit einer externen Steuervorrichtung und wird die Übergabe der Steuerung auf eine derartige externe Steuervorrichtung nach Anerkennung ihrer Gültigkeit ermöglicht. Die Organisation der drei Einheiten hat einen Fluss von Befehlen oder Steuerung von Daten von der Steuereinheit zur Buchungseinheit und dann zur Druckereinheit zur Folge. Ein Beispiel für derartige Daten und Befehle besteht in einem neuen Portogebührenwert und darin, wo er gesetzt werden muss. Der Informatiorisfluss erïolgt in der entgegengesetzten Richtung. Ein Beispiel hierfür ist ein augenblicklicher Registerwert oder dergleichen. Bei diesem Konzept ist es durch die Einschaltung eines externen Geräts, wie eine

8

s

10

15

20

25

30

35

40

45

50

55

60

65

9

662434

elektronische Waage, in die Steuereinheit möglich, Befehle oder Datensteuerungsbefehlsinformationen in die Frankiermaschine einzuführen. Der Schnittstellenbetrieb ermöglicht es dem externen Gerät, die Frankiermaschine zu steuern, einschliesslich der Ausserbetriebsetzung der Tastatur der Steuereinheit, falls dies erwünscht ist. Das externe Gerät ist mit der Frankiermaschine schnittstellenmässig auf der Basis von Nachrichten verbunden. Das externe Gerät kann Nachrichten zum Zwecke der Anzeige senden oder kann Nachrichten senden, durch die der Inhalt der Anzeigeeinheit angefordert wird. Die Programmierung der Steuereinheit ermöglicht es dem externen Gerät, eine die Tastatur ausser Betrieb setzende Nachricht zu senden, wodurch die Übergabefunktion implementiert ist. Ein spezieller Vorteil der vorstehenden Anordnung besteht darin, dass die Steuereinheit durch eine dazugefügte externe Betriebsvorrichtung ersetzt werden kann, ohne dass irgendwelche Änderungen in der Buchungseinheit oder der Druckereinheit, weder in der Hardware noch in der Software, erforderlich sind.

Der Mikroprozessor der Steuereinheit kann dazu verwendet werden, als ein Nachrichtenpuffer zu wirken, um Flexibilität in der Entwicklung und Verwendung externer Geräte zu ermöglichen. Die externen Geräte können Wägevorrichtungen, Anzeigeeinheiten oder andere Arten normalerweise mit Frankiermaschinen der hier offenbarten Art in Wechselwirkung stehenden Geräten umfassen. Die in der Steuereinheit vorgesehene Software kann für diese Funktion implementiert werden. Wie in Fig. 9 dargestellt ist, kann ein externes Gerät 150 dazu verwendet werden, die Funktion der Steuereinheit zu ersetzen oder zu ergänzen. Das externe Gerät 150 ist vorzugsweise über eine Leitung 152 und eine Steckverbindung, die durch eine standardmässige Neunpolsteckverbindung gebildet sein kann, mit der Steuereinheit . 154 der Frankiermaschine verbunden und empfängt Nachrichten aus der Frankiermaschineneinheit 156, die die Buchungseinheit und die Druckereinheit umfasst. Die Steuereinheit weist Kommunikationspuffer 158 auf, durch die in logischer Hinsicht die Kommunikation von der Frankiermaschineneinheit 156 an das externe Gerät 150 oder lokal an die Steuereinheit 154 gerichtet wird. Die umgekehrte Wirkung ist in Fig. 10 dargestellt, in der externe Geräte über die Kommunikationspuffer mit der Einheit verkehren können. Der Effekt ist insoweit der gleiche, dass der Puffer Nachrichten entweder von dem externen Gerät 150 oder lokal von der Steuereinheit 154 empfängt.

In der Fig. 11 ist eine Anzahl von externen Geräten 164 dargestellt,die mittels der Steuereinheit 154 schnittstellenmässig in die Frankiermaschineneinheit eingekoppelt sind. Jede externe Einheit kann mit ihrer eigenen Steuertaste zur Einleitung von Nachrichten versehen sein. Jedes externe Gerät könnte als Bestandteil seiner Software einen Kommunikationspuffer enthalten, um einen Betrieb der externen Geräte in Dasy Chain-Betriebsweise zu ermöglichen. Geeignete Nachrichten können eine vollständige Unterwerfung der Steuereinheit unter das externe Gerät beinhalten. Die Steuereinheitprogrammierung ist derart ausgelegt, dass ein solcher Betrieb möglich ist.

Was den Betrieb der externen Geräte betrifft, so fliesst die Information in zwei Richtungen, entweder einwärts in die Frankiermaschine hinein oder auswärts zum externen Gerät. Steuersignale und Aufforderungen, die allgemein als Steuerungen definiert werden, fliessen einwärts in die Frankiermaschine hinein. Informationsdaten fliessen auswärts. Normalerweise entstammen die Steuerbefehle auf der Einwärtsleitung aus der Steuereinheit. Jedoch ist es auch möglich, dass ein externes Gerät 150 Befehle unmittelbar durch die Steuereinheit hindurch an die Frankiermaschineneinheit abgibt. Umgekehrt gelangen Informationsdaten auf der Auswärtsleitung aus der Frankiermaschineneinheit 156 (Buchungseinheit) an die Steuereinheit 154 und werden auf der Leitung 152 für die externen Geräte zur Weitergabe an das externe Gerät 150 wiederholt, sofern ein externes Gerät 5 vorhanden ist. Die Anwesenheit eines externen Geräts 150 wird durch eine Erfassung, ob es auf ein Sendebereitschafts-signal antwortet oder nicht, festgestellt. Wenn dies nicht der Fall ist, schaltet das Ausgangssignal auf der Leitung 152 nach einer voreingestellten Zeitspanne (Sperrzeit) aus, und die 10 Frankiermaschine fährt in ihrem normalen Betrieb fort. Diese Fähigkeit, Information durch den Kommunikationspuffer in der Steuereinheit hindurchzuschicken ermöglicht den Vorteil, daran externe Geräte anzusetzen. Das externe Gerät kann in derselben Weise mit einem Kommunikations-15 puffer, wie er in der Steuereinheit dargestellt ist, aufgebaut sein und ein derartiges Gerät kann seinerseits ein daran angekoppeltes externes Gerät aufweisen. Auf diese Weise kann eine «Daisy-Chain» genannte Kette von externen Geräten 164, wie es in Fig. 12 dargestellt ist, geschaffen werden. Die 20 einzige Beschränkung für die Anzahl der externen Geräte, die auf diese nach Art der Daisy-Chain verkettet werden können, ergibt sich aus der Systemtoleranz und den Sperrzeitbeschränkungen.

Ferner ist vorgesehen, dass externe Geräte bestimmte Befehle an die Steuereinheit selbst abgeben, wobei diese Befehle nicht notwendigerweise an die Buchungseinheit abgegeben werden, wie die Fähigkeit, eine Nachricht auf die Anzeigeeinheit der Steuereinheit auszuschreiben, oder eine Nachricht von der Anzeigeeinheit der Steuereinheit auszulesen, oder der Steuereinheit einen Befehl zur Ausserbetriebsetzung seiner Tastatur und des die Dreischaltstellung aufweisenden Drehschalterszu erteilen. Bei diesem Vorgang spricht der Kommunikationspuffer auf ein Bit im Anfangs-35teil oder der Vorsatzinformation der digital übertragenen Nachrichtenfolge an und gibt die Richtung an, ob die Nachricht an die Frankiermaschineneinheit oder die Steuereinheit gelangen soll. Diesem Bit, das in dem Header, wie oben beschrieben, eine bestimmte Stelle einnimmt, ist in dieser Stellung eine « 1 » zugewiesen, wenn es sich um eine Nachricht von oder zu der Steuereinheit handelt, und eine «0», wenn es sich um eine Nachricht zu oder von der Frankiermaschineneinheit handelt. Auf diese Weise kann die Steuereinheit bei Erhalt einer Nachricht durch das externe Gerät die 45 Vorsatzinformation prüfen und aus diesem Bit bestimmen, ob die Nachricht für die Steuereinheit oder für die Buchungseinheit bestimmt ist. Ist sie für die Steuereinheit bestimmt, hält diese die Nachricht an und führt die entsprechende Tätigkeit aus. Ist sie nicht für die Steuereinheit bestimmt, „wird die Nachricht an die Frankiermaschineneinheit weiter-

50 . .

geleitet.

Die Steuereinheit kann eine unmittelbare Antwort für das externe Gerät zur Verfügung stellen, ohne überhaupt die Frankiermaschineneinheit ins Spiel zu bringen, beispiels-55 weise in Reaktion auf den Empfang einer das Lesen der Anzeigeeinheit betreffenden Nachricht. In der Steuereinheit' findet keine Aufbewahrung der letzten empfangenen Fran-kiermaschinenstatusnachricht statt. Wenn daher beispielsweise ein Befehl zur Ausserbetriebsetzung der Tastatur emp-60 fangen wird, fordert die Steuereinheit eine Frankiermaschi-nenstatusnachricht von der Buchungseinheit an. Wenn die Steuereinheit die Antwort erhält, setzt sie in die Frankierma-schinenstatusnachricht ein Bit ein, um anzuzeigen, ob die Tastatur in Betrieb gesetzt ist. Bei erfolgter Ausserbetriebset-65 zung zeigt die Steuereinheit den Ausserbetriebszustand in der Statusnachricht laufend an, bis durch den Empfang eines Tastaturinbetriebsetzungsbefehls eine Rücksetzung erfolgt oder bis der Strom aus- und eingeschaltet wird. Beim Eintritt

00^4J4

10

des Stromeinschaltungszustandes befindet sich die Tastatur stets im Zustand der Inbetriebsetzung.

Die Frankiermaschine ist daher dazu in der Lage, unmittelbar mit den externen Geräten schnittstellenmässig in Verbindung zu treten, was bei bekannten Frankiermaschinen schwierig bis unmöglich ist.

In Zusammenfassung des obigen ergibt sich, dass die Steuereinheit mit einer Steckverbindung für eine Zweirichtungskommunikation mit einer Anzahl von externen Geräten versehen ist. Hierdurch sind die externen Geräte in die Lage versetzt, auf Frankiermaschineninformationen wie Registerlesewerte, Stückzahl und Auswahl laufender Werte zuzugreifen. Ausserdem kann die Frankiermaschine durch ein externes Gerät im selben Ausmass gesteuert werden, als es die Bedienungsperson von der Tastatur aus kann.

Die Frankiermaschine kann mit einer Zusatzeinrichtung versehen sein, um auf der Grundlage einer durch die Bedienungsperson beim Beginn eines jeden Frankierungslaufs eingegebenen Identifikationsinformation Portogebühren für verschiedene Abteilungen automatisch aufzuzeichnen und rückzuladen. Die Frankiermaschine kann zusammen mit einer Anzeigeeinheit/Quittungsdrucker verwendet werden, wodurch der Kunde mit einer Sichtanzeige des auf der Frankiermaschine vorhandenen Wertes und/oder einer Quittung über die Bezahlung der Portogebühr bedient werden kann. Die Frankiermaschine kann zusammen mit kundeneigenen

Geräten verwendet w erden, wie einem Computerterminal oder einem Minicomputersystem für Echtzeitdatenerfassung, wie es in der Paketverarbeitung beim Aufaddieren der Portogebühr auf die Empfängeradresse der Fall ist.

s Die verhältnismässige Einfachheit der schnittstellenmäs-sigen Ankopplung der Frankiermaschine legt weitere Möglichkeiten nahe. Zwei Beispiele dafür sind 1) die Verwendung am Ende eines entscheidungsfähigen Eintastgerätes um Portogebühren mit veränderlicher Anzahl von Eintastungen zu io verändern, 2) als einen praktischen Postversandautomaten.

Flussdiagramme, die den Betriebsablauf der verschiedenen Einheiten darstellen, sind in Fig. 12,13 und 14 dargestellt. In allen Fällen zeigt die ohne Buchstaben numerierte Figur an, wie die mit den entsprechenden Nummern und 15 Buchstaben versehenen Figuren zusammenzusetzen sind, um das vollständige Flussdiagramm zu erhalten.

Das den Betriebsablauf der Steuereinheit darstellende Flussdiagramm ergibt sich aus der Folge gemäss Figur 12.

Das den Betriebsablauf der Druckereinheit darstellende 20 Flussdiagramm ergibt sich aus der Folge gemäss Figur 13. Das den Betriebsablauf der Buchungseinheit darstellende Flussdiagramm ergibt sich aus der Folge gemäss Figur 14.

Die programmierten Funktionen ergeben sich aus dem in Einzelheiten gehenden Ausdruck für die Buchungseinheit, 25 Steuereinheit und Druckereinheit, die als Anhang zur vorangehenden Beschreibung beigefügt sind.

37 Blatt Zeichnungen

fi 5 00 ACCOUNT IMG MODULE CAflûM/ll vei.fi ioti <1.21.!i 7 l5-Oct-79 1 2:4 6:53 TABELLEN FÜR BIJCIIIJNGSMODUL UNO R AM-fì PEI Cll ERTA BELLE | DM2.-PEPACC.SftC

2

3 NLIST

7 LIST

8

9 3Û 1 1 I 2

13.

14. 6 5 0 0 nUCIIUNGSMODUL I 5

16

17

,B COPYRIGHT 1979 PITNEY BOWES INCORPORATED

19

20 2)

22

23 INCLUDE DMOiACCTBL

24 ' NLIST

64 "-»ST

65 ™Gli:

6500 cao n 4 0/11 version 4.21.57 15-Oct-79 12:4 7 î 50

tabellen für bucnuhgsmonijl uno r am-spinclllîrtabttllr

66

67 60

69

70

R A M - S P1:

äTC'lIRRTABISLLE

PUR LETSTUNGSUNAßnXNGIGEN SPEICHER

71

72

73

0020

PECEKT

EQU

20

0 Ziffern Stückzahl

74

0024

dscecc

EQU

PECEKT

♦ PECEs a

1 Hyr.ß CRC fiir abfallendes Register

75

0025

DSCREG

EQU

dscêcc t DSERSZ

0 Ziffern abfallendes Register (verwendbare Portogebühron)

76

0029

ASCECC

EQU

dscreg t DSCRSZ

1 Byte CRC fiir anwachsendes Register

77 70

002A 0 0 2 P

ASCREG PRSTAT

EQU EQU

ASCECC » ASCREG

ASERSZ t ASCRS2

10 Ziffern anwachsendes Register (kumulativ verbrauchte 1 Byte Druckerstatus Portogebülu )

7 9

0030

POSVAL

EQU

PRSTAT

t PRSTS Z.

fi Ziffern Portogebiihrenwert

00

0033

batamt

EQU

POSVAL

» POSTS Z

fl Ziffern Stapel betrag

01

0037

BATCHT

EQU

BATAHT

t BATASZ

fi Ziffern Stapelzahl

02 0.1

0 0 3A

HOM VOI,

date ciiecksiim POR equ IJATCHT

BLOCK 0 « I1ATCSZ

Nächste RMRS (fernbetätigte) COMBO (Kombination), die in teil ml. le erhältlich ist

04

003C

t'OHECC

EQU

DATE t

DATES'/

1 ByLu CRC fiir Priifsumme

115

• 003D

RSTVAR

equ

CÛIIECC

i 1

RMRiì Maschi nen-Neueinste 1 lwert

06

004 1

RSTCIIT

EQU

RSTVAR

i IISTVS2

1 llyte zur Zählung erfolgloser Neueinstellversuche

07

0042

PATCÛD

equ rstciit •

• 1

1 Byte zur Speicherung von Kode, der verhängnisvollen Feh)e:

00

004 3

FATCHT

EQU

PATCOD

t 1

2 Ziffern verhängnisvoller Fehlerzähler verurteilt

09

004 4

MTRTYP

EQU

PATCMT

» 1

1 Byte fiir Maschinentyp : 0=Manuell, 1 =RMRS

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-ÛCL-79

1 2 : 4 7 : 5 Ü

90

0045

MSBRNO

EQU

MTRTYP *

1

91

004 9

UMI.OCK

EQU

MSERNO t

M'SERSZ

92

00 4C

LOWPOS

EQU

Uli LOG.K t

UIILVS2

93

00 4 E

SETI. r M

EQU

LOWPOS t

I.W PS S Z

94

0050

RSTIIAS

EQU

S ETI, IM *

S ETI,S Z

95

'C1IRCKSUM

POR

BI.OCK 1

9 6

0054

TI MCNT

EQU

RSTBAS t

RSTBSZ

97

0055

T I MWIIO

EQU

T1 MCNT »

1

9 Q

0056

MRSTAT

EQU

TI MWIIO «■

1

99

0056

STATE

EQU

MRSTAT ♦

2

100

0059

ACTßl.K

EQU

STATE »

1

101

00 5A

M Vl-lli I.K

EQU

ACTßl.K ♦

1

1Û 2

Û05B

CNTXPL

EQU

MVMßLK *

1

103

005C

RECüPL

EQU

CNTXPL *

1

104

005D

P01.CMT

EQU

RECO PI, t

1

1 05

005R

RECHUP

EQU

POI.CNT »

1

1 06

0066

wrkbpi

EQU

RECßUP t

RECßSZ

1Û7

006R

WO lì K 1.1 P

EQU

WRKBP1 »

WRKlisZ

1 00

00 7 6

AMTßP

EQU

WORKBP •

WRKRSZ

109

00 7 n

C HIÎO HP

EQU

AMT IIP »

AMTSZ

110

00 7 P

I.AST

RQU

cmboßp i cmbos2

1 l-l

1 1 2

StJBTTl. HEADER

ASSIGN

1 1 3

PAGE

7 Ziffern fiir Seriennummer 6-ziffriges Feld fiir Entsperrungswer t 4-ziffriges Feld für unteren Por togebiih renwa renwe r i 4-ziffriges Feld fiir einstellbare Portogebiihren-Manuelle Kombination

1 Byte fiir Zeitgeber-Zähler

Höchstgrenze

2 Bytes zur Wartung des Maschinenstatus

1 Byte fiir Betriebszustand oder -Art

1 Byte zur Kennzeichnung, welcher Block gerade geöffnet ist

1 Byte zur Kennzeichnung des gelöschten Teilbereichs des .leistungsunabhängigen Speichers (NVM)

I Byte für Warteschlange Statusnachricht an Steuereinheit

Steuereinheit-Bmpfangsmarke

(0 =• keine auf Verarbeitung wartende Nachricht) Nachrich Drucker-Empfangsmarke (0= keine auf Verarbeitung wartende

0-Byte-Puffer zum Bnpfang von Nachrichten ft-Byte-Arbeitspuffer zweiter. O-Byte-Arbeitspuffer

Puffer fiir Betragseingabe

Puffer fiir Kombinationseingabe letzter verwendeter RAM-Speicherplatz

>

0\ 0\ s»

6500 ACCÛIJNTING MODULE CA/104 0/ 1 1 HEADER ASSIGMMFNTS ACCTBL.SRC 1 1 4 115 1 1 6 1 1 7 110 l 1 9

120

121

122

123

124 1 25

version 4.21.57 15~Oct~79 12:47:50

34

35

IIBAHBR-ZUWEISUNGEN

MMEMOHIC VALUE Mnemonischer Kode Wert

COMMANDS NO DATA

Beschreibung Befehle ohne Daten

26

0040

NODATA

EQU

40

27

004 1

ENQLIID

EQU

4 1

Frei gebe-Maschinenbefehl

20

0042

DSBLIID

EQU

42

Sperre-Maschinenbefehl

29

00 4 3

ENDEIID

EQU

43

Ende der Eingabe

30

0044

CLRBIID

EQU

44

Lösche Stapelbefehl

31

0045

ACMPIID

EQU

45

Buchung vollständig

32

0046

SETSIID

EQU

4 6

Setee Wartungszustand

33

Q0 4 7

CLIÌSIID

EQU

47

Lösche Wartungszustand flOMMANDS WTTII DATA

Befehle mit Daten

6500 ACCOUNTING MOIMJLB CA 0040/U version 4 HEADER ASS IGNMENTS ACCTBL.SRC

137

noco

WTIIDAT

EQU

OCO

130

00C1

SPOSIID

EQU

0C1

139

SPARE

EQU

0C 2

140

SPARE

EQU

0C3

141

00C4

SDATilD

EQIJ

OC 4

142

ÛÛC5

ENTAIID

EQU

0C5

143

0ÛC6

ENTCIID

EQIJ

nee

144

145

REQUEST

VALUE

146

147

0050

REQVIID

EQU

50

140

OOOO

VLI SIID

EQU

' 000

149

150

ITEMS REQUESTABLB

151

152

0000

STATNB

EQU

000

153

000 1

POS VII B

EQU

001

154

VA LUID

NORM

155

OXXX

156

2

ASC

REG /anwachs.Reg.

157

3

DSC

REG /abfal1 end.Reg

150

4 CONTROL

SUM /Kontroi 1 summe

21.57 15-Oct-79 ' 12:47:50

Setze Portogebiihrenwert

Setze Datum

Eingebe Neueinstellbetrag Eingebe NeueinstelIkombination

Anfordere Wert

>

Anfordere Wert Unterer NIBBLE gibt ^

Wert wiedergegeben auf Aufforderung

Anforderbare Posten

Portogebührenwert Wartung

Entsperrungswert Untergrenze für Portogebühr Maschinennummer

6500 ACCOUNT I MG MODULE CA (1040/11 HEADER ASSÏGNKENTS ACCTRL.SRC

version 4.21.57 15-Oct-79 12:47:50

159 1 60

161

162

163

164 1 65

5 PEICE CQUNT / Stückzahl fi BATCH AMT / Stapel betrag

7 BATCH COUNT / Stapelzahl

SUflTTI. STATUS ASSIGHMENTS PAGE

Diagnosestatus

Einstellbare Portogebührengrenze frei

StaUuszuwe i sungen

6500 ACCOUNT! NG MODUI.B CAQQ40/11 vareion 4.21.57 15-0cl-79 STATUS ZUWEISUNGEN ACCTBL.SRC

166

167

lß3 STATUS ZUWEISUNGEN

169 1 70

171

172 BIT DESCRIPTION BESCHREIBUNG 1 73

174 PRINTER / DRUCKER

1 75 7 PRIV ACCESS SW / ZugangslTerechtigungsschälter-

1 76 6 DATER DOOR / Datmnsgeliertiir

1 77 5 SIIUTTER BAR / Riegel

1 7 0 4 I.AST HOHE / Auagangsstel 1 ung

179

TRIP (NOT IIOME) ^ (nicht Ausgangsstellung) 181 2 INTERPOSER POSITION / Verinittlurstellung

1Q 2 1 SPARE /'Frei

1 03 0 HARD ERROR / harter Fehlen:

184

105 CONTROL (METER) STATUS /Steuer (Maschinen) Status

106 'FIRST WORD / Erstes Wort

187 1 RESET BASE / Basisneneinstellung

12:47:50

1 = gewählt

1 = offen, 0 = geschlossen

1 = vorne, 0 = Ausgangsstellung

1 = von oder in Stellung 2

0 = von oder in Stellung 1

1 = ausgelöst

1 = freigegeben (in Betrieb)

1 = verhängnisvoller Fehler, Fortsetzung unmög1ich

1 = Basis muß rückgesetzt werden

OS ©\ Kl

£

6500 ACCOUNT IWÌ MODULE CAflO<in/ll version 4.21.57 l5-Oct-79 1 2:47:50 TATUS ASSI GIIMENTS ACCTBL.SHC

öffnet seit S t rome inselvi U. m v

1 OH fi CHECK DATE' / Datumspriifung 1 = Daturnsgebertiir offen oder nicht, oo-

109 5 IH SU F F I c IENT FUNDS / 1 = abfall.Reg. < Portowert

1 90 4 I.OW POS TAG fi / unterer Portowert 1 = abfall. Reg. < unterer Portowert

191 3 SERVICE mû OB / Wartungszustand 1 = Wartung

1 92 2 BNABLGD / In Betrieb 1 = in Betrieb gesetzt

193 1 BATCH CLEAR / Stapel.lösch 1 = Stapelbetrag und -Zahl = 0

194 0 TRIP / Auslösung

195 SECOND WORO / Zweites Wort

1 96 7 HARD (FATAL) I2RROR. harter (verhängnisvoller) Fehler

1 97 6 SPARE / Frei

19 0 5 SPARE / Frei

199 4 SPARB / Frei

200 3 SPARB / Frei

201 2 SPARB / Frei

2Û2 1 SOFT BRROR / weicher'Fehler heilbarer Fehler

203 • 0 SPARB / Frei

204

205 METER HOPE (STATE) / MaschInenzustand

206 ALL 0 / Alles NORMAL OPERATION Normalbetrieb 2Ó7 7 TRIP / Auslösung

20fl 6 ENABLB / Bel:r i ebsselvzung

209 5 DISABLß/ Außerbetriebsetzung

TIME! VALUES TRPSET EQU mû TRPTOL EQU 163

65ÛÛ ACCÛIJHTTNG MODULE CA004Q/n ASSIGNMENT TABLE ACCTBL.SRC 2 1 Û

219

220

221

222 2 2 3

224

225

226 Û064

227 0ÛA3

228

229

230

231 OÛFF CRC I ML

232 009B CRCPLY 2 3 3'

234

235

236

237

2 3 Û Oûûl PRTEAT EQU 1 239 0002 PROFAT EQU 2

version 4.21.57 15-Oct-79 Zuwe l au ng s ta ha 1.1. e

Zuweisungstabelle

12:47:50

CRC ASS IG NMRNTS/Zuweisungen EQU OFF EQU 9B

Zeitwerte für Auslöseaktivität 2 Sek. Sperrzeit

Residue + <- no carry ok, C=1 Overspeed Residue < 93, Counts

Anfangswert für CRC-Berechnung CRC-Erzeugungspolynom

Verhängnisvolle Fehlerkodea .für Buchungs-erfaßte Fehler FATAL ERROR CODES POR ACCOUNT!HG DETECTED FAILURES

Druckerkommunikation tot ungültiger Header oder Softwarefehler

6500 ACCOUNT IMG MODULE CA004H/11 version 4.21.57 15-Oct-79 12:47:50 ASS IGNMENT TABLE ACCTBL . S HC

240

0003

COMPAT

EQU

3

Sperrzeil: während Kommunikation (Drucker oder Stouo.nin

241

0004

INTPAT

IÏQU

4

ACC Interposer line shorted

242

0005

NOMPAT

EQU

5

Synchronisationsverlust in Ausgangsstellungen

243

0006

ECU PAT

EQU

6

Echofehler während Übertragung

244

0007

SETPAT

EQU

7

> 2 Sek. auf Portoeinstellung

245

000Û

TRPPAT

EQU

0

Ober- oder Untergeschwindigkeit bei Auslösung (14{kms TRIP

246

247

oooö

IlSTTft y

EQU

9

keine erfolgreiche Neueinstellung in 9 aufein- ^ S'"k"

anderfolgenden Versuchen

240

SU BT

TL

Unterbrechungsvek toren

249

PAGE

6500 ACCOUNT IMG MODULE C A 0 0 4 (1 / 1 1 vers l.on 4 . 21 . 5 7 15-Oct-79 12:47:50 INTERUPT VECTORS PEPACC . SRC

250

251

Un terbrechungsvektoren

252

INTERRUPT VECTORS

253

254

255

256

POWER

UP

S1: rome i n s eh a 11 u n g

257

0000

ORG

0

250

OQÛO

04

OE

»TMP

PWRUP

259

260

POWER

PAILURE

SI: roma u sfall

261

0003

ORG

3

262

0003

65

STOP

TCNT

263

0004

04

09

il M P

PWRDN

264

265

TIMER

INTERRUPT Ze i tgeber-Unterbrechung

266

000?

ORG

7

26 7

0007

Ûé

24

JMP

TIMINT

2 6.0

260

1 NCLUDE

DMOi PWRDN

2 7,0

SUIÌTTL

POWER DOWN / Stromabschaltung

271

PAGE

6500 ACCOUNT ING MODULE OA004 0/1 I version 4.21.57 15-Oct-79. 12:47:50 POWER DOWN PWRDN.SRC

272

273

274

STROMAnSCIlALTUNG UND STROMAUSFALL POWER DOWl/ AND POWER FAILURE

275

276

277

278

Speichere Variable in leistungsunabhängigem Sepicher (NVM), sperre Zentmleinhel t (CPU) .in Riicksetzzustand STORE VARIABLES IN NVM, LOCK CPU IN RESET MODE.

279

200

0009

1 5

PWRDN

DIS

1

20 1

00ÛA

F 4

OE

CALL

NVMWR

Schreibe in NVM

202

000c

OA

40

ORL

P2. IK0

Ermögliche 8755 in Riicksetzung und schalte NVM ab

203

2 8 4

0Q0R

06

OE

PWRUP

JNI

%

Warte auf Stromausfall zur Löschung

285

0010

27

CLR

A

206

0011

D7

MOV

PSW, A

207

001 2

9 A

ÛP

AHI.

P2, HOF

Lösche 0755 Riicksetzung, schälte NVM ein

200

C 1.12 AR

RAM

209

001 4

IUI

20

MOV

RO, 1 PECEKT

290

001 6

l'I A

60

MOV

R2, linO-PECEKT

291

292 290

00 1 0

001 A

F 4 IUI

Eli 56

SET IM

CALL IIÏI AL MOV

CI.RIÌLK METER STATUS RO, BMRSTAT

m piiprw nîiTP Setze anfänglichen Maschinen IE CHECK DATE - atatuS/ d>h< Da tumsprü f t.nq

294

001C

no co

MOV

@ RO, Ï0C0

6 5 00 ACCOUNT IMG

MODU! ,12

CAO 0 4 0/1 1

version 4.21.57 15-OCL-79 12:47:50

POWER DOWN PWRDN

.SRC

295

LOAD NVM

296

00 1 E

F 4

61

CALL

NVMRD

297

0020

C6

2 4

.lZ

PWIUIPO Lesen in Ordnung?

29 8

0022

9 4

ÇA

CALL

NVMPAT Setze verhängnisvollen Zustand

299

0024

54

CA

PWRUPO CAI,I,

ASCCUC '

300

0026

F 5

SRL

H lì 1 Stromeinschaltung in oberen 2 K

301

0027

E4

A4

JHP

PWRUPA

302

3Û?

INCLUDI2 DHOiCTXnYT

30 4

'SUßTTL TRANSMIT ONR I1YTR - übertrage 1 Byte

305

PAGß

6500 ACCOUNT ING MODULE CA004fl/U vers i on 4 . 21 .57 15-Oci:-?9 12:47:50 TRANSMIT ONE BYTE CTXBYT.SRC

306

307

300 ÜBERTRAGE BYTE MÎT ECIIOPRÜFUNG

309

310

311

Hherhragalft Bits (1 Stari: + fl Daten + 1 Stopp), Bnpfange Echo, und

312 TRANSMIT 10 n[TS

SET ERROR IP NOT EXACT MATCH - setze Fehler, wenn nicht genau passend

314 NOTE: INTERNAI. T.OfiTC LEVEL REQUIRES INVERSION FOR TRANSMIT FUNCTION

•j j 5 Achtung: fnlerner logiUpegel erfordert Inversion fiir Übertragungsfunktion

316 -OM a =» Pehlerznhl während Übertragung

317 1-M RO = Adresse von Datenbyte 310 —M R3 - R7

319 1-- Fl = Einheit

320 0 Steuerung

321 1 Drucker

322 1-- C = Stopp-Bit-Pegel

323 0 Nachrichtenende

324 1 Byiieende

325

326 0029 27 CTXBYT Cr.R A

327 0Û2A AC MOV R4. A Lösche Fehlerzähler

6500 ACCOUNTIMG MODULE CA004f)/ll version 4.

mismit one byte

ctxßyt.src

3 28

00211

nn

0a

mov n3, no

329

0020

Bf

02

mov

Hl, 12

330

002F

1 7

i nc a

331

0030

ad

nov r5, a

332

00 3 1

0 4

57

jhp ctxblû

333

i.oop

334

0033

e6

57

ctxblp

.7 nc ctxblo

335

output low

336

0035

39

oijtl pi , a

337

0036

23

01

mov a, il

3 3 0

0038

00

nop

339

340

0039

20

ctxbl1

xcii

A, r5

341

0û3a

76

51

jp1

ctxbl6

342

control

343

003c

36

55

■.T to ctxbl7

344

00 3 e

07

ctxbl2

oec a

.345

003p

00

nop

346

347

0040

c6

5c ctxbl3

jc ctxbl9

3 4 û

s ave error occurrance

. 349

004 2

ic

inc r4

350

0043

27

clr a

351

0044

00

ctxbl4

nop

352

57 15-Oc1-7 9 12 : 47 : 5U

Schleifenzahl für 10 Bytes

Schalter für Echoprüfung des Stopp-Bits

Vorbereitung für erstes Scheinecho Ausgang niedrig für Startflanke

Ausgang hoch

Vorbereite ACC (Akkumulator) für Echo

Angebe Echo von logischer "1" Zei tausgleich kein Fehler

Anpasse Schleifenzeitgabe

65ÛO ACCOUNTÏNG MODULE CA8048/11 version 4.21 TRANSHIT ONE BYTE CTXBYT.SRC

353

0045

fo

nov a, sro

354

0046

67

rrc a

355

0047

a0

mov-

@ro, a

356

357

0048

fe

mov a, r6

358

0049

er

33

djnz r 3, ctxblp

359

360

00 4 b bb

01

mov r3, kl

361

0040

e f

3 9

djnz r7, ctxbl1

'362

00 4 f fc

mov a, r4

363

0050

83

ret

364

365

0051

4 6

3 e ctxbl6

jnt ctxbl2

366

écho

= logic "0"

.3 6 7

0053

04

40

jmp ctxbl3

368

369

0055

04

40

ctxbl7

jmp ctxbl3

370

t

371

0057

89

22

ctxbl8

obl pi, 122

372

0059

27

clr a

373

005a

04

39

jmp ctxbl1

374

375

û05c

04

44

ctxbl9

jmp ctxbl4

57 15-Oct-79 • 12 : 4 7 ; 50

Lade Daten

ßringe nächstes Bit zu C-Marke speichere gedrehte Daten Achtung, Übertrag ist zerstörend lade Maske 10 Iii ts ausgeben letzte Meldungsschleife für Stop-Echo Dringe Fehlerzahl in ACC

IScho = logische "1"

Zeitausgleich Ausgang hoch

Zei tausgleich

65QÛ ACCOUNTIMG MODULE CA004G/11 verplan 4.21.57 15-Oct-79 12:47 :58 TRANSMIT ONE BYTE CTXBYT.SRC

376

3 77 INCLUDE DMO: STCIIK

3 70 3 79

Zustandspruf-Hilfsroutine

300 STATE CHECK UTILITY

301

302

303

304

305 ÛÛ5E 54 D3 STCIIK CALL DISABL kann nicht RECBUF-Inhalt zerstören

306

307 . 3 0 0

309

3 90 INCLUDE DMOjBLKMOV

391 SUBTTL BLOCK MOVE

392 PAGE

005E

54

D3

STCIIK

CALL

DISABL kann

û 0 6 0

54

E0

STCIIK

1 CALL

LSTATW

00 6 2

09

56

MOV

RI, ÄMRSTAT

0064

03

RET

s

ê

6500 ACCOUNT I MG MODULE CAfl04n/ll 0LOCK MOVE BLKMOV.SUC

vera j on 4.21 .57

15-Octo-79

12:47:58

393

394

395

BF.OCK BEWEGUNG

396

397

3 9 Q

399

1 -M

no Zielstartadresso

400

1 -M

RI Quellfinstartadresse

401

1 -M

R2 Anzahl der zu bewegenden Bytes

402

403

0065

Fl

BLKMOVi MOV

A, @R1

404

0066

A0

MOV

@R0, A

405

0067

1 Q

INC

RO

406

0060

19

INC

Rl

407

0069

EA 65

BJN2

R2, BI.KMOV

400

006(3

en

DEC

RO Zeiger auf letztes Byte

409

006C

(13

RET

410

4 1 1

INCLUDE OMO : DE

4 1 2

SlJUTTI.

Dezimalsubtraktion und Vergleich

413

PAGE

> 00

65ÛO ACCOUNTING MODULE CAfl04fl/ll version 4.21.57 15-Oct-79 1 2:47:50

DECIMAL

RuaruACT

AND

COMPARE

N DIG ITS

DECSUR.SRC

4 1 4

4 i 5

4 1 6

DEZTMAT.Sll DTR A KT ION UND VERGLEICH VON ZIFFERNFOLGEN

417

4 1 Q

4 1 9 420

ABZIEHE, SlMiTRACT,

UND AND

VERGLEICHE, ZWEI BCD-DATENFOLGEN COMPARE, TWO BCD STRINGS (A=A-B)

421

4 22

1-M

R0

a Adresse des Bytes niedriger Ordnung der

423

1-M

R 1

= Adresse des niedrigen Bytesder Ziffernf olgeB

424

1 -M

R2

= Anzahl abzuziehender Bytes

425

-0M

PO

0, A II B ; 1 , A = B

426

-0M

C

0, A < B; 1, A > B

427

420

ÛÛ6D

97

DECSllß

CLR

C

429

û 0 6 E

A7

CPL

C

430

00 6P

05

cr.R

PO

431

00 70

95

CPL

PO

Setze auf Gleichheit

4 32

433

00 71

PI

DECSIU

MOV

A,

0R1

Lade einen Byte-Wert in ACC

434

0072

3 7

CPL

A

435

0073

1 3

9 A

ADDC

A,

i 9 A

436

0075

60

ADD

A/ .

t'RO

folge

> VO

s s

ts>

6500 ACCOUNTIHG MODULE CAfKHn/U version 4.21.57 DECIMAL SIJIÌTRACT AND COMPARIS II DIGITS DECSlJn.SRC

15-Oct-79

12:47:58

437

0076

57

DA

A

430

0077

A0

MOV

0RO, Ai

439

0070

C6

70

A'I

DECSB2

A « B

4-4 0

0Û7A

05

CLR

PO

A < > n

441

00713

CO

DECSB2 DEC

R0

442

007G

C9

DEC

III

443

007D

EA

71

D.l N Z

R2, DECQB1

Bringe nytezähler auf

444

007P

03

RET

445

4 4 6

INCLUDE DMOjMI SC

447

SUBTTL

Verschiedene Routinen

440

PAGE

NJ O

6500 ACCOUNT I MG MODULE CA0040/11 veraion 4.21.57 15-Oct-79 1 2:47:58 MISC ROUTINES TO SAVE CODE MI SC.SRC

449

450

Verschiedene Routinen

451

M ISCELLANEOUS ROUTINES

452

453

454

455

0000

D4

20

RECSTS

CAIJ,

PRCRX

456

00 Q 2

04

96

JMP

RECST1

457

458

0004

DO

6 P

GETD

MOV

RO, ÜWORKßP + 1

459

0086

AO

MOV

@R0, A Speichere Header

460

0007

CO

DEC

RO

461

0080

BO

Ol

MOV

@n0, Kl Größe des Übertragungs-Datenpakets

462

000 A

PO

GETDO

MOV

A, RO

463

ooon

94

QA

CALL

PRCTX

464

ÛÛ8D

r>4

20

CALL

PRCRX

4 65

00AP

03

RET

466

G ET

PRINTER

STATUS

467

0090

94

04

GETSTA

CALL

STRIOM

460

0092

23

50

MOV

A, |50 Anfordere Statusheader

469

0094

1 4

04

GETSTS

CALL

GETD Sende Nachricht und verarbeite zurückgegebenen

470

0096

74

16

RBCSTl

CALL

DOSTAT

471

ÛÛ9A

03

RET

6500 ACCOUNTING MODULE CAßÜ4n/ll varaj.on 4.21.57 15-Oct-79. 12 ; 4 7 : 5 Q MISC ROUTINES TO SAVE CODE MISC.SRC

472

473

INCLUDE OMOtLÏMTST

474 SU OTTI. LOAD AND REFORMAT LIMIT / Lade und neuformatiere Grenze

475 PAGE

6500 ACCOUNT I MG MODULE LOAD ANO REFORMAT LIMIT

476

477 4 7 ü

479

480 4 01

402

403

404

CA0040/11 I.IMTST. SRC

version 4.21.57 15-Oct-79 12:47:50

1 — --M

Lade und neuformatiere Grenze LOAD AND REFORMAT LIMIT

R1

RO, R2

= ADDI / Adresse der Grenze

405

0099

B 3

6 6 I.IMTST

MOV

RO, IWRKBP1

406

00913

nA

02

MOV

R2, *2

487

009D

no

40

MOV

6R0, 14 0

400

009P

10

INC

R0

409

00A0

1 4

65

CALL

BLKMOV

499

0 0 A 2

no

66

MOV

RI, iWRKBPl

491

00A4

23

03

MOV

A, II 0 3

492

00A6

A4

32

JMP

PMTCII

493

494

INCLUDE

DMO i CIIGPRV

495

SUBTTL

496

PAGE

/ Leer-Header

/ Ändere Berechtigungs-Marke

6500 ACCOUNTING MODULE CA0048/11 version 4.21.57 15-Oct-79 12:47:58 CHANGE PRIV FLAG CIIGPRV.SRC

497

498

Ändere

Derechtigungsmarke

499

CHANGE

PRIV FLAG

500

501

502

503

Ändere

Berechtigungszus tand : Norm -> PRIV OR PRIV NORM

504

505

00A8

54

E8 <

CIIGPRV CALL LSTATW

Lade Zustandswert

506

OÛAA

D3

01

XRL A, Il

Ändere Berechtigungszustands-Bit

507

OOAC

AO

MOV @R0, A

Speichere neuen Zustandswert

508

ÛÛAD

F 4

OA

CAI.L NVMCIIG

Ändere offenen Block in NVM (leistungsunabhängiger

509

OOAF

93

RE'PR

Speicher)

510

Sil

INCLUDE DM0: MILDE!

512

SUfìTTL ■

Mi 11i Sekundenverzögerung

513

PAGE

6500 ACCOUNTING MODULE CAÛ040/11 veirsipn 4.21.57 15-Oct-79 12:47:50 MILLISECOND DELAY MILDEL.SRC

514

515

Verzögere N Millisekunden

516

DELAY N MILLISECONDS

517

518

519

520

DELAY 302.4 U-SEC.

521

522

OÛBÛ

BE

21

DEL300

MOV R6, 133. Mit Aufruf 302.4 ji-sek.

523

ÛÛQ 2

EE

B 2

DELOOP

DJNZ R6, DELOOP warte

524

00D4

03

RET

525

526

527

0100

ORG 100

528

I MCI.DDE DM0 Ì ACCEXC

529

Ilauptsteuerschleif e für

530

PAGE

Ni

& K)

K

6500 ACCOUNT ING MODULE CA8048/11 version 4.21.57 15-Oct-79 MAIN CONTROL LOOP POR ACCOUNTING FUNCTION ACCEXC.SRC

531

532

533

BUCIllJNGS

- IIAUPTSTEU12RSC1ILEÏFE

534

535

536

537

Soli 1 ei Ce anhängige Nachrichten fiir fortlaufende Abtastung von Empfangs 1 e i tung auf

536

Iii e Ce ri:

Fähigkeit zum Empfang einer Nachricht und Verarbeitung

539

zur Vàrarbei tung empfangener Nachricht während Übertragung versucht wird

540

54 1

NO DATA

keine Daten

542

0100

76

TBCMDN

Dû

LOW

SOFTER

frei

543

0101

7C

DB

LOW

ENBLE

setze Maschine in Betrieb

544

0102

8 9

DB

LOW

DSBLE

setze Maschine außer Betrieb

545

0103

AC

DO

LOW

ENDENT

Ende der Eingabe

546

0104

QP

DB

LOW

CLRBAT

Lösche Stapel

547

0105

76

DB

LOW

SOFTER

Buchung vollständig

548

0106

97

DB

LOW

SETSER

setze Wartungszustand

549

0 107

A 2

DB

LOW

CLRSER

lösche Wartungszustand

550

551

CMDS

WI TU

DATA

mit Daten

552

0108

76

TBCMDW

DB

LOW

SOFTER

frei

553

0109

C7

DB

LOW

SßTPO

einstelle Portogebühr

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-79 12:47:58 MAIN CONTROL LOOP POR ACCOUNTING FUNCTION ACCEXC.SRC

554

0 1 0 A

76

DB

LOW

SOFTER

f rei

555

0 1 OD

76

DB

LOW

SOFTER

frei

556

01 OC

76

DB

LOW

SOFTER

einstelle Datum

557

01 OD

C 3

DB

LOW

ENTAMT

eingebe Betrag

558

0 1 OE

09

DB

LOW

ENTCMB

eingebe Kombination

559

010F

76

DB

LOW

SOFTER

frei

560

Adressentabel.le fiir wartungsmäßige Eingabe von Neuwert und Portogebühreinstellunc

561

ADDRESS TADLE

FOR SERVICE

ENTER NEW VALUE AND SET POSTAGE

562

0110

49

TBCMDS DB

LOW

UNLOCK

entSperre Adresse

563

Oli 1

AC

DB

LOW

LOWPOS

untere Portogebühren-Warnadresse

564

0112

4 E

DB

LOW

SETLIM

Adresse für einstellbare Grenze

565

0113

7B

DB

LOW

CMBOBF

Adresse für eingestellten Portogebührenwert

566

567

PAGE

65ÛO ACCOUNTING MODULE CA004fl/ll version 4 . 2 Ì . 5 7 15-Oct-79 MAIN CONTROL LOOP FOR ACCOUNTING FUNCTION ACCEXC.SRC

12:47:50

568

569

0114

B8

5ß

570

0116

10

571

572

011 7

94

F 4

573

574

575

0119

67

57 6

OHA

14

60

577

01 IC

96

30

578

01 IE

Fl

579

Ol 1 F

ß 2

30

580

0121

D2

30

581

0123

F2

2 ß

58 2

0125

F6

3 2

583

0127

B4

BB

584

0129

24

32

585

01 2B

09

5Q6

01 2C

52

27

587

01 2E

24

32

588

589

0130

34

D3

QUE METER STATUS ENTRY TO EXC / Warteschlange Maschinenstatuseingabe fiir EXC QUESTA MOV RO, ICTXFL

INC @R0 setze Marke Nichtnull

UPDATE FLAGS IN METER STATUS / Marken in Maschinenstatus auf neuen Stand

RETEXC CALL POSUPD

EXCENB

EXCBAS

RRC

CALL

JN2

MOV

JB5

JB6

JB7

JC

CALL

JMP

IN

JB2

JMP

Bit 1 A

stciik 1

EXCDIS

A,@R1

EXCDIS

EXCDIS

EXCBAS

IDLE2

ENABLE

I DI.E2

A, PI

EXCENB

IDLE2

ACC = Wiedergabekode wie folgt

Bit 0 = "0" Porto unter•Entsperrungswert unzureichende Gebührenmittel für gegenwärtige Portogebühr

Speichere Entsperrwert in Ubertragungsbit

Lade Zustand und Zeiger in MRSTAT

wenn Normalzustand, prüfe Vermittler lade Maschinenstatus wenn unzureichende Portogebühr wenn Datumsgebertür offen

Rücksteile Basis aktiv, prüfe ob weitere Inbetriebsetzung wenn über Entsperrwert, mache nichts erforderlich lese Vermittler-Befehlsleitung wenn Vermi.ttlerbefehlsleitung niedrig, lasse allein

EXCDIS CALL' DISABL

6500 ACCOUNTING MODULE CAQ04G/11 version 4.21.57 15-Oct-79 12:47:50 MAIN CONTROL LOOP FOR ACCOUNTING FUNCTION ACCEXC.SRC

590

IS

STATUS

TO BE OUTPUT TO

PRINTER / Ist Status auf Drucker auszugeben?

591

013 2

27

IDLE2

CLR

A

592

0133

no

5n

MOV

RO, ICNTXI

Marke wenn keine Null zur Maschinen-Status-Übertragung

593

0135

20

XCII

A, @ RO

Lade Marke und Null

594

0136

96

06

JNZ

METSTA

sende Status

595

0130

F4

OA

CALL

NVMCBG

ändere offenen Block, wenn nötig

596

01 3A

27

IDLEO

CLR

A

597

0 1 3B

no

5C

MOV

RO, IRECBF

Zeiger auf Empfangspuffer-Marke

5 9 Û

01 3 D

20

XCII

A, @ RO

599

01 3E

96

5 F-

JNZ

CNMESS

Warteschlangenachricht, kann nur Steuernachricht sein

600

0140

54

E7

IDLE1

CALL

LSTATE

601

602

0142 0144

52 56

54 4C

JB 2 JT1

IDLE3 IDLE4

wenn bereits verhängnisvoll, keine Kommunikation mit

Druck keine Drucker-RTS (Sendeauf fard e rung)

603

0146

94

04

CALL

STRIOM

starte Zeitgeber

604

0140

1 4

00

CALL

RECSTS

empfange und verarbeite Status

605

Ol 4A

24

53

JMP

IDLE5

606

607

Inkreinent-

Abfrage Zählerverzögerung

600

01 4C

1 0

IDLE4

INC

RO

Zeiger auf Sendeaufrufsverzögerungszähler

609

01 4D

10

INC

@R0

Erhöhe Sendeaufrufszähler-Verzögerung

610

01 4E

FO

MOV

A, 0 RO

611

014F

96

54

JNZ

I OLE 3

612

0151

1 4

90

CALL

GETSTA

6500 ACCOUNT I HG MODULE CA0040/11 version <1.21 MAIN CONTROL LOOP FOR ACCOUNTING FUNCTION ACCEXC,

57 15-Oct-79 SRC

12:47:5B

613

0153

65

IDLE5

STOP

TCNT

61 4

Prüfe Steuer RTS

615

0154

25

50

I DLE 3

JNT0

RCNMES

Empfange Steuernachricht

616

0156

24

1 7

JMP

RETEXC

617

616

0158

94

04

RCNMES

CALL

STRIÛM

619

01 5 A

S» 4

2C

CALL

CNCRX

620

01 5C

65

STOP

TCNT

Stoppe Zeitgeber

621

01 5 D

24

32

JMP

IDLE2

622

623

015F

D8

512

CNMESS

MOV

R0, 1RECBUF

Adresse von Empfangspuffer

624

Prüfe hohen NIBBLE und ver2eige auf richtigen

625

0161

0 3

CLR

F0

für eingestellte Portogebühr verwendet

626

0162

27

CLR

A

627

0163

20

SCU

A, @R0

628

0164

72

7.4

JB3

I1RDBAD

Bit 3 sollte nicht gesetzt sein

629

0166

30

XC1ID

A, @ R0

Trenne hohen und niedrigen NIBBLE

63 0

0167

4 7

S WAP

A

Bringe hohen NIB in untere ACC-Hälfte

631

0160

D3

OC

XRL

A, Ï0C

Befehl mit Daten?

6,3 2

01 6A

C6

B5

JZ

CMIJDAT

633

01 6C

95

CPL

FO

6 3 4

016D

D3

09

XRL

A, 109

Wertanforderung?

635

016F

C6

CD

J 2

RETVAL

Typenbefehl

6500 ACCOUNTING MODULE CA0040/11 versici! 4.21 MAIN CONTROL LOOP FOR ACCOUNTING FUNCTION ACCEXC

636

0171

07

DEC

A

637

0172

CS

7 A

J Z

CMDONY

630

0174

24

1 7

HRDUAD

.'IMP

RETEXC

639

0 176

23

OF

SOFTER

MOV

A, HOF

640

Ol 70

44

32

.'JMP

VALUES

64 1

642

COMMAND ONLY

643

0 1 7 A

FO

CMDONY

MOV

A , 0 RO

64 4

0 1 7 D

D 3

JMPP

0 A

645

646

017C

54

EO

EN BLE

CALL

LSTATW

647

0 1 7 E

53

DF

AML

A, 1=DF

648

0180

95

CPL

F0

649

0101

AO

DISSTA

MOV

0RO, A

650

0132

D6

14

J F0

QUESTA

651

0104

D4

nn

CALL

ENABLE

652

653

0186

27

METSTA

CLR

A

654

0107

44

32

JMP.

VALUES

655

656

0109

1 4

5E

DSBLE

CALL

STCIIK

657

U1 00

4 3

20

ORL

A, i 20

650

01 OD

24

01

JMP

DISSTA

57 15-Oct-79 12:47:50 SRC

Wenn Header unzulässig fiir PEP, übergehe und keine Antwort Lade niedrigen Teil auf SeiLe indirekter Tabellensprung

Lade Zustandwert

Lösche Auflerbetriebssetzungsbit

Speichere auf neuen Stand gebrachten Zustandswert

Setze Außerbetriebsetzungsbit

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-79' 12:47:50 MAIN CONTROL LOOP FOR ACCOUNTING FUNCTION ACCEXC.SRC

659

018F

B8

33

CLRBAT

MOV

RO, »BATAI

660

0191

BA

07

MOV

R2, I BATA

661

0193

P4

E E

CALL

CLRBLK

662

0195

24

1 4

JMP

QUESTA

663

0197

1 4

5 E

SETSER

CALL

STCIIK

Eingebe Wartungszustand

664

0199

43

02

ORL

A, 12

Setze Wartungsbit

665

01 9B

AO

MOV

@R0, A

666

019C

Fl

MOV

A, @ RI

Lade Maschinenstatus

667

019D

43

08

ORL

a, in

668

019F

Al

SETSR1

MOV

0 R1 , A

669

01 A0

24

1 4

JMP

QUESTA

670

01A2

1 4

5E

CLRSER

CALL

STCIIK

671

01 A4

53

FD

ANL

A, I0FDII

Lösche Wartungsbit

672

01A6

AO

MOV

@R0, A

673

01 A7

Fl

MOV

A, @R1

Lade Maschinenstatus

674

01A8

53

F?

ANL

A, I0P7

675

01 AA

24

9F

JMP"

SETSR1

676

677

01 AC

1 4

5C

ENDENT

CALL

STCIIK

Prüfe ob verhängnisvoll

6.7 8

01AE

52

76

JB 2

SOFTER

wenn verhängnisvoll, nur

679

01B0

32

CF

JBl

SERENT

wenn im Wartungszustand

680

0102

F5

SEL

MB 1

601

01B3

24

04

JMP

RESET

6500 ACCOUNTING MODULE CAÛ048/11 version 4.21.57 l5-Oct-79 12:47:58 MAIN CONTROL LOOP POR ACCOUNTING FUNCTION ACCEXC.SRC

682

683

COMMAND WITII DATA Befehl mit Daten

684

01B5

FO

CMDDAT

MOV

A , 0 RO

685

01B6

03

03

ADD

A, I LOW TBCMDW

686

OlBfl

B 3

JMPP

0A Springe auf Tabelle

687

01B9

B 8

7B

ENTCMB

MOV

RO, ICMBOBP

688

01BÛ

B9

5 F

ENTCB1

MOV

R 1 , »RECBUPU

689

0 1 BD

BA

05

MOV

R2, IAMTS2

690

0 1 BF

1 4

65

CALL

BLKMOV

691

01C1

24

1 4

SEREMI

JMP

QUESTA

692

0 1C 3

B8

76

ENTANT

MOV

RO, IAMTBÌF

693

01C5

24

BB

JMP

ENTCßl

694

0 1C7

23

03

S ET PO

MOV

A, 13 Achtung: kann keine Daten im Bnpfangspuffer zerstören

695

01C9

n 9

5P

MOV

Rl, iRECnUPil

696

01CB

' 24

DF

JMP

SETPOS

697

698

699

VALUE

REQUEST Wertanforderung

700

0 1 CD

4 4

27

RETVAL

JMP

PMTVAL

701

702

SERVICE VALUE SET AND SET POSTAGE / Wartungswert gesetzt und Portogebühreneinstellung

703

01CF

B9

76

SERENT

MOV

RI, II AMT BF

£ ts>

£

6500 ACCOUNTING MODULE CAfl048/ll version 4.21.57 MAIN CONTROL LOOP FOR ACCOUNT ING FUNCTION ACCEXC.SRC

15-Oct-79 12:47:58

704

01D1

Bû

7n

MOV

RO, KCMBOnP

705

01D3

FO

MOV

A, @ RO

Lade COMDO-Format, annehme

70 6

01D4

D3

1 F

XRL

A, IIP

707

01D6

96

76

JNZ

SOFTER

708

01D3

18

INC

RO

Prüfe COMBO-Wert

709

01D9

PO

MOV

A, @ RO

710

01 DA

53

FC

ANL

A, 10FC

nur gültig sind 0, 1, 2, 3

711

01DC

96

76

JNZ

SOFTER

712

0 1 DE

FO

MOV

A, 0 RO

713

0 1 DP

43

10 SETPOS

ORL

A, no

Versetzen für Tabelle

714

01E1

AB

MOV

R 3 , A

Rette für später

715

0 1 E 2

E 3

MOVP3

A, 0 A

Lade Formatspezifikation

716

01E3

D4

32

CALL

FMTC1I

Prüfe Format

717

01E5

03

02

ADD

A, 12

Fiir Entsperrung Zeiger auf

718

Ol E7

A8

MOV

RO, A

719

01E8

F4

F4

CALL

CLR AM

720

01 EA

PB

MOV

A, R 3

721

Kod iere,

um Eingang des Entsperrungswertes in MILS zu verhindern

722

Ol ED

32

F 3

J D1

SERENO

kein Entsperrungswert

723

01 ED

12

F3

JDO

SERENO

724

01EF

27

CLR

A

725

01 PO

30

XC1ID

A, 0 RO

7 26

0 1 F1

96

76

JNZ

SOFTER

U) -f*

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79 MAIN CONTROL LOOP FOR ACCOUNTING FUNCTION ACCESC.SRC.

12:47:58

727

01F3

FD

SERENO MOV

A, D 3

728

01F4

A3

MOVP

A, 0 A

Lade Zieladresse

729

01F5

AÛ

MOV

R0, A

730

01F6

14

65

CALL

DLKMOV

731

01F8

B 6

1 4

JF0

QUESTA

nicht SETPOS

732

01 FA

A4

DE

JMP

SETINT

733

734

735

736

737

738

0200

L/ï

ORG 200 INCLUDE DM0:FMTOUT

SUDTTL RETURN VALUE / Wiedergebe Wert mit Unterdrückung unnötiger Nullen PAGE

£ NJ .U

£

6500 ACCOUNTING MODULE CA0048/11 version 4. 21.57 15-Oct-79 12:47:58 RETURN VALUE WITII UNECESSARY ZEROS REMOVED FMTOUT.SRC

739

740

741

Wiedergebe angeforderten Wert

742

74 3

744

745

Gebe Wert unter

Unterdrückung unnötiger Nullen wieder. Zwei Eingänge sind

746

vorgesehen : ( 1 )

Ausgabe in Maschineneinheiten benötigt, und (2) Benutzung

747

zur Lieferung von Dezimalplätzen. Sprungtabelle leitet richtige Eintragung

748

unter der Annahme,

daß niedriger NIBBLE von Header + 10H in Akkumulator ist.

749

750

1 -- R0

Adresse zu formatierender Daten

751

1 -- R1

Adressenzeiger

752

1-- R2

Größe von Daten in Bytes

753

1-- R4 = 1

Anzahl vorkommender Dezimalplätze

754

1-- R5 = 1

• Header für Übertragung

755

--M RI, R3,

756

757 750

0200

2 F

Tabelle für Datenformate (hoher NIBBLE = keine Bytes, niedriger NIBBLE = Anzahl de ezimalplätze)

DB 2F Maschinenstatus

759

0201

DB 33

Portogebührenwert

760

0202

53

DB 5 3

anwachsendes Register

6500 ACCOUNTING MODULE CA8040/11 version 4.21.57 15-Oct-79 12:47:58

RETURN

VALUE WI

TU

UNECESSARY

ZEROS REMOVED

FMTOUT

'.SRC

761

0203

43

DB

43

DESCENDING REGISTER

abfallendes Register

762

0204

53

DB

53

CONTROL SUM

Kontrol1 summe

763

0205

4F

DB

4 F

PIECE COUNT

Stückzahl

764

0206

43

DB

43

BATCH AMOUrtT

S tapelbetrag

765

0207

3F

DB

3 F

BATCH COUNT

Stapelzahl

766

767

SERVICE

Wartung

768

0208

20

DB

20

METER STATUS

Maschinenstatus

769

0209

33

DB

33

POSTAGE VALUE

Portogebührenwert

770

020A

33

DB"

33

UNLOCK VALUE

Entsperrungswert

771

020B

20

DB

20

LOW POSTAGE WARNING

untere Portogebühren-Warngrenze

772

020C

4F

DB

4 F

METER SERIAL

NUMBER

Maschinen-Seriennummer

773

020D

3F

DB

3F

DIAGNOSTIC STATUS

Diagnosestatus

774

0 2 0 E

20

. DB

20

SETTABLE POSTAGE LIM

ht/ Einstellbare Portogebührengrenze

775

020F

2F

DB

2 F

USED FOR SOFT

ERROR

Für weichen Fehler verwendet

776

777

PAGE

6500 ACCOUNTING MODULE CAÛ04Q/11 Version 4.21.57 15-OCL-79 12:47:50 RETURN VALUE WITII UNECESSARY ZEROS REMOVED PMTOUT.SRC

778

LOOP

FOR DELETING ZERO

BYTES Schleife zur Entfernung von Null-Bytes

779

0210

10

FMTOU1

INC

RO

Bringe Adressenzeiger auf neuen Stand

780

0211

EA

5E

DJNZ

R2, FMTOU'O

781

HERE

IF ALL

ZERO BYTES

liier wenn alle Null-Bytes

782

0213

CB

DEC

RO

Zeiger auf bekannte 0-Daten

783

0214

FC

MOV

A, R4

Lade Dezimalplätze

784

0215

DD

Ol

MOV

R3, II

785

0217

C6

9C

JZ

FMT014

0 Dezimalplätze

786

0219

D3

OF

XRL

A, HOF

Prüfung auf keine Dezimalplätze

•787

0 2 1 B

C6

9C

JZ

FMT014

Ausgebe 0

788

021 ü

CO

DEC

RO

789

021 E

DB

03

MOV

R3 , 13

790

0220

D3

OC

XRL

A, IOC

791

0222

96

9C

JNZ

FMT014

Ausgebe 0, 00

792

0224

1D

INC

R3

793

0225

44

7 8

JMP

FMTOU 3

•Ausgebe 0.00 nach Abstreifen nachgestellter Null

794

795

0227

F0

FMTVAL

MOV

A, @ RO

Lade Header

796

0220

07

DEC

A

Prüfe ob Portogebührenwert

797

0229

C 6

3 1

JZ

VALUE

Wenn Akku. = 0, setze nicht Wartungsbit ein

790

0 22B

34

E7

CALL

LSTATE

Interpretiere Aufforderung verschieden, wenn im Wartungs-

betrieb

799

022D

53

02

ANL

A, 102

800

0 2 2 F

E 7

RL

A

6500 ACCOUNTING MODULE CAÜ040/11 version 4.21.57 15-Oct-79 12:47:50

JRN

VALUE

WITII

UNECESSARY

ZEROS

REMOVED

FMTOUT.SRC

801

0 2 30

E7

RL

A

802

023 1

40

VALUE

ORL

A, @ R0

Lade Header und füge Wartungsbit dazu, wenn erforder

803

023 2

A 9

VALUES

MOV

RI, A

aus niedrigem NIBB extrahiere Datenadresse, Größe, Anz. i

804

02 33

E3

MOVP3

A, @ A

Datenadresse Dezimalstell,

805

0234

29

XCII

A, RI

speichere Adresse

006

02 35

AD

.MOV

R5 , A

807

0236

A3

MOVP

A, @ A

Lade SPEC

808

0237

AC

MOV

R4 , A

Hoch = Anzahl der Bytes, Nieder = Dezimalstellen

809

02 30

53

OF

ANL

A, «OF

Maske für niederen NIBD

8 1 0

0 2 3 A

2C

XCII

A, R4

Speichere Dezimalstellen

011

02 3 0

DC

XRL

A, R4

Bilde Anzahl der Bytes.

012

023C

.47

SWAP

A

013

0 2 3 D

AA

MOV

R2 , A

814

0 2 3 E

AF

MOV

R7 , A

Rette für späteren Gebrauch

815

0 2 3 P

BB

03

MOV

R3, »3

Setze Fehlziffern-Zähler

816

017

024 1

Fl

MOV

A, @ R1

818

0242

17

INC

A

819

024 3

96

47

JNZ

FMTOT1

Wenn Daten = FF fehlerhaft

820

024 5

24

76

JMP

SOFTER

021

024 7

F 4

E9

FMTOT1

CALL

CLRWK

0 2 2

0249

DO

71

MOV

R0, « |W»

823

0 2 4 ß

1 4

65

CALL

DLKMOV

Bewege in Arbeitsbereich

65ÛO ACCOUNTING MODULE CA0040/11 :i'versi.on 4.21.57 15-Oct-79 12:47:50 RETURN VALUE WITH UNECESSARY ZEROS REMOVED FMTOUT.SRC.

824

CHECK

FQR

SERVICE VALUE

Prüfe auf Service Wert

825

024D

FD

MOV

A, R5

Lade Header

826

0 24 E

17

INC

A

027

0 2 4 F

92

B7

JB4

FMTSOF

weicher Fehler = XF, = 10

820

CHECK

FOR

CONTROL SUM-

829

0251

FD

FMTOT2

MOV

A, RS

830

0252

C6

B9

JZ

FMTSTA

wenn Status, übergehe Format

831

0254

D3

04

XRL

A , 14

832

0256

96

5A

JNZ

FMTOUA

Nicht Kontrollsumme

8'3 3

CONTROL SUM

Kontroll'summe

834

0253

54

BF

CALL

CTLSUM

835

836

0 2 5A

BQ

71

FMTOUA

MOV

R0, 1 (WORI

837

025C

FF

MOV

A, R7

8.3 8

025D

AA

MOV

R2, A

839

025E

F0

F.MTOUO

MOV

A, @R0

Lade 1 Datenbyte

040

0 2 5 F

C6

1 0

JZ

FMTOU1

wenn beide Ziffern 0, setze Prüfung fort

84 1

kann noch eine vorangestelle Null in oberem NIBBLE

842

0261

FA

MOV

A, R2

Bilde Ziffernzahl

843

0262

E7

RL

A

844

0263

AB

MOV

R3, A

Rette in R3

845

0264

FO

MOV

A, @R0

846

0265

53

FO

ANL

A, IOFO

Prüfe hohen NIBBLE des Datenbyte

6500 ACCOUNTING

MODULE CAO

040/11

versi on

4.21.57 15-Oc L-7 9 1 2:47 : 50

RETURN

VALUE 1

WI TU

UNECESSARY

ZEROS

REMOVED FMTOUT.S RC

847

0267

96

6 A

JNZ

FMTOU2

B 4 8

0269

CB

DEC

R3

Überlege ob Unterdrückung von hoher Null,

849

026A

FC

FMTOU2

MOV

A, R4

Prüfe ob 3 Dezimalstellen

850

0 2 6 B

D3

03

XRL

A, *3

851

026D

96

06

JNZ

FMT010

Wenn nicht MILLS, keine weitere Unterdrückung

852

HERE

IF TIIREE (3) DEC

REQUIRED

853

026F

FO

MOV

A, RO

Datenzeiger

85 4

0270

6 a

ADD

A, R2

855

0271

0 7

DEC

A

Start + Größe - 1

856

0272

A9

MOV

RI , A

857

0273

Fl

MOV

A, @ R1

Lade niedriges Byte

8 5 8.

0274

53

OF

ANL

A, K OF

Prüfe niedrigen NIBB auf Nüll

859

0276

96

86

JNZ

FMT010

Springe, wenn Unterdrückung nicht möglich

860

Hier nachlaufende Null angeben

861

0278

FB

FMTOU3

MOV

A, R3

862

0279

1 7

INC

A

Aufrunden für Bytezähler von Daten

863

027A

67

RRC

a

Bilde Bytezahl

864

027B

AA

MOV

R2 , A

865

027C

E6

00

JNC

FMTOU4

bereits ungerade Ziffernzahl

866

867

027E 027F

CO 1A

DEC INC

RO R2

Anpasse Adresse, um anzusehen wie ungerade

Ziffernzahl

868

0280

FO

FMTOU4

MOV

A, RO

869

0201

B 4

02

CALL

FMTNB2

Linksverschiebung um 1 NIBBLE

6500 ACCOUNTING MODULE CA8040/11 version 4.21.57 15-Oct-79 12:47:50 RETURN VALUE WITH UNECESSARY ZEROS REMOVED FMTOUT.SRC

070

020 3

AO

MOV

R0 , A

Neuer Adressenzeiger

871

0 2 û 4

CB

DEC

R3

Anpasse Ziffernzahl

872

0285

CC

DEC

R4

Anpasse Dezimalenzahl

873

Vorbereite Übertragungspaket

874

0286

FC

FMTOIO

MOV

A, R4

Prüfe ob von Null verschiedene Ziffern Dezimalplätze

Ë 7 5

0287

C 6

9C

JZ

FMTOl4

876

0289

D 3

OF

XRL

A, HOF

877

0200

C6

9C

JZ

FMTOl4

wenn Dezimalplätze = 0, überspringe Prüfung

878

0 2 8 D

FC

MOV

A, R4

879

0 2 0 E

87

CPL

A

Subtrahiere und prüfe Übertrag

880

0 2 8 F

97

CLR

C

881

0290

7B

ADDC

A, R3

882

0291

F6

9C

JC

FMTOl4

Ziffern in Ordnung

883

PAD IN

LEADING "0" S

AS NEEDJED Auffülle vorderde "0" wenn nötig

804

0293

2B

FMTOl1

XCII

A, R3

Prüfe, ob ungerade Ziffernzahl

885

0294

12

97

JB0

FMTOl2

886

0296

C 8

DEC

R0

Bewege Adressenzeiger um 1 Byte nach oben

887

0297

2B

FMTOl2

XCII

A , R3

Ersetze Ziffer in R3 und anpasse Zahlung in Akku

888

0298

1B

INC

R 3

Erhöhe Ziffernzähler

889

0299

17

INC

A

Anpasse Zähler

090

0 2 9 A

96

93

JNZ

FMTOl1

091

029C

FB

FMTOl4

MOV

A, R3

Bilde Format in Akkumulator

892

0 2 9 D

47

SWAP

A

6500 ACCOUNTING i

MODULE CAÛO

40/11

vers i on

4.21.57 15-OCU-79 12:47:50

RETURN

VALUE W1

: tu

UNECESSARY

ZEROS

REMOVED

FMTOUT.SRC

893

0 2 9 E

4C

ORL

A, R4

894

029F

C 8

DEC

RO

Anpasse Adressenzeiger

895

02A0

AO

MOV

@ RO , A

Speichere Format

896

0 2 A 1

C8

FMTSTS

DEC

RO

897

02A2

FD

MOV

A, R5

Einsetze Header

898

02A3

43

00

ORL

A, M 00

Einsetze oberen NIBBLE des Header

899

02A5

AO

MOV

@R0, A

900

02A6

CB

DEC

RO •

901

02A7

FB

MOV

A, R3

Berechne Übertratungsbyte-Zahl

902

02AÜ

97

CLR

C

903

02A9

1 7

INC

A

904

02AA

67

RRC

A

Dividieren durch 2

905

0 2 AB

03

02

ADD

A, 12

906

0 2 AD

AO

MOV

@R0, A

Speichere Bytezahl

907

02AE

F8

FMTTRP

MOV

AM RO

gepackte Adresse

908

02AF

94

04

CALL

STRIOM

909

0 2 B1

A5

CLR

Fl

910

0282

94

8C

CALL

CTXMES

91 1

0 2 D 4

65

STOP

TCNT

912

02B5

24

3 A

JMP

IDLEO

9,1 3

914

02B7

10

FMTSOF

INC

@ RO

setze Fehlerbit für weichen Fehler in übertragungspuffei

915

02138

10

INC

@ RO

6500 ACCOUNTING MODULE CA8048/11 version 4./21.57 15-Oct-79 12:47:50

RETURN

VALUE !

WI TU

UNECESSARY ZEROS

REMOVED FMTOUT

.SRC

916

02B9

BD

80

FMTSTA MOV

R5, IVLISUD

Ändere

Schein-Header "ÛF" in "80"

917

02BB

C8

DEC

R0

Zurück auf erstes ßyte

918

■ 02BC

CB

DEC

R3

Ändere

Ziffernzahl, so Nachricht =

919

0 2 BD

44

AI

JMP

FMTSTS

920

921

CONTROL SUM

9.2 2

02BF

B9

20

CTLSUM MOV

RI / II DSCREG * t

923

02C1

DA

04

MOV

R2, IDSCRSZ

924

02C3

54

EC

CALL

DECADD

925

02C5

27

CLR

A

926

02C6

70

ADDC

A, @R0

Addiere

C-Marke und hohes Byte des

927

02C7

57

DA

A

928

02C8

AO

MOV

@ R0 / A

929

02C9

83

RET

930

931

932 $

933

INCLUDE DMO:ASCCRC '

SUBTTL

PAGE

Derechne CRC für anwachsendes Register

6500 ACCOUNTING MODULE CA804Û/11 COMPUTE CRC FOR ASCENDING REGISTER

vers i on 4.21 .57

ASCCRC.SRC

15-OCL-79

12:47:50

934

935

936 .937

938

939

945

946

947

948

Berechne CRC fiir anwachsendes Register

940

02CA

B8

2A ASCCRC

MOV

R0 ,

II ASCREG

941

02CC

BA

05

MOV

R2 ,

IASCRSZ

942

02CE

F4

CF

CALL

CRC

943

02D0

BO

29

MOV

R0 ,

1 ASCECC

944

02D2

83

RET

INCLUDE DM0 : DISABL SUBTTL DISABLE METER PAGE

4^

Ut

Setze Maschine außer Betrieb

£ M

£

6500 ACCOUNTING MODULE CAÛ04Û/11 DISABLE METER DISABL.SRC

vers i on 4.21.57

15~Oct-79

12:47:50

949

950

951

952

953

954

955

956

957

958

959

02D3

89

04

960

02D5

B8

2 F

961

02D7

F0

962

02D8

52

DB

963

02DA

83

964

965

02D8

54

E7

966

02DD

52

DA

967

02DF

94

1 2

968

02E1

14

00

969

02E3

52

El

970

02E5

A4

CF

971

Setze Maschine außer Betrieb

Wenn•Maschine in Batriebsbereitschaft, setze Maschine außer Betriebsbereitschaf t und prüfe Antwort des Druckers, sonst tue nichts

IS METER ENABLED? DISABL ORL PI, 114 MOV MOV JB2 RET

RO, IPRSTAT A, @ RO DISAB1

Maschine in Betrieb?

Setze ACC Hälfte des Vermittlers außer Betrieb gegenwärtig in Betrieb

DISRET

DI SAB 1

DISAB2

DISAB3

CALL

JB2

CALL

CALL

JB2

JMP

LSTATE DISRET STR6 0M RISC S TS DI SAB2 EtlABRT

wenn verhängnisvoll, kein Gespräch mit Drucker möglich

Warte auf Statusantwort

Warte bis außer Betrieb oder Sperrzeit

6500 ACCOUNTING MODULE CA8040/11 version 4.21.57 15-Oct-79 12:47:50 DISABLE METER DISABL.SRC

>

972 INCLUDE S

973 SUBTTL Lade Zustandswert

974 PAGE

Os ON N) •Et

s

Ni §

6500 ACCOUNTING MODULE CA8048/11 LOAD STATE VALUE LSTATE.SRC

version 4.21.57

15-Oct-79

12:47:58

975

976

977

Lade Zustandswert

978

9.7 9

980

981

02E7

D5

LSTATE

SEL

RB1

982

02E8

B8 58

LSTATW

mov

RO, H STATE

983

02EA

FO

mov

A, @R0

984

02EB

93

RETR

985

986

INCLUDE DM0:DECAD

987

SUBTTL Dezimale

988

PAGE

4^

00

e

6500 ACCOUNTING MODULE CA0040/11 version'4.21.57 DECIMAL ADDITION OF N DIGITS DECADO.SRC

15-Oct-79

12:47:50

909

990

991

Dezimale Addition von

N Bytes

992

993

994

995

Addiere zwei (2) Datenfolgen von BCD-Zahlen (A = A + B)

996

997

1 --

R0

Adresse des Byte niedriger Ordnung

990

1 —

RI

Adresse des Byte niedriger Ordnung

999

1--

R2

Anzahl zu addierender Bytes

1 000

-OM

C

0, kein Überlauf; = 1, Überlauf

1 001

1 002

0 2EC

97

DECADO

CLR

. C

1 003

1004

C 2 ED

F0

DECADI

MOV

A, @ R0

Lade ACC mit Byte "A"

1005

02EE

71

ADDC

A, @R1

Addiere "A" + "B"

1006

02EF

57

DA

A

1007

0 2 F0

A0

MÒV

@R0 , A

Rette (zwischenspeichere) Antwort

1008

1 009

Bringe

Adressenzeiger auf neuen Stand

1010

0 2 F1

C 8

DEC

R0

1011

02 F 2

C9

DEC

RI

4^

9\ Os ts) .U

Os a

Sì

.u

£

6500 ACCOUNTING MODULE CAQ0<lß/lI version 4.21.57 15-Oct-79 1 2 : 47:50

DECIMAL ADDITION OF N DIGITS DECADD.SRC

.1012 02F3 EA ED DJNZ R2 , DECADI Erniedrige Byte-Zähler und fahre fort

1013 02F5 03 RET

1014

1015 INCLUDE DMO:TMRTST

1016 Prüfe'verbleibende Zeit, bis Zeitgeber-Unterbrechung

1017 PAGE

O

6500 ACCOUNTING MODULE CA8040/11 version 4.21.57 CHECK TIME LEFT TILL TIMMER INTERUPT TMRTST.SRC

15-Oct-79

12:47:50

1018

1019

1020

1021

1022

1023

1030

1031

1032

1033

1034

1035

Stelle sicher, daß'Zeitgeber nicht unterbricht für > 4 msek.

1024

02F6

42

TMRTST

MOV

A, T

Lade Zeitgeberwert

1025

02F7

03

30

ADD

A, 130

Addiere ungefähr 5-6 msek.

1026

0 2F9

E6

FE

JNC

TMRTS1

C = 0 in Ordnung

1027

02FB

53

CF

ANL

A, lOCF

Xndere Zeitgeber auf Wartezeit von 5

1028

0 2 FD

62

MOV

T, A

Bringe geänderten Wert zu Zeitgeber

1029

0 2 FE

03

TMRTS1

RET

> L/i

0300

ORG 300

INCLUDE DM0 :PG3TBL

SUBTTL

PAGE

Datentabelle der RAM-Adressen

On OS

ON ON K)

ê

6500 ACCOUNTING MODULE CA804Û/11 version 4.21.57

DATA TABLE OF RAM ADDRESS PG3TBL.SRC

1036

15-Oct-79 12:47:50

1037

1038

1039

1040

1041

1042

1043

1044

Tabelle fiir Adressen der Daten

Jede Eintragung ist Anfangsadresse von mit Header verbundenen Daten

NORMAL MODE

Normalbetrieb

1045

0300

56

DB

MRSTAT

Maschinenstatus

1046

0301

30

DB

POSVAL

Portogebührenwert

1047

0302

2 A

DB

ASCREG

anwachsendes Register

1048

0303

25

DB

DSCREG

abfallendes Register

1049

0304

2 A

DB

ASCREG

Kontrollsumme

1050

0305

20

DB

PECEKT

Stückzahl

1051

0306

33 •

DB

BATANT

S tapelzahl

1052

0307

37

DB

BATCNT

Stapelbetrag

1 05 3

1054

SURVIVE MESSAGES

Wartungsnachrichten

1Ó55

0308

56

DB

MRSTAT

Maschinenstatus

1056

0309

30

DB

POSVAL

Portogebührenwert

1057

030A

49

DB

UNLOCK

EntSperrungswert

1058

030D

4C

DB

LOWPOS

unterer Portogebührenwert

Ui KJ

6500 ACCOUNTING MODULE CAB04Q/11 version 4.21.57 15-Oct-79 12:47:50 DATA TABLE OF RAM ADDRESS PG3TBL.SRC

1059

030C

45

DB

MSERNO

Maschinenseriennummer

1060

030D

41

DB

RSTCNT

Kode für verhängnisvollen Zustand

1061

0 3 0 E

4 E

DB

SETLIM

Eins telIbare Portogebührenhöchs tgrenze

1062

030F

56

DB

MRSTAT

frei

1063

1064

Wartungsbetri eb-Betragsforma tspez ifikationen (SPEC)

1065

0310

63

DB

63

Entsperrungsforma t-Spez.

1066

0311

40

DB

40

unterer Portogebührenwert-Formatspez.

1067

0312

40

DB

40

Einstellbare Hochstgrenzen-Formatspez.

1068

0313

53

DB

53

Portoeinstellgebühr-Spez.

1069

1070

INCLUDE DMO:DOSTAT

1071

SUBTTL

verarbeite Druckerstatus

1072

PAGE

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79

PROCESS PRINTER STATUS DOSTAT.SRC

1073

1074

1075

Vera rbeite

Druckerstatus

1076

1077

1078

1079

Bringe Daickerstatus auf neuen Stand,

gebe Änderungen in Zustand und Frankiermaschinenstatus

1080

1081

1 --

R0

Adresse an Nachricht'mit Header und Statusbyte

1 0 B 2

— M

RI, R5, R6,

1083

108 4

0314

64

7C

TRIPST JMP

DOTRIP

1085

Ì

1086

0316

B9

5D

DOSTAT MOV

RI, H POLCNT

Nullsetze SendeaufrufsVerzögerungszäh1er

108 7

0318

B1

CO

MOV

@ R1, H0C0

ungefähr 200 msek.

1088

0 3 1A

23

8 0

MOV

A, Il VLI SUD

Prüfe.Statusheader

1089

0 3 1C

DO

XRL

A, @ R0

1090

0 3 1D

C6

23

JZ

DOSTA1

Header in Ordnung

1091

; BAD HEADER

: FATAL - PROCEDURE

l'O9 2

031F

BP

02

MOV

R7, KPROPAT

verhängnisvoller Kode

1093

0321

84

33

JMP

FATERR

1 094

0323

B9

2F

DOSTA1 MOV

RI, SPRSTAT

Austausche Status

1 095

0325

18

INC

R0

Zeige auf Daten

6500 ACCOUNTING MODULE CAÛ040/11 version 4.21.57 15-Oct-79 1 2:47:58

PROCESS

PRINTER

STATUS

DOSTAT.

, SRC

1096

0326

15

DIS

1

stelle sicher, daß wenn Auslösung übertragen wird, diese verarbeitet

1097

0327

FO

MOV

A, @ RO

wird

1090

0328

21

XCII

A, @ R1

1099

0329

D1

XRL

A, @ R1

Bilde XRL aus altem und neuem Status

1 1 00

0 3 2 A

53

DF

ANL

>

O D

Maske für Sperrstange

1101

032C

C 6

6 E

JZ

DOSTA7

keine Änderung

1 102

032E

AF

MOV

R7, A

1103

032F

51

ANL

A, @R1

Bilcie UND aus neuem und XRL von altem und neuem

1104

0330

AE

MOV

R6, A

1 105

0331

72

1 4

JB3

TRI PST

Führe Buchung aus bei Beginn der Auslösung

1106

0333

05

EN

1

Keine Auslösung &

1107

0334

1 2

71

JBO

GETDIA

Wenn neuer verhängnisvoller Fehler, erhalte Diagnosestatus

1 100

0336

FF

MOV

A, R7

1109

0337

72

3B

JB3

DOSTA 3

War Änderung in Auslösebit?

1110

Prüfe

Ausgangsstellung

1111

0339

92

A2

JB4

BADIIOM

Ausgangsstellung anerkennen

' 1112

033B

37

DOSTA 3

CPL

A

1113

• 033Ç

AD

MOV

R5 , A

1114

033D

B8

5B

MOV

R0, «CNTXFL Änderung in Status, daher Warteschlange an Steuerung

1115

033F

10

INC

@ R0

1116

CHECK

IF CHANGE IN

INTERPOSTER

1117

0340

B 8

56

DOSTA4

MOV

R0, II MRSTAT

1118

0342

52

54

JB2

DOSTA5

Keine Änderung in Vermittler

S

K) 4*.

£

6500 ACCOUNTING MODULE CA004Û/11 version

PROCESS PRINTER STATUS DOSTAT.SRC •

1119

034 4

Fl

MOV

A, @R1

1 120

0345

77

RR

A

1121

0346

77

RR

A

1122

0347

67

RRC

A

1123

0348

E0

MOV

A, @ R0

1124

03 49

E6

4 D

JNC

DOST4A

11 25

;

C = 1

METER ->

1 126

0 3 4 B

53

? F

ANL

A » 17F

1 127

0 3 4 D

77

DOST4A

RR

A

1128

0 3 4 E

77

RR

A

1129

0 3 4 F

77

RR

A

1130

0350

F7

RLC

A

1131

035 1

E7

RL

A

1132

0352

E7

RL

A

1133

0353

A0

MOV

@R0 , A

1134

0354

FD

DOSTA5

MOV

A, R5

1135

CHECK DATER

DOOR

1136

0355

D2

63

JB6

DOSTA6

1137

0357

97

CLR

C

1 1 30

0350

A 7

CPL

C

1 139

0359

FE

MOV

A, R6

1 140

035A

D2

5D

JB6

DOST5A

114 1

035C

A 7

CPL

C

21.57 1 5 -Oc L- 7 9 12:.47:50

Übertrag = Vermittlerstellung

Lade Maschinenstatus und einsetze Vermittler C = 0 - ) Setze außer Betrieb

Inbetriebsetzung muß Basisrücksetzungs-Bit löschen

Keine Änderung Fehlprüfungsdatenbit auf = 1

Tür gerade geöffnet; verv/ende Fehlsetzung Tiiränderung und nicht gerade geöffnet

6500 ACCOUNTING MODULE CAO 0 4 Q/1 1 version 4.21.57 15-Oct-79 12:47:50

PROCESS PRINTER STATUS DOSTAT.SRC

1142

035D

FO

D0ST5A

MOV

A, @R0

Lade Maschinenstatus

1143

035E

E7

RL

A

114 4

035F

E7

RL

A

1145

0360

67

RRC

, A

1146

0361

77

RR

A

1147

0362

AO

MOV

0RO, A

Rette auf neuen Stand gebrachten

1 148

0363

FD

D0STA6

MOV

A, R5

1149

CHECK

PRIV

SWITCH

1150

0364

F 2

6E

JB7

DOSTA7

Keine Änderung

1151

0366

DO

50

MOV

RO, I STATE

1152

0 3 6 Û

Fl

MOV

A, @R1

Lade neuen Status

1153

0369

F 7

RLC

A

Prüfe Berechtigungsbit

1 154

0 3 6A

FO

MOV

A, @R0

Lade Zustandswert

1155 •

036B

7 7

RR

A

1156

0 3 6C

F7

RLC

A

Einsetze Berechtigungs-Info

1157

036D

AO

MOV

@R0 , A

115 0

036E

Fl

D0STA7

MOV

A, @R1

Lade Druckerstatus in Akku.

1159

036F

05

EN

1

1160

0370

Q 3

RET

1161

1162

0371

94

04

GETDIA ;

CALL

STRIOM

1163

0373

23

50

MOV

A, K 5011

Header für "DIA"-Status

1164

03 75

1 4

84

CALL

GETD

6500 ACCOUNTING MODULE CA8048/11 PROCESS PRINTER STATUS DOSTAT.SRC

STOP INC MOV

: JMP

1165

0377

65

.1166

0378

1 Û

1167

0379

PO

1 168

0 3 7 A

84

1169

1170

1171

1172

vers i on 4.21

TCNT RO

A , @ RÛ FATRR1

INCLUDE DM0 :DOTRIP

PAGE

57 15-Oct-79 12:47:58

Verarbeite Auslösung und Buchung

6500 ACCOUNTING MODULE CA804G/11 version 4.21.

PROCESS TRIP AND ACCOUNTING DOTRIP.SRC

1173

1174

l 1 75

1 1 76

1177

1 1 70

1 1 79

1 1 00

1 1 01

•1102

1 1 U 3

1 184

1185

1 1 86

037C

65

1187

037D

23

64

1188

037F

94

1 9

1189

0301

B0

02

1190

038 3

74

BQ

1191

0305

05

1192

0306

94

F 4

1193

0308

C 6

OC

1 194

0 3 8 A

09

04

1195

Verarbeite Auslösung und Buchung

Verarbeite Auftreten von Auslösung und Buchung

1-- A 1-- RO 1 -- R1

DOTRIP STOP TCNT

MOV A, II TR PS ET

CALL STR20M

MOV @R0, K 2

CALL DOACCT

EN )

CALL POSUPD

JZ DOTRP1

ORL PI, H

Wert des neuen Status Adresse des alten Status Adresse des neuen Status

Bringe Maschinenstatus auf neuen Stand

Zulässige Zeit für Auslösung

Starte Zeitgeber zeigt Zeitgabe der Auslösung an

Gestatte Stromabfall

Lasse in Betriebsbereitschaft

Setze jetzt außer Betriebsbereitschaft

Kritische Buchung jetzt vollendet, so zeige dem Drucker an

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-79 12:47:50

PROCESS TRIP AND ACCOUNTING DOTRIP.SRC

1 196

038C

23

45

DOT R PI'

MOV

A, »ACMPIID

1197

030E

1 4

94

CALL

GETSTS

11 90

0390

37

CPL

A-

1 199

0391

72

97

,

JD3

DOTRP3

Auslösung vollendet

1200

WAIT

FOR '

TRIP COMPLETE

Warte auf Auslösung vollständig

1 201

0393

1 4

00

DOTRP 2

CALL

RECSTS

1 202

0395

72

93

JB 3

DOTRP2

Verbleibe wartend, bis Auslösebit gelöscht

1203

0397

94

01

DOTRP 3

CALL

TI MSTP

Stoppe Zeitgeber

1204

0399

03

A3

ADD

A, K TRPTOL

Prüfe auf Übergeschwindigkeit

1205

0 3 9 B

E6

9 P

JNC

DOTRP4

Geschwindigkeit in Ordnung

1206

OVERSPEED

1207

039D

84

79

JMP

TRIPTM

1208

0 3 9 P

FF

DOTRP4

MOV

A, R7

Prüfe Ausgangs-(HOME)-Stellung

1209

0 3 A0

92

A6

JB4

DOTRP5

Ausgangsstellung geändert, in Ordnung

1210

DAD HOME POSITION

1211

03A2

DP

05

DADIIOM

MOV

R7 , » IIOMFAT

1212

03A4

04

33

JMP

FATERR

1213

Û3A6

B9

56

DOTRP5

MOV

RI, »MRSTAT

1214

0 3 A0

Qû

70

MOV

R0, KWORKnP«2

1215

03AA

DA

02

MOV

R 2 , » 2

1216

0 3 AC

1 4

65

CALL

Il LKMOV

1217

03AE

C8

DEC

• R0

Zeiger auf erstes Byte

1210

0 3 AP

10

INC

@R0

Auslösebit 0

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-?9 12:47:50 PROCESS TRIP AND ACCOUNTING DOTRIP.SRC

1219

03B0

C8

DEC

R0

1220

03B1

B0

00

MOV

@R0 ,

iVLISIID

1.2 21

0 3 B 3

Cfl

nee

RO

1222

03B4

B0

03

MOV

@R0 ,

13

1223

03B6

44

AE

JMP

FMTT

RP

1224

1225

Buciiu ng fii r Auftreten

1 226

PAGE

>

o\

OS 0\ NÌ •fe* £

6500 ACCOUNTING MODULE CA004fi/ll version 4.21.57 15-OCL-79 12;47;50

ACCOUNT FOR OCCURANCE OF TRIP DOTRIP.SRC

1 227

1228

•

1229

1230

Buchung für Auslösung

1231

1232

1233

1234

1235

Bringe anwachsendes und abfallendes Register, Stückzahl sowie Stapelzahl und Stapelbetragsfelder auf neuen Stand

.12 36 1237

0 3 BS

94

E3

DOACCT CALL POSWRK Bewege Portogebührenwert in Arbeitspuffer mit Bringe anwachsendes Register auf neuen Stand

1238

03QA

08

2E

MOV

R0 , H (ASCREG+ASCRSZ-1 )

1239

0 3DC

B9

73

MOV

Rl, »(WORKBP+POSTSZ+3-1)

1240

03BË

RA

05

MOV

R2, HASCRS2

1 24 1

03C0

54

EC

CALL

DECADD R0 = R0 # Rl

124 2

NEW CRC

1243

03C2

54

CA

CALL

ASCCRC

124 4

03C4

A0

MOV

@RÛ, A

1245

Bringe abfallendes Register auf neuen Stand

1246

t

03C5

Cfl

DEC

R0 POINT AT

1247

03C6

R9

73

MOV

R 1 , Ji IWORKßP« POSTSZ *3-1

1240

Û3CÛ

RA

04

MOV

R2, IDSCRSZ

1 249

03CA

1 4

6D

CALL

DECSUI3

6500 ACCOUNTING MODULE CAÛ048/11 version 4.21.57 15-Oct-79 12:47:58

ACCOUNT POR OCCURANCE OF TRIP DOTRIP.SRC

1250

03CC

E6

A2

JNC

BADIIOM

1251

NEW CRC

1252

03CE

D4

65

CALL

DSCCRC

1253

03D0

A0

MOV

@R0 , A

1254

UPDATE BATCH

AMOUNT FIELD

Bringe Stapelbetragsfeld auf neuen Stand

1 255

03D1

B0

36

MOV

R0, « BATAMT *

BATASZ - 1

1 256

03D3

B9

73

MOV

RI, K(WORKBF+POSTSZ+3-1)

1 257

03D5

BA

04

MOV

R2, UBATASZ

1258

03D7

54

EC

CALL

DECADO

1259

UPDATE PIECE

COUNT

Bringe Stückzahl auf neuesten Stand

1260

03D9

F 4

EA

CALL

CLRWRK

1 261

03DB

B9

75

MOV

RI , II WORK DP +

WRKBSZ -

1262

03DD

11

INC

@R1

1263

03DE

B 8

23

MOV

RO , H ( PECEKT t- PECESZ-1 ) / Adresse des letzten Byte des Stückzählers

1264

03E0

BA

04

MOV

R2, H PECESZ

Anzahl der Bytes

1 265

03E2

54

EC

CALL

DECADD

1 266

UPDATE BATCH

VARIABLES

Bringe Stapelvariable auf neuen Stand

1267

03E4

B8

89

MOV

RO, H BATCNT +

BATCSZ -

1268

03E6

B9

75

MOV

Rl, H WORKBP +

WRKBSZ -

1269

03E8

BA

03

MOV

R2 , II DATCSZ

1 270

0 3 E A

54

EC

CALL

DECADD

1271

CHECK CONTRO!

, SUM CRC

Prüfe Kontrollsummen - CRC

1 272

0 3EC

94

D2

CALL

CTLECC

6500 ACCOUNTING MODULE CA8048/11 version 4.21

ACCOUNT FOR OCCURANCE OF TRIl1 DOTRIP.SRC

1273

03EE

DO

1 274

03EF

96

1 275

0 3 F1

03

1276

1277

1278

1279

XRL JNZ RET

A, @R0 DADIIOM

INCLUDE DMOs LOWSET

PAGE

15-Oct-79 12:47:50

Kommunikationsmaske gesetzt

6500 ACCOUNTING MODULE CA004Û/U version 4.21 COMMUNICATION MASK SET LOt

1 280

1281

1282

Untere KommunikaI:ionsmaske gesetz t

1283

1284

1 285

1286

Bestimme richtige Ausgabe für P1 um niedrigen Pegel -auf aktiver

1 207

Kommunikation auszugeben und andere Leitung unbeeinflußt zu lassen

1288

1289

-OM

A

Maskenwert bei Aussprung

1290

1291

03F2

09

LOWSET IN

A, PI

Lese gegenwärtigen PI

1 292

03F3

53

CC

ANL

A, lOCC

Lösche Kommunikationsleitungen

1293

03F5

76

FA

J F 1

LOWST1

Drucker

1 294

CONTROL

Steuerung

1295

03F7

43

1 3

ORL

A, 113

1296

03F9

33

RET

1297

PRINTER

Drucker

1298

03PA

43

31

LOWST1 ORL

Ä, 131

1 299

0 3 FC

83

RET

1300

1 301

1 302

0400

ORG

400

6500 ACCOUNTING MODULE CAÛ04Û/11 version 4.21.57 15-Oct-79 . 12:47:50

COMMUNICATION MASK SET LOWSET.SRC

1303 INCLUDE DMOiTIMER Zeitgeber

1304 Zeitgeber- und verhängnisvolle Fehler-Funktionen

1305 PAGE

6500 ACCOUNTING MODULE CAÛ04Û/11 version 4.21.57 15-Oct-79 12:47:50

TIMER AND FATAL ERROR FUNCTIONS TIMER.SRC

1 306

1 307

1 30Ü

Zeitgeber -

Verhängnisvoller Fehler

1 309

1310

1311

1312

Liefert drei

Funktionen: (1) Steuerung des Chip-Zeitgebers, (2) Sperrzeitverarbeitung

1313

zeitgesteuerter Ereignisse und (3) Verarbeitung bei verhängnisvollem Fehler

1314

1315

Zei tbetrag zum Zählen

1316

— M

RO

1317

1318

TABLE FOR

TIMEOUT JUMPS

/Tabelle für Sperrzeitsprünge

1319

0400

31

DB

LOW FATCOM

Wenn Kommunikationszeit aus

1 320

040 1

57

DB

LOW INTPOS

Wenn Sperrzeit bei Vermittleränderung

1321

0402

79

DB

LOW TRIPTM

Auslösung zu lang

1 322

0403

7D

DB

LOW SETPTM

Portogebühr zeitausgesperrt

1323

1324

Schaffe Sperrzeitfunktion für Zeiten von 1-20 msec.

1325

0404

AB

STR10M MOV

R3 , A

1326

0405

23

OE

MOV

A, » 1 4

Allgemeine Kommunikations-Sperrzeit

1327

0407

B8

54

STRM IL MOV

R0, KTIMCNT

Eintritt mit Sperrzeit in Akku in msec

1328

0409

no

Ol

MOV

ÜR- , Ii 1

Einstellung für 1 Durchgang durch Hauptzeitschleife

6500 ACCOUNTING MODUL

TIMER AND FATAL ERROR

E CAß04ß/ll Version 4.2

FUNCTIONS TIMER.SRC

329

0 4 OB

E7

RL

A

330

04 0C

E7

RL

A

331

0 4 OD

E7

RL

A

332

0 4 OB

37

•

CPL

A

333

0 4 0 F

17

INC

A

334

0410

84

IE

JMP

STRTIM

335

MAIN

TIMER

LOOPS

336

0412

BQ

55

STR60M

MOV

R0, |T

337

0414

B0

01

MOV

0RO, |

3 3 8

0416

AB

MOV

R3 , A

339

0417

23

04

MOV

A, 14

340

0419

B 8

54

STR20M

MOV ,

R0, IT

341

04 1 B

A0

RSTR20

MOV

@R0, A

342

04 IC

23

6B

MOV

A, 1256

343

0 4 1E

62

STRTIM

MOV

T, A

344

04 1F

55

STRT

T

345

0420

25

EN

TCNT 1

346

0421

FB

MOV

A, R3

347

0422

1 0

INC

R0

348

0423

93

TIMDMV

RETR

349

350

0424

D5

TIMINT

SEL

RB l

351

04 25

AB

MOV

R 3 , A

.57 I 5-Oct.-79 12:47:50

msec * 0 ist ungefähr benötigte Zahl

Bilde 2-er Komplement für Hochzahl-Überlauf

Verwende Zentralkode

Hauptzeitgeberschleife

Eintritt für Vermittler-Sperrzeit

Tabelleneintrag für Vermittler-Sperrzeit

Rette Akku.-Wert

60 msec. = 3 * 20 msec-Zählungen

Eintritt, wenn allgemeiner Wert in Akku

Zentralkode für neue Zählung und Neustart des 20-msec-Zähl

Komplementzeit-Zählung für 20 msec.

Lade Zeitgeber

Wiederherstelle Akku, für Zeitgeberneustart

Bei Unterbrechung störe unterbrochene Aktivität nicht SAV R3

6500 ACCOUNTING MODULE CAf)040/ll version 4.21

TIMER AND FATAL ERROR FUNCTIONS TIMER.SRC

1352

04 26

65

STOP

TCNT

1353

0427

B8

54

MOV

R0, ÏTIMCNT

1354

0429

F0

MOV

A, @ R0

1355

042A

07

DEC

A

1356

042B

96

in

JNZ

RSTR20

1357

TIMED

OUT

1358

042D

18

INC

R0

1359

0 4 2 E

20

XCII

A, @ R0

1360

04 2F

C5

SEL

RB0

1 361

04 30

B 3

JMPP

@ A

1362

1363

0431

BF

03

FATCOM

MOV

R7, HCOMFAT

1364

0433

94

81

FATERR

CALL

TIMSTP

1365

0435

89

FF

ORL

PI, HOFF

1366

04 37

54

E7

CALL

LSTATE

13 67

04 39

52

47

JB2

FATER1

1368

0 4 3 B

FF

MOV

A, R7

1369

04 3E

A0

FATRRI:

MOV

RO,»PATCOD

1371

0 4 3 F

18

INC

R0

1372

04 40

F0

MOV

A, ÖR0

1.3 7 3

044 1

17

INC

A

1 374

044 2

97

CLR

C

1 375

0443

57

DA

A

57 15-OCL-79 12:47:50 Stoppe Zeitgeber

Wenn Zähler 0, warte weitere 20 msec.

Zeiger auf TIMWIIO

Gehe zu richtiger Sperrzeit-Routine Kode für Kommunikationsfehlschlag

Lösche Kommunikationsleitungen und erzwinge Anzeige Wenn bereits verhängnisvoll, überspringe

Speichere verhängnisvollen Kode

Erhöhe Zähler für verhängnisvollen Fehler

Muß in BCD bleiben

6500 ACCOUNTING MODULE CA004Q/11 version 4.21.57 15- Oct-79 12:47:50

EH AND

FATAL

error

FUNCTIONS TIMER.SRC

1 376

044 4

AO

MOV

@RO , A

1377 1370

04 4 5 04 4 7

94 C5

4 A

CALL FATER1 SEL

NVMFAT RBO

Zen tra lkode, um verhängnisvollenZustand und Bit in Maschinen status zu setzen

1 379

04 48

24

1 4

JMP

QUESTA

1 380

1 301

0 4 4 A

1 4

60

NVMPAT CALL

STCIIK1

1382

044C

43

04

ORL

A, *4

Setze verhängnisvolles Fehlerbit

1 303

0 4 4 E

A0

MOV

@RO, A

Rette Status

1 384

04 4F

Fl

MOV

A , @R1

1385

0450

53

FB

ANL

A , 1 OFB

1 386

0452

AI

MOV

@ R1 , A

1307

0453

19

INC

Rl

Zeiger auf zweites Maschinenstatusbyte

1 388

0454

B 1

86

MOV

@R1, B 80

Setze verhängnisvolles Bit in Maschinenstatus

1 389

0456

93

RETR

1 390

)m

0457

0458

09 37

INTPOS: IN CPL

A. PI A

Sperrzeit Programme

1393

0459

B8

2 F

MOV

RO, IPRSTAT

1.394

045B

52

6C

JB2

ENABTM

Betrieb durch Sperrzeit beendet

1 395

DISABLE TIMEO OUT

1,3 9 6

0/I5D

F0

DISBTM MOV

A, @R0

1397

CHECK SHUTTER BAR

1390

045E

B2

77

JB5

EMTMDN

1399

TRY TO TALK TO PRINTER

MY HALF COULD BE SHORTED

6500 ACCOUNTING MODULE CAÛ040/11 version <1.21.57 15-Oct-79 12:47:50

ÏR AND

FATAL

ERROR

FUNCTIONS TIMER.SRC

1 400

0460

99

FD

ANL

PI, iOFDII

1401

0462

BÛ

46

MOV

RO, 170 Sperrzeitsteuerung

1402

0464

14

BO

D ISTMI CALL

DEL300

1403

0466

EO

64

DJNZ

R0( DISTM1

1404

0468

BF

04

MOV

R7, IINTFAT

1405

0 4 6 A

84

33

JMP

FATERR

1406

ENABLE TIME-OUT

1 407

046C

F0

ENABTM MOV

A, @ RO

14 00

046D

53

Cl

ANL

A, I0C1 Prüfe auf Einschaltung von

1409

046F

96

77

JNZ

ENTMDN Sperrzeit in Ordnung

1.4 10

RESET BASE

- BEST GUESS

14)1

0471

B8

56

MOV

RO, K MRSTAT

14 12

0473

FO

MOV

A, @ RO

1413

0474

43

00

ORL

A ,1100

1414

0476

AO

MOV

@RO , A

1415

0477

24

76

ENTMDN JMP

SOFTER

1416

TRIP TIME-OUT Auslöse-Sperrzeit

1417

0479

BF

00

TRIPTM MOV

R7, ITRPFAT

14 10

0470

84

3 3

JMP

FATERR

1419

1 4 20

047D

BF

07

SETPTM MOV

R7, iSRTFAT

1421

047F

04

3 3

JMP

FATERR

1422

CLEAR TIMER

TIME-OUT Räume Timer Sperrzeit

Fehler

>

a

On K>

t

6500 ACCOUNTING MODULE CAO Q 4 Ö / 1 1 version 4.2 1.57 15-Oct-79 12:4.7:50 TIMER AND FATAL ERROR FUNCTIONS TIMER.SRC

14 23

0 4 Q 1

D5

TIMSTP- Slil<

RB1

1424

0 4 B 2

65

STOP

TCNT

1425

0403

27

CLR

a

1 4 26

04 04

DO 55

MOV

ro, (TIMWIIO

1427

0406

a0

MOV

@ro, a

1 420

0 4 B 7

CB

DEC

ro

Zeiger auf TIMCNT

1 429

04 00

2 0

XCII

a, @ ro

0 und lade übrige Zeitzähler

1430

04 89

93

RETR

14 31

1432

INCLUDE DMOiCTXMES

1433

SUBTTL

übertrage Nachricht

1434

page

6500 ACCOUNTING MODULE CAfl04û/ll version <1.21.57 15-OCL-79 12:47:50

TRANSMIT MESS AGB CTXMES

1435

1436

14 37

Über Lrage

Nachricht und p riife auf Echo

1 4 30

1439

14 40

144 1

Übertrage

Nachricht.von N

Bytes auf Drucker oder Steuerung. Aussprung

144 2

bei erfolgreicher Übertragung oder Sperrzeit. Wenn Nachricht dreimal erfolglos

144 3

übertragen,

tritt verhängnisvoller Fehler auf. Übertragungsdatenpaket enthält:

1444

(1) Zahl der zu übertragenden Bytes und (2) die zu übertragenden Daten

1445

1446

1 -M

A = ADDRESS

Adresse des Sende-Datenpakets

1447

--M

R0, R2 - R7

1448

1 --

PI « UNIT

Einheit

1449

0

Steuerung

1450

1

Drucker

1451

1452

048A

A5

PRCTX CLR

PI

Setze F1-Marke für Drucker

1453

û 4 0 Q

D5

CPL

Fl

1454

1455

048C

A 8

CTXMES MOV

R0, A

Rette Paketadresse

1456

SET VALUE

FOR LOW OUTPUT

1457

04 ÛO

74 P2

CTXMB1 CALL

LOWSfüT

Einstelle untere Ausgabemaske

6500 ACCOUNTING MODULE CA8Û4Û/11 version 4.21

TRANSMIT MESSAGE CTXMES.SRC

1458

1459

04 BF

76

90

JFl

CTXMSQ

1460

CONTROL

1461

0491

26

C3

J.NTÛ

CTXCNC

1462

0493

39

OUTL

PI , A

1463

0494

36

94

CTXCWT

JT0

CTXCWT

1464

0496

84

A3

JMP

CTXMS1

1465

PRINTER

1466

0498

46

CB

CTXMS0

JNT1

CTXCNP

1467

049A

39

OUTL

PI , A

1460

1469

0490

BA

04

MOV

R2, *4

1470

049D

46

CB

CTXMSP

JNT1

CTXCNP

1471

049F

EA

9D

DJNZ

R2 , CTXMSP

1472

04A1

56

Al

CTXPWT

JT1

CTXPWT

1473

1 474

0 4 A 3

AE

CTXMS1

MOV

R6 , A

1475

0 4 A 4

54

F6

CALL

TMRTST

J 476

0 4 A 6

F0

MOV

A, @ R0

1477

0 4 A 7

1 0

IIIC

R0

14 70

04 AO

07

DUC

A

1 479

04A9

AA

MOV

R2, A

1 400

04AA

C6

B5

JZ

CTXMS7

57 15-OCÜ-79 12 < 47 : 58

Versuche übertragungsleitung zu erlangen Drucker

Empfange

Warte auf Steuer-CTS übernehme Steuerung

Empfange

Warte Konfliktsperiode ab, 50 - 100 usec.

Warte 75 usec. lang

Drucker in Konflikt siegreich

Warte auf Drucker-CTS

Übernelwie jetzt Steuerung, warte>120 psec.' vor Startflanke Speichere untere Maske

Bytes = > Akku Zeiger auf Datum Einstelle Byte-Zähler auf N-1 Rette eingestellten Byte-Zähler Nachricht nur ein (1) Byte

6500 ACCOUNTING MODULE CAÜ040/11 version 4.

TRANSMIT MESSAGE CTXMES.SRC

1481

LOOP FOR N-

1 DYTES

1482

0 4 AC

97

CTXMLP CLR

C

1103

0 4 AD

A 7

CPL

C

1484

04 AG

1 4

29

CALL

CTX0YT

1485

0 4 DO

96

DO

JNZ

CTXMER

1486

04D2

18

■ INC

R0

1487

0 4 B 3

EA

AC

DJNZ

R2 , CTXMLI

1488

OUTPUT LAST

BYTE

1489

04D5

97

CTXMS7 CLR

C

1490

0406

14

29

. CALL

CTXDYT

14 91

0408

96

DO

JNZ

CTXMER

1492

1493

Û4DA

FE

MOV

A, R6

1494

04 30

39

OIJTL

PI , A

1495

0 4 DC

14

DO

CALL

DEI.300

14 96

04QE

89

22

ORL

PI, Ï22

1497

0 4C0

1 4

D9

CALL

DEL300

1498

04C2

83

RET

14 9 9

RECEIVE FIRST

1 500

Q4C3

D5

CTXCNC SEL

RIU

1501

Û4C4

D4

2C

CALL

CNCRX

1502

Û4C6

84

CD

J M P

CT XCII 2

1 503

PRINTER

57 15-Oct-79 12:47:50

Byteende verhängnisvoller Kommunikat ionsfehler

Ausgabe letztes Byte C = 0 Nachrichtende

Verhängsnisvoller Kommunikationsfehler Nachricht in Ordnung, ausgebe Anerkennungsimpuls (ACK) Maske von Byteroutine Steuerimpuls

Endimpuls

Stelle richtige Ruhezeit sicher Kein Fehler Empfange zuerst

Empfange Nachricht Drucker

ON ON K) •U U

6500 ACCOUNTING MODULE CAÛ04Û/11 TRANSMIT MESSAGE CTXMES.SRC

CTXCNP SEL

3 CALL

S CALL

CTXCN2 SEL

D JMP

FATAL ERROR

l CTXMER JMP

version 4.21.57 15-Oct-79

12:47:50

1 50 4

04C8

D5

1505

04C9

D4

1506

04CB

74

1507

04CD

C5

1508

04 CE

8'4

1 509

1510

0 4 DO

C4

1511

1512

1513

1514

RB1 PRCRX DOSTAT RBO

CTXME1 FATECII

INCLUDE DM0 :CTLECC

SUOTTL

PAGE

Verarbeite jetzt Druckernachricht

Schwerwiegender Fehler

•vj On

Berechne Kontrollsummen-CRC

6500 ACCOUNTING MODULE

COMPUTE CONTROL SUM CRC

1515

1516

1517

1518

1519

1520

1521

CAB 0 4 8/ 1 1

CTLECC.SRC

vers i on 4.21.57

15-OCL-79

12:47:58

1531 1 5 32

1533

1534

Berechne Kontrollsummen-CRC

1522

04D2

B8

6 E

CTLECC MOV

R0 ,

II WORKBP

1523

04D4

B9

2 A

MOV

rl,

1ASCREG

1524

0 4 06

BA

05

MOV

R2 /

1 ASCRSZ

1525

0 4 08

14

65

CALL

BLKMOV

1526

0 4 DA

54

BF

CALL

CTLSUM

1527

0 4DC

BA

05

MOV

R2,

II ASCRSZ

1528

0 4 DE

P4

CF

CALL

CRC

1529

04E0

B8

3C

MOV

R0 ,

II CONECC

1530

04E2

83

RET

INCLUDE DMOiPOSUPD

PAGE

Berechne Kontrollsummen-CRC

Berechne Kontrollsumme

Bringe Maschinen/Steuermarken auf neuen Stand

0\ Os

■U

6500 ACCOUNTING MODULE CAÛ04Û/11 version 4.21.57

UPDATE METER/CONTROL FLAGS POSUPD.SRC

1535

15-Oct-79

12: 47:50

1536

1537 1530

1539

1540 154 1

1542

1543 154 4

Dringe Maschinen-Steuer-Marken auf neuen Stand

Bringe- unzureichende 'Gebührenmittel- und unteren Portogebührenwert in Masch 1 liens ta Lus auf neuen Stand

-OM

Ergebnis nach neuem Stand Unzureichende Gebührenmittel BIT 1= "1", Unzureichende Gebührenmittel

1545

BIT 0 = "1", Entsperrungswert

1546

--M

R0, RI, R2

1547

--M

F0

154 8

1549

Allgemeine IJnterroutine zur I&schung und zum Einladen von Portogebühr in'Arbeitspuffer

1550

0 4 E 3

F 4

EA

POSWRK CALL

CLRWRK Nullsetze Arbeitspuffer

1551

04E5

BÛ

71

MOV

R0, ÏWORKBF + 3

1552

04E7

ß9

30

MOV

RI, IPOSVAL

1.5 5 3

0 4 E9

DA

02

MOV

R 2, IPOSTSZ - 1

| 554

04EB

Fl

MOV

A, @ R1

1555

0 4 EC

30

XCIID

h, @R0 Bewege nur unteren NIBBLE des oberen Portogebührenbytes

1 556

0 4 ED

18

INC

no

6500 ACCOUNTING MODULE CAB04Ü/11 version 4'.21.5/

UPDATE MGTER/CONTROL PLAGS POSUPD.SRC

15-Oct-79

12:47:50

1557

0 4 Eß

1 9

INC

Rl

1 55Q

04EF

1 4

65

CALL

DLKMÛV

1559

0 4 F1

DA

03

MOV

R2, H POSTSZ

1560

04F3

B 3

RET

1561

Dringe. MaschinenstaLus auf neuen Stand und bestimme EntsperrungssLatus

1 562

04F4

94

E 3

POSUPD' CALL

POSWRK

1563

04F6

D9

2 ß

MOV

RI , «DSCREG,

1564

04 FB

1 A

INC

R2

Wiederkehr als Nach-Größe, Denötige

1565

04F9

1 4

6 D

CALL

DECSIJQ

1566

0 4 FD

27

CLR

A

1567

0 4 FC

D 6

FF

J F0

POSDAT

wenn gleich, in Ordnung

1568

0 4 FE

F7

RLC

A

C = INSUFF

1569

0 4 FF

AD

POSDAT MOV

R 3 , A

1570

0500

DO

37

MOV

R0, IOATCNT

1571

0502

BA

03

MOV

R2 , |DATCSZ

1572

0504

FO

POSDA1 MOV

a, e no

1 573

0505

96

OE

JNZ

POSLOW

1574

0507

1 B

INC

R0

1575

0 5 0 Q

EA

04

DJNZ

'R 2, POSDA1

1576

ALL ZERO

1577

050A

23

1 0

MOV

a, « 10

1570

0 5 0C

4 n

ORL

A, R3

1579

0 5 OD

AD

MOV

R3, A

--4 VO

©\ es Kl

6500 ACCOUNTING MODULE CAG040/11 versi.on 4.21.

UPDATE METER/CONTROI, FLAGS POSUPD.SRC

1 580

050E

B9

4C

POSLOW MOV

RI, 1LOWPOS

1581

0510

1 4

99

CALL

LIMTST

1582

0512

03

03

ADD

A, 14-1

1503

0514

AB

MOV

R0, A

1584

0515

B9

28

MOV

Rl, *DSCREGt[

1505

0517

BA

04

MOV

R2, KDSCRS2

1586

0519

1 4

6 D

CALL

DECSUB

1587

0 5 1 B

FB

MOV

A, R3

158 8

0 5 1 C

F 7

RLC

A

1589

051 D

47

S WAP

A

1590

051 E

BO

56

MOV

R0, KMRSTAT

1591

0520

20

XCII

A, @ R0

1592

0521

53

CD

ANL

A, H 0CDII

1593

052 3

40

ORL

A, @R0

159 4

0524

A0

MOV

ö R0 , A

1595

1596

0525

94

12 3

CALL

•POSWRK

1597

0527

B9

4 B

MOV

Rl, ÏUNLOCKU

1598

0529

1 4

6 D

CALL

DECSUB

1599

05 2ß

FB

MOV

A, R 3

1 600

052C

53

0F

ANL

A, HOF

1 601

052E

F7

RLC

A

1602

052F

0 3

RET

-Oct-79 12:47:50

C = 0 keine Warnung, C = 1 Warnung

Bestimme Entsperr-Status

6500 ACCOUNTING MODULE CAB04Û/11 version 4.21.57 15-Oct-79 12:47:50 UPDATE METER/CONTROL FLAGS POSUPD.SRC

1603

1 6 04 INCLUDE DM0 :FMT

1 605 Uinwandlungsroutine um variables Formal: auf Maschineneinheiten zu übertragen

1 606 PACii

On On K)

OJ U.

6500 ACCOUNTING MODULE CA0O48/11 version 4.21.57 15-Oct-79 12:47:50

CONVERSION ROUTINE TO TAKE VARIABLE FORMAT TO METER UNITS FMTIN.SRC

1607 1600

1609 Verwandle in Maschineneinheiten

1610

1611

1612

1613 Ergreift ein Datenpaket und führt Anpassung der angenommenen Dezimalstelle zur Uberein-

1614 stiwnung mit Maschineneinheiten aus. Das Paket besteht aus einem Formatbyte (Hoher

1615 NTBBIJ2 = Anz. der Ziffern, niedriger NIBBLE = Anz. der Dezimalen) und N Cötenbytes.

1616

1617 1OM A = Bei Anruf, Konversion Spez. Endformat oo

1618 = bei Aussprung, Startadresse der umgewandelten Daten to

1619 1-- ri = Eingabepaketadresse

1620 —M R0, R2

1621

1622 0530 2 4 7 6 FMTERR JMP .SOFTER

1623

1 6 24 05 3 2 AD FMTCII MOV R5, A Rette SPEC

1 625 053 3 5 3 0F A(IL A, IIÛF Extrahiere tatsächliche Maschinen-Dezima 1 ste 11 en

1 626 0535 2 D XCII A, R5 Rette

1627 0536 DD XRL A, R5 Maske auf Anz. Ziffern

16 2 8 0537 47 SWAP A

1629 05 3 8 AC MOV R4 , A Rette

65ÛÛ ACCOUNTING MODULE CAÖ040/ 1 1 ve r s i on 4 . 21 . 5 7 15-Oct-79 1 2:47:50

CONVERSION ROUTINE TO TAKE VARIABLE FORMAT TO METER UNITS FMTIN.SRC

1630

0539

27

CLR

A

163 1

05 3 A

3 1

XCIID

A, @ R 1

Lade unteren NIBBLE, keine Anz.-Dez imalstellen

1632

0 5 3 B

97

CLR

C

Berechne zu addierende angehängte Nullen

1633

053C

A 7

CPL

C

1634

0 5 3 D

1 7

INC

A

Prüfe ab Fehleinstellung in Gebrauch

1635

0 5 3 E

C6

4 1

JZ

FMTCII1

Zweierkomplement von 0 ist 0

1636

0540

07

. DEC

A

Wiederherstelle A

1637

054 1

37

FMTCII1 CPL

A

1630

054 2

7D

ADDC

A, R5

1639

054 3

E6

30

JNC

FMTERR

Übertrag sollte gesetzt sein

Î 640

05 4 5

AD

MOV

R5, A

1641

0546

Fl

MOV

A, @R1

1642

054 7

47

SWAP

A

1643

0540

C6

30

J 2

FMTERR

Nullziffern nicht erlaubt

1644

05 4 A

A E

MOV

R6 , A

1645

0 5 4 ß

6D

ADD

A, R5

Berechne Anzahl zu addierende vorangestellter

Nu 11 en

1646

054C

A7

CPL

C

1647

0 5 4 D

37

CPL

A

1640

0 5 4 E

7C

ADDC

A, R4

1649

0 5 4 F

E 6

30

JNC

FMTERR

1'6 50

0551

AF

MOV

R7, A '

1 651

0552

1 9

INC

Rl

Anpasse Zeiger auf Daten

6500 ACCOUNTING MODU!,E CA0040/11 version 4.21.57 15-Oct-79 .12:47:50

CONVERSION ROUTINE TO TAKE VARIABLE FORMAT TO METER UNITS FMTIN.SRC

1 652 Zur Berechnung der Niuniner des vorderen Null-Bytes bewege die Gleichung wie folgt:

165 3 BASIC BQ(J (Ixsad Digits + 1 (Round) + 1 if shift needed - 1 if ODD Num of Dig in) all Div by2

1654

FIRST MOD

(LEAD DIG +1

if eveh DIG ub + 1 shift) ali DIV by 2

1655

FINAL (LEAD DIG + 1 IF

(DIG in + 1 ) ODD + 1 if shift

1656

0553

FD

MOV

Ai R5

Lade Zähler für nachgestellte Nullen

1657

0554

67

RRC

A

Speichere ungerade/gerade in Übertragungsbit

165B

0555

F4

EA

CALL

CLRWRK

Nullsetze Arbeitspuffer

1659

0557

7P

ADDC

A, R7

Vordere Stellen + verschieben oder nicht verschieben

1660

0550

2E

XCII

A, R6

1661

0559

17

INC

A

+ 1 für Rundung

1662

0 5 5 A

67

RRC

A

Dividiere durch 2

1663

055B

AA

MOV

R2, A

Rette Bytezähler in

1664

055C

27

CLR

A

1665

0550

7E

ADDC

A, R6

1666

0 5 5 E

67

RRC

A

1667

055F

03

6 E

ADD •

A, HWORKBF

Bewege Zeiger auf Ende der vorangestellten Nullen

1660

0561

Afl

MOV

RO, A

16 69

Bewege von REG BUFF um zu arbeiten und mache Stellen 0-9 fällig

1670

0562

Fl

FMTCII2 MOV

A, @R1

1*6 71

0563

A0

MOV

0RO, A

1672

VALI DATE

1673

0564

03

60

ADD

A, 160

1674

0566

F6

30

JC

FMTERR

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-79 12:47:58

CONVERSION ROUTINE

TO

TAKE VARIABLE

FORMAT TO ME'

PER UNITS FMTIN.SRC

1675

0560

47

SWAP

A

1676

0569

03

60

AOO

A, 160

1677

0560

F 6

30

JC

'FMTERR

.

1670

0561)

1 0

INC

R0

1679

056E

1 9

INC

Rl

1600

0 5 6F

EA

6 2

DJNZ

R2 , FMTCII 2

1601

057 1

FC

MOV

A, R 4

Lade Byte-Zählung in R2

1602

05 72

1 7

INC

A

Round

1 603

0573

67

RRC

A

Teile durch 2

1604

0574

AA

MOV

R2 # A

1605

0575

20

XCII

A, R5

Lade hintere Noll-Zählung

1606

0576

67

RRC

A

Bewege ungeradzahlig/geradzahlig in

1607

0577

23

6E

MOV

A, IWORKBP

Zeige auf Beginn der Daten

' 1600

0579

E 6

70

JNC

FMTCII 3

Wenn geradzahlig keine Verschiebung

1609

057B

D 4

02

CALL

FMTNB2

1690

057D

20

FMTCII3 XCII

A, R5

1691

057E

AA

MOV

R2, A

1692

057F

FD

MOV

A, R5

1693

0500

A9

• MOV

RI , A

1694

0501

03

RET

1695

1696

SUBTTL Bewege

Datenfolge N NIBBLES nach links

1697

PAGß

6500 ACCOUNTING MODULE CAQ04Û/11 version 4.21.57 15-OCL-79 12:47:50

MOVE STRING LE FT N NIBBLES FMTIN.SRC

1 690

1699

1 700

Bewege Datenfolge

N NTBBLES nach links

1701

1 702

1703

1 704

IOM

A «

Pufferadresse, Eingabe und Ausgabe

1705

1 --

RO

Zeiger von

1706

1--

Rl

Ziel2eiger

1707

1 —

R2

Anzahl zu verschiebender Bytes

1 700

- - M

R7

1709

1710

ODD COUNT

SET UP

1711

0582

A 9

FMTN0 2 MOV

RI , A

1712

0 5 Û 3

AO

MOV

RO, A

1713

0584

AF

MOV

R7 , a

Rette Pufferadressenzeiger

1714

0505

1 8

I NC •

RO

1715

0586

27

CLR

A

1716

0 5 û 7

3 1

XCIID

a , @ R 1

Vertausche erstes Byte

1717

05 Q 8

47

SWAP

A

Bewege NIBB um 1 NIBB nach links

1718

0509

Al

MOV

@ R1 , a

Speichere

1719

MOVE LOOP

Bewegungsschleife

1 720

0 5 BA

FO

PMTUfi1 MOV

a, eno

Lade 1 Byte

6500 ACCOUNTING MODULE CA8048/11 version 4.21 MOVE STRING LEFT N NIBBLES FMTIN.SRC

1721

058B

47

SWAP

A

1722

058C

31

XCIID

A , @ R1

1723

058D

A0

MOV

@ R0 , A

1724

058E

18

INC

R0

1725

058F

1 9

INC

Rl

1726

0590

EA 8 A

DJNZ

R2, FMTNB1

1727

0592

FF

MOV

A , R7

1728

0593

83

RET

1729

1730 INCLUDE DMÛ:CRXBYT

1731 SUBTTL 17 32 PAGE

57 15-Oct-7 9 1 2:47:50

Bewege unteren NIBBLE nach links

Bewege oberen NIBB zu unterem NIBB der nächsten Adresse

Rette Zwischenergebnis

Fahre fort, bis alle NIBBLES bewegt R1 hat Pufferadresse

Empfange 1 Byte

6500

rece

ACCOUNTING MODULE CA0O4O/11 VE ONE BYTE CRXnYT.SRC -733

version <1.21.57 15-Oct-79 12:47.-50

734

735

736

737 730

739

740

741

742

Empfange Byte und führe Echo aus

Empfange 10 Dits (1 Start- + Û Daten- + 1 Stopp-) und führe Echo aus. Jedes Bit wird 6^0 Zyklen ab Vorderflanke abgetastet und innerhalb 20 jisec. nach Abtastung «um Sender rückübertragen.

743

1 --

R0

Adresse von DAtenbyte

744

1 --

R7

Maske für unteren Ausgang

745

--M

R5| R

746

-0M

C

Wert von Stopp-Bit

747

740

0594

BE

0A

CRXBYT

MOV

R6 , 110

Setze Schleifenzählerwert für 10 Bits

749

0596

76

9C

J F1

CRXPEC

Suche nach Drucker-Startflanke

750

0590

26

90

CRXCWT

JMT0

CRXCWT

Warte auf Steuer-Startflanke

751

059A

A4

Aß

JMP

CRXBYL,

Fahre fort Steuererfassung

752

753

059C

4 6

9C

CRXPED

JNT1

CRXPED

Warte auf Drucker-Startflanke

754

059E

A4

AO

JMP

CRXBYL

Zei tausgleich

755

Ilaupt-Abtastschleife

756

05A0

BD

04

CRXßLO

MOV

R5, 14

Schaffe richtige Verzögerung um 104 jjsec

6500 ACCOUNTING MODULE CAO 0 4 fi / 1 1 version 4.21.57 15-Oct-79 1 2 : 4 7:58 Il EC El VE ONE BYTE CRXBYT.SRC

1 757

0 5 A 2

ED

A2

CRXBLl

DJNZ

R5, CRXBLl

Warte

1758

0 5 A 4

FO

MOV

A, 0 RO

Lade erlangte Daten in Akku

1759

0 5 A 5

6 7

RRC

A

Schiebe Bit in Daten

1760

05A6

AO

MOV

0 RO , A

Speichere erlangte Daten

1761

05A7

00

NOP

1762

05A8

97

CRXBYL

CLR

C

1763

05A9

A 7

CPL

C

Einstelle auf logische "1"

1 764

0 5 A A

76

B 4

J P1

CRXBL3

Drucker

1 765

CONTROL

1766

05AC

26

B6

JNTO

CRXBL4

Steuereinheit-empfangene logisehe

1 767

RECEIVED LOGIC "0"

176 8

05AE

A 7

CRXBL2

CPL

C

1769

05AF

09

22

ORL

PI, 122

Echo hoch

1770

0501

EE

ao

DJNZ

R6, CRXBLO

1771

05 Q 3

03

RET

1772

1 773

05Q4

56

A'E

CRXBL3

JT1

CRXBL2

Druckerempfangene logische "0"

1774

RECE1VED LOGIC "0"

1775

05B6

FF

CRXBL4

MOV

A, R7

1776

05B7

39

OUTL

PI , A

Echo niedrig

1777

05B8

EE

AO

DJNZ

R6 , CRXBLO

1 778

05BA

03

RET

1779

1780

INCLUDE DM0 ;ENABLE

1781

suivm,

Gib Maschine frei

1782

PAGE

6500 ACCOUNTING MODULE CA0A40/11 version 4.21.57 15-Oct-79 12:47:50

ENAD LE METER ENABLE.SRC

1 783

1

1 704

1705

Setze

Maschine betriebsbereit

1 786

1707

1 700

1 709

Wenn Maschine außer De t r i ebsberei tscha f t gesetzt, dann setze

Maschine betriebs-

1 790

bereit und verifiziere die Antwort des Druckers, andernfalls tue nichts.

1791

1792

Prüfe of Maschine be tr iebsberei t

1 793

0 5 DD

1 4

60

ENADLE CALL

STCIIK 1

Prüfe Zustand

1794

0 5 DD

96

DD

JIIZ

ENARET

kann nicht in Betrieb setzen

1795

Prüfe

Maschinen-Status wenn erlaube

1796

05BF

Fl

MOV

A, 0R1

1797

05C0

53

64

ANL

A, 1064

DATER, TNSUF, ENABLED

1 790

05C2

96

J)D

JNZ

ENARET

1 799

NOW TRY TO

ENAßLE

1000

05C4

94

1 2

CALL

STU6 AM

1 001

05C6

99

FD

AN Ii pi, 8 aprii

ENABLE ACC HALF

1.8 0 2

Û5C8

23

4 1

ENABL1 MOV

A, I ENDLUD

SEND ENABLE COMMAND TO PR

1 803

05CA

1 4

94

CALL

GETSTS

SEND CMD, REC STATUS AND PROCESS

1 004

05CC

37

CPL

A

PR STATUS RETURNED IN ACC

1 005

05CD

52

ca

JB2

l'NABLl

Wenn nicht freigegeben, schau weiter bis Sperrzeit

6500 ACCOUMTIMG MODULE CA0040/11

Version 4.21.57 15-Oct-79 12:47:58

ENADLE METER

ENABLE.

SRC

1006

05CF

Dil

OC

• ENARRT

MOV

R3 , 1140

1 807

0 5 D 1

1 4

no

ENABL2

CALL

DEL300

1 8 0 8

05D3

56

D7

JT1

ENAnL3

1 809

05D5

1 4

80

CALL

RECSTS

1010

05D7

En

Dl

ENAIÌL3

DJNZ

R3, ENADL2

18 11

05D9

94

81

CALL

TIMSTP

1012

0 5 DD

83

ENARET

RET

1013

1814

INCLUDE DM0iSETINT

10 15

SUBTTI.

, Einstelle

. 1816

PAGE

Einstelle Portogebühr für Druckvorgang

6500 ACCOUNT I MG MODULE CA004Û/11

SET POSTAGE POR PRINT ING SETINT.SRC

version 4.21.57 15-Oct~79 12:47:50

1817

1

1018

1819

S Leila Por togebi.lhr auf den Druckrüdern ein

1820

1821

1822

18 21

— M

R0 # Rl

1824

1825

05DC

24

76

SETERR

JMP

SOFTER

1826

1827

05DE

D9

' 4 E

SETINT

MOV

RI, ÏSETLIM

1028

05EÛ

1 4

99

CALL

LIMTST

1029

05E2

00

03

ADD

A, 1(3

Zeiger auf letztes Byte

1830

0 5 E 4

Aß

MOV

RO , A

183 1

05E5

D 9

7 D

MOV

R 1 , ICMBOBF

Letztes Byte von Portogebührenwert

1032

05E7

1 4

6D

CALL

DECSUB

1833

0 5 E 9

E 6

DC

JNC

SETERR

Wert ) Grenze = Fehler

1834

05Eß

54

E7

CALL

LSTATE

1035

05ED

53

0F

AML

A, HOP

Maske außer Betriebsetzungsnarke heraus

1836

0 5 EP

96

DC

JNZ

SETERR

zur Portogebühreneinstellung muß Normalzustand !

1037

0 5 F 1

54

D 3

CALL

DISABL

1030

0 5 F 3

13 9

7B

MOV

Rl , KCMBOnP

1 0.3 9

05P5

PI

MOV

A, @ R1

1040

05P6

43

no

ORL

h, |J 0 0

Unbekannte Einstellung

6 5 00 ACCQUMTIMG MODULE CA004 8/11

SET POSTAGE FOR PRI NT!MG SGTINT.SRC

version 4.21.57 15-Oct-79

12:47:58

184 1

0 5 P 0

Al

MOV

@ru, A

184 2

05P9

DA

03

MOV

R2, 13

104 3

05FD

' no

30

MOV

RO, 1 POSVAL

1844

0 5PD

14

65

CALL

PLKMOV

1845

0 5FP

23

64

MOV

o o <

1046

060 1

94

1 9

CALL

STR20M

1047

0603

no

0 3'

MOV

eno, n

1 fl 4 Q

0605

no

7 A

MOV

R0 , . |CMflOnP-l

104 9

0607

no

CI

MOV

0R0 , K SPOSIID

1050

0609

CO

DEC

R0

10 5 1

060A

no

04 '

MOV

@R0, 14

1852

0 6 OC

1 4

OA

CALL

GETD0

1053

06QE

PO

SET IMO

MOV

A, @ RO

1 854

0 6 0 F

D3

0 1

XRL

A, H POSVNB

1855

06 1 1

C6

1 7

J'i

SET INI

1.8 5 6

0613

74

) 6

CALL

DOSTAT

1857

0615

C 4

24

JMP

SET IN2

1058

06 1 7

94

0 1

SETI MI

CALL

TIMSTP

1859

0619

F 4

P5

CALL

CLRAMT

1860

06 1D

D 9

5C

MOV

Rl, IRECBFL

1861

06 1 D

Al

MOV

@ R1 , A

1062

061 E

no

30

MOV

R0, 1POSVAL

1863

06 20

30

xeno

A, @R0

100 Zählungen * 2(1 MS pro Zählung

Zeige an, geseLzLe Gebühr ist Zeituhr abgestimmt

Header ist ein Erwarteter

6500 ACCOUNTIMG HODUI.E CA0040/11 version 4.21.57 15-Oct-79 1 2 : 47:58 SET POSTAGE FOR PRIMTIM SET INT.SRC

18 6 4

0621

2 0

XCII

A, @R0

Lüsche Marke "Unbekannte Einstellung"

1065

06 22

24

7C

/JMP

EN BLE

Lüsche Außerbetriebsetzungsbit

1 066

0624

D4

20

SETIN2 CALL

PRCRX

Empfange Druckernachricht

1067

0626

C 4

0E

JMP

SET I NO

10 6 8

1069

INCLUDE DMOiCRXMEJ

1870

SUBTTL

1

Empfange Nachricht

1071

PAGE

65Û0 ACCOUNTING MODULE CA0O4O/11 RECEIVE MESSAGE CRXMES.SRC

version 4.21.57 l5-Oct-79

12:47:50

1072

1073

'

1074

Bnpfange Nachricht

1075

1876

1077

1070

Empfange Machriclìt von N Bytes von Drucker oder s t.euereinheit

1079

'

1800

--m r0, ri, r4

- r7, p1, c

1001

10 0 2

0620

a 5

prcrx clr fl

1 8 q 3

0629

B 5

cpl fl

F1 = für Drucker

1004

0 6 2 a c 4

2 D

jmp crxmes

1005

1006

062c a 5

cncrx clr

. fl

1007

0 6 2 D

B 0

5 e crxmës mov ro) hrecbu f

1008

062f

B9

5c

mov ri, irecbfl

1009

063 1

27

clr a

1090

063 2

21

xcii a, ein

Marke auf Nul.1 und stelle sicher, daß

1091

06 3 3

96

6 1

jnz patecii

1092

0635

76

3 D

j pi crxms1

Drucker

1093

control

1894

06 3 7

DC

on

mov

R4 / in

Bytegrenze für Steuernachricht

VO

Ui

ON ts> ■U

3eî

6500 ACCOUNT I MG module CAG040/11 version 4

RECEIVE MESSAGE CRXMES.SRC

1 095

0639

36

39

CRXMS0

JT0

CRXMS0

1096

0 6 3 n

C 4

4 1

JMP

CRXMS2

1097

PRINTER

1090

0 6 3 D

56

3D

CRXMS1

JT1

CRXMS1

1099

06 3 F

BC

0 4

MOV

R4 , 14

1900

1901

064 1

54

F 6

CRXMS 2

CALL

TMRTST

1902

RESPOND WlTIl CTS

1903

064 3

74

F 2

CALL

LOWSET

190 4

0645

AF

MOV

R7, A

1905

064 6

39

OUTL

PI , A

1 906

RECEIVE LOOP

1907

064 7

B 4

04

CRXMLP

CALL

CRXBYT

1 900

06 4 9

1 1

INC

@ R 1

1909

0 6 4 A '

1 0

INC

R0

1910

0 6 4 B

E6

51

JNC •

CRXFIN

1911

0 6 4 D

EC

4 7

DJNZ

R4,CRXMLP

1912

064 F

C 4

60

JNP

CRXFAT

1913

1-914

0651

1 4

BO

CRXFIN

CALL

DEL300

1915

0653

27

CLR

A

1916

Û654

76

5D

J F1

CRXFnl

1917

CONTROL

21.57 15-Oc t -7 9 1 2:47:50

El-fasse , Steuer-RTS

Drucker-nybegrenze

Stelle sicher, daß Zeitgeber hat > 4 Millisek. bis Unterbrechung gebe CTS

Empfange 1 Byte Erhöhe Bytezähler Erhühe Adressenzeiger Nachricht empfangen Empfange weiteres Byte

Drucker

6500 ACCOUNT I HG MODULE CA004Ü/11 version 4.21.57 15-Oct-79 12:47:50 RECEIVE MESSAGE CRXMES.SRC

1918

0656

36

60

JTO

CRXFAT

19 19

0650

BO

FF

CRXMRT:

MOV

ßRO, KOPF

Einsetze Marke fiir ungültige Daten nach letztem

1920

0 6 5 A

00

5 È

MOV

RO, iRECnUF

1921

065C

0 3

RET

1922

1923

065D

AI

CRXFN1

MOV

@R 1 , A

Lösche Marke

1924

0 65E

46

50

JNTl

CRXMRT

1925

1926

0660

AI

CRX FAT

MOV

@ R1 , Â

Empfangsmarke auf Null

1927

066 1

BF

06

FATECI!

MOV

R7 , I ECIIFAT

1920

0663

04

33

JMP

FATERR

1929

1930

INCLUDE DMO.-DSCCRC

1931

SUBTTI

I

Berechne CRC für abfallendes Register

1932

PAGE

6 500 ACCOUNTING MODULE CAßO<in/ll COMPUTE CRC FOR DESCENDING REGISTER

1933

1934

1935

1936

1937 1 9 3 Q

version 4.21.57 DSCCRC.SRC

15-Oc t-7 9

12:47:58

1944

1945

1946

1947

Berechne CRC für abfallendes Register

1939

0665

no

25

DSCCRC MOV

RO ,

»DSCREG

1940

0667

ßA

04

MOV

R2,

IDSCRSZ

194 1

0669

F 4

CF

CALL

CRC

1942

0 6 6 ß

ßO

24

MOV

RO,

KDSCECC

194 3

066D

û 3

RET

INCLUDE DM0 i RSTCOM

SUBTTL

PAGE

Zentraler Neueinstellkode

6500 ACCOUNTING MODULE CAn04Û/l'l version 4.21.57 15-Oct-79 12:47:50 COMMON RESET CODE RSTCOM.SRC

1 940

194 9

1950

Zen tira 1er Neue ina te 1 Ikode

1951

1952

1953

1954

Zentraler Neueins tellkode

1 955

1956

0 6 6 E

F 4

F5

RSTCOM CALL CLRAMT

1957

06 70

Ü0

4 1

MOV R0, If RS TCNT

1950

06 7 2

93

RETR

1959

1960

INCLUDE DM0 :NVMSTP

1 96 1

SUBTTL NVM

1962

PAGE

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79

NVM SETUP PAGE AND BASE ADDRESS SUBROUTINE NVMSTP.SRC

12:47:50

1963

1964

*

1965

NVM

( 1 eistungsunabhüngiger Speicher)

Seiten- und Basisadressen-Erstellungsroutine

1966

1967

1968

1969

Anfangssetzung von

P2 auf NMQS-Seite und R5 auf M-lOS-Adresse für

1970

lauferden Block des

3ei.stungsunabhclngi.gen Speichers (NVM)

1971

1 972

-OM

R5 = NMOS

NMOS-Ad resse

1 973

— M

RI , R7

1974

-OM

P2 = BITS 4

-5 sind NMOS-Seite

1975

1__

NVMBLK =

gegenwärtiger Block des NVM

1976

1977

0673

B 9

5 A

NVMSTP MOV

RI, 1NVMBLK

Erhalte Speicherplatznummer

1970

0675

Fl

MOV

A,@R1

1 979

0676

47

NVMST1 SWAP

A

Bewege zum oberen NIBBLE

1980

0677

AD

MOV

R5 , A

Zwischenspeicherung von Platznummer

1981

0678

53

CO

ANL

A, H0C01I

Verwende Bis 6-7 für Basisadresse

1982

0 6 7 A

2D

XCII

A , R5

Rette Basisadresse und aufsuche Platznuimer

1903

067B

53

30

ANL

A, II 3011

Verwende Bit 4-5 für Seite (PAGE)

1984

067D

AF

MOV

R7 , A

Zeitweilige Zwischenspeicherung der Seite

1985

0 6 7 E

53

1 0

ANL

A, ï 1011

SKEW Start-Adresse

6500 ACCOUMTIllG MODULE CAn040/ll version 4.21.57 15-Oct-79 12:47:58 MVM SETUP PAGE AMD BASE ADDRESS SUBROUTIMB NVMSTP.SRC

1906

0600

77

RR

A

1907

060 1

11'

HR

A

1900

06 0 2

4D

ORL

A, R5

1909

060 3

AD

MOV

R5 , A

1.9 90

0604

0A

IM

A, P2

Erhalte laufende Daten von Port 2 (Tor 2)

199 1

•0605

5 3 CP

AML

A, Ì0CPII

Abstreife Seite

1992

0607

4P

ORL

A, R7

Einsetze neue Seite'

1993

0600

3 A

OU TI.

P 2 , A

Ausgabe nach PORT 2

1994

0609

03

RET

1995

199 6

INCLUDE DM0 : NVMB'

1997

SUBTTL

NVM Byte-Les e/Lösche/Schreib- Un ter rou t in e

1990

PAGE

6500 ACCOUNTING MODULE CAQ040/11 version 4.21.57 15-Oct-79 12:47:50

NVM BYTE READ/ERASE/WRITE SUBROUTINE NVMBYT.SRC

1999

2000

2001 NVM By te-Lese/Lcische/Schreib-Un terrou tina

2002

2003

2004

2005 Lese/I^sahe/Sehreibe zwei, aufe.inanderfolgende NIBBLES des tMOS, vergleiche die Daten

2006 mit den erwarteten Daten und delìne CRC-lìerechnung auf diese NIBBLES aus

2007

'2008 IOM A * Bei Aufruf, doppelter OPP-Kode

2009 ßei. Auqsprung, Vergleichsergebnisse

2010

1--

R0

Adresse von Daten oder Speicher

201 1

I OM

R 3

Mich tilbereins timmungszäh 1er

201 2

I OM

R 4

CRC-Wert

2013

I OM

33

1!

MMOS-Adresse

201 4

— M

Rl, R6, R7 ,

F0 F1

2015

— M •

WORKBF + 7

201 6

2017

SETUP

READ

OPP CODE

2018

0 6 8 A

23

44

MVMBYR

MOV

A, »4411

Doppeltes Lesen OPP-Kode

2019

068C

C 4

90

JMP

NVMBYT

2020

SETUP

WRITE

OPP CO

2021

06 OE

23

1 1

NVMBYW

MOV

A, I 1 III

Doppeltes Schreiben OPP-Kode

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-79 1 2 : 4 7 ; 50

NVM BYTE

READ/ERASE/WRITE SUBROUTINE

NVMBYT .'SRC

2022

Rette Daten zur

Verwendung bei Verifikation

2023

0690

20

HVMIÌYT XCII

A , @ R0

einlagere Daten in den Akku

2024

069 1

[39

75

MOV

R1 , K ( WO R K B P > 7) und. rette fiir Vergleich

2025

069 3

Al

MOV

@ R1 , A

■

2026

Lese/Lösche

/Schreibe

1 Byte

2027

0694

30

XCIID

A , SRO

Aufsetze OPP-Kode urei Daten für obere NIBBLE-Operation

2020

0695

47

S WAP

A

2029

0696

04

A5

CALL

NVMN1B

Ausführe obere NIBBLE-Operation

20 30

0690

47

S WAP

A

Rette Eirjebnis der oberen NIBBLE-Operation, aufsetze für

20 3 1

0699

20

XCII

A, @R0

untere NIBBLE-Operation

203 2

0 6 9 A

D 4

A 5

CALL

NVMNIB

Ausführe untere NIBBLE-Operation

203 3

069C

30

XCIID

A, @ RO

Rette Ergebnis der unteren NIBBLE-Operation

2034

Wiedergebe

Verifika tion

2035

069D

PO

MQV

A, @R0

Erhalte Ergebnisse

2036

0 6 9 E

n 9

75

MOV

Rl , If (WORKBP + 7; und vergleiche mit erwarteten Daten

203 7

06A0

D1

XRL

A , @ R1

2038

06A1

C 6

A4

JZ

NVM610

sind sie gleich?

•J<) 1 y

Ol» A 1

1 1)

1 NC

IU

Nui n, üchaltu 'ZMIiler weiter

2040

06A4

Ü 3

NVM610 RET

NVM NIBBLE-Lese/Lösche/Schreib-Unterroutine

204 1

2042

INCLUDE DMOiNVMNlß

2043

SUBTTI

L

NVM NIBBLE-Lese/Lösche/Schreib-Unterroutine

2044

PAGE

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79 12:47:58

NVM NIBBLE READ/ERASE/WRITE SUBROUTINE NVMNIB.SRC

204 5

204 6

204 7 NVM NIBBLE-Lese/Lüsphe/Schreibe-Unterroutine

2048

2049

2050

2051 Lese/Lösche/Schreibe 1 NIBBLE des NMOS und dehne

2052 CRC-Berechnung auf diesen NIBBLE aus

2053

2054 IOM A = Bei Anruf, Hoher NIBBLE = OPP Kode

2055 10 = Schreibe

2056 30 = Lüsche

205 7 40 = Lese

205 8 C0 = DE-SELECTED (INTERNAL ONLY)

. 2059 Niedriger NIBBLE = zu schreibende Daten

2°60 = ßei Aussprung, Hoher NIBBLE = Undefiniert

2061 Niedriger NIBBLE = Datenlesen

2062 IOM R4 = CRC-Wert

2063 IOM R5 = bei Anruf, Adresse des NMOS-NIBBLE

2064 bei Aussprung, Adresse + 1

2065 —Irt Rl# 116/ R7/ 1?0, PI

2066

206 7 Ausgangsi.nfo für Datensparren und gesetzte Marken für Lesen und schreiben

6500 ACCOUNTING MODULE CA0O4O/11 version 4.21.57 15-Oct-79 12:47:58

NVM NIBBLE READ/ERASE/WRITE SUBROUTINE NVMNIB.SRC

2060

0 6 A 5

B 9

01

NVMNIB

MOV

Rl , II

Setze 8755 Adresse für Datenreg.-PB

2069

06A7

2D

XCII

A, R5

Auslagere Akku und R5 auf Ausgabendresse

2070

06AÛ

91

MOVX

ê R1 , A

Setze MNOS-Adresse in 8755 PIA PB

207 1

06A9

2 0

XCII

A , R5

Bringe Daten und OPP-Kode in Akku zurück

2072

06AA

C 9

OEC

Rl

Setze 0755 Adresse auf PA

2073

0 6 AB

91

MOVX

0R1 , A

Bewege OPP-Kode und DAten auf 8755 PA

2074

06AC

A5

CLR

Fl

2075

06 AD

F 7

RLC

A

Prüfe auf Lesen und Schreiben der OPP-Kodes und setze

2076

0 6 A E

F 7

RLC

A

appropriate Flags geeignete Marken

2077

06AF

F7

RLC

A

2070

06B0

05

CLR

PO

Bereite F0 Bit ziun Schreiben OPP-Kode

2079

0 6 B L

E6

B 4

JNC

NVM710

BElasse F0 = 0 wenn nicht löschen

2080

0 6 B 3

95

CPL

F0

Setze F(2f wenn löschen

2001

06B4

67

NVM710

RRC

A

Rotiere Lese-Bit zurück zu Ubertrags-Bit

2082

Setze Ö755 Da tenrichtungs-Regis ter (DDR)

2003

06B5

B 9

03

NVM715

MOV

Rl , 113

Setze 0755 Adresse für DDR PB

2004

06B7

23

FF

MOV

A, II0PFII

Lade Ausgabemaske in Akku

2005

06B9

91

MOVX

@ R 1 , A

Setze 8755 PB auf Ausgabe

2006

Setze 8755 PA DDR für Ausgabe auf hohem NIBBLE und ein oder aus auf niedrigem fJIBBIJS

2007

0 6 BA

E6

BE

JNC

NVM720

Wenn nicht gelesen, Daten aus dieser Maske heraus

2000

06BC

23

FO

MOV

A, Il 0F0II

Setze Maske für Dateneingabe

2009

06BE

C9

NVM720

OEC

Rl

0755 Adressse für PA DDR

2090

06BF

91

MOVX

@ R 1 , A

Setze 8755 PA DDR

6500 ACCOUNTING MODULE CA0O40/11 version 4.21.57 15-Oct-79 12:47:56

NVM NIBBLE HEAD/EHASE. WRITE SUUROUTINE NVMN.SRC

209 1

MMOG ."jetzt a ktiv und angewählt

2092

06C0

09

00

NVM7 3 0

MOV

ni, »0

0755-Adresse gesetzt fiir Lesen von NIBBLE

2093

06C2

0 1

MOVX

A , 0 R1

Lese Steuerung und Daten in Akku

2094

üiip ist bereits desaktiviert, rücksetze Steuerleitungen auf deaktivierten Zustand

209 5

06C3

4 3

CO

ORL

A, I0C0II

Uberschreibe OPP-Kode, stelle sicher, daß CHIP nicht angewählt

2096

06C5

9 1

MOVX

0 R 1 , A

„ .... . . werden kan Desaktiviere MNOS-Spexcher

2097

06C6

76

CO

J F1

NVM7 3 5

2090

06CB

AB

MOV

R6 , A

2099

06C9

47

SWAP

A

2100

06CA

F 4

OB

CALL

CRCNIB

2101

06CC

FE

MOV

A , R6

2102

06CD

F6

E3

NVM7 3 5

•JC

NVM7 5 0

Wenn Lesen, fertig

2103

Aufsetze Verzögerunga wert für Schreiben oder Löschen

2104

06CP

BE

31

MOV

R6, 149

Setze Fehlverzögerung für 10 msec.

2105

0 6 D1

B 6

05

JFO

NVM740

2106

06D3

BE

04

MOV

R6 , 14

Andere auf Schreiben 1 msec.

2107

0605

BF

17

NVM74 0

MOV

R7 ,12 3

2100

0607

EF

D7

NVM7 4 5

DJNZ

R7,NVM7 4 5

2109

0609

EE

05

OJMZ

R6,NVM7 4 0

2110

Ausgebe

Schei niesen zur Beendigung von Lösch- oder Schreibbefehl

2111

oson

23

40

MOV

A , # 4011

Ausgebe Scheinlesen

2112

0600

91

MOVX

0 R 1 , A

Ausgebe Lese-OPP-Kode

21 1 3

060E

01

MOVX

A, 0R1

Scheinlesen

2114

Lese jetzt zum Verifizieren

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oct-79 12:47:58

NVM NIBBLE READ/ERASE/WRITE SUßROUTINE NVMN.SRC

2115

0 601?

A 7

CPL

C Setze Uber tragungsbit zur CHIP-Außerbetriebsetzung

2116

06E0

B 5

CPL

Fl

2117

0 6 E1

C 4

ns

JMP

NVM715

2110

SETUP

FOR 1

NEXT NinnLE Aufsetze für nächsten NIBBLE

2119

06E3

AE

NVM750

MOV

R6 , A

2120

06E4

1D

INC

' R5

2121

06E5

1 D

INC

R5

2122

06E6

FD

MOV

A , R5

2123

06E7

53

ÛF

ANL

A / I 0 Fil

2124

0 6 E9

C 6

FO

JZ

NVM7 60

2125

06EB

CD

DI2C

R5

2126

0 6 EC

OA

IN

A , P2

2127

0 6 ED

D3

1 0

XRL

A, » 1 011

212 8

06EF

3 A

OUTL

P2 , A

2129

0 6 PO

FE

NVM7 6 0

MOV

A, R6

2130

0 6 F1

83

RET

2131

2132

2133

0700

ORG

700

2134

INCLUDE DMÛiRAMSTP

2135

SUBTTL RAM-Zeiger- und Zähler-Erstellungsroutine

2136

PAGE

6500 ACCOUNTING MODULE CA0048/11 versi,on 4.21.57 15-Oct-79 1 2:47:50

RAM POINTER AND COUNTER SETUP SUBROUTIME RAMST^.SRC

2137

2138

2139

RAM-Zeiger- und Zähler-Erstellungsunterroutine

2140

2141

2142

2143

Anfangssetzung von RpT auf den Deginn und von RZ

2144

auf die Länge des gegenwärtig aktiven Blocks

2145

2146

-OM

R0 = ADDRESSE des aktiven RAM-Blocks

2147

-OM

R2 = Länge des aktiven Blocks (Bytes)

2140

— M

Rl

2149

1--

ACTBLK =gegenwärtig aktiver Block

21 50

2151

TADLE OF RAM

i POINTERS/ Tabelle der RAM-Zeiger

2152

0700

20

NVMTBL DD

2011 Adresse des aktiven Blocks H $

2153

0701

3 A

DD

3Al 1 Adresse des aktiven Blocks // 1

2154

2155

Aufsetze Zeiger (R0) und Zähler (R2)

2156

0702

09

59

RAMSTP MOV

Rl , S ACTBLK Aufsetze RAM-Pufferzeiger

2157

0704

Fl

MOV

A, @R1

2158

0705

A3

MOV P

A, 0A

2159

0706

AQ

MOV

RO. A

2160

0707

DA

\ A

MOV

R2.Ä1AH Aufsetze Byte-Zähler

6500 ACCOUNTING MODULE RAM POINTER AND COUMTER

21

6

1

2'1

6

2

21

6

3

21

6

4

21

6

5

CAO0 4 0/11 version 4.21.57 15-Oct-79 12:47:58

SETUP SUBROUTINE- RAMSTP.SRC

RET

INCLUDE DM0 :NVMCKG

SUBTTL NVM Zus tandsîinderungs- & nlockeröf f nungsroutinen PAGE

6500 ACCOUNTING MODULE CAQ048/11 version 4.21.57 15-Oct-79 12:47:50 NVM CHANGE STATE L OPEN BLOCK SUBROUTINES NVMCIIG.SRC

2166

2167

2168

NVM ZusLandsänderungsroutine

2169

2170

NVM Blockeröffnungsroutine

2171

2172

2173

2174

Nenn erforderlich, dann schließe gegenwärtig aktiven Block und eröffne neuen

2175

2176

—M

ALIE REGISTER & MARKEN

2177

I OM

ACTBLK = Aktive Blocknummer

2178

I OM

NVMBLK » Blocknummer des NVM

2179

1--

STATE * gegenwärtiger Zustand

2180

— M

WORKBF + 0, +6, +7

2161

2182

Berechne neue'aktive Blocknummern und vergleiche mit laufender

2183

0 7 0 A

54

E 7 NVMCIIG CALL

LSTATE Erhalte Bit 0-2 des Zustands

2184

070C

53

9 7 ANL

A, 10711

2 1 â 5

0 7 OE

C 6

12 J Z

NVM 10 Wenn Bit 0-2 Null sind, dann neue aktive Blocknurmer

2186

0710

23

01 MOV

A, Ä1 sonst, neue aktive Blocknummer = 1

2187

0712

B 9

6 E NVM110 MOV

Rl ,KWORKBF zeitweilige Zwischenspeicherung der neuen aktiven Blocknr,

21 a o

0714

Al

MOV

@R1 , A

6500 ACCOUNTING MODULE CA0O4Q/11 version 4.21.57 15-Oct-79 12:47:58 NVM CHANGE STATE L OPEN BLOCK SUDROUTINES NVMCHG.SRC

2109

0715

B 9

59

MOV

Rl , If ACTBLK

vergleiche mit gegenwärtiger aktiver Blocknummer

2190

0717

Dl

XRL

A, @R1#

2191

0718

C 6

5C

. JZ

NVM150

sind sie gleich?

2192

Schließe gegenwärtigen aktiven Block

2193

07 1 A

1 5

DIS

1

*** Anfang kritischer Bereich H 1 ***

2 194

0 7 1 D

F 4

8E

CALL

NVMWR

Ausschreibe gegenwärtig aktiven Block

2195

0 7 1 D

96

5D

JNZ

NVM190

Schreiben erfolgreich?

2196

0 7 1 F

37

CPL

A

2197

0720

D 9

5 A

MOV

RI , II NVMBLK

Angebe, daß kein Block offen

2190

0722

AI

MOV

@ R 1 , A

2199

0723

05

EN

1

*** Ende kritischer Bereich H 1 ***

2200

0724

B 9

6 E

MOV

Rl,»WORKBF

Aufsuche neue aktive Blocknummer

2201

0726

Fl

MOV

A , 0 R1

2202

Kndere aktive

Blocknr und lokalisiere naie aktive Blocknumrer

2203

! ) 7 i; ?

r.9

5 ?

NVMOPN MOV

RI,KACTDLK

Rette neue aktive Blocknummer

2204

0729

AI

MOV

@R1,A •

2205

07 2A

1 5

DIS

1

*** Anfang kritischer Bereich H 2 ***

2206

07 2D

F 4

B 4

CALL

NVMFND

Finde gegenwärtigen Platz des neuen'aktiven Blocks

2207

072D

C 6

5D

JZ

NVM19 0

Gefunden?

2200

0 7 2 F

05

EN

l

*** Ende kritischer Bereich H 2 ***

2209

0730

ß 9

6 E

MOV

Rl,»WORKBF

Ja, zeitweilige Zwischenspeicherung des gegenwärtigen

2210

07 32

AI

MOV

@R1 , A

2211

Berechne neue Platznummer und lösche sie

6500 ACCOUNTING MODULE CA8O40/11 version 4.21,57 15-Oct-79 12:47:58 NVM CHANGE STATE L OPEN BLOCK SUDROUTINES NVMCHG.SRC

2212

0733

D 9

59

MOV

RI , »ACTDLK

Erhalte neue aktive Blocknr. und zeitweilig zwischenspeichere

2213

07 35

21

XCII

A, @R1

sie

2214

0736

96

40

JNZ

NVM130

Neue aktive Blocknummer = 0 ?

2215

0738

21

XCII

A , @ R1

Wiederherstelle neuen Platz fiir aktiven Block H 0

2216

0739

17

INC

A

Berechne neue Stelle für aktiven Block #0

2217

073A

96

43

JNZ

NVM14 0

2218

073C

1 7

INC

A

2219

0 7 3 D

1 7

INC

a

2220

07 3 E

E4

43

JMP

NVM140

2221

0740

21

NVM13 0

XCII

A, @R1

Wiederherstelle aktive Blockrir. und aufsuche gegenwärtigen Pia ^

2222

074 1

03

01

XRL

a, tro 1II

Berechne peuen Platz für aktiven Block ff 1 ~

2223

074 3

19

NVM14 0

•INC

Rl

Zeiger auf NVMBLK

2224

074 4

31

XCRD

A, 0R1

Rette neüen Platz

2225

07 4 5

F 4

7 A

CALL

NVMER

Löscihe neuen Platz

2226

074 7

96

5E

JNZ

NVM195

Löscihen erfolgreich?

2227

Freigebe . <

gegenwärtigen

Pl^tz

2228

0749

1 5

DIS'

I

•*** Anfang kritischer Bereich U 3 ***

2229

07 4 A

D9

6 E

MOV

RI,»WORKDF

Aufsuche gegenwärtigen Platz

2230

07 4C

Fl

MOV

A , 0R1

2231

0 7 4 D

04

76

CALL

NVMST1

Aufsetze auf Zugriff darauf

2232

074F

D8

6E

MOV

R0, »WORKDF

und freigebe in durch Einschreiben von (10 in seinen Header

2233

0751

DO

00

MOV

@ R0 , »0011

2234

0753

04

8 E

CALL

NVMBYW

6500 ACCOUNTING MODULE CA0048/11 NVM CHANGE STATE f. OPEN SUDROUTINES

D JNZ

h MOV

XCII SCIID EN

NVM150 RET

versi on 4.21.57 NVMCIIG. SRC

l5-Oct-79

12:47:58

2235

0755

96

22 36

0757

D9

22 37

0759

21

2 2 38

0 7 5 A

31

2239

075B

05

2240

075C

83

224 1

224 2

075D

05

224 3

0 7 5 E

94

224 4

0760

03

224 5 224 6 224 7 224 8

NVM19 0 RI,INVMDLK A , @ R1 A, @R1 1

00H Header richtig geschrieben worden? Ja, angebe daß Dlock jetzt offen

**•* Ende des kritischen Bereichs # 3 ***

Verhängnisvolle Ausgänge, handhabe HVM-Fehler

NVM190 NVM195

EN

CALL RET

1

NVMPAT

INCLUDE DM0 :NVMRD

SUBTTL

PAGE

Gestatte Unterbrechungen Setze verhängnisvolles Dit

Zus tandsänderung nur von EX EC aufgerufen und maß rückspringe

NVM Dlocklese-Unterroutine

ON ON

6500 ACCOUNTING MODULE CAB048/11 version 4.21.57 15-Oct-79 12:47:58

NVM READ

BLOCK

SUBROUTINE NVMRD.SRC

2 2 4 9

2250

»

225 1

NVM Blocklese-Unterroutine

2252

2253

225 4

2255

Auffinde und lese den gegenwärtig aktiven Block

2256

2257

-OM

A ' = CRC-Verifikation

2250

—M

alle Register und Marken

2259

l-_

ACTBLK = aktive Blocknummer

2260

—M

WORKBFi-6, 17

226 1

2262

Finde Block

2263

0761

B9 59

NVMRD MOV

R1 , 1ACTBLK Erhalte aktive Blocknummer

' 2 264

0763

Fl

MOV

A, @R1

2265

0764

F 4 B 4

CALL

NVM FM D Firde aktiven Block urd aufsetze zum Zugriff auf seinen Platz

2266

0766

C 6 78

JZ

NVM 2 3 0 Gefunden?

2267

Anfangssetze CRC

2268

0768

BC FF

MOV

R 4,i C RCIN L Anfangswert für CRC

2269

READ DATA

Lese Daten

2270

0 7 6 A

74 02

CALL

RAMSTP Anfangssetzung für RAM-Zeiger und Zähler

2271

076C

D4 OA

NVM 210 CALL

NVMBYR Lese Byte, rette und bringe CRC auf neuen Stand

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct~79 12:47:50

NVM HEAD BLOCK SUBROUTINE NVMRD.SRC

2272

076E

1 8

INC

R0

Zeiger auf nächsten Speicherplatz

227 3

0 7 6 F

EA

6 C

DJNZ

R2,NVM210

fertig?

2274

Lese CRC und wiedergebe

Verifikation

2275

0771

FC

MOV

A, R4

Erhalte CRC

2276

0772

B8

74

MOV

R0,I(WORKBF

+ 6) ; und rette

2277

0774

A0

MOV

@R0, A

2270

0775

D4

8 A

CALL

NVMBYR

Lese CRC, und vergleiche mit errechneten

2279

0777

37

CPL

A

2280

0778

37

NVM220 CPL

A

228 1

0779

83

RET

2282

228 3

INCLUDE DM0 :NVMER

2284

SUBTTL

NVM Blocklöschungs-Unterroutine

2285

PAGE

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79 12:47:50

NVM ERASE BLOCK SUBROUTINE NVMER.SRC

2 2 Q 6

2 213 7

•

2 2 0 8

NVM-Dlo ckläschungs-Unterroutine

2289

2290

2 291

2292

Lösche den gegenwärtigen NVM-Block

2 29 3

2 2 94

-OM

A = Feh1erzäh1er

2295

— M

Alle Register & Marken

2296

1 —

NVMBLK = Blocknummer des NVM

2297

--M

WORKBF + 6, *7

2298

2299

Aufsetze Löschparameter

2 300

077A

D4

73

NVMER CALL

NVMSTP Aufsetze auf Speicherplatzzugriff

2301

077C

DA

IC

MOV

R2, M (IAH + 211) Anzahl zu löschender Bytes

2 30 2

0 7 7 ß

DD

00

MOV

R3 , 10011 Anfangssetze Fehlerzähler

2 3 0 3

ERASE DLOCK

2304

0 7 80

BC

74

MOV

R0,K(WORKDF * 6) Speicher für Löschergebnisse

2305

0702

D9

F F

NVM 310 MOV

@R0,|O F F11 Erwartetes Löschergebnis

2 30 6

0784

23

3 3

MOV

A, (3311 Doppel-lösche OPP-Kode

2 307

0786

1 5

DIS

j *** Verhindere Unterbrechung während Löschen ***

2308

0 78 7

D4

90

CALL

NVMBYT Lösche Byte, verifiere, und Fehlerzähler auf neuen Stand

6500 ACCOUNTING MODULE CAG048/11 version 4.21.57 15-Oct-79 12:47:58 NVM ERASE BLOCK SUDROUTINE NVMER.SRC

2309 0789 05 EN I Lasse wieder Unterbrechung zu

23 10 07GA EA 02 DJNZ R2,NVM310 Fertig?

2311 Rückkehr bzw. Riicksprung Fehler Zählung

2312 07GC FB MOV A,R3 Erhalte Fehlerzahl 2 3 1 3 0 7 G D 83 RET

2314

23 15 INCLUDE DM0 :NVMWR

2316 SUBTTL NVM Blockschreib-Unterroutine

2317 PAGE

e c h

Û500 ACCOUNTING MODULE CA8040/11 version 4.21.57 NVM WRITE BLOCK SUBROUTINE NVMWR.SRC

15-Oc t.-7 9

12(47:50

231 Q 2319 23 20 23 2 1

2322

2323

2324

2325

2326 ' 23 27

2 3 28

2329 23 30 23 3 1 23 3 2 2333 23 34 2335 2 3 3 6 .23 37

2330 23 39 2340

NVM Blockschreib-Unterroutine

Schreibe gegenwärtig aktiven Block auf den gegenwärtigen Block des NVM aus

-OM

A

FehlerZählung

— M

Alle Register & Marken

1 --

ACTBLK =

•aktive Blocknummer

1 --

NVMBLK =

Hoher NIBBLE = Schreibschutzma

Niedriger NIBBLE = Blocknummer

— M

WORKBF ♦ 6, * 7

Prüfe

Schreibschutzmarke

0 78 E

B9

5A

NVMWR

MOV.

Rl ,1NVMBLK

Erhalte Schreibschutzmarke

0790

Fl

MOV

A , @ R1

0791

53

F0

ANL

A, *05011

0793

96

B 3

JNZ

NVM4 20

Ist sie gesetzt?

/lufse tze Schreibparameter

0795

04

73

CALL

NVMSTP

Aufsetze auf Platzzugriff

0797

BB

00

MOV

R3, H 0011

Anfangssetzung Fehlerzähler

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79 12:47:58 NVM WRITE BLOCK SUBROUTINE NVMWR.SRC

Berechne und Schreibe Header

MOV R1,üACTBLK Erhalte aktive Blocknumraer MOV A,@ R1

ORL A,K0PO 11 Setze hohen NIBBLE auf F für Header MOV RO,!(WORKBF + 6) Rette Header MOV @ RO , A

CALL NVMBYW Schreibe Header Anfangssetze CRC

23 4 1

2 3 4 2

0799

B 9

59

23 4 3

0 7 9 B

Fl

2 3 4 4

079C

4 3

FO

2 3 4 5

079E

BQ

74

234 6

07A0

A0

234 7

07A1

D4

8 E

23 4 8

23 4 9

0 7 A 3

BC

FF

2 3 50

235 1

07A5

F 4

02

23 52

0 7 A 7

D4

8 E

2353

0 7 A 9

1 8

2354

07AA

EA

A 7

2355

2356

07AC

FC

2 3 5 7

0 7 AD

B8

74

2 3 5 U

0 ? A F

A0

2359

07B0

D4

8 E

2 360

2 36 1

07B2

FB

2 362

0 7 B 3

8 3

2363

MOV WRITE DATA CALL NVM 4 10 CALL INC DJNZ WRITE CRC MOV MOV MOV CALL .

Rückkehr bzw MOV

NVM4 2 0 RET

R4,KCRCINLAnfangswert für CRC

Schreibe Daten RAMSTP Anfangssetze RAM-Zeiger und Zähler

NVMBYW Schreibe Byte, verifiziere, CRC auf neuen Stand und Fehlerzählei o • c m u i. oi. auf neuen Stand

HO Zeiger auf nächstes Byte

R2,NVM410 fertig?

Schreibe CRC

A,R4 Erhalte CRC

RO, II (WORKBF + 6) ; und speichere

@ R 0 , A

NVMBYW Schreibe CRC, verifiziere und Fehlerzähler auf neuen Stand

Rücksprung Fehler Zählung A , R 3 Erhalte Fehlerzähler

6500 ACCOUNTING MODULE CAG04Ö/11 version 4.21.57 ' 15-Oct-79 12 t 4 7: 5 0 WM WRITE BLOCK SUDROUTINE NVMWR.SRC

2 3 6 4 INCLUDE DM0 :NVMFND

2 365 SUBTTL NVM Auffindungs-Unterroutine für aktiven Block

2366 PAGE

6500 ACCOUNTING MODULE CAGO 4 G/11 version 4.21.57 15-Oct-79 1 2:4 7:50

NVM FIND

ACTIVE

BLOCK SUBROUTINE NVMFND.SRC

2367

2360

2369

2370

237 1

2372

2373

Durchsuche die tMl-

-Blöcke auf einen gegebenen Header und verlasse

2374

NMDS Seiten- und Ädressenerstellung ujti auf ersten Daten-NIBBLE zuzugreifen

23 75

2376

I OM

A » ON CA Bei Anruf / Header

2377

= ON RE Bei Aussprung, Blocknummer des NVM

23 78

— M

Alle Register & Marken

23 79

— M

WORKBF+6, +7

2380

238 1

Aufsetze

Suchparameters

238 2

0 7H4

AA

NVMFND MOV

r2,a Zeitweilige Speicherung der aktiven Blocknurmer

230 3

07B5

4 3

F0 ORL

A, H 0F0II Suche Header mit oberem NIBBLE F

2384

0707

2 A

XCII

A,R2 Rette Header und aufsuche aktive Blocknurmer

2385

0 7138

E7

RL

A Berechne anfänglichen Suchpunkt

2386

0709

D 3

0 2 XRL

A , H 0 211

2 3 87

0 7130

AB

MOV

R3(A und rette

2 380

Suche bis aktiver Block gefunden oder alle NVM-Blöcke geprüft

2389

0 7 BC

BO

7 4 MOV

R0,i (WORKBF +6) Speicherung für Lese-Header

23 90

0 7 BE

FB

NVM510 MOV

3 Erhalte Speicherpiatznummer

Q\ ON fcs>

■fc»

6500 ACCOUNTING MODULE CAÛ040/11 version 4.21.57 15-Oct-79 12;4 7 ; S Q

NVM FIND

ACTIVE

B LOC K

SUBROUTINE NVMFND.SRC

23 9 1

0 7 B F

B 2

CD

JB5 NVM5 2 0

Alle Plätze durchsucht?

2392

07C1

D 4

76

CALL NVMST1

Mein, einstelle auf Zugriff zu Speicherplatz

239 3

07C3

FA

MOV A,R2

Erhalte gesuchten Header

23 94

07C4

A0

MOV @R0,A

und rette ihn für den Vergleich

2395

07C5

D4

OA

CALL NVMBYR

Lese Header, vergleiche urd bringe Speicherpiatznr. auf

2 396

07C7

96

BE

JNZ NVM510

Richtigen Header gefunden?

.2397

Suche erfolgreich - Wiedergebe NVM Blocknummer

2390

07C9

FB

MOV A,R3

Erhalte Speicherplatznummer

2399

07CA

43

F0

ORL A , K 0F01I

und anhänge Schreibschutzmarke

2 400

0 7CC

83

RET

2401

Suche erfolglos -Wiedergebe' Fehleranzeiger

2402

07CD

27

NVM520 CLR A

Anzeigefehler

'2 403

07CE

03

RET

2404

2405

INCLUDE DM0:CRC

2406

SUBTTL

CRC-ERzeuger-Unterroutine

2407

PAGE

S tard

K) to

6500

ACCOUNTING MODULE CAÛ04 0/11

version 4 . 21.57 15-Oct-79 1 2:47:50

GENERATOR

SUBROUTINE CRC

. SRC

2408

2409

2410

CRC-ERzeuger-Unterroutine

24 11

2412

2413

2414

Erzeuge

CRC für jede gegebene Datenfolge

2415

24 1 6

-OM

A ■ CRC-Wert

2417

1-M

R0 » Adresse der Datenfolge

24 1 8

1 -M

R2 = Länge der Datenfolge

2419

— M

R4 , R7

24 20

24 21

07CF

BC FF CRC

MOV

R4,ICRCINL Anfangssetzung Rest

2422

07D1

FO CRC 110

MOV

A,@R0 Erhalte Datenbyte

2423

0702

F 4 DB

CALL

CRCNIB und dehne CRC auf laufendes

2424

07D4

F 4 DB

CALL

CRCNIB

24 25

07D6

10

INC

RO Zeiger auf nächstes Byte

2426

0707

EA Dl

DJNZ

R2,CRC110 Fertig?

24 27

07D9

FC

MOV

A,R4 Wiedergebe CRC in Akku

2 4 28

0 7 DA

03

RET

24 29

24 30

INCLUDE OMO :CRCNIB

2431

SUBTTL -CRC ( Einzel-NIBBLE) -Erzeuger

24 32

PAGE

6500 ACCOUNTI CRC (SINGLE NI

24 3 3 24 3 4 24 35 2 4 36 2 4 37 2 4 30 24 39 2 4 40 2 4 4 1 24 4 2 24 4 3 24 4 4 24 45

NG MODULE CA0048/11 version 4.21.57 ÛBLE) GENERATOR SUBROUTINE CRCNIB.SRC

15-Oct-79

12:47:50

CRC - (Einzel-NIBBLE)-Erzeuger-Unterroutine

EIRstrecke gegenwärtigen CRC-VTert auf Einschluß eines weiteren Eaten-NIBBLES

I-M A

I OM R4 — M R7

Oberer NIBBLE = Daten unterer NIBBLE = übergehen • CRC-V/er t

24 4 6

07DB

BF 0

4

CRCNIB

MOV

R7 , 1 4

Anfangssetze Bitzähler

24 4 7

07DD

97

CRC 210

CLR'

C

Linksverschiebung der Übertragungs-Rest-Daten

24 48

07DE

F7

RLC

A

CY - R5 - A - 0

24 4 9

07DF

2C

XCII

.A, R4

2450

07E0

F 7

RLC

A

245 1

07E1

E6

E5

JNC

CRC220

herausgeschobener Bit des Restes = 1?

24 52

07E3

D3

9 ß

XRL

A,HCRCPLY

Ja, XOR (ausschl. ODER) von Rest mit Generatorpolynom

24 53

07E5

2C

CRC200

XCH

A, R4

Rette Rest und erhalte Daten

2454

07E6

EF

DD

DJNZ

R7,CRC210

Erledigt?

24 55

Û7E0

93

RETR

6500 ACCOUNTING MODULE CAQ048/11 version 4-21,57 15-Oct-79 12:47:58 CRC (SINGLE NIBBLE) GENERATOR SUQROUTINE CRCNIB.SRC •

24 56

24 57

INCLUDE

DM0:CLRBLK

24 58

SUBTTL

Lösche RAM-Block

24 59

PAGE

N> Ui on On Ki •U U)

u

6500 ACCOUNTING MODULE CA8040/11 version 4.21.57 15-Oct-79 12:47:58

CLEAR BLOCK OF RAM CLRBLK.SRC

2460

2 4 6 1

2 4 6 2

Blocklö.schung des internen RAM ( fr eiadressierbarer Speicher)

24 63

24 6 4

24 65

24 66

Lösche (setze auf Null) Block des internen RAM

24 67

2 4 6Û

1 -M

RO

= Startadresse

24 69

I -M

R2

= Anzahl zu löschender Bytes

24 70

24 71

07E9

D5

CLRWK

SEL

RB1

2472

0 7 EA

BO

6 E

CLRWRK

MOV

R0,

KWORKBF

24 73

0 7 EC

BA

08

MOV

R2,

HWRKBSZ

24 74

24 75

07EE

27

CLRBLK

CLR

A

24 76

24 77

07EF

A0

CLRBK1

MOV

0 R0 ,

A

24 78

0 7 F0

18

INC

R0

24 79

0 7 F1

EA

E F

DJNZ

R2,

CLRBK1

24 80

0 7 F 3

93

RETR

24 8 1

24 82

INCLUDE DM0 :CLRAMT

2 4 0 3

SUBTTL

Lösche Betrags- und COMBO-Puffer

2 4 04

PAGE

6500 ACCOUNTING MODULE CA0048/11 version 4.21.57 CLEAR AMOUNT AND COMBO BUFFERS CLRAMT.SRC

24 0 5 24 86 2487 2 4 0 8 24 09 24 90 24 9 1 249 2

15-Oct-79

12:47:58

24 9 8 24 99

2500

2501

Lösche Betrags- und COMBO (Kombinations)-Puffer

Hilfsroutine zur' Löschung von Betrags- und COMBO-Puffer to

24 9 3

0 7 F 4

D5

CLRAM

SEL

RB1

24 94

07F5

BO

76

CLRAMT

MOV

R0, K AMTBF

24 95

07F7

BA

0A

MOV

R2, IAMTSZ

2496

07F9

F 4

EE

CALL

.CLRBLK

24 97

0 7 FB

93

RETR

INCLUDE DM0 : RESET

SUBTTL

PAGE

Neueinstellung

ON Ni

6500 ACCOUNTING MODULE CA004Û/11 version 4.21.57 15-Oct.-79 12 : 47:58

RESET RESET.SRC

2502

2503

2504

Neueinstellüng

2505

2506

2507

2508

Manuelle Neueinstellung

2509

Argumente keine

2510

251 1

2512

verwendet RO, Rl, R2, R4, R5, R6, R7

2513

2514

JUMP TABLE ENTRY Sprungtabellen-Eingang

2515

2516

0880

ORC 880

2517

0880

F9

PG800 MOV A, Rl

2518

0881

A3

MOV P A, @A

2519

0882

24

80

JMP PG900

2520

2521

Spezia leingang für nur Fehlerlöschzähier

2522

0884

23

03

RSTRM6 MOV A,I (DSCRSZ * 2) *10 * 3

2523

0 086

B 4

32

CALL FMTCII

2524

00 8 8

6 A

ADD A, R2

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79 12:47:50

SET RESET.SRC

2525

0009

07

DEC

A

Zeiger.auf letztes Byte

2526

008A

AO

MOV

RO, A

,

2527

0 8 3 B

B9

20

MOV

Rl, »ose:

2528

088D

14

6D

CALL

DECSUB

2529

0 3 0 F

B6

D5

JFO

RSTIA

Wenn gleich, lösche Fehlerzahl

2530

Wenn Fehler, lösche Ertrags- u. COMB3-

-Puffer, erhöhe Neueinstellversuchszähler und gebe weichen

2531

0091

Fehler wieder

E5

RSTERR

SEL

MBO

25 32

0392

D4

6E

CALL

RSTCOM

2533

0094

FO

MOV

A, @ RO

Lade Neueinstellversuchs-Zähler

25 34

0395

03

F 7

ADD

A,»OF7

Prüfe Neuversuchszähler, wenn > 9 keine Erhöhung

2535

0097

F6

EO

JC

RSTFAT

2536

0899

1 0

INC

0RO

25 37

0 0 9 A

1 4

AO

RSTER1

CALL

CIIGPRV

2538

O09C

1 4

AO

CALL

CIIGPRV

25 39

0 0 9 E

24

76

RSTER2

JMP

SÒFTERR

. 2540

Prüfe auf COMBO-ziffern

254 1

OOAO

E5

RESETI

SEL

MBO

25 4 2

0BA1

96

9 E

JNZ

RSTER2

Format für COMBO nicht "8F"

254 3

0 0 A 3

1 0

INC

RO

254 4

0 8 A 4

FO

MOV

A, 0 RO

Lade Daten

2545

08A5

Dl

XRL

A, 0 Rl

2546

0ÛA6

96

DO

JNZ

RSTRMS

keine manuelle Kombinationsprüfung für RMRS

(fernbetätigte Laden)

6500 ACCOUNTING MODULE CA0048/11 version 4.21.57 15-Oct-79 12:47:58

RESET RESET.SRC

254 7

0 û A 0

1 9

INC

R1

2 5 4 6

06A9

EA

AO

DJNZ

R2, RESETI

254 9

Prüfe auf Gebührenmittel-Aufhebung

2550

0 8 AB

B 9

76

MOV

RI, IAMTBF

2551

0 8 AD

Fl

MOV

A, 0R1

2552

08AE

D3

22

XRL

A, 122 Format mu "22" sein

2553

08B0

96

C 7

JNZ

RSTMN1

2554

0802

1 9

INC

Rl

2555

08 B3

Fl'

MÛV

A, SRI

2556

08B4

96

C 6

JNZ

RSTMAN Daten müssen "00" sein

2557

Letzter NIBBLE des abfallenden Registers nuß Null sein, um manuelles RMRS-System aufzufinden

2558

08B6

B 8

28

MOV

RO, ÏDSCREG t

2559

08B8

FO

MOV

A, @R0

2560

0BB9

53

OF

ANL

A, HOF Prüfe nur letzten NIBBLE

2561

OOBB

96

9 E

JNZ

RSTER2

2562

Nullsetzung für abfallendes Register

256 3

0 0 BD

B 8

25

MÖV

RO, SDSCREG

2564

OBBE

BA

04

MOV

R2 , 'JDSCRSZ

2565

08C1

F 4

EE

CALL

CLRBLK

2566

0 OC 3

F5

SEL

MB 1

2567

08C4

4 4

AB

JMP

RST11 Speicher müssen noch geräumt werden; berechne neuen DSCECC

2568

und CONECC

25<j9

Für rranuelle Heueinstellung prüfe Neuversuchszcihler und Vorhandensein von Zugangsberechtigungszustand

6500 ACCOUNTING

T"

O o e

LE CAG04

0/11

vörs i.on 4.21

.57 15-Oct-79 12:47:58

RESET RESET.SRC

2570

08C6

C 9

RSTMAn

DEC

Rl

Zurückstelle Zeiger auf Format

2571

0BC7

54

E7

RSTMN1

CALL

LSTATE

Lade Zustandswert und zerstöre nicht REG-Werte

2572

03C9

37

CPL

a

Bit 0 sollte "1" sein

2573

03CA

1 2

04

JOO

RSTRM6

2574

OBCC

23

72

MOV

A,I (DSCRSZ * 2

-1)*10+2 Format check to pennies

2575

O0CE

54

32

call'

FMTCII

2576

0 ODO

B4

82

CALL

FMTNB2

Eingang für Verschieben eines NIBBELS,ungeradzahlige

2577

08D2

F5

SEL

MB 1

Stellenzählung

2578

00D3

44

04

JMP

RSTAMT

2579

2580

0 0 05

F5

RST1A

•SEL

MB 1

2581

0806

44

B 2

JMP

RSTIIA

2582

2583

2584

RMRS

- Rückstellung

2585

0808

54

E7

RSTRMS

CALL

LSTATE

Prüfe auf Normalzustand

. 2586

0 8 DA

1 2

91

J BO

RSTERR

2587

0 8 DC

F5

SEL

MB 1

2580

OBDD

24

OF

JMP

RMRS

2509

2590

2591 wenn hier verhängnisvoll

2592

6500 ACCOUNTING MODULE CA8048/11 RESET RESET.SRC

2593

2594

2595

2596

OQDF OOEO 0ÛE2

E5

BF 09 04 3 3

RSTFTO RSTFAT

SEL MOV JMP PAGE

vers i.on 4.21. MBO

R7, IRSTTRY FATERR

0\

o\

ts) £

-Oct-79 12:47:50

>

U) NJ

6500 ACCOUNTING MODULE CAÛ04Q/11 version 4,21.57 15-Oct-79 12:47:50

DT RESET.SRC

2597

0980

ORG

900

2598

0980

29

PG900

XCII

A, Rl

2599

0981

A3

MOVP

A, @ A

2600

0982

24

CF

JMP

PAGRET

2601

2602

Prüfung auf manuelle Kombination

2603

0984

BO

7B

RESET

MOV

RO, ÏCMBOBF

2604

0986

B 9

50

MOV

RI, KRSTBAS

Zeiger auf manuelle COMBO

2605

0988

Ba

04

MOV

R2, 1(4

13y tezahl

2606

0 9 8 A

FO

MOV

A, @ RO

Lade Format, muß "8F" sèin

2607

098B

D2

8 F

XRL

A, HOF

2 60 0

09 OD

04

AO

JMP

RESETI

2609

2610

0 9 8 F

B9

7C

RMRS

MOV

RI, ICMBOBF +1

261 1

0991

BO

7C

MOV

RO, II CMBOBF + 1

261 2

0993

BC

02

MOV

' R4 , II 2

2613

0995

27

RSTRM1

CLR

A

2614

0996

BB

02

MOV

R3, »2

2615

0990

AF

RSTRM2

R7,

A

2616

0999

FO

MOV

A, @R0

Lade COMBO-Byte

2617

0 9 9 A

03

60

ADD

A ,160

Prüfe auf Ziffern oberhalb

2 6'10

09 9C

F 6

EF

JC

RMSERR

2619

0 9 9 E

47

SWAP A

2620

099F

03

60

ADD

A, *60

2621

09A1

F 6

EF

JC

RMSERR

6500 ACCOUNTING MODULE CA8040/11

version 4.

RESET RESET.SRC

2622

0 9 A 3

27

CLR

A

2623

09A4

30

XCIID

A,

0 R0

2624

09A5

37

CPL

A

2625

09A6

A3

MOVP

A,

@ A

2626

09A7

DF

XRL

A,

R7

2627

09 A8

20

XCII

A,

0 R0

2628

09A9

47

SWAP

A

2629

0 9 AA

37

CPL

A

2630

0 9 AB

A3

MOVP

A,

0 A

2631

09AC

DO

XRL

A,

0 R 0

2632

09AD

1 0

INC

R0

2633

09AE

EB

90

DJNZ

R3 ,

RSTRM 2

2634

0 9 B0

AI

MOV

0 R1

, A

2635

09B1

1 9

INC

Rl

2636

0 9B2

EC

95

DJNZ

R4 ,

RSTRM1

26 37

Nachschlage gespeicherte

2630

0 9 B 4

BO

3 B

MOV

R0 ,

H DATE *

2639

09B6

F0

MOV

A,

@ R0

26 4 0

0 9 B 7

97

CLR

C

264 1

09QÛ

F 7

RLC

A

26 4 2

0 9 B 9

77

RR

A

264 3

09BA

A9

MOV

Rl ,

A

264 4

09BB

CO

DEC

R0

2645 "

09BC

F 6

MOV

A,

0 R0

15-Oct~79

12 H 7 : 58

Trenne eine Ziffer ab

Tabelle am Seitenende in umgekehrter Reihenfolge Verwandle COMBO-Ziffer in Bandkode

Lade MS Byte der Zählung

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-OCL-79 1 2 : 4 7:50

:SET RESET.SRC

2 6 4 6

09DD

P 7

RLC

A Einbeziehe C vom neu belegten Modul

26 4 7

0 9 DE

52

EF

JB 2

RMSERR Hit 2=1, 512 keine weiteren Kombinationen

2 6 4 B

09C0

03

C 3

ADD

A, »LOW PAGBR

264 9

09C2

03

JMPP

@ A

2650

Tabelle für

• Sprung

2651

09C3

C 7

PAGBR

DB

LOW PAGOOO

2652

09C4

C 9

DD

LOW PAGAOO

2653

09C5

CD

DB

LOW PAGCOO

2654

09C6

CD

DB

LOW PAGEOO

265 5

2656

09C7

04

00

PAGOOO

JMP

PG000

2657

09C9

44

00

PAGAOO

JMP

PCAOO

2658

09CD

04

00

PAGCOO

JMP

PGCOO

2659

09CD

C 4

00

PAGEOO

JMP

PGË00

2660

2661

09CF

B 0

7D

PAGRET

MOV

RO, »CMBOBF ♦ ? Prüfe Kombination (COMBO) gegen gespeicherte

' 2662

09D1

DO

XRL

A, @ RO

2663

09D2

96

EF

JMZ

RMSERR

2664

09D4

CO

DEC

RO

2665

09D5

F9

MOV

A, Rl

2666

09D6

DO

XRL

A, @ RO

2667

09D7

96

EF

JNZ

RMSERR

2660

09D9

E5

SEL

MDO

6500 ACCOUNTING MODULE CAQ04Û/11 versJ.on 4.21.57 15-;Oct-79 1 2:47 : 58

SET RESET.SRC

2669

09DA

B9

76

MOV

RI, IAMTBF

2670

0 9DC

23

83

MOV

A, KDSCRSZ * 2

2671

09DE

B 4

32

CALL

FMTCII

2672

09E0

AF

MOV

R7, A Rette Startadresse von Daten

2673

09E1

B8

3 D

MOV

R0, II RSTVAR Prüfe eirpfangenen Betrag gegen

2674

09E3

FO

RMRS1 MOV

A, 0RÛ

2675

09E4

Dl

XRL

A, @ Rl

2676

09E5

96

EF

JNZ

FMSERR

2677

09E7

18

INC

R0

2678

09E8

19

INC

Rl

2679

09E9

EA

E3

DJNZ

R2, RMRS1

2680

2681

09EB

FF

MOV

A, R7

2682

09EC

F5

SEL

MB 1

. 2683

C9ED

44

84

JMP

RSTAMT

2684

2685

RMRS ERROR

RMRS-Fehler

2686

0 9 EF

F5

RMSERR SEL

MB 1

2687

09F0

04

91

JMP

RSTERR

2688

RMRS-COMBO in Bandkonversionstabelle

2609

09F6

ORG

9F6

2690

09F6

01

00

20 DB

1, 0, 20, 2,

6500 ACCOUNTING MODULE CAÛ040/11

RESET RESET.SRC

Version 4.21.57 15-Oct 79

12:47:50

09F9 0 9 FC

02 00 40 04 10 00

09 FF

00

2691

Taste

(COMBO-

-Ziffer)

Band-Bit

2692

KEY (

COMBO

DIGIT )

TAPE DIT

2693

9

0

2694

0

- NO DIT kein

2695

7

5

2696

6

1

2697

5

3

2690

4

6

2699

3

3

2700

2

4

2701

1

7

2702

2703

PAGE

2 70 4

OAOO

ORG

OAnO

2705

OAQO

F9 PGAOO

MOV

A, Rl

2706

OA01

A3

MOVP

A, 0 A

2707

OAO 2

64 00

JMP

PGDOO

2700

2709

Gemeinsamer Kode für manuelle und

RI4RS- (fernbetcitigte)

2710

2711

0A84

E5 RSTAMT

SEL

MßO

©\ Os Ni

£

6500 ACCOUNTING MODULE CA8048/11 version 4.21.57 15-Oct-79 12:47:50

ET RESET.SRC"

271 2

0A85

03

03

ADD

A, IDSCRSZ-1

Zeige auf letztes Byte

2713

0AB7

A 8

MOV

RO, A

2714

0A8Q

D 9

41

MOV

Rl , II RSTCNT

'9

2715

0A8A

Fl

MOV

A, @ Rl

2716

0A8B

03

F7

ADD

A, H 0 F7

2717

OA OD

E6

92

JNC

RSTAM1

2718

0 A 8 F

F5

SEL

MB 1

2719

0A90

04

DF

JMP

RSTFTO

2720

Addiere Neueinstellbetrag (RESET AMT)

zu Wert des abfallenden Registers

2721

OA92

B9

28

RSTAM1

MOV

Rl, H DSCRßG *D

2722

ÛA 9 4

BA

04

MOV

R 2, HDSCRS Z

2723

0A96

54

EC

CALL

DECADD

2724

OA 98

F6

BC

JC

RSTERA

RAP AROLJND NOT ALLOWED

2725

0A9A

BA

04

MOV

R2, »DSCRSZ

2726

0A9C

Al

mov

@RI , A

Speichere neue DSC CRC

2727

0A9D

19

RSTAM2

INC

Rl

2728

0A9E

1 8

INC

RO

2729

0A9F

FO

' MOV

A, @R0

2 7 30

OAAO

Al

MOV

@ R1 , A

2731

0 AA 1

EA

9D

DJNZ

R2,RSTAM2

27 32

0 AA 3

B 8

3 B

MOV

RO, I DATE t1

Bringe auf den neuesten Stand

27 3 3

OAA 5

1 0

INC

@ RO

2734

OAA 6

FO

MOV

A, @R0

u) 00

i

6500 ACCOUNTING MODULE CA0040/11

versjon 4.21.57 15-Oct-79 12:47:50

:t reset.src

27 3 5

0aa7

96

ab

jnz rst1 1

27 36

0aa9

c 8

dec ro

2707

oaaa

10

inc

@ro

2700

oaab e5

rst11

sel mbo

2739

0aac d4

65

call dsccrc

2740

0aae ao

mov

0ro , a

2741

clear amt and combo buffers and clear rstcnt counter

274 2

oaaf

94

d2

call ctlecc

Berechne neue Kontrollsummen

274 3

0 ab 1

ao

mov sro, a

274 4

0 ab 2

e5

rst1 1 a sel mbo

274 5

0 ab 3

d4

6e

call rstcom

274 6

0 ab 5

ao

mov

@r0, a

Lüsche Neueinstellfehlerzähler

27 4 7

0 ab 6

14

ao rst12

call ciigprv

Andere priv. Bit

274 0

oab 8

14

ab

call ciigprv

274 9

ûaba

24

14

jmp questa

2750

275 1

0 abc f5

rstera sel md 1

2752

oabd

04

91

jmp rsterr

2753

2 754

odo 0

org oboo

2755

ob 0 0

29

pgboo xcii

A, Rl

27 5 6

obo 1

a3

movp a, @ a

2757

orb 2

24

cf

jmp pagret

00 ACCOUNTING MODULE CAÜ040/11 version 4.21.57

RESET RESET.SRC

2758

2759

0C80

ORG

OCOO

2760

OCOO

F9

PGCOO

MOV

A, Rl

276 1

OCOl

A3

MOVP

A, 0A

2762

0C82

A4

00

JMP

PGDOO

2763

2764

0D80

ORG

ODOO

2765

ODO 0

29

PGDOO

XCII

A, Rl

2766

0D81

A3

MOVP

A, 0 A

2767

OD82

24

CF

JMP

PAGRET

2760

2669

OEBO

ORG

0120 0

2770

0E80

29

PGEOO

MOV

A, Rl

2771

0E81

A3

MOVP

>

(Z> >

2772

0E02

E 4

00

JMP

PGFOO

2773

2774

0F80

ORG

OFOO

2775

OFOO

29

PGFOO

XCII

A, RI

2776

0F81

A3

MOVP

A i 0A

2777

0F02

24

CF

JMP

PAQRET

2778

2779

2780

INCLUDE DMO:PWRUP

278 1

SUBTTL

2702

PAGE

15-Oct-79 12:47:58

>

tromeinschaltung & Anfangssetzung

6500 ACCOUNTING MODULE CAÛ040/11 POWER UP (. INITIALIZE PWRUP.SRC

2783

2784

2785

2786

2787

2788 2709

2790

2791

2792

2793

2794

Version 4.21.57 15-OcL-79

12: 47:50

Stromeinschaltung und Anfangssetzung

Anfangssetzung des Buchungssysten, stelle sicher, daß Duchungsfunktion bereit ist

—M — M —M

R0 = Adresse fiir NVM (leistungsunabhMng, Speicher) Rl = Adresse für NVM Laden R2 a Zcihler

> S

2795

OF84

E5

PWRUPA

SEL

MDO

Setze auf Aufruf von untere 2 K

2796

0F85

DO

XRL

A, @ RO

2797

0F86

C6

BD

JZ

PWRUP2

Anwachsendes Register in Ordnung?

2798

0F88

18

INC

RO

Zeiger auf höchstst. nyte des anw.

2799

0F89

DO

FF

MOV

@ RO, »0

ff

2800

0F 8D

D4

65

PWRUP2

CALL

DSCCRC

2801

0F0D

DO

XRL

A, @ RO

2802

0F8E

C 6

93

JZ

PWRUP4

abfallendes Register in Ordnung?

2803

0F90

18

INC

RO

Zeiger auf abfallendes Register

2804

0F9 1

DO

FF

MOV

@R0, 10

FF

2805

OF93

EO

59

PWRUP4

MOV

RO, I ACT

DLH

o\

C\ 4^. £

6700 ACCOUNTING MODULE CAÛ040/11 POWER UP S, I NI TI AL I Z E PWRUP.SRC

version 4.21.57 15-Oct-79

12:47:50

2806

0F95

10

INC

SRO

2807

0F96

10

INC

nò

Zeiger auf NVMBLK

2808

0F97

BO

F0

MOV

@R0, IOFO

Anzeige, daß kein Block

2809

0F99

05

EN

1

ARM Unterbrechung

2810

0F9A

F 4

6 1

CALL

NVMRD

2811

0F9C

C 6

AO

JZ

PWRUP5

Lesen in Ofdung?

2812

0F9 E

94

4 A

CALL

NVMFAT

2813

Prüfe berechnete Kontrollsurrme gegen gespeicherte CONEGC

2814

0FA0

94

D 2

PWRUP5 CALL

CTLECC

2815

0FA2

DO

XRL

A, @ RO

2816

0 FA 3

96

F7

JNZ

PWRERO-

2817

Empfange

Druckersta tus

2818

0FA5

94

1 9

CALI, v

STR20M A =

0 ungefähr 5 sec. um Rückkehr

2819

0FA7

D4

20

CALL

PRCRX

28 20

0FA9

65

STOP

TCNT

2821

0FAA

F0

MOV

A / @R =

Lade neuen Druckers ta tus

2 Û 2 2

OFAB

D3

00

XRL

A, »VLISIID

Header = "80"?

282 3

0 FAD

96

F5

JNZ

PWRPRE

Druckerfehler

2824

2025

0 FA F

B9

56

MOV

RI, 1MRSTAT

Lösche BasisrUcksteiIbit

2026

0 FB 1

B 1

40

MOV

(1R1 , * 40

2827

0FB3

1 0

INC

RO

Zeiger auf Statusadresse

2020

0FB4

B9

2 F

MOV

Rl, IPRSTAT

Zeiger auf alten Drucker;

zu ermögliche

6500 ACCOUNTING MODULE CAÛ04Q/11 POWER UP & INITIALIZE PWRUP.SRC

version 4.21.57 15-Oct-79 12:47:50

2029

0FB6

FO

MOV

A, SRO

20 30

0FB7

1 2

F5

JBO

PWnPRB

verhängnisvoller Fehler gesetzt

20 3 1

0FB9

21

XCII

A, @IU

2032

OFBA

72

BE

JB3

PWRUP6

Auslösung im Fortschreiten, Abrechnung komplett bei PWR

20 33

OFBC

D3

10

XRL

A, 110

aus

20 3 4

OFQ ß

Dl

PWRUP6

. XRL

A, ein vergleiche Ausgangsstellungen

2835

0FBF

92

C 3

JB4

PWRUP7

keine Buchung

2836

Führe

Buchung aus

28 37

0FC1

74

B8

CALL

DOACCT

20 30

0FC3

B8

2 F

PWRUP7

MOV

RO, IPRSTAT Prüfe Berechtigungsschalter

2 8 3 9

OFC5

B 9

50'

MOV

RI, 1 STATE

2040

OFC7

FO

MOV

A, @R =

Lade PRSTAT

204 1

0FC8

37

CPL

A

20 4 2

0FC9

F 2

CC

JB7

PWRUP0

Berechtigungsschai ter geschlossen

284 3

0FCB

11

INC

@ R1

Setze Berechtigungszustand

2044

0 FCC

E8

66

PWRUP0

MOV

R0, IWRKBFI Setze Anfangssetzung-PortogebUhr

2045

OFCE

Fl

MOV

A, @R1

Prüfe ob verhängnisvoll

204 6

OFCF

52

F9

JB2

PWRER9

wenn verhängnisvoll, keine Einstellung in Drucker

204 7

0FD1

BO

64

MOV

@R0, 14

•

204 8

0FD3

18

INC

R0

2 ß 4 9

0FD4

BO

Cl

MOV

SRO, ISPOSIID

2050

0FD6

18

INC

RO

2051

0FD7

B9

30

MOV

RI, HPOSVAL

4*. u>

o\

Os N) •fe.

£

N>

ê

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 15-Oqt-79 12:47:50 POWER UP L INITIALIZE PWRUP.SRC

2052

0FD9

BA

03

MOV

R2, II POSTSZ

2853

OFDB

1 4

65

CALL

BLKMOV

2854

ÛFDD

94

04

CALL

STRIOM

Setze Zeitgeber für ungefähr 10 msec.

2855

0FDF

23

66

MOV

A, »WRKBF1

2856

0FE1

94

BA

CALL

PRCTX

2857

ÛFE3

65

STOP

TCNT

2858

Während

Druckereinstellung der Portogebühr, lösche NVM

2859

0FE4

54

E7

CALL

LSTATE

Benötigter ACT-Block ( Zustandd kann nur 0 oder 1 sein)

2860

0FE6

F4

27

CALL

NVMOPN

2861

OFEfl

00

30

MOV

R0, »POSVAL

0 Portogebührenwert

2862

OFEA

DO

80

MOV

@ R0, »00

Schütze gegen Stromabfalle während Druckeranfangssetzung

2863

OFEC

1 0

INC

R0

2864

OFED

B4

02

MOV

R2, »POSTSZ

-

2865

OFEF

F 4

EE

CALL

CLRBLK

2866

WAIT

REST

OF SET POST TIME

28 67

0 FF 1

94

19

PWRUP9

CALL

STR20M

2868

0FF3

C 4

2 4

JMP

SETIN2

2869

0FF5

64

71

PWRPRE

JMP

GETDIA

2870

0FF7

94

4 A

PWRERfl

CALL

NVMFAT

2871

OFF9

24

1 4

PWRER9

JMP

QUESTA

2872

2873

2874

END

i

6500 ACCOUNTING MODULE CAQ040/11 version 4.21.57 POWER UP É. INITIALI ZE PWRUP.SRC

A

= 000E

ACMPUD

0045

ACTBLK

0059

ASCCRC

02CA

ASCECC

0029

ASCREG

002A

IÌADUOM

0 3 A 2

BATAMT

0033

BATASZ

0004

ßLKMOV

0065

BUS

= 0004

C

-0007

CLRAM

Û7F4

CLRAMT

07F5

CLRBAT

Ol OF

CLRBLK

07EE

CLRSER

01 A2

CLRSIID

0047

CMDOBP

007B

CMBOSZ

0005

CMDDAT

0 1B 5

CNHESS

0 1 5F

CNT

= 0009

CNTXFL

00 5 B

CRC

Û7CF

CRCINL

00 FF

CRCNIU

0 7Dß

CRC210

07DD

CRC 2 2 0

07R5

CRXBLO

05 AO

CIIXBL3

05B4

CRXBL4

0 5B6

CRXBYL

05A0

CRXFAT

0650

CRXFIN

0651

CRXFN1

065D

CRXMRT

0050

CRXMS0

06 39

CRXMSI

063D

CTLECC

04D2

CTLSUM

0 2 BF

CTXBLP

0033

CTXBL3

0040

CTXBL4

0044 -

CTXBI.6

0051

CTXBL9

005C

CTXßYT

0029

CTXCNC

04C3

CTXCWT

04 94

CTXMER

0 4 DO

CTXMES

0 4 OC

CTXMSP

0 4 9D

CTXMSO

04 9 0

CTXMSI

0 4 A3

DATE

00 3 A

DATESZ

0002

DBB

= 001 1

DKCSßl

007 1

Drccsß2

00 7 B

DECSUB

00 6D

DISABL

02D3

DISABl

0 2DÜ

Dl SAI12

0 2 E |

DISRET

0 2 DA

DI SSTA

0101

DISTMI

0 4 6 4

DOSTA1

0 3 2 3

DOSTA 3

0 3 311

DOSTA4

0 34 0

5-Oct-79 12:47:50

AMTBF

0076

AMTSZ

0005

ASCRSZ

0005

ASERSZ

0001

DATCNT

0037

BATCSZ

0003

CIIGPRV

00 AO

CLK

= 0010

CLRBIID

0044

CLRBK1

07EF

CLRWK

07E9

CLRWRK

07EA

CMDONY

Ol 7A

CNCRX

062C

COMFAT

0003

CONECC

003C

CRCPLY

00 9ß

CRCl10

07D1

CRXBLl

05A2

CRXBL2

05AE

CRXBYT

0594

CRXCWT

0590

CRXMES

062D

CRXMl.P

0647

tRXMS 2

064 1

CRXPED

059C

CTXBL1

0039

CTXBL2

00 3 E

CTXBL7

0055

CTXBLO

0057

CTXVNP

04C0

CTXCN2

0 4 CD

CTXME1

0 4 OD

CTXMLP

04 AC

CTXMS7

0 4B5

CTXPWT

04 A 1

DECADD

0 2 EC

DECADI

. 02ED

DELOOP

0 0 D 2

0ELB00

OOßO

D 1 SAB 3

02E5

Dl SBTM

045D

DOACCT

0 3ßfl

DOSTAT

0316

DOSTA5

0354

DOSTA6

0363

6500 ACCOUNTING MODULE CA0040/11 version 4.21.57 POWER UP INITIALIZE PWRIJP.SRC

DOSTA7

0 3 6 E

DOST4A

0 3 4 D

DOST5A

035D

DOTRP2

0393

DORP 3

0397

DOTRP4

0 3 9 F

DSBLPD •

004 2

DSCCRC

0665

DSCECC

0024

DSERSZ

0001

ECIIFAT

0006

ENABLE

05BB

ENAQL3

05D7

ENABRT'

05CF

ENABTM

046C

EMBLIID

004 1

ENDEI1D

0043

ENDENT

01 AC

ENTCB1

01BB

• ENTCIID

00C6

ENTCMB

01B9

EXCDIS

0130

EXCENB

0127

FATCNT

0043

PATECII

0661

FATERR

04 3 3

PATER I

04 4 7

FMTCII 1

054 1

FMTCII 2

0562

FMTCII 3

057D

FMTMB2

0502

FMT0T1

024 7

FMTOT2

0251

FMTOU1

0210 .

FMTOU2

0 2 6A

FMTOU3

0270

FMTO11

0293

FMTOl2

0297

'FMTOl4

029C

FMTSTS

0 2 A1

FMTTRP

02AE

FMTVAL

0227

Fl

= 200D

GETD

0004

GETDI A

0371

GETSTS

0094

IIOMPAT

0005

IIRDBAD

0174

IDLE 1

0140

I DLE2

0132

IDLE3

0154

INTFAT

0004

INTPOS

0457

LAST

00 7 F

LOWSIÎT

03P2

LOWST1

0 3 PA

LSTATE

0 2E7

MPO

s 20ÛB

MB I

= 30013

METRSZ

0002

MSERNO

0045

MSERS2

0004

MTUPSZ

000 1

NVMBLK

005A

NVMDYR

0 6 0A

NVMBYT

0690

NVMER

077A

NVMPAT

04 4 A

NVMFND

070 4

-Oct-79

12 i 47 : 50

DOTRIP

037C

DOTRP5

0 3 A 6

DSCREG

0025

ENADLL

05C0

ENARET

-5DB

ENTAIID

00C5

ENTMDN

0477

FATCOD

0042

FATRRI

043C

FMTERR

0530

FMTOUA

025A

FMTOU4

0200

FMTSOF

02B7

FTLCSZ

0001

GETDO

00 0 A

I '

= 000C

IDLE 4

014C

LIMTST

0099

LSTATW

02EO

MRTSTA

0106

MTUTYP

0044

NVMBYW

060E

NVM I B

06A5

DOTRP1

0 3 0C

DSBLE

0109

DSCRSZ

0004

ENADL2

05D1

ENDLE

01 7C

ENTAMT

01C3

EXCBAS

01 2B

FATCOM

04 3 1

FMTCII

0532

FMTNB1

0 5 0 A

FMTOUO

025E

FMTO10

0206

FMTSTA

02B9

FO

«000D

GETSTA

0090

IDLE0

01 3A

IDLE5

0153

LOWPOS

004C

LWPSSZ

0002

MRSTAT

0056

NODATA

0040

NVMCI1G

0 70 A

NVMOPN

0727

6500 ACCOUNTING MODULE CAQ04H/11 POWER UP £, INITIALI2E PWRUP.SRC

NVMRD

076 1

NVMSTP

0673

NVM110

0712

NVM13 0

0740

NVM19 5

0 7 5 E

NVM 210

0 7 6C

NVM4 20

0 7 D 3

NVM510

0 71312

NVM715

06D5

NVM7 20

0 6 DE

NVM74S

06D7

NVM7 50

0 6E3

PAGCOO

OflCO

PAGÉOO

0 9CD

PECESZ

0004

PGAOO

OAflO

PGEOO

ÛEOO

PGFOO

0 F 0 0

POSDAT

0 4 F F

POSDA1

0504

POSVAL

0030

POSVND

00Q1

PROFAT

0002

PRSTAT

00 2 F

PWRDN

0009

PWRERfi

OFF7

PW1IUPA

0 P 0 4

PWRUPO

0024

PWRUP6

0 F D E

PWRUP7

ÛFC3

P2

= 0205

P4

= 0006

QUESTA

0 114

RAMSTP

0702

RECDFL

0 0 5C

RECDSZ

ooon

REQVIID

0050

RESET

0904

RMRS

0 9 11 F

UMRS1

0 9 E 3

HSTAM2

0AÜD

RSTI3AS

0 050

RSTDSZ

0 0 0 0

RSTISRA

OAIÎC

RSTFAT

OfiEO

RSTFTO

0 (1D F

RSTRMl

0 9 95

RSTRM2

099 Q

version 4 . 21.57

NVMSTI

0676

NVM140

0743

NVM220

0771)

NVM5 20

07CD

NVM7 30

06C0

NVM760

0 6 FO

PAGRET

09CF

PGDOO.

013 Ü 0

PGOOO

onoo

POSLOW

-5-E

POSWRK

0 4E3

PRSTZ

0001

PWRER9

0 F F 9

PWRUP2

0 F 11 D

PWRUPO

0 FCC

P5

= 0106

RDO

= 0 0 0 D

RECI3UF

0 0 5 E

RESETI

Oll AO

RMSERR

0 915F

RSTDSZ

0 00 4

RSTERR

0 II 9 1

RSTMAN

0IIC6

RSTRM6

0 (1 II 4

-Oct-79 12:47:50

NVMTDL

0700

NVMWR

078E

NVM150

0 75C

NVM190

075D

NVM310

0702

' NVM410

07A7

MDM610

06A4

N V M 7 1 0

06134

NVM7 3 5

06CD

NVM740

06D5

PAGAOO

09C9

PACDR

09C3

PAGOOO

09C7

PECEXT

0020

PGCOO

OC 0 0

PGDOO

ODOO

PGOOO

0900

POLCNT

005D

POSTSZ

0003

POSUPD

04F4

PRCRX

0620

PRCTX

04 OA

PRTFAT

0001

PSW

= 0003

PWRPRE

0FF5

PWRUP

000E

PWRUP4

0F93

PWRUP5

OFAO

PWRUP9

0 FF 1

PI

= 0105

P6

= 0206

P7

»0306

RDI

= 1 OOD

RCNMES

0150

RECSTS

0000

RECSTI

O

o o

RETEXC

0117

RETVAL

01 CD

RSTAMT

0 A 0 4

RSTAM1

0A92

RSTCNT

004 1

RSTCOM

0 6 6 E

RSTGR1

0 0 9 A

RSTER2

00 9 E

RSTMN1

0ÛC7

RSTRMS

OODO

RSTRSZ

0001

RSTR20

04 1 D

6500 ACCOUNTING MODULE CAÛ010/11 POWER IJP L INITIALIZE PWRUP.SRC

RSTTRY

0009

RSTVAR

00 3D

TST1 1 A

0 Aß 2

RST1 2

0AI16

R3

= 0302

R 4

= 0402

SDATRD

0 0C 4

SERENT

0 1 CF

SETFAT

0007

SETI NT

0 5 DE

SETLI M

00 4 E

SETLSZ

000 2

SETSER

0107

SETSIID

0046

STATE

0050

STATNO

oooo

STRT1M

04 1 E

STRIOM

0404

TBCXDN

01 00

TßCMDS

0110

TlMCNT

0054

T1MDMY

04 23

TMRTST

02F6

TMRTS1

0 2 FE

- TRPSET

OÜ64

TRPTOL

00 A 3

VALUES

0232

VliI SUD

0000

W1 II DAT

OOCO

vers i on 4.21.57 »

RSTVS2

0004

RO

= 0002

R5

= 0502

SERENO

0 1 F 3

SET INO

060E

SETPO •

0 IC7.

SETSR1

0 | 9 P

STCIIK

00512

STR20M

04 1 9

TßCMDW

0100

TIMINT

04 2 4

TRI PST

0 3 ! 4

UNLOCK

0049

WORKBF

0 0 6 E

No o ir ors dotgolod

-Oct-79 12:47:50

RSTIA OOD5

R1 =0102

R6 =0602

SEREN 1 01C1

SETINI 0617

SETPOS 01 DP

SOFTER 0176

STCIIK 1 0060

STR60M 04 12

TCNT =00 0A

TIMSTP 04 0 1

TRIPTM 04 79

UNLVSZ 0003

WRKÜF1 0066

RST1 1

OAAD

R2

= 0202

R7

= 0702

SETERR

05DC

SET1N2

0624

SETPTM

04 7D

SPOSIID

00C1

STRM IL

0407

T

= 0008

TCNT 1

= 200C

TIMWIIO

0055

TRPFAT

0008

VALUE

023 1

WRKBSZ

00 0 0

Clous Tü tot uncii listino (MICRIïF version 4.0)

Symbol Refs IH = dii L: i n i L. i on $ = write <blank> = read)

ACM ['lin

1 J 1 1

1 1 U G

ACTlll.K

11)01

101 2 3-12

2 15 6 21)05

2109

2203

22 1 2

AMT HP

1 0 (J »

1ÜU

6 9 2

003

2 4 04

2550

AMTSZ

109

61)9

2 4 9 5

Asccnc

290

940»

1243

Ascecc

76|

77

9 4 3

ASCREG

77»

70

040

1047

1049

1230

ASCRSZ

73

941

12 3«

1240

1524

1527

AS12RSZ

77

ÜADIIOM

1)11

1211»

1 250

1274

I3ATAMT

u y»

0 1

65 9

1051

1255

HATAS2

[il

660

1 255

1257

UATCIIT

ni »

n 3

1052

1267

1 5 70

UATCS.2

Q 3

660

1267

1 269

1571

BL.KMÜV

'103 »

407

41)9

690

730

023

1525

15511

1044

2053

CIIGPRV

505»

2537

2530

2747

27 4 0

C UU AM

710

2 4 9 3 »

cuuamV

1 Ü50

1936

2 4 9 4

CJ.RI1AT

5 4 6

650«

2263

2669

1523

1216

ê

Os 9\ K)

ci.itniio

1 JOI

ci.mwa

2 4 7 71

2 4 79

CLPULK

29 1

66 1

2 4 7 5 11

2496

2565

2 û 6 5

CLRSI2R

5 4 9

67011

CLRSIID

1 J 3 «

CLRWK

3 2 1

2 4,7 1 «

CLRWRK

] 2 6 ü

1550

1 6 5 11

24 72»

CMHCfìF

1 00 *

1 10

56 5

6117

704

1031

1 04 fi

2 6 0 3

2610

26 11

2661

CMDÛS2

1 10

CMDDAT

632

6 3 4 *

CMDOIIY

637

64 3 *

CMC R X

6 1 y

150 1

1 fl 11 6 H

CNMES

599

6 23 »

CNTXPL

1 0 2 U

103

5 69

592

1114

COMFAT

24 0 M

1363

CONL'CC

3 4 a

35

1529

CRC

9 4 2

1520

194 1

24 2 1 *

CRC 1 1 Ü

2 4 2 2 M

2 4 2.6

CRC21Ü

2 4 4 7 a

24 54

CRC22U

2 4 5 1

2 4 5 3 il

CRC INI,

23 11

2 26Ü

2 3 4 9

2 4 2 1

CRCNl'ü

2 100

24 2 3

2 4 2 4

24 4 6 «

CRCPLY

2 :i 3 M

2452

CHXfiLO

1 75û II

1770

17 7 7

OS OS fts> «fct

U) 4^

1030

>

175711

1 760 1

1764

1766

1751

1 74 0 1

1 73ÛI

1912

1910

1916

1004

19071

1 9 1 9 II

1 095 1

1 092

1096

1749

1 272

034

3401

3 4 4 1

347 1

3511

34 1

1757

1773

1 773 1

1 775 1

1734

1 762 *

1607

1750

1910

1 926 »

19141

1923 1

1 0071

1911

1924

1095

109011

1090

1901 1

1 753 1

1 753

1522*

2742

922 1

1526

361

373

365

367

369

375

365»

2014

CTXBL7

343

369 *

CTXBL8

332

334

CTXBL9

347

375 *

CTXBLP

3 3 4 1

350

CTXDYT

326 1

1404

CTNCN2

1 502

1507*

CTXCNC

1461

1 500*

CTXCNP

1466

1470

CTXCWT

1 4 63 1

1463

CTXME1

1 457*

1500

CTXMER

1405

1491

CTXMES

910

1 455 *

ÇTXMI-P

1 4 0 2 *

1407

CTXMSO

1459

1 4 66 *

CTXMS1

1464

1 4 7 4 *

CTXMS7

1400

1 4 09 *

CTXMSP

1 470*

1471

CTXPWT

1 4 72 *

1472

DATE

03*

04

DATES2

04

DECADI

1004 *

1012

DECADD

924

1002*

DECSßl

4 3 3 *

443

DECSD2

439

44 1 *

DECSUll

4 2 0 *

1249

371 II

1490

1 504 il

15101

2630 2732

1241 1250 1265 1270

1565 1506 1590 1032

vi

4^ 4^

> ISi

S>

2723

•2520

DELSOO

0131.0 OP

DISAß1

D1SAB2

DISAB3

DISABI,

DI SBTM

DISUET

DISSTA

DISTMI

DÛACCT

DOST4 A

DOST5A

DÛSTA)

DÛSTA3

DOSTA4

DOSTA5

DOSTAM

DÛSTA7

DÛSTAT

DQTfU P

DOTRP1

DOTRP2

DOTRP3

DÛTRP4

522S

1402

5 2 3 1

523

962

9 6 5 H

9 6 B |

969

9701

305

509

1 3 9 6 1

96 311

966

6 4 911

650

1 4 0 2 «

1 4 0 3'

1 190

1 2 36 1

1124

112 71

1 140

1 1 421

1090

1 094 1

1 109

111 21

11171

1 1 1 Û

1 1 34Ï

1 136

1 1 40|

1101

1 1 50

470

10061

1004

1 1 0611

1193

11961

1 20 1 U

1 202

1 1 99

1 203*

1205

1 2001

1495 1497

959 Jt 1Û37

2037

11501

1 506 1 (156

1007 1914

>

Ut OJ

0\

o\

N> £

dûtrp5

1209

1213*

dsrle

544

656*

dsbliid

120»

dsccrc

1252

1 939»

2739

2000

dscecc

74*

73

1942

osereg

75»

76

922-

1040

1563

1584

2527

2 5 5 0

2563

2721

Dscnsz

76

922 '

923

1240

1563

. 1584

19 4 0

2522

2527

2558

2564

2670

271 2

2721

2722

2725

nui.:»:»*:

75

ix* il f at

2 4.1*

19 27

enahl 1

1 002»

1 nos

enaql2

1007»

înio

enabl3

i non imo»

enadle

5 0 3

651

1 793 *

enarot

970

1006»

enahtm

1394

1 407»

enaret

1794

1 790

1012»

enqle

543

646»

1065

bnßled

127*

1 302

emdeiid

129*

endent

545

677»

emtaiio

142*

emtamt

557

692»

9\

OS S) 4^

1939

1505 2574

>

55 fl

1 39(1

5 01

577

5031

00)

0711

m 9

1510

1367

1093

1160

492

1635

1 6701

1600

1622 1

1 720|

069

05 1

00 4 1

005

693

6671 1409 503 1 579 506 09 0 0 13 6 31 1091 1 370 » 1212 2595 1 369»

716 1 637» ) 600 1 690» 1639 1726 1609 059 090 0(17»

1415» 500

1369 1927» 1 364 »

1 624 »

1643

171 1 ï

074 »

509»

1405 2523

1640 2576

1418

2575

1674

1421

2671

1677

1928

70 5

fl 1U

0 2 91

7Afl

779 1

04 7

7 91

065

032

027

0 30

09 6 1

9Û7I

70Û

45011

4 62 1

1 107

4 7 4 1

4 69 1

24 2 1

6 20

596 1

600»

50 2

601

707 021 »

039 »

040 04 9» 0 6.1 » 060 » 0361 914» 916» 919

1223 795 » 469 1052 1162» 612 1 197 1211 6 30 « 9 1 2

504 611

791 075 077 802 891»

1164 2069 1003

507 591» 621 615»

ini.E4

602

i ni.i.:r>

6 0 5

1 N'l'I'AT

24 1»

1 NTPOS

1320

LAST

1 10»

LIMTST

4 05 »

LOWPOS

92»

LOWSET

\ 29 1 »

LOWSTl

1293

LSTATE

600

LSTATW

306

I.W PS S Z

93

METS'l'A

594

MRSTAT

90»

MSERMO

90»

HSERS2'

91

M-TRTVP

ß 9 »

NODATA

126»

NVM110

2 1 05

NVIll3 0

22 14

NVM14 0

22 17

NVM150

219)

fini»

(»i ìli IHM 1 3 Q I I

15 01 10 20 03 563

1457 1903

1 290 f

793 965

2571 2505 505 646

653 »

99 293

1117 1213

91 ]059

90

2 U17 »

222 1 »

2220 2223» 2 2 4 0 »

1050 1500

901» 13 66 183 4 2059 902»

307 1045 1055 1411 1590 2825

2183

U» -J

1062

ON ON K>

NVM190

2195

2207

2235

NVM195

22 26

224 3 »

NVM210

2 2 7 1 II

2273

NVM22Û

2266

2260»

NVM310

2305 1

2310

NVM410

2 352 1

2354.

NVM4 20

23 37

2362»

NVM510

2390»

2396

NVM520

2 39 1

2402» '

NVM610

20 3 H

204 0»

NVM710

2079

200 1 »

NVM715

2003 »

2117

NVM7 2 0

2007

2009»

NVM7 30

2092 »

NVM7 3 5

2097

2102»

NVM7 4 0

2105

2107»

2109

NVM7 4 5

2100»

2100

NVM7 50

2 102

2119»

' NVM7 00

2 124

2129»

NVMRLK

101 i

102

1977

NVMßYR

2010*

2271

2270

MVMnyr

20 I 9

2023»

2300

NVHQVW

20 2 1 11

2 23 4

2 3 4 7

MVMCnG

500

595

2103«

22421

2197 2395

2352

2236

2359

I

>

Ui 00

2334

2225

290

2206

2029

2 203 1

296

1 979 1

1 Q 7 7 *

2 152»

201

265 I

2652

264 0

2653

2654

2600

73»

7 4

2517»

2519

2657

2707

2650

2762

2300»

1 377

2 2/6 5 2032 2060 2263 » 22 3 1 2300

2194

2656.»

2657»

2651 »

2650»

2659»

266 1 »

74 1263 2656 2590 » 2705» 2755» 2760» 2765»

1301» 2243 2012 2070

2 3 0 2 »

2060»

2010 2392 23 39

23 34 »

2757 2767 2111

209 290 1050 1263

1264

PGEOO

2659

277011

pcpoo

2772

2775»

PÛLCNT

1041

105

PSfiAl

1572»

1575

PÛSOAT

1567

1569»

POSLOW

1 570

15000»

PÛSTS2 •

30

1239

2064

PÛSIJPD

572

1192

POSVAL

791

00

205 1

POSVNß

1531

1054

POSWRK

1236

1550»

PRCRX

455

4 6 4

PRCTX

463

1 452 »

PROPAT

2191

1092

POSTAT

701

7 9

PRSTS2

7 Ü

PRTPAT

2 30 1

PWRDN

263

200»

PWRER0

20 1 6

2070»

PWRÌSR9

2114 6

207 1 »

PWflPRG

202 1

20Ì0

PWRUP

250

204»

PWRUPO

297

299»

1256 1553 1559 1056 1552 1043

1596

1066 1QQ2K 2019

1094 1393 2020

1006

1247

1 562«

1046

206 1

1562

1505

2056

960

206911

C\

o\

Ê

2052

1062

> os o

203 2

PWRUP2

2797

2000 B

PWRUP4

2.102

200511

PWRUP5

2011

2 0 1 4 II

PN R IIP 6

203 2

203411

PNRHP7

2035

2 Û 3 II t

PWRUPO

2 0 4 2

2 0 4 4 II

PWRUPO

20671

PWRUPA

301

2795 1

QUESTA

5691

650

662

669

691

2749

207 1

RAMSTP

2 15 6 1

2270

235 1

RCNMES

6 1 5

613|

RECBPL

1031

104

597

1060

1000

RECRS2

106

RECRUP

10 5|

106

623

600

695

RBCSTI

456

470 |

RECSTS

4 55 1

604

060

1201

1009

REQVRß

1471

RESET

601

2603 1

RESETI

254 l II

2540

2600

RETEXC

57211

616

630

RETVAL

635

700|

RMRS

2500

2 6 1 O U

RMRS1

26 74 II

2679

731

1379

> Os

1920

Os Os

4^

2 ß ì 0

2567

25(11

27171

25 29

27 17

2 7 2 7 *

2 5 7(1

941

96

n 6 m

1056 1

2537 1

2539 »

2724

253 1 »

2535

2593 »

2556

2553

1(14 1 »

26inif

261 511

2522*

2621 2735 27 4 4 »

25(10»

272 1 *

273 1 2603

96

07 2532

2542

2751 »

25Q6

2594 1

2719

2570»

2571 *

1356

26 36

2633

2573

2647 2663 2667 2676 2606*

2730*

271 1»

2604

1060 1957 2714 2745

2561

2607 2752

2546

2 4 6 *

n 5 jf

06

14 1*

722

691 M

679

1025 *

2 4 4 *

1 0 5 3 *

1055

1057

70 2

93*

94

553

696

1322

540

132*

660 *

54 2

2505* 2594 06

2673'

723

727*

703* 1033 1 420 1067 1 050 * 1 06611 1 027* 94

1036

2060 5 6 4

1061

10 2 7

694 * 713* 1 420* 663 *

675 547 639 * 14 15

552 670 1622

554 707 1025

555 711 2539

556 726

559 820

sposilo

1 3Û1

1049

2049

STATE

9 9*

100

9 ft 2

1151

2039

STATMfi

1521

STCRK

385|

656

663

670

677

STCIIK 1

306*

576

1301

1793

STRIOM

4 6 7

603

618

908

1162

STR20M

1 Uli)

1 3 401

1846

2010

2067

STllfiOM

967

1 3 36 1

inno

ST RH 11<

1 3271

STRI IM

1334

Ì 3 4 3 1

TQCHDM

54 2 1

TßCMDS

5621

TOCMDW

5521

685

TI MENT

961

97

1 327 .

1340

1353

TIMDMY

1 3 4 0 1

TI M I NT

267

1 350»

TIMSTP

1203

1364

1 4 2 3 1

1811

1858

9711

9 3

1336

1426

TMRTS1.

1026

10291"

TMRTST

1024 II

1475

1901

TRI PST

i on 4 Ii

1 105

TRIPTM

1 207

132 1

1417»

TRPFAT

2451

14 17

TRPRET

22ÛÏ

1 1(17

a ts> £

13251 2854

> OS

TBTPOI.

2 2 7 K

1 204

UMLOCK

911

92

562

1057

1597

92

1 597

VALUE

797

80211

VALUES

640

654

803 |

VI. 1 Siili

1 4 (11

916

1088

1 220

2822

WORKUP

1071

108

450

822

036

1247

1 256

1261

1268

•

1667

1 6H7

2024

2036

2209

2229

2232

2276

2 357

2889

2472

WRKQF1

1 06 V

107

485

490

2844

HRKPSZ

107

)0fl

1261

1268

2473

WTIIOAT

137|

1214 1239

1522 1551

210 7 2200

2304 2345

2855

ON ®\ KJ

S

£ K)

K

Ci/osa rü fe rance

1 i S C Î I1Q

(M 1011131'

' versjon

4.0)

Symbo1

Refs |

« = dâfini Lion

9 = wril:e <blank> = read)

ACHPlin mi

1 196

ACTni.K

ioni

101

2156

2109

2203

2212 2263

214 2

2005

AMT 11 F

ioni

109

692

003

2494

2550 2669

AMTS 2

109

60 9 .

24 95'

ASCCRC

2 Ü 9

940 «

124 3

ASCliCC

761

7 7

943

ASCRBG

7 7«

70

940

1047

1049

1230 1523

ASCRS 2

7 3

94 1

12 30

1240

1524

1527

AS ERS 2

77

TiADIIÛM

11)1

1211«

1 25tt

1274

DATAMT

0 9 «

01

659

1051

1255

BATAS2

01

660

1 255

lv25 7

BATCIIT

01 «

0 3

1052

1267

)57n

BATCS2

01

660 '

1267

1269

1571

ni.KMOV

403 «

.407

409

690.

730

023 1216

15 2 6

15511

1044

2053

CIIGPRV

606«

2517

25 3 0

2747

2740

CLR AM

7 1 9

2 4 9 3 «

CLRAMT

l 11 5 9

193 6

24 94

CLRRAT

54 6

65 9«

on on

cuinim

1 30||

CLfìflK 1

2 4 7 ? M

2 4 7 9

CLPRLK

2 0 1

66 1

CLRSER

549

670 «

CLRSIID

1331

Cl.RWK

321

24 7 1 *

CLRWRK

1260

1550

CMßCßF

1091

1 1 0

1 040

CMRÛS2

1 10

CMDDAT

632

63 4 *

CMDÛllY •

637

64 3 *

CMCRX

619

1501

CNMES

599

623 *

CNTXPL

1021

103

COMPAT

2401

1363

CÛNECC

341

35

CRC

942

15 2 0

crcl10

2 4 2 2 1

2 4 26

CRC210

24 4 7 1

24 54

crc220

2451

2453 *

crc ini.

2311

2 268

crcm1i1

2 1 00

2 4 2 3

CRCPLY

2 3 3 1

2 4 5 2

CRXI1L0

1 7 561

1770

217511 2406 2565

1 65(1 24721

565 - 6 0 7 704

2603 2610 2611

1806*

569 502 1114

1529

104 1 24 2 1 ï

2340 2421 2 4 2 4 2 4 4 6 »

1777

2065

1031 1038

2661

>

CT\ »-J

OS Os N>

£

1 764

1766

1 751

1 7 4 n «

1 7 3 0 |

i a 12

1910

1916

10 0 4

1 9071

19191

1 095 1

1092

1096

1749

1 272

034

3 40 1

3 4 4 1

3 4 7 1

3511

34 1

1 757 1773 1 773 | 1 775» 1734 1 607 1750 19 10 1914» 1 9 23 » 1 007» 19 11 1924 1095 1 090 » 1901» 1 753 » 1522» 922 » 36 1 3 6 5 3 67 375 365»

{

1 762»

1 926»

1090 1753

2742 2014 1526 373

369

343

332

347

3 3 4 1

3 2 6 1

15 0 2

1461

1466

1 4 6 3 1

1 4 57 1

14 05

9 10

14021

14 59

1464

1 400

147ÛI

1 4 72 1

031

04

1004 1

924

4 3 3 1

4 39

420 1

369 1

334 3711

375 1

350

14 114 14 90 1 5 0 7 1

15 001

1470 15041 1463 1 500

1491 15101

1 4 55 1

1407

1 4 6 6 K

1 4 74 1

1 4 09 1

14 71

1472

(14 2630 2732 1012

10021 1241 1250 1265 1270 2723

443 44 11

1249 1565 1506 1590 10 3 2 2520

DELS00 -

5 22 1

1402

1495

DEL00P

523 1

523

DI SAß 1

962

9651

DISA02

9 6 G D

969

DlSAß3

9701

DISAßL

3 05

509

9591

DlSBTM

1 396|

DISRET

96 3 1

966

DISSTA

64 91

65 Q

DISTMI

1 4 021

1403

DÛACCT

1 190

1 2361

2037

DÛST4A

1 124

1 1271

DÛST5A

1 140

11421

DÛSTA1

1090

1094 1

DÛSTA3

1109

11121

DÛSTA4

uni

DOSTA5

11)0

11141

DOSTA6

1 1 36

1 1 4 Û «

DÛSTA?

1101

1 1 50

11501

DÛSTAT

470

1 0(161

1506

DÛTRlP

10 0 4

linai

DOTRP1

1193

1 1 96H

DOTRP2

1 20 1 1

1 202

DOTRP3

) 1 99

1203 1

DOTRP4

1 205

12on«

1497

1007

1037

1 056

S £

1914

dûtrp5

1209

1 21311

dsble

544

6 5 6 i

dsbliid

1281

dsccrc

1252

1 9 39 1

2739

2800

dscecc

74 1

73

1942

dscreg

751

76

9 22

1048

1563

2527

2558

2563

2721

dscrs2

7 6

922

923

1248

1563

1940

2522

2527

2558

2670

27 1 2

272 1

2722

dsers2

75

eciifat

2 4 3 1

1927

enadli

1 80 2 1

1805

enabl2

1007 1

1810

enabl3

1 oon

1 a ioy

enadle

583

65 1.

1793*

enarrt

970

1 006 1

enaHTM

1394

1 4071

ENARET

1794

1 798

1012*

en rle

54 3

6 4 6 *

1865

enbled

1271

1 302

endeiid

1291

ENDENT

545

6 77 *

entaiid

14 21

EflTAMT

557

692 *

I

1584 1939

1 504 • 1585

2564 2574 2725

>

ENTCB1

6 Q Û M

693

ENTCIID

1431

ENTCMß

550

6671

ENTMDN

1 3 9 ti

1409

EXCBAS

5 Q 1

50 3 1

EXCDIS

577

579

EXCENI}

5031

506

PATCNT

uni

09

PATCÛD

071

00

FATCOM

1319

1 36 3 1

PATECII

15)0

1091

PATER 1

) 367

1 3701

PA.TERR

1093

12)2

2595

FATRR1

1 160

1 3691

FMTCII

4 92

716

FMTCII 1

1635

1 6371

PMTCII2

1 6701

1600

FMTCII 3

16 00

1 6901

FMTERR

1 622 1

1639

FMI NB 1

1 7 201

17 26

FMTNB2

069

1609

FMTOIQ

051

059

FMTÛl1

0041

090

PMTO12

005

0071

11)51

500 5091

1369 1 9271

1364» 1405 1410 16241 2523 2575

1643 1649 1674

171)1 2576 fl 7 4 II

S

S)

U)

«t

1421 19 20 >

-J K)

2671

1677

FMTOl 4

7115

707

701

PMTOTl

0 1 9

021 U

PMTOT2

020«

FMTOUD

700

0 30 «

FMTOU1

770«

040

FMTOU2

047

04 0 «

FMTOU3

703

061 «

FMTOU4

065

060 «

FMTOUA

032

■ 0 36 «

FMTSÛF

0 27

914«

FMTSTA

030

016«

FMTSTS

006«

010

FMTTRP

007 «

1223

FMTVAI,

700

705«

GETD

4 50 «

460

1164

GETDQ

4 6 2 «

1052

GETD1 A

1 107

1162«

2060

GETSTA

4 7 4 «

612

GETSTS

4 60 «

1107

1003

IIOMFAT

2 4 2 «

1211

IIRDÜAD

620

630 «

JDLEO

506«

912

I DJ.E 1

600«

I DT.E2

502

504

507

I DI.E 3

60 1

611

615«

n?5

077

5011

621

002 091«

0\ OS K)

£

IOLB4

602

60311

IDLB5

605

6131

1 NTFAT

24 11

1404

IHTPÛS

1320

1 301 II

LAST

110!

LIMTST

4 Ü 5 1

1 5Û 1

i o 2 n

LOWPOS

9 2«

93

563

10 5 0

LOWSET

1 2 9 1 «

1457

1 003

LOWST 1

1 293

12 9 0*

LSTATE

600

70 3

0 65

9011

2571

25115

2059

LSTATW

3 fl 6

505

6 4 6

0(12«

LWPSS2

0 3

METSTA

504

6531

MRSTAT

om

9 0

203

307

1117

1213

1411

MSBRHÜ

9 0|

91

1059

MSERSZ

91

MTRTVP

091

90

HÛDATA

12611

NVMl10

21(15

2 1(17 I

NVMl 30

2 2 M

2 2 2 Ii

NVM14 0

2217

2 220

2223 «

NVMÌ 50

2191

2 2 4 0M

1500

1366

1045 1590

S

U> 4^

1Q34 2103

>

1055 1062

2025

NVMl90

2195

2207

.2235

NVM195

2226

22 4 3 1

NVM210

2 27 1 1

2273

NVM 2 2 0

2266

22601

NVM310

2305|

2310

nvm410

2 3 52 1

2 35 4

NVM4 2 0

2 3 3 7

23621

nym51û

23901

2 396

NVM5 2 û

2 39 1

24021

NVM610

2 0 3 Q

20401

NVM71Q

2079

2001 1

NVM715

20031

21 1 ?

NVM720

2007

20Û91

NVM7 3 0

2092 1

NVM7 3 5

2097

21021

NVM? 4 0

2 105

2 1071

2109

NVM745

2 1 00 1

21 00

NVM?50

2102

21 101

NVM700

2124

2129V

NVMOLK

1011

102

1977

NVMQVn

2 0 1 Q 1

227 1 '

227(1

nvmqyt

2019

2023 1

230H

NVMfm-1

202 11

223 4

2 3 4 7

NVMCBG

50(1

595

2 1031

22421

2197 2395

2352

2236

2359

> —1

Uì

2334

ON OS ts> 4X £

NVMER

2225

2300V

NVMPAT

290

1377

1301V

NVMFND

2206

2265

2302V

NVMNIB

2029

2032

2060 V

NVMÛPM

2 203 V

2060

NVMRD

296

2263V

2010

HVMSTl

1979V

223 1

2392

NVMSTP

1 977V

2300

2339

NVMTBI,

2152V

NVMWR

21) 1

2194

, 2334V

PAGOOO

265 1

2656V

PAGAOÛ

2652

2657V

PAGBR

2640

265 1 V

PAGCÛÛ

2653

2650 V

PAGEÛO

2654

2659V

PAGRET

2600

266 1 V

2757

PECEKT

7 3 V

74

209

PECESZ

74

1263

1264

PCBÛÛ

25171

2666

PG900

2519

2590 V

PGAÛÛ

2657

2705V

PGÛÛÛ

2707

2755 V

PGCû'û

2650

2760V

PCDÛÛ

2762

2765 «

2243 2012 2Q70

r?67 2777 290 1050 1263

0\

Q\ Ni se

> on

PGEOO

2659

2770*

PCFOO

2772

2775*

PÛLCNT

104*

105

1006

PSDAl

1 572 *

1575

POSDAT

1567

1 569*

POSLOW

1570

1 5 000 *

POSTSZ

30

1239

1247

2064

POSUPO

572

1.1 92

1 562*

POS VAI.

79*

00

1046

2051

206 1

POSVNH

153*

1054

POSWRK

1236

1 550 *

1562

PRCRX

455

464

1505

PRCTX

463

1 452 *

2056

PRÛPAT

239 *

1092

PRSTAT

70*

. 79

960

PRSTS2

79

PRTFAT

230*

PWRDN

263

200*

PWRER0

2016

2070*

PWRER9

20 46

207 1 *

PWRPRE

2023

2030

2069*

PWRUP

250

204 *

PWRIJPO

297

299*

1256 1553 1559

1056 155 2 104 3

1596

1066 10021 2019

1094 1393 2020

2052

1662

2032

PWRUP2

2797

2000*

PWRUP4

2302

2005*

PWRUP5

20 1 1

201 A *

PWRUP6

2032

2034 *

PWRUP7

2035

2030*

PWRUPQ

204 2

204 4 *

PWRUP9

20671

PWRUPA

301

2795*

QUESTA

5691

650

662

669

691

2749

2071

RAMSTP

21561

2270

235 1

RCMMES

615

613*

RECOPL

103*

104

597

1060

1000

RECRS2

106

RECBIJP

105*

106

623

600

695

RECST1

456

470*

RECSTS

455*

604

960

1201

1009

REQVRD

147*

RESET

601

2603*

RESETI

254 1 *

2548

2600

RETEXC

572*

616

6 3 û

RETVAL

635

700*

RM RS

2500

2610*

RMRSl

2674 *

2679

Os Os

£

731 1379

> OO

1Û87 1920

rmserr

2 6 i n

262 1

264 7

rst1 1

2 5 6 7

2 7 35 '

2 7 1 n u r s t 1 ) a

2 5 11 1

2 7 4 4 v

rstl 2

2 7 4 7 1

rstl a

2529

2 5 0 0v

rstaml

2717

272 1 v

rstam2

272711

273 1

rstamt

2 5 7 fl

2 6 0 3

271 1 v rstdas

94 v

96

2604

rstbsz

96

rstcnt q 6 v

• 117

1060

rstcûm

1056v

2532

2745

rsterl

2537v

rster2

2539 1

25 4 2

256 1

rstera

27 2 4

2751 v

rsterr

253 1 v

2 5 06

26 0 7

rstpat

253 5

2594 v

RSTFTfl

2593 v

2719

rstman

2556

2570v

rstmnl

2553

2571 v

rstìo

1 û 4 1 1 '

1 356

rstrml

261 flV

2636

rstrm2

2615v

2633

rstrm6

2522 «

2573

2(.63 2667 2676 2 6 8 6 8

1957 2714

2752

rstrms

2546

25 051'

rsttry

246 1

2594

rstvar fì 5 1

86

2673

rstvsz

06

sdatim

141«

sedenû

722

723

727«

sereni

691 «

serent

679

703 «

seterr

1 825«

1833

1836

setfat

24 4 «

1 4 20

setino

1 853«

11)67

seti ni

1855

. 1858«

setin2

1857

1 866 «

2868

setint

782

1 8 2 7 «

setlim

93«

94

564 1061

• 1027

seti.sz

9 4

s et po

553

694 «

setpûs

696

713«

setptm

.13 2 2

1 420«

setser

548

66 3 «

setsiid

1.12«

sets r1

668«

675

softer

542

547

552 554

555

639«

67 0 707

711

1415

1622 1825

2539

8 *>>

£

>

00

O

559 8 20

sposnn

13 n n

10 4 0

2049

STATE

99 i

100

902

1151

2039

STATNB

1521

STCRK

10511

656

661

670

677

STCIIK 1

10 6 «

576

1101

1791

STRIOM

467

601

610

900

1162

STR20M

non

11401

104 6

2010

2067

STR60M

967

1116«

1 000

STRMIL,

1 3271

STRI IM

1114

1141«

TBCMDN

54 21

TÛCHDS

562 1

TBCMDW

55 2 1

605

TIMEMT

9 6 M

97

1327

1140

1353

TIMDMY'

1140«

TIMI NT

26 7

1 150«

TIMSTP

1 201

1164

1421«

1011

1050

971

93

1116

1426

TMRTS1

1026

1029«

TMRTST

1024 II

1475

1901

TRIPST

10041

1 105

TRIPTM

1 207

112 1

1417«

TRPPAT

2 4 5 ï

1417

TRPRET

22 61

1107

13251 2054

> 00

ON On

■fc»

TBTPOI,

22711

1204

UNLOCK

9 t II

9 2

562

1057

1597

92

15 97

VALUE

7 9 7

(J 0 2 1

VALUES

640

654

0031

VLIsun

140 1

9 1 6

100 0

1 220

2022

WQRKni"-'

1 Ü 7 I

ton

450

022

036

124 7

1 256

1261

1260

1667

1607

20 2 4

2036

2 20 9

2^29

2232

2276

2357

20119

2472

WUKBE1

1061

107

405

490

2044

WRK0S2

107

1 0(1

1 26 1

1 260

2473

wtiidat 1 3 7 ï

o\ o\

SI

t

1214 1239

1522 1551

2107 2200

2304 2345

2055

TlL. Ô50Û DRUCKER PROGRAMM CA804 8/11 version 4.21.57 15-Oct-79 14:6:17

1

2 Titel Modell 6500-Druckerprogramm

3 PEPPRP - Drucker

4 Aufbau-Organisation füt Drucker-Haupfcfluß

5 Version mit .zusatzlichem Vermittler ó

7 a

9 COPYRIGHT 1979 PITNEY 0OWES INCORPORATED

10

11

12

13 CHECKPOINT 12 SAME OBJECT CODE AS OCTOBER 4,1979

14 OBJEKT-KODE GEHÖRT ZUR SERIE'INTEL 8048 MIKROPROZESSOREN

15

16 INCLUDE DM2iEQUIV 1?

1B EQUIV - Drucker

19 Äquivalenzen

20

21 RAM-Speicherplätze

22 0020 POSTII EQU 2011 "Portogebtlhr ist"-Header

> oo

Os On

■U

£

23

2-1

25

20

27

2a

29

30

31

32

33

34

35

36

37

38

39

NTER

PROGRAM CA0 0 4 0/ 1 1

vers ion

4 .21.57

15-Oct-79 14:6:47

0021

POSTO

EQU

2111

gegenwärtige Portogebühr (3)

0024

DATEII

EQU

2411

(X) 1Datum-ist'-Header

00 2 5

DAT ED

EQU

2511

(X) gegenwärtiges Datum (3)

0028

TGMP

EQU

2011

(X) Zwischenspeicherplätze (8)

0030

DELTA

EQU

3011

Portogebührenänderungen (6)

0036

STATU

EQU

3611

S ta tus-lleader

0037

STATUS

EQU

3711

Status

00 3 Q

DSTAII

WQU

3811

Diagnosestatus-Header

0039

FESTA

EQU

3911

verhängnisvoller Fehlerstatus

00 3A

INSTA

EQU

3 AU

(X) verhängnisvoller Fehler, Information

00 3 Q

DSSTA

EQU

3BII

Status außer Betrieb setzen

003C

I NU

EQU

3C11

Eingabe-Header

0030

INO

EQU

3D1I

Eingabe-Puffer (3)

(X) = Gegenwärtig nicht verwendet

PAGE

5ÛÛ

40

41

-12

43

44

45

4 6

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

PRINTER PROGRAM CA 0040/11 version 4.21.57 15-Oct-79 14:6:47

Û00Û ORG 0

Seite 0 entheil t Anf angsaetzung, Hauptprogramm-Scheduler und Fühlerhandhabungsroutinen

INCLUDI:: l)M2: IN ITI'

INITF - Drucker Programm

Benötigte Stapelebenen = 5, wenn kein Fehler

Anfangssetzung Komm.-Header und starte Zeitgeber (15 Zyklen = 62,86 jisec.)

ÛÛ00

B8

36 INIT;

MOV

RO.«STATU

Anfdngssetzung Statusheader'

0002

B0

00

MOV

0RO, «0(1011

ÛÛÛ4

18

INC

RO

Zeiger auf Status

0003

BO

OO

MOV

0RO,«0

Anfangssetzung

0007

88

30

MOV

RO, «DSTftll

AnfangsSetzung Diagnosestatusheader

ÛÛÛ9

BO

80

MOV

@RO, H OODII

ÛÛÛB

18

INC

RO

Zeiger auf verhängnisvollem Fehlerstatus

Û00C

BO

93

MOV

0RO, «9311

Anfangssetzung

ÛÛÛE

55

STRT

T

Starte Zeitgeber

Bringe Riegel in .Ausgangsstellung urd Vermittler nach unten (71 Zyklen = 297,52 usec. mLn.) 000p B9 6E MOV Rl. ,1110 107 Zyklen = 448,38 (isec. total 49,32 msec.

KJDEL 6 5ÛÛ

PRINTER PROGRAM CA8Û40/II version 4.21

.57 15-Oc t-7 9 14:6:47

62

0011

14

dd

INIT1;

CALL

SENSE

63

64

0013

0014

37 F2

11

CPL JB7

A

IMITI

Stift 1'

Springe,wenn Riegel vorne c Licht = Niedrigpegel an CPU-

65

66

0016 0018

D2 34

22 A7

JB6 CALL

INIT3 DI,150

Springe, wenn Vermittler unten = Licht = Niedrigpegel an

CPU.Stift 1

67

001A

E9

11

DJNZ

Rl,IN ITI

68

001C

74

DE

CALL

PREEZß

Setze zusätzlichen Vermittler

69

00 1 E

09

05

INIT2 s

MOV

RI ,10511

F'ehler "Vermittler nicht gefallen"

70

71

72

0020

24

AB

JMP

ERROR

Anfangssetzung fiir Motope auf Ausgangsstellung (17.619 Zyklen = 73.832,009 ^isec.) >

73

00 2.2

23

EE

INIT3:

MOV

A, lOßßll

00 OS

74

0024

39

OUTL

PI, A

Betriebsenergie für Motore

75

0023

A8

MOV

RO, A

Warte 74 msec.

76

0026 ■

34

A3

MS74 i

CALL

DL3 0 0

(72 Zyklen = 301, 71 jisec. pro Aufruf)

77

0028

E8

26

DJNZ

RO,MS14

70 79 ao

002A

89

FP

ORL

pi, hoff:

Betriebsenergie für Motore abschalten

Anfangssetzung für Schalter (35 Zyklen = 146,67 usec.)

Ol

002C

1 4

DE

CALL

SWITCH

Prtlfe "Dunkel", Lese Schalter

82

00 2 E

AE

MOV

R6, A

Speichere "OSW"

03

002F

C5

SEL

nno

84

0030

B8

37

MOV

RO,»STA

Zeiger auf Status

6500

85

86

87

88

• 89

90

91

92

93

94

95

96

97

98

99

100

101

102

10 3

PRINTER PROGRAM CAfiOlfl/11 version 4.21.57

15-Oct-79 14:6:47

0032

AO

•

MOV

@R0, A

Anfangssetzung Schalterstatus

0033

B8

30

MOV

RO,IDSS

feiger auf Außerbetriebsetzungsstatus

0035

AO

MOV

@ RO , A

Speichere Schalter-Info.

Anfangssetzung für

Fühler (69

Zyklen = 289 , 14 |isec.)

0036

14

DD

CALL

SENSE

Lese Fühler

0038

A F

MOV

R 7, A

Speichere "OSENS"

0039

53

10

ANL

A, 110)1

Schaue auf Bit 4 der "NEW"~Fühler (Ausgangsstellung)

00 3 Q

40

ORL

A, @R0

"OR" in den Status

003C

AO

MOV

@R0, A

. Wiederherstelle Status

Anfangsse tzung fllr

Druckräder

(11,6 Zyklen = 48,61 usec. bis RTS)

003D

54

23

CALL

S ST AT

Sende Status an Buchung

00 3 F

34

51

CALL

cniscW

Warte, auf RTS und empfangene Nachricht

004 1

54

OC

CALL

I POST

Anfangssetzung der Druckräder

0043

ZINIT

EQU

$ -1NIT

PAGE

Os On N> •b.

MODEL 5600 PRINTER PROGRAM CAÛ040/11 version 4.21.57

INCLUDE DM21 MAI

15-Oct-79

14:6:47

104

105

106 •107

ioa

109

110 0043

111 00 4 4

112 0046

113

114 0047

115 00 4 9

116 004A

117 00 4 B

118

119 004D

120 004P

121 0051

122 0052

123 0054

124 0056

125 0058

126 -005A

09

D3 01 39

14 BE 2 E DE

C6 62

23 3 F 5 4 2B PE

C6 5Q 4 3 08 54 3 2 88 37 P0

MAINF - PEP Drucker-Ilauptflaß (erste HMlfte)

Stationärzustandsschleife

Benötigte Stapelebenen = 4

MANI

MAN 2

IN

XRL

OUTL

CAI.L XCII XRL JZ

MOV

CALI,

MOV

JZ

ORL

CALL

MOV

MOV

A. PI A, Il PI | A

SWITCH A, Rfi A, R6 MAN3

A, «3PII ■ ENADL A, R6 MAN 2 A, 1 OH DSABL HO, I status A, @R0

Moduliere Ziffern-Motor 2 msec. ein = 1/4 Ißist' Invertiere Bit 0

Wiederherstelle neues Motor-Abbild Lése Schalter

1

Rette "NEW" in OSW Suche nur nach Änderungen Springe, wenn keine Änderung

Lasche Bits 6 & 7 des Außerbetriebszustandes

Bringe neue Bits in 6 & 7 des Außerbetriebssetzungsst;

Wenn alles abgeschaltet/ fahre fort

Wenn irgendeines angeschaltet, stelle sicher, daß Antwort von

Buchung erfordernd

Setze außer Betrieb wie erforderlich Zeiger auf Status Erhalte Status

OO OO

MODEL 6500

PRINTER PROGRAM CA0040/11 version 4.21

127

ÛÛ5D

53 3F

ANL

A, I3FII

128

005D

4 E

ORL

A , R6

129

00 5 E

A 9

MOV

@ R0 , A

130

003F

C5

SEL

RD0

131

0060

54 23

CALL

SSTAT

132

133

0062

C5

MAN3 :

SEL

RR0

134

135

0063

14 DD

CALL

SENSE

136

0065

2F

XCII

A, R7

.137

0066

DF

XRL

A, R7

138

0067

C6 90

JZ

INTRF

139

14 0

0026

ZMAIN

EQU

$-MAN1

141

142

PAGE

-Oct-79 14:6:47

Lösche Bits 6 & 7 Einsetze neue Dits Wiederherstelle

Sende neuen Status und Aussprung

Lese Optik

Rette "NEW" (neu) in "OSENS": Suche nur nach Änderungen Springe, wenn keine Änderung

6 500

143

144

145

146

147

1 48

149

1 50

151

152

153

154

155

156

157

158

159

160

1 6 1

162

163

PRINTER PROGRAM CAQ04ß/ll version 4.21.57 15-Octr-79 14:6:47

include dm2 i si1dlf

SHDLF - Drucker Fühlerhandhabungaroutine Benötigte Stapelebenen = 4

Zeitgabe: Max. To Return (No Coinm. ) = 22 Zyklen1 = 92 f 190 (isec.

Max. To CTS if RTS La on = 04 Zyklen. = 352,000 jisec.

Schrittmotor-Dekoder

0069 A9 SHDL: MOV R1,A Rette Änderungen in R1 006A 53 0P ANL A.IOPH Schaue nur auf Kodierer 006C C6 72 JZ SIIDL1 Fehler, wenn Kodierer bewegt 006E B9 81 MOV R1,*Q1II

0070 24 AB JMP ERROR Kodierer bewegt, wenn unzulässig

Sprung auf Basis von Änderungen

0072 F9 SIIDLl ; MOV A.R1 Wiederherstelle Änderungen

0073 53 PO ANL A,B0FÜII Schaue auf Nicht-Kodierer 0075 4 7 SWAP A Bringe Jn niedrige Ordnung

OÛ76 E3 MOVP3 a,@A Ubersetze

MODEL 6500 PRINTER PROGRAM CA004 û /11 version 4.21.57

164

0077

72

7 F

JR3

SHOME

165

0079

92

91

»in 4

SIITN

166

0070

R9

02

MOV

R1 , // 8 211

167

007D

24

AD

JMP

ERROR

168

169

Ausgangsstellung

1 verände

1 70

00 7 F

FF

SIIOMR;

. MOV

A, R7

171

0050

37

CPL

A

172

008 1

53

30

ANL

A, //3011

173

0083

96

98

JNZ

INTRF

174

0085

F0

MOV

A,ßRO

175

0086

72

90

JD3

INTRF

176

0088

43

08

ORL

A, UQU

177

Û0 8A

AO

MOV

@RO,A

178

00 8 Q

23

20

MOV

A, // 2 011

179

00 80

54

32

CALL

DSABL

18Û

ÛÛ8F

04

96

JMP

SI1IN2

181

182

Riegel und/oder

Vermi tt.1

183

0091

FO

S II IN :

MOV

A,0 R0

184

0092

53

C 3

ANL

A, //0C31 i

185

0094

6 A

ADD

A, R2

15-Oct-79

14:6:47

Ausgangsstellung geändert Riegel oder Vermittler geändert

Ungültiges Änderungsmuster Schaue auf Daten.

Ausgangsstellung (HOME) = 1, wenn nun

Soliaue nur auf HOME

Wenn ein, Aussprung

Beide aus, erhalte Status

Aussprung, wenn bereits ausgelöst

Nicht ausgelöst, auslöse Maschine

Wiederherstelle Status

Setze Auslöse-Außerbetriebsetzungs-Bit

Setze Maschine außer Betrieb

Sende Status und Aussprung geändert

Erhalte Status Lösche Dits 2-5

Gebe neue Daten ein (Lösche Auslösung)

ODEL 65ÛÛ PRINTER PROGRAM CA804Q/11 version 4.21

186 0095 AO MOV @R0,A

1 87 0096 54 23 SUIN2: CALL SST AT îaa

189 002F ZSÜDL EQU ç-SIIDL

190

191 PAGE

15-OCL-79 14:6:47

Wiederherstelle Status Sende Status und Aussprung

6500

192

193

194

)95

196

197

1 9 Q

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

PRINTER PROGRAM CAQ04Ü/11 version 4.21.57

INCLUDE DM2 ! INTRF

15-Oct-79

14:6:47

INTRF - Drucker

Prüfe •Vermittler im llauptf luß-Scheduler Benötigte Stapelebenen = 0

Zeitgabe, wenn kein Fehler -

Minimum - 4 Zyklen e 16, 762 jisec. Mittelwert - 16 Zyklen = 67,048 usec. Maximum - 20 Zyklen = 03,009 usec.

Erniedrige Zähler, wenn' Riegel in Ausgangsstellung und Zähler nicht bereits Null

0098

FP

INTRF; MOV

A . R7

Schaue auf FUhler-Abbild

0099

37

CPL

A

Riegel nun vorne = 1

009A

F2

AB

JB7

MAN 4

Aussprung, wenn Riegel vorne

009C

D5

SGL

RBl

Riegel in Ausgangsstellung (HOME)

009D

FA

MOV

A.R2

Schaue auf Zählung

009E

C6

A2

JZ

INTR2

Fahre fort, wenn Null nicht Null

00A0

EA

AA

DJNZ

P2,INTR3

nicht Null; erniedrige, Aussprung,

wenn jetzt noch

0ÛA2

C3

Zähler ist Null. Fehler, wenn Vermittler oben und Steuerung außer Betrieb gesetzt. • INTR2 : SEL RBO

MODEL 6500 PRINTER PROGRAM CAfl04ß/ll version 4.21.57

214

0ÛA 3

0A

IN

A, P2

215

0ÛA4

37

CPL

A

21 6

00A5

F2

AB

JB7

MAN4

217

00A 7

FF

MOV

A . R7

21 a

00AQ

S 2

lß

JB6

1NIT2

219

00AA

C5

INTR3:

SEL

RB0

220

221

0013

ZINTRF

EQU

$-INTRF

222

223

PAGE

Os o\

ts) £>. £

15-Oct-79 14:6:47

Schaue auf Steuerleitung

Strom an Vermittler jetzt = 1

Auasprung, wenn nicht außer Betrieb gesetzt

Schaue erneut auf Fühler-Abbild

Fehler, wenn Vermittler oben

Auasprung

224

225

226

227

228

229

230

231

232

2 33

234

235

236

237

238

239

240

24 1

242

243

244

245

PRINTER PROGRAM CA804Q/11 4.21.57 15-Oct~79

14:6:47

INCLUDE DM2 :MAIN2 MAIN2 - Drucker

Fortsetzung der PEP Drucker-Hauptfluß-Stationärzustandsschleife Benötigte Stapelebenen = 4

Zeitgabe: 5

\

Zyklen =

20,952 |isec., wenn keine Aktivität

37

Zyklen =

155,048 |isec. auf CTS, wenn RTS ein

1,

6 Zyklen =

6,705 iisec. auf Ende nach RTS-Fehlprobe

OOAB

FD

MAN4 :

MOV

A, R5

Ist eine empfangene Nachricht in Warteschlange?

OOAC

96

B 6

JNZ

MAN6

Wenn ja,, springe.

OOAE

56

43

JT1

MANI

Kleine WS, springe, wenn RTS ebenfalls aus.

ÛÛBÛ

34

53

CALL

CRE'CV

RTS, erhalte Nachricht

00B2

54

60

MAN5 :

CALL

IIDR

Analysiere Header

ÛÛB4

04

43

JMP

MANI

Schleife zurück

00B6

07

MAN6 :

DEC

A

War mehr als 1 Nachricht in Warteschlange?

0027

07

MOV

B5 , A

Wiederherstelle WS-Anzeiger

OOBB

C 6

B 2

JZ

MAN5

WS war 1, analysiere Header

OOBA

B 9

91

MOV

Rl , Jf 9 III

OOBC

24

AB

JMP

ERROR

Einlaufende Nachricht überlagert

On On N> £*

U>

MODEL 6500 PRINTER PROGRAM CA8040/11 version 4.21.57 15-Oct-79 14;6:47

246

>

247 0013 ZMAIN2 EQU $-MAN4 3

248

249 PAGE

MODEL 6500 PRINTER PROGRAM CA8Q48/11 version 4.21.57 15-Oct-79'

H : 6 : 4 7

250

INC LUD 12

DM2 : SWITCH

251

252

Switch - Drucker

253

Lese Schalter,

prüfe auf steckengebliebene Eingaben.

254

Benötigte Stapelebenen =

0

255

256

Stelle sicher, daß

LED's 1 msec.

lang ausgeschaltet waren, bevor gelesen wird

257

Bei Aussprung ist RB1 gewählt

258

A = Statusäquivalent der Schalter

259

Zeitgabe = 27 Zyklen einschließlich Aufruf = 113,14 |isec., wenn keine Wartezeit.

260

26 1

00BE

16

C 2

SWITCH; JTF

SW1T1

Springe, wenn Zeitgebermarke gesetzt ist

262

OOCO

04

BÈ

JMP

SWITCH

Nicht gesetzt, warte

263

264

00C2

08

SWIT1 INS

A, BUS

Lese Eingabe

265

00C3

37

CPL

A

Sollte 0 sein nach Vollendung

266

00C4

96

D5

JNZ

SWIT2

Fehler, wenn nicht

267

268

00C6

9 A

DF

ANL

P2.iODFH

Schalte Schalter ein

269

OOC0

ÛÛ

INS

A, BUS

Lese

270

00C9

fl A

20

ORL

P2 , V 0 2 011

Schalte Schalter aus

Os OS Ni

Ui 4^

MODEL 6500 PRINTER PROGRAM CA804Û/1I version 4.21.

271

272

00CB

53

F0

ANL

A,Ï0P0U

273

00CD

47

SWAP

A

274

00CE

E 3

MOVP3

A, @ A

275

00CF

B2

D9

Jp5

SWIT3

276

OODi

53

CO

ANL

A, ÏOCOII

277

Û0D3

D5

SEL

RB 1

278

00D4

83

RET

279

260

0005

B9

61

SWIT2 s

MOV

Rl ,16111

261

00D7

24

AB

JMP

ERROR

282

00D9

B9

62

SWIT3:

MOV

RI, I62H

263

00DB

24

AB

JMP

ERROR

264

285

001F

ZSWITC

EQU

$-S WITC11

28 6

287

PAGE

0\ OS N)

£

15-Oct-79 1 4 i 6 : 47

Lösche Bits niedriger Ordnung Bringe Daten in niedrige Ordnung Ubersetze

Fehler, wenn Bit 5 eingeschaltet ist Lösche 6 Bits niedriger Ordnung

Aussprung ^

VO OO

Hängengeblieben

Unzulässiges Schaltermuster

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

PRINTER PROGRAM CA8048/11 version 4.21.57

15-Oct-79 14:6:47

INCLUDE DM2:SENSE

SENSE - Drucker

Lese die optischen Fühler

Benötigte Stapelebenen = 2

Nach Aufruf warte wenigstens 1 msec., bevor Lesen der Schalter, oder "Dark" (dunkel)

Bei Aussprung A = Fühlerlesewer te

R0 = Adresse des Status

R2

s Ubersetzte Statusinformation

Zeitgabe = 64

Zyklen = 268,19 usec. einschließlich Aufruf

00DD

9A

BF

SENSE: ANL

P2,//OBFII Einschalte Optik

00DF

34

hl

CALL

DL150 36 Zyklen = 150 , 86 |isec.

177,66 usec. von Einschalten ab bis Fühler gelesen

00E1

23

F3

MOV

A.//2 4 3 2 msec. Schleife? 1.716 usec. von Abschalten

13 Zählungen = 416 Zyklen = 1.743,238 usec.

00E3

62

MOV

T.A. RUcksetze Zeitgeberzähler

Q0E4

16

E 6

JTF

$+2. Rücksetze Marke, wenn ein

00E6

08

INS

A,BUS Lese Optik

00E7

8A

40

ORL

P2 , //04 011

vo

On On ts)

.U U>

HÖDEL 6500 PRINTER PROGRAM CAC04Ö/11 version 4.21.57

310

00E9

AB

MOV

R0 ( A

311

00EA

53

F0

ANL

A, lOFOI!

312

00EC

17

INC

A

3 1 3

00ED

47

SWAP

A

314

00EE

E 3

MOVP 3

A, @A

315

QOEF

12

F6

J B0

SENSI

316

00F1

AA

MOV

R2 / A

317

00F2

F0

MOV

A / RO

318

Û0F3

B8

37

MOV

RO,I STATUS

319

00F5

83

RET

320

321

00F6

B9

63

SENSI:

MOV

Rl , I 6 3 II

3 22

00P8

24

AB

JMP

ERROR

323

324

POID

ZSENSE

EQU

Ç-SENSE

325

326

0006

P0FREE

EQU

1 0011-$

327

PAGE

15-OCL-79

14:6:47

Rette Lesewerte

Schaue auf 4 Nichtkoder-Bits

Zeiger auf 2-te 16 Bytes - Seite 3

Ubersetze

B:}.t 0 = 1 wenn unzulässiges Muster Rette neues Muster für Status Wiederherstelle Lesewerte Zeiger auf Status (für später) Aussprung

Unzulässige FUhlerkombination

Freier Platz am Ende von Seite 0

6500

328

329

330

331

332

333

334

335

336

337

338

339

340

34 1

342

343

344

345

346

347

348

349

3 50

PRINTER PROGRAM CAfl04fl/)l version 4.21-57 15-Oct-79

14:6:57

0100 ORG 10011

Seite 1 enthält Konununikationsroutinen und Fehlerhandhabungsroutinen

INCLUDE DM2 :COUTF

COUTF - Drucker

Drucker-Ubertragungsroutine

Denötigte Stapelebenen = 3, wenn kein Fehler

Bei Konflikt, Zeit einschließlich Aufruf von CTS:

Min. = 35,8 Zyklen = 150,019 |isec.

Max. = 37 Zyklen = 155,048 usec.

Arbeitet in RB0; A,R0,R1,R2 zerstört, R5 abgeändert R1 - Adresse M R2 - Bytezähler Bei Normalaussprung: R2 = 0

R1 zeigt auf letztes Byte R0 = 0 A = Abfall

R5 = Zahl empfangener Nachrichten in Warteschlange

351

352

353

354

355

356

357

358

359

360

361

362

363

364

365

366

367

3 68

369

370

371

372

Os Os N»

6

■u

PRINTER PROGRAM CAG04G/11 version 4.21.57

15-Oct-79

14 : 6 : 57

0100

0101 0103 0105 0197 0109 010B 0 1 00 010F 011 1

0113 0115 0117

0119

0 1 1A

01 1C 0110 011F

0120 0122 012 4

10

34 53 46 00 9A EF BB FC 34 94 46 15 E8 09 B9 51 24 AB

3 4 4 7 34 93 56 87 19

3 4 9 A Fl

B8 08 97

8 A 1 0 3 4 9B 34 9E

COUT 1

COUT;

COUT2

COUT3 COUT4

COUT5:

INC

CALL

JANT1

ANL

MOV

CALL

JNT1

DJNZ

MOV

JMP

CALL CALL JT1 INC CALL MOV MOV CLR ORL CALL CALL

R5 RTS, Erhöhe Q (Warteschlange)

CRECV Eingabe Nachricht

COUT1 Eintritt - Springe, wenn RTS ein (T1 = 14,248 usec. max.)

P2 , II ÛEF11 Ausgabe RTS

R0,||252 Sperrzeit für 23 , 24 msec. (T13)

DELIO Warte 92,19 usec. (Schleifenzeit)

COUT4 Springe, wenn CTS ein

RO.COUT'2 Versuche nochmals, wenn nicht Zeit vorbei Rl ,15111

ERROR Zeit vorbei, verhängnisvoller Fehler

TESTI nicht letztes Byte, Ausgabe Zwischenstopp, prüfe 8-tes Bit-Eclro DELI 9 wenn erstes Byte,. T4 = 171,79 usec; übergehe nächste 3 Korrmentan hJ O M

•CEROR Rl

DELI 2 A, @R1 R0, «fl C

P 2 , I 1011

DELL1

DELQ

Prüfe Zwischenstopp-Bitecho

Zeige auf nächstes Byte

T5 = 1 . 135,619 usec.

Erhalte nächstes Byte

Zählung für 8 Bits

Setze Ubertrag auf Startbit-Echo

Ausgebe "Start"-Kante

MODEL 6500

PRINTER PROGRAM CA0Û4Û/11 version 4.21.57 15-Oct-79 14:6:57

3 7 3

0126

12

3F

J BO

CO UT 7

Springe, wenn nächstes Bit 1'ist

374

0128

34

43

CALL

TESTO

Ausgebe 0 und prüfe vorheriges Echo

375

01 2A

67

COUT6:

RRC

A

Bringe laufendes Bit nach C (Ubertrag), nächstes

376

0 1 2B

E8

24

DJNZ

R0 , COIJT5

Schleife, wenn 8 Bits nicht erledigt

377

0120

34

9E

CALL

DRLQ

378

01 2F

EA

13

DJNZ

R2,COUT3

Springe, wenn nicht letztes Byte

379

0131

34

43

CALL

TESTO

Letztes Byte, Ausgebe EOM Stopp-Bit, prüfe 8-tes

380

013 3-

34

95

CALL

DELI 7

•

381

•0135 .

46

87

JNT1

CEROR

Prüfe EOM-Stoppbit-Echo

382

0137

9A

EF

ANL

P2 . K 0EFII

Schalte "Fehlerfrei"-Impuls ein

383

0139

34

A3

CALL •

DL300

T7 = 310,09 usec.

384

' 01 3B

8 A

10

ORL

P2 , k 1011

Schalte "Fehlerfrei"-Impuls aus

385

0130

24

A5

JMP

DL225

Aussprung

3 86

387

01 3 F

34

47

COUT7

CALL

TESTI

Ausgebe 1 und prüfe vorheriges Echo

388

0141

24

2A

JMP

COUT6

Rückkehr zur Schleife (LOOP)

389

390

0143 '

8 A

10

TESTO ;

ORL

P2, | 1011

Ausgebe Daten Null

391

0145

24

49

JMP

TESTI1

392

393

0147

9 A

EF •

TESTIî

ANL

P2 , I0EFII

Ausgebe Daten 1

394

0149

56

4 E

TEST11 :

JT1

COUT8

Springe, wenn letztes Echo = 0

to o u>

OS OS N)

U

MODEL 6500 PRINTER PROGRAM CA8048/11

version 4.21

395

396 39?

398

399

400

401

402

403

014B E6 87 JNC CEROR

0140 8 3 RET

014 E P6 8 7 COUT8: JC CEROR

0150 8 3 RET

0051 2COUT EQU Ç-COUT1

PAGE

15-Oct-7 9 14:6:47 Echo = 1; Fehler, wenn Ubertrag

Echo = 0; Fehler, wenn Ubertrag

MODEL 6500 PRINTER PROGRAM CA804Û/11 version 4.21.57

15-Oct~79

14:6:47

404 INCLUDE DM2:CRECVF

405

406 CRECVF - Drucker

407 66 (Dezimal) Bytes 4 08

409 Aufruf CRECV - Unterroutine zum Empfang von Kommunikationseingaben

4 10 Benötigte Stapelebenen = 2, wenn kein Fehler 4 1 1

412 Zeitgabe, einschließlich Aufruf, bis CTS:

413 Min. = 30,8 Zyklen = 129,067 usec.

414 Max. = 32 Zyklen = 134,095 qsec. > 4 15 S 4 16 Arbeitet in RB0 oder RB1

4 17 A & R0 sind zerstört

4 19 Gibt variable Anzahl von Bytes ein, beginnend bei RAM-Spaicherplatz "INH"

419 Eingabepuffer läuft von INI! bis RAM-Byte 63 (3FII)

4 20 Ninrnt an, daß RTS ein bei Eintritt; auch alle Fühler außer Betrieb gesetzt

421 Achtung: Keine T13 Sperrzeit, Vermittler ist stattdessen vervendet

4 2 2 F1 = 1, wenn Vermittler bei Eintritt in nonmlem Aussprung in Betrieb gesetzt war

4 23 (P2B7=0), A enthält letztes empfangenes Byte,

4 24 R0 zeigt auf letztes enpfangenes Byte (in RAM)

425

426 Aufruf CRECW - alternativer Eintrittspunkt

OS On ts»

£

6500

42?

428

429

430

431

432

433

434

435

'4 3 6

437

438

.439

440

44 1

442

443

444

445

446

44?

448

PRINTER PROGRAM CAQÛ4B/11 version 4.21.57 l5-Oct-79 14:6:47

Warte auf RTS vor Empfang von Nachricht

0151

56

51

CRECW:

JT1

?

Warte auf RTS

0153

@ A

CRECV:

IN

A , P2

Leser-Vermittlerkontrollstatus

0154

AS

•

CLR

Fl

Setze Marke auf "Außer Betrieb setzen"

0.155

F2

58-

JB7

CREV1

Wenn Bit 7 = 1, lass-e Marke "außer Betrieb geset

0157

Q 3

CPL

Fl

Wenn Bit 7=0, setze Marke auf "Betrieb"

•0158

DÛ

3 Q

CRBV1:

MOV

R0,I(INH-

1) Zeige auf Eingabepuffer-1

015A

34

93

CALL

DEL19

T3 = 127 , 377 usec. min. , ,,

fallen

Ausgebe CTS oder Zwischenstopp-Bitecho, lasse Vermittler

015C

23

EF

CREV2:

MOV

A, jj 0EFH

01 5E

3 A

OUTL

< CN

eu

015F

46

5F

JNT1

$

Warte auf Vorderflanke des Startimpulses

0161

76

65

JF1

GREV3

Wenn Marke = 1, setze Maschine in Betrieb

0163

24

67

JMP

CREV4

Marke = 0, lasse Maschine außer Betrieb

0165

9A

7F

CREV3;

ANL

P2, I7FII

Setze Maschine in Betrieb

0167

18

CREV4:

INC

RO

Bewege Pufferzeiger

0168

F8

MOV

A, RO

Prüfe, ob Zeiger über Pufferende hinweg

0169

D2

8F

JB6

CREV8

Fehler - zu viele Bytes

01 6 B

8 A

10

ORL

p2 , non

Echogabe "Start" in Bit-Mitte

016D

97

CLR

c

Lösche einlaufendes Datenbit

01 6E

08

INS

A, BUS

Doppeltes NOP (keine Operation) 2um Ausgleich

01 6F

23

80

MOV

A , K 0 Oli

Anfangssetzung Akkumulator

6500

449

450

451

452

453

454

455

4 56

457

458

459

460

461

462

463

464

465

4 6 6

467

468

469

470

PRINTER PROGRAM CA8048/11 version 4.21.57

15-Oct~79

14:6:47

0171

34

96

CREV5:

CALL

DELI 6

0173

56

8 B

JT1

CREV7

Springe, wenn Daten = 0

0175

9A

EF

AML

P2 , Ì 0EFII Gebe Echo "1"

0177

A7

CPL

C

Setze einlaufendes Bit

0170

00

NOP

(Ausgleich)

0179

67

CREV6

RRC

A

Bewege neue Daten zum Akkumulator

0 1 7 A

E6

71

JNC

CREV5

Springe, wenn Byte nicht erledigt

01 7C

A0

MOV

@R0 , A

Erledigt, rette Byte

0 1 7 D

34

98

CALL

DELI 4

.01 7 F

46

5C

JNT1

CREV2

Springe, wenn Stoppbit nicht EOM ist

0181

BA

10

ORL

P2 ,! 1 OH Gebe Echo EOM Stopp

0183

34

A3

CALL

DL300

T8 = 1.291,919 usec.

0185

46

A3

JNT1

DL300

Springe, wenn Impuls "fehlerfrei", T15 « 1.591,116

0187

74

BE

CEROR:

CALL

FREEZE

Setze zusätzlichen Vermittler

0189

JMP

5

Falle to O

018Q BA 10 018D ' 24 79

CREV7: ORL ■ P2, 111011 Gebe Echo: Daten 0 JMP CREV6

018F B9 54 0191' 24 AB

CREV8: MOV Rl ,I5 4 H

JMP ERROR Mehr als Pufferkapazität empfangen

0\ Os Sì ■U £

MODEL 6500 PRINTER PROGRAM CA0040/11 version 4.21.

471

472 0042 ZCRECV EQU Ç-CRECW

473

474 PAGE

OS OS N>

Ui

-Oct-79

14:6:47

N) ©

OO

MODEL 6500 PRINTER PROGRAM CA004Û/11 version 4.21.57 15-Oct-79

14:6:47

475

INCLUDE

DM2 :DELAY

476

477

DELAY -

Drucker

478

479

Kleine

Zeitgabeverzögerungen

480

Verzögerungen schließen Aufr

481

Benötigte Stapelebenen = 0

482

483

0193

00

DELI 9 :

NOP

79,62

usec.

484

0194

00

DELI 8 :

NOP

75 ,43

usec.

485

0195

00

DELI 7 :

NOP

71,24'

Usec.

486

0196

00

DELI 6 :

NOP

67 ,05

usec.

487

0197

00

DELI 5 :

NOP

62 ,86

usec.

488

0198

00

DELI 4 :

NOP

58 ,67

usec.

489

0199

00

DELI 3 :

NOP

54,48

usec.

490

0 1 9 A

00

DELI 2 ;

NOP

50 ,29

usec.

491

019B

00

DELI 1 :

NOP

46 ,09

Usec.

492

019C

00

DELIO

NOP

41 ,90

usec.

493

019D

00

DEL9 :

NOP

37 ,71

usec.

494

019E

00

DEL8 :

NOP

33 ,52

usec.

495

0 1 9 F

00

DEL7 :

NOP

29 ,33

usec.

496 .

0 1 A0

00

DEL6 ;

NOP

25 ,14

usec.

16 (dezimale) Bytes to o

Os C\

.u

CN

S £

MODEL 6 500 PRINTER PROGRAM CAB048/11 version 4.21.57

15-Oct-79

1 4 ; 6 : 4 7 '

497

498

499

500

501

502

503

508

509

510

511

0 1 A1 01A2

00 83

DEL5: NOP 20,95 usec.

DEL4; RET 16,76 |isec.

Mittlere Zeitgabeverzögerungen - Q (dezimale) Bytes

Verzögerungen enthalten Aufruf, und lege an 3,5ù MHZ TV-Kristall an Benötigte Stapelebenen = 1-

504

0 1 A3

34 .

94

DL300

CALL

DELIO

301

'/ 71

usec.

(72

Zyklen)

505

01À5 .

34

94

DL225

CALL

DELIO

226

,29

' usec.

(54

Zyklen)

506

0 1A7

34 .

94

DL150

CALL

DELIO

150

,06

U sec.

(36

Zyklen)

507

01A 9

24

96

JMP

DELI 6

>

to ©

0018

ZDELAY EQU

PAGE

5-DEL19

>00

il 2

i 1 3

. 1 4

,15

,16

,17

11 8

19

20

2 1

22

23

24

25

26

27

28

29

30

3 1

32

33

PRINTER PROGRAM CA004B/11 version 4.21.57 15-Oct-79 14:6:47

INCLUDE DM2:ERRORE

ERRORF - Drucker

Handhabungsroutine fiir verhängnisvolle Fehler Kann von RB0 oder RB1 aus eingetreten werden Fehlereingabe - Expliziter Kode nach R1 gegeben

0 1 Aß

0A

FF

ERROR:

ORL

P2,H0FF|I

Abschalte Vermittler, LEDs, Kommunikation, u

0 1 AD

89

FF

ORL

PI.K OFPH

Schalte Motore ab

0 1 AF

B8

37

MOV

R0.ISTATUS

0 1 Q 1

FO

MOV

' A,0 R0

01B2

12

B9

JB0

ERRI

Springe, wenn Fehlerbit schon gesetzt

01B4.

10

INC

@R@

Nicht gesetzt, setze Fehlerbit

Û1B5

B8

39

MOV

R0,* FESTA

01B7

F9

MOV

A,R1

Fehlerkode in Akkumulator

01B8

A0

MOV

@R0, A

Bringe Kode in verhängnisvollen Fehlerstatus

01B9

27

ERRI ;

CLR

A

01DA

D7

MOV

PSW, A

Lösche und neueinstelle PSW

01BB

AB

MOV

R0, A

Komm.-Ubertragungsleitung für mindestens 2.338 psec.

dunkel

MODEL 6500 PRINTER PROGRAM CA0048/11 version 4.21.57

534

0 1BC

E8

BC

djnz

R0 , $

535

536

0 1 BE

17

INC

A

537

0 1 BP

54

32

CALL

DSABL

538

539

01C1

54

23

CALL

SSTAT

540

01C3

•34

51

CALL

CRECW

541

01C5

54

1B

CALL

DIAG

542

01C7

24

87

JMP

CEROR

543

544

00 1 E

ZERROR EQU

Ç-ERROR

545

546

PAGE

15-Octr79 14:6:47

(Ref. T8 = 1.340,625 usec. max.)

Anschalte Bit 0 des Anzeigestatus Ubertrage Status

Warte auf Aufforderung und empfange Nachricht

Verarbeite Nachricht

Einfriere (FREE2E) und Palle (TRAP)

6500

547

548

549

550

551

552

553

554

555

556

557

558

559

560

561.

562

563

PRINTER PROGRAM CAÖ040/11 version 4.21.57

15-Oct-79

14:6:47

INCLUDE DM2: ICOMON ICOMON - Drucker

Zentralkode durch IPOST aufgerufen Benötigte Stapelebenen = 3

01C9 0 1 CB 0 1 CD

0 1 CE

01 DO 01D1

BA 09 74 32 1A

7 4 3A

85

83

ICOMON

MOV

CALL

INC

CALL

CLR

RET

R2,//9 DMOVE R2

BMOVE F0

Bewege Rad 9 Stellungen auf Null herunter

Bewege einen Satz nach unten

Zeiger "UP'

0009

ZICOMN EQU • $-ICOMON

002E

PI FREE EQU 20011-$ Freier Raum am Ende von Seite 1 PAGE

6500

564

565

566

567

568

569

570

571

572

573

574

575

576

577

578

579

580

581

582

583

584

585

PRINTER PROGRAM CAQ04Q/11 version 4.21.57 15-ûct-79

14:6:47

0200 ORG 200II

Seite 2 enthält Naclirichten-Analysator & Hochebenen-Druckräder-Routinen

INCLUDE DM2 ; IIDRF

HDRF - Drucker Header-Analysator Benötigte Stapelebenen = 3

0200

B8

3C

hdr :

mov rovinìi

Zeige r0 auf Eingabeheader

0202

F0

mov

A ', @r@

0203

D3

Cl

xrl

A ;H OC I 11

V

0205

C6

45

JZ

SPOST .

Wähle

PortogebUhr

0207-

F0

mov

A, @ r@

0208

D3

50

xrl '

A, S 05011

020A

C6

23

JZ

SSTAT

Sende

Status

0 2 oc

FO

mov

A, @r@

020D

D 3 4 1

xrl

S, tl 04 III

020F

C6

29

J 2

ENPR

Setze

Drucker betriebsbereit

0211

FQ

mov

A , @R@

0212

D3

42

xrl

A, 1 04 211

6500

586

587

58 8

589

590

•591

592

593

594

595

596

597

598

599

600

601

602

603

604

605

606

607

PRINTER PROGRAM CA8048/11 version 4.21.57

15-Oct-79

14:6:47

0214 C6 30 JZ DISPR Setze Drucker außer Betriebsbereitschaft

02 16 FO MOV A, @ R@

02 17 D3 ' 45 XRL A, I045II

0219 C6 1F JZ ACCTC Buchung vollständig (Betriebsbereitschaft)

Routine "Sende Diagnosestatus"

021B B9 3 7 DIAG: MOV RI , I (DSTAII-1 ) Zeige auf Ueader-1.

021D 4 4 25 JMP SEND1 Sende 2 Bytes & Aussprung

Buchung vollständig

021F 23 DF ACCTC: MOV A,i0DFII Lösche Bit 5 in Aulierbetriebsetzungsstatus

0221 44 2B JMP ENABL Setze in Betrieb

Sende Statusnachricht Benötigte Stape'lebenen = 3

Zeitgabe einschließlich Aufruf (SSTAT):

6 Zyklen = 25,143 psec. zum Aufruf COUT 43 Zyklen =100,190 usec. bis CTS

0223 B9 35 SSTAT: MOV R2, ï (STATIi-1 ) Rl = Headeradresse-1

0225 BA 02 SEND1; MOV R2,K2 R2 = Sende 2 Bytes

MODEL 6500 PRINTER PROGRAM CA804Ü/11 version 4.21.57

608 0227 24 03 JMP COUT

609

610 0029 ZIIDR EQU Ç-IIDR

611

612 PAGE

0\

o\

K> ■U

1 5~Oct-79 14:6:47.

Ubertrage und Aussprung ro On

6500

613

614

615

616

617

618

619

620

621

622

623

624

625

626

627

628

629

630

631

632

633

634

PRINTER PROGRAM CAO0 4 0/11 version 4.21.57

15-Oct-79

14:6:47

INCLUDE DM2 :ENABLP

ENADLE - Drucker Benötigte Stapelebenen = 0

Kann von RB0 oder RB1 aus aufgerufen werden

0229

23

F 7

ENPR :

MOV

A, Ä0P7II

Lösche Bit 3 in Außerbetriebsetzungsstatus

0 2 2 D

B8

3 lì

ENABL;

MOV

R0,KPSSTA

Zeiger auf Außerbetriebsetzungsstatus

022D

30

AML

A , @R@

Abschalte erforderliche Bits

0 2 2 E

44

35

JMP

DSAB1

Fahre fort

0230

23

08

DISPR:

MOV

A, 1 00811

Setze Bit 3 in Außerbetriebsetzungsstatus-

0232

08

3D

DISABL:

MOV

. R0,ÏDSSTA

Zeiger auf Außerbetriebsetzungsstatus

0234

40

ORL

^A,@R@

Anschalte erforderliche Bits

0235

A0

DSAB1

MOV

@R@, A

Wiederherstelle Außerbetriebsetzungsstatus

0236

C6

42

JZ

ENAD1

Springe, wenn jetzt gelöscht

0238

0A

IN '

A, P2

Ist er gegenwärtig außer Betrieb gesetzt?

0239

P2

3 F

JB7

DSAB2

Springe, wenn der Fall

023B

B 3

1A

MOV

RO , 1 1 All

Zeiger auf RB1-R2

023D

DO

IE

MOV

@R@, II 30

Setze Niederzähler

MODEL 6500 PRINTER PROGRAM CA0048/11 version 4.21.57

635 0 2 3 F ßA 80

636 0241 83

637

638 0242 9A 7F

639 0244 83 6 40

641 bOlC

642

643

DSAB2: ORL RET

EHAB1 ANL RET

2ENABL EQU PAGE

P2 , 10011

P2.K 07 PH

$-ENPR

15-Oc t-79

14:6:47

Nicht gelöst, setze außer Betrieb

Setze in Betrieb

6 4 4

645

6 4 6

647

648

649

650

651

652

653

654

655

656

657

658

659

660

661

662

663

664

665

PRINTER PROGRAM CA804Û/11 version 4.21.57 15-Oct-79 14:6:47

INCLUDE DM2:SPOST

SPOST - Drucker

PortogebUhrenwahl - Unterroutine ßenö.tiqte Stapelebenen = 3

024 5

54

BC

SPOST:

CALL

DELT

Berechne Bewegungen

0247

19

SPOST:

INC

Rl

Zeige auf nächstes DELTA

0248

Fl

MOV

A / @ Rl

Lese DELTA für diesen Satz

024 9

06

63

JNZ

SPOS4

Satzbewegung erforderlich?

0 2 4 Q

EE

47

DJNZ

R6,SPOSI

5 Räder erledigt?

Û24D

BD

00

SPOS2:

MOV

R5, 10

Speichere QR

024F

8 A

40

ORL

P2 , I040U

Abschalte Optik

0251

89

FF

ORL

V

PI , llOFFII

Abschalte Motore

0253

FF

MOV

A.R7

Schaue auf Fühler

0254

53

0F

ANL

A, I0FII

Schaue auf Kodierer

0256

E3

MOVP 3

A,@A

Zulässige oder Ausgangsstellung (HOME)?

0257

72

5D

JB3

S POS 3

Springe, wenn in Ordnung

0259

B9

92

MOV,

RI , I 9211

0 2 5 Q

24

AB

JMP

ERROR

Unzulässige Fühler für Ausgangsstellung

025D

E9

1F

SPOS3

MOV

Rl , | (POSTH-

■1) Zeige auf "PortogebUhr ist"-Header-1

MODEL 6500 PRINTER PROGRAM CA8048/11 version 4.

666

025F

BA

04

MOV

R2, 14

667

0261

24

03

JMP

COUT

668

669

0263

BA

02

SPOS4:

MOV

R2, 12

670

0265

74

32

CALL

DMOVE

671

0267

FE

MOV

A,R6

672

0268

AA

MOV

R2 , A

673

0269

85

CLR .

F0

674

026A

74

CALL

BMOVE

675

026C

Fl

SP0S5:

MOV

A, @R1

676

026D

C6

7E

JZ

S POS 8

677

02 6 F

95

CPL

F0

678

0 2 70

74

3 A

CALL

BMOVE

679

0272

Fi

MOV

A, @Rl

680 '

0273

F2

78

JB7

SPOS6

681

0275

85

CLR

F0

682

0276

44

7A

JMP

SPOS7

683

0278

'37

SPOS6:

CPL

A

684

0279

17

INC

A

685

027A

AA

S POS 7 :

MOV

R2 , A

686

0 2 7B

74

32

CALL

DMOVE

687

027D

85

CLR

F0

.57 15-Oct-79 14:6:47

Sende 4 Bytes

übertrage neue Einstellung und Aussprung

2 nach unten zur Entsperrung von Satzwahl Bewege Ziffernwähler

Bewege Satzwähler zu höchster Stellung

Satz "nach oben"

Bewege Satzwähler

Erhalte gegenwärtiges Satz-DELTA

Springe, wenn 0

Zeige Satzwähler "nach unten"

Bewege Satzwähler

Erhalte wieder gegenwärtiges DELTA Springe, wenn negativ Positiv, zeige "nach oben"

Speichere und bewege Mache DELTA positiv

Bringe Abstand nach R2 Bewege Ziffernwähler

MODEL 6500 PRINTER PROGRAM CAÛ04Û/11 version 4.21.

688

0 2 7E

1A

SPOSO :

INC

R2

689

027P

19

INC

Rl

690

0280

EE

6C

DJNZ

R6 , SPOS5

691

0282

95

CPL

F0

692

0283

74

3 A

CALL

BMOVE

693

0285

BA

02

IPOSB:

MOV

R2 , K 2

694

0287

05

CLR

F0

695

0288

74

32"

CALL

DMOVE

696

0 2 8 A

4 4

4 D

JMP

S POS 2

697

698

0047

2 S POST

EQU

Ç-SPOST

699

700

PAGE

15-Oct~79 14:6:47

Bewege Erhöhung 1 Satz Bewege Zeiger 1 Satz Alle Sätze erledigt?

Bewege Satz R2 verbleibende Stellung Sperre Wähler Zeiger nach oben

Ausgang

MODEL 6500

701

702

703

704

705

706

707 700 70 9

710

711

712

713

714

715

716

717 710 '

719

720

721

722

PRINTER PROGRAM CAÛO40/11 version 4.2.57 15-Oct~79 14:6:47

INCLUDE DM2:IPOS

IPOST - Drucker

Setze Druckräder anfänglich auf Null Denötigte Stapelebenen = 4

O20C

54

F0

IPOST:

CALL

CLRÛ

Setze Puffer für "alte Portogebühr" auf

028E

54

DC

CALL

DE LT

Unpack Auswahl

0290

54

F0

CALL

CLRD

Lösche Portogebührenpuffer wieder

0292

74

20

CALL

DSEEK

Entsperre Satzwähler

0294

FF

MOV

A, R7

Prüfe, ob Satzwähler nicht HOME

0295

53

OC

ANL

A, KOCH

Prüfe Fühlerbits 2 und 3 auf Null

0297

96

AF

JNZ

ÀLL0

Springe, wenn nicht in Ausgangsstellung

0299

Fl

MOV

A, @Rl

Erhalte F NIBBLE

0 2 9A

72

AF

JD3

ALLO

Springe, wenn PortogebUhr unbekannt

029C

DA

05

MOV •

R2 , 1(5

Portogebühr bekannt, bewege nach Satz 5

029É

74

3 A

CALL

DMOVE

02A0

19

IPOSTL;

INC

Rl

Zeiger auf DELTA für diesen Satz

02 AI

23

F6

MOV

A, B0F6II

Komplement von 9.

02A3

61

ADD

A , @R1

Ziehe gegenwärtige Stellung ab

0 2 A4

37

CPL

A

02A5

AA

MOV

R2 , A

Bewege aufwärts zu Stellung 9

N>

MODEL 6500 PRINTER PROGRAM CAÛ04Q/11 version 4.21.57

723

02a6

74

32

call dmove

724

02ab

95

cpl f0

725

02a9

34

c9

call icomon

726

0 2 ad ee a0

djnz r6,ipostl

727

0 2 ad

44

85

jmp iposû

728

729

02af

1a

allo :

inc r2

730

0 2 bo

74

57

call bmovx

731

02d2

c6

af

jz allo

732

0284

74

20

all1 :

call dseek

733

02b6

34

c9

call icomon

734

,0 2b8

ee b 4

djnz r6, all1

735

0 2ba

44

85

jmp iposd

736

737

0030

zi post equ

$-1 post

738

739

page

15-Oct-7 9 14:6:47

Zeige "nach unten"

Bewege Rad nach Null und Ist Satz 0?

Ja; mache fertig.

Suche Bank 5

Suche 9 auf diesem Rad Bewege Rad auf Null und Ist Satz Null?

Ja, mache fertig

Satz nach unten um 1

>

Satz nach unten um 1

©s On ksi

■U

MODEL 6500 PRINTER PROGRAM CAÛ048/11 version 4.21.57

740

INCLUDE

DM2 :DELT

741

742

DELT

- Drucker

743

Erstelle Räderänderungen-(DELTAS)

744

Benötigte Stapelebenen

= 1

745

746

02BC

9A

BF

DELT.: ANL

P2, I0BPII

74 7

02BE

54

30

CALL

DISPR

748

749

02C0

B8

21

MOV

R0,ï POSTB

750

02C2

B9

3D

MOV

Rl, II INB

751

02C4

BA

03

MOV

R2, K 3

752

02C6

D5

SEL

RB1

753

02C7

BO

30

MOV

RÖ , II DELTA

754

02C9

C5

SEL

RßO •

755

02CA

F0

DELTI: MOV

A, @R0

756

02CB

53

F0

ANL

A, Ï0P0II

757

02CD

47

SWAP

A

758

0 2CE

AB

MOV

R3 , A

759

02CF

Fl

MOV

A , @ R1

760

02D0

47

SWAP

A

76 L

02DL

54

E6

CALL

COMON

15-Oct-79 14:6:47

im RAM; bringe Eingabe zum Portogebührenpuff Schalte Fühler ein

Setze Drucker außer Betriebsbereitschaft

Zeiger auf alte Portogebühr Zeiger auf neue Portogebühr Bytezähler

Zeiger auf Knderungspuffer

Erhalte altes Byte

Rette NIBBLE hoher Ordnung

Rechtsanpassung

Rette

Erhalte neues Byte

Bringe hohe Ordnung nach rechts

MODEL 6500 PRINTER PROGRAM CAQ04Û/11 version '4.21.57

762

0203

F0

MOV

763

0204

53

0F

ANL

764

02D6

AB

MOV

765

02D7

Fl

MOV

766

G2D8

A0

MOV

767

02D9

34

E6

CALL

768

02DB

18

INC

769

02DC

19

INC

770

Ò2DD

EA

CA

DJNZ

771

772

Weiterer von

773

02DF

85

CLR

774

02EQ

95

CPL

775 .

0 2 E1

B9

30

MOV

776

02E3

BE

05

MOV

777

02E5

83

RET

778

779

00 2 A

ZDELT EQU

780

78 1

PAGE

A, @ RO A,H OFM R3,A A, @Rl HR0,A COMON RO Rl

R2, DELTI

FO FO

Rl,I DELTA R6, 15

Ç-DELT

15-Oct-79 14:6:47

Erhalte altes Byte

Rette NIBBLE niedriger Ordnung

Rette

Erhalte neues Byte

Bringe in alten Portogebührenpuffe

Bewege Pufferzeiger

Alle 3 Bytes erledigt?

verwendeter Kode Zeige "nach unten" auf Entsperrung

Voreinstelle DELTA-Zeiger Voreinstelle Satzzeiger

On ON K>

MODEL 6500 PRINTER PROGRAM CAÛ04Q/11 version 4.21.57 15-Oct-79 14:6:47

702

INCLUDE

DM2 : COMO

703

704

COMON - Drucker

785

Durclì DELT aufgerufener

Gemeinschaf tskode

786

Benötigte Stapelebenen =

= 0

707

Zeitgabe einschließlich

Aufruf = 13 Zyklen = 54,476 psec.

780

709

02E6.

53 0F

COMON: ANL

A. KOFI!

Behalte nur rechten NIBBLE

790

. 02E8

37

CPL

A

791

02E9

6 Q

ADD

A . R3

Subtrahiere alten von neuem

792

02EA

37

CPL

A-

793

' 0 2EB

D5

SEL

RÖ1

794

02EC

A0

MOV

0RO, A

Speichere in DELTA-Puffer

795

02ED

10

INC

R0

Bewege Zeiger

796

02EE

C5

SEL

RB0

797

0 2EF

03

RET

790

799

0Û0A

ZCOMON EQU

?-COMON

800

801

PAGE

MODEL 6500 PRINTER PROGRAM CA004Q/11 version <1.21.57

15-Oct-79

14:6:47

802

INCLUDE DM2:CLRB

803

804

CLRÖ -

Drùcker

805

Lösche

Puffer

"Portogebühr ist"

806

Benötigte Stapelebenen = 0

807

Zeitgabe einschließlich Aufruf = 15 Zyklen = 62,857 usec.

808

809

0 2 FO

BQ

20

CLRB :

MOV

RO, ï POSTIl

Zeiger auf "Portogebühr ist"-Puffer

810

0 2 F 2

BO

01

MOV

^ RO , I 0 Q III

Einsetze Header

811

02F4

27

CLR

A

Null in Puffer

812

02F5

18

INC

RO

Zeiger auf nächstes Byte

813

02F6

AO

MOV

@R0, A

Lösche' Byte

814

02F7

18

INC

RO

Etc.

815

02F8

AO

MOV

hRO , A

816

02F9

18

INC

RÒ

817

02FA

AO

MOV

»jR0,A

818

02FB

83

RET

819

820

OOOC

ZCLRB

EQU

Ç-CLRQ

821

822

0004

P2 FREE

EQU

300II-S

Freier Raum am Ende von Seite 2

823

PAGE

On ON

U>

.'ODL'L Ü500 PRINTER PROGRAM CA0048/11 version 4 . 2 ^ ; 5 7

1 5-Oct-79

14:6:47

824

825

826 327

828

829

830 8 31

832

833

834

835 8 3 6

837

838

839

840 84 1 842 84 3 84 4 845

0300'

0 300 0301

AI AA

ORG 30011

Ce ite 3 enthält Ubersetzungstabellen & Niedrigebenen-Druckräder-Routinen INCLUDE DM2:

ENTBL - Drucker

Fühlerübersetzungstabelle Ebenso :

bit ri t dj t dit dit dit dit

3-2-0-1 anwachsende (Bits 0-1) (Änderung +1)

2 - 1 = Falsche Kodiereränderung (zu schnell bewegt?) w

OO

3 - 0 = Falsches Ausgangsstellungs-Bitmuster

3 - 1 » Gültig, Ausgangsstellung verändert

4 - 1 = Gültig, Riegel oder Vermittler verändert

5 - 1 = Schaltejrfehler

6 - 1 = Datumsgebertür offen

7 - 1 = Zugangsberechtigung

Alt Neu Ergebnis

FNTBL:

db dd

10100001B 1010101 OD

00 00

00 0

01 +1

MODEL 6500 PRINTER PROGRAM CA0O48/11 version 4.21.57

15-OCL-79

14:6:47

8 16

0302

AO

DB

10101000B

00

10

-1

847

0303

87

DB

10000111B

00

11

Fehler

848

0304

FO

DB

11110000B

Ol

00

-1

849

0305

El

DB '

111000Q1B

Ol

Ol

0

850

0306

C 7

DB

110001 Ì 1B

Ol

10

Fehler

851

0307

C2

DB

11000010B

.01

11

+ 1

852

0308

32

DB

00110010B

10

00

+ 1

853

0309

07

DB

00000 1 IIB

10

Ol

Fehler

854

0 3 0 A

2 1

DB

0010 0001B

10

10

0

855

030B

00

DB

OOOOOOOOB

10

11

-1

856

0 3 OC

57

DB

010101 1 1B

11

00

Fehler

857

0 3 OD

40

DB

01000000ß

11

Ol

-1

858

030E

42

DB

01000010B

11

10

+ 1

859

030F

4 1

DB

01000001B

11

11

0

860

861 0010 ZENTBL EQU Ç-ENTBL 86 2

863 P^GE

6 500

864

865

866

867

868

869

870

871

872

873

a 7-i

875

876

877

878

879

880

881

882

883

884

885

PRINTER PROGRAM CA0040/11 version 4.21.57

INCLUDE DM2.-TDL2

15-Oct-7 9

14:6:47

Ö\

o\

Si £

TDL2 - Drucker

Fühlergültigkeitsbewertung und Ubersetzungstabelle

BIT 0 I = Fehler

RIT 1 - nicht benutzt

DIT 2 - 1 = Vermittler oben (Detriebsbereitgchaft)

DIT 3 - Auslösung (immer Null)

BIT 4 - 1 =» Ausgangsstellung 112

DIT 5 - 1 = Riegel vorne

BIT 6 - nicht benutzt

NJ LO O

DIT 7

•*

nicht benutzt

0310

ORG

31011

0310

21

TBL2 :

DB

00100001B

0000

Fehler

- Beide

HOME-FUhler an

0311

10

DB

00010000B

0001

HOME 2

- außer

Betrieb, Riegel teilweise vor

0312

00

DD

000000QÛQ

0010

HOME 1

- außer

Betrieb, Riegel teilweise vor

03 1 3

31

DD

00110001D

001 1

Fehler

- Vermittler gesetzt, Trommel nicht HOME

0314

25

DD

00100101B

0100

Fehler

- beide

HOME-Fühler ein

0315

34

DD

001 10100B

0101

HOME 2

- Riegel vorne

ODEL 6500 PRINTER PROGRAM CA004B/11 vers ion' 4.21.57

886

0316

24

Dû

00100100B

0110

887

03 17

34

DB

00110100B

Oli 1

8 8 6

03 1 a

01

DB

00000001B

1001

689

0319

10

DB

00010000B

1001

890

0 3 1 A

00

DB

OOOOOOOOB

1010

891

0 3 1 Q

1 1

DB

00010001B

1011

892

03 1C

05

DB

00000101B

l ì 00

8 9 3

03 1D

1 4

DB

000101OOB

1101

894

031E

04

DB

OOOQOIOOB

Ilio

895

0 3 1 P

15

DB

'OOOIOIOIB

1111

896

8 97

00 10

2TBL2

EQU Ç-TBL2

898

899

PAGE

-Oct-79

14:6:47

HOME 1 -

Riegel vorne

Ausgelös t - in Teilzyklus

Fehler -

beide HOME-FUhler ein

HOME 2 -

außer Betrieb

HOME 1 -

außer Betrieb

Fehler -

Riegel HOME, Trommel nicht

HOME

Fehler -

beide HOME-FUhler ein

HOME 2 -

in Betrieb

HOME 1 -

in Betrieb

Fehler -

Riegel HOME, Trommel nicht

HOME

Si

«t

K

Ó500

900

901

902

903

904

905

906

907

908

909

9 10

911

912

913

914

915

916

917

918

919

9 20

921

PRINTER PROGRAM CAÜ048/11 version 4.21.57 15-Oct-79. 14:6:47

INCLUDE DM2 :DS

DSEEK - Drucker

Suche Extremstellunq des Ziffernwählers in Richtung F0 Benötigte Stapelebenen = 2

FO = 0 bedeutet "oben"

R2 " muß bei

Eintritt 0

sein

Achtung

: Bei

Aussprung ist F0 umgekehrt, R2 und R0 = 0

0320

1A

DSEEK:

INC

R2

Bewege um 1 Ziffer

032 1

74

52

CALL

DMOVX

t

0323

1A

DSEEK

INC

R2

Bewege um eine weitere Ziffer

0324

74

52

CALL

DMOVX

0326

C6

23

JZ

DSEK

Wenn erfolgreich, bewege um 1 weitere

0328

95

CPL

F0

Richtungsumkehr

0329

FF

MOV

A, R7

Schaue auf Fühler

0 3 2 A

53

03

ANL

A, #311

Schaue auf Ziffernwahlfühler

032C

E 3

MOVP3

A, @A

Übersetze

032D

72

A5

JB 3

P3RET

Aussprung, wenn zulässige Ziffer

032F

1A

INC

R2

R2 = 1 .

MODEL 6500 PRINTER PROGRAM CAÛ040/11 version 4.21,

922 0330 64 52 JMP DMOVX

923

'924 001 2 ZDSEEK EQU Ç-DSEEK

925

926 PAGE

15-Oct-79 1 4 ? 6 : 4

Schrittweise zurück

ON K) •b.

£

MODEL 6500 PRINTER PROGRAM CA0O4Ü/11 version 4.21.57 15-Oct-79 14:6:47

927

INCLUDE

DM2: DMOVE2

928

929

DMOVE2

- Drucker

9 3 0

Bewege

Satz oder Ziffer

R2

Ziffern in Richtung F0, prüfe auf Fehler.

93 1

PO = 0

bedeute t

"oben"

.932

Benötigte Stapelebenen =

= 2

933

934

Achtung:

bei Aussprung ist F0 unverändert, R2 und R0 = 0, R3 (Motore) = Abfall

935

936

0332

D5

DMOVE:

SEL

Rßl

AnfangsSetzung Neuversuchs-Zähler

937

033 3

BD

0A

MOV

R5 , Ï10'

938

0335

C5

SEL

RBO

939

0336

74

52

CALL

DMOVX

Erstversuch.bei Bewegung (MOVE)

940

033 8

64

45

JMP

DM2

941

942

033A

D5

BMOVE:

SEL '

RB1

AnfangsSetzung Neuversuchs-Zähler

943

033B

BD

06

MOV

R5, K 6

944

0 3 3 D

CS

SEL

RßO

945

0 3 3 E

74

57

CALL

BMOVX

Erstversuch bei Bewegung (MOVE)

946

0340

64

45

JMP

DM2

947

948

0.3 4 2

C5

DM1 :

SEL

RBO

MODEL 6500 PRINTER PROGRAM CA004Ü/11 version 4.21.57

949

03 4 3

74

6 1

CALL

R12NT

950

0345

C6

A5

DM2 :

JZ

P3RET

951

03 4 7

1A

INC

R2

952

0348

D5

SEL

RB1

953

0349

ED

42

DJNZ

R5 iDM1 '

954

0 3 4 B

B9

71

MOV

RI , 17111

955

0 3 4 D

76

50

JP1

DM3

956

0 3 4 P

19

I MC

Rl

957

0350

24

AB

DM3 :

JMP

ERROR

958

959

0020

2DMOVE

EQU

Ç-DMOVE

960

961

PAGE

1 5-Oct-79

14:6:47

Wiedereingebe Stufenprogramm nach PMCNT-Beginn Aussprung, wenn PMCNT = 0

Nicht Null, versuche einen weiteren Schritt

Aber falle heraus, wenn Neuversuche erledigt Satzbewegungs-Fehlercode Springe, wenn Satz

Ziffernbewegungs-Fehlercoda (= 72H) Druckräder-Einsteilfehler

MODEL 6 500

962

963

964

965

966

967

968 ■969

970

971

972

973

974

975

976

977

978

979

980 98 1

982

983

PRINTER PROGRAM CA8048/11 version 4;?1.57 15-Oct-79 14:6:^7

INCLUDE DM2;DMOVX2

DMQVX2 - Drucker Benötigte•Stapelebenen,= 1

Zeitintervall zwischen Kodiererlesewerten Min. - 34 Zyklen = 142,476 psec. Max. = 59 Zyklen = 247,233 psec.

Bei Eintritt - F0 = 0 für aufwärts, F0 = 1 für abwärts

>

R2 = Anzahl der Stellungen, um die bewegt wird y

ON

R7 = alte Fühlerlesewerte Bei Aussprung - F0 =- unverändert

F1 = 0 für Ziffern, Fl = 1 für Satz R2 und R0 = 0 • R3 (Motor) = Abfall Wenn kein Fehler, A und R5 = 0 R1 und R6 unverändert R4 = Abfall

R7 = Gegenwärtige FUhlerlesewerte

0352 A5 DMOVX: CI F1 = 0 für Ziffernwahl

MÜDtIL 6500 PRINTER PROGRAM CA004Ü/11 veirsion 4.21.57

984

03 5 3

FA

MOV

A, R2

985

0354

E7

RL

A

986

0355

64

5 A

JMP

Ml

987

988

0357

A5

BNOVX;

CLR

Fl '

989

0358

D5

CPL

Fl

990

0359

FA

MOV

A, R2

991

Ò35A

06

5E

Ml :

' JFO

M2 •

992

035C

37

CPL

A

'993

0350

17

INC

A

994

035E

AO

M2 :

MOV

R5 , A

995

03 5 F

C6

A5

JZ

P3 RET

996

036 1

FA

RENT:

MOV

A, R2

997

0362

E7

RL

A

998

0363

E7

RL

A '

999

0364

AA

MOV

R2 , A

1000

0365

BB

CC

MOV

R3 , iOOCH

1001

0367

B6

70

JFO

M5

1002

0369

FB

H 3 :

MOV

A, R3

1003

036A

06

6E

JFO

M4

1004

036C

77

RR

A

1005

0360

77

RR

A

15-Oct-79 14:6:47

Schaue auf Ziffernwähler Multipliziere mit 2 für Kodierer Fahre fort

F1 = 1 für Satzwahl

Schaue auf Satzzähler Werih abwärts, mache negativ (Zweier-Kompliment)

Rette in Kodierer Wenn Null, Aussprung Neuversuchs-Eintritt

Multipliziere R2 mit 4 Motorschritten Rette Motorschritte

Anfangssetzung Zweiphasen-Motorabbild Springewenn abwärts (links)

Schaue auf Motorabbild Springe, wenn abwärts (links)

Aufwärts - (Rechts)

Cs Os ks>

ê

HÖDEL 6500 PRINTER PROGRAM CAB04B/11 version 4.21.5*7 15~Oct~79 14:6:47

1006

036E

E?

M4 :

RL

A

100 7

0 3 6 F

AB

MOV

R3 , A '

Wiederherstelle Motorabbild

1008

0370

FB

M5 :

MOV

A, R3

Motorabbild in Akku, (wenn nötig)

1009

0371

53

FE

ANL

a,M open

Halte anderen Motor in Ausgangsstellung (HOME)

1010

0373

43

OE

ORL

A,Ï00EU

1011

0375

76

7 ü

JF1

M 6

Springe, wenn Satz

1012

0377

47

SWAP

A

1013

0378

89

M6 :

ÛUTL

PI , A

Ausgabe MOVE

1014

0379

B8

23

MOV

R0, 135

5 msec. Verzögerung (196,4 bis 196,9 Schritt/sec

1015

037B-

74

86

CALL

READ1

Warte 5 msec. lang

1016

' 037D

EA

69

DJNZ

R2 ,M3

Springe, wenn Zählung nicht erledigt

1017

037F

23

EE

MOV

A, lOEEIi

Beide Motore HOME

1018

0381 •

39

OUTL

PI,*

1019

0382

B8

D3

MOV

RO,|21 1

30,0076 msec. Verzögerung

1020

0384

64

86

JMP

READ1

Warte 30,0876 msec. und Aussprung

1021

1022

0034

ZDMOVX

EQU

Ç-DMOVX

1023

1024

PAGE

óSOO

1025

1026

1027

10 2 8

1029

1030

1031

1032

1033

1034

1035

1036

1037

1038

1039

1040

1041

1042

1043

1044

1045

1046

PRINTER PROGRAM CAQ04B/11 version 4.21.57 15-Oct-79

14:6:47

INCLUDE DM2:READ READ - Drucker

Bringe Kodierer-Lesewerte während Druckwahl auf neuen Stand Benötigte Stapelebenen = 0

Bei Eintritt - Fi = 0 für Ziffern, F1 = 1 für Satz

R0 = Anzahl der Schleifen durch Routine von Aussprung R5 = Kodierer R7 = Alter Filhlerlesewert Bei Aussprung -A = Kodierer R0 » 0 R4 = Abfall R5 = tfodierer

R7 = Gegenwärtiger Fiihlerlesewert Rl ,R2 , R3, R6, und F1 unverändert Zeitgabe = 32 Zyklen (142,476 psec.) pro Schleife, plus 4 Zyklen (16,762 psec.) für Aufruf und Aussprung

0306

08

READ 1 : INS

A,

BUS

Lese

Fühler

0307

2 F

XCJI

A,

R7

Neue

Fühler in

R7

03 8 B

AC

MOV

R4

/ A

Alte

Fühler in

R4

6500 PRINTER PROGRAM CAB040/11 version 4.21.57 15-Oct-79 14:6:47

1047 •

û 3 8 9

DF

XRL

A. R7

Änderungen nun im Akkumulator

1 0 4 B

038A

76

A6

JF1

READ3

Springe, wenn Satzwahl

1Û 4 9

•

1050

Zif f ernwahlkodierer-Handhabunçj

1051

03 BC

53

OC

ANL

A, SOCII

Schaue auf Satz

1052

03 QE

96

B3

JN2

READ4

Fehler, wenn irgendeine Änderung

1053

0390

08

INS

A . BUS

(2 Zyklen NOP als Ausgleich)

1054

039 1

FF

MOV

A, R7

Erhalte neu© Fühler

-1055

0392

53

03

ANL •

. A , I 0 3II

Schaue auf Ziffern (neu)

1056.

0394

2C

XCII

A , R4

Neu in R4 , .alt in A

1057

0395'

53

03

ANL

A, 103II

Schaue auf 2iffern (alt) .

10 5 8

0397

47

SWAP

A

Bewege alt zu Bits 2 & 3

1059

1060

c

0

1

o

O:

Wrapup

Routine

1061

0398

77

READ 2

RR

A

1062

0399

77

RR

A

1063

039A

6C

ADD

A, R4

Kombiniere alte und neue Fühler

1064

0 3 9B

E3

MOVP 3

A , @ A

Aufsuche Tabelleneintrag

1065

039C

52

BA

JB2

READ6

Wenn Bit 2=1, Kodiererfehler

1066

039E

53

03

ANL

A, 8 0 311

Schaue auf letzte 2 Bits

1067

0 3 AO

07

DEC

A

Anpasse Eintragung um 8 Bit-Negativzahl

1066

03A1

6D

ADD

A, R5

Anpasse alten PMCNT

MODEL 6500 PRINTER PROGRAM CAQ048/11 version 4.21.57 15-Oct-79 14:6:47

1069

03A2

AD

MOV

R5 , A

Speichere PMCNT

1070

0 3 A 3

EÜ

06

DJNZ

RO,READ 1

Fahre fort, wenn Zeit nicht abgelaufön

1071

03A5

83

P 3 RET :

RET

Aussprung

1072

1073

.Satzwahlkodierer-Handhabung

1074

0 3 A 6

53

03

REAP 3:

ANL

A/#03H

Schaue auf Ziffern

1075

O3A0

96

B3

JNZ

READ4

Fehler, wenn irgendwelche Änderungen

1076

03AA

FC

MOV

A, R4

Erhalte alte Fühler

1077

03 AB

53

OC

ANL

A,HOCH

Schaue auf Satzfühler

1078

0 3 AD

AC

MOV

R4 , A

Rette nur Satz

1079

03AE

FF

MOV

A , R7

Erhalte neue Fühler

1080

03AF

53

OC

ANL

A,HOCH .

Schaue auf neue Satzfühler

1081

0 3 B1

64

90

JMP

READ2

Bewege neu zu Bit 0 und 1

108 2

•

1083

03B3

B9

87

READ4:

MOV

RI, 10711

Ziffernkodierer bewegt, als Satz gewählt

1084

0385

' 76

BQ

JF1

READ5

Springe, wenn Satz

1085

03B7

19

INC

Satzkodierer bewegt, als Ziffer gewählt ( =

1086

0388

24

AB

READ5:

JMP

ERROR

Falschen Kodierer bewegt

1087

10 8 8

03BA

B9

04

READ6 i

MOV

RI, Il 0 4 H

1089

03BC

24

AB

JMP

ERROR

Kodiererfehler (zu schnell bewegt?)

1090

1091

0038

Z READ

EQU

Ç-REAP1

1092

1093

PAGE

hi .t*

se

MODEL 6500 PRINTER PROGRAM CAÜO40/11 version 4.21.57 15-Oct-79

INCLUDE DM2: FREEZE

14:6:47

Os On K» ■tv W 4-

1094

1095

1096

1097 10 90 1099

1115

1116

1117

Tua

FREEZE - Drucker

Setze zusätzlichen Vermittler

Benötigte Stapelebenen = 2

1 100

0 3 BE

85

FREEZE:

CLR

F0

Zeiger auf "unten"

noi

03BF

95

CPL

F0

1 102

03C0

0 A

FF.

ORL

P 2,IOFFH

Schalter Vermittler, LED1 s, usw. ab

1103

Û3C2

BA

EF

MOV

R2 , | 239

1 104

03C4

EA

C 4

DJNZ

R2,$

Warte 2 msek. auf LED-Erlöschen

1105

03C6

08

INS

A, BUS

Lese Eingaben, sofern vorhanden

1106

030 7

AF

MOV

R7 , A

Speichere zur Verhütung von "Lese"-Fehlern

1107

03C8

BA

03

MOV

R2.» i 3

Um wenigstens 2 Ziffern bewegen

1 108

03CA

74

52

CALL

DMOVX

Wie erforderlich bewegen

1 109

. 03CC

8 9

FF

ORL

P2,{OFFH

Schalte Motore ab

1110

03CE

83

RET •

1111

1112

0011

ZFREZE

EQU

$-FREEZE

1113

1114

0031

P3FREE

EQU

40011-$

Freier Platz am Ende von Seite 3.

K> N>

0069

TFREE EQU

END

P 0 F R E E + P2FREE+P3FREE

MODEL

6500 PRINTER PROGRAM

CAQ04Û/11 version 4.21.57

A

Û00E

ACCTC

0 2 1 F

ALLO

02AF

iìmovx

0357

nus

= 0004

C

= 0007

CLRD

Û2F0

CNT

0009

COMON

02E6

COUT2

0109

COUT3

0113

COUT 4

0115

COUT7

0 1 3 F

COUT8

Ol 4E

•CRECV

0153

CREV2

015C

CREV3

0165

CREV4

0167

CREV7•

û 1 SB

CREV8

0 1 0 F

DATEB

0025

DELT

028C

DELTA

0030

DELTI

02CA

DELI 2

0 1 9 A

DELI 3

0199

DELI 4

0198

DELI 7

0195

DELI a

0194

DELI 9

0193

DEL6

0 1A0

DEL7

0 1 9 F

DEL8 ■

019E

DISPR

0230

DL 1 5 0

01A7

DL225

0 1A5

DMOVX

OK 5 2

DM1

03 4 2

DM2

0345

DSAB1

0235

DSAB2

023F

DSEEK

. 0320

DSTAII

0038

ENABL

0 2 2 B

ENAB1

0242

ERROR

0 1 AB

ERRI

01B9

FESTA

0039

Fl

« 200D

IIDR

0200

I

«QOOC

I Nil

00 3C

INIT

0000

INITl

0011

INSTA

00 3 A

I NTRF

0090

INTR2

00 A 2

I POST

026C

I POSTL

0 2 AO

MANI

0043

man 4

00AD ■

MAN 5

00B2

MAN6

00B6

MS 7 4

0026

ML

0 3 5 A

M 2

035E

-Oct-79

1 4 : 6 ; 47

ALL1

02B4

CEROR

0187

COUT

0103

ÇOUT5

0124

CRECW

0151

CREV5

0171

DATEH

0024

DELIO

019C

DELI 5

0Ï97

DEL4

01A2

DEL9

019D

DL3Q0

01 A3

DM3

0350

DSEK

0323

ENPR

0229

FREEZE

03BE

ICOMON

01C9

INIT2

00 1 E

INTR3

00 AA

MAN2

0058

MBO

= 200B

M3

0369

BMOVE

033 A

CLK

«0010

COUT1

0100

COUT6

012A

CREV1

0158

CREV6

0179

DBB

«0011

DELI 1

019B

DELI 6

0196

DEL5

0 1A 1

DIAG

01 2 1B

DMOVE

0332

DSABL

0232 .

DSSTA

003 B

ENTBL

0300

FO

«OOOD

1 NB

003D

INIT3

0022

iposb

0285

MAN3

0062

MB 1

»300B

M4

036E

MODEL 6500 PRINTER PROGRAM

CA0048/11 version -4.21.57

M 5

0370

POFREE

0006

P3 FREE

003 1

P7

•0306

READ3

03A6

RO

= 0002

R5

= 0502

SENSI

00 F 6

SHOME

00.7 F

S POS 4

0263

SSTAT

0223

SWIT2

00D5

TCNT 1

-200C

TFREE

0069

ZDELAV

0018

'ZENABL

001C

ZCOMN

0009

ZMAIN2

0013

ZSWITC

001 F

H6 0378

PI =0105

P3RET 03A5

RBO =000ß

READ4 03B3

Rl =0102

R6 =0602

SIIDL 0069

SPOST 0245

SPOS5 0 2 6C

STATU 0036

SWIT3 00D9

TEMP 00 2 8

ZCLRB 000C

2DELT 00 2A

2ENTBL 0010

ZINIT' 0043

2 READ 0038

2TBL2 0010

POSTB

0021

PI FREE

002E

P4

= 0006

RBl

« 100B

READ5

03BÛ

R2

= 0202

R7

= 0702

SHDL1

0072

SPOSI

0.2 4 7

SPOS6

0270

STATUS

0037

T

= 0008

TESTO

0143

.ZCOMON

000 A

2MOVE

0020

2ERROR

001E

2INTRF

0013

2SENSE

00 1 D

No errors detected

15

-Oct-79

14:6:47

POSTM 0020

P2 =0205

P5 =0106

READl 0306

READ6 03BA

R3 =0302

SEND 1 0225

SHIN 0091

SPOS2 Q24D

SPOS7 027A

SWITCH OOBE

TBL2 0310

TESTI 0147

2COUT 0051

ZDMOVX 0034

ZFREZE 0011

21 POST 0030

2SHDL 0O2F

PSW

= 0003

P2FREE

0004

P6

«0206

READ2

0398

RENT

0361

R4

»0402

SENSE

OODD

SHIN2

0096

SPOS3

025D

SPOS8

027E

SWIT1

00C2

TCNT

»000A

TESTI 1

0149

XCRECV

0042

2DSEEK

0012

ZHDR

0029

2MAIN

0026

ZPOST

0047

Cross re ference

1 isuing

(MCREP

vers i

Symbol

Refs (1

= définition

$ = w

ACCTC

509

596*

ALLO

713

715

729 *

731

ALL 1 •

73 2 *

734

DMOVE

556

674

670

692

BMOVX

730

945

900 *

CEROR

364

3fl 1

395

390

CLRS

707

709

809*

820

COMON

761

767

789 *

799

COUT

353 *

608

667

COUT 1

35 1 I

353

401

COUT2

356 *

3 5 8

COUT 13

362 *

37Û

COUT 4

357

363 *

COUT5

372 *

376

COUT6

375*

388

COUT 17

373

3871

COUT 18

394

398*

CRECV

237

352

430* '

CRECW

9 û

4 2 9 *

472

540

CREV1

452

4 34 *

CREV2

436 1

450

CREV3

439

441*

<blank> = rpad)

717

4£3|

942*

542

> K)

L/i

Os ©\ K>

CREV4 •

440

4 4 2 1

CREV5

44 911

455

CREV6

4 54 1

467

CREV?

450

4 66 *

CREVA

444

4691

DATEB

251

DATEH

24«

DELIO

492 1

DELI 1

3 71

4911

DELI 2

366

4901

DELI 3

4 09 1

DELi 4

457

468 1

DELI 5

4 87 1

DELI 6

449

4Q6H

DEL 17

309

4 85 Ï

DELI 8

356

4 04 1

DELI 9

363

435

DEL 4

4 90 1

DEL5

497 1

DEL6

4 96)1

DEL 7

4 9 5 ï

DELÜ

372

377

DL.-L9

4 9 3 1

DELT

650

700

507

504 505 506

4031 509

494 I

7 4 6 S 779

o\

0\ N)

è

4X

>

NJ 4^ 0\

DELTI 7551 770

DELTA 27 ! 7 53 775

DI AG 54 1 592ï

DISPR 506 625* 747

DL15 0 66 301 506»

DL225 3û5 505 *

DL300 76 303 460 461 504»

DM 1 94 0» 9 5.3

DM2 940 946 950»

DM3 955 957»

DMÛVE 554 670 606 695 723

DMOVX 912 914 922 939 903»

DSABl 623 629»

DSAB2 . 632 635»

DSABL 124 179 537 626»

DSEEK 710 702 911» 924

DSEK 913» 915

DSSTA 33» 06 621 626

DSAIi 30» 54 592

'ENABI 630 633

ENABL 120 597 621»

ENPR 503 , 620» 641

ENTBL 044» 061

ERRI 524 530»

936» 959

1022 1100

^4

On ON

W

ERROR

70

157

167

245

360

470

5191

1006

1009

FESTA'

311

526

FREEZE

60

463

1 100*

1112

11 DR

230

574 *

610

ICOMON

530 1

560

725

733

INB

351

750 •

I Nil

34 1

434

574

1NIT

501 .

101

INITl

621

6 4'

67

INIT2

691

21 a

INIT3

65

73 |

INSTA

321

INTR2

269

213»

INTR3

210

2191

INTRF

1 3 B

173

175

2041

IPOSQ

693 1

727

735

I POST

99

7071

737

I POSTL

7101

726

Ml

906

991 1

M2

991

994 1

M3

10021

1016

M4

1003

10061

301 544

221

Os KJ •U

t

•203 663

322 ' 957

>

N> OO

M5

1001

1000 *

M6

1011

1013*

MANI

110*

140

MAN 2

122

• 125*

MAN 3

117

133*

MAN 4

206

216

MAN5

230*

243

MAN6

235

24 1 *

MS 7 4

76*

77

POFREE

326*

1116

PI FREE

562*

1116

P2 FREE

0221

1116

P3 FREE

1114*

1116

P3RET

920

950

POSTO

23*

749

POSTII

22*

665

READl

1015

1020

READ2

1061*

1001

READ3

1040

1074 «

READ4

1052

1075

READ5

1 0 0 4

100611

READ6

1065

1000

RE NT

949

996 «

SEND 1

593

607*

236 239

234» 247

995 .107111 009

104411 1070 1091

1003 1

N)

ON ON NÌ Jx Ui U

SENS 1

315

32 1 *

SENSE

62

90

135

300*

324

S HDL

1531

109

SIIDL1

155

160*

SII IN

165

1 0 3 *

S111 N 2

1 DÛ

107*

SllÛME

164

1 70*

SPOSI

65 1 1

654

S POS 2

655 1

696

S POS 3

66 1

665*

SPOS4

653

669 *

SPOS5

6751

690

S POS 6

6 flû

603 I

SPOS7

602

605 *

sposa

676

600*

S POST

577

650*

698

SSTAT

97

131

107

539

5Û0

STATU

20 I

50

606

STATUS

29*

04

125

310

522

SW IT1

261

264 »

SWIT2

266

200 »

SWIT3

275

202 *

SWITCH

01

114

261*

262

205

TB) 2

noo*

Û97

as o\

Ni £

> to

L/1

O

6061

temp

261

TESTO

371

TESTI

362

TESTI 1

391

tfree

11161

ZCLRß

0 2 0 #

2COMON

799 1

ZCOUT

4011

ZXRECV

4 72 1

ZDELAY

509 11

ZDELT

779 *

ZDMOVE

959 *

ZDMOVX

1 9 22 *

ZD.SEEK

9 2 4 II

ZENABL

641*

ZENTBL

Û 6 1 *

ZERROR

54 4 *

ZFREZE

1112*

ZIIDR

6101

ZICOMN

560*

2INIT

101 *

zinthf

221 *

ZI POST

737 *

ZHAIN

1 40*

379 3 90 K

307 393»

394 1

>

K)

L/l

0\ ON K)

«t

£

ZMAIN2 2471

ZREAD 109111

ZSENSE 3241

ZSJIDL 109*

ZSPOST 6901

ZSWITC 2051

ZTDL2 0971

»

0\ ■fe. £

S)

t/1

K)

10/ 1 6/79 1 2 : 40i37 OMOjCROSS.Ti 3

ÛÛÛÛ ]

00002

00003

00ÛÛ4

00005

00006

00007

ûoooa

00009

00010

000) )

0000'

000)2

0001 3

0000

0500

ûûû 1 4

0005

0500

000)5

000 A

0Ü09

00016

00) 2

0090

ûûû 1 7

oûoia

00 ) A

0100

00019

00 1 B

0100

00020

00 1C

0100

ÛÛÛ21

00 1 D

0100

00022

00 1 E

0100

00023

001F

0100

ÛÛ024

ÛÛ2Û

û)0û

00Û25

AG 2 1

0100

NAM TEST 1.3

A SYMBOL.

COPYRIGHT 1979( PITNEY BOWES, INC.

SYMBOWiEPTNTTÏONEN

ORG 55ÛOOÛ

ÎBUFPERS DISBUP RMB.;5

WRKBUF hMB 5

INflUP RMB Û

OUTBU F RMB û VARIABLES

BCTR

BEND

BLINK

BPTR

nnounc

DECPOS

DISCTR

DISPTR

RMB Ì RMB 1 RMB 1 RMB 1 RMB 1 RMB 1 RMB 1 RMB )

Puffer

Anzeigepuffer Arhei tspu f fer Ei ngangsouf fer Ausgangspuffer Variable

Fjy Lezähler fiir Format-( FMT)-Routinen und Eingabe/Ausgabe

(E/A)-Routinen

Ende von Rmpfangspuffer-1 356-Sek.-Zähler

Bytezeiger für FMT- und E/A-Routinen Ziihlar für Tastaturentprellung Dezimalstellung Steuerzähler für Anzeige Bytezeiger fiir Anzeige

TEST 13 10/16/70

1 2 : 4 fi : 3 7

OMOiCROSS.TI 3

OQÛ26 ÛQ22 0)00 0Û02? 0023 0200 0002U

000 29 0025 ÛIÛO. ÛÛÛ3Û 0026 0100 ÛÛÛ31 0027 0100

00032 0020 0)00

00033 002S 0100

00034 002A 0)00

00035 0020 0)00

00036 002C 0100 0Û037 0Û2D 0)00 00Û3Q 002E 0)00 00039 Q02P 0)00

ooo<io ooao oioo

00041 0031 0100

00042 0032 0100

00043 0033 0400

00044 0037 0100

00045

00046 3 OOO

00047 0030 0100 000 4 0 0039 0100 00049 003A 0)00 00050"003n 0100

00051 QQ3C 0100

00052 0030 0100

GETPTN

RMB 1

IBP TR

A

RMB 2

ÏOMASK

RMB 1

KCLEAN

RMB 1

KCLEEN

RMB 1

KEYCOL

RMB 1

KLUSED

RMB 1

K5W

RMB 1

LHCTIM

RMB 1

M 11ÌCTfi

RMB 1

PKSW

RMB )

PORTB1

RMB 1

PQRTC1

RMB ) '

PQRTCO

RMB 1

PORTC)

RMB )

PUTPTR

RMB )

TEMPO)

RMB 4

TEMPO2

RMB 1

* EXTERNAL PLAGS

YPLAGS

EQU *

YRBSBA

RMB 1

YCPDAT

RMB 1

Y IMSP

RMB )

YLÛWP

RMB 1

YSI2RV

RMB \

yßMABL

RMB 1

Nibble-Zeiger f(ir GETNIB Anfangsbyte-Zeiger für E/A-Routinen (Il/O Null für indirekte Adressierung) Iii twähler für RCVMSG, XMTMSG ßntprellte Tastatur

DITTO - Nicht geändert durch GETKEY Tastenspalte fiir KBSC

Letzter Tastenkode ausgegeben von GETKEY

SchlüsseIschalterbits

Zähler für 2eitgesteuerte Anzeige

Zahl angezeigter "NIBBLES"

Vorherige Schlüsselschal terstellung

PORT B-Abbild.

PORT C-Abbild.

PORT C-Abbild. - Daten s 0

PORT C-Abbild. - Daten = 0

Nibble-Zeiger für PUTNIB

Arbeitsbytes für KBSC

Arbeitsbyte für Nichtunterbrechungsroutinen

Externe Marken

Zeiger auf erste Marke

Basisrückstellung

Da tumsprüfung

Unzureichende Gebührenmittel Niedrigstand der Gebührenmittel Wartungszustand Maschine betriebsbereit

i ì :i r

1 .1 1 0 / | L / 7 ü

1 2 : 4 lì :

3 7 OMO ;CUOÜS.

TI 3

.1

003t:

0 1 00

YOATUC

RMni

Stapelregister gelöscht

00 0 5 1

003E

0 I 00

VII AllOIÙ

OMO 1

harter Fehler i)il()55

0040

0 100

YKOpi S

RM lì 1

Tastatur 3iißer Betrieb

OOOiio

* i NTEUNAI.

FI.AGS

Interne Marken

0005?

-1 1 00

SI PI-AG M

EQU *

Zeiger ailf erste Marke il 0 0 5 ü

00-1 1

0100

ZSCPWII

RM lì 1

Stapellösch-Tastendruck

000 5 Q

004 2

0 I 00

ZKßYMO

RM lì 1

Ta stene1ngabezustand

00060

0043

0 100

2STIÌU)

RMR 1

Einstellbare Anzeige

0006 1

0044

0100

ZSTMCP

IÌMU 1

Einstellung angezeigt

000ó 2

0045

0100

2 T t Mil

RM lì 1

Zeitgastauerta Anzeige

0006 3

0046

0100

2 APPPIi

RMfì 1

Addierbare Anzeige

0006 1

,0047

0)00

2001-1 NK

RMfì 1

Anzeigeblinker

O0065 004Û

0100

2 EC II E lì

RMß 1

Echofehler

00066.

0049

0100

2EXCOM

RMIÌ 1

Externe Kommunikation

OilO 6 7

004 A

0100

2QIN

HMD 1

Eingangsnachricht in Warteschlange

00064

004 0

0100

2QÛIIT

RM lì 1

Ausgangsnachricht in Warteschlange

000 6 9

0Û4C

0100

2TÛTAC

RM lì 1

Gesamtsummen-Akkumulation

000.70

00 4 P

0100

2TIÌI P

RM lì 1

Masohinenauslösung

000 7 1

«MESSAGE HEADERS

Nachrichtenheader oder - Vorsatzinformation

000 7 2

«COMMANPS

TO AU - NO PAT A

Befehle an Buchungseinheit (AU) - keine Paten

O00 7 3

4 100

II [DNA Ol.

EQU $41

Setze Maschine betriebsbereit

0007-1

4 200

UDÌ SAIÌ

EQU $42

Setze Maschine außer Betriebsbereitschaft

000 7 S

4300

IIENDEN

EQU $43

Ende der Eingabe i j j 0 7 6

4400

IHÌESIÌA

EQU $44

Riicksetze Stapelgesamtsummen il j û 7 7

4 SÛÛ

IISGTSV

EQIJ $46

Setze Wartungszustand

r i : :> t 13 10/10/79

I 2 ; 1 n ; 3 7

omoicrûss.tl3

00071) '1700 iiressv equ $47

Il0 0 7 9 *CÛMMANDS Tû A

OOOdO 0 100 IISETPQ EQIJ $Cl

G00Ü I C500 DENTAM EQU $C5

000Û2 C600 niÜMTCO EQIJ $ C 6

000 0 3 »REQUEST DATA PNOM AU

0008-1 5000 uh bqst equ $50

nouas 51 no iireqpo eqij $ 51

00006 5200 I.IIIEQAR EQU $52

0000 7 5200 HIlEQOr. EQU $52

00088 5300 IIREQDR EQU $53

00009 5300 IIREQLP EQU $53

UGO90 5•!00 IIREQCS EQU $54

ÙÛÛ9I 5 4 00 IIREQNN EQU $54

00092 , 5500 iireqpc equ $55

00093 5500 IIREQPS EQU $55

0009-1 5600 IIREQIÎA EQU $56 000 95 5600. IIREQIIS . EQU $56 00096 5700 Il REQIlC EQU $57 000 9 7 * DATA PROM AU -00090 8000 IISTAT EQU $00 ihU)99 «DATA PROM AU -

uJlJO 8100 II PS ET . EQU S fil

OaiJI . A200 II A REG EQU $ 112

DÛ 102 ÛAOO i101 .OCK EQU ? 2 i S00

Riicksetze Wartungszustand Befehle an AU - mit Daten Portogebühr einstellen Detrag eingeben Kombination eingeben Anfordere Daten von AU Anfordere Status

Anfordere Por togebiihreneinstel lung

Anfordere anwachsendes (ASC)-Register (Betrieb)

Anfordere Dollarsperrwert (Wartung)

Anfordere abfallendes (DESC)-Register (Betrieb)

Anfordere untere Portogebührengrenze (Wartung)

Anfordere Kontrollsumme (Betrieb)

Anfordere Maschinennummer (Wartung)

Anfordere Stückzahl (Betrieb)

Anfordere Diagnosestatus (Wartung)

Anfordere Stapelbetrag (Betrieb)

Anfordere oberen Einstellgrenzwert (Wartung)

Anfordere Stapelzahl

Daten von AU - ohne Formatbyte

Daten von AU - mit Formatbyte Por togebiihreneins tel lung anwachsendes Register Dol1araperrwert

TEST 1 3 1 0/ 1 6/ 79 1 2:4(1:37 DMO; CROSS.Ti3

00 103

0300

ü() 1 0|

0(300

Hü 1 0 5

Û'100

0 0 1 0 ô

0CÜ0

00 l 07

(15 00

oo i oa

QD0O

uO 1 0 0

U6 00

00 1 10

QEÛÛ

00 1 1 1

ü 7 00

00 1 1 2

00 1 1 3

El 00

00 1 M-

00 1 1 5

6 1 00

00116

6200

00117

6300

oo 11 a

LIO 1 1 9

A 1 00

'00 1 20

00 I 2 1

0 1 00

00 122

0 2 00

00 1 2 1

1 000

00 I 2 -1

1 (10 0

00 1 25

7 F 1)0

00 l 2ô

IIDREG

EQU

$ 03

IIEOPOS

EQU

$ 03 »S00

1 ICS UM

EQU

$ 04

IIMTRNÛ

EQU

$ 04iSOO

u pc tre

EQU

$ (15

IIDI AGS

EQU

$ 05tSO0

II 0 AMT

EQU

$ 06

II ESI. 1 M

EQU

$ û 6 t S00

IIUCMT

EQU

$07

»COMMAHDS PROM EXT DEV IIEXWR EQU $ E 1 4L'OMMANDS PROM EXT 013V IIEXRD EQU $6 1 IIENAKß EQU $62 11DI S K n EQU $63 »HATA TÛ EXT DEV HD!SPC EQU $ A 1

»Mise Parameters

AUMASK EQU $0 1 EXMASK EQU $02 IUEND EQIJ I MI1L1P i 6 OllDEM EQU OUTlHJPifi TSTACK EQU $7P x PORTS Alin TIMERS

Abfallendes Register

Unterer Portogebühren-Warenwert

Kontrollsumme

Masch inennummer

Stückzahl

Di agnosestatus

Stapel betrag

Obere Einstellgrenze

Stapel zahl

Befehle von externem Gerät - mit Daten

Mache zeitweilige Anzeige

Befehle von externem Gerät - keine Daten

Anfordere Inhalt der Anzeige

An fordere Tastatur-Betriebsbereitschaft

An fordere Tasta tur-Außerbetriebsetzung

Daten an externes Gerät

Inhalt der Anzeige

Verschiedene Parameter

Wäliie Ri ngabe/ Ausgabe-Bi t für Buchungseinheit Wähle IHingabe/Ausgabe-Bit für externes Gerät Ende des Eingangspuffers - 1 Ende des Ausgangspuffers - 1 Stapelanfang

PORTS (Tore) und Zeitgeber

I'EST 13 lO/lb/79 . I 2 ; '1 fi ! 3 7

DMO ; CIÎOS S . TI 3

1 2 7

0 0 1 2'd

Oû I 2 9

ih) 1 30

00 1 3 1

Oil 1 3 2

00133

ûù 1 3 1

00 l 35

00 1 3ß

00 1 3 7

00 1 iß

üü I 10

Où I I I

1

001-12

3BÛÛ

û û 1 -1 3

3ÛÛÛ

4 0

il li | -J -1

3 00 1

A5

04

ûù 1 15

3003

ÛA

00 1 ló

3 004

4(1

üii N7

3005

911

00 1 IÛ !

3006

40

üü 1 19

3ÛÛ7

C6

IC

Où 1 50

3ÛÛ9

Dû

OC

nnoo

ACR

EQU

? on

0 5 0 0

CTRIIO

EQU

$ 05

0 4 0 0

CTRLO

EQU

? (i 4

flAOO

i Ell

EQU

$ 0 A

naoo

I P R

EQU

? 09

ÛC00

PCR

EQU

$ OC

nooo

PORTA

EQU

$09

nnoo

PORG

EQU

$ (IO

n i oo

PORTB

EQU

$ n i nooo

PÛRTDX

EQU

$ fl 13

0200

PO RTC

EQU

$02

0300

PORTO

EQU

$03

* INTRP

»INTERRUPT PROCESSING

ORG S300Q INTRP PHA INTRP I.DA CT R 1.0 TX A PIIA TYA '

PIIA

DEC BLINK RWE 1NTRÛ2

Ili 1 frssteuerregister Zähler II/O Zähler L/O

Unterbrechungs-Inbetriebsetzungs-Reg ister Unt:e rbrechungsmarken-Regi s ter Periphere Stuerregister Taata lairspa 1 te /Anz ei ge segment -Wahl

Tastaturzeile/An?eigeziffern-Wahl

LED- und serielle Ausgabe Serielle Eingabe

Unterbrechungs-Verarbeitung

Rette Akkumulator

Lösche Unterbrechungs-Marke

Rette X

Rette Y

Rrn iedrige .395-Sek.-Periodenzähler Wenn .395-Sek.-Periode beendet

TUST 13 l Ü / 1 6 / 7 !J

l 2 :40: 37

OMO;CROSS. T1 3

Ot) 1 S 1

3ÛÛ(3

A5

211

LOA

LNGTIM

DÛ | 52

30ÛD

FO

02

flEQ

INTR02

ÛÛ 1 53

300F

C6

211

DEC

LENGTIM

Oll 15 1

1130

INTIiÛ

1 EQU

M

ü 0 1 5 5

30 1 1

A 9

oo.

LOA

jsrin

Û0 156

t

30 1 3

45

47

EOI!

ZUL1NK

0ÛI57

3Û ! S

05

47

STA

ZOLIN«

ÛÛI58

1730

I NT (ÌO 2

EQU

*

ûû 1 60

* KBSC

ûû 1 6 I

* KEYflOARO AMO SWITCH SCAN

00 ï 6 2

* PART

OP IM'I

'ERRUPT ROIITlNIi

Dû 163

38)7

A9

OE

KO SC

LOA

11 1 4

ÛÛ 1 6 1

3819

05

8 )

STA

PORTO

ÛÛ165

38 in

AÛ

00

LOY

II o

ÛÛI66

38 10

04

20

ST Y

KEYCOL

Où 1 ó 7

38 IP

0 4

ÛO

STY

PORTAX

ûûlôd

302 )

46

4 1

LSR

ZBCOWN

ûûl 69

3Û23

4 A

LSR

A

ûû 1 70

M

dû 1 7 1

3824

25

0Û

ANO

PORTA

ù(i 1 72

30 26

05

2 A

STA

KSW

ûû 1 73

3020

A 2

û 3

LOX

«3

ÛÛ 1 7 4

2 A 3 0

|< li SCO

1 I3QU

A

Ùûl 7 6

3 8 2 A

C6

0 1

OP.C

PORTfl •

il il 1 7 ù

3Û2fl

A5

(10

LOA

PORTA

- wenn 101-Sek.-Zähler £ 0 Erniedrige Zähler Kippe Blinkermarke

Tastatur- und Schalterabtastroutine Teil der Unterbrechungsroutine Wähle Tastaturzeile 4

Anfangssetzung für getasteten Tastaturzeilenzähler Lösche

Setze auf Lesen der Tastaturspalten-Bits Lösche Stapel-Lösch--Tastendruck

Lese Schlüsselschalter, 3 L/O-Bits (niedrige Ordnung) Lösche Übertrag für spätere Verzweigung

Setze auf lesen von 4 Tastaturzeilen Ausführung bis 4 Tastenzeilen gelesen Wäliie nächste Tastaturzeile Lese Tastaturspalten-Bits

TEST 13 10/16/79 12;'10:37 OMO : CROSS . Ti 3

i)0|7 7

3 8 2 E

40

FF

EOR

I SPP

no 17a

3 8 30

95

33

STA

TEMPOI,X

00 1 7 Q

383 2

FÛ

07

0EQ

KIÌSC02

001 UO

38 3 4

06

36

STX

TEMPO 1i3

00)01

3836

05

20

ORA

KBYCOL

00102

3030

20

STA

KEYCÛL

00 ) U 3

3 8 8 A

CO

I M Y

00 184

30 30

KIÌSC02

EQU

k

00 | 85

3flûn

CA

DEX

00 I 0 6

30 3C

)0

.EC

lì PL

KIÌACO)

0-0) 87:

k

00 180

3 0 3 E

90

TYA

001 89

30 3F

DÛ

ÛC

OME

K n S O 4

001 90

384 )

A5

1 E

I.DA

DBOUNC

00191

304 3

DÛ

04

ONE

KRSCÛ3

00192

384 5

A 9

FF

LDA

l-l

00 193

384 7

30

37

IÌMI

KIÌSC 1 I

00 191

4 930

KRSC03

EQU

*

00 | 95»

3849

C6

)B

DEC

DIÌOUMC

1)0196

A

00 197

30 4 3

90

37

ncc

KIÌSC 1 2

00 1 9 lì

A

00 » 99

4D3Ü

KDSC0 4

EQU

*

Mache die Logik positiv

Rette gegenwärtiges Spaltenbild wenn Tastendruck

Speichere Tastaturzeilennummer

Speichere Tastaturspaltennummer

Zähle getastete TASTATURZEILE

Ziihle Tastaturzeile

Wenn keine Taste gedrückt

Wenn Entprellungszähler = 0

Anzeige keine Taste gedrückt

Verlasse Routine sonst

Erniedrige Übertrag gelöscht Verlasse Routine

ïi::;r «J Lll/lli/7'J I2;4ll;37 OMO ; L'IIOLiS . Y1 3

Û2ÙÛ

3 8-10

CO

02

CPV

12

0020 I

3 A4 F '

10

OO

npi.

KOSCO6

00 20 2

A

00203

à

0020-1

A

00 205

A

OÛ2Û6

A

0Û207

*

0020Q

A

00209

A

00210

3 8 51

AS

28

LOA

KEYCOL

00211

3853

A 2

FF

LOX

1-1

Û02 1 2

3855

86

28

STX

KEYCOL

Û02I 3

5738

KBSC05

EQU

*

ûû 2 1*4

3Û57

126

28

I MC

KEYCOL

Ù0215

3859

4 A

LSR

A

OÛ2I6

3 û 5 A

90

FB

ncc

KBSC05

00217

*

002 là

3Û5C

FO

13

nisQ

KOSCOO

00219

305E

A5

34

KBSC06

LOA

TEMPO 1t)

ûû 2 20

3860

29

20

ANO

IS20

ûû 2 2 1

.3862

FO

Û9

ni2Q

KBSCOÜ

û û 2'2 2

3864

A5

35

LOA

TEMPO 1i 2

0023 3

3866

29 1

30

ANO

IS30

0 û 2 2-1

386Û

FO

03

|3EQ

KBSC0 7

OD 2 2 5

3Q6A -

3 û

SEC

Wenn' viele Tasten gedrückt Wenn Löschtaste gedrückt Wenn Leide Stapeltasten gedrückt Setze Stapel-Lösch-Tastendruck

Anzeige viele Tasten gedrückt Setze E'ntprellungszähler Verlasse Routine

Setze auf Berechnung der Tastaturspalte

Führe aus bis Bit gefunden Berechne Spaltennummer Schiebe Bit in Übertrag

Wenn mehrere Bits in Byte Wenn Löschtaste gedrückt

Wenn beide Stapeltasten gedrückt Setze Stapel-Lösch-Tastendruck

ITST 13 10/16/79 12:40:37 DMÛ; CROSS,TI 3

00226

3061)

6 6

41

non 2BCDWN

OÛ227

603Q

KRSCO 7

EQU *

00 2 2 0

6n3fl

KBSCOO

ßQU 4

00 2 2 9

• 386D

A9

PE

LDA 1-2

002 30

3 0 6 F

30

Ol)

lì MI KIÌSC 10

002 3 1

À

0023 2

7 1 30

KHSC09

ßQU *

00213

307 1

A4

Iß

LOY DIÌOUMC

002 34

3 Û 7 3

DÛ

ÛP

BNß KBSC12

002 35

00236

3075

A5

36

I.DA TßMPOl i 3

0 0 2 3 ?

307 7

0A

ASL A

00238

3878

0A

ASL A

00 2 3 9

3079

0A

ASL A

00240

387A

65-

20

ADC KEYCOL

0024 I

307C

A 2

26

Knscin

LDX i3fl

Ü024 2

38 7E

86

IE

STX DBGIJNG

0024 3

3 ODO

•05

26

KBSC\1

STA KCLBAN

00 2 4 4.'

3002

05

27

STA KCl.BEN

00 24 5

04 30

K DSC 12

BQli *

002 17

Mì I S P

00248

»DISPLAY

NEXT NIBBLE

00 2 4 9

A PART OP

INTERRUPT ROUTINE

OQ25Û

3804

A5

2Û

D f SP

LOA niSCTR

Anzeige viele Tasten gedrückt Satze Entprellungszäh1er Verlasse Routine

Wann Rntprellungszahler t 0 Verlasse Routine

Derechne Tastenkode

Setze Rntprellungszahler

Anzeige Tastenkode Verlasse Routine

Anzeige nächsten Nibble in Anzeigepuffer

Teil der Unterbrechungsroutine

Wenn Abtastfolge vollständig beendet

i r.i i i j iu/ m/ / y

11 : M n j J /

ui-tU ; CKuaa . T1 J

00251

3 fl ß 6

10

08

BPL

DISPOl tili 2 S 2

3 Q ß 0

A9

00

LDA

miISBUPto

00253

3ß8A

85

21

STA

DISPTn

00 2 5-1

3 fl 8C

A 9

09

LDA

k 9

00255

38QE

fl 5

20

STA

Discrn

00256

9039

DISPÛl

EQU

*

00257

3 890

4 A

Lsn.

A

J025Û

3091

A 6

21

I.DX

»ISPTR

00259

3 89 3

D5

00

LDA

O. X

Û026Û'

3 895

90

05

BCC

DIS P02

0026 1

3897

20

OP3E

J S R

SWAP

0(1262

3 8 9A

90

02

BCC

DISPÛ3

00263,

9C38

DJSP02

EQU

*

Ù02 6 4

389C

E6

21

INC

DISPTR

00265

9E38

DIS PO3

EQU

*

00266

389E

29

ÛF

AND

1SOP

00267

3 Û A0

AA

TAX

ÜÜ268

3 a A 1

E0

ÛD

CPX

1)3

00 26 9

3 8 A 3

Dû

09

BN E

DISPÛ6

00270

38A5

24

44

BIT

2STNGD

0027 1

3 Q A 7

10

05

BPL

DISP05

0027 2

3 8 A9

24

3D

B IT

YENABL

002 7 3

38A13

30

01

UHI

DlSP04

Ù0274

3 Ü AD

EÛ

tJNX

ÜÜ275

ÄE3Q

DISP04

EQU

*

Anfangssetzung Anzeigezeiger An fangssetzung Anzeigezähler

Setze Obertrag wenn Zähler ungerade Hole gepackte Nibbles

Wenn Zähler ungerade markiert austausche Nibbles sonst zeige auf nächste 2 Nibbles

Trenne Nibble ab

Setze für Tabellensuchvorgang wenn auf Anzeigeteil gesetzt

Wenn An2eigesetzungsmarke gesetzt Wenn Maschine nicht betriebsbereit setze auf Anzeige von Bindestrich

TUST 13 10/16/70 1 2 ; <1 fl : 3 7 DMQ ; CflQSS . Tl'3

i)ü 2 7ii

AE30

DISPOS

EQU

k

OÙ27 7

1

AE30

DISP06

ßQU

*

00278

3 8 AE

ne FD30

LOY

nisp i

ÛÛ279

3ÛBI

10

CLC

ÜÜ2Ü0

31)112

A5 1P

LDA

DECPOS

(1020 |

30B4

45 20

Borr

DISCTR

00202

3806

a a a

BN E

DISPÛ7

ÛÛ203

3880

30

SEC

00284

B9 28

DISPQ7

EQU

*

Û02B5 *

3809

24 4 4

OTT

2STBGD

00206

3QQU

IÛ )0

ßPL

DTSPl2

0 û 2 0 7

38BD

24 3 P

13 IT

YIIARDE

UÛ2QÛ

2 8BP

10 û 3

13 PL

DISPÛ0

00289

3QC1

30

SEC

00290

38C2

>

D

D O

LOY

II SOG

ÛÛ 2 9 1

C43Û

DISPÛÛ

EQU

*

ûû 29 2

38C4

24 4 7

BIT

2BIJMK

ûû 29 3

38C6

30 0D

BMI

DI SPI 1

00294

3ÛCÛ

A5 30

LDA

YLÛWP

Û0295

3 DCA

05 3 A

ORA

YINSP

û û 2 9 6

3 8CC

10 01

HPL

DISP09

fi 0 2 9 7

3 flCË

in

CLC

ÛÛ29B

CP3fl

DlSP09

KQ»

*

£ N) •b. U) 4*.

Lade verschobenen 7-Segment-Kode in Y setze auf Löschen des Dezimalsegments wenn in Dezimalformat setze auf Setzen des Dezimalsegments wenn Anzeig"esetzungsmarke gesetzt

>

K)

Os wenn Marke "harter Fehler" gesetzt ^

setze auf Setzen des Dezimalsegments setze auf Anzeige von Leerzeichen wenn ßlinkermarke gelöscht wenn Ni.edrlgstand oder unzureichende Geldmittel setze auf Löschen des Dezimalsegments

TEST

13 10/16/79

1 2 ; 4 fl ;

37

OMO;CROSS.

Tl 3

00299

3 OCP

24

3 A

nit

YINSP

wenn unzureichende Geldmittel

003ÛÛ

3 AD 1

10

02

bpl

DISPOl0

0030 1

3ÛD3

AO

00

LOY

*0

setze auf Anzeige von Leerzeichen

0Q302

D538

0 I SP 1 0

EQU

A

00303

0538

OISPl1

EQU

A

0 û 3 Û 4

0538

0 I S P 1 2

EQU

A

00305

3805

98

. TYA

Hole verschobenen 7-Segment-Kode

Û113Û6

3806

24

3C

lì IT

YS ERV

Wenn Wartungsmarke gesetzt

Û Q 3 û 7

3800

10

06

bpl

01S P 1 4

ÛÛ3Û8

3 8 DA

49

00

Eon

1000

wenn Leerzeichen angezeigt werden soll

00309

3 8 DC

DÛ

02

BNE

0 I S P ì 3

Ûû 3 lû

3 8 DE

A9

1 0

LOA

ÏS10

einsetze Unterstreichen

00 3 1 l

eû3 8

OISPl3

EQU

*

00 3 1 2

EQ38

DISPÌ 4

EQU

A

ûû J 1 3

3ÛEQ

6 A

non

A

Verschiebung in Dezimal für 8-Segment-Kode

003 i 4

3 ÛE 1

A 2

00

LOX

10

Lüsche Ausgabetor

00 3 1 5

38E3

Û 6

80

STX

PORTA

00316

3 ß ES

CA

DEX

Setze auf Ausgabe

'0Û3 1 7.

. 3f]E6

f)6

80

STX

PORTAX

003 1 8

38E8

AA

TAX

Bewege 0-Segment-Kode nach X

ÛÛ 3 1 9

3 0 E9

A5

20

LOA

DISCTR

Wühle Ziffer für Anzeige

ÛÛ 3 20

3 8 ER

85

81

STA

PORTO

0032 1

3 fl EO

A5

26

LOA

KCLEAM

Xsl: eine oder keine Taste gedrückt

00322

anep c9

Fß

cmp

1-2

003 2 3

3 ß P 1

PÛ

02

13 BQ

0ISPÌ5

00 3 2 4

3 fl P 3

86

no

STX

PORTA

Erleuchte Segmente

TUST N 10/16/73

1 2 : <1 11 i 3 7

OMO;CROSS.TI 3

ÛÛ225

P5 3 8

D I S P 1 5

EQU *

00 3 26

3 8P5

C6 20

DEC D I SC'I'R

DÛ 3 27

3 û F 7

68

PI. A

Dû 3 28

3 8P8

AA

TAY

OÛ329

3 8F9

68

PLA

D û 3 3 û

3 8 PA

AA

TAX

Dû J3 1

38FQ

68

PF, A

DO 3 3 2

3 8 FC

40

RTI

D0 3 3 3

FH3 8

DI S PO 1 6

EQU *

OÜ334

*

00335

38FD

7E

PCD

3 8 FE

©C

3ÛFP

136

3900

9E

390)

CC

3 90 2

DA

3903

FA

3904 ■

OE

3905

FE

3906

DE

:,ùi 3 0

*

00 3 3 7

3907

F 2

PCD

ÜÜ 3 3 a

•

*

00 3 39

3901)

•AO

PCD

00 3 1 ci"

* •

003 1 1

3909

na

pcn

0\ Os ts)

-u. £

Ziihlé Anzeige Wiederherstelle Y

Wi ederherstelle X

Wiederherstelle A Aussprung aus Unterbrechung 7-Segment-Kodes linksverschoben 01 234 56789 S7E,S0C, SB&, S9E, SCC, SDA, SFA, S0E, SFE, SDE

as Os

UPPER CASE E SP2

I.OWER CASE R SAO

I.QWER CASE O

san großes E kleines R kleine O

tkst u 10/l<j/7u 12:411:37 dmo i cross . t1 j

00342

*

whigs

00343

390a

92

pcn

ç92

003 1 4

A

il y piien

U03 4 5

390b

00

pco

çû0

00346

blank

003 4 7

390c

00

pcn soo

00349

A

ini?

00350

*

imitialize system at reset

0035)

3 90d a2

7f ini?

ldx dtstack

00352

390p

9 a

tx s

00 3 53

3910

90

sei

Q0354

3911

do

cld

00355

3912

a 9

00

lda

10

00356

1439

initol equ

*

00357

39)4

95

00

sta

00 358

39 1 6

ca

dex

00359

39)7

10

po

•

dpi,

initol

00!3 60

*

0036 )

39 1 9

20

1 û 3 a

jsr blank

00362

à

00363'

39 ic

05

49

sta zexcoh

00364

39 ) e a 9

f7

lda isp7

00,365

3 9 20

fl5

2 F

sta pûrtci

00 366

3922

(15

ü2

sta porto

003 6 7

3924

a9

0p

lda

1SOP

Fl iigel

Bindestrich Leerzeichen

Anfangssetzung des Systems zur Rücksetzzeit Anfangssetzung Stapelzeiger

Setze Unterbrechungs-Außerbetriebssetzung

Setze auf Ausführung binärer Arithmetik

Lösche Akkumulator

Ausführung bis Seite Null gelöscht

Lösche Byte

Zähle Byte

Fülle Anzeigepuffer mit Leerzeichen

Setze X » -1 = $FF

Setze EXT-Kommunikations-Marke

Einleite Porte, Anschalte Datumsprüfung-LED

Einleite PortB, setze serielle E/A in Betrieb

Ti: ST 13 10/ 1 6/79 12:411:37 OHO : CROSS ..TI 3

00368

3926

85

8 1

STA

PORTB

00369

3928

85

2ß

STA

PORTBI

00370

3 9 2A

46

40

LSR

YKBDIS

00371

392C

A9

5P

LDA

I ? 5 P

OÜ372

3 9 213

(15

Oli

STA

PORTBX

00373

3 9 30

85

20

STX

DISCTR

00374

393 2

86

29

STX

KLUSED

ÛQ375j

3934

A2

08

LDX

*?oa

00 3 76

3936

86

8C

STX

PCR

00-3 7 7

3930

A2

0A

LDX

K$ûa

00 3 7 fl

3 98 A

86

8 B

STX

ACR

00379

393C

a 2

06

LDX

i $06

00'3ß0

398E

86

2D

STX

PKSW

0Û3Q)

3940

86

84

STX

CTRLO

ÛÛ382

3 94 2

86

85

STX

CTRIIO

00303

3944

A9

50

LDA

IIIREQST

ÙÛ3Q4

3946

20

6P3P

JSR

IIDR2 AU

00385

A

00386

3949

20

FB3C

JSR

PSKR03

00387

*

00388

*

00390-

* Mf,OOP

0039)

*MAI ML

INR LOOP

00392

403 9 M1 -00 P

ßQU

k

00393

394C

20

n 2 3 A •

JSR

pr.usn

00 3 9-1

3 9 4 P

A 9

02

LDA

II2XMASK

Einleite PORTB Abbild

Lösche Marke "Tastatur sperren"

Anfangssetzung Anzeigezähler Anzeige kein Tastenkode ausgegeben Setze zur Ausgabe IR0 auf PB6

Setze ffir freien Lauf auf Phase 2

Anfangssetzung SchlüsseIschalterstellung

Starte 1542-usec-Zeitgeber

Hole Status

Empfange Status einschleuse War teseli langen-Nachricht An fordere Por togebiihreneins tel lung Ri nschieuse Wartesehlangen-Nachricht llauptfluß-Schleif e Schleife

Rinachleuse Warteschlangen-Nachricht

Wenn RTS (Sendeaufforderung) von externem Gerät

TUST li 10/If)/VU 12:111:37 DMO:CROSS.T

00395

395 )

24

83

BIT

PORTD

00396

3953

DO

06

BN E

MLOQO)

00397

3955

20

703D

JSR

RCVIN

00 3 9 0

3950

20

B 2 3 A

JSR

PLUSII

00399

5039

Hf.000 )

EQU

*

ÛÛ-10Û

395Q-

A9

01

LDA

IAUMASK

004 01

395D

24

83

BIT

PORTD

00 Û 2

395P

DO

06

• BN 13

ML0002

00-103

396 )

E83D

JSR

RCVOUT

00404

3964

B23A

JSR

PLUSII

00405

6739

HI. 0002

EQU

à

00406

3967

A2

40

LDX

I $40

00407

3969

Û 6

8 A

STX

1ER

Û040Q

3 9 6B

58

CLI

00409

396C

24

45

BIT

2TIMD .

004 »0

296B

10

07

BPL

ML0Û04 1

ÛÛ4 1.1

3970

A5

25

LDA

LNGTIM

.004 I 2

3972

DO

03

BNR

ML0003

004 1 3

3974

20

0) 3D

JSR

PSKE0 4

00 4 1 4

*

004 15

7739

HLO003

EQU

*

0 0 4 16

77 39

ML.000 4

EQU

«

004 1 7

3977

A5

47

LDA

2BL1MK

00 -IIB

3979

25

30

AND

YRESBA

00-11 9

397B

0A

ASL

A

00420

397C

A5

47

LDA

2BLÏNK

3

Erhalte Nachricht von externem Gerät Einschleuse Warteschlangen-Nachricht

Wenn RTS von AU (Sendeaufforderung von arithmet. Einhei

Erhalte Nachricht von AU Einschleuse Warteschlangen-Nachricht

Setze Unterbrechungen in Betrieb >

K) ON

Wenn Marke "zeitgesteuerte Anzeige" gesetzt

Wenn ?,eitperiode erledigt

Hole Postgebühreneinstellung einschleuse Warteschlangen-Nachricht

Setze zum Ein/Ausschalten von Basisrückstellung Halte Bit in Ubertrag

®\

Setze zum 12in/Ausschalten von Datumsprüfung S

TEST 13 10/16/79

1 2 : 4 fi ; 3 7

DMOiCROSS.Ti 3

Il 0 4 2 1

3 97G

25

39

ahd

YCKDAT '

Ol) 12 2

39110

2 A

ROL

a nni21

300 1

2 A

ROL

a

004 2 1

3902

2 A

ROL

A

00425

3903

2A

ROI,

a

004 26

3904

09

P3

' ORA

i ?P3

00427

. 3986

05

2P

STA

PORTC I

00 4 2 û

3 9 Û 8

û 5

02

STA

PO RTC

00-1 2 9

3 9 Û A

AS

0 1

LOA

PORTO

004 30

39ÜC

A6

2B

LDX

PORTB1

004 3 l

390G

05

2 E

STA

PORTB1

004 3 2

3990

flA

' tx a

00 1 3 3 .

3 99 1

45

2E

130 R

PORTBI.

004 34

3993

29

20

AHO

I %00 1 00-000

004 35

3995

PO

16

BEQ

ML000 7

004 36

3997

A5

2E

LOA

PORTBI

00437

3999

29

20

AMD

a 4.001 ooooô

004 3 8

399B

dû

08

DI Iß

ML0005

00 4 39

399D

46

49

LSR

2 EXCOM

004 40

3 9 9 P

46

40

LSR

YKBDIS

00 4 1 l

3 9A 1

A 9

4 6

LDA

ÏIISI3TSV

004 12

39A3

10

05

npr,

M 1.0006

00 4 4 3

A5 39 ML00 0 5

ßQU

*

004 4 1

3 9 A5

30

SBC

004 4 5

39A6

66

4 9

ROR

2 EXCOM

Bewege Bits in Stellung

Setze alle weiteren Bits Schalte L)3D's an oder aus

Hole Wartungsschalterbi.ts

Hole vorheriges Bit

Speichere gegenwärtiges Bit wenn Änderung des Schalters aufgetreten ist

Wenn in Wartungsstellung

Lösche Marke "externe Kommunikation"

Lösche Marke "Tastatur aufler Betrieb"

Sel:2e ziir Anforderung des Wartungszustandes sonst, schalte in Normalstellung Sel:2e Marke "externe Kommunikation"

TUST 13 10/16/79 12:4(1:37 lìMO ; CIUIÖÜ . T

ü 0 116

3 9 a0

a9 47

lda hiiresqv.

00 4 17

aa 3 9

mi.0006

EQIJ

*

004 4 8

3 9 aa

20 80313

jsr

KEYM03

004 4 9

*

00450

*

0045 1

ad39

ml0 00 7

ßQU

*

004 52

3 9 ad

2 4 40

dit

YKnois

00453

3 9 ap

30 913

13mi

* m loo19

004 54

• 3 90 l

24 4 1

13 it ußcdwn

004 55

' 39n2

10 oc

bpl ml0009

004 56

3905

24 iE

ß IT

YßATRC

00457

39117

3 0 05

rm i ml0008 ■

00 4 50

39u9

a9 44

lda

| iiresi3a

004 39

39130

20 fld3n

jsr keymo3

004 60

t

004 6 1

*

00462

ng39

mloooq

. equ

*

00463

3913b

20 0130

jsr pskeû4.

o'o 4 6 4

*

00465

*

ûû466

cl 39

mlo00 9

equ

*

oû467

39c1

24 4d

bit ztrip

004 68

39c3

10 0F

bpl mlp0 12

ûû569

39c5

46 4d

LSR

ztrip

(104 7û

39c7

a 5 27

lda

KCLßßN

SeL2e auf Anforderung Normalzustand

Anfordere Zustand Empfange Status

ßlnschleuse Warteschlangennachricht

Wenn Tastatur in Betrieb

Wenn Stapellösch-Tastendruck

Wenn Stapel zur Löschung fällig

Setze auf Löschung des Stapel-Registers Sende Nachricht an AU Empfange Antwort

Einschleuse Warteschlangen-Nachricht

Anfordere Portogebühreneinstellung Empfange Antwort

Einschleuse Warteschlangen-Nachrieht Wenn Maschinenauslöse-Matke gesetzt

Lösche Mgschinenauslöse-Marke Wenn keine Taste gedrückt

TEST 13 10/16/79

12:40:37

DMOiCnüSS.TU

00-171 004 72 00 17 3 00-174 004 75 004 76

00477

00478 004 79 ÙÛJ80 00 4 8 1

00482

00483 00 4 8 4'' Û0485 00 40 6 _ 00487 004 00 00409 ÛÛ 4 90 0049 I 00492 0040 3 004 9 I 00 4 95 00 4 9 6

39C9 10 06 39CB 20 0130

A

39CE 4C 0439

D 1 3 9 MLÛOIO 3901 20 893C

3904 3906 3908 390A 39DC 39DE 39EO 39E2 39E4 39E5 39E6 39EQ 39EA 39ER 3 9EC

0439 0439 A9 00 A6 2A EO 03 Pû 00 Eû 05 FÛ 0 4 Eû 0 6 OÛ OE 8 A

4 A

05 37 •A5 20 ÛA

ÛA

05 37

MLOOI 1 M LOO|2

MLO013

BPL MI,00 10 JSH PSKEO 4

JMP ML00 1) EQU *

JSR PRKEOÛ

EQU *

EQU * LOA na LOX KSW CPX 13 BEQ ML0013 CPX i 5 BPQ M LOO13 CPX U 6 BME M LOO14 TX A LSB A

STA TEMPO2 LOA PKSW ASL A AS f, A

ORA TËMP02

llqle Portogebühren-Einstellung Einschleuse Warteschlangen-Naehricht sonst, Taste gedrückt Pali

Verarbeite reg. Tastendruck Kein Fall

Setze Fallnummer=kein Fall

Hole Schliisselschalterstellung wenn zulässige Schliisselschalterstellung

Berechne Fallnummer auf PKSW, KSW

l'EST J. 3 10/16/79 12: 40; 37 DMO ; CROSS . T1 3

0Û 19 1

3 9 EA

0A

ASL

A

00495

39EB

0A

ASL

A

00496

3 9 EC

05

37

ORA

TEMPO2

00497

3 9 EC

29

OF

AMD

II SO F

00 4 9 û

3 9PQ

06

2 D

STX

PESW

00499

F 2 3 9

HL0 0 1 4

EQU

A

00500

39F2

AA

TAX

00501

39F3

A 9

39

LDA

ïMLOOI0-1<

00502

39F5

40

PIIA

00503

39F6

A9

4 B

LDA

ï MLOO10- 1>

00504

3 9 FB

40

PUA

00505

39FB

BD

FD39

LDA

MLOOI6-5,X

00506

39FC

4 0

PUA

00507

39FD

BD

00 3 A

LDA

MI.001 7-5,X

0Û50Q

3A06

40

PUA

00509

3 AÛ 1

60

HL0 0 1 5

RTS

ÛÛ5IÛ

3AÛ2

3 A

ML0016

PCB

RCßA-1<

00 5 1 1

3A93

3 A

PCB

ECRC-1<

005 1 2

3AÛ4

3 A

pcn

ECOP-1<

005 1 3

3AÛ5

3 A

FCB

MLOO15-1<

005 1 4

3 AÛ 6

3B

FCB

OPEA-l<

005 1 5

3AQ7

3 B

PCB

OPEC-1<

00 5 1 6

3 A0 Q

3 B

PCB

OPOP-1<

005 | 7

3AÛ9

3 A

FCB

M 1 0 0 1 5 - 1 <

Bringe vorherige Schliisselschalterstellung auf neuen Star

Setze Fallnummer in X Setze fiir RTS auf Endfall

Setze fiir RTS auf Fall

FALL - Schlüsselschalter-Übergänge von Komliina ti on seingabe auf Betragseingabe von Kombinationseingabe auf Kombinationseingabe von Kombinationseingabe auf Betrieb kein Fall .

von Betrieb auf Betragseingabe von Betrieb auf Kombinationseingabe von Betrieb auf betrieb kein Fall

TEST 13 10/16/79 1 2 j 4(1: 37

00518

3AÜA

3 A

0051 9

3A0n

3 A

00520

3 AÛC

3 A

00521

3A00

60

ML0017

00522

3A0E

ai

00523

3A0P

89

00524

3 A 1 0

00

00525

3 A 1 )

92

00526

3 A 1 2

92

0Î) 5 2 7

3 A 1 3

AP

00528

3A14

00

00529

3A 1 5

.5 4

00530

3A 1 6

5P

00531

3 A l 7

63 •

005 3 2

4C39

ML001Û

00533

4C39

M 1.00 1 Q

00534

*

riMO; CROSS. TI

FCü EAEA-K PCR EAßC-l< PCO I3AÛP- 1 < PCR ßCßA-1 >

pcn ßcßc-i> pcn rcop-i> pcn MLOO15-1>

pcn opßA-1> pcn oppc-i> pcn opop-1> FCB MLOO15-1> PCn ßAßA-1> pcn EAEC-l> . Fcn EAOP-l>' EQU MLOOP EQU MLÛOP

von Betragseihgabe auf Betragseingabe von netragseingabe auf Kombinationseingabe von Betragseingabe auf Betrieb

TUST 13 10/16/70

12:40:37

DMO:CROSS,TI 3

0 0 S 3 6

* BI.ANK

005 3 7

0053Û

3 A ) Q

A 2

04

H LANK

LDX |4

005 39

A

00540

1 A3A

IH.ANK 1

EQU *

0054 1

3 A 1 A

A9

FF

I.DA S 9 FF

00542

3 A 1C

95

00

STA DISBUP,

X

005 4 3

3 A 1 E

56

4 i

LSR 2FLAGS,

X.

0054 4

*

00545

*

00546

A

00547

*

00548

3A2Û

86

2C

STX NfßCTR

00549

3A22

CA

DEX

005 50

3A23

10

P5

BPL BLANK 1

00551

•

*

0055 2

3A25

86

1 P

STX DECPOÉ

00553

3A27

60

RTS

00555

*orsnPR

00556

* DI SPLAY

BUFFER

00557

3A20

86

22

DI SUER

STX GETPTR

00558

3A2A

20

4 F 3 A

JSR DI SI NT

Leerzeichen

Fülle Anzeigepuffer mit Leerzeichen, Setze

Setfce auf Leerzeichen' 5 Bytes und auf Löschen 5 Marken

Führe aus, bis Bytes, Marken gelöscht

Fülle nyte mit Leerzeichen

Lösche Marke für zeitgesteuerte Anzeige Lösche Marke für Einstellungsanzeige Lösche Marke für einstellbare Anzeige Lösche Marke für Tastatureingabe Lösche Marke für Stapellösch-Tastendruck Lösche Nibble-Zahl linterdrücke Dezimalpunkt Aussprung

Anzeigepuffer

Zeiger- auf NIBBLE-Puffer + 2*2 Lege Anzeige still

TEST 13 10/16/79

1 2 ; 4 fl ; 1 7

DMÛ j CROSS.TI 3

00559

3A2D

20

1 8 3 A

jsr

BLANK

00560

3 A 3 0

20

5P3B

il S H

GETN IB

0056 1

3 A3 3

A8

TAY

00562

3 A 3 4

20

5P3B

jsn

GETM F R

00563

3 A 3 7

85

1 P

STA

degpos

00564

3 A3 9

66

22

Ron getptr

00565

3A3B'

98

TYA

00566

3A3C

4 A

LS II

A

00567

3A3D

26

22

noL

getptr

ÛÛ56Q

3PSA

disbol equ

*

00569

3 ASP

co

ûb

CPY

1 1 1

00570

3 A 4 1

10

0B

bpl disbû4

00571

4 3 3 A

disb02

equ

*

00572

3 A4 3

86

hey

00573

3 A4 4

30

0 8

BMI

disrû3

00574

3A4 6

20

5 p 3 n

dsn getnid

00575

3 A4 9

20

AD3C

jsr

PSIINIR

00576

3A4C

.1°

F5

RPF,

disbû2

0057^

4 E 3 A

disb03

equ*

00578

4 lì 3 A

DlSBOil equ

A

00579

3 Al E

60

RTS

Os Os K»

6

■tk

Piiile Anzeige mit Leerzeichen Bringe Zeichenzahl in Y

Hole Dezimaistellung

Zeiger auf BYTE-Puf f er + 3

Zeiger auf NIBBLE-Puffer + 3 * 2 + (0 oder 1)

> N>

Alternativer Eintrittspunkt'

Wenn Y < 11

Führe aus bei Y 2t ■ 1 Erniedrige und prüfe Y

Hole Zeichen Bringe ös in Anzeige

Aussprung

TUST 13 10/16/7 9

12:10:37 DMO: CROSS,Ti 3

005g0

3 A 4 P

70

* DI SI NT

0050 2

*SET INTERRUPT DISAßi

Setze Marke "Unterbrechung außer Betrieb" -

00503

* RETURN

WITII Il/O 13 IT

Anasprnng mit H/O-Bit des Akkumulators auf Null

00 5 0-1

3 A 4 P

78

DIS INT

Setze Marke "Unterbrechung außer Betrieb"

00 5 ß 5

3A50

A9 OP

I.DA ÏSOP

Lege Anzeige still

00536

3A52

85 01

STA PORTI1

00507

54 3A

orsini

EQU *

alternativer Eintrittspunkt

00580

3A54

60

RTS

Aussprung

N> -4

Os 0\

TEST 13 i0/16/79 12:40:37 DMO: CROSS,TL 3

00590

0059 1

00592 3A55 20 5330

00593 3A5Ü 30 FA

00594 0 û 5 9 5 ÛÛ596

Û0597 3A5A 20 IS03Q 0059Û 3A5D 4C 0230

00599

00600 '

0060 I 00603 0060 1

00605

00606 3A60 A9 C5

00607 •

00608 3A62 30 07

00609 •

00610

006 1 I 00612

* BAEA

* PROCESS KBYSWITCII

BABA

JSR GETKEY-OHI DISIO I

JSK POKRY JHP PAKEO2

Verarbeite Schlüsselschalteriibergang von Betragseingabe auf Mole Schlüsselkode Betragseingabe

Wenn kein Tastendruck Aussprung

Pa 11

verarheitè numerische oder Löschtaste verarbeite Dezimaltaste kein Fall

Aussprung

EAEC

\

Verarbeite Schlüsselschalteriibergang von Betragseingabe auf Kcmbinationseingabe

Aussprung mit positivem Status EAEC LDA IIIENTAM übertrage Betrag

* Status ist negativ BMI BCEAO 1

* Empfange Status

* Einschleuse Warteschlangen-Nachricht

* Lösche Anzeige

* Aussprung

I'KUT 13 10/

16 / 7 U

12:411:37 DHUiCllUüü,

t1 j

ûû 6 1 4

•

* EAÛP

•

00615

*Verarbei te Schlüsse] scha 1 teriibergang von Betriebseingabe auf Betrieb

ûû 6 1 6

3A64

20

603A

ßAOP JSR ßAEC

Obertrage Betrag

006 1 7

*

Empfange Status

ûû 6 1 û

*

Einschleuse Warteschlangen-Nachricht

00619

A

I,ösche Anzeige

Û06 2Û

A

Status ist positiv

0062 1

3 A6 7

1Û

24

BPÏi ecopol

übertrage Ende der Eingabe

00622

Empfange Status

006 23

*

Ei nach!euse Warteschlangem-Nachricht

00624

k

Anfordere Portogebühreneinstellung

00625

'

A

Empfange l'or togebiihreneins tel lung

00626

.k

Einschleuse Warteschlangennachricht

00627

k

Aussprung

00629

* ecba

00630

*'.Verarbei te Schlüsselschalteriibergang von Kcmbinationseingabe auf Betragseingabe

0063 1

k

. Aussprung mit positivem Status

006 3 2

3A69

A9

C6

ECB A LDA IIIENTCÛ

Definiere Header für Kombinationseingabe

00633

603A

ËCEAÛl EQU *

alternativer Eintrittspunkt

00634

3A6U

05

ÛQ

STA IMBUP+1

006 3 5

3A6D

A5

1 F

KDA DECPOS

Hole Stellung der Dezimalen

00636

3A6F

29

ÛF

and boop

Berelnige

00637

3A7 \

Afl

TAY

Setze Dezimalen-Stellung in Y

00 6 3 Q

3A72

A5

2C

LDA MIBCTR

Hole NTBBLE-Zahl

TEST 13 10/16/79

12:40 Ì 37

DMOjCROSS,T13

00639

3A74

A2 OD

LDX !INßlJPt3

Formatiere Nachricht

00640

.3A76

20 2 0 3 0

JSR PMTB02

0064 1

3 A 7 9

20 75 313

JSR II0R2A)

übertrage Nachricht

00642

k

• Empfange Status

00643

3 A7C

20 D23A

'

JSR PLUSII

Einschleuse Warteschlangennachricht

00644

3a7F

4C 9«30

JMP PCf.ROI

Lösohe Anzeige

00645

.

*

Aussprung

00647

* ECßC

006 4 B

»Verarbeite Schlüsselsch^lterübergang von Kombinaticxiseingabe auf Kcmbinationseingabe

00649

3AÜ2

20 5 3 3H

IDCliC

JSR GETKEY

Hole Schlüsselkode

00650

3 A8 5

30 CD

BM) DISIO)

Wenn kein Tastendruck

0065)

*

Aussprung

00652

*

00653

*

Fall

00654

3Aß7

4C EÛ30

JMP PDKEY

Verarbeite numerische oder Löschtaste

00655'

k

kein Fall

00656'

i

00657

k

Aussprung

00659

* ßCQP

üß-660

*.Verarbeite Schliisselschal terîibergang von Konfoinationseingabe auf Betrieb

0066 )

3 AO A

20 693a

GCÛP

JSR ECEA

(ibertrage Kombination

00662

*

Empfange Status

TUST 13 10/16/79 1 2 ; <1 fl ; 3 7 DMO ; CROSS , TI 3

0066 3

*

00664

A

00665

8D3A

ECO PI

EQIJ

*

00666

3 AOO

A 9

43

LOA

«MENDEN

00667

3 A0 F

20

6 PH

JSR

II0R2AM

00668

*

00669

3 A 9 2

4C

PE3C

.JMP

PSKE03

00670

*

0067 1

*

00672

*

00673

*

d06 7 5

* PI.SOUT

00676

t

00677

3A95

24

40

FLSOIJT

BIT

ZQOUT

00670

3A97

10

1 0

BPL

PLSÛ02'

0Û679

3 A99

A5

13

LDA

ÜUTßUPt1

ÛÛ6ÛÛ

3 A9R

C9'

00

CMP

IIISTAT

•0060 1

3 A9D

DO

09

BMG

PLS001

00682

3A9F

A5

40

LDA

YKRD1S

0Û6Q3

3 AA 1

29

00

AHß

\0000000

00684

3 AA 3

4 A

LSR

A

00685

3 AA 4

05

15

ORA

OLITBUF i 3

00606

3 AA6

05

15

STA

OUTBUF » 3

0060 7

AO 3 A

EQU

*

00608

3AAß

.20

153P

JSR

XMTOIJT

Einschleuse Warteschlangen-Nachricht Lüsche Anzeige alternativer Eintrittspunkt Obertrage Ende der Eingabe

Empfange Status

EJ nschleuse Warteschlangen-Nachricht An fordere Por togebiihreneins tel lung Empfange Portogebühreneinstellung ßi nschleuse Warteschlangen-Nachricht

Aussprung >

N>

OO

ßinschleuse Warteschlangen-Ausgäbenachricht Wenn Ausgabenachricht in Warteschlange

Wenn Statusnachricht Einsetze Tastaturstatus

übertrage Ausgabenachricht

Os C\

4t

TEST 13 10/16/79 l 2 ;tQ; 37

DMO;CROSS.TI 3

00690

3 A AO

20

0 A 30

JSR

PSTATR

00691

3 A Aß

20

4 4 3C

JSIt

PPOSTa

00692

a

00693

a

00694

ß 1 3 A

PLS00 2

• EQU

*

00695

B 1 3 A

PI.S003

EQU

*

00696

60

RTS

00698

•

* F MIS II

00699

*FMJSII

QUEUßD

MESSAGE

00700

fi 2 3 A

PLUSII .

EQU

a •

00701

3AB2

A5

4 A

LOA

ZQIN

00702

3 AB4

05

4 B

ORA

2QOUT

00703

3AB6

10

P9

BPL

PLUSUÛ

00 70-1

3AB8

20

953A

JSR

FLSOUT

00705

3 ABB

24

4 A

B IT

ZQIN

. 00706

3ABD

10

4P

BPL

PLUSII 7

00707

3 ABP

A5

0B

LOA

INBUPt1

00708

3 AC 1

C9

6 ]

CMP

ïilliXRD

00709

3AC3

Dû

1 F

BN E

PI.IJSII 2

00710

3 AC5

46

4 A

r.SR

ZQIH

0071 1

3 AC7

24

43

BIT

Z STI! LO

00712

3AC9

10

19

BPL

PI.IJSII 1

0071 3

3 ACB "

A9

Al

LDA

ÏIIDI SPC

00 7 ì -1

3 ACD

05

1 3

STA

OUTHUPi1

Pali

Verarbeite Statusantwort

Vera r bei te Portgebühreneinstel lung s-Antwort kein Pali alternativer Eintrittspunkt

Auasprung

El nschleusen

Rlnschleuse Warteschlangen-Nachricht

Führe aus während Nachrichten in Warteschlange

Prüfe auf Warteschlangen-Nachricht

Rlnschleuse Warteschlangen-Ausgabenachricht Wenn Wartesehlange-Eingabenachricht

Wenn externe Anzeige gelesen

Lösche Marke für Warteschlangen-Eingabenachricht Wenn einstellbare Anzeige

Formatiere Ausgabeantwort

TEST 13 10/16/79

12 ; 40 ; 37

OMO ; CROSS,TI 3

0071 5

3 AC F

A5

1 P

LDA

DECPOS

0071 6

3 AD 1

29

ÛP

AND

ISOP

0071 7

3AD3

A0

TAY

0Û7IB

3 AD4

A5

2C

LDA

NIßCTR

00719

3AD6

A 2

15

I.DX

ÏOUTniJP+3

00720

3 ADO

20

28 3R

JSR

PMTß02

00721

3 ADO

20

1 Ü3A

JSR

BLANK

00722

3 ADE

20

A03C

JSR

PRKE04

00723

3 AE 1

38

SEC

ÛÛ724

3 Ali 2

66

40

ROR

ZQOUT

00725

E43A

PLUSII 1

EQU

*

00726

E43A

PLUSII2

EQU

i

00727

3AE4

A5

0ß

I.DA

INIUIPH

ÛÛ728

3AE6

C 9

62

CM P

1 II RH A KB

00729

3AE0

DO

04

UNE

PLUSII3

00730

3AËA

4 6

40

LSR

YKBDIS

0073 1

3 ABC

10 •

15

BPL

PLUSII 5

00732

EE3A

EQU

A

00733

3AEE

C9

63.

CMP

II HD I SKR

00734

3 AFO

•DO

05

RNE

PLUSII4 •

00735

3AF2

30

SEC

ÛÛ736

3 A P 3 •

66

40

ROR

YKBDIS

00 7'3 7

3AP5

30

OC

RM I

PLUSII5

Fii 11 e Pitture Seize

Anzeige mit Leerzeichen kurzzeitige Anzeige aus

Marke fiir VJarteschl'angen-Ausgabenachr icht

Hole Header (Vorsatzinformation)

Wenn Tasta turInbetriebsetzungs-Aufforderung

Lösche Tastaturaußerbetriebsetzungs-Marke Ändere Nachricht in Statusanforderung

Wenn Tastaturaußerbetriebsetzungs-Aufforderung

Setze Marke für "Tastatur außer Betrieb"

Kndere Nachricht in Statusanforderung

TEST 13 '10/16/79 12:40:37 DMO: CROSS.TV 3

00738

F73A

FLUSII4

. EQU

*

00739

3 AF7

C9

E)

CMP

wiExiyn

007 <10

3AF9

DO

)0

BN E

FLU Sil 6

0074 1

3 AFß

A 2

10

LDX

11MBUP+ 2*2

00742

3 AFß

20

203A

JSR

DISBPK

00743

3B00

20

A43C

JSB

PIÌKEQ2

00 7 4 !

3003

AO

O)

F LUS l| 5

LDA

1 )

00745

3D05

05

0A

STA

INßUPtO

00746

3B07

A9

50

•

LDA

IIIREQST

"0074 7

3B09

85

Oß

STA

INBlJPt )

00748

0B3ß

FLUSII6

EQU

k

00749

3BOB

20

A3 312

.IS H

XMTIN

0075Ô

Ofi3B

FLUSII7

EQU

*

0075 1

3B0E

4C

B23A

JMP

PLUSII

00752

B) 3A

FLUSII8

EQU

FLS00 3

00753

*

00755

?FMTOUF

00756

♦ :

00 757

3BI)

95

FE

FMTßlJF

STA

~ 2 « X

00758

30)3

06

) D

STX

BPTK

00.759

30 1 5

20

3 9 3 E

JSIV

FlXDEC

00760

3ü 1 8 '

A0

03

LOY

«3

0076)

3B1A ,

A6

2C

LDX

M IBCTB

0076.2

30 IC

CA

DEX

00763

3BID

A5

04

l.DA

oisnupi4

Warth axtern schreibe in Anzeige Anzeige Eingabepuffer

Führe zeitgesteuerte Anzeige aus Ändere Nachricht in Statüsanforderung

übertrage Eingabenachricht

Aussprung

Bilde formatierte Nachricht aus Anzeige Speichere Header in Puffer + 1 Zwischenspaichere Pufferzeiger Neuformatiere Anzeige Annehme Dezimale für MÏLS Annehme Ziffernzahl für MILS

Wenn CENTS angezeigt

test 13 10/16/79

1 2 ; 4 fl ; 3 7

dmo .-cross. ti 3

û Û 7 6 •)

3B)P

C9

FF

00765

3112 l

DO

02

00766

3023

88

00767

3B24

CA

00768

2530

00769

3B25

8 A

ÛQ77Û

3D26

A 6

) D .

00771

2830

00772

3B28

85

37

00773

3B2A

04

FF

00774

3B2C

20

OP3E

00775

•3B2F

) 5

FF

00776

3B3 l

95

FF

00777

3B33

A4

37

00778

3035

C8

00779

3036

98

00780

3B37

4 A

0078)

3B38

AÛ

007Q2

3B39

en

00783

3B3 A

en

00 7 0-}

3113 0

94

FD

00785

303 0

0A

00786

00787

3B3E

os

1 A

oo7aa

cmp ii spp BNß fmtool dey OßX

fmtoo 1 ßQU *

tx a ldx bptr PMTB02' ßQU *

STA 'PI3MPO2

STV - 1iX

jsr swap ora -ì,x sta -),x . ldy temp02 i m y tya lsr a tay imy 1ny s'i'y - 3 ( x asi. a

A

sta hctr

Setze Dezimàle für CENTS Setze Ziffernzahl für CENTS

Bewege Ziffernzahl nach A Wiederherstelle Pufferzeiger alternativer Eintrittspunkt Rette Ziffernzahl

Setze Dezimal in Formatbyte, Puffer + 2 Definiere Ziffernzähler für Formatbyte

> to

CO U-»

Speichere Nachrichtenbytezähler in Puffer +0 (BUF+0)

Ztyi schenspeichere Nachrichtenzeichenzähler Lüsche Ubertrag für SBC

Zeiger auf Il/O-Anzeigezeichen

TEST 13 10/16/79 12:40;37 DMÛ; CROSS.TI 3

00709 ûû 7 90 0079 I

00792

00793

00794 3Q4A

00795

00796

00797 Û079Û ÛQ739 ÛÛ B ûû ÛÛOÛ 1 ÛÛÛÛ3 ÛÛQÛ4 00005

3B4û A9 ÛÛ 3B4 2 125. 2C 3B44 05 22 3B4 6 4 5 3 7 304 0 90 02 C6 22 4C3B 3B4C ' ÛA 3B3D ÛA 3B4E A4 1A 3B50 4C 303C

PMTB03

GETKEY

l.DA »DISBIJP« 5*2 SUC NI HCT R STA GETPTR LSR TEMPO2 BCC PMTB03 DEC GETPR EQU *

TX A ASL A LDY BCTR JMP PPEQ06

' 00006

3B5 3

A5

26

GETKEY

LDA

KCLEAN

00 0 Û 7

3B5 5

30

07

BMI

GETKO)

ooooa

3B57

A 2

PP

LDX

i-l

ÛÛ0Û9

3059

86

26

STX

KCLEAN

00 8 10

3Q5B

AA

TAX

000 1 1

3 fi 5C

06

20

STX

KL 11 Sßfl

000 | 2

5 E 3 n

GETKOI

EQU

*

ono.i 3

3n5E

60

RTS

Wenn Ziffernzähler ungerade

Zeiger über Il/O-Anzeigezeichen hinaus

Satze auf Setzung von PUTPTR=BUF+3*2

Setze Y = Nachrichten-Zeichenzähler Definiere PUTPTR Editiere und bewege Puffer Aussprung

Hole Tastenkode in Akkumulator

Wiedergebe Tastenkode =-1 wenn Tastendruck bereits gel Wenn unausgegebener Tastenkode vorhanden

Angebe ausgegebenen Tastenkode

Passe Status an Tastenkode an Angebe letzten ausgegebenen Tastenkode

Aussprung

TEST 13 10/16/79 12:10:37 OMO : CROSS,Tl3

0Ù81 5

*GETNI0

ÛÛ0 1 6

A

ÛÛ8 1 7

3B5P

A5

22

GETMin

LDA

GETPTR

üüfl 1 $

3B6 1

4 A

LSR

A

nûQ 1 9

3 06 2

AA

TAX

001120

306 3

05

00

LDA

O, X

01)112 1

3B65

BO

03

■ BCS

GETNOÌ

00822

3B67

20

OP3E

JSR

SWAP

00823

6 A 3 B

GETMOl

EQU

*

ÛÛÛ24

3BÛA

E6

22

INC

GETPTR

Û0Û25

306C

29

OP

AND

ISOP

00826

3B6E

60

RTS

00020

MIDR2AU

ÛÛ829

ÛÛ83Û

3B6P

05

OO

11D R 2 A ü

STA

INBUpi'l «

00831

307 )

' A?

0)

LDA

II

ÛÛ832

3073

05

OA

STA

INßUPtO

ÛÛ833

75 30

IIDR2A)

EQU

*

000 3 4

3075

20

A33E

JSR

XMTIN

ÛÛ83S

7830

IIDR2A2

EQU

A

00836

3078

20

953A

JSR

PLSOUT

ÛÛÛ37

3070

4C

E83D

JMP

RCVOUT

0003Q

X

Reha}te NIBBLE von (GETPTR) und erhöhe GETPTR

Hole NIBBLE-Zeiger

Bilde Byte-Zeiger

Bringe Byte-Zeiger in X

Hole Byte

Wenn NIBBLE-Zeiger gerade Erhalte H/O NIBBLE

Zeige auf nächsten NIBBLE Bereinige NIBBLE Aiissprung

Sende HEADER an Buchungseinheit, empfange Nachr Speichere HEADER in Puffer Speichere Bytezahl alternativer Eintrittspunkt übertrage Nachricht alternativer Eintrittspunkt

Einschleuse Warteschlangen-Ausgabenachricht

Empfange Antwort

Aussprung

TEST 13 10/

16/79

12:40:37

DMO;CROSS

008-10

* KEYMOD

000-1 1

»ENTER KEYENTRY MODß

00042

3B7E

24

42

keymqd

BIT ZKfiYMO

00043

3009

30

09

BMI KEYMOl

OOB44

3B02

20

1 0 3 A

JSR BLANK

00045

K

000 4 fi

3B05

06

42

STX 2KEYMO

00047

3B07

06

43

stx zstbld

00040

3B09

06

46

STX 2ADDRL

OOQ49

0 ß 3 R

KEYMOl

EQU *

00050

0B3B

KEYMÛ2

equ *

00051

3B0B

A9

42

LDA IIIDISAB

00052

0D3P

KEYM03

EQU *

00853

3B8D

20

6P3D

JSR IIDR2AU

000 54

A

V

0Ü855

3B90

4 C

B2 3 A

JMP PLUSII

00056

A

00050

*ÛPEA

00059

*

00060

3B93

4 6

4C

opea

LSR ZTOTAC

0006 1

*

00062

A

00063

à

Eingebe Tastatureingabebetrieb

Wenn Marke für Tastatureingabebetrieb gelöscht

Fülle Anzeige mit Leerzeichen Setze X « #FF

Setze Marke für Tastatur-Eingabebetrieb Setze Marke für einstellbare Anzeige ßetze Marke für addierbare Anzeige alternativer Eintrittspunkt

Lade Maschinenaußerbetriebsetzungs-Header alternativer Eintrittspunkt

Sende Nachricht an Buchungseinheit

Empfange Antwort

Einschleuse Warteschlangen-Nachricht Aussprung

Verarbeite Schlüsselschalterübergang von Batrieb auf Betrag Lösche Gesamtakkumulations-Marke eingab

Gelange nach PCLRK, was folgt Lösche Anzeige Auasprung

TUST 13 10/16/79 I 2 ; 4 fi ; 3 7 PMÛjCROSS.TI

00865

* PCf.RK

• .

00866

»pnocßss

CLEAR KEY

00867

3B95

20 803B

PCLRK

JSR

JEYM02

00868

98 3 0

pcj.no i

EQU

*

00869

*

00870

3H98

20 1 8 3 A

J SR

BLANK

0087 1

3B9D

a 9 PC

LPA

11$ PC

00872

3n9D

05 01

STA

nisoupt 4

008 7 3

3b9p

2 4 4C

n i t aTOTAC

00874

3ea 1

10 ûa

13 PL

PCLR03

00075

3ba 3

26 4 6

niT

2AHDOL

00876

3BA5

10 06

BPL

PCLR02

00877

3IÌA7

20 3 9 312

JSU

pi xdi2c

00878

30aa

20 1C3E

JSR

W2ADD

00879

ad31ì

PCI.R02

EQU

* v

00880

AD3B

PCLR03

EQU

*

S

00881

3qad

46 - 4C

LSR

ZTÛTAC

00882

3bap

60

RTS

0088 4

»OPEC

0088 5

A

00886

9 3 30

OPEC

EQU

OPEA

00887

A

00888

A

Verarbeite Löschtaste Setze Maschine außer Betrieb alternativer Eintrittspunkt Aussprung mit positivem Status Fülle Anzeige mit Leerzeichen Bringe klein o in Anzeige

Wenn Gasamt-Akkumulationsmarke gesetzt

Wenn Marke für addierbare Anzeige gesetzt

Führe Festkomma-Dezimalanzeige aus Addiere Arbeitspuffer zu Anzeige

LMsc)ie Gesamtbetrags-Akkumulationsmarke Aussprung

Verarl^elte Schlüsselschalteriibergang von Betrieb auf Kombinati« Lösche Gesamtbetrags-Akkumulationsmarke Lösche Anzeige Aussprung

TEST .13 10/16/7 9 12:40:37

OMO;CnÛSS,T13

00890

*OPOP

0Û8 9 1

*

0 Û 8 9 2

3BB0

2Û 5 3 3 II

opop

JSR

GETKEY

OÛ893

3nn3

30 ÛC

OM)

ÛPOPOI

OÛQ94

*

ÛÛÛ95

3BB5

20 EÛ3B

jsr

PDKBY

00896

3BB6

20 CA3B

JSR

PAKEY

00897

3BÛD

20 Û73C

jsn

P lì H13 Y

00890

3B0E

4c DB3C

JMP

PSKßY

00099

*

00900

*

0090 )

A

ÛÛ9Û2

.

Cl 3ß

OPQPÛ1

EQU

*

OÛ9Û3

3BC1

A5 IE

LDA

DBÛUNC'

00904

3BC3

PO Û4

BEQ

ÛPOPÛ2

00905

3BC5

A9 05 '

LDA

15

00906

3BC7

85 20

sta

LNGT1M

ÛÛ9Û7

C93B

ÛPQP02

EQU

*

00008

3BC9

60

rts

ÛÛ9Û9

*

o\

Ov

Verariaelte Schlüsselschalterübergang von Betrieb auf Betrieb

Erhalte Tastenkode

Wenn kein Tastenkode ausgegeben

Pali

Verarbeite Datenvorbereitungstasten Verarbeite arithmetische Tasten Verarbeite Ragisteranzaigetasten Verarbeite Einstelltaste kein Fall

Auasprung .

sonst

Wenn Taste niedergedrückt Setze Anzeigeperiodenzeitgeber

Aussprung

TEST 13 10/16/79 12: »10:37 OMO ; CROSS , TI 3

009 1 1

* PAKEY

Û0 9 1 2

* PROCESS

ARITHMETIC KßYCQDß

Verarbeite arithmetischen Tastenkode.

009 1 3

3QCA

A5 29

PA KEY

l.DA

KLUSßD

Hole Tastenkode

0Ü9 1 4

3 UCC

C9 OD

CMP

II i 1

Wenn "+-"-Tastenkode

009 1 S

3 0CE

Dû 0 2

flNIS

PAKfJQl

ÛÛ9 1 fi

3 ODO

PO 3 2

BßQ

PPßQK .

Verarbeite "+"-Tastenkode

009 1 7

*

Aussprung

009 1 0

D23n

PAKEO)

EQIJ

*

009)9

D2 3B

PAKE02

ßQU

*

alternativer Eintrittspunkt

0092Û

3BD2

C9 OC

CMP

1)2

Wenn Dezimaltastenkode

0092)

, 3BD4

DO 09

BNß

PAKE04

00922

3BD6

20 7E3B

JSR

JßYMOD

Bewirke Tastatureingabezustand

00923

*

Setze Maschine außer Betriebsbereitschaft

00924

3DD9

A5 )P

LDA

DECPOS

Wenn Dezimalpunkt nicht schon eingegeben

00925

3BÛB

10 02

BPL

PAKE03

00926

3BDD

E6 )P

ING

DI2CPOS

Schiebe Dezimalpunkt in Anzeige

00927

DP3Q

PAKE03

EQU

*

00928

DP3D

PAKE04

ßQU

* •

00929

DF3B

PAKEQ5

ßQU

*

alternativer Eintrittspunkt

00930

3BDP

60

RTS

Aussprung

TEST 13 10/16/79

1 2 ; 4 fl i 3 7

OMOiCROSS,TI 3

00932 ÛÛ933

ÛÛ934 3REO 00935 3QE2 ÛÛ936 3BE4

* PDKEY

*PROCESS DATA PREPARATIC

A5 29 PDKEY LDA KLUSED

C9 OA CMP 1)0

30 06 BMI PN1JMK

00937

*

00938

*

00939

3BE6

C9

OD

CMP

1 ) 3

00 9 40

3DE0

DO

P5

BN E

PDKEOl

0094 1

3BEA

PO

A9

BRQ

PCLRK

ob 9 4 2

*

00 9 4 3

DP3B

PDKEOl

EQU

PAKE05

00944

•

*

009 4 6

.

* PNUMK

0094 7

* PROCßSS

NUMERIC KEY

00948

3 BEC

20

•7E3B

PNUMK

JSR

KEYMOD

00949

*

00950

3BEP

A5

2C

LDA

MlBCTR

0095)

3BP1

C9

OA

CMP

1 10

00952

3BP3

)0

EA

nPL

PAKE05

00953

.

A

00954

3BP5

A5

)P

LDA

DECPOS

00955

30P7

30

06

BMI

PN LIMO 1

00956

3QP9

C9

03

CMP

13

Verarbeite Datenvorbereitungskodes •

Hole Tastenkode

Wenn numerische Taste

Verarbeite numerischen Tastenkode

Aussprung

Wenn Lüschtastenkode

Verarbeite Löschtastenkode Aussprung

Aussprung

Verarbeite numerische Taste Setze auf Tastatureingabebetrieb Maschine außer Betriebsbereitschaft Wenn Anzeigepuffer voll

Aussprung

Wenn Dezimalpunkt eingegeben Wenn 3 Ziffern hinter Dezimalpunkt

TUST 13 10/16/79 12;4Ü:37 DMO; CROSS.T13

00957

3BFB

)0

E2

BPL

PAKE05

ÛÛ95Q

*

00959

3BPD

E6

1 P

INC

DECPOS

00960

•

K

0096)

FPSß

PNUMQÌ

EQU

k

00962

3BFF

A5

29

LDA

KLUSED

00963

3 CO )

4C

AD3C

JMP

psiiHib

00964

*

00966

»PPISQK

00967

*pnocEss

PLUS-

-EQUAL 1

009 6 8

3C04

20

ÖB3B

PPEQK

jsn

KEYM02

00969

3C07

24

46

BIT

2ADDBL

00-9 70

3C09

30

0E

BM)

PPEQ02

00971

3COB

24

45

BIT

2TIMD

00972

3COD

)0

02

BPL

PPEQOJ

009 73

3CÛF

30

87

BM)

PCL 110)

OÛ974

*

ÛÛ975

) 13C

PPEQQ1

EQU'

*

00976

3C ) 1

30

SEC

00977

3C1 2

66

4C

ROR

2TOTAC

009 7 8

3CI 4

20

39 3E

JSR

F J XDEC

00979

k

003 00

3C1 7

)0

0F

ÛPL

PPEQ04

0090 )

à

00902

i

Aussprung sonst

Schlehe Dezimalpunkt nach links

Bringe Tastenkode in Anzeigepuffer Aussprung

Verarbeite "Plus-Gleichheitszeichen"-Taste Setze Maschine außer Betriebsbereitschaft Wenn Marke für addierbare Anzeige gelöscht

Wenn Mfirke für zeitgesteuerte Anzeige gesetzt

Lösche Anzeige

Aussprung sonst

Setze Gesamtbetragsakkumulations-Marke

Bewirke Festkomma-Dezimalanzeige Status positiv

Bewege Anzeige in Arbeitspuffer Aussprung

TEST 13 10/ 16/79 12:4(1:37 OMO: CROSS .'l'I 3

009 fl 3

1 9 3 C

PPEQQ2

EQU

*

0 0 9 Q 4

3C1 9

20 393E

JSR

PIXDEC

0 0 9 fl 5

3CIC

2 4 4C

B r ï

ZTOTAC

009ä6

3C1 E

10 03

BPL

PPIÜQ03

00937

3C2Û

20 1C3

JSR

W2DADD

009QB

23 3C

PPEQ03

.ßQU

A

00909

3C23

30

SEC

00990

3C24

66 4C

ROR

2TOTAC

0099 )

3C26

*4 6 4 6

LSR

2ADDRL

00992

2Q3C

PPI2Q04

ßQU

A

0099 3

3C20

A9 00

LDA

IDISBUPt0A2

009 9 t

3C2 A

Û5 22

STA

GßTPTR

00995

3C2C

A9 ÛA

LDA

ÄWRKUUpi0*2

00996

2E3C

PPEQ05

ßQU

A

00997

3C2E

AD 0A

LPY

110

00998

303C

PPI2Q06

ßQU

A

00 9 9 9

3C30

05 3 2

STA

PUTPTR

01000

3 2 3C

PPEQQ7

ßQU

*

0 1001

3 2 3C

PPEQO0

ßQU

k

0)002

3C32

80

DßY

0 1003

3C33

30 AA

BMI

PPßQ)0

û 1 004

3C35

20 5P3R

JSR

GßTNIR

01005

3C38

C9 0A

CMP

HSOA

0)006

3C3 A

"39 Û2

BMI

ppß

0)007'

3C3C

A9 00

LDA

ison

Bewt rke Festkomma-Dezimalanzeige Wenn Gesaintbetragsakkumula tion s-Ma rke

Addiere Arbeitspuffer zu Anzeige

Satze Gesamtbetragsakkumulations-Marke

Lösche Marke fiir addierbare Anzeige alternativer Eintrittspunkt

Setze auf Erhalt der NIBBLES von Anzeige

> to

Setze auf Einbringung der NIBBLES in Arbeitsspeicher *■

alternativer Eintrittspunkt

Setze Y auf Zählung von 10 NIBBLES

alternativer Eintrittspunkt

Definiere PUTPTR

alternativer Eintrittspunkt

Führe aus, falls Y £ 0

Erniedrige und prüfe Y

Hole NIBBLE

Wenn nicht numerisch

Xnd ere auf Null

TEST 13 10/16/79

12:40:37

DMO;CHOSS.TI

Û ) 008

3E3C

PPEQ09

EQU

Û 1009

3C3E

20

5 2 3 D

JSR

PtJTMin

0 10)0

3C4 )

4C

323C

JMP

PPEQÛÛ

0 10 1 1

DP 3 a

PPEQl0

EQU

pake05

010)2

*

0 10)4

'PPOSTR

0 10 15

*PROCESS POSTAGE

S ETTING nßPLY.

01016

3C4 4

A5

1 3

pposTn

LDA

OUTlHIPt)

0)0)7

3C46

C9

Q)

CMP

IIIPSET

Û | Û ) B

3C4D

00

3C

OME

PPOST5

0)0)9

3C4 A

A2

2 fl

LDX

ÏOlJTBUPt 2

0)020

3C4C

20

2Q3A

JSR

DISQPR

0)02)

3C4P

20

3 9 3E

JSR

PIXDEC

01022

3C52

46-

43

LS R

2STBLD

Ô 1 023

3C54

A3

00

LDA

JIDiSfllJPtO-

V

û 1 024

3C56

05

22

STA

GETPTR

0)025

' 5Û3C

PPOSTI

EQU

*

0)026

3C5Û

20

5P30

JSR

GETNIB '

!Û 1 0 2 7

3C5Q

C9

OP

CMP

I?P

0)028

3C5D

FO

P9

BGQ

PPOSTI

01029

,

*

01030

3C5P

A6

22

LDX

GETPTR

0 ) p 3 )

3C6 1

CA

•

DEX

01032

3C62

CA

DEX

û 1 03 3

3C6 3

Û 6

32

STX

PUTPTR

0)034

3C65

EÛ

ÛO

CPX

ÏDISllUPtO'

Speichere NIBBLE Auasprung

Verarbeite Por togebiihreneins te 1 lungs-Antwort Wenn PortogebührefieinsteXlungs-Antwort erhalten

Anzeige-Einstellung

NauPormatiere in Pestkomma-Dezimalanzeige

Lösche Marke fiir einstellbare Anzeige

Setze auf Abtastung der H/O (hohe Ordnung) der Anzeige

Führe aus bis H/O Nichtleerzeichen gefunden

Zeiger auf letztes H/O-Leerzeichen Wenn Il/O-Leerzeichen gefunden

TEST 13 10/16/79 12 ; 4 0 j 3 7 OMO ; CROSS.TI 3

Û 1 0 3 5

3C67

PO

05

13 EQ

PPOST2

Û 1 0 3 6

3C69

A9

on

LDA

K$D

0 1 û 3 7

3C6ß

20

523n

JSR

PUTNfR

01030

6E3C

PPOST2

EQU

*

Û 10.19

6E3C

•PPOST3

EQU

a niûiû

3C6E

20

5P3R

JSR

G ß'PN I D

0)041

3C71

C9

OP

CMP

0.104 2

3Ç73

DQ

F9

ONE

PPOST3

01043

*

010 4 4

3C75

A 6

22

LDX

GtïîTPTR

0)045

3C77

CA

DEX

0)046

'3C7ß

Û 6

32

STX

PUTPTR

01047

3C7A

A 9

on

LDA

IÇD

0IÛ4Û

3C7C

20

5 2 3 D

JSR

PUTRID

0)049

3C7P

3 Q

SßC

01050

3CÛ0

66

.4 4

ROR

2STNQD

û 1 05 1

Ö23C

PPOST4

EQU

a

0 1 052

3CÛ 2

4 6

46

LSR

2ADDRL

û 1 Û53

3C Q 4

46

4 C

LSR

2TOTAC

Û'i 0 5 4

fl 6 3C

PPOST5

EQU

a

0)055

fl 6 3C

PPOST6

EQU

a

01056

3Cfl 6

60

RTS

Einsetze Il/O-Flügel

Führe aus bis L/O Leerzeichen (niedrige Ordnung) gefundr Suphe nach Leerzeichen

Zejger auf erste L/O-Leerzeichen Einsetze L/O-Flügel

Setze Marke für Anzeige der Einstellung alternativer Eintrittspunkt

Lösche Marke für einstellbare Anzeige

Lösche Gesamtbetragsakkumula tions-Marke alternativer Eintrittspunkt Aussprung

TEST 13 10/16/79 1 2 ; 4 fl ; 3 7 DMO ; CROSS . TI 3

o i osa

* PRKEY

0 10 5 9

A PROCESS

REGISTER DISPLAV

0 1060

3CQ7

A5 29

PI1KEY

l.DA

KLUSED

0 10 6 1

Û93C

PRKE00

EQU

k

0 10 6 2

3C89

C9 10

CMP

II 1 6

1)106 3

3C8B

90 P9

BCC

PPÛSTfi

01064

3B8D

C9 1 6

CMP

122

01065

3C8P

BO F5

BCS

PPOST6

0 1066

*

Û 1 067

k

0 10 6a

3C9 1

69 4 2

ADC

K IIREQAR-16

0 1069

3C93

20 6P3B

JSR

1IDR2AU

0 1070

3C96

AS 1 3

l.DA

OUTBLJP t- 1

01071

3C98

C9 80

CMP

IIISTAT

0 1 û 7 2

3C9A

DO 0 3

flNE

PRKEÛ)

V

Û 1073

3C9C

20 7fl 3B

JSR

IIDR2A2

û 1 074

*

- 0)075

9P3C

PRKEÛ1

ßQU

k

Û 1076

3C9F

A2 28

LDX

iûUTBUPt 2*2

Û1Û77

3CA)

20 2 Q 3 A

JSR

B1 SRPR

0)078

A4 3C

PRKRQ2

EQU

*

0 1079

3CA4

A 9 OS

l.DA

15

Û)Ût)Û

A63C

PRKEQ3

EQU

k

0 1 OUI

JCA6

0 5 20

STA

I.hjGTlM

Q | 002

Afl 3C

PRKEÛ4

ßQU

*

Verarbei te Registeranzeige-Tastenkodes Hole Tastaturkode alternativer Eintrittspunkt Wenn nicht Registeranzeigetaste Auasprung

Ausßprung

Übertrag ist gelöscht Bilde Aufforderungs-Header Anfordere Registerwert Wenn unerwartete Statusantwort

Einschleuse auslaufende Warteschlangen-Nachricht Empfange Registernachricht

Anzeige empfangene Daten alternativer Eintrittspunkt

Setze auf Einstellung der Anzeigezeit alternativer Eintrittspunkt

Setze Anzeigezeitgeber alternativer Eintrittspunkt

TEST. 13 10/16/79 1 2 ;-1 û : 3 7

DMO i CROSS.TI 3

01003 3CA8 01081 3CA9

01085 3CAB

01086

01087 0)089

01090

01091 3CAD

01092 3CAE

01093 3CQÛ *01094

01095 3CB3

01096 "3CB5

01097 3CB7 0109Ü 3CB9

01099

i

01100 3CBB 0 1101 3CBC 01102 3CBP 0 1103 3CC1

0 1104 3CC2

01 105 3CC4

01106 3CC6

01107 3CC7 -Ol 106 3CC9

0 1109 3ccn

38

66 45

DÛ D5

A5 00 20 OF3E

85 00 A2 03

86 37 A2 00 BB3C E0

B5 00 20 0F3E 40

9 0 OF 95 00 60

0 9 FO 35 FF 95 FF

SEC

non ZTIMD ßNR PPOST4

* PSIIN I B .

*PUSII NIBBLE INTO DISPLAY PSIIN I B P11A LDA

jsn

*

DISUUPtO SWAP

STA LDX STX LDX

PSIINQ2 equ INX LDA

jsn

PIIA onA STA PLA onA AMD STA

DISBUF+0 13

TEMP02

V

10

DISBUP,X SWAP

B $OF

DISDIJF, X HÇPO

DISBUP-I/X Disnup-i,x

Setze Marke für zeitgesteuerte Anzeige

Lösche Marke für addierbare Anzeige Lösche Gesamtbetragsakkumulations-Marke Aussprung

Bringe NIBBLE in Anzeigepuffer Rette NIBBLE in den Stapel Hole Il/O-Anzeigebyte Bewege L/O-NIBBLE nach oben Bewege ll/O-Leerzeichen nach unten

Setze auf viermalige Schleife

Zeiger auf gerade verschobenes Byte

Führe aus, bis 8 NIBBLES nach oben bewegt

Zeiger auf nächstniedriges Byte

Hole 2 NIBBLES

Bewege L/O-NIBBLE auf H/O

Rette vertauschte NIBBLES

Bringe Leerzeichen hinter L/O-NIBBLE ein

Einsetze in selbes Byte

Hole H/O NIBBLE

Bringe Leerzeichen von H/O-NIBBLE ein Einsetze in nächstes Byte oben

TEST L 3 10/16/79 1 2 ; <1 0 ; 3 7 • DMO : CROSS . TL J

omo

3CCD

C6

37

DEC

TEMP02

0 1)11

3CCF

10

EA

BPL

PSIINÛ2

0 1112

•

*

■

0 11)3

3CD1

68

PLA

0 1114

3CD2

09

FO

ORA

ISFÛ

01115

3 C 1 4

35

00

AND

DISBUFtO,X

01116

3CD6

95

00

STA

DISBUF+O, X

0)117

3CD8

E6

2C

INC

NIBCTR.

01110

3CDA

60

RTS

0 1 120

* PS K EY

01121

* PROCESS

SET KEYCODE

0 1122

3CDB

A5

29

PSKEY

LDA

KLIJSED

01123

3CDD

C9

0A

CMP

1 10

0 Ì 1 24

3CDF

DO

28

BN E

PSKE05

0 11 25

*

0 1126

3CE1

24

44

■

BIT

ZSTNGD

01 127

3CE3

30

07

BMI

PSKEOl

0 1128

*

0 1129

*

0 1 130

k

0)13)

*

0 1132

*

01)33

3CE5

24

43

BIT

ZSTBLD

Ol'l 34

3CE7

30

OB

BMI

PSKE02

0 l'i 35

3CE9

20

01 3D

JSR

PSKE04

Zähle die Schleife

Hole geretteten NIBBLE Setze Leerzeichen von NIBBLE Einsetze NIBBLE in L/O-Byte

Zähle den NIBBLE Aussprung

Verarbeite Einstelltasten-Kode Hole Tastenkode Wenn nicht Einstelltaste Aussprung

Wenn Marke für Anzeige der Einstellung

Sende Inbetriebsetzungsbefehl Empfange Antwort

Einschleuse Warteschlangennachricht Aussprung

Wenn Marke für einstellbare Anzeige gelöscht

>

to VO

Hole Portogebühreneinstellung

TEST 13. 10/16/79 12:40:37

0)136

*

01)37

EC3C

PSKEOl

0)138

3CEC

A 9 4 1

0 ) 13 9

3CEF

4C 8D3B

0 1)40

*

*

01)4)

*

01142

F) 3C

PSKE02

01143

3CFI

20 Û43C

01144

3C4F

A9 C)

0 1-1 4 5

3CF6

A2 OD

0) l 46

3CF8

20 )13B

01)47

3CFB

20 75 3B

01)48

•

*

01149;

FE3C

PSKE03

01.1 50

3CFE

20 B23A

01151

0) 3D

PSKE04

01152

3D0)

A9 5)

01153

3D0 3

20 6F3B

01154

*

0 1 i SS

3D06

20 B23A

01)56

093D

PSKE05

01)57

3D09 "

60

DMOîCROSS.Tl

EQU *

LDA KIIENABL JMP KEYM03

EQU *

JSR PPEQK

LDA NIISETPO

LDX 1 INBUF+ 3

JSR FMTBUF

JSR IIDR2A)

EQU *

JSR FLUSII

EQU *

LDA 1IIREQPO

JSR IIDR2AU

JSR PLUSII

EQU *

RTS

o\ o\ m

4k

U>

Einschleuse Warteschlangennachricht alternativer Eintrittspunkt Sende Inbetriebsetzungsbefehl Empfange Antwort Einschleuse Puffer Aussprung

Simuliere "+"-Tastendruck

Setze auf Sendung von Protogebühreneinstellbefehi Formatiere Befehl in INBUF w

O O

Sende Nachricht an AU Empfange Status alternativer Eintrittspunkt Einschleuse Warteschlangennachricht alternativer Eintrittspunkt Anfordere Portogebühreneinstellung

Empfange Portogebühreneinstellung Einschleuse Warteschlangennachricht alternativer Eintrittspunkt Aussprung

TEST 13 10/ 1 6/ 79 1 2:4 0:3 7 DMO: CROSS.T13

0)159

À PSTATR

0 1160

* PROCESS

STATUS REPLY

0)16),

3 DO A

A5

1 3

PSTATR

LDA

OUTBUF+1

0)162

3 DOC

C9

80

CMP

K1ISTAT

0)163

3 DOE '

DO

F9

BNE

PSTAT5

01164

3D1 0

A2

F9

LDX

1-7

01165

3 D l 2

A5

1 4

LDA

OUTBUF+ 2

01)66

1 4 3 D

PSTAT1

EQU"

*

0)167

3D1 4

2 A

ROL

A

01)68

3D15

7 6

3 F

ROR

YFLAGS + 7,X

0.1 169

3 D Ì 7

E8

I NX

0 1 170

3D18

30

FA

BMI

PSTATl

01171

*

01172

*

0 1173

3D1 A

05

4d

ORA

ZTRIP

0) 1.7 4

3D1C

85

4 D

STA

ZTRIP

Û 1 1 75

*

0 1176

|

3D1E

26

3 F

ROL

YIIARDE

'0 1177

3D20

A5

15 •

LDA

OUTBUF+3

0 1178

3D22

2 9

82

AND

11% 100000 10

0 1179

3D24

85

3 F

STA

YIIARDE

0 1 1 BO

3D26

FO

El

DEQ

PSTAT4

01181

3D28

29

02

AND

% t( 000000 1 0

0 1102

3D2A

DO

02

BN E

PSTAT2

01183

01184

k

Verarbeite Statusantwort Wenn Statusantwort

Setze auf Kopieren von 7 Marken

Führe aus, bis 7 Marken kopiert Bewege Bit in Markenbyte hinein

Zähle Bit

Wenn Maschine ausgelöst worden ist Setze Maschinenauslöse-Marke

Bewege vorherigen harten Fehler zu Übertrag Hole Fehlerbits

Setze/Lösche Marke für harten Fehler Wenn weicher oder harter Fehler wenn weicher Fehler Bewirke Fehleranzeige Springe in Hauptschleife

TEST 13 10/16/79

12:40:37

DMO;CROSS.T

01185 01)86 0118?

0)188

01)89 0) 190 0119) 0)192: 01 193

0)194

01)95 0) 196 0 1197

0 1)98 0)199 0) 200

01 20) 0 1202 0 1 203 0) 204 0 1 205 0I206 . 0 1 207 Û) 208 01209 0)2)0

3D2C BO DO

3 02 E 303 ) 3033 3D35 3D37 3D39 3D3B 303D

3D40

3D43 3D44 3D46 3047 3049 3D4B 3D4D 3D4F

2E3D PSTAT2

20 ) 8 3A .

A9 AD

85 01

A9 BC

85 02

A9 BF

85 03

20 823C

*

20 A4 3C

433D PSTAT3 78

A2 7F 9A

A5 2F 09 03 85 82 85 2 F 4C 4C39

093D PSTATl

093D PSTAT5 * •

BCS PSKE05

EQU * JSR BLANK LDA' 1 $ *\B STA DISDUFtI LDA V $BC STA DISBUpt 2 LDA *$BF STA DISBUF+ 3 JSR PPOST4

JSR

EQU

SE)

LDX

TXS

LDA

ORA

STA

STA

JMP

EQU

EQU

PRKE02

KTSTACK

PORTCI 1 3

PORTO PORTCI M LOOP PSKE05 PSKE05

Wenn harter Fehler vorher gesetzt Aussprung alternativer Eintrittspunkt Fülle Anzeige mit Leerzeichen Anzeige Fehler-Legende

Lösche Marke für addierbare Anzeige ^

Lösche Marke für Gesamtbetragsakkumulation g

Setze auf zeitgesteuerte Anzeige alternativer Eintrittspunkt Setze Unterbrechung außer Betrieb Meuanfangssetzung des Stapels

Untätigsetzung der seriellen Ausgangsleitungen

Springe in Hauptschleife hinein Aussprung

TEST 13 10/16/79 12:48:37 DMO: CROSS.TI 3

01234

* RCVIN

01235

* RECEI VE

INBOUND MESSAGE

01236

3D70

24

49

RCV IN

BIT

ZEXCOM

01237

3D72

10

1B

BPL

RCV103

012 38

3D74

20

4F3A

JSR

DISINT

01239

3D77

20

5 6 3 F

JSR

D1 2 US

01240

3D7A

20

8 3 3D

JSR

RCV102

0124)

7D3D

RCV101

EQU

*

0 12 4 2

3D7D

AO

BD

LDY

1-67

0*1 2 4 3

3D7F

20

5 2 3 F

. JSR

D20US

0 1244

3D82

60

RTS

0 1245

833D

RCV)02

EQU

*

01246

3D8 3

A9

02

LDA

1EXMAS K

01247

3D85

A2

0A

LDX

II INBUÌ?

012 4 8

3D87

A0

10

LDY

II BEND:

01249

3D89

20

903D

JSR

RCVMSG

-01 250

3DBC

38

SEC

01251

3D8D

66

4 A

ROR

ZQIN

01 252

8P3D

RCV103

EQU

*

01253

3D8F

69

RTS

Empfange einlaufende Nachricht von externem Gerät Wenn Marke für externe Kommunikation gesetzt

Setze Unterbrechungen außer Betrieb Verzögere 12 psec., T3

alternativer Eintrittspunkt Verzögere 350 jisec. , T1 5

Aussprung alternativer Eintrittspunkt Wähle externes Gerät Zeiger auf Eingangspuffer Zeiger auf Pufferende Empfange Nachricht

Setze Marke für einlaufende Warteschlangen-Nachricht

Aussprung

TI-ST 13 10/16/79 12:40:37 DMO : CROSS . TI 3

0)212

* PUTNIB

0)2)3

*

0)2)4

3D52

29

OF

PUTNIß

AND

K ?OF

0)2)5

3D54 ■

48

PIIA

0)2)6

3D55

A5

32

LDA

PUTPTR

012)7

3DS7

4 A

LSR

A

0 1 2 ) a

3D50

AA

TAX

0)2)9

3D59

A9

FO

LDA

I $FO

0 12 2 0

3D5B

BO

07

BCS

PUTNO1

01221

3D5D

65

PLA

•

0)222

3D5E

' 20

OF 3 E

JSR

SWAP

0 1233

3D61

4 B

PIIA

0 1224

3D62

A9

OF

LDA

1 ?OF

01225

64 3p

PUTNO)

EQU

*

01226

3D64

.E6

32

INC

PUTPTR

0)227

3D66

35

00

AND

0, X

0)228

3D68

95

00

STA

0, X

0)229

3D6A

60

PLA

0) 230

3D6B

1 5

00

ORA

O, X

0)231

3D6D

95

00

STA

O; X

01232

3D6F

60

RTS

Bringe NIBBLE in (PUTPTR) und erhöhe PUTPTR

Reinige NIBBLE

Zwischenspeichere NIBBLE

Hole NIBBLE-Zeiger

Mache Byte-Zeiger

Bringe Byte-Zeiger nach X

Setze zur Bildung von L/O-Loch (niedrige Ordnung L/O)

Wenn NIBBLE-Zeiger gerade

Bewege NIBBLE AUI* H/O (hohe Ordnung)

Setze zur Bildung von l|/0-Loch

Zeiger auf nächsten NIBBLE Bilde Loch

Einsetze NIBBLE

Aussprung

test 13 10/16/79 12:10:37 dmo:cross.t

01255

* rcvmsg

01256

* receive message

0 12 5 7

3d90

05

25

rcvmsg sta iomask

0)258

3d92

86

23

stx ibptiwo

0 1 259

3d94

86

) d

stx bptr

0)260

3d96

84

ib

sty bend

0 126)

3d9ü

20

6 2 3 f

jsr echo

0)262

9b3d rcvmol equ

*

01263

3d9b a3

) b

lda bend

0)264

3d9d c5

i d

cmp bptr

01265

3d9p

30

43

bmi rcvm04

0 1266

*

abort

012 6 7

*

0) 266

'3da1

e6

1d

inc bptr"

0)269

3da3

20

7d3f

jsr rcvbyt

0) 270

3da6

a0

fb

loy

1-5 *

0)27)

3daq-

20

4f3f

jsr d26us

0 1272

3dab

20

6 2 3 f

jsr echo

0) 273

3dae bo e8

bcs rcvmol

0)274

*

01275

3000

38

sec

0)276

3db )

a'2

23

ldx

1ibtr*0

0ì 277

3db3

a5

1d

lda bptr

0ï27b

3dbs f5

00

sbc o, x

01 279

3db7

0)

00

sta

(0,x)

Empfange Nachricht Rette Gerätewähler Rette anfänglichen Pufferzeiger Anfangssetzung Pufferzeiger Rette Zeiger auf Pufferende Gebe RTS-Echo als CTS ab führe aus, bis EOM empfangen Wenn Puffer voll ist

Abbruch

Zeiger auf nächstes Byte Empfange Byte Verzögere 46 jisec. , T10

Gebe EOB/EOM-Pcho als.CTS/NCTS aus

Ende der Ausführung

Setze Übertrag für SBC (Zähler der gespeicherten Byteî Berechne Anzahl der Bytes

Speichere in erstem Byte des Puffers

TEST 13 10/16/79 12:48:37

0)280 3DB9 AÛ EO

01281 3DBÛ 20 533F

01282 3DBE A5 25

01283 3DCO 25 83 0128*1 3DC2 FO 23

01285 3DC4 20 7030

0 1286 C73D RCVM02

01287 3DC7. A5 25

01288 3DC9 6A

01289 3DCA 90 18

01290 3DCC 20 953A O l 291 3DCF AO 03

01292 3DD 1 8 5 12

01293 3DD3 A9 00

01294 3D06 85 14

01295 3DD7 A9 80 01296' 3DD9 85 1 3

01297 3DDB 85 15

01298 3DDD 85 3F

01299 3DDF 85 4B

01300 3DE1 4C 2E3D

0 1-30 1 • E4 3D RCVM03

01302 3DE4 4C 433D RCVM04

0 1303 E7 3D RCVM05

01 3 0-1 3DE7 6 0

DMO:CROSS.T1

LDY 1-32 JSR D18US LDA IOMAS K AND FORTD BEQ RCVM05 JSR RCV101 EQU *

LDA IOMASK ROR A

BCC RCVM03 JSR FLSOUT LDA 13

STA OUTBUF+O LDA «0 STA OUTBUF+2 LDA IHSTAT STA OUTQUFH STA OUTDUF+1 STA YIIARDE STA ZQOU.T JMl1 PSTAT2 EQU *

JMP PSTAT3 EQU *

RTS

Verzögere 1 7ä |asec. , TQ

Verzögere 350 psec., T15

A.l terna ti ver Eintritts punkt

Wenn Gespräch mit AU (arithmetische Einheit)

Einschleuse auslaufende Warteschlangennachricht Bilde Statusnachricht für verhängnisvollen Fehl

Setze Marke.für harten Fehler

Setze Marke für auslaufende Warteschlangennachricht

Anzeige Fehler und Abbruch

Abbruch

Aussprung

TEST 13 10/16/79 12:40:37 DMO: CROSS.TI 3

Ol 3Û6

* RCVOUT

0 130-7

* Empfange auslaufende

Nachricht von Buchungseinheit

0 1 308

3DE8

20

4 F 3 A

RCVOUT

JSR

DIS I NT

Setze Unterbrechungen außer Betrieb

Ol 309

3DEB

20

F) 3D

Fl 3D

JSR

RCVOO1

Empfange Nachricht von Buchungseinheit

0 13 10

3DEE

4C

7D3D

JMP

RCV101

Verzögere 350 psec., TIS

0 13)1

*

Aussprung

0 13 12

F) 3D

RCVoo1

EQU

a alternativer Eintrittspunkt

013 13

3DF1

A9

o 1

LDA

HAUMASK

Wähle Buchungseinheit

0)314

F3 3D.

RCV002

EQU

a ■

Führe aus, bis RTS erkannt

0)315

3DF3

24

83

BIT

PORTD

Suche nach RTS

0)316

3DF5

DO

FC

BNE

RCV002

0)3)7

■k

Ende der Ausführung

0)3)8

3DF7

A2

1 2

LDX

ÏOUTBUF

Zeiger auf Ausgabepuffer

0)3)9

3DF9

AO

1 8

LDY

iOBEND

Zeiger auf Pufferende

01 320

3DFB

20

903D

JSR

RCVMSG'

Empfange Nachricht

•013 21

3DFE

38

SEC

Setze Marke für auslaufende Warteschlangennachricht

0)322

3DFF

66

4 B

ROR

ZQOUT

01323

3EO)

60

RTS

Aussprung

rEST 13 10/16/79

12:40:37

DMO: CROSS.T13

0» 325

* SETXMT

0 l 326

* Setze auf

Übertragung

0l327 3E02

48

SETXMT

PIIA

0)328 3E03

45

2 F

EOR

PORTCI

01329 3E05

85

3 )

STA

PORTCI

0 1 330 3E07

A 5

2 F

.LDA

PORTCI

0133) 3E09

85

30

STA

PORTCO

0)332■3E0B

68

PLA

013 3 3 3 EOC

24

83

BIT

PORTD

0)334 3EOE

60

RTS

Setze Port-Abbilder - Setze auf Prüfung auf RTS (Sendeaufforderung) Zwischenspeichere Gerätewahl Rette Port-Abbild für Daten = 1

Rette Port-Abbild für Daten = 0

Bringe Gerätewahl in Akkumulator Setze zur Prüfung auf RTS Aussprung

TEST 13 10/16/79

12:40:37 DMO: CROSS.TI 3

01336

* SWAP

01337

* "

Vertausche NIBBLES IM Akkumulator

01338

»RETURN

WITU CLEAR

CARRY Aussprung mit gelöschtem Übertrag

0 1339

3 EOF

OA

SWAP

ASL A

Schiebe H/O-Bit (hohe Ordnung) in Übertrag,

0 1340

3 E 1 0

69

00

ADC IO

Bewege Übertrag zu L/O-Bit, Lösche Übertrag

0134 1

3E1 2

0A

ASLA

01342

3 E1 3°

69

00

ADC IO

Q1 343

3 E 1 5

0A

. ASL A

01344

3E1 6

60

00

ADC IO

01345

3 E 1 8

OA

ASL A

0 1346

3 E 1 9

69

00

ADC IO

0 13 4 7

3 E 1 Q

6 0

RTS

Aussprung

(niedrige Ordnur

TEST 13 10/16/79 12:40:37 DMO: CROSS.TI 3

0)349 01 350 0 1351 0 I 352 0 1353 0 I 354 013 5 5

01356

01357 0 1358 0 1359

0 1 360

01361

01362

01363 0)364 01365

01 366 Ol 3671

0 1368 01369

01 370

01371

01372

01373

3E 1C 20 4F3A 3E 1 F A9 00 3E21 85 22 3E25 20 2E3C

3E26 A2 04 3E28 18 3E29 F8

2A3E 3E2A B5 00 3E2C 75 05 3E2E 95 00 3E30 CA 3E31 10 F7

3E33 D8 3E44 90 03

3E26 4C 2ESD 393E

*W2DADD

* ADD WORK BUFFER TO DISPLAY W2DADD JSR DISINT

LDA |DISBUF+0*2 STA GETPTR JSR PPEQ05

W2DA01

WD2A02

LDX 14 CLC SED EQU *

LDA' DI SBUF , X ADC WRKBUF,X STA DISBUF,X DEX

BPL W2DA01 CLD

BCC W2DA02 JMP PSTAT2 EQU *

Addiere Arbeitsspeicher zu Anzeige Setze Unterbrechungen außer Betrieb Zeiger auf Anzeige

Setze X auf Zählung von 10 NIBBLES

Definiere PUTPTR

Editiere MOVE (Bewege)

Setze auf Addition von 5 Bytes

Setze auf dezimale Addition Führe aus, bis 5 Bytes addiert sind Addiere Puffer

Bringe Ergebnis in Anzeige Zähle Byte,

Ende der Ausführung Setze auf binäre Arithmetik Wenn Oberlauf

Zeige Fehler an und Abbruch

Gelange in Festkommabetrieb, was folgt

Mache Festkomma-Anzeige

Aussprung

TEST 13 10/16/79 12:40:37 DMO: CROSS.TI 3

0) 3^5

* FIXDEC

01376

* Neuformatiere Anzeige :in

Festkomma-Dezimalformat

01377

* Aussprünge mit'positives

Ergebnis anzeigendem Statuswort

Ol 378

3E39

20. 4F3A

FIXDEC

JSR

DIS INT

Setze Unterbrechungen außer Betrieb

01379

3E3C

A9 00

LDA

|DISBUF+0*2

Zeiger auf H/O NIBBLE (NIBBLE hoher Ordnung)

Ol 380

3E3E

85 22

STA

GETPTR

01381

3E40

85 32

STA

PUTPTR

01382

3E42

AO OA

LOY

110

Annahme, daß Anzeige, voll ist

01383

3E44

84 2C

STY

NIBCTR

01384

3E4 6

88

DEY

Setze auf Zählung von 10 NIBBLES

01385

473E

FIXDOl

EQU

*

Schleife mit 2 Ausgängen

0 f 3 86

3E47

20 5F3B

JSR

GETNIB

Hole NIBBLE von Il/O-Ende

01387

3E4A

DO 02

BNE

PIXD02

vorangestellte Null

013-88

3E4C

A9 OP

LDA

ISOF

Mache ihn nicht-numetisch

Ol 389

4E3E

FIXD02

EQU',

*

•

Ol 390

3E4E

C9 OA

CMP

1 ÇOA

Ausgang, wenn numerischer NIBBLE

013 91

3 ESO

30 OA

BMI

FI X DO 3

oim

3 LiS 2

AO Ol-'

LOA

i

Dunkeltaöt'Q nicht-numerischen NIBBLE

01393

3E54

20 523D

JSR

PUTNIB

•

Ol 10 4

3fc)57

C6 2C .

DISC

NI I1CTR

Erniedrige angezeigten NIBBLE-Zähler

Ol 395

3E59

88

DEY

Ausgang, wenn 10 NIBBLES abgestastet

01396

3E4A

10 ED

BPL

FIXDOl

01397

5C3 E

FIXD03

EQU

*

Schleifenende

0 l 3*98

3E5C

A5 1F

LDA

DECPOS

Wenn Dezimalpunkt nicht eingegeben

0 1 399

3E5E

10 04

BDL

FIXDOl

Û 1 100

•3E6Û

A9 02

LDA

12 .

Festlege seine Stellung bei 2

TEST 13 10/16/79

12:40:37

DMO: CROSS.T13

014 01 0 1402 0 110 3

01404

01405 0 1406 0 140 7 0)406 0 1409 0 14)0 014)) 0)4)2 0)4)3 014 14 0)415 014 16 014 17 014)8 01419 0 ) 420 01421 0 1422

t

01423 0 14 2 1 0 1425' 0 14 2 6

3E62

3E64, 3E65 3E67 3E6 9 3 E6B 3E6D

3E70 3E72 .3 E7 4 3E76 3E78 3E7B 3E7D

85 IF

6 4 3 E 38

A5 2C B5 1 F C9 07 30 03 4C 2E3D

7 0 3 E 703E A5 1 F C9 04 10 09 A9 OF 20 AD8C E6 IF k9 Fl 7FSE

FIX DO 4

3E7F A9 05 3EbL 85 22 3E38 AO 05 3EQ5 20 303C

3E88 A9 FF 3 EOA 85 4 3

FIXD05 FIXD06

FIXD07

STA DlECPOS EQU *

SDC

LDA NlBCTR SBC DECPOS CMP 17 BMI FIXD05 JMP PSTAT2 EQU *

EQU *

LDA DECPOS CMP 14 BPL FIXD07 LDA,I?OF JSR PSIIN I B INC DECPOS BPL FIXD06 EQU *

LDA IDISBUF+2 STA GETPTR LDY fi 5 JSR PPEQ06

LDA K$PF STA 2STBLD

Wenn Anzeige nicht formatiert werden kann

Zeige Fehler an und Abbruch

}?ühre aus falls Dezimalstellung £.4

Bringe Leerzeichen in Anzeige

Schiebe Dezimalpunkt nach links

Ende der Ausführung Setze auf Betrieb auf Einheiten *2*1

Setze auf Bewegung von 5 NIBBLES Dezimiere PUTPTR Editiere und bewege

Setze auf Leertastung von MILS und END Setze Marke für einstellbare Anzeige

TEST .13 10/16/79

12:40:37

DMO: CROSS.TI 3

0)427

3E8C

A4

04

0)428

3E3E

FO

02

01429

3E90

A9

OF

omo

9 2 3 E

0 14 3)

3E92

05

04

0 14 3 2

3E94

85

04

0 14 3 3

3E96

A5

1 F

01434

3E98

C5

2C

01435

3E9A

30

02

01436

3E9C

85

2C

0 1437

9E3B

01438

3E9E

4 6

44

•0 14 39

3EA0

46

42

0)440

3EA2

60

LDY DISBUFM BEQ FIXDOÛ LDA II $OF FIXD08 EQU *

ORA DISBUF + 4 STA DISBUF+4 LDA DECPOS CMP NIBCTR BMI FIXD09 STA NIBCTR FIXD09 EQU *

LSR ZSTNGD LSR 2KEYMO . RTS

Wenn MILS und Ende nicht 00

Setze auf Leertastung von lediglich END

Editiere MILS und END

Wenn NIBCTR vorangestellte Null ausschließt

Einschließe vorangestellte Null in NIBCTR

Lösche Märke für Anzeige der Einstellung Lösche Marke für Tastatqreingabebetrieb Aussprung

TEST 13. 10/16/79 12:40:37 DMO : CROSS . T13

01442

0)443

0 14 4 4

3EA3

4F3A

01445

3EA6

83

4 A

0 14 4 6

3EA8

A9

0)

01447

3 EAA

20

023E

0)448

3 EAD

FO

08

0 14 4 9

3 EAP

20

5B3F

0 1 4 50

3EQ2

A9

FC

0)45)'

3EB4

20

5 03 F

0)452

B73E

01453

3EB7

24

83

0 1454

3EB9

DO"

OB

0 1455

3 EBB

20

Fl 3D

0)456

3 EBE

20

5B3F

0)457

3 EC 1

AO

CD

0)458

3EC3

20

5 2 3 P

0)459

C03E

0 1460

3EC6

A9

01

0 146)

3EC8

A 2

0a

0 1462

3 ECA

20

CE3E

014 6 3

3 ECD

60

*XMTIN

* Übertrage in einlaufender Richtung auf Buchungseinheit

XMT IN

XMT101

XMT102

JSR DISINT Setze Unterbrechungen außer Betrieb

STA ZQIN Lösche Marke für einlaufende Warteschlangennachricht

LDA IAUMASK Setze auf Übertragung

JSR SETXMT

Wenn kein RTS von Buchungseinheit Bewirke Anstieg von RTS/CTS an Buchungseinheit Verzögere 39 psec., T2

BEQ XMT10) JSR DOUTÛ1 LDY H-4 JSR D24US EQU * BIT .PORTD BNE XMT10 2 JSR RCVOOl JSR DOUTOl LDY »-51 JSR D20US

Wenn RTS von Buchungseinheit

Empfange Nachricht von Buchungseinheit Ausgebe RTS

Verzögere 270 psec., T17

EQU *

LDA IAUMASK Übertrage INBUF (Eingabepuffer) auf Buchungseinheit

LDX HINBUF

JSR XMTMSG

RTS Aussprung

TEST 13 10/16/79

12:40:37

DMO: CROSS.TI 3

0)465 * XMTMSG

0)466 'TRANSMIT MESSAGE

0)467

3ECE

85

25

XMTMSG

STA

IOMASK

0 1-16 8

3 EDO

86

1 D

STX

BPTR

0)469

3ED2

8 6

48

STX

ZECHER

0 1 470

3 ED 4

B 5

00

LDA

O, X

0)47)

3ED6

85

1 A

STA

BCTR

0)472

3ED8

20

5 B 3 F

JSR

DOUTOl

0)473

DB3E

XMTMO1

EQU

ft

0) 474

9EDB

A2

00

LDX

HO

0) 475

DD3E

XMTM02

EQU

*

0)476

3 EDD

A5

25

LDA

IOMASK

0 1477

3 EDP

25

83

AND

PORTD

0)478

3EE1

FO

OC

BEQ

XMTMO5

0)479

3EE3

E8

•I NX

Ol 480

3EE4

DO

F7

BNE

XMTM04

01481

3EE6

A9

02

LDA

IEXMASK

0 1482

3EED

C5

25

CMP

IOMASK

0 1483

3EEA

DO

Fl

BNE

XMTMO3

0 1484

3 EEC

4C

5 7 3 P

JMP

DOUTOO

01485

*

0 14 8 6

DDSE

XMTM03

EQU

XMTM02

0 1487

DDSE

XMTM04

EQU

XMTM02

0)488.

EP3E

XMTMO5

EQU

*

0)489

3EEF

AO

F5

LDV

1-11

übertrage Nachricht Speichere Gerätewähler Anfangssetzung Bytezeiger Lösche Echofehler-Marke

Bewirke Ausstieg von RTS

Führe aus bis alle Bytes gesendet

Setze Sperrzeit?ähler# T13

Schleife - Ausgang bei CTS (Sendebereitschaft) Ausgang v/enn CTS

Erhöhe Sperrzeitzähler

Sperrzeit abgelaufen

Wenn Sendung an externes Gerät

Senke RTS ab Aussprung

Verzögere 72 psec., T4

TEST 13 10/16/79

12:40:37

DMO .-CROSS. TI 3

014 90

3EF1

20

51 3F

JSR

D22US

0 14 9)

3EF4

E6

IQ

INC

BPTR

0)492

3 EF6

20

A93 F

JSR

XMTBYT

01493

3EF9

C6

1A

DEC

BCTR

0)494

3EFB

DO

DE

BNE

XMTMO1

0)495

A

0)496

3EFD

24

48

BIT

ZÊCI1ER

0)497

3EFF

10

03

BPL

XMTM06

01 498

3F01

4C

C73D

JMP

RCVM02

01499

04 0F

XMTM06

EQU

*

0)500

3PÛ4

20

5B3F

JSR

DOUTOl

0 1 501

ÎF07

AO

CB

LDY

1-53

0) 502

3F09

20

4D3F

JSR

D26US

0)503

3F0C

20

573 F

JSRV

DOUTOO

01504

3F0F

AO

EE

LDY

1-10

01505

3 F 1 1

20

50 3 F

JSR

D2 4 US

01506

3 F1 4

60

RTS

Erhöhe Bybezeiger übertrage Byte Erniedrige Bytezähler

Wenn Echofehler

Prüfe Status, Abbruch

Sende Bestätigung Verzögere 286 jisec., T7

Sende EOM (Ende der Nachricht)

Aussprung

TEST 13 10/16/79 12:40:37 DMO:CROSS.T13

01508 * XMTOUT

• •

0 1509 * Übertragung in Auswärtsr.ichtung an externes Gerät

0)510

3F15

20

4F3A

XMTOUT

JSR

DISINT

Unterbrechung außer Betrieb

0151 )

3 F 1 8

85

4 B

STA

ZQOUT

Lösche Marke für auslaufende Warteschlangennachricht

0)512

3 F 1 A

24

49

BIT

Z EXCOM

Wenn externe Kommunikationsmarke gesetzt

01513

3 F 1 C

10

1 E

BPL

XMT002

015)4

3F) E

A9

02

LDA

ÏEXMASK

Setze auf Übertragung

0)5)5

3.F20

20

023E

..

JSR

SETXMT

,

015)6

3F23

DO

10

BNE

XMTOOl

Wenn RTS von externem Gerät

0)517

3F25

AO

FC

LDï

1-4

Verzögere 35 psec., T3

015 18

3F27

20

523F .

JSR

D20US

01519

3F2A

20

8 3 3D

JSR

RCV)02

Erhalte Nachricht von externem Gerät

01 520

3F2D

20

5B3F

JSR

DOUTOl

Veranlasse Anstieg von RTS

01521

3F30

AO

CD

LDY

1-51

Verzögere 270 jisec. , Tl 7

01522

3F32

20

523F

JSR

t

D20US

01523

353F

XMTOOl

EQU

*

015 2 4

3F35

A9

02

LDA

IEXMASK

Übertrage Ausgabepuffer auf externes Gerät

01525

3F37

A2

1 2

LDX

IOUTBUF

0 1526

3F39

20

CE3E

• JSR

XMTMSG

0)527'

3C3F •

XMT002

EQU

A

0)528

3F3C

60

'* RTS

Aussprung

TEST 13 10/16/79 12:40:37

DMO: CROSS.TI 3

0)530 3P4F 0)53)

0 1532 015 3 3 0 1534 0)535

0)536 3F4F EA 0)537 3F50 EA. 01530 3F51 EA 0)539 3F52 EA 0)540 3F53 EA '0154) 3F54 30 FD OÌ542 3F56 60

ORG S3FFA-)71

D26US

' Zei tverzögerungsroutinen,

D26US •

. NOP

D24US

. NOP

D22US

NOP

D20US

NOP

D) ÜUS

INY

BMI D1QUS

D ) 2US

RTS

ON OS

4k ■U

Verzögerung beinhaltet LDY H und ISR

Halte Kode von Seitengrenzen fern

Einstellungen für Y >

u> oo

TEST 13 10/16/79

12:40:37

DMO: CROSS.TI 3

Ol S44-

01545

01546 3F57 A6 30

01547 3P59 DO 02

01548 5B3F

01549 3F5B A6 3) 01550.3F5Û 86 82 01551'3F5F 86 2F 01552 3F61 60

* DOUTOO

* Ausgabedaten 0 oder Daten DOUTOO LDX PORTCO

BNE D0UT02 DOUTOl EQU *

LDX. PORTCI D0UT02 STX PORTC

STX PORTCI RTS

an laufendes Gerät

Setze auf Ausgabedaten V

Springe um alternativen Eintrittspunkt alternativer Eintrittspunkt

Setze auf Ausgabedaten 1

Ausgabedaten

Speichere Port-Abbild

Aussprung

/79

25

83

00

07

00

2F

07

3F

FF

2F

00

IF

2F

82

12:10:37

DMO;CROSS.T13

* ECHO

* READ AND ECHO

* Bei Aussprung

ECHO

ECHOOl

ECH002

LDA BIT BNE BEQ CLC

EOR

ORA

BCC

EQU

SEC '

EOR

AND

BCS

EQU

STA

STA

RTS

INPUT Lese und gebe Echo der Eingabe wieder stellt Obertrag Daten=0 oder Daten=1 dar IOMASK Lese Eingabe

PORTD * + 2 ECHO!

»$00

PORTCI

ECII002

1 ? PF PORTCI

ECII002 *

PORTCI PORTC

Wenn Bit = 1 für Paten = 0

Übertrag=0 für Daten = 0

Setze auf Ëcho Bit = 1 für Daten » 0

(Zeitausgleich)

sonst

Übertrag = 1 für Daten = 1

Setze auf Echo Bit = 0 für Daten » 1

(Zei tausgleich)

Ausgebe Bit

Aussprung

TEST 13 10/16/79

01576

01577

01570 3F7D A9 80 01579. 3F7F A6 1D

01580 3F81 95 00

01581 3 FO 3 A2 00 01502 . 853F 0158 3' 3F85 A5 2 5

01584 3F87 24 83

01585 3F89 DO 06

01586 SF8B E8

01587 3F8C DO P7

01588 3FBE 4C 433D

01589 853F

01590 913F

01591 3F91 20 563F

01592 3P94 20 623F 01 593 3.F97 20 563F 01594 9A3F 01595'3F9A AO P8 01596: 3F9C 20 533F

01597 3F9P 20 623F

01598 3FA2 A6 1D

01599 3FA4 76 00

01600 3FA6 9û' F2

01601 *

01602 3FAB 60

12:40:37 DMO: CROSS.TI 3

* RCVBYT

* RECEIVE BYTE RCVBYT LDA IS0O

LDX BPTR STA 0,X LDX 10 RCVBOl EQU *

LDA IOMASK BIT PORTD BNE RCVB03 INX •

BNE RCVB02 JMP•PSTAT3 RCVBO 2 EQU.RCVBOl

RCVB03 EQU v*

JSR D12US JSR ECHO JSR D12US RCVB04 EQU * ;

LDY Ï-8 JSR D1 BUS JSR ECHO LDX BPTR ROR 0,X BCC RCVB04

*

RTS

Empfange Byte

Setze Markierung - Lösche Puffer

Setze Sperrzeitzähler, T13 Schleife - Ausgang bei Start Ausgang, wenn Start

Erhöhe Sperrzeit-Zähler Wenn Sperrzeit vorüber Abbruch

Schleifènende Verzögere 12 psec., T10 Echo für Startbit Verzögere 10 j>sec., T10

Führe aus bis 8 Bits exponiere Markierung Verzögere 53 psec., T10

Lese Bit undgebe Echo Rotiere Bit in Byte hinein

Prqfe auf Markierung

Aussprung

TEST 13 10/16/79

12:40:37 DMO:CROSS.TI 3

01604

01605

0 I 606

01607

01608

01 609

01610

01611

01612 d 1 6 1 3 01614 0 1615

01616

01617

01618

01619

01620

01621

01622 016 2 3 0 16 2 1 0 16 2 5 01626 0162 7. 01628

. 3FA9 A6 1D 3FAB B5 00 3FAD 85 37 3PAP" 3 8 3FBO A6 1A 3FB2 CA 3FB3 DO 01 3FB5 18

B63F 3FB6 20 573P 3FB9 A2 F7 3FBB AO F5 3FBD 20 5 3 3P

C03F 3FCO 6 6 3 7 3 FC2 BO OÖ 3FC4 90 04 3FC6 A4 31 3FC8 BO 04

CA 3 F 3FCA A/1 30 3FCC 90 00 CE3F

'* XMTBYT ♦TRANSMIT BYTE XMTBYT LDX BPTR

LDA 0,X STA TEMP02 SEC

LDX BCTR DEX

BNE XMTBOl CLC f XMTBOI EQU *

JSR DOUTOO LDX »-9

V

LDY «-11 JSR D10US XMTB03 EQU *

ROR TEMP02 'BCS .* + 2 BCC XMTB03 LOY PORTCI BCS XMTB04 XMTB03 EQU *

LDY PORTCO BCC XMTB04 XMTBOl EQU *

übertrage Byte

Kopiere Byte in Arbeitsbereich

Annahme daß EOB Byte beendet wenn dieses letztes Byte ist

EOM beendet Byte

Ausgabe Startbit

Setze auf Ausgabe von 9 Bits

Verzögere 68 jisec., T9

Ausführung bis 9 Bits gesendet Hole nächstes Bit Wenn Übertrag gesetzt

Setze auf Ausgabe von Daten = 1

sonst

Setze auf Ausgabe von Daten = 0 (Zei tausgleich)

test 13 10/16/79 12 : 4fl: 3 ? dmo: cross.ti 3

0)629

3 FCE

A5

2 P

LDA

PORTCI

01630

3 FDO

84

2 F

STY

PORTCI

01631

3FD2

8 4

82

STY

PORTC

0 1632

3 FD 4

20

E6 3F

JSR

XMTB05

01633

3 F07

A0

FB

LDY

1-5

0 1634

3FD9

20

5 3 3 F

JSR

di aus

01635

3 FDC

E8

I NX

01636

3 FDD

30

El

•

BMI

XMTB02

01637

*

01 6 3 8,

3 FDF

AO

FE

LDY'

»-2

01639

3FE1

20

533F

JSR

Dl 8US

0 1640

3FE4

A5

2F

LDA

PORTCI

0164 1

,

E63F

XMTB05

EQU

*

01642

3FE6

45

83

EOR

PÖRTD

016 4 3

3FE8

25

25

AND

IOMASK

01644

3FEA

FO

OO

BEQ

* *2

01645

3FEC

DO

03

BNE

XMTB06

01646

3FEE

18

CLC

01647

3FEF

90

03

BCC

XMTB07

01648

fl 3f

XMTB06

EQU

*

0 1649

3 PF 1

38

•

SEC

0 1 650

3FF2

do oo

BCS

XMTB07

01651

F43F

XMTB07

EQU

*

01652

3FF4

6a

ROR

a

0 1653

3 ff5

05

48

ORA

ZECHER

0Ì 654

3FF7

83

48

STA

zecher

01655

1ff9

60

•

RT^

Hole vorheriges Bit Ausgebe gegenwärtiges Bit

Vergleiche vorheriges Bit mit Echo Verzögere 38 psec., T9

Zähle Bit

Verzögere 23 psec., T9

Hole vorherige Bitausgabe (STOP) alternativer Eintrittspunkt Vergleiche vorheriges Bit mit Echo

Wenn Bits übereinstimmen

Setze auf Wartung der Echo-Fehler-Marke sonst

Setze auf Setzung der Echo-Fehler-Marke (Zeitausgleich)

Bringe Echo-Fehler-Marke auf neuen Stand

Aussprung

TEST 13 10/16/79

12 ; <1 û : 37 DMO:CROSS.T13

01657 Ol 658

01659 0030

01660 3PPA 0038

01661 3PFC 0D39

01662 3PPE 0038

01663

CROSS REFERENCE

AOR 0080 127

AUMASKOOOI 121 BCTR OOIA' 18

DEND 001B 19

BLANK 3A18 538

ULAN K13A 1 A 540

BLINK 001C . 20

HPTR 001D 21

CTRRO 0085. 128

CTRLO 00 8 4 î 2 è

D12US 3P56 1552

D18US 3F53 1540

D20US 3F52 -1539

D22US 3PS 1 1538

D24US 3F50 1537

* END

* •Unterbrechungsvektor und Endanweisung NMINT EQU INTRP

FDB NMINT PDB INIT PDB INTRP END

378

4 00

1313

1446

1 460

787

798

1471

1493

1610

1260

U63

361

559

721

844

870

550

149

758

770

1259

1264

1260

1606

382

144

381 •

1238

1591

1 593

1281

1541

1596

1610

, 1634

1243

1450

1510

1522

1490

i ^51

1505

NJ 4^

1 1.8 9

1277 1468 1491 1579 1598

1639

TEST 13

10/16/79

12 : 40 :

37

DMOsCROSS.

TI 3

D26US

001E

1536

) 27)

1502

DDOUNC

00 1 F

22

190

195

233

242

DECPOS

3A3 F

23

200

552

563

6 35

•

1401

1403

141 1

14)6

Dl SPO)

3A43

568

DISD02

3A4 E

57)

576

DlSB03

3A4 E

577

573

D1SB04

3A28

578

570

DISDFR

0000

577

742

1020

1077

DISBUF

0020

13

252

542

763

789

1 101

1 105

1 108

1 109

136)

1363

1 379 •'

1420

DlSCTR

3A54

24

• 250

255

281 ■

319

DISIO) .

3 A 4 F

587

593

650

PISINT

3884

584 '

550

1230

1 308

135)

DI SP

3890

250

DISPOÌ

389C

256

25)

DISP02

389E

263

260

DlSP03

38AE •

265

262

DISP04

38AE

275

273

DISP05

38AE

276

217

D1SP06

38B9

277

269

DISP07

38C4

284

202

DlSP06

3ÛC4 *

29 )

200

903 715 1433

924 926 954 959 1398

.072 .993 1023 1034 1092 1095

1115 1116 . 1191 1193 1195 1352

1427 1431 1432

326 373

1378 1444 1510

TEST 13 10/16/79

12:40:37

DMO: CROSS.T13

DISP09

38CF

298

Ol SP 10

38D5

302

DI SP M

38D5

303

0 1 S P 1 2

3805

304

OISPl 3

3 8 EO

31 1

OI SP 1 4

3 BEO

312

DISP15

38F5

325

DI SP 1 6

38FD

333

DlSPTR

0021

?5

DÛUT0Q

3F57

1546

DOUTOl

3F5B

tn j*.

CD

D0UT02

3F5D

1550

EAEA

3A55

592

EAEC

3*60

606

EAOP

3A64

616

ECEA

•3A69

632

ECEAOl

3AÉQ

633

ECEC

3A82

649

ECHO

3F6 2.

1557

ECIIOOI

3F71

1566

ECII002

3F78

1571

ECOP

3A8A

661

ECOPOl

3A8D

665

EXMASK

0002

•122

FI X DO 1

3E4 7

1385

F IX DO 2

3E4E

1389

258 264 1503 16)5 1456 1472 1500

529 .

530 .616

531

521 66]

522

1272 1592 1597

1570

523

1246 1401 1514

296

300

293

286

309

307

323

278

253

1484

1449

1547

518

519

520

510

608

51 1

1261

1 560

1565

512

621

394

1 396

1387

ON Ov K) .U W

1520

u> K) C\

1524

TEST 13- 10/16/79 12:40:37 DMO : CROSS . TI 3

FIX DO 3

3E5C

1397

1391

F1 X DO 4

3E64

1402

1399

FlXD05

3E70

1409

1 407

FlXD06

3E70

1410

14 17

FlXD07

3E7F

1418

1413

FIXD08

3E92

*1430

1428

F1XD09

3E9E

1437

1435

FIXDEC

3E39

1378

759

877

FLSOOl

3 AA8

687

601

FLS002

3 AB 1

69 4

678

FLS003

3AB1

695

752 •

FLSOUT

3A95

677

704

836

FLUSH

3AB2

700

393

398

FLUSHl

3AE4

725

712

FLUSH2

3AE4

. 72 6

709

FLUSH 3

3AEE

732

729

FLUSII4

3AF7

733

734

FLUSH5

3D03

744

731

737

FLUS1I6 '

3DOB

748

740

FLUSH7

3BOE

750

706

FLUS1I8

3 AB 1

752

703

FMTBD.l

3B25

768

765

FMTB02

3B28

77 1

640

720

FMTB03

3B4C

795

793

FMTDOF

3D 1 1

757

1 146

970

904

1 290 404

643

1021

751 855 1150 1155

TEST 13 10/16/79

12:48:37

DMO:CROSS

. TI 3

GETKOl

3B5E

812

807

GETKEY

SB53

806

' 592

649

092

GETNO1

■ 3B6A

823

02 1

GETNIB

3B5P

817

560

562

574,

1004

1026

GETPTR

0022

26

557

564

567

791

794

1044

1353'

1300

1421

IIAREG

0082

101

IIBANT

0086

109

IIBCNT

0087

1 1 1

IICSUM

0084

. 105

IIÛIACS

008D

108

HDI SAB

0042

74

• 851

IIDISKB

0003

117

733

IIDISPC

00A)

1)9

713

II BLOCK

008A

102

II DR 2 A 1

3B75

833

641

1 14?

IIDR2A2

3B78

835

1073

IIDR2AU

3B6F

830

384

667

053

1069

1153

HDREG

0083

103

IIENABL

004 1

73

1 138

ilCNAKB

0062

1 1 6

720

II ENDEN

0043

75

666

DENTAM

0QC5

81

606

IIENTCO

00C6

82

632

HEXRD

006)

115

700

IIEXWR

OOEI

1 1 3

739

1040 • 1386 817 824 994 1024 1030

TEST 13 10/16/79

12:40:37

DMO; CROSS.T13

MUSLIM

008E

1 10

IILOPOS

008B

104

DMTRNO

008C

' 106

IIPCMT

0085

107

IIPSET

*0091

100

IIREQAR

0052

86

1IREQBA

0056

94

IIREQBC

0057"

96

IIREQCS

0054

90

IIREQDL

0052

07

IIREQDR

0053

88

IIREQDS

0055

93

IIREQUS

0056

9.5

IIREQLP

00*53-

89

IIREQMN

0054

91

IIREQPC

0055

92

IIREQPO

0051

85

IIREQST

0056

84

1IUESBA

0044

76

lIRESàv

0047

78

IISETPO

00C1

89

IISETSV

0046

77

IISTAT

0080

98

1 BEND

0010

123

I BPTR

0023

27

1ER

008A

130

746

1071 1162 1295 1 276

1017

1.0 6 8

1 152

303

450

446

1144

44 1

680

1248

1258

407

TEST 13 10/16/79

.12: 40 ; 37

DMO: CROSS.TI 3

I FR

0089

131

INB.UF

000A

1 5

123

634

1145

1247

1461

INIT

390D

351

1061

IN1 TO 1

3914

356

359

INTROl

3811

154

152

1NTR02

3817

158

150

INTRP

3800

143

1659

1 662

IOMASK

0025

29

1257

1 282

KBSC

3817

163

KSCOl

382A

174

186

KBSC02

383B

184

1 79

KDSC03

3849

194

191

KDSC04

3 8 4 D

1 99

• 109

KBSC05

3857

. 213

216

KBSCÒ6

305B

2 1 9

201

KBSC07

386D

227

224

KÛSC08

386D

228

221

KBSC09

3871

232

' 2 18

KBSC10

387C

241

230

KBSC11

3880

243

193

KBSC12

3884

245

197

234

KCLEAN

0026

30

243

321

KCLEEN

0027

- 31

244

470

KEYCÔL

0028

32

181

102

k F. Y MOI

3B0B

849

043

639 • • 707 • 727

1207 1467 1476

006 009

210 212 214

741 745 747' 830 832

1482 1557 15B3 1643

240

TEST 13 10/16/79 12

KEYMQ2

3B8B

850

KEYM03

3Q8D

852

KEYMOD

3B7E

842

KLUSED

0029

33

KSW 1

002A

23

LNCTIM

002Q

35

MLOOOI

395B

399

ML0002

3967

405

ML0003

3977

4 15

MLÛ00 4

3977

4 1 6

ML0005

. 3 9A5

.443

MLÓ006

• 39AA

447

ML0007

39AD

451

ML000 8

3 9BE

462

ML000 9

39CI

466

ML0010

39D1

475

MLOOI1

39D4

480

MLOOI2

39D4

481

MLOOI3

39E4 '

.490

MLOO14

39F2

499

ML0015

3A01

569

MLOOI6

3A02

510

MLOOI7

3A0D

521

MLOO18

394C

532

MLOO19

394C

533

MLOÓP

394C

• 392

37 DMO: CROSS.T13 960

459 1139 940

811 913 934 962

433

153 4 11 906 1081

487

517 5*2 4 528

503

533 1207

: 40 :

067

448

922

37 4

172

151

396

402

412

410

438

442

435

457

455

471

474

468

485

489

513

505

507

501

453

532

1060 1122

a

H

Os ©S bJ

•fe. Ui

TEST 13 10/16/79

12:48:37

DMO:CROSS.T13

NIBCTR 002C 36

NMINT 3800 1659

OBEND 0018 128

OPEA 3893 860

OPEC 3B93 886

OPOP ; 3BBÛ 892

OPOPOL 3BC1 902

OPOP02 3BC9 90?

OUTBUF 0012 16

PAKE01

3BD2

918

PAKEOl

3BD2

919

PAKE03

3BDF

927

PAKE04

3BDF

928

PAKE05

3BDF

929

PAKEY

. 3BCA

913

PCLBÛ1

3B98

868

PC LBO 2

3 BAD

879

PCLBÛ3

3 BAD

880

PCLRK

3B95

867

PCR

ÖOOC

132

PDKEOl

3 BDF

943

PDKEY

3 BEO

934

PKSW

002D

'37

PNUMOl

3 BFF

961

PNUMK

3 BEC

948

638 710 761

1436

525 886

526

527

679 685 68 6

ll(j5 1177 ' 1292

952 957 1011

973

654 895 493 490

540

1434

1660

13 19.

514

515

516

893

904

124

1161

915

598

925

•921

943

896

644

876

874

94 1

376

940

597

380

?55

936

950

1117

1383

1.394 1404

719 1016 1019 1296 1297 1318

1070 1076 1525

TEST 1]

1 10/16/79

12:48:

37

DMO:CROSS

. TI 3

PORTA

0080

133

171

176

315

324

PORTAX

008D

) 3 4

167

317

PORTB

003)

135

164

1 75

320

368

429

PORTD1

Ò02E

38

369

430

43 1 •

433

436

PORTDX

00BE

136

372

PORTC

0082

137

366

4 2 0-

1.205

1 550

1573

PORTCO

00 30

40

.1331

1546

1626

PORTC)

003)

41

1329

1549

• 1623

PORTCI

00 2 F

39

365

427

1203

1206

1328

1629

1630

1640

PORTD'

0083

138

395

• 401

) 283

1315

1333

PPEQQ)

3CÌ 1

975

972

PPEQ02

3C)9

983

970

PPEQ03

3C23

988

986

PPEQ04

3C28

992

980

PPEQ05

3C2E

996

1354

PPEQ06 ,

,3C30

998

799

1423

PPEQ07

3C32

) 000

PPEQ08

3C32

1001

1010

PPEQ09

3C3E

1008

1006

PPEQ10

3 DDP

1011

1 003

PPEQK

3C04

9 6 8

916

1143

PPOSTI

3C58

1025

1028

PPOST2

3C6E

1038

1035

PPOST3

3C6E

1-0 39

1042

PPOST4

}C82

1051

100 5

1 196

586

1631

1330 155). 1 564 1569 1572 1453. 1477 1558 1584 1642

TEST 13 10/16/79

12:48:37

DMO: CROSS.T13

PPOST5

3C86 •

1054

PPOST6

3C86

1055

PPOSTR

3C44

1016

PRKEÛO

3C89

1061

PRKEOl

3C9F

1075

PRKE02

3CA4

1078

PRKE03

3CA6

1080

PRKE04

3CA8

"1032

PRKEY

3CB7

1060

PSIIN02

3CBB

1099

PSIIN IB

3CAD

1091

PSKPÛ1

3 CEC

1 13 7

PSKE02

3CF1

1 142

PSKEQ3

3CFE

1149

PSKE04

3D01

' 1151

PSKE05

3D09

1 156

PSKEY

3CDB

1122

PSTATI

3 D1 4

1 166

PSTAT2

3D2E

1188

PSTAT3

3D43

1 1 99

PSTAT4

3DC9

1 20B

PSTAT5

3D09

1 209

PSTATR

3D0A

1161

PUTNO1

3D64

1 225

PUTNIß

3D52

1214

PUTPTR

0032

42

1065

1198

963 1415

669

463 . 472 1135 1185 1208 1209

1300 1369 1408 1588

1037 1048 )393 1033 1046 1216

1018

1063

691

476

1072

743

722

897

1111

575

1127

1134

386

413

1124

898

1 1 70

1182

1 302

1 1 80

1 163

690

1 220

1009

999

1381

TEST 13 10/16/79

RCVBOl

3F85

1502

RCVB02

3F85

1509

RCVB03

3F91

1 590

RCVB04

3 F9A

1 594

RCVBYT

3F7D

1578

RCV101

3D7D

214 1

RCV102

3D83

1245

RCV10 3

3D8F

1 252

RCV IN

3D70

1286

RCVMOl

3D9B .

1262

RCVM0 2

3DC7

1286

RCVM03

3DE4

1301

RCVMO4

3DE4

1 302

RCVM05

3DE7

1 303

RCVMSG

3D90

1257

RCVOD1

3DF1

1312

RCV002

3DFE

1314

RCVOUT

3DE8

. 1 308

SE-TXMT

3E02

1327

SWAP

3E0F

1339

TEMPOl

0033

43

TEMP02

0037

44

TSTACK

007F

125

W2DA01

3 E2A

1369

W2DA02

3E39

1 370

W2DADD

3E1C

1351

12 : 40 : 37 DMO: CROSS.T13

1509 1507 . 1 585 1 600 1 269

1285 1310 1240 1519 1237 397 1273 1498 1289 1265 1284

1249 1320 1309 1455 1316

403

837

1447

1515

261

774

022

1093

178

100

219

222

492

496

772

777

351

1201

1365 1360 070 907

1102 1222

236

792 1097 1110 1600 1620

TEST 13 10/16/79

12 : 4 8 ; 3 7

DMO i CROSS.TI 3

WRKBUF 0005 XMTBOl 3FB6 XMTB02 3 FCO XMTB03 SFCA XMTB04 3 FCE XHTB05- 3FE6 XMTB06 3FF 1 XMTB07 3FF4 XMTBYT 3 FA? XMT101 3EB7 XMT102 3EC6 XMTIN 3EA3 XMTMO1 3EDB XMTMO 2 3EDD XMTMO 3 3 EDO XMTMO4 3EDD XMTMO5 3EEF XMTMO6 3F04 XMTMXG 3ECE XMTOOl 3F05 XMTOO 2 3F3C XMTOUT 3FIS YlìATRC 003E YCKDAT 0039 YONABL 003D YFLAGS 0038

995 1362 1612 1636 1622

1624 1627

1632

1645

1647 1650 1492 1 44B 1454

749 034 1494

1486 1487

1483

1400

1478

1497

1462 1526 1516 1513 600 4 5 6 421 . 27 2 1160

1 4

1614

1619

1625

1628

164 1

1648

1651

1 606

1452

1 459

14 4 4

1473

1475

1486

1487

1488

1499

1467

1523

1527

1510

53

48

52

4 6

I

TEST 13 10/16/79 12

YIIARDE

003F

54

YINSF

003A

49

YKBDIS

0040

55

Y LOW F

003Q

50

YRESBA

0030

• 47

YSERV

003C

51

ZADDEL

0046

63

ZüCDWN

0041

58

ZflLlNK

0047

64

ZKCIIER

0040

65

ZEXCOM

0049

66

2 FLAGS

004 1

57

ZKEYMO

0042

59

ZQIN

004A

67

ZQOUT

Û04B

60

ZSTBLD-

0043

60

2STNGT

0044

61

ZT1MD

0045

62

ZTOTAC

004C

69

ZTUI P

004D

70

3 7 OMO:CROSS.TI 3

1176

1179

1290

299

440

452

60 2'

875

969

991

226

454

157

?92

417

1496

1653

1654

439

445

1236

846

1439

705

710

1251

70 2

724

1299

047

1022

1133

205

1050

1126

971

108 4

073

001

977

469

117 3

1174

: 40 :

207

295

370

294

410

306

010

160

156

1469

363

543

642

701

677

711

270

409

060

467

730

1052 420 1512

1445

1322 i 511

1426

1430

905 900 1053

Claims (4)

1. 00Z4J4

   2

   PATENTANSPRÜCHE

   1. Frankiermaschine, dadurch gekennzeichnet, dass sie eine Tastatur (31 ) und Anzeigevorrichtung (30), eine Steuereinheit mit einem ersten Mikroprozessor (80,100) zur Steuerung der Dateneingaben, eine Buchungseinheit (58) mit einem zweiten Mikroprozessor ( 120) zur Steuerung der Buchungsvorgänge inklusive ausgedruckter Portogebühren und eine Druckereinheit (56) zum Ausdrucken der Portogebühren aufweist und dass die Steuereinheit einen Logikschaltkreis (81, 101)aufweist, mit dessen Hilfe die Frankiermaschine mit einem externen Gerät (150) so verbunden werden kann, dass die Steuereinheit (75) das Anliegen eines Signals aus dem externen Gerät feststellt und über den Logikschaltkreis die Steuerfunktion von der Steuereinheit auf das externe Gerät überträgt, so dass das externe Gerät mit der Buchungseinheit (56) und der Druckereinheit (58) in Verbindung tritt, um Steuer- und Datensignale zur Frankiermaschine zu übertragen.
2. 2. Frankiermaschine nach Anspruch 1, dadurch gekennzeichnet, dass die Steuereinheit (75) mittels der Tastatur (31) eingegebene Daten an die Buchungseinheit (58) und in der Buchungseinheit gespeicherte Daten an die Anzeigevorrichtung (30) überträgt.
3. 3. Frankiermaschine nach Anspruch 1, dadurch gekennzeichnet, dass die Steuereinheit (75) und die Buchungseinheit (58) und die Druckereinheit (56) so verbunden sind, dass jeweils Daten- und Steuersignale aus der Steuereinheit zur Buchungseinheit und/oder Druckereinheit und Statusinformationen aus der Buchungseinheit oder Druckereinheit an die Steuereinheit seriell übertragen werden.
4. 4. Frankiermaschine nach Anspruch 1, dadurch gekennzeichnet, dass die Steuereinheit (75) einen Puffer (158) aufweist, zum Zwecke über die Steuereinheit (75) Signale aus der Buchungseinheit (56) an das externe Gerät (150) und zurück übertragen zu können.