|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 20780 (0x512c)
Notes: pts_type(SC)
Names: »DRMS02.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/DRMS02.SC«
IDENT DRMS02 REL 9.2 79-11-16 870105040920 * ************************************************* * * PHILIPS TERMINAL SYSTEM PTS * * DRMS02 = DRIVER MAGNETIC STRIPE * * * * * * * ************************************************** * * * THIS DRIVER HANDLES INPUT/OUTPUT ON THE * M A G N E T I C S T R I P E U N I T (M S U) PTS 6266. * THE MSU MUST BE CONNECTED TO THE CPU VIA CHLT OR CHRT. * * TRACK 2 AND 3 ON STRIPES CAN BE READ AND TRACK 3 CAN BE * WRITTEN. * * PIN KEYBOARD IS NOT SUPPORTED BY THIS VERSION OF DRIVER * OFF-LINE TEST IS NOT SUPPORTED BY THIS VERSION OF DRIVER * * THE DRIVER CONSISTS OF FOLLOWING PARTS: * * A C M S : ACTIVATION PART * ORDER PROCESSOR * I H M S : INTERRUPT HANDLER * O N M S : RECOVERY ROUTINE * * EJECT DRMS02 * * THE FOLLOWING ORDERS ARE TREATED: * * CREDIT * /06 WRITE CARD WRITE * /0A READ CARD RANDOM READ * /21 OPEN - * /26 END OF OPERATION DSC0 CC=4 * /37 INSERT CARD DSC0 CC=0 * * * THE FOLLOWING RETURN CODE IS USED: * * BIT 0 REQUEST ERROR * 5 READ/WRITE WARNING * 10 CARD MISSING * 12 INCORRECT LENGTH * 13 NEGATIVE ACKNOWLEDGEMENT * 14 THROUGHPUT ERROR * 15 NOT OPERABLE * * * NORMAL USE OF REGISTERS: * * REGISTER A1 RETURN CODE * A2 INPUT/OUTPUT CHARACTER * A3 BUFFER INDEX * A4 RETRY COUNTER * A5 STACK BASE POINTER * A6 DWT ADDRESS * A7 ORDER * A8 ECB ADDRESS * EJECT DRMS02 * *********** * ENTRIES * *********** * ENTRY MSAD ADDRESS BLOCK * ************* * EXTERNALS * ************* * * EXTERNAL ROUTINES EXTRN SAVE8 SAVE REGISTER A1-A8 ON A15 STACK EXTRN STREG STORE REGISTERS AND GO TO DISPATCHER EXTRN LDREG LOAD REGISTER AND RETURN TO USER VIA A5 EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER EXTRN DISIOE DISPATCH END I/O, REQUEST ERROR EXTRN GETCHR GET NEXT CHARACTER IN ECB-BUFFER EXTRN DISEND END I/O AND DISPATCH EXTRN TDISP DISPATCHER ENTRY * * DWT DISPLACEMENTS EXTRN DWTST DWT SOFTWARE STATUS EXTRN DWTECB ECB-ADDRESS EXTRN DWTOR ORDER EXTRN DWTSB2 STACK BASE * * ECB DISPLACEMENTS EXTRN ECBBA BUFFER ADDRESS EXTRN ECBRL REQUESTED LENGTH EXTRN ECBEL EFFECTIVE LENGTH EXTRN ECBRC RETURN CODE EXTRN ECBCW CONTROL WORD * EJECT DRMS02 * ************************ * CONDITIONAL ASSEMBLY * ************************ * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * * MMU BUFFER SIZE (BYTES) * X:A EQU 108 DVBLEN EQU X:A * EJECT DRMS02 * ************* * CONSTANTS * ************* * * MAGNETIC STRIPE CHARACTERS CRWSTX EQU /3B CARD START CHARACTER CRDSTX EQU /3D START CHAR, GERMAN BOOK (DIN) CRWETX EQU /3F END CHARACTER * * STATUS MESSAGES FROM MSU DOCINS EQU /C DOCUMENT INSERTED DOCESC EQU /E DOCUMENT ESCAPED WRWARN EQU 8 WRITE WARNING RDERR EQU 9 READ ERROR WRERR EQU /A WRITE ERROR WROK EQU /B WRITE OKAY * * COMMANDS TO MSU RESET EQU 2 GENERAL RESET SELTRA EQU 6 SELECT TRACK 2 FOR READ ENCTRA EQU 5 ENCODE TRACK 3 REATRD EQU 8 READ TRACK 3 GERMAN BOOK (DIN) ENCTRD EQU 9 ENCODE TRACK 3 GERMAN BOOK (DIN) * * ORDERS TO DRIVER INCARD EQU /37 INSERT CARD ENOFOP EQU /26 END OF OPERATION * * MISCELLANEOUS RTRIES EQU 2 NUMBER OF RETRIES * EJECT DRMS02 * * RETURN CODES REQERR EQU /8000 REQUEST ERROR WARNRW EQU /400 READ/WRITE WARNING CARMIS EQU /20 CARD MISSING INCLEN EQU 8 INCORRECT LENGTH NEGACK EQU 4 NEGATIVE ACKNOWLEDGEMENT THRERR EQU 2 THROUGHPUT ERROR NOTOPE EQU 1 NOT OPERABLE * EJECT DRMS02 * ******************** * DWT-DISPLACEMENT * ******************** * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * * DWTFRT EQU START+/14 BIT 0 CREDIT CARD / GERMAN BOOK FLAG * BIT 1-7 NOT USED * BIT 8-15 RETRY COUNTER SAVE AREA DWTLRC EQU START+/16 LRC ACCUMULATOR * EJECT DRMS02 * ********** * TABLES * ********** * DATA DVBLEN MMU BUFFER SIZE DATA 2 MMU DEVICE INDEX MSAD EQU * DATA ACMS ACTIVATION DRIVER DATA 0 ABORT ROUTINE ADDRESS DATA IHMS INTERRUPT HANDLER DATA RCMS RECOVERY ROUTINE * * * TAB EQU * ORDER TABLE DATA /060A,/3726,/2100 TABL EQU *-TAB-1 NUMBER OF ENTRIES * MSFUN EQU * MAGNETIC STRIPE FUNCTION DATA WRITE,READ,INSERT DATA ENDOP,OPEN EJECT DRMS02 * * * A C M S * * ACTIVATION PART: CHECKS VALIDITY OF ORDERS * AND STARTS PROCESSING. * * ACMS EQU * LDK A4,TABL-1 ACMS10 CC A7,TAB,A4 FIND OUT IF LEGAL ORDER RF(E) ACMS20 VALID ORDER SUK A4,1 RB(NN) ACMS10 TRY NEXT * * MSERR ABL DISIOE DISPATCH END I/O,REQUEST ERROR * ACMS20 EQU * ADR A4,A4 GET INDEX ABI MSFUN,A4 BRANCH TO VALID FUNCTION MODULE * EJECT DRMS02 * ************************************************** * * OPEN /21 * * THE DRIVER IS SET TO HANDLE EITHER CREDIT * CARDS/AMERICAN PASSBOOKS OR GERMAN PASSBOOKS. * * REGISTER INPUT: * A6 = DWT ADDRESS * A8 = ECB ADDRESS * ************************************************** * OPEN EQU * LD A2,ECBCW,A8 FORMAT CODE RF(NZ) OPEN10 NOT CREDIT CARD / AMERICAN BOOK LDKL A2,/7FFF MASK FOR BIT 0 ANS A2,DWTFRT,A6 CLEAR FORMAT FLAG, INDICATING * CREDIT CARD / AMERICAN BOOK RF OPEN20 EXIT * OPEN10 EQU * SUK A2,1 FORMAT CODE GERMAN PASSBOOK? RB(NZ) MSERR NO, ILLEGAL CODE LDKL A2,/8000 MASK FOR BIT 0 ORS A2,DWTFRT,A6 SET FORMAT FLAG, * INDICATING GERMAN BOOK * OPEN20 EQU * LDK A1,0 RETURN CODE RF ENDIO EXIT * EJECT DRMS02 * ************************************************** * * INSERT CARD /11 * ************************************************** * INSERT EQU * LDK A4,DOCINS CHAR. DOC. INSERTED LC A2,DWTST+1,A6 GET STATUS ANK A2,/FF RF(NE) INSE10 INSE05 EQU * LDK A2,RESET GENERAL RESET CF A5,OUTPUT SEND IT CF A5,STREG WAIT FOR MESSAGE FROM MSU INSE10 CWK A2,DOCESC DOCUMENT ESCAPED ? RB(E) INSE05 YES CWR A2,A4 DOCUMENT INSERTED ? RF(NE) INSE15 NO SC A4,DWTST+1,A6 YES LDK A1,0 RF ENDIO INSE15 LDK A1,THRERR THROUGHPUT ERROR EJECT DRMS02 * * END OF INPUT/OUTPUT REQUEST * ENDIO EQU * ABL DISEND EJECT DRMS02 * ************************************************** * * READ CARD /0A * ************************************************** * READ EQU * LC A2,DWTST+1,A6 GET STATUS ANK A2,/FF SUK A2,DOCINS DOCUMENT INSERTED? RF(NE) WRIT02 NO * * LDK A4,RTRIES NUMBER OF RETRIES READ10 EQU * LDK A3,0 RESET BUFFER INDEX LD A2,DWTFRT,A6 FORMAT CODE RF(N) READ20 GERMAN BOOK * EJECT DRMS02 * * READ CREDIT CARD / AMERICAN PASSBOOK LD A2,ECBCW,A8 GET TRACK NUMBER SUK A2,2 RB(N) MSERR TRACK < 2 CWK A2,1 RB(G) MSERR TRACK > 3 ADK A2,SELTRA COMPUTE TRACK TO SELECT * CF A5,OUTPUT SEND READ TRACK COMMAND (/06 OR /07) * CF A5,REABLK READ ONE DATA BLOCK CWK A1,NEGACK RETURN CODE READ ERROR? RB(NE) ENDIO NO, OK OR INCORRECT LENGTH. EXIT * SUK A4,1 MORE RETRIES? RB(NN) READ10 YES, PERFORM RETRY RB ENDIO NO, EXIT * EJECT DRMS02 * READ20 EQU * * READ GERMAN PASSBOOK LDK A2,REATRD CF A5,OUTPUT SEND "READ GERMAN BOOK" COMMAND * CF A5,REABLK READ FIRST BLOCK CWK A1,INCLEN BUFFER OVERFLOW? RB(E) ENDIO YES, EXIT * SC A4,DWTFRT+1,A6 SAVE RETRY COUNTER LDR A4,A1 SAVE RETURN CODE CF A5,REABLK READ SECOND BLOCK CWK A1,INCLEN BUFFER OVERFLOW? RB(E) ENDIO YES, EXIT * CWR A1,A4 RF(E) READ30 BOTH BLOCKS OK OR BOTH WRONG * * ONE BLOCK WAS OK, ONE WAS ERRONEOUS LDKL A1,WARNRW RETURN CODE "READ/WRITE WARNING" RF READ40 CHECK IF MORE RETRIES LEFT * READ30 EQU * * BOTH BLOCKS WERE OK OR BOTH WERE ERRONEOUS LDR A1,A1 BOTH OK? RB(Z) ENDIO YES, EXIT * READ40 EQU * * CHECK IF MORE RETRIES SHOULD BE MADE LC A4,DWTFRT+1,A6 GET RETRY COUNTER ANK A4,/FF CLEAN SUK A4,1 MORE RETRIES? RB(NN) READ10 YES, PERFORM RETRY RB ENDIO NO, EXIT * EJECT DRMS02 * ************************************************** * * READ DATA BLOCK * * ONE DATA BLOCK IS READ FROM THE MSU. READING * IS TERMINATED WHEN READ ERROR MESSAGE IS * RECIEVED, END CHARACTER IS READ OR INPUT * BUFFER IS FULL. * * REGISTER INPUT: * A3 = BYTE INDEX * A5 = LOCAL STACK POINTER * A6 = DWT ADDRESS * A8 = ECB ADDRESS * A15 = SYSTEM STACK POINTER * * REGISTER OUTPUT: * A1 = RETURN CODE * A3 = UPDATED BYTE INDEX * ************************************************** * REABLK EQU * CF A5,STREG FETCH DATA CWK A2,RDERR READ ERROR? RF(E) RB100 YES, EXIT * CWK A2,CRWETX END CHARACTER? RF(E) RB110 YES, EXIT CW A3,ECBRL,A8 BUFFER ALREADY FULL? RF(NL) RB120 YES, EXIT * EJECT DRMS02 * CF A15,CDCHK CHECK IF LEGAL CHAR CF A15,STORE PUT CHAR IN BUFFER RB REABLK READ NEXT CHAR * * * BLOCK TREATED. SET RETURN CODE AND EFFECTIVE LENGTH. * RB100 EQU * LDK A1,NEGACK READ ERROR LD A3,ECBEL,A8 RESET BYTE INDEX RF RB140 EXIT * RB110 EQU * LDK A1,0 NORMAL ENDING RF RB130 EXIT * RB120 EQU * LDK A1,INCLEN BUFFER OVERFLOW * RB130 EQU * ST A3,ECBEL,A8 EFFECTIVE LENGTH TO ECB * RB140 EQU * RTN A5 * EJECT DRMS02 * ************************************************** * * WRITE CARD /06 * ************************************************** * WRITE EQU * LDK A4,RTRIES SET NO OF RTRIES LC A2,DWTST+1,A6 GET STATUS ANK A2,/FF SUK A2,DOCINS DOCUMENT INSERTED? RF(E) WRIT05 YES WRIT02 LDK A1,CARMIS CARD MISSING ENDIO2 RB ENDIO * * WRIT05 EQU * CM DWTLRC,A6 CLEAR LRC-ACKUMULATOR * * TEST REQUESTED LENGTH AND GET START CHARACTER. * LDK A1,INCLEN SET ERROR CODE JUST IN CASE LD A2,ECBRL,A8 REQUESTED LENGTH LD A3,DWTFRT,A6 FORMAT CODE FLAG RF(N) WRIT07 GERMAN BOOK * EJECT DRMS02 * * CREDIT CARD / AMERICAN PASSBOOK SUK A2,104 RB(P) ENDIO ERROR IF LENGTH > MAX LDK A2,CRWSTX START CHAR CREDIT CARD / AMERICAN BOOK RF WRIT09 CONTINUE * WRIT07 EQU * * GERMAN PASSBOOK SUK A2,45 RB(P) ENDIO ERROR IF LENGTH > MAX LDK A2,CRDSTX START CHAR GERMAN BOOK * WRIT09 EQU * LDK A3,0 RESET BUFFER INDEX * WRIT10 EQU * XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR CF A5,OUTPUT SEND CHARACTER WRIT15 CF A15,GETCHR GET NEXT CHAR FROM ECB-BUFFER LDR A1,A1 ANY CHARACTERS LEFT? RF(E) WRIT20 NO CF A15,CDCHK VALID CODE? LDR A1,A1 RB(Z) WRIT10 YES RB WRIT15 * EJECT DRMS02 * WRIT20 EQU * LDK A2,CRWETX CARD END CHARACTER XRS A2,DWTLRC,A6 UPDATE LRC CF A5,OUTPUT SEND CHARACTER LD A2,DWTLRC,A6 LRC-CHARACTER ORK A2,/30 SET ZONE CF A5,OUTPUT SEND LRC-CHARACTER * * SEND WRITE TRACK COMMAND LDK A2,ENCTRD ASSUME GERMAN PASSBOOK LD A1,DWTFRT,A6 IS IT GERMAN BOOK? RF(N) WRIT30 YES, CONTINUE LDK A2,ENCTRA NO, SET CREDIT CARD / AMERICAN BOOK * WRIT30 EQU * CF A5,OUTPUT SEND WRITE TRACK COMMAND CF A5,STREG WAIT FOR STATUS MESSAGE LDK A1,0 RETURN CODE OK CWK A2,WROK WAS IT OK? RB(E) ENDIO2 YES, EXIT * SUK A4,1 MORE RETRIES? RB(NN) WRIT05 YES, PERFORM RETRY * LDK A1,NEGACK RETURN CODE NEGATIVE ACK CWK A2,WRERR WAS IT WRITE ERROR? RB(E) ENDIO2 YES, EXIT * LDKL A1,WARNRW RETURN CODE READ/WRITE WARNING CWK A2,WRWARN WAS IT WRITE WARNING? RB(E) ENDIO2 YES, EXIT * LDK A1,THRERR ILLEGAL STATUS FROM MSU. THROUGHPUT ERR RB ENDIO2 * EJECT DRMS02 * ************************************************** * * END OF OPERATION /26 * ************************************************** * ENDOP EQU * LDK A4,DOCESC DOCUMENT ESCAPED LC A2,DWTST+1,A6 GET STATUS ANK A2,/FF RF(NE) END10 END05 LDK A2,RESET GENERAL RESET CF A5,OUTPUT SEND CHARACTER CF A5,STREG WAIT FOR MESSAGE FROM MSU END10 CWK A2,DOCINS DOCUMENT INSERTED ? RB(E) END05 YES CWR A2,A4 DOCUMENT ESCAPED ? RF(NE) END15 NO SC A4,DWTST+1,A6 CHAR TO STATUS IN DWT LDK A1,0 RB ENDIO2 END15 LDK A1,THRERR THROUGHPUT ERROR ENDIO3 RB ENDIO2 EJECT DRMS02 * * I H M S * * INTERRUPT HANDLER * * IHMS EQU * ANK A2,/FF LD A3,DWTST,A6 GET STATUS WORD RF(NN) IHM100 BUSY LDR A3,A2 SAVE CHAR SUK A3,DOCINS DOCUMENT INSERTED RF(E) IHMS10 ADK A3,DOCINS SUK A3,DOCESC DOCUMENT ESCAPED RF(NE) EXIT IHMS10 EQU * SC A2,DWTST+1,A6 SET STATUS WORD EXIT ABL TDISP GO TO DISPATCHER * EJECT DRMS02 * * DEVICE BUSY * IHM100 EQU * LDR A1,A1 RETURN CODE FROM CHLT/CHRT RB(NE) ENDIO3 YES; INDICATE NOT OPERABLE LDR A4,A4 OUTPUT ANSWER ? RF(Z) IHRET YES SUK A7,INCARD INSERT CARD RF(E) IHRET YES ADK A7,INCARD SUK A7,ENOFOP END OF OPERATION ? RF(E) IHRET LDR A4,A2 SUK A4,DOCESC DOCUMENT ESCAPED ? RF(E) IHM140 YES IHRET ABL LDREG LOAD REG. AND RETURN CALLING SEQ VIA A5 * IHM140 LDK A4,DOCESC SC A4,DWTST+1,A6 UPDATE STATUS WORD LDK A1,CARMIS CARD MISSING ENDIO4 RB ENDIO3 EJECT DRMS02 * * * R C M S * * RECOVERY ROUTINE * * RCMS EQU * * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON A15 STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 XIF * LDK A2,DOCESC SC A2,DWTST+1,A6 RESET STATUS WORD LD A7,DWTST,A6 BUSY? RB(N) EXIT NO LDK A1,THRERR THROUGHPUT ERROR RB ENDIO4 EJECT DRMS02 * * STORE = SUBROUTINE TO STORE CHARACTER * IN ECB-BUFFER AND INCREMENT BUFFER INDEX. * STORE EQU * LD A7,ECBBA,A8 BUFFER ADDRESS ADR A7,A3 ADD BUFFER INDEX SCR A2,A7 STORE CHAR ADK A3,1 INCR. INDEX RTN A15 * EJECT * * CDCHK = CHECK IF CODE CHECK ERROR * * AT ENTRY: A2=CHARACTER * AT EXIT: A1=RERURN CODE 0,2 * CDCHK EQU * LDR A1,A2 SUK A1,/30 VALID CODE? RF(N) CDC20 NO SUK A1,10 DIGIT? RF(N) CDC30 YES, OK * * THE CHARACTER IS A CONTROL CHARACTER LD A1,DWTFRT,A6 CREDIT CARD? RF(NN) CDC10 YES * * GERMAN PASSBOOK CWK A2,/3E FIELD SEPARATOR? RF(E) CDC30 YES, OK RF CDC20 NO, ERROR * CDC10 EQU * * CREDIT CARD / AMERICAN PASSBOOK LDR A1,A2 CHARACTER SUK A1,/3A ACCOUNT SEPARATOR? RF(Z) CDC30 YES, OK SUK A1,3 FIELD SEPARATOR? RF(Z) CDC30 YES, OK * CDC20 EQU * * ILLEGAL CHARACTER LDK A1,THRERR RET CODE := THROUGHPUT ERR ORS A1,ECBRC,A8 INSERT IN ECB RF CDC40 EXIT * CDC30 EQU * * VALID CHARACTER LDK A1,0 RETURN CODE := OK CDC40 EQU * RTN A15 * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRMS02 REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0082 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x004c}
0x0082…008c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0086}
0x008c…00b4 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0090}
0x00b4…00be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x00be…00ea Head {h00=0x0028, h01=0x0050, text=»* DRMS02 = DRIVER MAGNETIC STRIPE «, t00=0x0000, t01=0x00c2}
0x00ea…00f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ee}
0x00f4…00fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f8}
0x00fe…0108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0102}
0x0108…0112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x0112…011c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x011c…0126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…0130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012a}
0x0130…016a Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0134}
0x016a…0174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016e}
0x0174…017e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0178}
0x017e…01b2 Head {h00=0x0030, h01=0x0050, text=»* THIS DRIVER HANDLES INPUT/OUTPUT ON THE «, t00=0x0000, t01=0x0182}
0x01b2…01fa Head {h00=0x0044, h01=0x0050, text=»* M A G N E T I C S T R I P E U N I T (M S U) PTS 6266. «, t00=0x0001, t01=0x0026}
0x01fa…023c Head {h00=0x003e, h01=0x0050, text=»* THE MSU MUST BE CONNECTED TO THE CPU VIA CHLT OR CHRT.«, t00=0x0001, t01=0x006e}
0x023c…0246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b0}
0x0246…028a Head {h00=0x0040, h01=0x0050, text=»* TRACK 2 AND 3 ON STRIPES CAN BE READ AND TRACK 3 CAN BE «, t00=0x0001, t01=0x00ba}
0x028a…029e Head {h00=0x0010, h01=0x0050, text=»* WRITTEN.«, t00=0x0001, t01=0x00fe}
0x029e…02a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0112}
0x02a8…02ec Head {h00=0x0040, h01=0x0050, text=»* PIN KEYBOARD IS NOT SUPPORTED BY THIS VERSION OF DRIVER «, t00=0x0001, t01=0x011c}
0x02ec…0330 Head {h00=0x0040, h01=0x0050, text=»* OFF-LINE TEST IS NOT SUPPORTED BY THIS VERSION OF DRIVER«, t00=0x0001, t01=0x0160}
0x0330…033a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0014}
0x033a…036e Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS: «, t00=0x0002, t01=0x001e}
0x036e…0378 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0052}
0x0378…03a0 Head {h00=0x0024, h01=0x0050, text=»* A C M S : ACTIVATION PART«, t00=0x0002, t01=0x005c}
0x03a0…03c8 Head {h00=0x0024, h01=0x0050, text=»* ORDER PROCESSOR«, t00=0x0002, t01=0x0084}
0x03c8…03f2 Head {h00=0x0026, h01=0x0050, text=»* I H M S : INTERRUPT HANDLER«, t00=0x0002, t01=0x00ac}
0x03f2…041c Head {h00=0x0026, h01=0x0050, text=»* O N M S : RECOVERY ROUTINE «, t00=0x0002, t01=0x00d6}
0x041c…0426 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0100}
0x0426…0430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010a}
0x0430…0448 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0002, t01=0x0114}
0x0448…0452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x012c}
0x0452…047e Head {h00=0x0028, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0002, t01=0x0136}
0x047e…0488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0162}
0x0488…049a Head {h00=0x000e, h01=0x0050, text=»* CREDIT«, t00=0x0002, t01=0x016c}
0x049a…04bc Head {h00=0x001e, h01=0x0050, text=»* /06 WRITE CARD WRITE«, t00=0x0002, t01=0x017e}
0x04bc…04e4 Head {h00=0x0024, h01=0x0050, text=»* /0A READ CARD RANDOM READ «, t00=0x0003, t01=0x0010}
0x04e4…04fe Head {h00=0x0016, h01=0x0050, text=»* /21 OPEN - «, t00=0x0003, t01=0x0038}
0x04fe…052c Head {h00=0x002a, h01=0x0050, text=»* /26 END OF OPERATION DSC0 CC=4 «, t00=0x0003, t01=0x0052}
0x052c…0554 Head {h00=0x0024, h01=0x0050, text=»* /37 INSERT CARD DSC0 CC=0«, t00=0x0003, t01=0x0080}
0x0554…055e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a8}
0x055e…0568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b2}
0x0568…0596 Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING RETURN CODE IS USED:«, t00=0x0003, t01=0x00bc}
0x0596…05a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ea}
0x05a0…05c2 Head {h00=0x001e, h01=0x0050, text=»* BIT 0 REQUEST ERROR«, t00=0x0003, t01=0x00f4}
0x05c2…05ea Head {h00=0x0024, h01=0x0050, text=»* 5 READ/WRITE WARNING «, t00=0x0003, t01=0x0116}
0x05ea…060c Head {h00=0x001e, h01=0x0050, text=»* 10 CARD MISSING «, t00=0x0003, t01=0x013e}
0x060c…0632 Head {h00=0x0022, h01=0x0050, text=»* 12 INCORRECT LENGTH «, t00=0x0003, t01=0x0160}
0x0632…0660 Head {h00=0x002a, h01=0x0050, text=»* 13 NEGATIVE ACKNOWLEDGEMENT «, t00=0x0003, t01=0x0186}
0x0660…0686 Head {h00=0x0022, h01=0x0050, text=»* 14 THROUGHPUT ERROR «, t00=0x0004, t01=0x0024}
0x0686…06a8 Head {h00=0x001e, h01=0x0050, text=»* 15 NOT OPERABLE «, t00=0x0004, t01=0x004a}
0x06a8…06b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x06b2…06bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0076}
0x06bc…06e0 Head {h00=0x0020, h01=0x0050, text=»* NORMAL USE OF REGISTERS:«, t00=0x0004, t01=0x0080}
0x06e0…06ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a4}
0x06ea…0710 Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 RETURN CODE«, t00=0x0004, t01=0x00ae}
0x0710…0742 Head {h00=0x002e, h01=0x0050, text=»* A2 INPUT/OUTPUT CHARACTER «, t00=0x0004, t01=0x00d4}
0x0742…076a Head {h00=0x0024, h01=0x0050, text=»* A3 BUFFER INDEX «, t00=0x0004, t01=0x0106}
0x076a…0792 Head {h00=0x0024, h01=0x0050, text=»* A4 RETRY COUNTER«, t00=0x0004, t01=0x012e}
0x0792…07c0 Head {h00=0x002a, h01=0x0050, text=»* A5 STACK BASE POINTER «, t00=0x0004, t01=0x0156}
0x07c0…07e6 Head {h00=0x0022, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0004, t01=0x0184}
0x07e6…0806 Head {h00=0x001c, h01=0x0050, text=»* A7 ORDER«, t00=0x0005, t01=0x001a}
0x0806…082c Head {h00=0x0022, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0005, t01=0x003a}
0x082c…0836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0060}
0x0836…084e Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0005, t01=0x006a}
0x084e…0858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0082}
0x0858…086c Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x008c}
0x086c…0880 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0005, t01=0x00a0}
0x0880…0894 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0005, t01=0x00b4}
0x0894…089e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c8}
0x089e…08c0 Head {h00=0x001e, h01=0x0050, text=» ENTRY MSAD ADDRESS BLOCK «, t00=0x0005, t01=0x00d2}
0x08c0…08ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f4}
0x08ca…08e0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0005, t01=0x00fe}
0x08e0…08f6 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0005, t01=0x0114}
0x08f6…090c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0005, t01=0x012a}
0x090c…0916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0140}
0x0916…0934 Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL ROUTINES«, t00=0x0005, t01=0x014a}
0x0934…096a Head {h00=0x0032, h01=0x0050, text=» EXTRN SAVE8 SAVE REGISTER A1-A8 ON A15 STACK «, t00=0x0005, t01=0x0168}
0x096a…09a4 Head {h00=0x0036, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND GO TO DISPATCHER «, t00=0x0006, t01=0x000e}
0x09a4…09e0 Head {h00=0x0038, h01=0x0050, text=» EXTRN LDREG LOAD REGISTER AND RETURN TO USER VIA A5«, t00=0x0006, t01=0x0048}
0x09e0…0a12 Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER«, t00=0x0006, t01=0x0084}
0x0a12…0a48 Head {h00=0x0032, h01=0x0050, text=» EXTRN DISIOE DISPATCH END I/O, REQUEST ERROR «, t00=0x0006, t01=0x00b6}
0x0a48…0a7e Head {h00=0x0032, h01=0x0050, text=» EXTRN GETCHR GET NEXT CHARACTER IN ECB-BUFFER«, t00=0x0006, t01=0x00ec}
0x0a7e…0aa8 Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND END I/O AND DISPATCH«, t00=0x0006, t01=0x0122}
0x0aa8…0ace Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0006, t01=0x014c}
0x0ace…0ad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0172}
0x0ad8…0af6 Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS«, t00=0x0006, t01=0x017c}
0x0af6…0b1e Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTST DWT SOFTWARE STATUS«, t00=0x0007, t01=0x000a}
0x0b1e…0b40 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0007, t01=0x0032}
0x0b40…0b5a Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0007, t01=0x0054}
0x0b5a…0b7a Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE«, t00=0x0007, t01=0x006e}
0x0b7a…0b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x008e}
0x0b84…0ba2 Head {h00=0x001a, h01=0x0050, text=»* ECB DISPLACEMENTS«, t00=0x0007, t01=0x0098}
0x0ba2…0bc6 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0007, t01=0x00b6}
0x0bc6…0bec Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0007, t01=0x00da}
0x0bec…0c12 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0007, t01=0x0100}
0x0c12…0c32 Head {h00=0x001c, h01=0x0050, text=» EXTRN ECBRC RETURN CODE«, t00=0x0007, t01=0x0126}
0x0c32…0c54 Head {h00=0x001e, h01=0x0050, text=» EXTRN ECBCW CONTROL WORD «, t00=0x0007, t01=0x0146}
0x0c54…0c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0168}
0x0c5e…0c76 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0007, t01=0x0172}
0x0c76…0c80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x018a}
0x0c80…0ca0 (8, 0, 400) Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0004}
0x0ca0…0cc0 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0008, t01=0x0024}
0x0cc0…0ce0 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0044}
0x0ce0…0cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0064}
0x0cea…0cf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006e}
0x0cf4…0d26 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0008, t01=0x0078}
0x0d26…0d54 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0008, t01=0x00aa}
0x0d54…0d5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d8}
0x0d5e…0d72 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0008, t01=0x00e2}
0x0d72…0d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f6}
0x0d7c…0d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0100}
0x0d86…0dc0 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0008, t01=0x010a}
0x0dc0…0df2 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0008, t01=0x0144}
0x0df2…0dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0176}
0x0dfc…0e10 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x0180}
0x0e10…0e1a (9, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0004}
0x0e1a…0e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000e}
0x0e24…0e48 Head {h00=0x0020, h01=0x0050, text=»* MMU BUFFER SIZE (BYTES) «, t00=0x0009, t01=0x0018}
0x0e48…0e52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003c}
0x0e52…0e66 Head {h00=0x0010, h01=0x0050, text=»X:A EQU 108 «, t00=0x0009, t01=0x0046}
0x0e66…0e7c Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:A«, t00=0x0009, t01=0x005a}
0x0e7c…0e86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0070}
0x0e86…0e9e Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0009, t01=0x007a}
0x0e9e…0ea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0092}
0x0ea8…0ebe Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x009c}
0x0ebe…0ed4 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x00b2}
0x0ed4…0eea Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x00c8}
0x0eea…0ef4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00de}
0x0ef4…0f1c Head {h00=0x0024, h01=0x0050, text=»* MAGNETIC STRIPE CHARACTERS «, t00=0x0009, t01=0x00e8}
0x0f1c…0f48 Head {h00=0x0028, h01=0x0050, text=»CRWSTX EQU /3B CARD START CHARACTER «, t00=0x0009, t01=0x0110}
0x0f48…0f7c Head {h00=0x0030, h01=0x0050, text=»CRDSTX EQU /3D START CHAR, GERMAN BOOK (DIN)«, t00=0x0009, t01=0x013c}
0x0f7c…0fa0 Head {h00=0x0020, h01=0x0050, text=»CRWETX EQU /3F END CHARACTER«, t00=0x0009, t01=0x0170}
0x0fa0…0faa (10, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0004}
0x0faa…0fd0 Head {h00=0x0022, h01=0x0050, text=»* STATUS MESSAGES FROM MSU «, t00=0x000a, t01=0x000e}
0x0fd0…0ff8 Head {h00=0x0024, h01=0x0050, text=»DOCINS EQU /C DOCUMENT INSERTED «, t00=0x000a, t01=0x0034}
0x0ff8…101e Head {h00=0x0022, h01=0x0050, text=»DOCESC EQU /E DOCUMENT ESCAPED«, t00=0x000a, t01=0x005c}
0x101e…1040 Head {h00=0x001e, h01=0x0050, text=»WRWARN EQU 8 WRITE WARNING«, t00=0x000a, t01=0x0082}
0x1040…105e Head {h00=0x001a, h01=0x0050, text=»RDERR EQU 9 READ ERROR«, t00=0x000a, t01=0x00a4}
0x105e…107e Head {h00=0x001c, h01=0x0050, text=»WRERR EQU /A WRITE ERROR«, t00=0x000a, t01=0x00c2}
0x107e…109c Head {h00=0x001a, h01=0x0050, text=»WROK EQU /B WRITE OKAY«, t00=0x000a, t01=0x00e2}
0x109c…10a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0100}
0x10a6…10c2 Head {h00=0x0018, h01=0x0050, text=»* COMMANDS TO MSU«, t00=0x000a, t01=0x010a}
0x10c2…10e4 Head {h00=0x001e, h01=0x0050, text=»RESET EQU 2 GENERAL RESET «, t00=0x000a, t01=0x0126}
0x10e4…1110 Head {h00=0x0028, h01=0x0050, text=»SELTRA EQU 6 SELECT TRACK 2 FOR READ«, t00=0x000a, t01=0x0148}
0x1110…1134 Head {h00=0x0020, h01=0x0050, text=»ENCTRA EQU 5 ENCODE TRACK 3 «, t00=0x000a, t01=0x0174}
0x1134…1168 Head {h00=0x0030, h01=0x0050, text=»REATRD EQU 8 READ TRACK 3 GERMAN BOOK (DIN) «, t00=0x000b, t01=0x0008}
0x1168…119e Head {h00=0x0032, h01=0x0050, text=»ENCTRD EQU 9 ENCODE TRACK 3 GERMAN BOOK (DIN) «, t00=0x000b, t01=0x003c}
0x119e…11a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0072}
0x11a8…11c6 Head {h00=0x001a, h01=0x0050, text=»* ORDERS TO DRIVER «, t00=0x000b, t01=0x007c}
0x11c6…11e8 Head {h00=0x001e, h01=0x0050, text=»INCARD EQU /37 INSERT CARD«, t00=0x000b, t01=0x009a}
0x11e8…1210 Head {h00=0x0024, h01=0x0050, text=»ENOFOP EQU /26 END OF OPERATION «, t00=0x000b, t01=0x00bc}
0x1210…121a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e4}
0x121a…1234 Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x000b, t01=0x00ee}
0x1234…125a Head {h00=0x0022, h01=0x0050, text=»RTRIES EQU 2 NUMBER OF RETRIES«, t00=0x000b, t01=0x0108}
0x125a…1264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x012e}
0x1264…127c Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x000b, t01=0x0138}
0x127c…1286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0150}
0x1286…12a0 Head {h00=0x0016, h01=0x0050, text=»* RETURN CODES «, t00=0x000b, t01=0x015a}
0x12a0…12c6 Head {h00=0x0022, h01=0x0050, text=»REQERR EQU /8000 REQUEST ERROR«, t00=0x000b, t01=0x0174}
0x12c6…12f0 Head {h00=0x0026, h01=0x0050, text=»WARNRW EQU /400 READ/WRITE WARNING«, t00=0x000c, t01=0x000a}
0x12f0…1314 Head {h00=0x0020, h01=0x0050, text=»CARMIS EQU /20 CARD MISSING «, t00=0x000c, t01=0x0034}
0x1314…133a Head {h00=0x0022, h01=0x0050, text=»INCLEN EQU 8 INCORRECT LENGTH «, t00=0x000c, t01=0x0058}
0x133a…1368 Head {h00=0x002a, h01=0x0050, text=»NEGACK EQU 4 NEGATIVE ACKNOWLEDGEMENT «, t00=0x000c, t01=0x007e}
0x1368…138e Head {h00=0x0022, h01=0x0050, text=»THRERR EQU 2 THROUGHPUT ERROR «, t00=0x000c, t01=0x00ac}
0x138e…13b0 Head {h00=0x001e, h01=0x0050, text=»NOTOPE EQU 1 NOT OPERABLE «, t00=0x000c, t01=0x00d2}
0x13b0…13ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f4}
0x13ba…13d2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x000c, t01=0x00fe}
0x13d2…13dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0116}
0x13dc…13f8 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x0120}
0x13f8…1414 Head {h00=0x0018, h01=0x0050, text=»* DWT-DISPLACEMENT *«, t00=0x000c, t01=0x013c}
0x1414…1430 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x0158}
0x1430…143a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0174}
0x143a…146e Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000c, t01=0x017e}
0x146e…1478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0022}
0x1478…148e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000d, t01=0x002c}
0x148e…14a6 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000d, t01=0x0042}
0x14a6…14b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x005a}
0x14b2…14bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0066}
0x14bc…14d2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000d, t01=0x0070}
0x14d2…14ec Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000d, t01=0x0086}
0x14ec…14f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00a0}
0x14f8…1502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ac}
0x1502…150c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b6}
0x150c…1550 Head {h00=0x0040, h01=0x0050, text=»DWTFRT EQU START+/14 BIT 0 CREDIT CARD / GERMAN BOOK FLAG «, t00=0x000d, t01=0x00c0}
0x1550…156c Head {h00=0x0018, h01=0x0050, text=»* BIT 1-7 NOT USED«, t00=0x000d, t01=0x0104}
0x156c…1598 Head {h00=0x0028, h01=0x0050, text=»* BIT 8-15 RETRY COUNTER SAVE AREA«, t00=0x000d, t01=0x0120}
0x1598…15c4 Head {h00=0x0028, h01=0x0050, text=»DWTLRC EQU START+/16 LRC ACCUMULATOR«, t00=0x000d, t01=0x014c}
0x15c4…15ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0178}
0x15ce…15e6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x000d, t01=0x0182}
0x15e6…15f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x000a}
0x15f0…1602 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0014}
0x1602…1614 Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x000e, t01=0x0026}
0x1614…1626 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0038}
0x1626…1630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x004a}
0x1630…1654 Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x000e, t01=0x0054}
0x1654…1674 Head {h00=0x001c, h01=0x0050, text=» DATA 2 MMU DEVICE INDEX«, t00=0x000e, t01=0x0078}
0x1674…1686 Head {h00=0x000e, h01=0x0050, text=»MSAD EQU *«, t00=0x000e, t01=0x0098}
0x1686…16aa Head {h00=0x0020, h01=0x0050, text=» DATA ACMS ACTIVATION DRIVER«, t00=0x000e, t01=0x00aa}
0x16aa…16d0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000e, t01=0x00ce}
0x16d0…16f4 Head {h00=0x0020, h01=0x0050, text=» DATA IHMS INTERRUPT HANDLER«, t00=0x000e, t01=0x00f4}
0x16f4…1718 Head {h00=0x0020, h01=0x0050, text=» DATA RCMS RECOVERY ROUTINE «, t00=0x000e, t01=0x0118}
0x1718…1722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x013c}
0x1722…172c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0146}
0x172c…1736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0150}
0x1736…1754 Head {h00=0x001a, h01=0x0050, text=»TAB EQU * ORDER TABLE «, t00=0x000e, t01=0x015a}
0x1754…1774 Head {h00=0x001c, h01=0x0050, text=» DATA /060A,/3726,/2100 «, t00=0x000e, t01=0x0178}
0x1774…179e Head {h00=0x0026, h01=0x0050, text=»TABL EQU *-TAB-1 NUMBER OF ENTRIES«, t00=0x000f, t01=0x0008}
0x179e…17a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0032}
0x17a8…17d4 Head {h00=0x0028, h01=0x0050, text=»MSFUN EQU * MAGNETIC STRIPE FUNCTION«, t00=0x000f, t01=0x003c}
0x17d4…17f4 Head {h00=0x001c, h01=0x0050, text=» DATA WRITE,READ,INSERT «, t00=0x000f, t01=0x0068}
0x17f4…180c Head {h00=0x0014, h01=0x0050, text=» DATA ENDOP,OPEN«, t00=0x000f, t01=0x0088}
0x180c…1824 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x000f, t01=0x00a0}
0x1824…182e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b8}
0x182e…1838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c2}
0x1838…184c Head {h00=0x0010, h01=0x0050, text=»* A C M S «, t00=0x000f, t01=0x00cc}
0x184c…1856 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e0}
0x1856…188c Head {h00=0x0032, h01=0x0050, text=»* ACTIVATION PART: CHECKS VALIDITY OF ORDERS«, t00=0x000f, t01=0x00ea}
0x188c…18c0 Head {h00=0x0030, h01=0x0050, text=»* AND STARTS PROCESSING. «, t00=0x000f, t01=0x0120}
0x18c0…18ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0154}
0x18ca…18d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x015e}
0x18d4…18e6 Head {h00=0x000e, h01=0x0050, text=»ACMS EQU *«, t00=0x000f, t01=0x0168}
0x18e6…18fc Head {h00=0x0012, h01=0x0050, text=» LDK A4,TABL-1«, t00=0x000f, t01=0x017a}
0x18fc…1930 Head {h00=0x0030, h01=0x0050, text=»ACMS10 CC A7,TAB,A4 FIND OUT IF LEGAL ORDER «, t00=0x000f, t01=0x0190}
0x1930…1952 Head {h00=0x001e, h01=0x0050, text=» RF(E) ACMS20 VALID ORDER «, t00=0x0010, t01=0x0034}
0x1952…1964 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0010, t01=0x0056}
0x1964…1984 Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACMS10 TRY NEXT «, t00=0x0010, t01=0x0068}
0x1984…198e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0088}
0x198e…1998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0092}
0x1998…19d0 Head {h00=0x0034, h01=0x0050, text=»MSERR ABL DISIOE DISPATCH END I/O,REQUEST ERROR «, t00=0x0010, t01=0x009c}
0x19d0…19da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d4}
0x19da…19ee Head {h00=0x0010, h01=0x0050, text=»ACMS20 EQU *«, t00=0x0010, t01=0x00de}
0x19ee…1a0a Head {h00=0x0018, h01=0x0050, text=» ADR A4,A4 GET INDEX«, t00=0x0010, t01=0x00f2}
0x1a0a…1a40 Head {h00=0x0032, h01=0x0050, text=» ABI MSFUN,A4 BRANCH TO VALID FUNCTION MODULE «, t00=0x0010, t01=0x010e}
0x1a40…1a4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0144}
0x1a4a…1a62 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0010, t01=0x014e}
0x1a62…1a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0166}
0x1a6c…1aa6 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0010, t01=0x0170}
0x1aa6…1ab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x001a}
0x1ab0…1ac4 Head {h00=0x0010, h01=0x0050, text=»* OPEN /21«, t00=0x0011, t01=0x0024}
0x1ac4…1ace Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0038}
0x1ace…1b04 Head {h00=0x0032, h01=0x0050, text=»* THE DRIVER IS SET TO HANDLE EITHER CREDIT «, t00=0x0011, t01=0x0042}
0x1b04…1b3e Head {h00=0x0036, h01=0x0050, text=»* CARDS/AMERICAN PASSBOOKS OR GERMAN PASSBOOKS. «, t00=0x0011, t01=0x0078}
0x1b3e…1b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b2}
0x1b48…1b62 Head {h00=0x0016, h01=0x0050, text=»* REGISTER INPUT: «, t00=0x0011, t01=0x00bc}
0x1b62…1b80 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0011, t01=0x00d6}
0x1b80…1b9e Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB ADDRESS «, t00=0x0011, t01=0x00f4}
0x1b9e…1ba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0112}
0x1ba8…1be2 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0011, t01=0x011c}
0x1be2…1bec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0156}
0x1bec…1bfe Head {h00=0x000e, h01=0x0050, text=»OPEN EQU *«, t00=0x0011, t01=0x0160}
0x1bfe…1c22 Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBCW,A8 FORMAT CODE «, t00=0x0011, t01=0x0172}
0x1c22…1c58 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) OPEN10 NOT CREDIT CARD / AMERICAN BOOK«, t00=0x0012, t01=0x0008}
0x1c58…1c7e Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/7FFF MASK FOR BIT 0 «, t00=0x0012, t01=0x003e}
0x1c7e…1cb6 Head {h00=0x0034, h01=0x0050, text=» ANS A2,DWTFRT,A6 CLEAR FORMAT FLAG, INDICATING «, t00=0x0012, t01=0x0064}
0x1cb6…1cde Head {h00=0x0024, h01=0x0050, text=»* CREDIT CARD / AMERICAN BOOK «, t00=0x0012, t01=0x009c}
0x1cde…1cf6 Head {h00=0x0014, h01=0x0050, text=» RF OPEN20 EXIT «, t00=0x0012, t01=0x00c4}
0x1cf6…1d00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00dc}
0x1d00…1d14 Head {h00=0x0010, h01=0x0050, text=»OPEN10 EQU *«, t00=0x0012, t01=0x00e6}
0x1d14…1d42 Head {h00=0x002a, h01=0x0050, text=» SUK A2,1 FORMAT CODE GERMAN PASSBOOK?«, t00=0x0012, t01=0x00fa}
0x1d42…1d68 Head {h00=0x0022, h01=0x0050, text=» RB(NZ) MSERR NO, ILLEGAL CODE«, t00=0x0012, t01=0x0128}
0x1d68…1d8e Head {h00=0x0022, h01=0x0050, text=» LDKL A2,/8000 MASK FOR BIT 0 «, t00=0x0012, t01=0x014e}
0x1d8e…1db8 Head {h00=0x0026, h01=0x0050, text=» ORS A2,DWTFRT,A6 SET FORMAT FLAG,«, t00=0x0012, t01=0x0174}
0x1db8…1dda Head {h00=0x001e, h01=0x0050, text=»* INDICATING GERMAN BOOK«, t00=0x0013, t01=0x000e}
0x1dda…1de4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0030}
0x1de4…1df8 Head {h00=0x0010, h01=0x0050, text=»OPEN20 EQU *«, t00=0x0013, t01=0x003a}
0x1df8…1e16 Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x0013, t01=0x004e}
0x1e16…1e2c Head {h00=0x0012, h01=0x0050, text=» RF ENDIO EXIT«, t00=0x0013, t01=0x006c}
0x1e2c…1e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0082}
0x1e36…1e4e Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0013, t01=0x008c}
0x1e4e…1e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a4}
0x1e58…1e92 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0013, t01=0x00ae}
0x1e92…1e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e8}
0x1e9c…1eba Head {h00=0x001a, h01=0x0050, text=»* INSERT CARD /11 «, t00=0x0013, t01=0x00f2}
0x1eba…1ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0110}
0x1ec4…1efe Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0013, t01=0x011a}
0x1efe…1f08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0154}
0x1f08…1f1c Head {h00=0x0010, h01=0x0050, text=»INSERT EQU *«, t00=0x0013, t01=0x015e}
0x1f1c…1f46 Head {h00=0x0026, h01=0x0050, text=» LDK A4,DOCINS CHAR. DOC. INSERTED«, t00=0x0013, t01=0x0172}
0x1f46…1f6a Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTST+1,A6 GET STATUS«, t00=0x0014, t01=0x000c}
0x1f6a…1f7e Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0014, t01=0x0030}
0x1f7e…1f94 Head {h00=0x0012, h01=0x0050, text=» RF(NE) INSE10«, t00=0x0014, t01=0x0044}
0x1f94…1fa8 Head {h00=0x0010, h01=0x0050, text=»INSE05 EQU *«, t00=0x0014, t01=0x005a}
0x1fa8…1fcc Head {h00=0x0020, h01=0x0050, text=» LDK A2,RESET GENERAL RESET «, t00=0x0014, t01=0x006e}
0x1fcc…1fea Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND IT «, t00=0x0014, t01=0x0092}
0x1fea…2018 Head {h00=0x002a, h01=0x0050, text=» CF A5,STREG WAIT FOR MESSAGE FROM MSU«, t00=0x0014, t01=0x00b0}
0x2018…2048 Head {h00=0x002c, h01=0x0050, text=»INSE10 CWK A2,DOCESC DOCUMENT ESCAPED ? «, t00=0x0014, t01=0x00de}
0x2048…2062 Head {h00=0x0016, h01=0x0050, text=» RB(E) INSE05 YES «, t00=0x0014, t01=0x010e}
0x2062…2088 Head {h00=0x0022, h01=0x0050, text=» CWR A2,A4 DOCUMENT INSERTED ?«, t00=0x0014, t01=0x0128}
0x2088…20a2 Head {h00=0x0016, h01=0x0050, text=» RF(NE) INSE15 NO «, t00=0x0014, t01=0x014e}
0x20a2…20c0 Head {h00=0x001a, h01=0x0050, text=» SC A4,DWTST+1,A6 YES «, t00=0x0014, t01=0x0168}
0x20c0…20d2 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0014, t01=0x0186}
0x20d2…20e4 Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0015, t01=0x0008}
0x20e4…2112 Head {h00=0x002a, h01=0x0050, text=»INSE15 LDK A1,THRERR THROUGHPUT ERROR «, t00=0x0015, t01=0x001a}
0x2112…212a Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0015, t01=0x0048}
0x212a…2134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0060}
0x2134…215c Head {h00=0x0024, h01=0x0050, text=»* END OF INPUT/OUTPUT REQUEST «, t00=0x0015, t01=0x006a}
0x215c…2166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0092}
0x2166…217a Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0015, t01=0x009c}
0x217a…218e Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0015, t01=0x00b0}
0x218e…21a6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0015, t01=0x00c4}
0x21a6…21b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00dc}
0x21b0…21ea Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0015, t01=0x00e6}
0x21ea…21f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0120}
0x21f4…2210 Head {h00=0x0018, h01=0x0050, text=»* READ CARD /0A «, t00=0x0015, t01=0x012a}
0x2210…221a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0146}
0x221a…2254 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0015, t01=0x0150}
0x2254…225e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x018a}
0x225e…2270 (22, 0, 400) Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0016, t01=0x0004}
0x2270…2294 Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTST+1,A6 GET STATUS«, t00=0x0016, t01=0x0016}
0x2294…22a8 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0016, t01=0x003a}
0x22a8…22d2 Head {h00=0x0026, h01=0x0050, text=» SUK A2,DOCINS DOCUMENT INSERTED? «, t00=0x0016, t01=0x004e}
0x22d2…22ec Head {h00=0x0016, h01=0x0050, text=» RF(NE) WRIT02 NO «, t00=0x0016, t01=0x0078}
0x22ec…22f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0092}
0x22f6…2300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009c}
0x2300…2328 Head {h00=0x0024, h01=0x0050, text=» LDK A4,RTRIES NUMBER OF RETRIES«, t00=0x0016, t01=0x00a6}
0x2328…233c Head {h00=0x0010, h01=0x0050, text=»READ10 EQU *«, t00=0x0016, t01=0x00ce}
0x233c…2360 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RESET BUFFER INDEX«, t00=0x0016, t01=0x00e2}
0x2360…2384 Head {h00=0x0020, h01=0x0050, text=» LD A2,DWTFRT,A6 FORMAT CODE«, t00=0x0016, t01=0x0106}
0x2384…23a6 Head {h00=0x001e, h01=0x0050, text=» RF(N) READ20 GERMAN BOOK «, t00=0x0016, t01=0x012a}
0x23a6…23b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x014c}
0x23b0…23c8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0016, t01=0x0156}
0x23c8…23d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x016e}
0x23d2…2404 Head {h00=0x002e, h01=0x0050, text=»* READ CREDIT CARD / AMERICAN PASSBOOK «, t00=0x0016, t01=0x0178}
0x2404…242c Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBCW,A8 GET TRACK NUMBER«, t00=0x0017, t01=0x001a}
0x242c…243e Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0017, t01=0x0042}
0x243e…245c Head {h00=0x001a, h01=0x0050, text=» RB(N) MSERR TRACK < 2«, t00=0x0017, t01=0x0054}
0x245c…246e Head {h00=0x000e, h01=0x0050, text=» CWK A2,1 «, t00=0x0017, t01=0x0072}
0x246e…248c Head {h00=0x001a, h01=0x0050, text=» RB(G) MSERR TRACK > 3«, t00=0x0017, t01=0x0084}
0x248c…24ba Head {h00=0x002a, h01=0x0050, text=» ADK A2,SELTRA COMPUTE TRACK TO SELECT«, t00=0x0017, t01=0x00a2}
0x24ba…24c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d0}
0x24c4…24fe Head {h00=0x0036, h01=0x0050, text=» CF A5,OUTPUT SEND READ TRACK COMMAND (/06 OR /07)«, t00=0x0017, t01=0x00da}
0x24fe…2508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0114}
0x2508…2532 Head {h00=0x0026, h01=0x0050, text=» CF A5,REABLK READ ONE DATA BLOCK «, t00=0x0017, t01=0x011e}
0x2532…2560 Head {h00=0x002a, h01=0x0050, text=» CWK A1,NEGACK RETURN CODE READ ERROR?«, t00=0x0017, t01=0x0148}
0x2560…2596 Head {h00=0x0032, h01=0x0050, text=» RB(NE) ENDIO NO, OK OR INCORRECT LENGTH. EXIT«, t00=0x0017, t01=0x0176}
0x2596…25a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x001c}
0x25a0…25c0 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 MORE RETRIES? «, t00=0x0018, t01=0x0026}
0x25c0…25ea Head {h00=0x0026, h01=0x0050, text=» RB(NN) READ10 YES, PERFORM RETRY «, t00=0x0018, t01=0x0046}
0x25ea…2604 Head {h00=0x0016, h01=0x0050, text=» RB ENDIO NO, EXIT«, t00=0x0018, t01=0x0070}
0x2604…260e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x008a}
0x260e…2626 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0018, t01=0x0094}
0x2626…2630 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ac}
0x2630…2644 Head {h00=0x0010, h01=0x0050, text=»READ20 EQU *«, t00=0x0018, t01=0x00b6}
0x2644…2666 Head {h00=0x001e, h01=0x0050, text=»* READ GERMAN PASSBOOK «, t00=0x0018, t01=0x00ca}
0x2666…267c Head {h00=0x0012, h01=0x0050, text=» LDK A2,REATRD«, t00=0x0018, t01=0x00ec}
0x267c…26b2 Head {h00=0x0032, h01=0x0050, text=» CF A5,OUTPUT SEND "READ GERMAN BOOK" COMMAND «, t00=0x0018, t01=0x0102}
0x26b2…26bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0138}
0x26bc…26e2 Head {h00=0x0022, h01=0x0050, text=» CF A5,REABLK READ FIRST BLOCK«, t00=0x0018, t01=0x0142}
0x26e2…270a Head {h00=0x0024, h01=0x0050, text=» CWK A1,INCLEN BUFFER OVERFLOW? «, t00=0x0018, t01=0x0168}
0x270a…2728 Head {h00=0x001a, h01=0x0050, text=» RB(E) ENDIO YES, EXIT«, t00=0x0018, t01=0x0190}
0x2728…2732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x001e}
0x2732…2760 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTFRT+1,A6 SAVE RETRY COUNTER «, t00=0x0019, t01=0x0028}
0x2760…2784 Head {h00=0x0020, h01=0x0050, text=» LDR A4,A1 SAVE RETURN CODE «, t00=0x0019, t01=0x0056}
0x2784…27ac Head {h00=0x0024, h01=0x0050, text=» CF A5,REABLK READ SECOND BLOCK «, t00=0x0019, t01=0x007a}
0x27ac…27d4 Head {h00=0x0024, h01=0x0050, text=» CWK A1,INCLEN BUFFER OVERFLOW? «, t00=0x0019, t01=0x00a2}
0x27d4…27f2 Head {h00=0x001a, h01=0x0050, text=» RB(E) ENDIO YES, EXIT«, t00=0x0019, t01=0x00ca}
0x27f2…27fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e8}
0x27fc…280e Head {h00=0x000e, h01=0x0050, text=» CWR A1,A4«, t00=0x0019, t01=0x00f2}
0x280e…2840 Head {h00=0x002e, h01=0x0050, text=» RF(E) READ30 BOTH BLOCKS OK OR BOTH WRONG«, t00=0x0019, t01=0x0104}
0x2840…284a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0136}
0x284a…287a Head {h00=0x002c, h01=0x0050, text=»* ONE BLOCK WAS OK, ONE WAS ERRONEOUS«, t00=0x0019, t01=0x0140}
0x287a…28b2 Head {h00=0x0034, h01=0x0050, text=» LDKL A1,WARNRW RETURN CODE "READ/WRITE WARNING"«, t00=0x0019, t01=0x0170}
0x28b2…28e0 Head {h00=0x002a, h01=0x0050, text=» RF READ40 CHECK IF MORE RETRIES LEFT «, t00=0x001a, t01=0x0018}
0x28e0…28ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0046}
0x28ea…28fe Head {h00=0x0010, h01=0x0050, text=»READ30 EQU *«, t00=0x001a, t01=0x0050}
0x28fe…2936 Head {h00=0x0034, h01=0x0050, text=»* BOTH BLOCKS WERE OK OR BOTH WERE ERRONEOUS «, t00=0x001a, t01=0x0064}
0x2936…2952 Head {h00=0x0018, h01=0x0050, text=» LDR A1,A1 BOTH OK? «, t00=0x001a, t01=0x009c}
0x2952…2970 Head {h00=0x001a, h01=0x0050, text=» RB(Z) ENDIO YES, EXIT«, t00=0x001a, t01=0x00b8}
0x2970…297a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d6}
0x297a…298e Head {h00=0x0010, h01=0x0050, text=»READ40 EQU *«, t00=0x001a, t01=0x00e0}
0x298e…29c0 Head {h00=0x002e, h01=0x0050, text=»* CHECK IF MORE RETRIES SHOULD BE MADE «, t00=0x001a, t01=0x00f4}
0x29c0…29ec Head {h00=0x0028, h01=0x0050, text=» LC A4,DWTFRT+1,A6 GET RETRY COUNTER«, t00=0x001a, t01=0x0126}
0x29ec…2a06 Head {h00=0x0016, h01=0x0050, text=» ANK A4,/FF CLEAN «, t00=0x001a, t01=0x0152}
0x2a06…2a26 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 MORE RETRIES? «, t00=0x001a, t01=0x016c}
0x2a26…2a50 Head {h00=0x0026, h01=0x0050, text=» RB(NN) READ10 YES, PERFORM RETRY «, t00=0x001a, t01=0x018c}
0x2a50…2a6a Head {h00=0x0016, h01=0x0050, text=» RB ENDIO NO, EXIT«, t00=0x001b, t01=0x0026}
0x2a6a…2a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0040}
0x2a74…2a8c Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x001b, t01=0x004a}
0x2a8c…2a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0062}
0x2a96…2ad0 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x001b, t01=0x006c}
0x2ad0…2ada Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a6}
0x2ada…2af4 Head {h00=0x0016, h01=0x0050, text=»* READ DATA BLOCK «, t00=0x001b, t01=0x00b0}
0x2af4…2afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ca}
0x2afe…2b36 Head {h00=0x0034, h01=0x0050, text=»* ONE DATA BLOCK IS READ FROM THE MSU. READING«, t00=0x001b, t01=0x00d4}
0x2b36…2b6a Head {h00=0x0030, h01=0x0050, text=»* IS TERMINATED WHEN READ ERROR MESSAGE IS«, t00=0x001b, t01=0x010c}
0x2b6a…2b9e Head {h00=0x0030, h01=0x0050, text=»* RECIEVED, END CHARACTER IS READ OR INPUT«, t00=0x001b, t01=0x0140}
0x2b9e…2bba Head {h00=0x0018, h01=0x0050, text=»* BUFFER IS FULL. «, t00=0x001b, t01=0x0174}
0x2bba…2bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0190}
0x2bc4…2bde Head {h00=0x0016, h01=0x0050, text=»* REGISTER INPUT: «, t00=0x001c, t01=0x000a}
0x2bde…2bfa Head {h00=0x0018, h01=0x0050, text=»* A3 = BYTE INDEX«, t00=0x001c, t01=0x0024}
0x2bfa…2c20 Head {h00=0x0022, h01=0x0050, text=»* A5 = LOCAL STACK POINTER «, t00=0x001c, t01=0x0040}
0x2c20…2c3e Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x001c, t01=0x0066}
0x2c3e…2c5c Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB ADDRESS «, t00=0x001c, t01=0x0084}
0x2c5c…2c82 Head {h00=0x0022, h01=0x0050, text=»* A15 = SYSTEM STACK POINTER«, t00=0x001c, t01=0x00a2}
0x2c82…2c8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c8}
0x2c8c…2ca6 Head {h00=0x0016, h01=0x0050, text=»* REGISTER OUTPUT:«, t00=0x001c, t01=0x00d2}
0x2ca6…2cc4 Head {h00=0x001a, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x001c, t01=0x00ec}
0x2cc4…2ce8 Head {h00=0x0020, h01=0x0050, text=»* A3 = UPDATED BYTE INDEX«, t00=0x001c, t01=0x010a}
0x2ce8…2cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012e}
0x2cf2…2d2c Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x001c, t01=0x0138}
0x2d2c…2d36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0172}
0x2d36…2d4a Head {h00=0x0010, h01=0x0050, text=»REABLK EQU *«, t00=0x001c, t01=0x017c}
0x2d4a…2d6a Head {h00=0x001c, h01=0x0050, text=» CF A5,STREG FETCH DATA «, t00=0x001c, t01=0x0190}
0x2d6a…2d8c Head {h00=0x001e, h01=0x0050, text=» CWK A2,RDERR READ ERROR? «, t00=0x001d, t01=0x0020}
0x2d8c…2daa Head {h00=0x001a, h01=0x0050, text=» RF(E) RB100 YES, EXIT«, t00=0x001d, t01=0x0042}
0x2daa…2db4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0060}
0x2db4…2dda Head {h00=0x0022, h01=0x0050, text=» CWK A2,CRWETX END CHARACTER? «, t00=0x001d, t01=0x006a}
0x2dda…2df8 Head {h00=0x001a, h01=0x0050, text=» RF(E) RB110 YES, EXIT«, t00=0x001d, t01=0x0090}
0x2df8…2e24 Head {h00=0x0028, h01=0x0050, text=» CW A3,ECBRL,A8 BUFFER ALREADY FULL?«, t00=0x001d, t01=0x00ae}
0x2e24…2e44 Head {h00=0x001c, h01=0x0050, text=» RF(NL) RB120 YES, EXIT «, t00=0x001d, t01=0x00da}
0x2e44…2e4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00fa}
0x2e4e…2e66 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x001d, t01=0x0104}
0x2e66…2e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x011c}
0x2e70…2e9a Head {h00=0x0026, h01=0x0050, text=» CF A15,CDCHK CHECK IF LEGAL CHAR «, t00=0x001d, t01=0x0126}
0x2e9a…2ec2 Head {h00=0x0024, h01=0x0050, text=» CF A15,STORE PUT CHAR IN BUFFER«, t00=0x001d, t01=0x0150}
0x2ec2…2ee4 Head {h00=0x001e, h01=0x0050, text=» RB REABLK READ NEXT CHAR «, t00=0x001d, t01=0x0178}
0x2ee4…2eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x000a}
0x2eee…2ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0014}
0x2ef8…2f3a Head {h00=0x003e, h01=0x0050, text=»* BLOCK TREATED. SET RETURN CODE AND EFFECTIVE LENGTH. «, t00=0x001e, t01=0x001e}
0x2f3a…2f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0060}
0x2f44…2f58 Head {h00=0x0010, h01=0x0050, text=»RB100 EQU * «, t00=0x001e, t01=0x006a}
0x2f58…2f7a Head {h00=0x001e, h01=0x0050, text=» LDK A1,NEGACK READ ERROR «, t00=0x001e, t01=0x007e}
0x2f7a…2fa2 Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBEL,A8 RESET BYTE INDEX«, t00=0x001e, t01=0x00a0}
0x2fa2…2fb8 Head {h00=0x0012, h01=0x0050, text=» RF RB140 EXIT«, t00=0x001e, t01=0x00c8}
0x2fb8…2fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00de}
0x2fc2…2fd6 Head {h00=0x0010, h01=0x0050, text=»RB110 EQU * «, t00=0x001e, t01=0x00e8}
0x2fd6…2ff6 Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 NORMAL ENDING «, t00=0x001e, t01=0x00fc}
0x2ff6…300c Head {h00=0x0012, h01=0x0050, text=» RF RB130 EXIT«, t00=0x001e, t01=0x011c}
0x300c…3016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0132}
0x3016…302a Head {h00=0x0010, h01=0x0050, text=»RB120 EQU * «, t00=0x001e, t01=0x013c}
0x302a…3050 Head {h00=0x0022, h01=0x0050, text=» LDK A1,INCLEN BUFFER OVERFLOW«, t00=0x001e, t01=0x0150}
0x3050…305a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0176}
0x305a…306e Head {h00=0x0010, h01=0x0050, text=»RB130 EQU * «, t00=0x001e, t01=0x0180}
0x306e…309e (31, 0, 400) Head {h00=0x002c, h01=0x0050, text=» ST A3,ECBEL,A8 EFFECTIVE LENGTH TO ECB «, t00=0x001f, t01=0x0004}
0x309e…30a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0034}
0x30a8…30bc Head {h00=0x0010, h01=0x0050, text=»RB140 EQU * «, t00=0x001f, t01=0x003e}
0x30bc…30cc Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x001f, t01=0x0052}
0x30cc…30d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0062}
0x30d6…30ee Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x001f, t01=0x006c}
0x30ee…30f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0084}
0x30f8…3132 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x001f, t01=0x008e}
0x3132…313c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00c8}
0x313c…3158 Head {h00=0x0018, h01=0x0050, text=»* WRITE CARD /06«, t00=0x001f, t01=0x00d2}
0x3158…3162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ee}
0x3162…319c Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x001f, t01=0x00f8}
0x319c…31a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0132}
0x31a6…31ba Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x001f, t01=0x013c}
0x31ba…31e2 Head {h00=0x0024, h01=0x0050, text=» LDK A4,RTRIES SET NO OF RTRIES «, t00=0x001f, t01=0x0150}
0x31e2…3206 Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTST+1,A6 GET STATUS«, t00=0x001f, t01=0x0178}
0x3206…321a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0020, t01=0x000c}
0x321a…3244 Head {h00=0x0026, h01=0x0050, text=» SUK A2,DOCINS DOCUMENT INSERTED? «, t00=0x0020, t01=0x0020}
0x3244…325e Head {h00=0x0016, h01=0x0050, text=» RF(E) WRIT05 YES «, t00=0x0020, t01=0x004a}
0x325e…3288 Head {h00=0x0026, h01=0x0050, text=»WRIT02 LDK A1,CARMIS CARD MISSING «, t00=0x0020, t01=0x0064}
0x3288…32a0 Head {h00=0x0014, h01=0x0050, text=»ENDIO2 RB ENDIO «, t00=0x0020, t01=0x008e}
0x32a0…32aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a6}
0x32aa…32b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00b0}
0x32b4…32c8 Head {h00=0x0010, h01=0x0050, text=»WRIT05 EQU *«, t00=0x0020, t01=0x00ba}
0x32c8…32f4 Head {h00=0x0028, h01=0x0050, text=» CM DWTLRC,A6 CLEAR LRC-ACKUMULATOR «, t00=0x0020, t01=0x00ce}
0x32f4…32fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00fa}
0x32fe…333a Head {h00=0x0038, h01=0x0050, text=»* TEST REQUESTED LENGTH AND GET START CHARACTER. «, t00=0x0020, t01=0x0104}
0x333a…3344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0140}
0x3344…3376 Head {h00=0x002e, h01=0x0050, text=» LDK A1,INCLEN SET ERROR CODE JUST IN CASE«, t00=0x0020, t01=0x014a}
0x3376…339e Head {h00=0x0024, h01=0x0050, text=» LD A2,ECBRL,A8 REQUESTED LENGTH«, t00=0x0020, t01=0x017c}
0x339e…33c8 Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTFRT,A6 FORMAT CODE FLAG «, t00=0x0021, t01=0x0014}
0x33c8…33ea Head {h00=0x001e, h01=0x0050, text=» RF(N) WRIT07 GERMAN BOOK «, t00=0x0021, t01=0x003e}
0x33ea…33f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0060}
0x33f4…340c Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0021, t01=0x006a}
0x340c…3416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0082}
0x3416…3442 Head {h00=0x0028, h01=0x0050, text=»* CREDIT CARD / AMERICAN PASSBOOK«, t00=0x0021, t01=0x008c}
0x3442…3456 Head {h00=0x0010, h01=0x0050, text=» SUK A2,104 «, t00=0x0021, t01=0x00b8}
0x3456…3480 Head {h00=0x0026, h01=0x0050, text=» RB(P) ENDIO ERROR IF LENGTH > MAX«, t00=0x0021, t01=0x00cc}
0x3480…34be Head {h00=0x003a, h01=0x0050, text=» LDK A2,CRWSTX START CHAR CREDIT CARD / AMERICAN BOOK «, t00=0x0021, t01=0x00f6}
0x34be…34da Head {h00=0x0018, h01=0x0050, text=» RF WRIT09 CONTINUE «, t00=0x0021, t01=0x0134}
0x34da…34e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0150}
0x34e4…34f8 Head {h00=0x0010, h01=0x0050, text=»WRIT07 EQU *«, t00=0x0021, t01=0x015a}
0x34f8…3514 Head {h00=0x0018, h01=0x0050, text=»* GERMAN PASSBOOK«, t00=0x0021, t01=0x016e}
0x3514…3526 Head {h00=0x000e, h01=0x0050, text=» SUK A2,45«, t00=0x0021, t01=0x018a}
0x3526…3550 Head {h00=0x0026, h01=0x0050, text=» RB(P) ENDIO ERROR IF LENGTH > MAX«, t00=0x0022, t01=0x000c}
0x3550…357e Head {h00=0x002a, h01=0x0050, text=» LDK A2,CRDSTX START CHAR GERMAN BOOK «, t00=0x0022, t01=0x0036}
0x357e…3588 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0064}
0x3588…359c Head {h00=0x0010, h01=0x0050, text=»WRIT09 EQU *«, t00=0x0022, t01=0x006e}
0x359c…35c0 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RESET BUFFER INDEX«, t00=0x0022, t01=0x0082}
0x35c0…35ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00a6}
0x35ca…35de Head {h00=0x0010, h01=0x0050, text=»WRIT10 EQU *«, t00=0x0022, t01=0x00b0}
0x35de…360e Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR«, t00=0x0022, t01=0x00c4}
0x360e…3632 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0022, t01=0x00f4}
0x3632…366c Head {h00=0x0036, h01=0x0050, text=»WRIT15 CF A15,GETCHR GET NEXT CHAR FROM ECB-BUFFER«, t00=0x0022, t01=0x0118}
0x366c…3694 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A1 ANY CHARACTERS LEFT? «, t00=0x0022, t01=0x0152}
0x3694…36ac Head {h00=0x0014, h01=0x0050, text=» RF(E) WRIT20 NO«, t00=0x0022, t01=0x017a}
0x36ac…36ce (35, 0, 400) Head {h00=0x001e, h01=0x0050, text=» CF A15,CDCHK VALID CODE? «, t00=0x0023, t01=0x0004}
0x36ce…36e0 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0023, t01=0x0026}
0x36e0…36fa Head {h00=0x0016, h01=0x0050, text=» RB(Z) WRIT10 YES «, t00=0x0023, t01=0x0038}
0x36fa…370c Head {h00=0x000e, h01=0x0050, text=» RB WRIT15«, t00=0x0023, t01=0x0052}
0x370c…3716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0064}
0x3716…372e Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0023, t01=0x006e}
0x372e…3738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0086}
0x3738…374c Head {h00=0x0010, h01=0x0050, text=»WRIT20 EQU *«, t00=0x0023, t01=0x0090}
0x374c…3776 Head {h00=0x0026, h01=0x0050, text=» LDK A2,CRWETX CARD END CHARACTER «, t00=0x0023, t01=0x00a4}
0x3776…379a Head {h00=0x0020, h01=0x0050, text=» XRS A2,DWTLRC,A6 UPDATE LRC«, t00=0x0023, t01=0x00ce}
0x379a…37be Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0023, t01=0x00f2}
0x37be…37e4 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTLRC,A6 LRC-CHARACTER«, t00=0x0023, t01=0x0116}
0x37e4…3800 Head {h00=0x0018, h01=0x0050, text=» ORK A2,/30 SET ZONE«, t00=0x0023, t01=0x013c}
0x3800…3828 Head {h00=0x0024, h01=0x0050, text=» CF A5,OUTPUT SEND LRC-CHARACTER«, t00=0x0023, t01=0x0158}
0x3828…3832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0180}
0x3832…3858 Head {h00=0x0022, h01=0x0050, text=»* SEND WRITE TRACK COMMAND «, t00=0x0023, t01=0x018a}
0x3858…3886 Head {h00=0x002a, h01=0x0050, text=» LDK A2,ENCTRD ASSUME GERMAN PASSBOOK «, t00=0x0024, t01=0x0020}
0x3886…38b2 Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTFRT,A6 IS IT GERMAN BOOK? «, t00=0x0024, t01=0x004e}
0x38b2…38d6 Head {h00=0x0020, h01=0x0050, text=» RF(N) WRIT30 YES, CONTINUE «, t00=0x0024, t01=0x007a}
0x38d6…3910 Head {h00=0x0036, h01=0x0050, text=» LDK A2,ENCTRA NO, SET CREDIT CARD / AMERICAN BOOK«, t00=0x0024, t01=0x009e}
0x3910…391a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d8}
0x391a…392e Head {h00=0x0010, h01=0x0050, text=»WRIT30 EQU *«, t00=0x0024, t01=0x00e2}
0x392e…395c Head {h00=0x002a, h01=0x0050, text=» CF A5,OUTPUT SEND WRITE TRACK COMMAND«, t00=0x0024, t01=0x00f6}
0x395c…3988 Head {h00=0x0028, h01=0x0050, text=» CF A5,STREG WAIT FOR STATUS MESSAGE«, t00=0x0024, t01=0x0124}
0x3988…39a8 Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 RETURN CODE OK«, t00=0x0024, t01=0x0150}
0x39a8…39c8 Head {h00=0x001c, h01=0x0050, text=» CWK A2,WROK WAS IT OK? «, t00=0x0024, t01=0x0170}
0x39c8…39e8 Head {h00=0x001c, h01=0x0050, text=» RB(E) ENDIO2 YES, EXIT «, t00=0x0024, t01=0x0190}
0x39e8…39f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0020}
0x39f2…3a12 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 MORE RETRIES? «, t00=0x0025, t01=0x002a}
0x3a12…3a3c Head {h00=0x0026, h01=0x0050, text=» RB(NN) WRIT05 YES, PERFORM RETRY «, t00=0x0025, t01=0x004a}
0x3a3c…3a46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0074}
0x3a46…3a76 Head {h00=0x002c, h01=0x0050, text=» LDK A1,NEGACK RETURN CODE NEGATIVE ACK «, t00=0x0025, t01=0x007e}
0x3a76…3aa0 Head {h00=0x0026, h01=0x0050, text=» CWK A2,WRERR WAS IT WRITE ERROR? «, t00=0x0025, t01=0x00ae}
0x3aa0…3ac0 Head {h00=0x001c, h01=0x0050, text=» RB(E) ENDIO2 YES, EXIT «, t00=0x0025, t01=0x00d8}
0x3ac0…3aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f8}
0x3aca…3b00 Head {h00=0x0032, h01=0x0050, text=» LDKL A1,WARNRW RETURN CODE READ/WRITE WARNING«, t00=0x0025, t01=0x0102}
0x3b00…3b2c Head {h00=0x0028, h01=0x0050, text=» CWK A2,WRWARN WAS IT WRITE WARNING?«, t00=0x0025, t01=0x0138}
0x3b2c…3b4c Head {h00=0x001c, h01=0x0050, text=» RB(E) ENDIO2 YES, EXIT «, t00=0x0025, t01=0x0164}
0x3b4c…3b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0184}
0x3b56…3b94 Head {h00=0x003a, h01=0x0050, text=» LDK A1,THRERR ILLEGAL STATUS FROM MSU. THROUGHPUT ERR«, t00=0x0025, t01=0x018e}
0x3b94…3ba6 Head {h00=0x000e, h01=0x0050, text=» RB ENDIO2«, t00=0x0026, t01=0x003c}
0x3ba6…3bb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004e}
0x3bb0…3bc8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0026, t01=0x0058}
0x3bc8…3bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0070}
0x3bd2…3c0c Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0026, t01=0x007a}
0x3c0c…3c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00b4}
0x3c16…3c38 Head {h00=0x001e, h01=0x0050, text=»* END OF OPERATION /26«, t00=0x0026, t01=0x00be}
0x3c38…3c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00e0}
0x3c42…3c7c Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0026, t01=0x00ea}
0x3c7c…3c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0124}
0x3c86…3c9a Head {h00=0x0010, h01=0x0050, text=»ENDOP EQU * «, t00=0x0026, t01=0x012e}
0x3c9a…3cc2 Head {h00=0x0024, h01=0x0050, text=» LDK A4,DOCESC DOCUMENT ESCAPED «, t00=0x0026, t01=0x0142}
0x3cc2…3ce6 Head {h00=0x0020, h01=0x0050, text=» LC A2,DWTST+1,A6 GET STATUS«, t00=0x0026, t01=0x016a}
0x3ce6…3cfa Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0026, t01=0x018e}
0x3cfa…3d10 Head {h00=0x0012, h01=0x0050, text=» RF(NE) END10 «, t00=0x0027, t01=0x0012}
0x3d10…3d38 Head {h00=0x0024, h01=0x0050, text=»END05 LDK A2,RESET GENERAL RESET«, t00=0x0027, t01=0x0028}
0x3d38…3d5c Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0027, t01=0x0050}
0x3d5c…3d8a Head {h00=0x002a, h01=0x0050, text=» CF A5,STREG WAIT FOR MESSAGE FROM MSU«, t00=0x0027, t01=0x0074}
0x3d8a…3dba Head {h00=0x002c, h01=0x0050, text=»END10 CWK A2,DOCINS DOCUMENT INSERTED ? «, t00=0x0027, t01=0x00a2}
0x3dba…3dd2 Head {h00=0x0014, h01=0x0050, text=» RB(E) END05 YES«, t00=0x0027, t01=0x00d2}
0x3dd2…3df8 Head {h00=0x0022, h01=0x0050, text=» CWR A2,A4 DOCUMENT ESCAPED ? «, t00=0x0027, t01=0x00ea}
0x3df8…3e10 Head {h00=0x0014, h01=0x0050, text=» RF(NE) END15 NO«, t00=0x0027, t01=0x0110}
0x3e10…3e40 Head {h00=0x002c, h01=0x0050, text=» SC A4,DWTST+1,A6 CHAR TO STATUS IN DWT «, t00=0x0027, t01=0x0128}
0x3e40…3e52 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0027, t01=0x0158}
0x3e52…3e64 Head {h00=0x000e, h01=0x0050, text=» RB ENDIO2«, t00=0x0027, t01=0x016a}
0x3e64…3e90 Head {h00=0x0028, h01=0x0050, text=»END15 LDK A1,THRERR THROUGHPUT ERROR«, t00=0x0027, t01=0x017c}
0x3e90…3ea8 Head {h00=0x0014, h01=0x0050, text=»ENDIO3 RB ENDIO2«, t00=0x0028, t01=0x0018}
0x3ea8…3ec0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0028, t01=0x0030}
0x3ec0…3eca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0048}
0x3eca…3ede Head {h00=0x0010, h01=0x0050, text=»* I H M S «, t00=0x0028, t01=0x0052}
0x3ede…3ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0066}
0x3ee8…3f06 Head {h00=0x001a, h01=0x0050, text=»* INTERRUPT HANDLER «, t00=0x0028, t01=0x0070}
0x3f06…3f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008e}
0x3f10…3f1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0098}
0x3f1a…3f2c Head {h00=0x000e, h01=0x0050, text=»IHMS EQU *«, t00=0x0028, t01=0x00a2}
0x3f2c…3f40 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0028, t01=0x00b4}
0x3f40…3f68 Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTST,A6 GET STATUS WORD «, t00=0x0028, t01=0x00c8}
0x3f68…3f84 Head {h00=0x0018, h01=0x0050, text=» RF(NN) IHM100 BUSY «, t00=0x0028, t01=0x00f0}
0x3f84…3fa0 Head {h00=0x0018, h01=0x0050, text=» LDR A3,A2 SAVE CHAR«, t00=0x0028, t01=0x010c}
0x3fa0…3fc8 Head {h00=0x0024, h01=0x0050, text=» SUK A3,DOCINS DOCUMENT INSERTED«, t00=0x0028, t01=0x0128}
0x3fc8…3fde Head {h00=0x0012, h01=0x0050, text=» RF(E) IHMS10 «, t00=0x0028, t01=0x0150}
0x3fde…3ff4 Head {h00=0x0012, h01=0x0050, text=» ADK A3,DOCINS«, t00=0x0028, t01=0x0166}
0x3ff4…401c Head {h00=0x0024, h01=0x0050, text=» SUK A3,DOCESC DOCUMENT ESCAPED «, t00=0x0028, t01=0x017c}
0x401c…4030 Head {h00=0x0010, h01=0x0050, text=» RF(NE) EXIT«, t00=0x0029, t01=0x0014}
0x4030…4044 Head {h00=0x0010, h01=0x0050, text=»IHMS10 EQU *«, t00=0x0029, t01=0x0028}
0x4044…406e Head {h00=0x0026, h01=0x0050, text=» SC A2,DWTST+1,A6 SET STATUS WORD «, t00=0x0029, t01=0x003c}
0x406e…4096 Head {h00=0x0024, h01=0x0050, text=»EXIT ABL TDISP GO TO DISPATCHER «, t00=0x0029, t01=0x0066}
0x4096…40a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x008e}
0x40a0…40b8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x0029, t01=0x0098}
0x40b8…40c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00b0}
0x40c2…40da Head {h00=0x0014, h01=0x0050, text=»* DEVICE BUSY «, t00=0x0029, t01=0x00ba}
0x40da…40e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00d2}
0x40e4…40f8 Head {h00=0x0010, h01=0x0050, text=»IHM100 EQU *«, t00=0x0029, t01=0x00dc}
0x40f8…4126 Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHLT/CHRT «, t00=0x0029, t01=0x00f0}
0x4126…4158 Head {h00=0x002e, h01=0x0050, text=» RB(NE) ENDIO3 YES; INDICATE NOT OPERABLE «, t00=0x0029, t01=0x011e}
0x4158…417a Head {h00=0x001e, h01=0x0050, text=» LDR A4,A4 OUTPUT ANSWER ?«, t00=0x0029, t01=0x0150}
0x417a…4192 Head {h00=0x0014, h01=0x0050, text=» RF(Z) IHRET YES«, t00=0x0029, t01=0x0172}
0x4192…41b4 Head {h00=0x001e, h01=0x0050, text=» SUK A7,INCARD INSERT CARD«, t00=0x0029, t01=0x018a}
0x41b4…41cc Head {h00=0x0014, h01=0x0050, text=» RF(E) IHRET YES«, t00=0x002a, t01=0x001c}
0x41cc…41e2 Head {h00=0x0012, h01=0x0050, text=» ADK A7,INCARD«, t00=0x002a, t01=0x0034}
0x41e2…420c Head {h00=0x0026, h01=0x0050, text=» SUK A7,ENOFOP END OF OPERATION ? «, t00=0x002a, t01=0x004a}
0x420c…4220 Head {h00=0x0010, h01=0x0050, text=» RF(E) IHRET«, t00=0x002a, t01=0x0074}
0x4220…4232 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x002a, t01=0x0088}
0x4232…425c Head {h00=0x0026, h01=0x0050, text=» SUK A4,DOCESC DOCUMENT ESCAPED ? «, t00=0x002a, t01=0x009a}
0x425c…4276 Head {h00=0x0016, h01=0x0050, text=» RF(E) IHM140 YES «, t00=0x002a, t01=0x00c4}
0x4276…42b6 Head {h00=0x003c, h01=0x0050, text=»IHRET ABL LDREG LOAD REG. AND RETURN CALLING SEQ VIA A5 «, t00=0x002a, t01=0x00de}
0x42b6…42c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x011e}
0x42c0…42dc Head {h00=0x0018, h01=0x0050, text=»IHM140 LDK A4,DOCESC«, t00=0x002a, t01=0x0128}
0x42dc…4308 Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTST+1,A6 UPDATE STATUS WORD«, t00=0x002a, t01=0x0144}
0x4308…432c Head {h00=0x0020, h01=0x0050, text=» LDK A1,CARMIS CARD MISSING «, t00=0x002a, t01=0x0170}
0x432c…4344 (43, 0, 400) Head {h00=0x0014, h01=0x0050, text=»ENDIO4 RB ENDIO3«, t00=0x002b, t01=0x0004}
0x4344…435c Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x002b, t01=0x001c}
0x435c…4366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0034}
0x4366…4370 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x003e}
0x4370…4384 Head {h00=0x0010, h01=0x0050, text=»* R C M S «, t00=0x002b, t01=0x0048}
0x4384…438e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x005c}
0x438e…43aa Head {h00=0x0018, h01=0x0050, text=»* RECOVERY ROUTINE«, t00=0x002b, t01=0x0066}
0x43aa…43b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0082}
0x43b4…43be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x008c}
0x43be…43d0 Head {h00=0x000e, h01=0x0050, text=»RCMS EQU *«, t00=0x002b, t01=0x0096}
0x43d0…43da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a8}
0x43da…43f0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x002b, t01=0x00b2}
0x43f0…441e Head {h00=0x002a, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON A15 STACK «, t00=0x002b, t01=0x00c8}
0x441e…442a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x00f6}
0x442a…4434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0102}
0x4434…444a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x002b, t01=0x010c}
0x444a…4468 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x002b, t01=0x0122}
0x4468…4474 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x0140}
0x4474…447e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x014c}
0x447e…4494 Head {h00=0x0012, h01=0x0050, text=» LDK A2,DOCESC«, t00=0x002b, t01=0x0156}
0x4494…44c0 Head {h00=0x0028, h01=0x0050, text=» SC A2,DWTST+1,A6 RESET STATUS WORD «, t00=0x002b, t01=0x016c}
0x44c0…44de Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTST,A6 BUSY? «, t00=0x002c, t01=0x0008}
0x44de…44f4 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x002c, t01=0x0026}
0x44f4…451c Head {h00=0x0024, h01=0x0050, text=» LDK A1,THRERR THROUGHPUT ERROR «, t00=0x002c, t01=0x003c}
0x451c…452e Head {h00=0x000e, h01=0x0050, text=» RB ENDIO4«, t00=0x002c, t01=0x0064}
0x452e…4546 Head {h00=0x0014, h01=0x0050, text=» EJECT DRMS02 «, t00=0x002c, t01=0x0076}
0x4546…4550 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x008e}
0x4550…4582 Head {h00=0x002e, h01=0x0050, text=»* STORE = SUBROUTINE TO STORE CHARACTER «, t00=0x002c, t01=0x0098}
0x4582…45c0 Head {h00=0x003a, h01=0x0050, text=»* IN ECB-BUFFER AND INCREMENT BUFFER INDEX. «, t00=0x002c, t01=0x00ca}
0x45c0…45ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0108}
0x45ca…45de Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x002c, t01=0x0112}
0x45de…4604 Head {h00=0x0022, h01=0x0050, text=» LD A7,ECBBA,A8 BUFFER ADDRESS«, t00=0x002c, t01=0x0126}
0x4604…4628 Head {h00=0x0020, h01=0x0050, text=» ADR A7,A3 ADD BUFFER INDEX «, t00=0x002c, t01=0x014c}
0x4628…4646 Head {h00=0x001a, h01=0x0050, text=» SCR A2,A7 STORE CHAR «, t00=0x002c, t01=0x0170}
0x4646…4664 Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 INCR. INDEX «, t00=0x002c, t01=0x018e}
0x4664…4674 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x002d, t01=0x001c}
0x4674…467e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002c}
0x467e…468c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0036}
0x468c…4696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0044}
0x4696…46c4 Head {h00=0x002a, h01=0x0050, text=»* CDCHK = CHECK IF CODE CHECK ERROR «, t00=0x002d, t01=0x004e}
0x46c4…46ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x007c}
0x46ce…46f0 Head {h00=0x001e, h01=0x0050, text=»* AT ENTRY: A2=CHARACTER«, t00=0x002d, t01=0x0086}
0x46f0…4718 Head {h00=0x0024, h01=0x0050, text=»* AT EXIT: A1=RERURN CODE 0,2 «, t00=0x002d, t01=0x00a8}
0x4718…4722 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d0}
0x4722…4736 Head {h00=0x0010, h01=0x0050, text=»CDCHK EQU * «, t00=0x002d, t01=0x00da}
0x4736…4748 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x002d, t01=0x00ee}
0x4748…4768 Head {h00=0x001c, h01=0x0050, text=» SUK A1,/30 VALID CODE? «, t00=0x002d, t01=0x0100}
0x4768…4780 Head {h00=0x0014, h01=0x0050, text=» RF(N) CDC20 NO «, t00=0x002d, t01=0x0120}
0x4780…479a Head {h00=0x0016, h01=0x0050, text=» SUK A1,10 DIGIT? «, t00=0x002d, t01=0x0138}
0x479a…47b6 Head {h00=0x0018, h01=0x0050, text=» RF(N) CDC30 YES, OK«, t00=0x002d, t01=0x0152}
0x47b6…47c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x016e}
0x47c0…47f2 Head {h00=0x002e, h01=0x0050, text=»* THE CHARACTER IS A CONTROL CHARACTER «, t00=0x002d, t01=0x0178}
0x47f2…4818 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTFRT,A6 CREDIT CARD? «, t00=0x002e, t01=0x001a}
0x4818…4832 Head {h00=0x0016, h01=0x0050, text=» RF(NN) CDC10 YES «, t00=0x002e, t01=0x0040}
0x4832…483c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x005a}
0x483c…4858 Head {h00=0x0018, h01=0x0050, text=»* GERMAN PASSBOOK«, t00=0x002e, t01=0x0064}
0x4858…487c Head {h00=0x0020, h01=0x0050, text=» CWK A2,/3E FIELD SEPARATOR?«, t00=0x002e, t01=0x0080}
0x487c…4898 Head {h00=0x0018, h01=0x0050, text=» RF(E) CDC30 YES, OK«, t00=0x002e, t01=0x00a4}
0x4898…48b4 Head {h00=0x0018, h01=0x0050, text=» RF CDC20 NO, ERROR «, t00=0x002e, t01=0x00c0}
0x48b4…48be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00dc}
0x48be…48d2 Head {h00=0x0010, h01=0x0050, text=»CDC10 EQU * «, t00=0x002e, t01=0x00e6}
0x48d2…48fe Head {h00=0x0028, h01=0x0050, text=»* CREDIT CARD / AMERICAN PASSBOOK«, t00=0x002e, t01=0x00fa}
0x48fe…491a Head {h00=0x0018, h01=0x0050, text=» LDR A1,A2 CHARACTER«, t00=0x002e, t01=0x0126}
0x491a…4940 Head {h00=0x0022, h01=0x0050, text=» SUK A1,/3A ACCOUNT SEPARATOR?«, t00=0x002e, t01=0x0142}
0x4940…495c Head {h00=0x0018, h01=0x0050, text=» RF(Z) CDC30 YES, OK«, t00=0x002e, t01=0x0168}
0x495c…497e Head {h00=0x001e, h01=0x0050, text=» SUK A1,3 FIELD SEPARATOR?«, t00=0x002e, t01=0x0184}
0x497e…499a Head {h00=0x0018, h01=0x0050, text=» RF(Z) CDC30 YES, OK«, t00=0x002f, t01=0x0016}
0x499a…49a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0032}
0x49a4…49b8 Head {h00=0x0010, h01=0x0050, text=»CDC20 EQU * «, t00=0x002f, t01=0x003c}
0x49b8…49d6 Head {h00=0x001a, h01=0x0050, text=»* ILLEGAL CHARACTER«, t00=0x002f, t01=0x0050}
0x49d6…4a08 Head {h00=0x002e, h01=0x0050, text=» LDK A1,THRERR RET CODE := THROUGHPUT ERR «, t00=0x002f, t01=0x006e}
0x4a08…4a2e Head {h00=0x0022, h01=0x0050, text=» ORS A1,ECBRC,A8 INSERT IN ECB«, t00=0x002f, t01=0x00a0}
0x4a2e…4a44 Head {h00=0x0012, h01=0x0050, text=» RF CDC40 EXIT«, t00=0x002f, t01=0x00c6}
0x4a44…4a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00dc}
0x4a4e…4a62 Head {h00=0x0010, h01=0x0050, text=»CDC30 EQU * «, t00=0x002f, t01=0x00e6}
0x4a62…4a7e Head {h00=0x0018, h01=0x0050, text=»* VALID CHARACTER«, t00=0x002f, t01=0x00fa}
0x4a7e…4aa2 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x002f, t01=0x0116}
0x4aa2…4ab6 Head {h00=0x0010, h01=0x0050, text=»CDC40 EQU * «, t00=0x002f, t01=0x013a}
0x4ab6…4ac6 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x002f, t01=0x014e}
0x4ac6…4ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x015e}
0x4ad0…4adc Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002f, t01=0x0168}
0x4adc…4ae0 Head {h00=0x4004, h01=0x0000}
0x4ae0…4ae4 00 2f 01 74 ┆ / t┆
0x4ae4…4aec (48, 1, 8) 20 04 00 00 00 30 00 04 ┆ 0 ┆
0x4aec…4b3c (49, 0, 400) 41 34 2c 44 57 54 54 50 5c 20 00 18 01 8a 00 24 00 50 5c 41 44 52 5c 41 34 2c 41 36 5c 53 45 54 20 55 50 20 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 00 19 00 12 00 24 00 50 5c 43 46 5c 41 31 35 2c 53 45 54 49 4d 50 5c 53 54 41 52 54 20 54 ┆A4,DWTTP $ P ADR A4,A6 SET UP TIMER POINTER $ P CF A15,SETIMP START T┆
0x4b3c…4b8c 49 4d 45 52 20 4f 46 20 31 53 00 19 00 3a 00 30 00 50 5c 44 41 54 41 5c 54 53 53 54 32 30 2c 54 49 4d 45 5c 54 49 4d 45 20 4f 55 54 20 41 44 52 45 53 53 20 41 4e 44 20 56 41 4c 55 45 20 00 19 00 62 00 22 00 50 5c 4c 44 4b 5c 41 33 2c 50 4f ┆IMER OF 1S : 0 P DATA TSST20,TIME TIME OUT ADRESS AND VALUE b " P LDK A3,PO┆
0x4b8c…4bdc 54 45 53 54 5c 4c 4f 41 44 20 54 45 53 54 20 4f 52 44 45 52 00 19 00 96 00 1a 00 50 5c 43 46 5c 41 35 2c 4f 52 44 45 52 5c 41 4e 44 20 53 45 4e 44 20 00 19 00 bc 00 2a 00 50 5c 43 46 5c 41 35 2c 45 58 45 43 55 54 5c 45 58 45 43 55 54 45 20 ┆TEST LOAD TEST ORDER P CF A5,ORDER AND SEND * P CF A5,EXECUT EXECUTE ┆
0x4bdc…4c2c 4f 52 44 45 52 20 49 4e 20 50 52 49 4e 54 45 52 00 19 00 da 00 0e 00 50 5c 4c 44 4b 5c 41 33 2c 38 5c 00 19 01 08 00 0e 00 50 5c 54 4d 5c 41 33 2c 41 32 5c 00 19 01 1a 00 24 00 50 5c 52 46 28 5a 29 5c 54 53 53 54 31 30 5c 4e 4f 54 20 50 52 ┆ORDER IN PRINTER P LDK A3,8 P TM A3,A2 $ P RF(Z) TSST10 NOT PR┆
0x4c2c…4c7c 49 4e 54 45 52 20 41 4e 53 57 45 52 00 19 01 2c 00 0e 00 50 5c 4c 44 4b 5c 41 33 2c 33 5c 00 19 01 54 00 0e 00 50 5c 54 4d 5c 41 33 2c 41 32 5c 00 19 01 66 00 1e 00 50 5c 52 46 28 5a 29 5c 54 53 53 54 31 30 5c 4e 4f 54 20 4a 45 20 4f 52 20 ┆INTER ANSWER , P LDK A3,3 T P TM A3,A2 f P RF(Z) TSST10 NOT JE OR ┆
0x4c7c…4ccc (50, 0, 400) 47 45 00 19 01 78 00 24 00 50 5c 4c 44 4b 5c 41 33 2c 50 4f 44 53 54 41 5c 4a 45 20 4f 52 20 47 45 20 45 58 45 43 55 54 45 20 00 1a 00 0a 00 22 00 50 5c 43 46 5c 41 35 2c 4f 52 44 45 52 5c 44 49 41 47 4e 4f 53 54 49 43 53 54 41 54 55 53 20 ┆GE x $ P LDK A3,PODSTA JE OR GE EXECUTE " P CF A5,ORDER DIAGNOSTICSTATUS ┆
0x4ccc…4d1c 00 1a 00 32 00 12 00 50 5c 43 46 5c 41 35 2c 45 58 45 43 55 54 5c 00 1a 00 58 00 12 00 50 54 53 53 54 31 30 5c 45 51 55 5c 2a 5c 20 00 1a 00 6e 00 0a 00 50 5c 49 4e 48 5c 5c 00 1a 00 84 00 1e 00 50 5c 43 4d 2a 5c 44 57 54 54 50 2c 41 36 5c ┆ 2 P CF A5,EXECUT X PTSST10 EQU * n P INH P CM* DWTTP,A6 ┆
0x4d1c…4d6c 52 45 53 45 54 20 54 49 4d 45 52 20 00 1a 00 92 00 24 00 50 5c 43 4d 5c 44 57 54 54 50 2c 41 36 5c 52 45 53 45 54 20 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 00 1a 00 b4 00 24 00 50 5c 43 4d 5c 45 43 42 43 57 2c 41 38 5c 43 4c 45 41 52 20 43 ┆RESET TIMER $ P CM DWTTP,A6 RESET TIMER POINTER $ P CM ECBCW,A8 CLEAR C┆
0x4d6c…4dbc 54 52 4c 20 57 4f 52 44 5c 3d 32 20 00 1a 00 dc 00 1e 00 50 5c 41 42 4c 5c 53 54 41 54 55 53 5c 55 50 44 41 54 45 20 53 54 41 54 55 53 20 00 1a 01 04 00 24 00 50 54 53 53 54 32 30 5c 4c 44 52 5c 41 36 2c 41 31 5c 47 45 54 20 44 57 54 20 41 ┆TRL WORD =2 P ABL STATUS UPDATE STATUS $ PTSST20 LDR A6,A1 GET DWT A┆
0x4dbc…4e0c 44 44 52 45 53 53 00 1a 01 26 00 24 00 50 5c 4c 44 4b 5c 41 32 2c 31 5c 49 4e 44 49 43 41 54 45 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 20 00 1a 01 4e 00 10 00 50 5c 52 42 5c 54 53 53 54 31 30 5c 20 00 1a 01 76 00 12 00 50 5c 49 46 54 5c 4a ┆DDRESS & $ P LDK A2,1 INDICATE NOT OPERABLE N P RB TSST10 v P IFT J┆
0x4e0c…4e5c (51, 0, 400) 4f 55 52 4e 4c 3d 31 5c 00 1a 01 8a 00 0c 00 50 5c 45 4a 45 43 54 5c 5c 00 1b 00 10 00 04 00 50 00 1b 00 20 00 06 00 50 2a 20 00 1b 00 28 00 06 00 50 2a 20 00 1b 00 32 00 20 00 50 2a 20 20 20 4f 52 44 45 52 20 30 36 20 3a 20 57 52 49 54 45 ┆OURNL=1 P EJECT P P* ( P* 2 P* ORDER 06 : WRITE┆
0x4e5c…4eac 20 4a 4f 55 52 4e 41 4c 00 1b 00 3c 00 06 00 50 2a 20 00 1b 00 60 00 06 00 50 2a 20 00 1b 00 6a 00 10 00 50 57 52 54 4a 52 4c 5c 45 51 55 5c 2a 00 1b 00 74 00 36 00 50 5c 4c 44 4b 5c 41 33 2c 50 4f 57 4a 52 4c 5c 53 45 54 20 55 50 20 50 52 ┆ JOURNAL < P* ` P* j PWRTJRL EQU * t 6 P LDK A3,POWJRL SET UP PR┆
0x4eac…4efc 49 4e 54 45 52 20 57 52 49 54 45 20 4a 4f 55 52 4e 41 4c 20 4f 52 44 45 52 20 00 1b 00 88 00 1a 00 50 5c 43 46 5c 41 35 2c 4f 52 44 45 52 5c 41 4e 44 20 53 45 4e 44 20 00 1b 00 c2 00 14 00 50 5c 4c 44 5c 41 31 2c 44 57 54 53 54 2c 41 36 20 ┆INTER WRITE JOURNAL ORDER P CF A5,ORDER AND SEND P LD A1,DWTST,A6 ┆
0x4efc…4f4c 00 1b 00 e0 00 12 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 34 30 30 20 00 1b 00 f8 00 1e 00 50 5c 52 46 28 4e 5a 29 5c 57 52 4a 4c 31 30 5c 4c 46 20 45 58 45 43 55 54 45 44 00 1b 01 0e 00 28 00 50 5c 4c 44 4b 5c 41 33 2c 31 5c 53 45 54 20 55 50 ┆ P ANKL A1,/400 P RF(NZ) WRJL10 LF EXECUTED ( P LDK A3,1 SET UP┆
0x4f4c…4f9c 20 45 43 42 20 42 55 46 46 45 52 20 50 4f 49 4e 54 45 52 20 00 1b 01 30 00 28 00 50 5c 43 46 5c 41 31 35 2c 47 45 54 43 48 52 5c 47 45 54 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 43 54 45 52 00 1b 01 5c 00 0e 00 50 5c 4c 44 52 5c 41 31 2c ┆ ECB BUFFER POINTER 0 ( P CF A15,GETCHR GET CONTROL CHARACTER P LDR A1,┆
0x4f9c…4fec (52, 0, 400) 41 31 00 1b 01 88 00 28 00 50 5c 52 46 28 4e 50 29 5c 57 52 4a 4c 37 30 5c 52 45 51 20 4c 45 4e 47 54 48 20 54 4f 4f 20 53 48 4f 52 54 20 00 1c 00 0a 00 26 00 50 5c 4c 44 52 5c 41 31 2c 41 32 5c 53 45 54 20 55 50 20 43 54 52 4c 20 43 48 41 ┆A1 ( P RF(NP) WRJL70 REQ LENGTH TOO SHORT & P LDR A1,A2 SET UP CTRL CHA┆
0x4fec…503c 52 20 49 4e 20 41 31 20 00 1c 00 36 00 10 00 50 5c 53 55 4b 5c 41 31 2c 2f 32 42 20 00 1c 00 60 00 20 00 50 5c 52 46 28 5a 29 5c 57 52 4a 4c 31 30 5c 43 54 52 4c 20 43 48 41 52 20 3d 2f 32 42 00 1c 00 74 00 22 00 50 5c 43 4d 5c 44 57 54 50 ┆R IN A1 6 P SUK A1,/2B ` P RF(Z) WRJL10 CTRL CHAR =/2B t " P CM DWTP┆
0x503c…508c 50 4a 2c 41 36 5c 43 4c 45 41 52 20 50 52 49 4e 54 20 50 4f 53 20 00 1c 00 98 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 32 20 00 1c 00 be 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 35 20 00 1c 00 d0 00 20 00 50 5c 52 46 28 5a 29 5c 57 52 4a 4c 30 35 5c ┆PJ,A6 CLEAR PRINT POS P LDK A2,2 P SUK A1,5 P RF(Z) WRJL05 ┆
0x508c…50dc 43 54 52 4c 20 43 48 41 52 20 3d 2f 33 30 00 1c 00 e2 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 31 20 00 1c 01 06 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 31 20 00 1c 01 18 00 26 00 50 5c 52 46 28 4e 5a 29 5c 57 52 4a 4c 30 35 5c 43 54 52 4c 20 43 48 ┆CTRL CHAR =/30 P LDK A2,1 P SUK A1,1 & P RF(NZ) WRJL05 CTRL CH┆
0x50dc…512c 41 52 20 4e 4f 54 20 3d 2f 33 31 20 00 1c 01 2a 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 33 20 00 1c 01 54 00 20 00 50 57 52 4a 4c 30 35 5c 43 46 5c 41 35 2c 4f 55 54 5c 53 45 4e 44 20 4c 46 20 49 4e 46 00 1c 01 66 00 2a 00 50 5c 43 46 5c 41 35 ┆AR NOT =/31 * P LDK A2,3 T PWRJL05 CF A5,OUT SEND LF INF f * P CF A5┆