|
|
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: 17582 (0x44ae)
Notes: pts_type(SC)
Names: »DRGP01.SC«
└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
└─⟦this⟧ »BDKMON/DRGP01.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKMON/DRGP01.SC«
IDENT DRGP01 REL=7.2 DATE=77-09-09 UPDATE #0 77-09-09 * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRGP01 = DRIVER GENERAL PRINTER * * * LEVEL #2 77-09-09 * * RELEASE #7 77-09-09 * ************************************************* * * * THIS DRIVER HANDLES GENERAL TERMINAL PRINTER * PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. * * THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO * FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE * GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY- * BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD * DRIVER DRKB01. * * * THE DRIVER CONSISTS OF FOLLOWING PARTS: * * A C G P ACTIVATION PART * * I H G P INTERRUPT HANDLER * * R C G P RECOVERY ROUTINE * * E C H O G P ECHO FUNCTIONS * * * THE FOLLOWING ORDERS ARE TREATED: * * ORDER 00: TEST STATUS * 05: BASIC WRITE * 06: STANDARD WRITE * * NORMAL REGISTER USAGE * * REGISTER A1 = RETURN CODE * A2 = OUTPUT CHARACTER * A3 = BUFFER INDEX * A4 = WORK REGISTER * A5 = STACK BASE * A6 = DWT-ADDRESS * A7 = ORDER * A8 = ECB-ADDRESS * * * SYSTEM ADAPTATION * * THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR * (GPCLR) KEYS SHOULD BE DEFINED. * * BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS * ADAPTED TO HANDLE FOLLOWING FUNCTIONS. * --ROOMLESS POINT * --ACCEPTANCE OF SPECIAL CHARACTER /13,/14 OR BOTH * * --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER * --SUPPRESS ECHOING OF END OF RECORD CHARACTER ** --SUPPRESION OF TRAILING BLANKS * --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE * * THE CHARACTER CODES FOR ROOMLESS POINT DIGITS * IS DEFINED IN A SPECIAL TABLE. STANDARD IS SHB CHARACTER SET EJECT * * * * *********** * ENTRIES * *********** * * * ENTRY GPAD ADDRESS TO ADDRESSBLOCK ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE * * * * ***************************************** * EXTERNAL TOSS MODULE ENTRIES * ***************************************** * * EXTRN DISIOE I/O REQUEST ERROR EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER EXTRN TDISP DISPATCHER EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN EXTRN TENDIO END I/O EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER EJECT * ************************ * DWT PARAMETERS * ************************ * EXTRN DWTST STATUS EXTRN DWTOR ORDER * ******************************** * DWT-DISPLACEMENT * ******************************** * DWTA3 EQU /12 SAVE AREA FOR A3 DWTBC EQU /3 BYTE COUNTER DWTAP EQU /22 HEAD POSITION POINTER * EJECT * * ************* * CONSTANTS * ************* * * SOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY STX EQU /82 START OF MESSAGE ETB EQU /97 END OF MESSAGE ETX EQU /03 LAST DUMMY CR EQU /0D CARRIAGE RETURN LF EQU /0A LINE FEED FFED EQU /0C FORM FEED SPACE EQU /20 SPACE PROUT EQU /04 PAPER OUT OR READY SWITCH OFF EJECT ************************************** * CONDITIONAL ASSEMBLY * ************************************** * * IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT * FUNCTION BY SETTING X:A = 0 * X:A EQU 1 CROOM EQU 1 * * ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE * INCLUDED IN THE DRIVER BY SETTING X:B=1 * X:B EQU 0 TRETON EQU 0 * * ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE * INCLUDED IN THE DRIVER BY SETTING X:C=1 * X:C EQU 0 FJOTON EQU 0 * * IT IS POSSIBLE TO EXCLUDE ECHOING OF * AN EXTRA SPACE AFTER EACH CHARACTER * BY SETTING X:D=0 * X:D EQU 0 COSPAC EQU 1 * * BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE * TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. * THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0. * X:E EQU 0 EORECH EQU 0 * * SUPPRESSING OF SPACES IN RIGHT HAND OF LINE * BY SETTING X:F=1 * X:F EQU 0 SUPSPA EQU 0 * * END OF REQUEST IN SITUATIONS WHERE * THE SELECTOR UNIT OR PRINTER HARDWARE * IS INACTIVE CAN BE CHOSEN BY SETTING * THE CONSTANT RECEND = 1 X:G EQU 0 RECEND EQU 0 EJECT ************************************** * SPECIAL KEYS FOR ECHO FUNCTION * ************************************** * GPBSP EQU /2D BACK SPACE GPCLR EQU /3F CLEAR * ******************** * RETURN CODES * ******************** * PAROUT EQU /20 PAPER OUT OR READY SWITCH OFF CCERR EQU /4 CODE CHECK ERROR TPERR EQU /2 THROUGHPUT ERROR OPERR EQU /1 NOT OPERABLE, POWER OFF * EJECT * * ********** * TABLES * ********** * * IFT CROOM=1 * ROMTAB EQU * TABLE FOR ROOMLESS POINT CHARACTERS DATA /2122,/2426,/3B3C,/3E40,/5E5F * XIF * * * GPAD EQU * ADDRESS BLOCK DATA ACGP ACTIVATION DRIVER DATA IHGP INTERRUPT HANDLER DATA RCGP RECOVERY ROUTINE DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE EJECT * * A C G P * * ACGP = ACTIVATION DRIVER GENERAL PRINTER * * ORDER 00: TEST STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE * IS SET IF PAPER OUT OR READY SWITCH OFF. * RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM * CHANNEL UNIT. * * ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER * FROM ECB-BUFFER * * ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO PRINTER FROM * ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. * ACGP EQU * LDK A2,STX START OF MESSAGE LDK A3,0 RESET BUFFER INDEX LDK A4,0 LDR A7,A7 ORDER 0? RF(E) AGP410 SUK A7,5 ORDER 5? RF(E) ACGP05 SUK A7,1 ORDER 6? ABL(NE) DISIOE I/O REQUEST ERROR LD A1,4,A8 GET REQUESTED LENGTH RF(E) ACGP02 LD A3,2,A8 GET BUFFER ADDRESS LC A3,1,A3 GET CONTROL CHARACTER ANK A3,/FF ACGP02 EQU * SUK A3,/2B POSITIONING BEFORE WRITE? RF(E) ACGP12 LDK A4,2 INDICATE CR AND LF/FFED TO SEND EJECT * * SEND DUMMY AND, IF CONTROL CHARACTER * # 2B, SEND CARRIAGE RETURN AND LINE FEED * ACGP05 EQU * CF A5,OUTPUT SEND CHARACTER SUK A4,1 RF(N) ACGP19 START SECTION ENDED? RF(P) ACGP15 STX * * SEND LINE FEED OR FORM FEED * SUK A3,5 CONTROL CHARACTER /30 ? RF(NE) ACGP07 ADK A4,1 YES EXTRA LINE FEED TO SEND ACGP07 EQU * LDK A2,LF ACGP12 LDK A3,2 START BUFFER INDEX RB ACGP05 ACGP15 ST A4,DWTAP,A6 RESET HEAD POSITION POINTER LDK A2,CR CARRIAGE RETURN RB ACGP05 EJECT * * GET, CHECK AND SEND CHARACTER * (IF ORDER 5 NO CHECK) * ACGP17 CF A5,OUTPUT ACGP18 IM DWTST,A6 POSITION COUNTER UPDATING ACGP19 EQU * LDKL A4,/400 INDICATE LINE FEED DONE ORS A4,DWTST,A6 IFT SUPSPA=1 CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER XIF LDK A4,0 ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER LDR A1,A1 LAST CHARACTER? RF(NP) AGP400 LDR A1,A2 SUK A7,5 ORDER 5? RF(E) ACGP24 BASIC WRITE SUK A1,9 HARDWARE TABULATION ? RF(NE) ACGP22 ST A4,DWTAP,A6 RESET HEAD POSITION POINTER RB ACGP17 ACGP22 SUK A1,8 TABULATION CHARACTER ? RF(E) ACGP40 * IFT TRETON=0 IFT FJOTON=0 * SUK A1,/F LESS THAN /20 ? * XIF * IFT TRETON=0 IFT FJOTON=1 * SUK A1,3 /14? RB(E) ACGP17 SUK A1,/C LESS THAN /20 ? * XIF * * IFT TRETON=1 IFT FJOTON=0 * SUK A1,2 /13 ? RB(E) ACGP17 SUK A1,/D LESS THAN /20 ? XIF * * IFT TRETON=1 IFT FJOTON=1 * SUK A1,2 /13? RB(E) ACGP17 SUK A1,1 /14? RB(E) ACGP17 SUK A1,/C LESS THAN /20 ? * XIF * RF(N) ACGP30 CODE CHECK ERROR SUK A1,/8E ROOMLESS POINT? (AE) RF(E) AGP100 ADK A1,/4F GREATER THAN /5F RB(NP) ACGP17 SUK A1,/20 RF(NN) ACGP30 SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F TO CHARACTER BETWEEN /40 TO /5F RB ACGP17 ACGP24 EQU * SUK A1,/D RF(NZ) ACGP26 NOT CR CM DWTST,A6 SET POS LTR.TO 0 CM DWTAP,A6 RESET HEAD POS.POIINTER ACGP26 ADK A1,3 RB(NZ) ACGP17 NOT LINE FEED SUK A1,1 ADS A1,DWTST,A6 DECREMENT POS COUNTER RB ACGP17 EJECT * * CODE CHECK ERROR * ACGP30 EQU * LDK A1,CCERR ORS A1,8,A8 RETURN CODE RB ACGP20 EJECT * * TABULATION * ACGP40 EQU * CF A15,GETCHR GET FIRST ASCII CHARACTER LDR A4,A2 CF A15,GETCHR GET SECOND ASCII CHARACTER ANK A2,/F ANK A4,/F RF(E) ACGP44 ACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL SUK A4,1 RB(NE) ACGP43 ACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER LC A4,DWTBC,A6 SUR A2,A4 AND REQUESTS POSITION COUNTER TO GET NUMBER OF SPACES TO SEND RB(NP) ACGP20 LDR A4,A2 ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE ACGP46 CF A5,OUTPUT IM DWTST,A6 INCREMENT BUFFER INDEX SUK A4,1 RB(NE) ACGP45 LDR A3,A3 RECOVERY? RB(NE) ACGP20 SC A4,DWTBC,A6 RESET POSITION POINTER LDK A3,2 START BUFFER INDEX RB ACGP19 EJECT * * ROOMLESS POINT * AGP100 EQU * * IFT CROOM=1 * CF A15,GETCHR GET CHARACTER TO SEND ANK A2,/F LC A2,ROMTAB,A2 TRANSFORM * XIF * * IFF CROOM=1 * ANK A2,/7F * XIF * RB ACGP17 EJECT * * * SEND LAST DUMMY , LOAD A1 WITH * RETURN CODE AND END I/O * AGP400 EQU * LDK A2,ETB END OF MESSAGE CF A5,OUTPUT SEND AGP410 LDK A2,ETX LAST DUMMY CF A5,OUTPUT SEND AGP420 EQU * CF A15,UPDAPP UPDATE HEAD POSITION COUNTER ENDIO CF A15,TENDIO END I/O EXIT ABL TDISP GO TO DISPATCHER AGP430 EQU * LD A3,DWTA3,A6 ST A3,6,A8 EFF. LENGTH RB AGP420 EJECT * * * UPDAPP = SUBROUTINE TO UPDATE HEAD * POSITION POINTER WHEN END * OF REQUEST IS REACHED UPDAPP EQU * LC A3,DWTBC,A6 GET POSITION COUNTER ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER LDK A3,0 SC A3,DWTBC,A6 RESET POSITION COUNTER RTN A15 IFT SUPSPA=1 EJECT * * * SKIPSP = SUBROTINE TO SKIP SPACES * IN END OF ECB-BUFFER. * REQUESTED LENGTH IN ECB IS UPDATED. * A1,A2,A4 - WORK REG * SKIPSP EQU * LD A1,2,A8 GET BUFFER ADDRESS (BA) LD A2,4,A8 GET REQUESTED LENGTH(RL) ADR A1,A2 GET ADD END OF BUFFER SKIP05 CWK A2,2 RF(NG) SKIP30 RL < 3 SUK A1,1 DECR. BA LCR A4,A1 GET CHAR CCK A4,/2020 SPACE ? RF(NE) SKIP20 NO SKIP07 SUK A2,1 DECR RL RB SKIP05 GET NEXT SKIP20 CWK A2,4 RF(NG) SKIP30 RL < 5 LC A4,-2,A1 GET CHAR CCK A4,/1111 TABULATION CHAR ? RF(NE) SKIP30 NO SUK A1,2 DECR BA SUK A2,2 DECR RL RB SKIP07 GET NEXT * SKIP30 ST A2,4,A8 STORE NEW RL RTN A15 XIF EJECT * * I H G P * * INTERRUPT * IHGP EQU * LD A4,DWTST,A6 BUSY? RB(N) EXIT NO SLL A4,2 ECHO MODE ? RF(N) IHGP10 LDR A7,A7 ORDER 0? RB(Z) AGP430 LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? IFT RECEND=0 RB(NZ) EXIT XIF IFT RECEND=1 RB(NZ) AGP430 XIF IHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 EJECT * * E C H O G P * * ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE * ECHOGP EQU * LDK A4,COSPAC LDR A7,A7 EOR? RF(N) ECGP17 YES * IFT EORECH=0 * SUK A2,/80 EOR-CHARACTER RF(NN) ECGP20 YES ADK A2,/80 * XIF * LDR A1,A2 SUK A1,/8 RF(E) ECGP40 BACKSPACE SUK A1,/10 RF(E) ECGP50 CLEAR ECGP10 CF A5,OUTPUT SEND CHARACTER IM DWTST,A6 UPDATE POSITION COUNTER SUK A4,1 READY ? RF(N) ECGP20 YES RF(P) ECGP60 NO, GO TO CLEAR SECTION * IFT COSPAC=1 * LDK A2,SPACE NO SEND SPACE RB ECGP10 * XIF * ECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER ECGP20 ABL ECHRTN RETURN TO KEYBOARD EJECT * * BACKSPACE * ECGP40 EQU * LDK A2,GPBSP BACKSPACE CHARACTER RB ECGP10 * * CANCEL * ECGP50 EQU * LDK A2,GPCLR CLEAR CHARACTER LDK A4,3 RB ECGP10 ECGP60 LDK A2,LF LINE FEED LC A3,DWTBC,A6 ANK A3,/FF ECGP70 CF A5,OUTPUT SEND CHAR. LDK A2,/08 BACKSPACE SUK A3,1 RB(NN) ECGP70 LDK A3,0 SC A3,DWTBC,A6 RESET POSITION COUNTER RB ECGP20 EJECT * * R C G P * * RCGP = RECOVERY ROUTINE GENERAL PRINTER * * * RECOVERY IS CARRIED OUT ONLY IF * ORDER 6 IS RUNNING * * ON ENTRY: * * A6 = DWT-ADDRESS * A7 = ORDER * A8 = ECB-ADDRESS RCGP EQU * CF A15,SAVE8 SAVE 8 REGISTERS ON STACK LD A2,DWTST,A6 BUSY ? RB(N) EXIT NO LDK A2,SOH RESET PRINT BUFFER CODE CF A5,OUTPUT SEND IT CWK A7,5 RF(E) RCGP10 CWK A7,6 ORDER 6? RF(E) RCGP05 YES CWK A7,0 ORDER 0? RB(E) ENDIO RB EXIT RCGP05 EQU * LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD ANK A2,/4 LINE FEED DONE ? ABL(E) ACGP NO LDK A2,SPACE CF A5,OUTPUT SEND SPACE LDK A2,STX CF A5,OUTPUT SEND STX LDK A2,CR CARRIAGE RETURN LDK A3,0 LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND ABL ACGP46 RCGP10 LDK A1,TPERR SET RETURN CODE ABL AGP430 END
0x0000…002e (0, 0, 400) Head {h00=0x002a, h01=0x0050, text=» IDENT DRGP01 REL=7.2 DATE=77-09-09«, t00=0x0000, t01=0x0004}
0x002e…0050 Head {h00=0x001e, h01=0x0050, text=» UPDATE #0 77-09-09 «, t00=0x0000, t01=0x0032}
0x0050…005a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0054}
0x005a…0094 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x005e}
0x0094…009e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0098}
0x009e…00c6 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00a2}
0x00c6…00d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ca}
0x00d0…00fc Head {h00=0x0028, h01=0x0050, text=»* DRGP01 = DRIVER GENERAL PRINTER «, t00=0x0000, t01=0x00d4}
0x00fc…0106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x0106…0110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x0110…0132 Head {h00=0x001e, h01=0x0050, text=»* LEVEL #2 77-09-09«, t00=0x0000, t01=0x0114}
0x0132…013c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…015e Head {h00=0x001e, h01=0x0050, text=»* RELEASE #7 77-09-09«, t00=0x0000, t01=0x0140}
0x015e…0168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0162}
0x0168…01a2 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x016c}
0x01a2…01ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0016}
0x01ac…01b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0020}
0x01b6…01f0 Head {h00=0x0036, h01=0x0050, text=»* THIS DRIVER HANDLES GENERAL TERMINAL PRINTER «, t00=0x0001, t01=0x002a}
0x01f0…0230 Head {h00=0x003c, h01=0x0050, text=»* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. «, t00=0x0001, t01=0x0064}
0x0230…023a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a4}
0x023a…0276 Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO «, t00=0x0001, t01=0x00ae}
0x0276…02b0 Head {h00=0x0036, h01=0x0050, text=»* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE«, t00=0x0001, t01=0x00ea}
0x02b0…02ea Head {h00=0x0036, h01=0x0050, text=»* GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY-«, t00=0x0001, t01=0x0124}
0x02ea…0322 Head {h00=0x0034, h01=0x0050, text=»* BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD«, t00=0x0001, t01=0x015e}
0x0322…033e Head {h00=0x0018, h01=0x0050, text=»* DRIVER DRKB01. «, t00=0x0002, t01=0x0008}
0x033e…0348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0024}
0x0348…0352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002e}
0x0352…0386 Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0002, t01=0x0038}
0x0386…0390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006c}
0x0390…03ba Head {h00=0x0026, h01=0x0050, text=»* A C G P ACTIVATION PART«, t00=0x0002, t01=0x0076}
0x03ba…03c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a0}
0x03c4…03f0 Head {h00=0x0028, h01=0x0050, text=»* I H G P INTERRUPT HANDLER«, t00=0x0002, t01=0x00aa}
0x03f0…03fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d6}
0x03fa…0426 Head {h00=0x0028, h01=0x0050, text=»* R C G P RECOVERY ROUTINE «, t00=0x0002, t01=0x00e0}
0x0426…0430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010c}
0x0430…045a Head {h00=0x0026, h01=0x0050, text=»* E C H O G P ECHO FUNCTIONS «, t00=0x0002, t01=0x0116}
0x045a…0464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0464…046e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x046e…049c Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0002, t01=0x0154}
0x049c…04a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0182}
0x04a6…04c8 Head {h00=0x001e, h01=0x0050, text=»* ORDER 00: TEST STATUS«, t00=0x0002, t01=0x018c}
0x04c8…04ea Head {h00=0x001e, h01=0x0050, text=»* 05: BASIC WRITE«, t00=0x0003, t01=0x001e}
0x04ea…0510 Head {h00=0x0022, h01=0x0050, text=»* 06: STANDARD WRITE «, t00=0x0003, t01=0x0040}
0x0510…051a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0066}
0x051a…053c Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE«, t00=0x0003, t01=0x0070}
0x053c…0546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0092}
0x0546…056c Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 = RETURN CODE«, t00=0x0003, t01=0x009c}
0x056c…0598 Head {h00=0x0028, h01=0x0050, text=»* A2 = OUTPUT CHARACTER «, t00=0x0003, t01=0x00c2}
0x0598…05c0 Head {h00=0x0024, h01=0x0050, text=»* A3 = BUFFER INDEX «, t00=0x0003, t01=0x00ee}
0x05c0…05e8 Head {h00=0x0024, h01=0x0050, text=»* A4 = WORK REGISTER«, t00=0x0003, t01=0x0116}
0x05e8…060e Head {h00=0x0022, h01=0x0050, text=»* A5 = STACK BASE «, t00=0x0003, t01=0x013e}
0x060e…0634 Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0003, t01=0x0164}
0x0634…0654 Head {h00=0x001c, h01=0x0050, text=»* A7 = ORDER«, t00=0x0003, t01=0x018a}
0x0654…067a Head {h00=0x0022, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0004, t01=0x001a}
0x067a…0684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0040}
0x0684…068e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004a}
0x068e…06ac Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0004, t01=0x0054}
0x06ac…06b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0072}
0x06b6…06f4 Head {h00=0x003a, h01=0x0050, text=»* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR«, t00=0x0004, t01=0x007c}
0x06f4…0720 Head {h00=0x0028, h01=0x0050, text=»* (GPCLR) KEYS SHOULD BE DEFINED.«, t00=0x0004, t01=0x00ba}
0x0720…072a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e6}
0x072a…0766 Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS «, t00=0x0004, t01=0x00f0}
0x0766…079a Head {h00=0x0030, h01=0x0050, text=»* ADAPTED TO HANDLE FOLLOWING FUNCTIONS. «, t00=0x0004, t01=0x012c}
0x079a…07b8 Head {h00=0x001a, h01=0x0050, text=»* --ROOMLESS POINT «, t00=0x0004, t01=0x0160}
0x07b8…07f6 Head {h00=0x003a, h01=0x0050, text=»* --ACCEPTANCE OF SPECIAL CHARACTER /13,/14 OR BOTH«, t00=0x0004, t01=0x017e}
0x07f6…0800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002c}
0x0800…0848 Head {h00=0x0044, h01=0x0050, text=»* --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER «, t00=0x0005, t01=0x0036}
0x0848…0882 Head {h00=0x0036, h01=0x0050, text=»* --SUPPRESS ECHOING OF END OF RECORD CHARACTER«, t00=0x0005, t01=0x007e}
0x0882…08b0 Head {h00=0x002a, h01=0x0050, text=»** --SUPPRESION OF TRAILING BLANKS «, t00=0x0005, t01=0x00b8}
0x08b0…08f4 Head {h00=0x0040, h01=0x0050, text=»* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE«, t00=0x0005, t01=0x00e6}
0x08f4…08fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012a}
0x08fe…0938 Head {h00=0x0036, h01=0x0050, text=»* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS«, t00=0x0005, t01=0x0134}
0x0938…0982 Head {h00=0x0046, h01=0x0050, text=»* IS DEFINED IN A SPECIAL TABLE. STANDARD IS SHB CHARACTER SET «, t00=0x0005, t01=0x016e}
0x0982…0990 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0028}
0x0990…099a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0036}
0x099a…09a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a4…09ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004a}
0x09ae…09b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0054}
0x09b8…09cc Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x005e}
0x09cc…09e0 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0006, t01=0x0072}
0x09e0…09f4 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x0086}
0x09f4…09fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009a}
0x09fe…0a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a4}
0x0a08…0a12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ae}
0x0a12…0a3e Head {h00=0x0028, h01=0x0050, text=» ENTRY GPAD ADDRESS TO ADDRESSBLOCK «, t00=0x0006, t01=0x00b8}
0x0a3e…0a72 Head {h00=0x0030, h01=0x0050, text=» ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0006, t01=0x00e4}
0x0a72…0a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0118}
0x0a7c…0a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0122}
0x0a86…0a90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012c}
0x0a90…0a9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0136}
0x0a9a…0acc Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x0140}
0x0acc…0afe Head {h00=0x002e, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES * «, t00=0x0006, t01=0x0172}
0x0afe…0b30 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0014}
0x0b30…0b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0046}
0x0b3a…0b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0050}
0x0b44…0b6c Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0007, t01=0x005a}
0x0b6c…0b9e Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER«, t00=0x0007, t01=0x0082}
0x0b9e…0bbe Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0007, t01=0x00b4}
0x0bbe…0c00 Head {h00=0x003e, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN «, t00=0x0007, t01=0x00d4}
0x0c00…0c1e Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0007, t01=0x0116}
0x0c1e…0c50 Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK«, t00=0x0007, t01=0x0134}
0x0c50…0c84 Head {h00=0x0030, h01=0x0050, text=» EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO «, t00=0x0007, t01=0x0166}
0x0c84…0cb8 Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0008, t01=0x000a}
0x0cb8…0cc6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x003e}
0x0cc6…0cd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004c}
0x0cd0…0cf0 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0056}
0x0cf0…0d10 Head {h00=0x001c, h01=0x0050, text=»* DWT PARAMETERS *«, t00=0x0008, t01=0x0076}
0x0d10…0d30 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0096}
0x0d30…0d3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00b6}
0x0d3a…0d56 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0008, t01=0x00c0}
0x0d56…0d70 Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0008, t01=0x00dc}
0x0d70…0d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f6}
0x0d7a…0da2 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0008, t01=0x0100}
0x0da2…0dca Head {h00=0x0024, h01=0x0050, text=»* DWT-DISPLACEMENT *«, t00=0x0008, t01=0x0128}
0x0dca…0df2 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0008, t01=0x0150}
0x0df2…0dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0178}
0x0dfc…0e22 Head {h00=0x0022, h01=0x0050, text=»DWTA3 EQU /12 SAVE AREA FOR A3«, t00=0x0008, t01=0x0182}
0x0e22…0e44 Head {h00=0x001e, h01=0x0050, text=»DWTBC EQU /3 BYTE COUNTER «, t00=0x0009, t01=0x0018}
0x0e44…0e70 Head {h00=0x0028, h01=0x0050, text=»DWTAP EQU /22 HEAD POSITION POINTER «, t00=0x0009, t01=0x003a}
0x0e70…0e7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0066}
0x0e7a…0e88 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0070}
0x0e88…0e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007e}
0x0e92…0e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0088}
0x0e9c…0eb2 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x0092}
0x0eb2…0ec8 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x00a8}
0x0ec8…0ede Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x00be}
0x0ede…0ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d4}
0x0ee8…0ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00de}
0x0ef2…0f30 Head {h00=0x003a, h01=0x0050, text=»SOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY «, t00=0x0009, t01=0x00e8}
0x0f30…0f54 Head {h00=0x0020, h01=0x0050, text=»STX EQU /82 START OF MESSAGE«, t00=0x0009, t01=0x0126}
0x0f54…0f76 Head {h00=0x001e, h01=0x0050, text=»ETB EQU /97 END OF MESSAGE«, t00=0x0009, t01=0x014a}
0x0f76…0f94 Head {h00=0x001a, h01=0x0050, text=»ETX EQU /03 LAST DUMMY«, t00=0x0009, t01=0x016c}
0x0f94…0fb6 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0009, t01=0x018a}
0x0fb6…0fd2 Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x000a, t01=0x001c}
0x0fd2…0ff0 Head {h00=0x001a, h01=0x0050, text=»FFED EQU /0C FORM FEED«, t00=0x000a, t01=0x0038}
0x0ff0…100c Head {h00=0x0018, h01=0x0050, text=»SPACE EQU /20 SPACE «, t00=0x000a, t01=0x0056}
0x100c…1040 Head {h00=0x0030, h01=0x0050, text=»PROUT EQU /04 PAPER OUT OR READY SWITCH OFF «, t00=0x000a, t01=0x0072}
0x1040…104e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00a6}
0x104e…107c Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000a, t01=0x00b4}
0x107c…10aa Head {h00=0x002a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000a, t01=0x00e2}
0x10aa…10d8 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000a, t01=0x0110}
0x10d8…10e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x013e}
0x10e2…1118 Head {h00=0x0032, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT «, t00=0x000a, t01=0x0148}
0x1118…1140 Head {h00=0x0024, h01=0x0050, text=»* FUNCTION BY SETTING X:A = 0«, t00=0x000a, t01=0x017e}
0x1140…114a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0016}
0x114a…115c Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000b, t01=0x0020}
0x115c…1170 Head {h00=0x0010, h01=0x0050, text=»CROOM EQU 1 «, t00=0x000b, t01=0x0032}
0x1170…117a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0046}
0x117a…11b2 Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE «, t00=0x000b, t01=0x0050}
0x11b2…11e6 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:B=1«, t00=0x000b, t01=0x0088}
0x11e6…11f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00bc}
0x11f0…1202 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000b, t01=0x00c6}
0x1202…1216 Head {h00=0x0010, h01=0x0050, text=»TRETON EQU 0«, t00=0x000b, t01=0x00d8}
0x1216…1220 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ec}
0x1220…1258 Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE «, t00=0x000b, t01=0x00f6}
0x1258…128c Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:C=1«, t00=0x000b, t01=0x012e}
0x128c…1296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0162}
0x1296…12a8 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000b, t01=0x016c}
0x12a8…12bc Head {h00=0x0010, h01=0x0050, text=»FJOTON EQU 0«, t00=0x000b, t01=0x017e}
0x12bc…12c6 (12, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0004}
0x12c6…12f8 Head {h00=0x002e, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ECHOING OF «, t00=0x000c, t01=0x000e}
0x12f8…1328 Head {h00=0x002c, h01=0x0050, text=»* AN EXTRA SPACE AFTER EACH CHARACTER«, t00=0x000c, t01=0x0040}
0x1328…1344 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:D=0«, t00=0x000c, t01=0x0070}
0x1344…134e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008c}
0x134e…1360 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x000c, t01=0x0096}
0x1360…1374 Head {h00=0x0010, h01=0x0050, text=»COSPAC EQU 1«, t00=0x000c, t01=0x00a8}
0x1374…137e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00bc}
0x137e…13ba Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x000c, t01=0x00c6}
0x13ba…13f6 Head {h00=0x0038, h01=0x0050, text=»* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER.«, t00=0x000c, t01=0x0102}
0x13f6…1432 Head {h00=0x0038, h01=0x0050, text=»* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0.«, t00=0x000c, t01=0x013e}
0x1432…143c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x017a}
0x143c…144e Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000c, t01=0x0184}
0x144e…1462 Head {h00=0x0010, h01=0x0050, text=»EORECH EQU 0«, t00=0x000d, t01=0x0008}
0x1462…146c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001c}
0x146c…14a4 Head {h00=0x0034, h01=0x0050, text=»* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE«, t00=0x000d, t01=0x0026}
0x14a4…14c2 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:F=1 «, t00=0x000d, t01=0x005e}
0x14c2…14cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007c}
0x14cc…14de Head {h00=0x000e, h01=0x0050, text=»X:F EQU 0 «, t00=0x000d, t01=0x0086}
0x14de…14f2 Head {h00=0x0010, h01=0x0050, text=»SUPSPA EQU 0«, t00=0x000d, t01=0x0098}
0x14f2…14fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ac}
0x14fc…1528 Head {h00=0x0028, h01=0x0050, text=»* END OF REQUEST IN SITUATIONS WHERE«, t00=0x000d, t01=0x00b6}
0x1528…1558 Head {h00=0x002c, h01=0x0050, text=»* THE SELECTOR UNIT OR PRINTER HARDWARE «, t00=0x000d, t01=0x00e2}
0x1558…1586 Head {h00=0x002a, h01=0x0050, text=»* IS INACTIVE CAN BE CHOSEN BY SETTING«, t00=0x000d, t01=0x0112}
0x1586…15a8 Head {h00=0x001e, h01=0x0050, text=»* THE CONSTANT RECEND = 1 «, t00=0x000d, t01=0x0140}
0x15a8…15ba Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x000d, t01=0x0162}
0x15ba…15ce Head {h00=0x0010, h01=0x0050, text=»RECEND EQU 0«, t00=0x000d, t01=0x0174}
0x15ce…15dc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0188}
0x15dc…160a Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000e, t01=0x0008}
0x160a…163a Head {h00=0x002c, h01=0x0050, text=»* SPECIAL KEYS FOR ECHO FUNCTION * «, t00=0x000e, t01=0x0036}
0x163a…1668 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000e, t01=0x0066}
0x1668…1672 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0094}
0x1672…1692 Head {h00=0x001c, h01=0x0050, text=»GPBSP EQU /2D BACK SPACE«, t00=0x000e, t01=0x009e}
0x1692…16ae Head {h00=0x0018, h01=0x0050, text=»GPCLR EQU /3F CLEAR «, t00=0x000e, t01=0x00be}
0x16ae…16b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00da}
0x16b8…16d4 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x00e4}
0x16d4…16f0 Head {h00=0x0018, h01=0x0050, text=»* RETURN CODES *«, t00=0x000e, t01=0x0100}
0x16f0…170c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x011c}
0x170c…1716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0138}
0x1716…174a Head {h00=0x0030, h01=0x0050, text=»PAROUT EQU /20 PAPER OUT OR READY SWITCH OFF«, t00=0x000e, t01=0x0142}
0x174a…1770 Head {h00=0x0022, h01=0x0050, text=»CCERR EQU /4 CODE CHECK ERROR «, t00=0x000e, t01=0x0176}
0x1770…1796 Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x000f, t01=0x000c}
0x1796…17c2 Head {h00=0x0028, h01=0x0050, text=»OPERR EQU /1 NOT OPERABLE, POWER OFF«, t00=0x000f, t01=0x0032}
0x17c2…17cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005e}
0x17cc…17da Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0068}
0x17da…17e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0076}
0x17e4…17ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0080}
0x17ee…1800 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x008a}
0x1800…1812 Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x000f, t01=0x009c}
0x1812…1824 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x00ae}
0x1824…182e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c0}
0x182e…1838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ca}
0x1838…184c Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x000f, t01=0x00d4}
0x184c…1856 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e8}
0x1856…186a Head {h00=0x0010, h01=0x0050, text=»ROMTAB EQU *«, t00=0x000f, t01=0x00f2}
0x186a…1898 Head {h00=0x002a, h01=0x0050, text=» TABLE FOR ROOMLESS POINT CHARACTERS«, t00=0x000f, t01=0x0106}
0x1898…18c4 Head {h00=0x0028, h01=0x0050, text=» DATA /2122,/2426,/3B3C,/3E40,/5E5F «, t00=0x000f, t01=0x0134}
0x18c4…18ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0160}
0x18ce…18da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x016a}
0x18da…18e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0176}
0x18e4…18ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0180}
0x18ee…18f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x018a}
0x18f8…1918 (16, 0, 400) Head {h00=0x001c, h01=0x0050, text=»GPAD EQU * ADDRESS BLOCK«, t00=0x0010, t01=0x0004}
0x1918…193c Head {h00=0x0020, h01=0x0050, text=» DATA ACGP ACTIVATION DRIVER«, t00=0x0010, t01=0x0024}
0x193c…1960 Head {h00=0x0020, h01=0x0050, text=» DATA IHGP INTERRUPT HANDLER«, t00=0x0010, t01=0x0048}
0x1960…1984 Head {h00=0x0020, h01=0x0050, text=» DATA RCGP RECOVERY ROUTINE «, t00=0x0010, t01=0x006c}
0x1984…19b6 Head {h00=0x002e, h01=0x0050, text=» DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE«, t00=0x0010, t01=0x0090}
0x19b6…19c4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00c2}
0x19c4…19ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d0}
0x19ce…19e2 Head {h00=0x0010, h01=0x0050, text=»* A C G P«, t00=0x0010, t01=0x00da}
0x19e2…19ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ee}
0x19ec…1a22 Head {h00=0x0032, h01=0x0050, text=»* ACGP = ACTIVATION DRIVER GENERAL PRINTER «, t00=0x0010, t01=0x00f8}
0x1a22…1a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012e}
0x1a2c…1a78 Head {h00=0x0048, h01=0x0050, text=»* ORDER 00: TEST STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE«, t00=0x0010, t01=0x0138}
0x1a78…1ab8 Head {h00=0x003c, h01=0x0050, text=»* IS SET IF PAPER OUT OR READY SWITCH OFF. «, t00=0x0010, t01=0x0184}
0x1ab8…1b04 Head {h00=0x0048, h01=0x0050, text=»* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM«, t00=0x0011, t01=0x0034}
0x1b04…1b28 Head {h00=0x0020, h01=0x0050, text=»* CHANNEL UNIT.«, t00=0x0011, t01=0x0080}
0x1b28…1b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a4}
0x1b32…1b74 Head {h00=0x003e, h01=0x0050, text=»* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER «, t00=0x0011, t01=0x00ae}
0x1b74…1b9a Head {h00=0x0022, h01=0x0050, text=»* FROM ECB-BUFFER«, t00=0x0011, t01=0x00f0}
0x1b9a…1ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0116}
0x1ba4…1bee Head {h00=0x0046, h01=0x0050, text=»* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO PRINTER FROM«, t00=0x0011, t01=0x0120}
0x1bee…1c2e Head {h00=0x003c, h01=0x0050, text=»* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. «, t00=0x0011, t01=0x016a}
0x1c2e…1c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x001a}
0x1c38…1c4a Head {h00=0x000e, h01=0x0050, text=»ACGP EQU *«, t00=0x0012, t01=0x0024}
0x1c4a…1c6e Head {h00=0x0020, h01=0x0050, text=» LDK A2,STX START OF MESSAGE«, t00=0x0012, t01=0x0036}
0x1c6e…1c92 Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RESET BUFFER INDEX«, t00=0x0012, t01=0x005a}
0x1c92…1ca4 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0012, t01=0x007e}
0x1ca4…1cc0 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0012, t01=0x0090}
0x1cc0…1cd6 Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP410 «, t00=0x0012, t01=0x00ac}
0x1cd6…1cf0 Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0012, t01=0x00c2}
0x1cf0…1d06 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP05 «, t00=0x0012, t01=0x00dc}
0x1d06…1d20 Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 ORDER 6?«, t00=0x0012, t01=0x00f2}
0x1d20…1d4a Head {h00=0x0026, h01=0x0050, text=» ABL(NE) DISIOE I/O REQUEST ERROR «, t00=0x0012, t01=0x010c}
0x1d4a…1d72 Head {h00=0x0024, h01=0x0050, text=» LD A1,4,A8 GET REQUESTED LENGTH«, t00=0x0012, t01=0x0136}
0x1d72…1d88 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP02 «, t00=0x0012, t01=0x015e}
0x1d88…1dae Head {h00=0x0022, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS«, t00=0x0012, t01=0x0174}
0x1dae…1dd8 Head {h00=0x0026, h01=0x0050, text=» LC A3,1,A3 GET CONTROL CHARACTER «, t00=0x0013, t01=0x000a}
0x1dd8…1dec Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0013, t01=0x0034}
0x1dec…1e00 Head {h00=0x0010, h01=0x0050, text=»ACGP02 EQU *«, t00=0x0013, t01=0x0048}
0x1e00…1e2e Head {h00=0x002a, h01=0x0050, text=» SUK A3,/2B POSITIONING BEFORE WRITE? «, t00=0x0013, t01=0x005c}
0x1e2e…1e44 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP12 «, t00=0x0013, t01=0x008a}
0x1e44…1e76 Head {h00=0x002e, h01=0x0050, text=» LDK A4,2 INDICATE CR AND LF/FFED TO SEND «, t00=0x0013, t01=0x00a0}
0x1e76…1e84 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x00d2}
0x1e84…1e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e0}
0x1e8e…1ec0 Head {h00=0x002e, h01=0x0050, text=»* SEND DUMMY AND, IF CONTROL CHARACTER «, t00=0x0013, t01=0x00ea}
0x1ec0…1ef6 Head {h00=0x0032, h01=0x0050, text=»* # 2B, SEND CARRIAGE RETURN AND LINE FEED «, t00=0x0013, t01=0x011c}
0x1ef6…1f00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0152}
0x1f00…1f14 Head {h00=0x0010, h01=0x0050, text=»ACGP05 EQU *«, t00=0x0013, t01=0x015c}
0x1f14…1f38 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0013, t01=0x0170}
0x1f38…1f4a (20, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0014, t01=0x0004}
0x1f4a…1f74 Head {h00=0x0026, h01=0x0050, text=» RF(N) ACGP19 START SECTION ENDED?«, t00=0x0014, t01=0x0016}
0x1f74…1f8e Head {h00=0x0016, h01=0x0050, text=» RF(P) ACGP15 STX «, t00=0x0014, t01=0x0040}
0x1f8e…1f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005a}
0x1f98…1fc0 Head {h00=0x0024, h01=0x0050, text=»* SEND LINE FEED OR FORM FEED«, t00=0x0014, t01=0x0064}
0x1fc0…1fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x008c}
0x1fca…1ff4 Head {h00=0x0026, h01=0x0050, text=» SUK A3,5 CONTROL CHARACTER /30 ? «, t00=0x0014, t01=0x0096}
0x1ff4…200a Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP07«, t00=0x0014, t01=0x00c0}
0x200a…2038 Head {h00=0x002a, h01=0x0050, text=» ADK A4,1 YES EXTRA LINE FEED TO SEND «, t00=0x0014, t01=0x00d6}
0x2038…204c Head {h00=0x0010, h01=0x0050, text=»ACGP07 EQU *«, t00=0x0014, t01=0x0104}
0x204c…205e Head {h00=0x000e, h01=0x0050, text=» LDK A2,LF«, t00=0x0014, t01=0x0118}
0x205e…2088 Head {h00=0x0026, h01=0x0050, text=»ACGP12 LDK A3,2 START BUFFER INDEX«, t00=0x0014, t01=0x012a}
0x2088…209a Head {h00=0x000e, h01=0x0050, text=» RB ACGP05«, t00=0x0014, t01=0x0154}
0x209a…20d4 Head {h00=0x0036, h01=0x0050, text=»ACGP15 ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x0014, t01=0x0166}
0x20d4…20f6 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x0015, t01=0x0010}
0x20f6…2108 Head {h00=0x000e, h01=0x0050, text=» RB ACGP05«, t00=0x0015, t01=0x0032}
0x2108…2116 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0044}
0x2116…2120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0052}
0x2120…214a Head {h00=0x0026, h01=0x0050, text=»* GET, CHECK AND SEND CHARACTER«, t00=0x0015, t01=0x005c}
0x214a…216c Head {h00=0x001e, h01=0x0050, text=»* (IF ORDER 5 NO CHECK)«, t00=0x0015, t01=0x0086}
0x216c…2176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a8}
0x2176…2192 Head {h00=0x0018, h01=0x0050, text=»ACGP17 CF A5,OUTPUT «, t00=0x0015, t01=0x00b2}
0x2192…21c6 Head {h00=0x0030, h01=0x0050, text=»ACGP18 IM DWTST,A6 POSITION COUNTER UPDATING«, t00=0x0015, t01=0x00ce}
0x21c6…21da Head {h00=0x0010, h01=0x0050, text=»ACGP19 EQU *«, t00=0x0015, t01=0x0102}
0x21da…2208 Head {h00=0x002a, h01=0x0050, text=» LDKL A4,/400 INDICATE LINE FEED DONE «, t00=0x0015, t01=0x0116}
0x2208…2220 Head {h00=0x0014, h01=0x0050, text=» ORS A4,DWTST,A6«, t00=0x0015, t01=0x0144}
0x2220…2236 Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0015, t01=0x015c}
0x2236…226e Head {h00=0x0034, h01=0x0050, text=» CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER «, t00=0x0015, t01=0x0172}
0x226e…227a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x001a}
0x227a…228c Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0016, t01=0x0026}
0x228c…22c6 Head {h00=0x0036, h01=0x0050, text=»ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER«, t00=0x0016, t01=0x0038}
0x22c6…22e8 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER?«, t00=0x0016, t01=0x0072}
0x22e8…22fe Head {h00=0x0012, h01=0x0050, text=» RF(NP) AGP400«, t00=0x0016, t01=0x0094}
0x22fe…2310 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0016, t01=0x00aa}
0x2310…232a Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0016, t01=0x00bc}
0x232a…234c Head {h00=0x001e, h01=0x0050, text=» RF(E) ACGP24 BASIC WRITE «, t00=0x0016, t01=0x00d6}
0x234c…2374 Head {h00=0x0024, h01=0x0050, text=» SUK A1,9 HARDWARE TABULATION ? «, t00=0x0016, t01=0x00f8}
0x2374…238a Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP22«, t00=0x0016, t01=0x0120}
0x238a…23be Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x0016, t01=0x0136}
0x23be…23d0 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0016, t01=0x016a}
0x23d0…23fe Head {h00=0x002a, h01=0x0050, text=»ACGP22 SUK A1,8 TABULATION CHARACTER ?«, t00=0x0016, t01=0x017c}
0x23fe…2414 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP40 «, t00=0x0017, t01=0x001a}
0x2414…241e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0030}
0x241e…2434 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x0017, t01=0x003a}
0x2434…244a Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x0017, t01=0x0050}
0x244a…2454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0066}
0x2454…2476 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/F LESS THAN /20 ?«, t00=0x0017, t01=0x0070}
0x2476…2480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0092}
0x2480…248c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x009c}
0x248c…2496 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a8}
0x2496…24ac Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x0017, t01=0x00b2}
0x24ac…24c2 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x0017, t01=0x00c8}
0x24c2…24cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00de}
0x24cc…24e2 Head {h00=0x0012, h01=0x0050, text=» SUK A1,3 /14?«, t00=0x0017, t01=0x00e8}
0x24e2…24f8 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0017, t01=0x00fe}
0x24f8…251a Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x0017, t01=0x0114}
0x251a…2524 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0136}
0x2524…2530 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0140}
0x2530…253a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x014c}
0x253a…2544 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0156}
0x2544…255a Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x0017, t01=0x0160}
0x255a…2570 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x0017, t01=0x0176}
0x2570…257a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x018c}
0x257a…2592 Head {h00=0x0014, h01=0x0050, text=» SUK A1,2 /13 ? «, t00=0x0018, t01=0x0008}
0x2592…25a8 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0018, t01=0x0020}
0x25a8…25ca Head {h00=0x001e, h01=0x0050, text=» SUK A1,/D LESS THAN /20 ?«, t00=0x0018, t01=0x0036}
0x25ca…25d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0058}
0x25d6…25e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0064}
0x25e0…25ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x006e}
0x25ea…2600 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x0018, t01=0x0078}
0x2600…2616 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x0018, t01=0x008e}
0x2616…2620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00a4}
0x2620…2636 Head {h00=0x0012, h01=0x0050, text=» SUK A1,2 /13?«, t00=0x0018, t01=0x00ae}
0x2636…264c Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0018, t01=0x00c4}
0x264c…2662 Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 /14?«, t00=0x0018, t01=0x00da}
0x2662…2678 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0018, t01=0x00f0}
0x2678…269a Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x0018, t01=0x0106}
0x269a…26a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0128}
0x26a4…26b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0132}
0x26b0…26ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x013e}
0x26ba…26e0 Head {h00=0x0022, h01=0x0050, text=» RF(N) ACGP30 CODE CHECK ERROR«, t00=0x0018, t01=0x0148}
0x26e0…270a Head {h00=0x0026, h01=0x0050, text=» SUK A1,/8E ROOMLESS POINT? (AE) «, t00=0x0018, t01=0x016e}
0x270a…2720 Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP100 «, t00=0x0019, t01=0x0008}
0x2720…2744 Head {h00=0x0020, h01=0x0050, text=» ADK A1,/4F GREATER THAN /5F«, t00=0x0019, t01=0x001e}
0x2744…275a Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP17«, t00=0x0019, t01=0x0042}
0x275a…276e Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x0019, t01=0x0058}
0x276e…2784 Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACGP30«, t00=0x0019, t01=0x006c}
0x2784…27be Head {h00=0x0036, h01=0x0050, text=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F«, t00=0x0019, t01=0x0082}
0x27be…27e8 Head {h00=0x0026, h01=0x0050, text=» TO CHARACTER BETWEEN /40 TO /5F«, t00=0x0019, t01=0x00bc}
0x27e8…27fa Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0019, t01=0x00e6}
0x27fa…280e Head {h00=0x0010, h01=0x0050, text=»ACGP24 EQU *«, t00=0x0019, t01=0x00f8}
0x280e…2820 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/D«, t00=0x0019, t01=0x010c}
0x2820…283e Head {h00=0x001a, h01=0x0050, text=» RF(NZ) ACGP26 NOT CR «, t00=0x0019, t01=0x011e}
0x283e…2864 Head {h00=0x0022, h01=0x0050, text=» CM DWTST,A6 SET POS LTR.TO 0 «, t00=0x0019, t01=0x013c}
0x2864…2890 Head {h00=0x0028, h01=0x0050, text=» CM DWTAP,A6 RESET HEAD POS.POIINTER«, t00=0x0019, t01=0x0162}
0x2890…28a8 Head {h00=0x0014, h01=0x0050, text=»ACGP26 ADK A1,3 «, t00=0x0019, t01=0x018e}
0x28a8…28cc Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ACGP17 NOT LINE FEED«, t00=0x001a, t01=0x0016}
0x28cc…28de Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001a, t01=0x003a}
0x28de…290c Head {h00=0x002a, h01=0x0050, text=» ADS A1,DWTST,A6 DECREMENT POS COUNTER«, t00=0x001a, t01=0x004c}
0x290c…291e Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001a, t01=0x007a}
0x291e…292c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x008c}
0x292c…2936 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x009a}
0x2936…2954 Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x001a, t01=0x00a4}
0x2954…295e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00c2}
0x295e…2972 Head {h00=0x0010, h01=0x0050, text=»ACGP30 EQU *«, t00=0x001a, t01=0x00cc}
0x2972…2988 Head {h00=0x0012, h01=0x0050, text=» LDK A1,CCERR «, t00=0x001a, t01=0x00e0}
0x2988…29a8 Head {h00=0x001c, h01=0x0050, text=» ORS A1,8,A8 RETURN CODE«, t00=0x001a, t01=0x00f6}
0x29a8…29ba Head {h00=0x000e, h01=0x0050, text=» RB ACGP20«, t00=0x001a, t01=0x0116}
0x29ba…29c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0128}
0x29c8…29d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0136}
0x29d2…29ea Head {h00=0x0014, h01=0x0050, text=»* TABULATION «, t00=0x001a, t01=0x0140}
0x29ea…29f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0158}
0x29f4…2a08 Head {h00=0x0010, h01=0x0050, text=»ACGP40 EQU *«, t00=0x001a, t01=0x0162}
0x2a08…2a38 Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR GET FIRST ASCII CHARACTER«, t00=0x001a, t01=0x0176}
0x2a38…2a4a Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001b, t01=0x0016}
0x2a4a…2a7c Head {h00=0x002e, h01=0x0050, text=» CF A15,GETCHR GET SECOND ASCII CHARACTER «, t00=0x001b, t01=0x0028}
0x2a7c…2a8e Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001b, t01=0x005a}
0x2a8e…2aa0 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x001b, t01=0x006c}
0x2aa0…2ab6 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP44 «, t00=0x001b, t01=0x007e}
0x2ab6…2aea Head {h00=0x0030, h01=0x0050, text=»ACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL«, t00=0x001b, t01=0x0094}
0x2aea…2afc Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001b, t01=0x00c8}
0x2afc…2b12 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP43«, t00=0x001b, t01=0x00da}
0x2b12…2b4e Head {h00=0x0038, h01=0x0050, text=»ACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER«, t00=0x001b, t01=0x00f0}
0x2b4e…2b66 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTBC,A6 «, t00=0x001b, t01=0x012c}
0x2b66…2b96 Head {h00=0x002c, h01=0x0050, text=» SUR A2,A4 AND REQUESTS POSITION COUNTER«, t00=0x001b, t01=0x0144}
0x2b96…2bc0 Head {h00=0x0026, h01=0x0050, text=» TO GET NUMBER OF SPACES TO SEND«, t00=0x001b, t01=0x0174}
0x2bc0…2bd6 Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP20«, t00=0x001c, t01=0x000e}
0x2bd6…2be8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001c, t01=0x0024}
0x2be8…2c26 Head {h00=0x003a, h01=0x0050, text=»ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE«, t00=0x001c, t01=0x0036}
0x2c26…2c42 Head {h00=0x0018, h01=0x0050, text=»ACGP46 CF A5,OUTPUT «, t00=0x001c, t01=0x0074}
0x2c42…2c6e Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BUFFER INDEX «, t00=0x001c, t01=0x0090}
0x2c6e…2c80 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001c, t01=0x00bc}
0x2c80…2c96 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP45«, t00=0x001c, t01=0x00ce}
0x2c96…2cb2 Head {h00=0x0018, h01=0x0050, text=» LDR A3,A3 RECOVERY?«, t00=0x001c, t01=0x00e4}
0x2cb2…2cc8 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP20«, t00=0x001c, t01=0x0100}
0x2cc8…2cf6 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTBC,A6 RESET POSITION POINTER«, t00=0x001c, t01=0x0116}
0x2cf6…2d1a Head {h00=0x0020, h01=0x0050, text=» LDK A3,2 START BUFFER INDEX«, t00=0x001c, t01=0x0144}
0x2d1a…2d2c Head {h00=0x000e, h01=0x0050, text=» RB ACGP19«, t00=0x001c, t01=0x0168}
0x2d2c…2d3a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x017a}
0x2d3a…2d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0188}
0x2d44…2d60 (29, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* ROOMLESS POINT «, t00=0x001d, t01=0x0004}
0x2d60…2d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0020}
0x2d6a…2d7e Head {h00=0x0010, h01=0x0050, text=»AGP100 EQU *«, t00=0x001d, t01=0x002a}
0x2d7e…2d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x003e}
0x2d88…2d9c Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x001d, t01=0x0048}
0x2d9c…2da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x005c}
0x2da6…2dd2 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CHARACTER TO SEND«, t00=0x001d, t01=0x0066}
0x2dd2…2de4 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001d, t01=0x0092}
0x2de4…2e06 Head {h00=0x001e, h01=0x0050, text=» LC A2,ROMTAB,A2 TRANSFORM«, t00=0x001d, t01=0x00a4}
0x2e06…2e10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c6}
0x2e10…2e1c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00d0}
0x2e1c…2e26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00dc}
0x2e26…2e30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00e6}
0x2e30…2e44 Head {h00=0x0010, h01=0x0050, text=» IFF CROOM=1«, t00=0x001d, t01=0x00f0}
0x2e44…2e4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0104}
0x2e4e…2e62 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x001d, t01=0x010e}
0x2e62…2e6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0122}
0x2e6c…2e78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x012c}
0x2e78…2e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0138}
0x2e82…2e94 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x0142}
0x2e94…2ea2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0154}
0x2ea2…2eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0162}
0x2eac…2eb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x016c}
0x2eb6…2ee2 Head {h00=0x0028, h01=0x0050, text=»* SEND LAST DUMMY , LOAD A1 WITH «, t00=0x001d, t01=0x0176}
0x2ee2…2f06 Head {h00=0x0020, h01=0x0050, text=»* RETURN CODE AND END I/O«, t00=0x001e, t01=0x0012}
0x2f06…2f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0036}
0x2f10…2f24 Head {h00=0x0010, h01=0x0050, text=»AGP400 EQU *«, t00=0x001e, t01=0x0040}
0x2f24…2f46 Head {h00=0x001e, h01=0x0050, text=» LDK A2,ETB END OF MESSAGE«, t00=0x001e, t01=0x0054}
0x2f46…2f60 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x001e, t01=0x0076}
0x2f60…2f84 Head {h00=0x0020, h01=0x0050, text=»AGP410 LDK A2,ETX LAST DUMMY«, t00=0x001e, t01=0x0090}
0x2f84…2f9e Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x001e, t01=0x00b4}
0x2f9e…2fb2 Head {h00=0x0010, h01=0x0050, text=»AGP420 EQU *«, t00=0x001e, t01=0x00ce}
0x2fb2…2fe6 Head {h00=0x0030, h01=0x0050, text=» CF A15,UPDAPP UPDATE HEAD POSITION COUNTER «, t00=0x001e, t01=0x00e2}
0x2fe6…300a Head {h00=0x0020, h01=0x0050, text=»ENDIO CF A15,TENDIO END I/O «, t00=0x001e, t01=0x0116}
0x300a…3032 Head {h00=0x0024, h01=0x0050, text=»EXIT ABL TDISP GO TO DISPATCHER «, t00=0x001e, t01=0x013a}
0x3032…3046 Head {h00=0x0010, h01=0x0050, text=»AGP430 EQU *«, t00=0x001e, t01=0x0162}
0x3046…305e Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x001e, t01=0x0176}
0x305e…307e Head {h00=0x001c, h01=0x0050, text=» ST A3,6,A8 EFF. LENGTH «, t00=0x001e, t01=0x018e}
0x307e…3090 Head {h00=0x000e, h01=0x0050, text=» RB AGP420«, t00=0x001f, t01=0x001e}
0x3090…309e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0030}
0x309e…30a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x003e}
0x30a8…30b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0048}
0x30b2…30e2 Head {h00=0x002c, h01=0x0050, text=»* UPDAPP = SUBROUTINE TO UPDATE HEAD «, t00=0x001f, t01=0x0052}
0x30e2…3112 Head {h00=0x002c, h01=0x0050, text=»* POSITION POINTER WHEN END «, t00=0x001f, t01=0x0082}
0x3112…313e Head {h00=0x0028, h01=0x0050, text=»* OF REQUEST IS REACHED «, t00=0x001f, t01=0x00b2}
0x313e…3152 Head {h00=0x0010, h01=0x0050, text=»UPDAPP EQU *«, t00=0x001f, t01=0x00de}
0x3152…317e Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTBC,A6 GET POSITION COUNTER«, t00=0x001f, t01=0x00f2}
0x317e…31b4 Head {h00=0x0032, h01=0x0050, text=» ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER «, t00=0x001f, t01=0x011e}
0x31b4…31c6 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001f, t01=0x0154}
0x31c6…31f6 Head {h00=0x002c, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER «, t00=0x001f, t01=0x0166}
0x31f6…3206 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0020, t01=0x0008}
0x3206…321c Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0020, t01=0x0018}
0x321c…322a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x002e}
0x322a…3234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x003c}
0x3234…323e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0046}
0x323e…326c Head {h00=0x002a, h01=0x0050, text=»* SKIPSP = SUBROTINE TO SKIP SPACES«, t00=0x0020, t01=0x0050}
0x326c…3298 Head {h00=0x0028, h01=0x0050, text=»* IN END OF ECB-BUFFER. «, t00=0x0020, t01=0x007e}
0x3298…32d2 Head {h00=0x0036, h01=0x0050, text=»* REQUESTED LENGTH IN ECB IS UPDATED. «, t00=0x0020, t01=0x00aa}
0x32d2…32fc Head {h00=0x0026, h01=0x0050, text=»* A1,A2,A4 - WORK REG «, t00=0x0020, t01=0x00e4}
0x32fc…3306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x010e}
0x3306…331a Head {h00=0x0010, h01=0x0050, text=»SKIPSP EQU *«, t00=0x0020, t01=0x0118}
0x331a…3346 Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS (BA) «, t00=0x0020, t01=0x012c}
0x3346…3372 Head {h00=0x0028, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH(RL)«, t00=0x0020, t01=0x0158}
0x3372…339a Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 GET ADD END OF BUFFER«, t00=0x0020, t01=0x0184}
0x339a…33b2 Head {h00=0x0014, h01=0x0050, text=»SKIP05 CWK A2,2 «, t00=0x0021, t01=0x001c}
0x33b2…33d0 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 3 «, t00=0x0021, t01=0x0034}
0x33d0…33ea Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 DECR. BA«, t00=0x0021, t01=0x0052}
0x33ea…3406 Head {h00=0x0018, h01=0x0050, text=» LCR A4,A1 GET CHAR «, t00=0x0021, t01=0x006c}
0x3406…3424 Head {h00=0x001a, h01=0x0050, text=» CCK A4,/2020 SPACE ? «, t00=0x0021, t01=0x0088}
0x3424…343e Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP20 NO «, t00=0x0021, t01=0x00a6}
0x343e…345e Head {h00=0x001c, h01=0x0050, text=»SKIP07 SUK A2,1 DECR RL «, t00=0x0021, t01=0x00c0}
0x345e…347a Head {h00=0x0018, h01=0x0050, text=» RB SKIP05 GET NEXT «, t00=0x0021, t01=0x00e0}
0x347a…3492 Head {h00=0x0014, h01=0x0050, text=»SKIP20 CWK A2,4 «, t00=0x0021, t01=0x00fc}
0x3492…34b0 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 5 «, t00=0x0021, t01=0x0114}
0x34b0…34ce Head {h00=0x001a, h01=0x0050, text=» LC A4,-2,A1 GET CHAR «, t00=0x0021, t01=0x0132}
0x34ce…34f6 Head {h00=0x0024, h01=0x0050, text=» CCK A4,/1111 TABULATION CHAR ? «, t00=0x0021, t01=0x0150}
0x34f6…3510 Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP30 NO «, t00=0x0021, t01=0x0178}
0x3510…352a (34, 0, 400) Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 DECR BA «, t00=0x0022, t01=0x0004}
0x352a…3544 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 DECR RL «, t00=0x0022, t01=0x001e}
0x3544…3560 Head {h00=0x0018, h01=0x0050, text=» RB SKIP07 GET NEXT «, t00=0x0022, t01=0x0038}
0x3560…356a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0054}
0x356a…3590 Head {h00=0x0022, h01=0x0050, text=»SKIP30 ST A2,4,A8 STORE NEW RL«, t00=0x0022, t01=0x005e}
0x3590…35a0 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0022, t01=0x0084}
0x35a0…35ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0094}
0x35ac…35ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x00a0}
0x35ba…35c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ae}
0x35c4…35d8 Head {h00=0x0010, h01=0x0050, text=»* I H G P«, t00=0x0022, t01=0x00b8}
0x35d8…35e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00cc}
0x35e2…35f8 Head {h00=0x0012, h01=0x0050, text=»* INTERRUPT«, t00=0x0022, t01=0x00d6}
0x35f8…3602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ec}
0x3602…3614 Head {h00=0x000e, h01=0x0050, text=»IHGP EQU *«, t00=0x0022, t01=0x00f6}
0x3614…3632 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 BUSY? «, t00=0x0022, t01=0x0108}
0x3632…3648 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0022, t01=0x0126}
0x3648…3666 Head {h00=0x001a, h01=0x0050, text=» SLL A4,2 ECHO MODE ? «, t00=0x0022, t01=0x013c}
0x3666…367c Head {h00=0x0012, h01=0x0050, text=» RF(N) IHGP10 «, t00=0x0022, t01=0x015a}
0x367c…3698 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0022, t01=0x0170}
0x3698…36ae Head {h00=0x0012, h01=0x0050, text=» RB(Z) AGP430 «, t00=0x0022, t01=0x018c}
0x36ae…36e0 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ?«, t00=0x0023, t01=0x0012}
0x36e0…36f6 Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=0 «, t00=0x0023, t01=0x0044}
0x36f6…370a Head {h00=0x0010, h01=0x0050, text=» RB(NZ) EXIT«, t00=0x0023, t01=0x005a}
0x370a…3716 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x006e}
0x3716…372c Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=1 «, t00=0x0023, t01=0x007a}
0x372c…3742 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AGP430«, t00=0x0023, t01=0x0090}
0x3742…374e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x00a6}
0x374e…3756 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x00b2}
0x3756…378e Head {h00=0x0034, h01=0x0050, text=»IHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x0023, t01=0x00ba}
0x378e…379c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00f2}
0x379c…37a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0100}
0x37a6…37be Head {h00=0x0014, h01=0x0050, text=»* E C H O G P«, t00=0x0023, t01=0x010a}
0x37be…37c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0122}
0x37c8…37fc Head {h00=0x0030, h01=0x0050, text=»* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0023, t01=0x012c}
0x37fc…3806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0160}
0x3806…381a Head {h00=0x0010, h01=0x0050, text=»ECHOGP EQU *«, t00=0x0023, t01=0x016a}
0x381a…3830 Head {h00=0x0012, h01=0x0050, text=» LDK A4,COSPAC«, t00=0x0023, t01=0x017e}
0x3830…3848 (36, 0, 400) Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 EOR? «, t00=0x0024, t01=0x0004}
0x3848…3862 Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP17 YES «, t00=0x0024, t01=0x001c}
0x3862…386c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0036}
0x386c…3882 Head {h00=0x0012, h01=0x0050, text=» IFT EORECH=0 «, t00=0x0024, t01=0x0040}
0x3882…388c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0056}
0x388c…38ae Head {h00=0x001e, h01=0x0050, text=» SUK A2,/80 EOR-CHARACTER «, t00=0x0024, t01=0x0060}
0x38ae…38c8 Head {h00=0x0016, h01=0x0050, text=» RF(NN) ECGP20 YES«, t00=0x0024, t01=0x0082}
0x38c8…38dc Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x0024, t01=0x009c}
0x38dc…38e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b0}
0x38e6…38f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00ba}
0x38f2…38fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c6}
0x38fc…390e Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0024, t01=0x00d0}
0x390e…3920 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/8«, t00=0x0024, t01=0x00e2}
0x3920…3940 Head {h00=0x001c, h01=0x0050, text=» RF(E) ECGP40 BACKSPACE «, t00=0x0024, t01=0x00f4}
0x3940…3954 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x0024, t01=0x0114}
0x3954…3970 Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP50 CLEAR «, t00=0x0024, t01=0x0128}
0x3970…399a Head {h00=0x0026, h01=0x0050, text=»ECGP10 CF A5,OUTPUT SEND CHARACTER«, t00=0x0024, t01=0x0144}
0x399a…39c6 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 UPDATE POSITION COUNTER«, t00=0x0024, t01=0x016e}
0x39c6…39e0 Head {h00=0x0016, h01=0x0050, text=» SUK A4,1 READY ? «, t00=0x0025, t01=0x000a}
0x39e0…39fa Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP20 YES «, t00=0x0025, t01=0x0024}
0x39fa…3a28 Head {h00=0x002a, h01=0x0050, text=» RF(P) ECGP60 NO, GO TO CLEAR SECTION «, t00=0x0025, t01=0x003e}
0x3a28…3a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006c}
0x3a32…3a48 Head {h00=0x0012, h01=0x0050, text=» IFT COSPAC=1 «, t00=0x0025, t01=0x0076}
0x3a48…3a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x008c}
0x3a52…3a76 Head {h00=0x0020, h01=0x0050, text=» LDK A2,SPACE NO SEND SPACE «, t00=0x0025, t01=0x0096}
0x3a76…3a88 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x0025, t01=0x00ba}
0x3a88…3a92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00cc}
0x3a92…3a9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00d6}
0x3a9e…3aa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e2}
0x3aa8…3ae2 Head {h00=0x0036, h01=0x0050, text=»ECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER «, t00=0x0025, t01=0x00ec}
0x3ae2…3b0e Head {h00=0x0028, h01=0x0050, text=»ECGP20 ABL ECHRTN RETURN TO KEYBOARD«, t00=0x0025, t01=0x0126}
0x3b0e…3b1c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0152}
0x3b1c…3b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0160}
0x3b26…3b3c Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x0025, t01=0x016a}
0x3b3c…3b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0180}
0x3b46…3b5a Head {h00=0x0010, h01=0x0050, text=»ECGP40 EQU *«, t00=0x0025, t01=0x018a}
0x3b5a…3b84 Head {h00=0x0026, h01=0x0050, text=» LDK A2,GPBSP BACKSPACE CHARACTER «, t00=0x0026, t01=0x000e}
0x3b84…3b96 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x0026, t01=0x0038}
0x3b96…3ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004a}
0x3ba0…3bb4 Head {h00=0x0010, h01=0x0050, text=»* CANCEL «, t00=0x0026, t01=0x0054}
0x3bb4…3bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0068}
0x3bbe…3bd2 Head {h00=0x0010, h01=0x0050, text=»ECGP50 EQU *«, t00=0x0026, t01=0x0072}
0x3bd2…3bf8 Head {h00=0x0022, h01=0x0050, text=» LDK A2,GPCLR CLEAR CHARACTER «, t00=0x0026, t01=0x0086}
0x3bf8…3c0a Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0026, t01=0x00ac}
0x3c0a…3c1c Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x0026, t01=0x00be}
0x3c1c…3c3e Head {h00=0x001e, h01=0x0050, text=»ECGP60 LDK A2,LF LINE FEED«, t00=0x0026, t01=0x00d0}
0x3c3e…3c56 Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTBC,A6 «, t00=0x0026, t01=0x00f2}
0x3c56…3c6a Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0026, t01=0x010a}
0x3c6a…3c90 Head {h00=0x0022, h01=0x0050, text=»ECGP70 CF A5,OUTPUT SEND CHAR.«, t00=0x0026, t01=0x011e}
0x3c90…3cae Head {h00=0x001a, h01=0x0050, text=» LDK A2,/08 BACKSPACE «, t00=0x0026, t01=0x0144}
0x3cae…3cc0 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0026, t01=0x0162}
0x3cc0…3cd6 Head {h00=0x0012, h01=0x0050, text=» RB(NN) ECGP70«, t00=0x0026, t01=0x0174}
0x3cd6…3ce8 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0026, t01=0x018a}
0x3ce8…3d16 Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER«, t00=0x0027, t01=0x000c}
0x3d16…3d28 Head {h00=0x000e, h01=0x0050, text=» RB ECGP20«, t00=0x0027, t01=0x003a}
0x3d28…3d36 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x004c}
0x3d36…3d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x005a}
0x3d40…3d54 Head {h00=0x0010, h01=0x0050, text=»* R C G P«, t00=0x0027, t01=0x0064}
0x3d54…3d5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0078}
0x3d5e…3d92 Head {h00=0x0030, h01=0x0050, text=»* RCGP = RECOVERY ROUTINE GENERAL PRINTER«, t00=0x0027, t01=0x0082}
0x3d92…3d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b6}
0x3d9c…3da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c0}
0x3da6…3dd2 Head {h00=0x0028, h01=0x0050, text=»* RECOVERY IS CARRIED OUT ONLY IF«, t00=0x0027, t01=0x00ca}
0x3dd2…3df2 Head {h00=0x001c, h01=0x0050, text=»* ORDER 6 IS RUNNING «, t00=0x0027, t01=0x00f6}
0x3df2…3dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0116}
0x3dfc…3e12 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0027, t01=0x0120}
0x3e12…3e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0136}
0x3e1c…3e3a Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0027, t01=0x0140}
0x3e3a…3e52 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x0027, t01=0x015e}
0x3e52…3e70 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x0027, t01=0x0176}
0x3e70…3e82 (40, 0, 400) Head {h00=0x000e, h01=0x0050, text=»RCGP EQU *«, t00=0x0028, t01=0x0004}
0x3e82…3eb2 Head {h00=0x002c, h01=0x0050, text=» CF A15,SAVE8 SAVE 8 REGISTERS ON STACK «, t00=0x0028, t01=0x0016}
0x3eb2…3ed0 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTST,A6 BUSY ?«, t00=0x0028, t01=0x0046}
0x3ed0…3ee6 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0028, t01=0x0064}
0x3ee6…3f12 Head {h00=0x0028, h01=0x0050, text=» LDK A2,SOH RESET PRINT BUFFER CODE «, t00=0x0028, t01=0x007a}
0x3f12…3f30 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND IT «, t00=0x0028, t01=0x00a6}
0x3f30…3f42 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0028, t01=0x00c4}
0x3f42…3f58 Head {h00=0x0012, h01=0x0050, text=» RF(E) RCGP10 «, t00=0x0028, t01=0x00d6}
0x3f58…3f72 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x0028, t01=0x00ec}
0x3f72…3f8c Head {h00=0x0016, h01=0x0050, text=» RF(E) RCGP05 YES «, t00=0x0028, t01=0x0106}
0x3f8c…3fa6 Head {h00=0x0016, h01=0x0050, text=» CWK A7,0 ORDER 0?«, t00=0x0028, t01=0x0120}
0x3fa6…3fba Head {h00=0x0010, h01=0x0050, text=» RB(E) ENDIO«, t00=0x0028, t01=0x013a}
0x3fba…3fca Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x0028, t01=0x014e}
0x3fca…3fde Head {h00=0x0010, h01=0x0050, text=»RCGP05 EQU *«, t00=0x0028, t01=0x015e}
0x3fde…4012 Head {h00=0x0030, h01=0x0050, text=» LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD«, t00=0x0028, t01=0x0172}
0x4012…4036 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/4 LINE FEED DONE ? «, t00=0x0029, t01=0x0016}
0x4036…404e Head {h00=0x0014, h01=0x0050, text=» ABL(E) ACGP NO «, t00=0x0029, t01=0x003a}
0x404e…4064 Head {h00=0x0012, h01=0x0050, text=» LDK A2,SPACE «, t00=0x0029, t01=0x0052}
0x4064…4084 Head {h00=0x001c, h01=0x0050, text=» CF A5,OUTPUT SEND SPACE«, t00=0x0029, t01=0x0068}
0x4084…4098 Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0029, t01=0x0088}
0x4098…40b6 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND STX«, t00=0x0029, t01=0x009c}
0x40b6…40d8 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x0029, t01=0x00ba}
0x40d8…40ea Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0029, t01=0x00dc}
0x40ea…411e Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND«, t00=0x0029, t01=0x00ee}
0x411e…4132 Head {h00=0x0010, h01=0x0050, text=» ABL ACGP46 «, t00=0x0029, t01=0x0122}
0x4132…415e Head {h00=0x0028, h01=0x0050, text=»RCGP10 LDK A1,TPERR SET RETURN CODE «, t00=0x0029, t01=0x0136}
0x415e…4172 Head {h00=0x0010, h01=0x0050, text=» ABL AGP430 «, t00=0x0029, t01=0x0162}
0x4172…417e Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0029, t01=0x0176}
0x417e…4182 Head {h00=0x4004, h01=0x0000}
0x4182…4186 00 29 01 82 ┆ ) ┆
0x4186…418e (42, 1, 8) 20 04 00 00 00 2a 00 04 ┆ * ┆
0x418e…41de (43, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 42 44 41 43 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 37 20 30 39 20 31 36 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 30 20 20 20 20 20 20 20 20 20 20 20 ┆ LABEL = BDACON DATE = 77 09 16 PACK NBR = 000 ┆
0x41de…422e 00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 81 2d 15 02 13 02 98 a0 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f ┆ f - P Y _( Y M ┆
0x422e…427e f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ : ] =IR E ┆
0x427e…42ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]
0x431e…436e (44, 0, 400) 20 20 20 20 4c 41 42 45 4c 20 3d 20 42 44 41 43 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 37 37 20 30 39 20 31 36 20 20 20 20 20 20 20 20 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 30 20 20 20 20 20 20 20 20 20 20 20 ┆ LABEL = BDACON DATE = 77 09 16 PACK NBR = 000 ┆
0x436e…43be 00 66 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 81 2d 15 02 13 02 98 a0 00 01 50 00 9d a0 00 01 59 1a 5f 28 1c 01 59 a2 8f 12 1f d4 4d c0 5c 04 a5 20 00 1f ┆ f - P Y _( Y M ┆
0x43be…440e f0 3a 85 5c 00 00 15 08 85 5d 00 00 85 1e 3d 49 52 00 05 0e 45 c0 5c 04 00 06 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ : ] =IR E ┆
0x440e…445e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]