|
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: 16886 (0x41f6)
Notes: pts_type(SC)
Names: »DRGP01.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/DRGP01.SC«
IDENT DRGP01 REL 8.2 78-09-15 870105040820 * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRGP01 = DRIVER GENERAL PRINTER * * * * * * ************************************************* * * * 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 X:A * * ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE * INCLUDED IN THE DRIVER BY SETTING X:B=1 * X:B EQU 0 TRETON EQU X:B * * ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE * INCLUDED IN THE DRIVER BY SETTING X:C=1 * X:C EQU 0 FJOTON EQU X:C * * IT IS POSSIBLE TO EXCLUDE ECHOING OF * AN EXTRA SPACE AFTER EACH CHARACTER * BY SETTING X:D=0 * X:D EQU 0 COSPAC EQU X:D * * 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 X:E * * SUPPRESSING OF SPACES IN RIGHT HAND OF LINE * BY SETTING X:F=1 * X:F EQU 0 SUPSPA EQU X:F * * 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 X:G 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(P) 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 ANK A1,/7F SUK A1,/8 RF(E) ECGP40 BACKSPACE SUK A1,/10 RF(E) ECGP50 CLEAR SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F RF(N) ECGP20 SUK A1,/5F-/20 RF(P) ECGP20 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…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRGP01 REL 8.2 78-09-15 870105040820 «, 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=»* DRGP01 = DRIVER GENERAL PRINTER «, 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…0160 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x012a}
0x0160…016a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0164}
0x016a…0174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016e}
0x0174…01ae Head {h00=0x0036, h01=0x0050, text=»* THIS DRIVER HANDLES GENERAL TERMINAL PRINTER «, t00=0x0000, t01=0x0178}
0x01ae…01ee Head {h00=0x003c, h01=0x0050, text=»* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. «, t00=0x0001, t01=0x0022}
0x01ee…01f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0062}
0x01f8…0234 Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO «, t00=0x0001, t01=0x006c}
0x0234…026e Head {h00=0x0036, h01=0x0050, text=»* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE«, t00=0x0001, t01=0x00a8}
0x026e…02a8 Head {h00=0x0036, h01=0x0050, text=»* GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY-«, t00=0x0001, t01=0x00e2}
0x02a8…02e0 Head {h00=0x0034, h01=0x0050, text=»* BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD«, t00=0x0001, t01=0x011c}
0x02e0…02fc Head {h00=0x0018, h01=0x0050, text=»* DRIVER DRKB01. «, t00=0x0001, t01=0x0154}
0x02fc…0306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0170}
0x0306…0310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017a}
0x0310…0344 Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0001, t01=0x0184}
0x0344…034e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0028}
0x034e…0378 Head {h00=0x0026, h01=0x0050, text=»* A C G P ACTIVATION PART«, t00=0x0002, t01=0x0032}
0x0378…0382 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005c}
0x0382…03ae Head {h00=0x0028, h01=0x0050, text=»* I H G P INTERRUPT HANDLER«, t00=0x0002, t01=0x0066}
0x03ae…03b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0092}
0x03b8…03e4 Head {h00=0x0028, h01=0x0050, text=»* R C G P RECOVERY ROUTINE «, t00=0x0002, t01=0x009c}
0x03e4…03ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c8}
0x03ee…0418 Head {h00=0x0026, h01=0x0050, text=»* E C H O G P ECHO FUNCTIONS «, t00=0x0002, t01=0x00d2}
0x0418…0422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fc}
0x0422…042c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0106}
0x042c…045a Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0002, t01=0x0110}
0x045a…0464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013e}
0x0464…0486 Head {h00=0x001e, h01=0x0050, text=»* ORDER 00: TEST STATUS«, t00=0x0002, t01=0x0148}
0x0486…04a8 Head {h00=0x001e, h01=0x0050, text=»* 05: BASIC WRITE«, t00=0x0002, t01=0x016a}
0x04a8…04ce Head {h00=0x0022, h01=0x0050, text=»* 06: STANDARD WRITE «, t00=0x0002, t01=0x018c}
0x04ce…04d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0022}
0x04d8…04fa Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE«, t00=0x0003, t01=0x002c}
0x04fa…0504 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004e}
0x0504…052a Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 = RETURN CODE«, t00=0x0003, t01=0x0058}
0x052a…0556 Head {h00=0x0028, h01=0x0050, text=»* A2 = OUTPUT CHARACTER «, t00=0x0003, t01=0x007e}
0x0556…057e Head {h00=0x0024, h01=0x0050, text=»* A3 = BUFFER INDEX «, t00=0x0003, t01=0x00aa}
0x057e…05a6 Head {h00=0x0024, h01=0x0050, text=»* A4 = WORK REGISTER«, t00=0x0003, t01=0x00d2}
0x05a6…05cc Head {h00=0x0022, h01=0x0050, text=»* A5 = STACK BASE «, t00=0x0003, t01=0x00fa}
0x05cc…05f2 Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0003, t01=0x0120}
0x05f2…0612 Head {h00=0x001c, h01=0x0050, text=»* A7 = ORDER«, t00=0x0003, t01=0x0146}
0x0612…0638 Head {h00=0x0022, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0003, t01=0x0166}
0x0638…0642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x018c}
0x0642…064c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0008}
0x064c…066a Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0004, t01=0x0012}
0x066a…0674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0030}
0x0674…06b2 Head {h00=0x003a, h01=0x0050, text=»* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR«, t00=0x0004, t01=0x003a}
0x06b2…06de Head {h00=0x0028, h01=0x0050, text=»* (GPCLR) KEYS SHOULD BE DEFINED.«, t00=0x0004, t01=0x0078}
0x06de…06e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a4}
0x06e8…0724 Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS «, t00=0x0004, t01=0x00ae}
0x0724…0758 Head {h00=0x0030, h01=0x0050, text=»* ADAPTED TO HANDLE FOLLOWING FUNCTIONS. «, t00=0x0004, t01=0x00ea}
0x0758…0776 Head {h00=0x001a, h01=0x0050, text=»* --ROOMLESS POINT «, t00=0x0004, t01=0x011e}
0x0776…07b4 Head {h00=0x003a, h01=0x0050, text=»* --ACCEPTANCE OF SPECIAL CHARACTER /13,/14 OR BOTH«, t00=0x0004, t01=0x013c}
0x07b4…07be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x017a}
0x07be…0806 Head {h00=0x0044, h01=0x0050, text=»* --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER «, t00=0x0004, t01=0x0184}
0x0806…0840 Head {h00=0x0036, h01=0x0050, text=»* --SUPPRESS ECHOING OF END OF RECORD CHARACTER«, t00=0x0005, t01=0x003c}
0x0840…086e Head {h00=0x002a, h01=0x0050, text=»** --SUPPRESION OF TRAILING BLANKS «, t00=0x0005, t01=0x0076}
0x086e…08b2 Head {h00=0x0040, h01=0x0050, text=»* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE«, t00=0x0005, t01=0x00a4}
0x08b2…08bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e8}
0x08bc…08f6 Head {h00=0x0036, h01=0x0050, text=»* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS«, t00=0x0005, t01=0x00f2}
0x08f6…0940 Head {h00=0x0046, h01=0x0050, text=»* IS DEFINED IN A SPECIAL TABLE. STANDARD IS SHB CHARACTER SET «, t00=0x0005, t01=0x012c}
0x0940…094e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0176}
0x094e…0958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0184}
0x0958…0962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018e}
0x0962…096c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x096c…0976 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0012}
0x0976…098a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x001c}
0x098a…099e Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0006, t01=0x0030}
0x099e…09b2 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x0044}
0x09b2…09bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0058}
0x09bc…09c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0062}
0x09c6…09d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09d0…09fc Head {h00=0x0028, h01=0x0050, text=» ENTRY GPAD ADDRESS TO ADDRESSBLOCK «, t00=0x0006, t01=0x0076}
0x09fc…0a30 Head {h00=0x0030, h01=0x0050, text=» ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0006, t01=0x00a2}
0x0a30…0a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d6}
0x0a3a…0a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e0}
0x0a44…0a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ea}
0x0a4e…0a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f4}
0x0a58…0a8a Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x00fe}
0x0a8a…0abc Head {h00=0x002e, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES * «, t00=0x0006, t01=0x0130}
0x0abc…0aee Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x0162}
0x0aee…0af8 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af8…0b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b02…0b2a Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0007, t01=0x0018}
0x0b2a…0b5c Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER«, t00=0x0007, t01=0x0040}
0x0b5c…0b7c Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0007, t01=0x0072}
0x0b7c…0bbe Head {h00=0x003e, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN «, t00=0x0007, t01=0x0092}
0x0bbe…0bdc Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0007, t01=0x00d4}
0x0bdc…0c0e Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK«, t00=0x0007, t01=0x00f2}
0x0c0e…0c42 Head {h00=0x0030, h01=0x0050, text=» EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO «, t00=0x0007, t01=0x0124}
0x0c42…0c76 Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0007, t01=0x0158}
0x0c76…0c84 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x018c}
0x0c84…0c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000a}
0x0c8e…0cae Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0014}
0x0cae…0cce Head {h00=0x001c, h01=0x0050, text=»* DWT PARAMETERS *«, t00=0x0008, t01=0x0034}
0x0cce…0cee Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0054}
0x0cee…0cf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0074}
0x0cf8…0d14 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0008, t01=0x007e}
0x0d14…0d2e Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0008, t01=0x009a}
0x0d2e…0d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00b4}
0x0d38…0d60 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0008, t01=0x00be}
0x0d60…0d88 Head {h00=0x0024, h01=0x0050, text=»* DWT-DISPLACEMENT *«, t00=0x0008, t01=0x00e6}
0x0d88…0db0 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0008, t01=0x010e}
0x0db0…0dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0136}
0x0dba…0de0 Head {h00=0x0022, h01=0x0050, text=»DWTA3 EQU /12 SAVE AREA FOR A3«, t00=0x0008, t01=0x0140}
0x0de0…0e02 Head {h00=0x001e, h01=0x0050, text=»DWTBC EQU /3 BYTE COUNTER «, t00=0x0008, t01=0x0166}
0x0e02…0e2e Head {h00=0x0028, h01=0x0050, text=»DWTAP EQU /22 HEAD POSITION POINTER «, t00=0x0008, t01=0x0188}
0x0e2e…0e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0024}
0x0e38…0e46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x002e}
0x0e46…0e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003c}
0x0e50…0e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0046}
0x0e5a…0e70 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x0050}
0x0e70…0e86 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x0066}
0x0e86…0e9c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x007c}
0x0e9c…0ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0092}
0x0ea6…0eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009c}
0x0eb0…0eee Head {h00=0x003a, h01=0x0050, text=»SOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY «, t00=0x0009, t01=0x00a6}
0x0eee…0f12 Head {h00=0x0020, h01=0x0050, text=»STX EQU /82 START OF MESSAGE«, t00=0x0009, t01=0x00e4}
0x0f12…0f34 Head {h00=0x001e, h01=0x0050, text=»ETB EQU /97 END OF MESSAGE«, t00=0x0009, t01=0x0108}
0x0f34…0f52 Head {h00=0x001a, h01=0x0050, text=»ETX EQU /03 LAST DUMMY«, t00=0x0009, t01=0x012a}
0x0f52…0f74 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x0009, t01=0x0148}
0x0f74…0f90 Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x0009, t01=0x016a}
0x0f90…0fae Head {h00=0x001a, h01=0x0050, text=»FFED EQU /0C FORM FEED«, t00=0x0009, t01=0x0186}
0x0fae…0fca Head {h00=0x0018, h01=0x0050, text=»SPACE EQU /20 SPACE «, t00=0x000a, t01=0x0014}
0x0fca…0ffe Head {h00=0x0030, h01=0x0050, text=»PROUT EQU /04 PAPER OUT OR READY SWITCH OFF «, t00=0x000a, t01=0x0030}
0x0ffe…100c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0064}
0x100c…103a Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000a, t01=0x0072}
0x103a…1068 Head {h00=0x002a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000a, t01=0x00a0}
0x1068…1096 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000a, t01=0x00ce}
0x1096…10a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fc}
0x10a0…10d6 Head {h00=0x0032, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT «, t00=0x000a, t01=0x0106}
0x10d6…10fe Head {h00=0x0024, h01=0x0050, text=»* FUNCTION BY SETTING X:A = 0«, t00=0x000a, t01=0x013c}
0x10fe…1108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0164}
0x1108…111a Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000a, t01=0x016e}
0x111a…1130 Head {h00=0x0012, h01=0x0050, text=»CROOM EQU X:A «, t00=0x000a, t01=0x0180}
0x1130…113a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0008}
0x113a…1172 Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE «, t00=0x000b, t01=0x0012}
0x1172…11a6 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:B=1«, t00=0x000b, t01=0x004a}
0x11a6…11b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x007e}
0x11b0…11c2 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000b, t01=0x0088}
0x11c2…11d8 Head {h00=0x0012, h01=0x0050, text=»TRETON EQU X:B«, t00=0x000b, t01=0x009a}
0x11d8…11e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b0}
0x11e2…121a Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE «, t00=0x000b, t01=0x00ba}
0x121a…124e Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:C=1«, t00=0x000b, t01=0x00f2}
0x124e…1258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0126}
0x1258…126a Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000b, t01=0x0130}
0x126a…1280 Head {h00=0x0012, h01=0x0050, text=»FJOTON EQU X:C«, t00=0x000b, t01=0x0142}
0x1280…128a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0158}
0x128a…12bc Head {h00=0x002e, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ECHOING OF «, t00=0x000b, t01=0x0162}
0x12bc…12ec (12, 0, 400) Head {h00=0x002c, h01=0x0050, text=»* AN EXTRA SPACE AFTER EACH CHARACTER«, t00=0x000c, t01=0x0004}
0x12ec…1308 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:D=0«, t00=0x000c, t01=0x0034}
0x1308…1312 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0050}
0x1312…1324 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x000c, t01=0x005a}
0x1324…133a Head {h00=0x0012, h01=0x0050, text=»COSPAC EQU X:D«, t00=0x000c, t01=0x006c}
0x133a…1344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0082}
0x1344…1380 Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x000c, t01=0x008c}
0x1380…13bc Head {h00=0x0038, h01=0x0050, text=»* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER.«, t00=0x000c, t01=0x00c8}
0x13bc…13f8 Head {h00=0x0038, h01=0x0050, text=»* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0.«, t00=0x000c, t01=0x0104}
0x13f8…1402 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0140}
0x1402…1414 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000c, t01=0x014a}
0x1414…142a Head {h00=0x0012, h01=0x0050, text=»EORECH EQU X:E«, t00=0x000c, t01=0x015c}
0x142a…1434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0172}
0x1434…146c Head {h00=0x0034, h01=0x0050, text=»* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE«, t00=0x000c, t01=0x017c}
0x146c…148a Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:F=1 «, t00=0x000d, t01=0x0024}
0x148a…1494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0042}
0x1494…14a6 Head {h00=0x000e, h01=0x0050, text=»X:F EQU 0 «, t00=0x000d, t01=0x004c}
0x14a6…14bc Head {h00=0x0012, h01=0x0050, text=»SUPSPA EQU X:F«, t00=0x000d, t01=0x005e}
0x14bc…14c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0074}
0x14c6…14f2 Head {h00=0x0028, h01=0x0050, text=»* END OF REQUEST IN SITUATIONS WHERE«, t00=0x000d, t01=0x007e}
0x14f2…1522 Head {h00=0x002c, h01=0x0050, text=»* THE SELECTOR UNIT OR PRINTER HARDWARE «, t00=0x000d, t01=0x00aa}
0x1522…1550 Head {h00=0x002a, h01=0x0050, text=»* IS INACTIVE CAN BE CHOSEN BY SETTING«, t00=0x000d, t01=0x00da}
0x1550…1572 Head {h00=0x001e, h01=0x0050, text=»* THE CONSTANT RECEND = 1 «, t00=0x000d, t01=0x0108}
0x1572…1584 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x000d, t01=0x012a}
0x1584…159a Head {h00=0x0012, h01=0x0050, text=»RECEND EQU X:G«, t00=0x000d, t01=0x013c}
0x159a…15a8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0152}
0x15a8…15d6 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000d, t01=0x0160}
0x15d6…1606 Head {h00=0x002c, h01=0x0050, text=»* SPECIAL KEYS FOR ECHO FUNCTION * «, t00=0x000d, t01=0x018e}
0x1606…1634 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000e, t01=0x002e}
0x1634…163e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x005c}
0x163e…165e Head {h00=0x001c, h01=0x0050, text=»GPBSP EQU /2D BACK SPACE«, t00=0x000e, t01=0x0066}
0x165e…167a Head {h00=0x0018, h01=0x0050, text=»GPCLR EQU /3F CLEAR «, t00=0x000e, t01=0x0086}
0x167a…1684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a2}
0x1684…16a0 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x00ac}
0x16a0…16bc Head {h00=0x0018, h01=0x0050, text=»* RETURN CODES *«, t00=0x000e, t01=0x00c8}
0x16bc…16d8 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000e, t01=0x00e4}
0x16d8…16e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0100}
0x16e2…1716 Head {h00=0x0030, h01=0x0050, text=»PAROUT EQU /20 PAPER OUT OR READY SWITCH OFF«, t00=0x000e, t01=0x010a}
0x1716…173c Head {h00=0x0022, h01=0x0050, text=»CCERR EQU /4 CODE CHECK ERROR «, t00=0x000e, t01=0x013e}
0x173c…1762 Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x000e, t01=0x0164}
0x1762…178e Head {h00=0x0028, h01=0x0050, text=»OPERR EQU /1 NOT OPERABLE, POWER OFF«, t00=0x000e, t01=0x018a}
0x178e…1798 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x1798…17a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0030}
0x17a6…17b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x003e}
0x17b0…17ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0048}
0x17ba…17cc Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x0052}
0x17cc…17de Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x000f, t01=0x0064}
0x17de…17f0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x0076}
0x17f0…17fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0088}
0x17fa…1804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0092}
0x1804…1818 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x000f, t01=0x009c}
0x1818…1822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b0}
0x1822…1836 Head {h00=0x0010, h01=0x0050, text=»ROMTAB EQU *«, t00=0x000f, t01=0x00ba}
0x1836…1864 Head {h00=0x002a, h01=0x0050, text=» TABLE FOR ROOMLESS POINT CHARACTERS«, t00=0x000f, t01=0x00ce}
0x1864…1890 Head {h00=0x0028, h01=0x0050, text=» DATA /2122,/2426,/3B3C,/3E40,/5E5F «, t00=0x000f, t01=0x00fc}
0x1890…189a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0128}
0x189a…18a6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0132}
0x18a6…18b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x013e}
0x18b0…18ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0148}
0x18ba…18c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0152}
0x18c4…18e4 Head {h00=0x001c, h01=0x0050, text=»GPAD EQU * ADDRESS BLOCK«, t00=0x000f, t01=0x015c}
0x18e4…1908 Head {h00=0x0020, h01=0x0050, text=» DATA ACGP ACTIVATION DRIVER«, t00=0x000f, t01=0x017c}
0x1908…192c Head {h00=0x0020, h01=0x0050, text=» DATA IHGP INTERRUPT HANDLER«, t00=0x0010, t01=0x0010}
0x192c…1950 Head {h00=0x0020, h01=0x0050, text=» DATA RCGP RECOVERY ROUTINE «, t00=0x0010, t01=0x0034}
0x1950…1982 Head {h00=0x002e, h01=0x0050, text=» DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE«, t00=0x0010, t01=0x0058}
0x1982…1990 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x008a}
0x1990…199a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0098}
0x199a…19ae Head {h00=0x0010, h01=0x0050, text=»* A C G P«, t00=0x0010, t01=0x00a2}
0x19ae…19b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b6}
0x19b8…19ee Head {h00=0x0032, h01=0x0050, text=»* ACGP = ACTIVATION DRIVER GENERAL PRINTER «, t00=0x0010, t01=0x00c0}
0x19ee…19f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f6}
0x19f8…1a44 Head {h00=0x0048, h01=0x0050, text=»* ORDER 00: TEST STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE«, t00=0x0010, t01=0x0100}
0x1a44…1a84 Head {h00=0x003c, h01=0x0050, text=»* IS SET IF PAPER OUT OR READY SWITCH OFF. «, t00=0x0010, t01=0x014c}
0x1a84…1ad0 Head {h00=0x0048, h01=0x0050, text=»* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM«, t00=0x0010, t01=0x018c}
0x1ad0…1af4 Head {h00=0x0020, h01=0x0050, text=»* CHANNEL UNIT.«, t00=0x0011, t01=0x0048}
0x1af4…1afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006c}
0x1afe…1b40 Head {h00=0x003e, h01=0x0050, text=»* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER «, t00=0x0011, t01=0x0076}
0x1b40…1b66 Head {h00=0x0022, h01=0x0050, text=»* FROM ECB-BUFFER«, t00=0x0011, t01=0x00b8}
0x1b66…1b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00de}
0x1b70…1bba Head {h00=0x0046, h01=0x0050, text=»* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO PRINTER FROM«, t00=0x0011, t01=0x00e8}
0x1bba…1bfa Head {h00=0x003c, h01=0x0050, text=»* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. «, t00=0x0011, t01=0x0132}
0x1bfa…1c04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0172}
0x1c04…1c16 Head {h00=0x000e, h01=0x0050, text=»ACGP EQU *«, t00=0x0011, t01=0x017c}
0x1c16…1c3a Head {h00=0x0020, h01=0x0050, text=» LDK A2,STX START OF MESSAGE«, t00=0x0011, t01=0x018e}
0x1c3a…1c5e Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RESET BUFFER INDEX«, t00=0x0012, t01=0x0022}
0x1c5e…1c70 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0012, t01=0x0046}
0x1c70…1c8c Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0012, t01=0x0058}
0x1c8c…1ca2 Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP410 «, t00=0x0012, t01=0x0074}
0x1ca2…1cbc Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0012, t01=0x008a}
0x1cbc…1cd2 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP05 «, t00=0x0012, t01=0x00a4}
0x1cd2…1cec Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 ORDER 6?«, t00=0x0012, t01=0x00ba}
0x1cec…1d16 Head {h00=0x0026, h01=0x0050, text=» ABL(NE) DISIOE I/O REQUEST ERROR «, t00=0x0012, t01=0x00d4}
0x1d16…1d3e Head {h00=0x0024, h01=0x0050, text=» LD A1,4,A8 GET REQUESTED LENGTH«, t00=0x0012, t01=0x00fe}
0x1d3e…1d54 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP02 «, t00=0x0012, t01=0x0126}
0x1d54…1d7a Head {h00=0x0022, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS«, t00=0x0012, t01=0x013c}
0x1d7a…1da4 Head {h00=0x0026, h01=0x0050, text=» LC A3,1,A3 GET CONTROL CHARACTER «, t00=0x0012, t01=0x0162}
0x1da4…1db8 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0012, t01=0x018c}
0x1db8…1dcc Head {h00=0x0010, h01=0x0050, text=»ACGP02 EQU *«, t00=0x0013, t01=0x0010}
0x1dcc…1dfa Head {h00=0x002a, h01=0x0050, text=» SUK A3,/2B POSITIONING BEFORE WRITE? «, t00=0x0013, t01=0x0024}
0x1dfa…1e10 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP12 «, t00=0x0013, t01=0x0052}
0x1e10…1e42 Head {h00=0x002e, h01=0x0050, text=» LDK A4,2 INDICATE CR AND LF/FFED TO SEND «, t00=0x0013, t01=0x0068}
0x1e42…1e50 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x009a}
0x1e50…1e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a8}
0x1e5a…1e8c Head {h00=0x002e, h01=0x0050, text=»* SEND DUMMY AND, IF CONTROL CHARACTER «, t00=0x0013, t01=0x00b2}
0x1e8c…1ec2 Head {h00=0x0032, h01=0x0050, text=»* # 2B, SEND CARRIAGE RETURN AND LINE FEED «, t00=0x0013, t01=0x00e4}
0x1ec2…1ecc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011a}
0x1ecc…1ee0 Head {h00=0x0010, h01=0x0050, text=»ACGP05 EQU *«, t00=0x0013, t01=0x0124}
0x1ee0…1f04 Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x0013, t01=0x0138}
0x1f04…1f16 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0013, t01=0x015c}
0x1f16…1f40 Head {h00=0x0026, h01=0x0050, text=» RF(N) ACGP19 START SECTION ENDED?«, t00=0x0013, t01=0x016e}
0x1f40…1f5a Head {h00=0x0016, h01=0x0050, text=» RF(P) ACGP15 STX «, t00=0x0014, t01=0x0008}
0x1f5a…1f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0022}
0x1f64…1f8c Head {h00=0x0024, h01=0x0050, text=»* SEND LINE FEED OR FORM FEED«, t00=0x0014, t01=0x002c}
0x1f8c…1f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0054}
0x1f96…1fc0 Head {h00=0x0026, h01=0x0050, text=» SUK A3,5 CONTROL CHARACTER /30 ? «, t00=0x0014, t01=0x005e}
0x1fc0…1fd6 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP07«, t00=0x0014, t01=0x0088}
0x1fd6…2004 Head {h00=0x002a, h01=0x0050, text=» ADK A4,1 YES EXTRA LINE FEED TO SEND «, t00=0x0014, t01=0x009e}
0x2004…2018 Head {h00=0x0010, h01=0x0050, text=»ACGP07 EQU *«, t00=0x0014, t01=0x00cc}
0x2018…202a Head {h00=0x000e, h01=0x0050, text=» LDK A2,LF«, t00=0x0014, t01=0x00e0}
0x202a…2054 Head {h00=0x0026, h01=0x0050, text=»ACGP12 LDK A3,2 START BUFFER INDEX«, t00=0x0014, t01=0x00f2}
0x2054…2066 Head {h00=0x000e, h01=0x0050, text=» RB ACGP05«, t00=0x0014, t01=0x011c}
0x2066…20a0 Head {h00=0x0036, h01=0x0050, text=»ACGP15 ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x0014, t01=0x012e}
0x20a0…20c2 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x0014, t01=0x0168}
0x20c2…20d4 Head {h00=0x000e, h01=0x0050, text=» RB ACGP05«, t00=0x0014, t01=0x018a}
0x20d4…20e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x000c}
0x20e2…20ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x001a}
0x20ec…2116 Head {h00=0x0026, h01=0x0050, text=»* GET, CHECK AND SEND CHARACTER«, t00=0x0015, t01=0x0024}
0x2116…2138 Head {h00=0x001e, h01=0x0050, text=»* (IF ORDER 5 NO CHECK)«, t00=0x0015, t01=0x004e}
0x2138…2142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0070}
0x2142…215e Head {h00=0x0018, h01=0x0050, text=»ACGP17 CF A5,OUTPUT «, t00=0x0015, t01=0x007a}
0x215e…2192 Head {h00=0x0030, h01=0x0050, text=»ACGP18 IM DWTST,A6 POSITION COUNTER UPDATING«, t00=0x0015, t01=0x0096}
0x2192…21a6 Head {h00=0x0010, h01=0x0050, text=»ACGP19 EQU *«, t00=0x0015, t01=0x00ca}
0x21a6…21d4 Head {h00=0x002a, h01=0x0050, text=» LDKL A4,/400 INDICATE LINE FEED DONE «, t00=0x0015, t01=0x00de}
0x21d4…21ec Head {h00=0x0014, h01=0x0050, text=» ORS A4,DWTST,A6«, t00=0x0015, t01=0x010c}
0x21ec…2202 Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0015, t01=0x0124}
0x2202…223a Head {h00=0x0034, h01=0x0050, text=» CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER «, t00=0x0015, t01=0x013a}
0x223a…2246 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0172}
0x2246…2258 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0015, t01=0x017e}
0x2258…2292 Head {h00=0x0036, h01=0x0050, text=»ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER«, t00=0x0015, t01=0x0190}
0x2292…22b4 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER?«, t00=0x0016, t01=0x003a}
0x22b4…22ca Head {h00=0x0012, h01=0x0050, text=» RF(NP) AGP400«, t00=0x0016, t01=0x005c}
0x22ca…22dc Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0016, t01=0x0072}
0x22dc…22f6 Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0016, t01=0x0084}
0x22f6…2318 Head {h00=0x001e, h01=0x0050, text=» RF(E) ACGP24 BASIC WRITE «, t00=0x0016, t01=0x009e}
0x2318…2340 Head {h00=0x0024, h01=0x0050, text=» SUK A1,9 HARDWARE TABULATION ? «, t00=0x0016, t01=0x00c0}
0x2340…2356 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP22«, t00=0x0016, t01=0x00e8}
0x2356…238a Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x0016, t01=0x00fe}
0x238a…239c Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0016, t01=0x0132}
0x239c…23ca Head {h00=0x002a, h01=0x0050, text=»ACGP22 SUK A1,8 TABULATION CHARACTER ?«, t00=0x0016, t01=0x0144}
0x23ca…23e0 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP40 «, t00=0x0016, t01=0x0172}
0x23e0…23ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0188}
0x23ea…2400 (23, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x0017, t01=0x0004}
0x2400…2416 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x0017, t01=0x001a}
0x2416…2420 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0030}
0x2420…2442 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/F LESS THAN /20 ?«, t00=0x0017, t01=0x003a}
0x2442…244c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x005c}
0x244c…2458 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0066}
0x2458…2462 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0072}
0x2462…2478 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x0017, t01=0x007c}
0x2478…248e Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x0017, t01=0x0092}
0x248e…2498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a8}
0x2498…24ae Head {h00=0x0012, h01=0x0050, text=» SUK A1,3 /14?«, t00=0x0017, t01=0x00b2}
0x24ae…24c4 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0017, t01=0x00c8}
0x24c4…24e6 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x0017, t01=0x00de}
0x24e6…24f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0100}
0x24f0…24fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x010a}
0x24fc…2506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0116}
0x2506…2510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0120}
0x2510…2526 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x0017, t01=0x012a}
0x2526…253c Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x0017, t01=0x0140}
0x253c…2546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0156}
0x2546…255e Head {h00=0x0014, h01=0x0050, text=» SUK A1,2 /13 ? «, t00=0x0017, t01=0x0160}
0x255e…2574 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0017, t01=0x0178}
0x2574…2596 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/D LESS THAN /20 ?«, t00=0x0017, t01=0x018e}
0x2596…25a2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0020}
0x25a2…25ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x002c}
0x25ac…25b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0036}
0x25b6…25cc Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x0018, t01=0x0040}
0x25cc…25e2 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x0018, t01=0x0056}
0x25e2…25ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x006c}
0x25ec…2602 Head {h00=0x0012, h01=0x0050, text=» SUK A1,2 /13?«, t00=0x0018, t01=0x0076}
0x2602…2618 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0018, t01=0x008c}
0x2618…262e Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 /14?«, t00=0x0018, t01=0x00a2}
0x262e…2644 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x0018, t01=0x00b8}
0x2644…2666 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x0018, t01=0x00ce}
0x2666…2670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f0}
0x2670…267c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00fa}
0x267c…2686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0106}
0x2686…26ac Head {h00=0x0022, h01=0x0050, text=» RF(N) ACGP30 CODE CHECK ERROR«, t00=0x0018, t01=0x0110}
0x26ac…26d6 Head {h00=0x0026, h01=0x0050, text=» SUK A1,/8E ROOMLESS POINT? (AE) «, t00=0x0018, t01=0x0136}
0x26d6…26ec Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP100 «, t00=0x0018, t01=0x0160}
0x26ec…2710 Head {h00=0x0020, h01=0x0050, text=» ADK A1,/4F GREATER THAN /5F«, t00=0x0018, t01=0x0176}
0x2710…2726 Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP17«, t00=0x0019, t01=0x000a}
0x2726…273a Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x0019, t01=0x0020}
0x273a…2750 Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACGP30«, t00=0x0019, t01=0x0034}
0x2750…278a Head {h00=0x0036, h01=0x0050, text=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F«, t00=0x0019, t01=0x004a}
0x278a…27b4 Head {h00=0x0026, h01=0x0050, text=» TO CHARACTER BETWEEN /40 TO /5F«, t00=0x0019, t01=0x0084}
0x27b4…27c6 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0019, t01=0x00ae}
0x27c6…27da Head {h00=0x0010, h01=0x0050, text=»ACGP24 EQU *«, t00=0x0019, t01=0x00c0}
0x27da…27ec Head {h00=0x000e, h01=0x0050, text=» SUK A1,/D«, t00=0x0019, t01=0x00d4}
0x27ec…280a Head {h00=0x001a, h01=0x0050, text=» RF(NZ) ACGP26 NOT CR «, t00=0x0019, t01=0x00e6}
0x280a…2830 Head {h00=0x0022, h01=0x0050, text=» CM DWTST,A6 SET POS LTR.TO 0 «, t00=0x0019, t01=0x0104}
0x2830…285c Head {h00=0x0028, h01=0x0050, text=» CM DWTAP,A6 RESET HEAD POS.POIINTER«, t00=0x0019, t01=0x012a}
0x285c…2874 Head {h00=0x0014, h01=0x0050, text=»ACGP26 ADK A1,3 «, t00=0x0019, t01=0x0156}
0x2874…2898 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ACGP17 NOT LINE FEED«, t00=0x0019, t01=0x016e}
0x2898…28aa (26, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001a, t01=0x0004}
0x28aa…28d8 Head {h00=0x002a, h01=0x0050, text=» ADS A1,DWTST,A6 DECREMENT POS COUNTER«, t00=0x001a, t01=0x0016}
0x28d8…28ea Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001a, t01=0x0044}
0x28ea…28f8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0056}
0x28f8…2902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0064}
0x2902…2920 Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x001a, t01=0x006e}
0x2920…292a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x008c}
0x292a…293e Head {h00=0x0010, h01=0x0050, text=»ACGP30 EQU *«, t00=0x001a, t01=0x0096}
0x293e…2954 Head {h00=0x0012, h01=0x0050, text=» LDK A1,CCERR «, t00=0x001a, t01=0x00aa}
0x2954…2974 Head {h00=0x001c, h01=0x0050, text=» ORS A1,8,A8 RETURN CODE«, t00=0x001a, t01=0x00c0}
0x2974…2986 Head {h00=0x000e, h01=0x0050, text=» RB ACGP20«, t00=0x001a, t01=0x00e0}
0x2986…2994 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00f2}
0x2994…299e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0100}
0x299e…29b6 Head {h00=0x0014, h01=0x0050, text=»* TABULATION «, t00=0x001a, t01=0x010a}
0x29b6…29c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0122}
0x29c0…29d4 Head {h00=0x0010, h01=0x0050, text=»ACGP40 EQU *«, t00=0x001a, t01=0x012c}
0x29d4…2a04 Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR GET FIRST ASCII CHARACTER«, t00=0x001a, t01=0x0140}
0x2a04…2a16 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001a, t01=0x0170}
0x2a16…2a48 Head {h00=0x002e, h01=0x0050, text=» CF A15,GETCHR GET SECOND ASCII CHARACTER «, t00=0x001a, t01=0x0182}
0x2a48…2a5a Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001b, t01=0x0024}
0x2a5a…2a6c Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x001b, t01=0x0036}
0x2a6c…2a82 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP44 «, t00=0x001b, t01=0x0048}
0x2a82…2ab6 Head {h00=0x0030, h01=0x0050, text=»ACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL«, t00=0x001b, t01=0x005e}
0x2ab6…2ac8 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001b, t01=0x0092}
0x2ac8…2ade Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP43«, t00=0x001b, t01=0x00a4}
0x2ade…2b1a Head {h00=0x0038, h01=0x0050, text=»ACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER«, t00=0x001b, t01=0x00ba}
0x2b1a…2b32 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTBC,A6 «, t00=0x001b, t01=0x00f6}
0x2b32…2b62 Head {h00=0x002c, h01=0x0050, text=» SUR A2,A4 AND REQUESTS POSITION COUNTER«, t00=0x001b, t01=0x010e}
0x2b62…2b8c Head {h00=0x0026, h01=0x0050, text=» TO GET NUMBER OF SPACES TO SEND«, t00=0x001b, t01=0x013e}
0x2b8c…2ba2 Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP20«, t00=0x001b, t01=0x0168}
0x2ba2…2bb4 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001b, t01=0x017e}
0x2bb4…2bf2 Head {h00=0x003a, h01=0x0050, text=»ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE«, t00=0x001b, t01=0x0190}
0x2bf2…2c0e Head {h00=0x0018, h01=0x0050, text=»ACGP46 CF A5,OUTPUT «, t00=0x001c, t01=0x003e}
0x2c0e…2c3a Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BUFFER INDEX «, t00=0x001c, t01=0x005a}
0x2c3a…2c4c Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001c, t01=0x0086}
0x2c4c…2c62 Head {h00=0x0012, h01=0x0050, text=» RB(P) ACGP45 «, t00=0x001c, t01=0x0098}
0x2c62…2c7e Head {h00=0x0018, h01=0x0050, text=» LDR A3,A3 RECOVERY?«, t00=0x001c, t01=0x00ae}
0x2c7e…2c94 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP20«, t00=0x001c, t01=0x00ca}
0x2c94…2cc2 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTBC,A6 RESET POSITION POINTER«, t00=0x001c, t01=0x00e0}
0x2cc2…2ce6 Head {h00=0x0020, h01=0x0050, text=» LDK A3,2 START BUFFER INDEX«, t00=0x001c, t01=0x010e}
0x2ce6…2cf8 Head {h00=0x000e, h01=0x0050, text=» RB ACGP19«, t00=0x001c, t01=0x0132}
0x2cf8…2d06 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x0144}
0x2d06…2d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0152}
0x2d10…2d2c Head {h00=0x0018, h01=0x0050, text=»* ROOMLESS POINT «, t00=0x001c, t01=0x015c}
0x2d2c…2d36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0178}
0x2d36…2d4a Head {h00=0x0010, h01=0x0050, text=»AGP100 EQU *«, t00=0x001c, t01=0x0182}
0x2d4a…2d54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0008}
0x2d54…2d68 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x001d, t01=0x0012}
0x2d68…2d72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0026}
0x2d72…2d9e Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CHARACTER TO SEND«, t00=0x001d, t01=0x0030}
0x2d9e…2db0 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001d, t01=0x005c}
0x2db0…2dd2 Head {h00=0x001e, h01=0x0050, text=» LC A2,ROMTAB,A2 TRANSFORM«, t00=0x001d, t01=0x006e}
0x2dd2…2ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0090}
0x2ddc…2de8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x009a}
0x2de8…2df2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a6}
0x2df2…2dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b0}
0x2dfc…2e10 Head {h00=0x0010, h01=0x0050, text=» IFF CROOM=1«, t00=0x001d, t01=0x00ba}
0x2e10…2e1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ce}
0x2e1a…2e2e Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x001d, t01=0x00d8}
0x2e2e…2e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ec}
0x2e38…2e44 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00f6}
0x2e44…2e4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0102}
0x2e4e…2e60 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x010c}
0x2e60…2e6e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x011e}
0x2e6e…2e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012c}
0x2e78…2e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0136}
0x2e82…2eae Head {h00=0x0028, h01=0x0050, text=»* SEND LAST DUMMY , LOAD A1 WITH «, t00=0x001d, t01=0x0140}
0x2eae…2ed2 Head {h00=0x0020, h01=0x0050, text=»* RETURN CODE AND END I/O«, t00=0x001d, t01=0x016c}
0x2ed2…2edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0190}
0x2edc…2ef0 Head {h00=0x0010, h01=0x0050, text=»AGP400 EQU *«, t00=0x001e, t01=0x000a}
0x2ef0…2f12 Head {h00=0x001e, h01=0x0050, text=» LDK A2,ETB END OF MESSAGE«, t00=0x001e, t01=0x001e}
0x2f12…2f2c Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x001e, t01=0x0040}
0x2f2c…2f50 Head {h00=0x0020, h01=0x0050, text=»AGP410 LDK A2,ETX LAST DUMMY«, t00=0x001e, t01=0x005a}
0x2f50…2f6a Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x001e, t01=0x007e}
0x2f6a…2f7e Head {h00=0x0010, h01=0x0050, text=»AGP420 EQU *«, t00=0x001e, t01=0x0098}
0x2f7e…2fb2 Head {h00=0x0030, h01=0x0050, text=» CF A15,UPDAPP UPDATE HEAD POSITION COUNTER «, t00=0x001e, t01=0x00ac}
0x2fb2…2fd6 Head {h00=0x0020, h01=0x0050, text=»ENDIO CF A15,TENDIO END I/O «, t00=0x001e, t01=0x00e0}
0x2fd6…2ffe Head {h00=0x0024, h01=0x0050, text=»EXIT ABL TDISP GO TO DISPATCHER «, t00=0x001e, t01=0x0104}
0x2ffe…3012 Head {h00=0x0010, h01=0x0050, text=»AGP430 EQU *«, t00=0x001e, t01=0x012c}
0x3012…302a Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x001e, t01=0x0140}
0x302a…304a Head {h00=0x001c, h01=0x0050, text=» ST A3,6,A8 EFF. LENGTH «, t00=0x001e, t01=0x0158}
0x304a…305c Head {h00=0x000e, h01=0x0050, text=» RB AGP420«, t00=0x001e, t01=0x0178}
0x305c…306a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x018a}
0x306a…3074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0008}
0x3074…307e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0012}
0x307e…30ae Head {h00=0x002c, h01=0x0050, text=»* UPDAPP = SUBROUTINE TO UPDATE HEAD «, t00=0x001f, t01=0x001c}
0x30ae…30de Head {h00=0x002c, h01=0x0050, text=»* POSITION POINTER WHEN END «, t00=0x001f, t01=0x004c}
0x30de…310a Head {h00=0x0028, h01=0x0050, text=»* OF REQUEST IS REACHED «, t00=0x001f, t01=0x007c}
0x310a…311e Head {h00=0x0010, h01=0x0050, text=»UPDAPP EQU *«, t00=0x001f, t01=0x00a8}
0x311e…314a Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTBC,A6 GET POSITION COUNTER«, t00=0x001f, t01=0x00bc}
0x314a…3180 Head {h00=0x0032, h01=0x0050, text=» ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER «, t00=0x001f, t01=0x00e8}
0x3180…3192 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001f, t01=0x011e}
0x3192…31c2 Head {h00=0x002c, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER «, t00=0x001f, t01=0x0130}
0x31c2…31d2 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x001f, t01=0x0160}
0x31d2…31e8 Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x001f, t01=0x0170}
0x31e8…31f6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0186}
0x31f6…3200 (32, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0004}
0x3200…320a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x000e}
0x320a…3238 Head {h00=0x002a, h01=0x0050, text=»* SKIPSP = SUBROTINE TO SKIP SPACES«, t00=0x0020, t01=0x0018}
0x3238…3264 Head {h00=0x0028, h01=0x0050, text=»* IN END OF ECB-BUFFER. «, t00=0x0020, t01=0x0046}
0x3264…329e Head {h00=0x0036, h01=0x0050, text=»* REQUESTED LENGTH IN ECB IS UPDATED. «, t00=0x0020, t01=0x0072}
0x329e…32c8 Head {h00=0x0026, h01=0x0050, text=»* A1,A2,A4 - WORK REG «, t00=0x0020, t01=0x00ac}
0x32c8…32d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00d6}
0x32d2…32e6 Head {h00=0x0010, h01=0x0050, text=»SKIPSP EQU *«, t00=0x0020, t01=0x00e0}
0x32e6…3312 Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS (BA) «, t00=0x0020, t01=0x00f4}
0x3312…333e Head {h00=0x0028, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH(RL)«, t00=0x0020, t01=0x0120}
0x333e…3366 Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 GET ADD END OF BUFFER«, t00=0x0020, t01=0x014c}
0x3366…337e Head {h00=0x0014, h01=0x0050, text=»SKIP05 CWK A2,2 «, t00=0x0020, t01=0x0174}
0x337e…339c Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 3 «, t00=0x0020, t01=0x018c}
0x339c…33b6 Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 DECR. BA«, t00=0x0021, t01=0x001a}
0x33b6…33d2 Head {h00=0x0018, h01=0x0050, text=» LCR A4,A1 GET CHAR «, t00=0x0021, t01=0x0034}
0x33d2…33f0 Head {h00=0x001a, h01=0x0050, text=» CCK A4,/2020 SPACE ? «, t00=0x0021, t01=0x0050}
0x33f0…340a Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP20 NO «, t00=0x0021, t01=0x006e}
0x340a…342a Head {h00=0x001c, h01=0x0050, text=»SKIP07 SUK A2,1 DECR RL «, t00=0x0021, t01=0x0088}
0x342a…3446 Head {h00=0x0018, h01=0x0050, text=» RB SKIP05 GET NEXT «, t00=0x0021, t01=0x00a8}
0x3446…345e Head {h00=0x0014, h01=0x0050, text=»SKIP20 CWK A2,4 «, t00=0x0021, t01=0x00c4}
0x345e…347c Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 5 «, t00=0x0021, t01=0x00dc}
0x347c…349a Head {h00=0x001a, h01=0x0050, text=» LC A4,-2,A1 GET CHAR «, t00=0x0021, t01=0x00fa}
0x349a…34c2 Head {h00=0x0024, h01=0x0050, text=» CCK A4,/1111 TABULATION CHAR ? «, t00=0x0021, t01=0x0118}
0x34c2…34dc Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP30 NO «, t00=0x0021, t01=0x0140}
0x34dc…34f6 Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 DECR BA «, t00=0x0021, t01=0x015a}
0x34f6…3510 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 DECR RL «, t00=0x0021, t01=0x0174}
0x3510…352c Head {h00=0x0018, h01=0x0050, text=» RB SKIP07 GET NEXT «, t00=0x0021, t01=0x018e}
0x352c…3536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x001a}
0x3536…355c Head {h00=0x0022, h01=0x0050, text=»SKIP30 ST A2,4,A8 STORE NEW RL«, t00=0x0022, t01=0x0024}
0x355c…356c Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0022, t01=0x004a}
0x356c…3578 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x005a}
0x3578…3586 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0066}
0x3586…3590 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0074}
0x3590…35a4 Head {h00=0x0010, h01=0x0050, text=»* I H G P«, t00=0x0022, t01=0x007e}
0x35a4…35ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0092}
0x35ae…35c4 Head {h00=0x0012, h01=0x0050, text=»* INTERRUPT«, t00=0x0022, t01=0x009c}
0x35c4…35ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00b2}
0x35ce…35e0 Head {h00=0x000e, h01=0x0050, text=»IHGP EQU *«, t00=0x0022, t01=0x00bc}
0x35e0…35fe Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 BUSY? «, t00=0x0022, t01=0x00ce}
0x35fe…3614 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0022, t01=0x00ec}
0x3614…3632 Head {h00=0x001a, h01=0x0050, text=» SLL A4,2 ECHO MODE ? «, t00=0x0022, t01=0x0102}
0x3632…3648 Head {h00=0x0012, h01=0x0050, text=» RF(N) IHGP10 «, t00=0x0022, t01=0x0120}
0x3648…3664 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0022, t01=0x0136}
0x3664…367a Head {h00=0x0012, h01=0x0050, text=» RB(Z) AGP430 «, t00=0x0022, t01=0x0152}
0x367a…36ac Head {h00=0x002e, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ?«, t00=0x0022, t01=0x0168}
0x36ac…36c2 Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=0 «, t00=0x0023, t01=0x000a}
0x36c2…36d6 Head {h00=0x0010, h01=0x0050, text=» RB(NZ) EXIT«, t00=0x0023, t01=0x0020}
0x36d6…36e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0034}
0x36e2…36f8 Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=1 «, t00=0x0023, t01=0x0040}
0x36f8…370e Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AGP430«, t00=0x0023, t01=0x0056}
0x370e…371a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x006c}
0x371a…3722 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0078}
0x3722…375a Head {h00=0x0034, h01=0x0050, text=»IHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x0023, t01=0x0080}
0x375a…3768 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x00b8}
0x3768…3772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c6}
0x3772…378a Head {h00=0x0014, h01=0x0050, text=»* E C H O G P«, t00=0x0023, t01=0x00d0}
0x378a…3794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00e8}
0x3794…37c8 Head {h00=0x0030, h01=0x0050, text=»* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0023, t01=0x00f2}
0x37c8…37d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0126}
0x37d2…37e6 Head {h00=0x0010, h01=0x0050, text=»ECHOGP EQU *«, t00=0x0023, t01=0x0130}
0x37e6…37fc Head {h00=0x0012, h01=0x0050, text=» LDK A4,COSPAC«, t00=0x0023, t01=0x0144}
0x37fc…3814 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 EOR? «, t00=0x0023, t01=0x015a}
0x3814…382e Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP17 YES «, t00=0x0023, t01=0x0172}
0x382e…3838 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x018c}
0x3838…384e Head {h00=0x0012, h01=0x0050, text=» IFT EORECH=0 «, t00=0x0024, t01=0x0008}
0x384e…3858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x001e}
0x3858…387a Head {h00=0x001e, h01=0x0050, text=» SUK A2,/80 EOR-CHARACTER «, t00=0x0024, t01=0x0028}
0x387a…3894 Head {h00=0x0016, h01=0x0050, text=» RF(NN) ECGP20 YES«, t00=0x0024, t01=0x004a}
0x3894…38a8 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x0024, t01=0x0064}
0x38a8…38b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0078}
0x38b2…38be Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0082}
0x38be…38c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x008e}
0x38c8…38da Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0024, t01=0x0098}
0x38da…38ee Head {h00=0x0010, h01=0x0050, text=» ANK A1,/7F «, t00=0x0024, t01=0x00aa}
0x38ee…3900 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/8«, t00=0x0024, t01=0x00be}
0x3900…3920 Head {h00=0x001c, h01=0x0050, text=» RF(E) ECGP40 BACKSPACE «, t00=0x0024, t01=0x00d0}
0x3920…3934 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x0024, t01=0x00f0}
0x3934…3950 Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP50 CLEAR «, t00=0x0024, t01=0x0104}
0x3950…398c Head {h00=0x0038, h01=0x0050, text=» SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F«, t00=0x0024, t01=0x0120}
0x398c…39a2 Head {h00=0x0012, h01=0x0050, text=» RF(N) ECGP20 «, t00=0x0024, t01=0x015c}
0x39a2…39ba Head {h00=0x0014, h01=0x0050, text=» SUK A1,/5F-/20 «, t00=0x0024, t01=0x0172}
0x39ba…39d0 Head {h00=0x0012, h01=0x0050, text=» RF(P) ECGP20 «, t00=0x0024, t01=0x018a}
0x39d0…39fa Head {h00=0x0026, h01=0x0050, text=»ECGP10 CF A5,OUTPUT SEND CHARACTER«, t00=0x0025, t01=0x0010}
0x39fa…3a26 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 UPDATE POSITION COUNTER«, t00=0x0025, t01=0x003a}
0x3a26…3a40 Head {h00=0x0016, h01=0x0050, text=» SUK A4,1 READY ? «, t00=0x0025, t01=0x0066}
0x3a40…3a5a Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP20 YES «, t00=0x0025, t01=0x0080}
0x3a5a…3a88 Head {h00=0x002a, h01=0x0050, text=» RF(P) ECGP60 NO, GO TO CLEAR SECTION «, t00=0x0025, t01=0x009a}
0x3a88…3a92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00c8}
0x3a92…3aa8 Head {h00=0x0012, h01=0x0050, text=» IFT COSPAC=1 «, t00=0x0025, t01=0x00d2}
0x3aa8…3ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e8}
0x3ab2…3ad6 Head {h00=0x0020, h01=0x0050, text=» LDK A2,SPACE NO SEND SPACE «, t00=0x0025, t01=0x00f2}
0x3ad6…3ae8 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x0025, t01=0x0116}
0x3ae8…3af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0128}
0x3af2…3afe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0132}
0x3afe…3b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x013e}
0x3b08…3b42 Head {h00=0x0036, h01=0x0050, text=»ECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER «, t00=0x0025, t01=0x0148}
0x3b42…3b6e Head {h00=0x0028, h01=0x0050, text=»ECGP20 ABL ECHRTN RETURN TO KEYBOARD«, t00=0x0025, t01=0x0182}
0x3b6e…3b7c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x001e}
0x3b7c…3b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x002c}
0x3b86…3b9c Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x0026, t01=0x0036}
0x3b9c…3ba6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x004c}
0x3ba6…3bba Head {h00=0x0010, h01=0x0050, text=»ECGP40 EQU *«, t00=0x0026, t01=0x0056}
0x3bba…3be4 Head {h00=0x0026, h01=0x0050, text=» LDK A2,GPBSP BACKSPACE CHARACTER «, t00=0x0026, t01=0x006a}
0x3be4…3bf6 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x0026, t01=0x0094}
0x3bf6…3c00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a6}
0x3c00…3c14 Head {h00=0x0010, h01=0x0050, text=»* CANCEL «, t00=0x0026, t01=0x00b0}
0x3c14…3c1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c4}
0x3c1e…3c32 Head {h00=0x0010, h01=0x0050, text=»ECGP50 EQU *«, t00=0x0026, t01=0x00ce}
0x3c32…3c58 Head {h00=0x0022, h01=0x0050, text=» LDK A2,GPCLR CLEAR CHARACTER «, t00=0x0026, t01=0x00e2}
0x3c58…3c6a Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0026, t01=0x0108}
0x3c6a…3c7c Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x0026, t01=0x011a}
0x3c7c…3c9e Head {h00=0x001e, h01=0x0050, text=»ECGP60 LDK A2,LF LINE FEED«, t00=0x0026, t01=0x012c}
0x3c9e…3cb6 Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTBC,A6 «, t00=0x0026, t01=0x014e}
0x3cb6…3cca Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0026, t01=0x0166}
0x3cca…3cf0 Head {h00=0x0022, h01=0x0050, text=»ECGP70 CF A5,OUTPUT SEND CHAR.«, t00=0x0026, t01=0x017a}
0x3cf0…3d0e Head {h00=0x001a, h01=0x0050, text=» LDK A2,/08 BACKSPACE «, t00=0x0027, t01=0x0010}
0x3d0e…3d20 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0027, t01=0x002e}
0x3d20…3d36 Head {h00=0x0012, h01=0x0050, text=» RB(NN) ECGP70«, t00=0x0027, t01=0x0040}
0x3d36…3d48 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0027, t01=0x0056}
0x3d48…3d76 Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER«, t00=0x0027, t01=0x0068}
0x3d76…3d88 Head {h00=0x000e, h01=0x0050, text=» RB ECGP20«, t00=0x0027, t01=0x0096}
0x3d88…3d96 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00a8}
0x3d96…3da0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b6}
0x3da0…3db4 Head {h00=0x0010, h01=0x0050, text=»* R C G P«, t00=0x0027, t01=0x00c0}
0x3db4…3dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d4}
0x3dbe…3df2 Head {h00=0x0030, h01=0x0050, text=»* RCGP = RECOVERY ROUTINE GENERAL PRINTER«, t00=0x0027, t01=0x00de}
0x3df2…3dfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0112}
0x3dfc…3e06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011c}
0x3e06…3e32 Head {h00=0x0028, h01=0x0050, text=»* RECOVERY IS CARRIED OUT ONLY IF«, t00=0x0027, t01=0x0126}
0x3e32…3e52 Head {h00=0x001c, h01=0x0050, text=»* ORDER 6 IS RUNNING «, t00=0x0027, t01=0x0152}
0x3e52…3e5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0172}
0x3e5c…3e72 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x0027, t01=0x017c}
0x3e72…3e7c (40, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0004}
0x3e7c…3e9a Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x0028, t01=0x000e}
0x3e9a…3eb2 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x0028, t01=0x002c}
0x3eb2…3ed0 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x0028, t01=0x0044}
0x3ed0…3ee2 Head {h00=0x000e, h01=0x0050, text=»RCGP EQU *«, t00=0x0028, t01=0x0062}
0x3ee2…3f12 Head {h00=0x002c, h01=0x0050, text=» CF A15,SAVE8 SAVE 8 REGISTERS ON STACK «, t00=0x0028, t01=0x0074}
0x3f12…3f30 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTST,A6 BUSY ?«, t00=0x0028, t01=0x00a4}
0x3f30…3f46 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0028, t01=0x00c2}
0x3f46…3f72 Head {h00=0x0028, h01=0x0050, text=» LDK A2,SOH RESET PRINT BUFFER CODE «, t00=0x0028, t01=0x00d8}
0x3f72…3f90 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND IT «, t00=0x0028, t01=0x0104}
0x3f90…3fa2 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x0028, t01=0x0122}
0x3fa2…3fb8 Head {h00=0x0012, h01=0x0050, text=» RF(E) RCGP10 «, t00=0x0028, t01=0x0134}
0x3fb8…3fd2 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x0028, t01=0x014a}
0x3fd2…3fec Head {h00=0x0016, h01=0x0050, text=» RF(E) RCGP05 YES «, t00=0x0028, t01=0x0164}
0x3fec…4006 Head {h00=0x0016, h01=0x0050, text=» CWK A7,0 ORDER 0?«, t00=0x0028, t01=0x017e}
0x4006…401a Head {h00=0x0010, h01=0x0050, text=» RB(E) ENDIO«, t00=0x0029, t01=0x0008}
0x401a…402a Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x0029, t01=0x001c}
0x402a…403e Head {h00=0x0010, h01=0x0050, text=»RCGP05 EQU *«, t00=0x0029, t01=0x002c}
0x403e…4072 Head {h00=0x0030, h01=0x0050, text=» LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD«, t00=0x0029, t01=0x0040}
0x4072…4096 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/4 LINE FEED DONE ? «, t00=0x0029, t01=0x0074}
0x4096…40ae Head {h00=0x0014, h01=0x0050, text=» ABL(E) ACGP NO «, t00=0x0029, t01=0x0098}
0x40ae…40c4 Head {h00=0x0012, h01=0x0050, text=» LDK A2,SPACE «, t00=0x0029, t01=0x00b0}
0x40c4…40e4 Head {h00=0x001c, h01=0x0050, text=» CF A5,OUTPUT SEND SPACE«, t00=0x0029, t01=0x00c6}
0x40e4…40f8 Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x0029, t01=0x00e6}
0x40f8…4116 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND STX«, t00=0x0029, t01=0x00fa}
0x4116…4138 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x0029, t01=0x0118}
0x4138…414a Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0029, t01=0x013a}
0x414a…417e Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND«, t00=0x0029, t01=0x014c}
0x417e…4192 Head {h00=0x0010, h01=0x0050, text=» ABL ACGP46 «, t00=0x0029, t01=0x0180}
0x4192…41be (42, 2, 84) Head {h00=0x0028, h01=0x0050, text=»RCGP10 LDK A1,TPERR SET RETURN CODE «, t00=0x002a, t01=0x0004}
0x41be…41d2 Head {h00=0x0010, h01=0x0050, text=» ABL AGP430 «, t00=0x002a, t01=0x0030}
0x41d2…41de Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002a, t01=0x0044}
0x41de…41e2 Head {h00=0x4004, h01=0x0000}
0x41e2…41e6 00 2a 00 50 ┆ * P┆
0x41e6…41ee (43, 1, 8) 20 04 00 00 00 2b 00 04 ┆ + ┆
0x41ee…41f6 (44, 1, 8) 20 04 00 00 00 34 00 04 ┆ 4 ┆