|
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: 20660 (0x50b4)
Notes: pts_type(SC)
Names: »DRGP01.SC«
└─⟦025d39960⟧ Bits:30009672 Philips computer tape "600133"
└─⟦this⟧ »M:DSB/DRGP01.SC«
IDENT DRGP01 REL 9.2DK, 81-06-11 870105040921 DK1, PAPER-OUT, 81-06-11 =4,MMU BUFFER CONDITION REL 9.2 79-11-16 =3,RB - ABL REL 9.1 79-05-23 UPDATE PRR 9.1 - REL 9.1 PRR 9.1 79-04-25 REL 9.1 79-04-06 =1-2,GEN UPDATE TO 8.2+ STATUS REL 8.2 79-03-16 =2,IMPROV. OF TEST ORDER REL 8.2 78-11-19 =1,ECHO OF LF AND CR, ABIS REL 8.2 78-09-15 * * ************************************************** * * 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 * * * * *********** * 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 * * ************************ * DWT PARAMETERS * ************************ * * EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTOR ORDER EXTRN DWTA3 SAVE AREA A3 * * * ************* * 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 /20 PAPER OUT OR READY SWITCH OFF * * * ************************************** * CONDITIONAL ASSEMBLY * ************************************** * * IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT * FUNCTION BY SETTING X:A = 0 * X:A EQU 1 CROOM EQU 0 * * 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 0 * * * * 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 1 * * 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 1 * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * * MMU BUFFER SIZE * X:H EQU 120 DVBLEN EQU 300 * =1 * SPECIAL CONDITION FOR ABIS PRINTER =1 ABIS EQU 0 =1 * * ******************************** * DWT-DISPLACEMENT * ******************************** * * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * DWTAP EQU START+/12 HEAD POSITION POINTER * ************************************** * 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 * * * ********** * TABLES * ********** * * IFT CROOM=1 * ROMTAB EQU * TABLE FOR ROOMLESS POINT CHARACTERS DATA /2122,/2426,/3B3C,/3E40,/5E5F * XIF * * * DATA DVBLEN MMU BUFFER LENGTH DATA 2 DEVICE INDEX GPAD EQU * ADDRESS BLOCK DATA ACGP ACTIVATION DRIVER DATA 0 ABORT ROUTINE ADDRESS DATA IHGP INTERRUPT HANDLER DATA RCGP RECOVERY ROUTINE DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE * * 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 LDR A3,A7 =1 RF(Z) ACGP10 ORDER 0 =2 SUK A3,5 =1 RF(E) ACGP09 ORDER 5 =1 SUK A3,1 =1 ABL(NE) DISIOE I/O REQUEST ERROR =1 LD A3,4,A8 ORDER 6 GET REQ LENGTH =1 RF(Z) ACGP01 =1 LD A3,2,A8 GET BUFFER ADDRESS =1 LC A3,1,A3 GET CONTROL CHARACTER =1 ANK A3,/FF =1 ACGP01 SUK A3,/2B =1 RF(E) ACGP06 CONTROL CHAR 2B =1 CF A5,OUTPUT SEND STX =1 LDK A2,CR =1 CF A5,OUTPUT =1 IFT ABIS=1 =1 LDK A2,FFED =1 CWK A3,/31-/2B =1 RF(E) ACGP03 CONTROL CHAR 31 =1 XIF =1 LDK A2,LF =1 SUK A3,/30-/2B =1 RF(NE) ACGP03 NOT CONTROL CHAR 30 =1 CF A5,OUTPUT =1 LDK A2,LF =1 ACGP03 LDK A1,1 RESET HEAD POS COUNTR =1 ST A1,DWTAP,A6 =1 ACGP06 LDK A3,2 START BUFFER INDEX =1 ACGP09 CF A5,OUTPUT =1 RF ACGP19 =1 =2 * =2 * ORDER 00: TEST =2 * IMPROVED TEST OF BOTH SUM OFF AND PRINTER NOT THERE =2 * =2 ACGP10 LDK A2,2 SEND CHAR /02 =2 CF A5,OUTPUT =2 LDK A2,0 SEND CHAR /00=END OF TEST =2 CF A5,OUTPUT =2 RF AGP410 =2 * * 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 YES 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 ABIS=1 =1 CWK A2,/07 BELL ? =1 RB(E) ACGP09 =1 XIF =1 * 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 YES,CODE CHECK ERROR SUK A1,/8E ROOMLESS POINT? (AE) RF(E) AGP100 ADK A1,/4F GREATER THAN /5F RB(NP) ACGP17 NO 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 * * CODE CHECK ERROR * ACGP30 EQU * LDK A1,CCERR ORS A1,8,A8 RETURN CODE RB ACGP20 * * 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 * * 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 * * * 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 AGP415 EQU * =1 IFT ABIS=1 =1 ANK A2,/4 PAPER IN ? =1 RF(NZ) AGP420 YES =1 LDK A1,/20 SET RETURN CODE =1 XIF =1 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 AGP415 =1 * * * 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 * * * 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 * * 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? RF(Z) IHGP20 =2 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 IHGP20 EQU * DK1 ANK A2,/04 CHECK PAPER OUT DK1 RF(NZ) IHGP25 PAPER OK... DK1 LDK A1,PROUT SET RETURN-CODE DK1 IHGP25 EQU * DK1 LDR A1,A1 RETURN-CODE OK? DK1 RB(Z) IHGP10 TEST ORDER AND TIME OUT =2 RB ENDIO =2 * * 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,/2 LINE FEED =1 RF(E) ECGP10 YES =1 SUK A1,/3 CR =1 RF(E) ECGP10 YES =1 SUK A1,/B =1 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 * * 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 * * 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 * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * 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? ABL(E) ENDIO =3 ABL EXIT =3 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 9.2DK, 81-06-11 870105040921«, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…004a Head {h00=0x0008, h01=0x0050, text=» «, t00=0x0000, t01=0x0042}
0x004a…006e Head {h00=0x0020, h01=0x0050, text=» DK1, PAPER-OUT, 81-06-11 «, t00=0x0000, t01=0x004e}
0x006e…0090 Head {h00=0x001e, h01=0x0050, text=» =4,MMU BUFFER CONDITION«, t00=0x0000, t01=0x0072}
0x0090…00ac Head {h00=0x0018, h01=0x0050, text=» REL 9.2 79-11-16 «, t00=0x0000, t01=0x0094}
0x00ac…00c2 Head {h00=0x0012, h01=0x0050, text=» =3,RB - ABL«, t00=0x0000, t01=0x00b0}
0x00c2…00de Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-05-23 «, t00=0x0000, t01=0x00c6}
0x00de…0102 Head {h00=0x0020, h01=0x0050, text=» UPDATE PRR 9.1 - REL 9.1 «, t00=0x0000, t01=0x00e2}
0x0102…011e Head {h00=0x0018, h01=0x0050, text=» PRR 9.1 79-04-25 «, t00=0x0000, t01=0x0106}
0x011e…013a Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-04-06 «, t00=0x0000, t01=0x0122}
0x013a…0164 Head {h00=0x0026, h01=0x0050, text=» =1-2,GEN UPDATE TO 8.2+ STATUS «, t00=0x0000, t01=0x013e}
0x0164…0180 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-03-16 «, t00=0x0000, t01=0x0168}
0x0180…01a4 Head {h00=0x0020, h01=0x0050, text=» =2,IMPROV. OF TEST ORDER «, t00=0x0000, t01=0x0184}
0x01a4…01c0 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-11-19 «, t00=0x0001, t01=0x0018}
0x01c0…01e6 Head {h00=0x0022, h01=0x0050, text=» =1,ECHO OF LF AND CR, ABIS «, t00=0x0001, t01=0x0034}
0x01e6…0202 Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-09-15 «, t00=0x0001, t01=0x005a}
0x0202…020c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0076}
0x020c…0216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0080}
0x0216…0250 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x008a}
0x0250…025a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c4}
0x025a…0282 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x00ce}
0x0282…028c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f6}
0x028c…02b8 Head {h00=0x0028, h01=0x0050, text=»* DRGP01 = DRIVER GENERAL PRINTER «, t00=0x0001, t01=0x0100}
0x02b8…02c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012c}
0x02c2…02cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0136}
0x02cc…02d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0140}
0x02d6…02e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x02e0…02ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0154}
0x02ea…02f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015e}
0x02f4…032e Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0001, t01=0x0168}
0x032e…0338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x0338…0342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0342…037c Head {h00=0x0036, h01=0x0050, text=»* THIS DRIVER HANDLES GENERAL TERMINAL PRINTER «, t00=0x0002, t01=0x0026}
0x037c…03bc Head {h00=0x003c, h01=0x0050, text=»* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. «, t00=0x0002, t01=0x0060}
0x03bc…03c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a0}
0x03c6…0402 Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO «, t00=0x0002, t01=0x00aa}
0x0402…043c Head {h00=0x0036, h01=0x0050, text=»* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE«, t00=0x0002, t01=0x00e6}
0x043c…0476 Head {h00=0x0036, h01=0x0050, text=»* GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY-«, t00=0x0002, t01=0x0120}
0x0476…04ae Head {h00=0x0034, h01=0x0050, text=»* BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD«, t00=0x0002, t01=0x015a}
0x04ae…04ca (3, 0, 398) Head {h00=0x0018, h01=0x0050, text=»* DRIVER DRKB01. «, t00=0x0003, t01=0x0004}
0x04ca…04d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0020}
0x04d4…04de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002a}
0x04de…0512 Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0003, t01=0x0034}
0x0512…051c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0068}
0x051c…0546 Head {h00=0x0026, h01=0x0050, text=»* A C G P ACTIVATION PART«, t00=0x0003, t01=0x0072}
0x0546…0550 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009c}
0x0550…057c Head {h00=0x0028, h01=0x0050, text=»* I H G P INTERRUPT HANDLER«, t00=0x0003, t01=0x00a6}
0x057c…0586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d2}
0x0586…05b2 Head {h00=0x0028, h01=0x0050, text=»* R C G P RECOVERY ROUTINE «, t00=0x0003, t01=0x00dc}
0x05b2…05bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0108}
0x05bc…05e6 Head {h00=0x0026, h01=0x0050, text=»* E C H O G P ECHO FUNCTIONS «, t00=0x0003, t01=0x0112}
0x05e6…05f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013c}
0x05f0…05fa Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0003, t01=0x0146}
0x05fa…0604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0150}
0x0604…0632 Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0003, t01=0x015a}
0x0632…063c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0188}
0x063c…065e (4, 0, 398) Head {h00=0x001e, h01=0x0050, text=»* ORDER 00: TEST STATUS«, t00=0x0004, t01=0x0004}
0x065e…0680 Head {h00=0x001e, h01=0x0050, text=»* 05: BASIC WRITE«, t00=0x0004, t01=0x0026}
0x0680…06a6 Head {h00=0x0022, h01=0x0050, text=»* 06: STANDARD WRITE «, t00=0x0004, t01=0x0048}
0x06a6…06b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006e}
0x06b0…06d2 Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE«, t00=0x0004, t01=0x0078}
0x06d2…06dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x009a}
0x06dc…0702 Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 = RETURN CODE«, t00=0x0004, t01=0x00a4}
0x0702…072e Head {h00=0x0028, h01=0x0050, text=»* A2 = OUTPUT CHARACTER «, t00=0x0004, t01=0x00ca}
0x072e…0756 Head {h00=0x0024, h01=0x0050, text=»* A3 = BUFFER INDEX «, t00=0x0004, t01=0x00f6}
0x0756…077e Head {h00=0x0024, h01=0x0050, text=»* A4 = WORK REGISTER«, t00=0x0004, t01=0x011e}
0x077e…07a4 Head {h00=0x0022, h01=0x0050, text=»* A5 = STACK BASE «, t00=0x0004, t01=0x0146}
0x07a4…07ca Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0004, t01=0x016c}
0x07ca…07ea (5, 0, 400) Head {h00=0x001c, h01=0x0050, text=»* A7 = ORDER«, t00=0x0005, t01=0x0004}
0x07ea…0810 Head {h00=0x0022, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0005, t01=0x0024}
0x0810…081a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004a}
0x081a…0824 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0054}
0x0824…0842 Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0005, t01=0x005e}
0x0842…084c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x007c}
0x084c…088a Head {h00=0x003a, h01=0x0050, text=»* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR«, t00=0x0005, t01=0x0086}
0x088a…08b6 Head {h00=0x0028, h01=0x0050, text=»* (GPCLR) KEYS SHOULD BE DEFINED.«, t00=0x0005, t01=0x00c4}
0x08b6…08c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f0}
0x08c0…08fc Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS «, t00=0x0005, t01=0x00fa}
0x08fc…0930 Head {h00=0x0030, h01=0x0050, text=»* ADAPTED TO HANDLE FOLLOWING FUNCTIONS. «, t00=0x0005, t01=0x0136}
0x0930…094e Head {h00=0x001a, h01=0x0050, text=»* --ROOMLESS POINT «, t00=0x0005, t01=0x016a}
0x094e…098c Head {h00=0x003a, h01=0x0050, text=»* --ACCEPTANCE OF SPECIAL CHARACTER /13,/14 OR BOTH«, t00=0x0005, t01=0x0188}
0x098c…0996 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0036}
0x0996…09de Head {h00=0x0044, h01=0x0050, text=»* --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER «, t00=0x0006, t01=0x0040}
0x09de…0a18 Head {h00=0x0036, h01=0x0050, text=»* --SUPPRESS ECHOING OF END OF RECORD CHARACTER«, t00=0x0006, t01=0x0088}
0x0a18…0a46 Head {h00=0x002a, h01=0x0050, text=»** --SUPPRESION OF TRAILING BLANKS «, t00=0x0006, t01=0x00c2}
0x0a46…0a8a Head {h00=0x0040, h01=0x0050, text=»* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE«, t00=0x0006, t01=0x00f0}
0x0a8a…0a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0134}
0x0a94…0ace Head {h00=0x0036, h01=0x0050, text=»* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS«, t00=0x0006, t01=0x013e}
0x0ace…0b18 Head {h00=0x0046, h01=0x0050, text=»* IS DEFINED IN A SPECIAL TABLE. STANDARD IS SHB CHARACTER SET «, t00=0x0006, t01=0x0178}
0x0b18…0b22 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0007, t01=0x0032}
0x0b22…0b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003c}
0x0b2c…0b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0046}
0x0b36…0b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0050}
0x0b40…0b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005a}
0x0b4a…0b5e Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x0064}
0x0b5e…0b72 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0007, t01=0x0078}
0x0b72…0b86 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x008c}
0x0b86…0b90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a0}
0x0b90…0b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00aa}
0x0b9a…0ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00b4}
0x0ba4…0bd0 Head {h00=0x0028, h01=0x0050, text=» ENTRY GPAD ADDRESS TO ADDRESSBLOCK «, t00=0x0007, t01=0x00be}
0x0bd0…0c04 Head {h00=0x0030, h01=0x0050, text=» ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0007, t01=0x00ea}
0x0c04…0c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011e}
0x0c0e…0c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0128}
0x0c18…0c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0132}
0x0c22…0c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013c}
0x0c2c…0c5e Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0146}
0x0c5e…0c90 Head {h00=0x002e, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES * «, t00=0x0007, t01=0x0178}
0x0c90…0cc2 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0008, t01=0x001a}
0x0cc2…0ccc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004c}
0x0ccc…0cd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0056}
0x0cd6…0cfe Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0008, t01=0x0060}
0x0cfe…0d30 Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER«, t00=0x0008, t01=0x0088}
0x0d30…0d50 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0008, t01=0x00ba}
0x0d50…0d92 Head {h00=0x003e, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN «, t00=0x0008, t01=0x00da}
0x0d92…0db0 Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0008, t01=0x011c}
0x0db0…0de2 Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK«, t00=0x0008, t01=0x013a}
0x0de2…0e16 Head {h00=0x0030, h01=0x0050, text=» EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO «, t00=0x0008, t01=0x016c}
0x0e16…0e4a Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0009, t01=0x0010}
0x0e4a…0e54 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0009, t01=0x0044}
0x0e54…0e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004e}
0x0e5e…0e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0058}
0x0e68…0e88 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0062}
0x0e88…0ea8 Head {h00=0x001c, h01=0x0050, text=»* DWT PARAMETERS *«, t00=0x0009, t01=0x0082}
0x0ea8…0ec8 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x00a2}
0x0ec8…0ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00c2}
0x0ed2…0edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00cc}
0x0edc…0ef8 Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0009, t01=0x00d6}
0x0ef8…0f1a Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0009, t01=0x00f2}
0x0f1a…0f34 Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0009, t01=0x0114}
0x0f34…0f56 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0009, t01=0x012e}
0x0f56…0f60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0150}
0x0f60…0f6a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0009, t01=0x015a}
0x0f6a…0f74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0164}
0x0f74…0f7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x016e}
0x0f7e…0f94 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x0178}
0x0f94…0faa Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x018e}
0x0faa…0fc0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0014}
0x0fc0…0fca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x002a}
0x0fca…0fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0034}
0x0fd4…1012 Head {h00=0x003a, h01=0x0050, text=»SOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY «, t00=0x000a, t01=0x003e}
0x1012…1036 Head {h00=0x0020, h01=0x0050, text=»STX EQU /82 START OF MESSAGE«, t00=0x000a, t01=0x007c}
0x1036…1058 Head {h00=0x001e, h01=0x0050, text=»ETB EQU /97 END OF MESSAGE«, t00=0x000a, t01=0x00a0}
0x1058…1076 Head {h00=0x001a, h01=0x0050, text=»ETX EQU /03 LAST DUMMY«, t00=0x000a, t01=0x00c2}
0x1076…1098 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x000a, t01=0x00e0}
0x1098…10b4 Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x000a, t01=0x0102}
0x10b4…10d2 Head {h00=0x001a, h01=0x0050, text=»FFED EQU /0C FORM FEED«, t00=0x000a, t01=0x011e}
0x10d2…10ee Head {h00=0x0018, h01=0x0050, text=»SPACE EQU /20 SPACE «, t00=0x000a, t01=0x013c}
0x10ee…1122 Head {h00=0x0030, h01=0x0050, text=»PROUT EQU /20 PAPER OUT OR READY SWITCH OFF «, t00=0x000a, t01=0x0158}
0x1122…112c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x018c}
0x112c…1136 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000b, t01=0x0008}
0x1136…1140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0012}
0x1140…114a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001c}
0x114a…1178 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000b, t01=0x0026}
0x1178…11a6 Head {h00=0x002a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x0054}
0x11a6…11d4 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000b, t01=0x0082}
0x11d4…11de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b0}
0x11de…1214 Head {h00=0x0032, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT «, t00=0x000b, t01=0x00ba}
0x1214…123c Head {h00=0x0024, h01=0x0050, text=»* FUNCTION BY SETTING X:A = 0«, t00=0x000b, t01=0x00f0}
0x123c…1246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0118}
0x1246…1258 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000b, t01=0x0122}
0x1258…126c Head {h00=0x0010, h01=0x0050, text=»CROOM EQU 0 «, t00=0x000b, t01=0x0134}
0x126c…1276 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0148}
0x1276…12ae Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE «, t00=0x000b, t01=0x0152}
0x12ae…12e2 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:B=1«, t00=0x000b, t01=0x018a}
0x12e2…12ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002e}
0x12ec…12fe Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000c, t01=0x0038}
0x12fe…1312 Head {h00=0x0010, h01=0x0050, text=»TRETON EQU 0«, t00=0x000c, t01=0x004a}
0x1312…131c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005e}
0x131c…1354 Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE «, t00=0x000c, t01=0x0068}
0x1354…1388 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:C=1«, t00=0x000c, t01=0x00a0}
0x1388…1392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d4}
0x1392…13a4 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000c, t01=0x00de}
0x13a4…13b8 Head {h00=0x0010, h01=0x0050, text=»FJOTON EQU 0«, t00=0x000c, t01=0x00f0}
0x13b8…13c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0104}
0x13c2…13f4 Head {h00=0x002e, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ECHOING OF «, t00=0x000c, t01=0x010e}
0x13f4…1424 Head {h00=0x002c, h01=0x0050, text=»* AN EXTRA SPACE AFTER EACH CHARACTER«, t00=0x000c, t01=0x0140}
0x1424…1440 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:D=0«, t00=0x000c, t01=0x0170}
0x1440…144a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018c}
0x144a…145c Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x000d, t01=0x0008}
0x145c…1470 Head {h00=0x0010, h01=0x0050, text=»COSPAC EQU 0«, t00=0x000d, t01=0x001a}
0x1470…147a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002e}
0x147a…1484 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000d, t01=0x0038}
0x1484…148e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0042}
0x148e…1498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x004c}
0x1498…14d4 Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x000d, t01=0x0056}
0x14d4…1510 Head {h00=0x0038, h01=0x0050, text=»* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER.«, t00=0x000d, t01=0x0092}
0x1510…154c Head {h00=0x0038, h01=0x0050, text=»* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0.«, t00=0x000d, t01=0x00ce}
0x154c…1556 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x010a}
0x1556…1568 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000d, t01=0x0114}
0x1568…157c Head {h00=0x0010, h01=0x0050, text=»EORECH EQU 0«, t00=0x000d, t01=0x0126}
0x157c…1586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x013a}
0x1586…15be Head {h00=0x0034, h01=0x0050, text=»* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE«, t00=0x000d, t01=0x0144}
0x15be…15dc Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:F=1 «, t00=0x000d, t01=0x017c}
0x15dc…15e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x000a}
0x15e6…15f8 Head {h00=0x000e, h01=0x0050, text=»X:F EQU 0 «, t00=0x000e, t01=0x0014}
0x15f8…160c Head {h00=0x0010, h01=0x0050, text=»SUPSPA EQU 1«, t00=0x000e, t01=0x0026}
0x160c…1616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003a}
0x1616…1642 Head {h00=0x0028, h01=0x0050, text=»* END OF REQUEST IN SITUATIONS WHERE«, t00=0x000e, t01=0x0044}
0x1642…1672 Head {h00=0x002c, h01=0x0050, text=»* THE SELECTOR UNIT OR PRINTER HARDWARE «, t00=0x000e, t01=0x0070}
0x1672…16a0 Head {h00=0x002a, h01=0x0050, text=»* IS INACTIVE CAN BE CHOSEN BY SETTING«, t00=0x000e, t01=0x00a0}
0x16a0…16c2 Head {h00=0x001e, h01=0x0050, text=»* THE CONSTANT RECEND = 1 «, t00=0x000e, t01=0x00ce}
0x16c2…16d4 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x000e, t01=0x00f0}
0x16d4…16e8 Head {h00=0x0010, h01=0x0050, text=»RECEND EQU 1«, t00=0x000e, t01=0x0102}
0x16e8…16f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0116}
0x16f2…1724 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000e, t01=0x0120}
0x1724…1752 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x0152}
0x1752…175c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0180}
0x175c…1770 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000e, t01=0x018a}
0x1770…177a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x000e}
0x177a…1784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0018}
0x1784…17be Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000f, t01=0x0022}
0x17be…17f0 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000f, t01=0x005c}
0x17f0…17fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x008e}
0x17fa…180e Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000f, t01=0x0098}
0x180e…1818 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ac}
0x1818…1834 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x000f, t01=0x00b6}
0x1834…183e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d2}
0x183e…1852 Head {h00=0x0010, h01=0x0050, text=»X:H EQU 120 «, t00=0x000f, t01=0x00dc}
0x1852…1868 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 300«, t00=0x000f, t01=0x00f0}
0x1868…1878 Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x000f, t01=0x0106}
0x1878…18a8 Head {h00=0x002c, h01=0x0050, text=»* SPECIAL CONDITION FOR ABIS PRINTER =1«, t00=0x000f, t01=0x0116}
0x18a8…18be Head {h00=0x0012, h01=0x0050, text=»ABIS EQU 0 =1«, t00=0x000f, t01=0x0146}
0x18be…18c8 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x000f, t01=0x015c}
0x18c8…18d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0166}
0x18d2…18dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0170}
0x18dc…1904 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000f, t01=0x017a}
0x1904…192c Head {h00=0x0024, h01=0x0050, text=»* DWT-DISPLACEMENT *«, t00=0x0010, t01=0x0012}
0x192c…1954 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0010, t01=0x003a}
0x1954…195e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0062}
0x195e…1968 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006c}
0x1968…199c Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0010, t01=0x0076}
0x199c…19a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00aa}
0x19a6…19bc Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0010, t01=0x00b4}
0x19bc…19d4 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0010, t01=0x00ca}
0x19d4…19e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00e2}
0x19e0…19ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ee}
0x19ea…1a00 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x00f8}
0x1a00…1a1a Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0010, t01=0x010e}
0x1a1a…1a26 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0128}
0x1a26…1a30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0134}
0x1a30…1a62 Head {h00=0x002e, h01=0x0050, text=»DWTAP EQU START+/12 HEAD POSITION POINTER «, t00=0x0010, t01=0x013e}
0x1a62…1a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0170}
0x1a6c…1a9a Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x017a}
0x1a9a…1aca Head {h00=0x002c, h01=0x0050, text=»* SPECIAL KEYS FOR ECHO FUNCTION * «, t00=0x0011, t01=0x0018}
0x1aca…1af8 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0011, t01=0x0048}
0x1af8…1b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0076}
0x1b02…1b22 Head {h00=0x001c, h01=0x0050, text=»GPBSP EQU /2D BACK SPACE«, t00=0x0011, t01=0x0080}
0x1b22…1b3e Head {h00=0x0018, h01=0x0050, text=»GPCLR EQU /3F CLEAR «, t00=0x0011, t01=0x00a0}
0x1b3e…1b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00bc}
0x1b48…1b64 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x00c6}
0x1b64…1b80 Head {h00=0x0018, h01=0x0050, text=»* RETURN CODES *«, t00=0x0011, t01=0x00e2}
0x1b80…1b9c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x00fe}
0x1b9c…1ba6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011a}
0x1ba6…1bda Head {h00=0x0030, h01=0x0050, text=»PAROUT EQU /20 PAPER OUT OR READY SWITCH OFF«, t00=0x0011, t01=0x0124}
0x1bda…1c00 Head {h00=0x0022, h01=0x0050, text=»CCERR EQU /4 CODE CHECK ERROR «, t00=0x0011, t01=0x0158}
0x1c00…1c26 Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x0011, t01=0x017e}
0x1c26…1c52 Head {h00=0x0028, h01=0x0050, text=»OPERR EQU /1 NOT OPERABLE, POWER OFF«, t00=0x0012, t01=0x0014}
0x1c52…1c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0040}
0x1c5c…1c66 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0012, t01=0x004a}
0x1c66…1c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0054}
0x1c70…1c7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x005e}
0x1c7a…1c8c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0012, t01=0x0068}
0x1c8c…1c9e Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x0012, t01=0x007a}
0x1c9e…1cb0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0012, t01=0x008c}
0x1cb0…1cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x009e}
0x1cba…1cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a8}
0x1cc4…1cd8 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x0012, t01=0x00b2}
0x1cd8…1ce2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c6}
0x1ce2…1cf6 Head {h00=0x0010, h01=0x0050, text=»ROMTAB EQU *«, t00=0x0012, t01=0x00d0}
0x1cf6…1d24 Head {h00=0x002a, h01=0x0050, text=» TABLE FOR ROOMLESS POINT CHARACTERS«, t00=0x0012, t01=0x00e4}
0x1d24…1d50 Head {h00=0x0028, h01=0x0050, text=» DATA /2122,/2426,/3B3C,/3E40,/5E5F «, t00=0x0012, t01=0x0112}
0x1d50…1d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x013e}
0x1d5a…1d66 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0148}
0x1d66…1d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0154}
0x1d70…1d7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x015e}
0x1d7a…1d84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0168}
0x1d84…1daa Head {h00=0x0022, h01=0x0050, text=» DATA DVBLEN MMU BUFFER LENGTH«, t00=0x0012, t01=0x0172}
0x1daa…1dc6 Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0013, t01=0x0008}
0x1dc6…1de6 Head {h00=0x001c, h01=0x0050, text=»GPAD EQU * ADDRESS BLOCK«, t00=0x0013, t01=0x0024}
0x1de6…1e0a Head {h00=0x0020, h01=0x0050, text=» DATA ACGP ACTIVATION DRIVER«, t00=0x0013, t01=0x0044}
0x1e0a…1e30 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0013, t01=0x0068}
0x1e30…1e54 Head {h00=0x0020, h01=0x0050, text=» DATA IHGP INTERRUPT HANDLER«, t00=0x0013, t01=0x008e}
0x1e54…1e78 Head {h00=0x0020, h01=0x0050, text=» DATA RCGP RECOVERY ROUTINE «, t00=0x0013, t01=0x00b2}
0x1e78…1eaa Head {h00=0x002e, h01=0x0050, text=» DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE«, t00=0x0013, t01=0x00d6}
0x1eaa…1eb4 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0013, t01=0x0108}
0x1eb4…1ebe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0112}
0x1ebe…1ed2 Head {h00=0x0010, h01=0x0050, text=»* A C G P«, t00=0x0013, t01=0x011c}
0x1ed2…1edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0130}
0x1edc…1f12 Head {h00=0x0032, h01=0x0050, text=»* ACGP = ACTIVATION DRIVER GENERAL PRINTER «, t00=0x0013, t01=0x013a}
0x1f12…1f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0170}
0x1f1c…1f68 Head {h00=0x0048, h01=0x0050, text=»* ORDER 00: TEST STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE«, t00=0x0013, t01=0x017a}
0x1f68…1fa8 Head {h00=0x003c, h01=0x0050, text=»* IS SET IF PAPER OUT OR READY SWITCH OFF. «, t00=0x0014, t01=0x0036}
0x1fa8…1ff4 Head {h00=0x0048, h01=0x0050, text=»* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM«, t00=0x0014, t01=0x0076}
0x1ff4…2018 Head {h00=0x0020, h01=0x0050, text=»* CHANNEL UNIT.«, t00=0x0014, t01=0x00c2}
0x2018…2022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e6}
0x2022…2064 Head {h00=0x003e, h01=0x0050, text=»* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER «, t00=0x0014, t01=0x00f0}
0x2064…208a Head {h00=0x0022, h01=0x0050, text=»* FROM ECB-BUFFER«, t00=0x0014, t01=0x0132}
0x208a…2094 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0158}
0x2094…20de Head {h00=0x0046, h01=0x0050, text=»* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO PRINTER FROM«, t00=0x0014, t01=0x0162}
0x20de…211e Head {h00=0x003c, h01=0x0050, text=»* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. «, t00=0x0015, t01=0x001c}
0x211e…2128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005c}
0x2128…213a Head {h00=0x000e, h01=0x0050, text=»ACGP EQU *«, t00=0x0015, t01=0x0066}
0x213a…215e Head {h00=0x0020, h01=0x0050, text=» LDK A2,STX START OF MESSAGE«, t00=0x0015, t01=0x0078}
0x215e…2174 Head {h00=0x0012, h01=0x0050, text=» LDR A3,A7 =1«, t00=0x0015, t01=0x009c}
0x2174…2194 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ACGP10 ORDER 0 =2«, t00=0x0015, t01=0x00b2}
0x2194…21aa Head {h00=0x0012, h01=0x0050, text=» SUK A3,5 =1 «, t00=0x0015, t01=0x00d2}
0x21aa…21ca Head {h00=0x001c, h01=0x0050, text=» RF(E) ACGP09 ORDER 5 =1«, t00=0x0015, t01=0x00e8}
0x21ca…21e0 Head {h00=0x0012, h01=0x0050, text=» SUK A3,1 =1 «, t00=0x0015, t01=0x0108}
0x21e0…220c Head {h00=0x0028, h01=0x0050, text=» ABL(NE) DISIOE I/O REQUEST ERROR =1«, t00=0x0015, t01=0x011e}
0x220c…223a Head {h00=0x002a, h01=0x0050, text=» LD A3,4,A8 ORDER 6 GET REQ LENGTH =1 «, t00=0x0015, t01=0x014a}
0x223a…2254 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ACGP01 =1 «, t00=0x0015, t01=0x0178}
0x2254…227e (22, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS =1 «, t00=0x0016, t01=0x0004}
0x227e…22aa Head {h00=0x0028, h01=0x0050, text=» LC A3,1,A3 GET CONTROL CHARACTER =1«, t00=0x0016, t01=0x002e}
0x22aa…22c2 Head {h00=0x0014, h01=0x0050, text=» ANK A3,/FF =1 «, t00=0x0016, t01=0x005a}
0x22c2…22e0 Head {h00=0x001a, h01=0x0050, text=»ACGP01 SUK A3,/2B =1 «, t00=0x0016, t01=0x0072}
0x22e0…2308 Head {h00=0x0024, h01=0x0050, text=» RF(E) ACGP06 CONTROL CHAR 2B =1«, t00=0x0016, t01=0x0090}
0x2308…232a Head {h00=0x001e, h01=0x0050, text=» CF A5,OUTPUT SEND STX =1 «, t00=0x0016, t01=0x00b8}
0x232a…2340 Head {h00=0x0012, h01=0x0050, text=» LDK A2,CR =1«, t00=0x0016, t01=0x00da}
0x2340…235a Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =1 «, t00=0x0016, t01=0x00f0}
0x235a…2372 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x0016, t01=0x010a}
0x2372…238a Head {h00=0x0014, h01=0x0050, text=» LDK A2,FFED =1«, t00=0x0016, t01=0x0122}
0x238a…23a6 Head {h00=0x0018, h01=0x0050, text=» CWK A3,/31-/2B =1 «, t00=0x0016, t01=0x013a}
0x23a6…23ce Head {h00=0x0024, h01=0x0050, text=» RF(E) ACGP03 CONTROL CHAR 31 =1«, t00=0x0016, t01=0x0156}
0x23ce…23e0 Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x0016, t01=0x017e}
0x23e0…23f6 Head {h00=0x0012, h01=0x0050, text=» LDK A2,LF =1«, t00=0x0016, t01=0x0190}
0x23f6…2412 Head {h00=0x0018, h01=0x0050, text=» SUK A3,/30-/2B =1 «, t00=0x0017, t01=0x0016}
0x2412…2440 Head {h00=0x002a, h01=0x0050, text=» RF(NE) ACGP03 NOT CONTROL CHAR 30 =1 «, t00=0x0017, t01=0x0032}
0x2440…245a Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =1 «, t00=0x0017, t01=0x0060}
0x245a…2470 Head {h00=0x0012, h01=0x0050, text=» LDK A2,LF =1«, t00=0x0017, t01=0x007a}
0x2470…24a0 Head {h00=0x002c, h01=0x0050, text=»ACGP03 LDK A1,1 RESET HEAD POS COUNTR =1«, t00=0x0017, t01=0x0090}
0x24a0…24bc Head {h00=0x0018, h01=0x0050, text=» ST A1,DWTAP,A6 =1 «, t00=0x0017, t01=0x00c0}
0x24bc…24ea Head {h00=0x002a, h01=0x0050, text=»ACGP06 LDK A3,2 START BUFFER INDEX =1 «, t00=0x0017, t01=0x00dc}
0x24ea…250a Head {h00=0x001c, h01=0x0050, text=»ACGP09 CF A5,OUTPUT =1 «, t00=0x0017, t01=0x010a}
0x250a…2520 Head {h00=0x0012, h01=0x0050, text=» RF ACGP19 =1«, t00=0x0017, t01=0x012a}
0x2520…2530 Head {h00=0x000c, h01=0x0050, text=» =2 «, t00=0x0017, t01=0x0140}
0x2530…2540 Head {h00=0x000c, h01=0x0050, text=»* =2 «, t00=0x0017, t01=0x0150}
0x2540…255e Head {h00=0x001a, h01=0x0050, text=»* ORDER 00: TEST =2«, t00=0x0017, t01=0x0160}
0x255e…25b0 Head {h00=0x004e, h01=0x0050, text=»* IMPROVED TEST OF BOTH SUM OFF AND PRINTER NOT THERE =2 «, t00=0x0017, t01=0x017e}
0x25b0…25c0 Head {h00=0x000c, h01=0x0050, text=»* =2 «, t00=0x0018, t01=0x0040}
0x25c0…25e8 Head {h00=0x0024, h01=0x0050, text=»ACGP10 LDK A2,2 SEND CHAR /02 =2«, t00=0x0018, t01=0x0050}
0x25e8…2602 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =2 «, t00=0x0018, t01=0x0078}
0x2602…2630 Head {h00=0x002a, h01=0x0050, text=» LDK A2,0 SEND CHAR /00=END OF TEST =2«, t00=0x0018, t01=0x0092}
0x2630…264a Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =2 «, t00=0x0018, t01=0x00c0}
0x264a…2660 Head {h00=0x0012, h01=0x0050, text=» RF AGP410 =2«, t00=0x0018, t01=0x00da}
0x2660…266a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0018, t01=0x00f0}
0x266a…2674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fa}
0x2674…269e Head {h00=0x0026, h01=0x0050, text=»* GET, CHECK AND SEND CHARACTER«, t00=0x0018, t01=0x0104}
0x269e…26c0 Head {h00=0x001e, h01=0x0050, text=»* (IF ORDER 5 NO CHECK)«, t00=0x0018, t01=0x012e}
0x26c0…26ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0150}
0x26ca…26e6 Head {h00=0x0018, h01=0x0050, text=»ACGP17 CF A5,OUTPUT «, t00=0x0018, t01=0x015a}
0x26e6…271a Head {h00=0x0030, h01=0x0050, text=»ACGP18 IM DWTST,A6 POSITION COUNTER UPDATING«, t00=0x0018, t01=0x0176}
0x271a…272e Head {h00=0x0010, h01=0x0050, text=»ACGP19 EQU *«, t00=0x0019, t01=0x001a}
0x272e…275c Head {h00=0x002a, h01=0x0050, text=» LDKL A4,/400 INDICATE LINE FEED DONE «, t00=0x0019, t01=0x002e}
0x275c…2774 Head {h00=0x0014, h01=0x0050, text=» ORS A4,DWTST,A6«, t00=0x0019, t01=0x005c}
0x2774…278a Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0019, t01=0x0074}
0x278a…27c2 Head {h00=0x0034, h01=0x0050, text=» CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER «, t00=0x0019, t01=0x008a}
0x27c2…27ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00c2}
0x27ce…27e0 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0019, t01=0x00ce}
0x27e0…281a Head {h00=0x0036, h01=0x0050, text=»ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER«, t00=0x0019, t01=0x00e0}
0x281a…283c Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER?«, t00=0x0019, t01=0x011a}
0x283c…2856 Head {h00=0x0016, h01=0x0050, text=» RF(NP) AGP400 YES«, t00=0x0019, t01=0x013c}
0x2856…2868 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0019, t01=0x0156}
0x2868…2882 Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0019, t01=0x0168}
0x2882…28a4 Head {h00=0x001e, h01=0x0050, text=» RF(E) ACGP24 BASIC WRITE «, t00=0x0019, t01=0x0182}
0x28a4…28cc Head {h00=0x0024, h01=0x0050, text=» SUK A1,9 HARDWARE TABULATION ? «, t00=0x001a, t01=0x0014}
0x28cc…28e2 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP22«, t00=0x001a, t01=0x003c}
0x28e2…2916 Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x001a, t01=0x0052}
0x2916…2928 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001a, t01=0x0086}
0x2928…2956 Head {h00=0x002a, h01=0x0050, text=»ACGP22 SUK A1,8 TABULATION CHARACTER ?«, t00=0x001a, t01=0x0098}
0x2956…296c Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP40 «, t00=0x001a, t01=0x00c6}
0x296c…2984 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x001a, t01=0x00dc}
0x2984…29a2 Head {h00=0x001a, h01=0x0050, text=» CWK A2,/07 BELL ? =1 «, t00=0x001a, t01=0x00f4}
0x29a2…29bc Head {h00=0x0016, h01=0x0050, text=» RB(E) ACGP09 =1 «, t00=0x001a, t01=0x0112}
0x29bc…29ce Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x001a, t01=0x012c}
0x29ce…29d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013e}
0x29d8…29ee Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x001a, t01=0x0148}
0x29ee…2a04 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x001a, t01=0x015e}
0x2a04…2a0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0174}
0x2a0e…2a30 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/F LESS THAN /20 ?«, t00=0x001a, t01=0x017e}
0x2a30…2a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0010}
0x2a3a…2a46 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x001a}
0x2a46…2a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0026}
0x2a50…2a66 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x001b, t01=0x0030}
0x2a66…2a7c Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x001b, t01=0x0046}
0x2a7c…2a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x005c}
0x2a86…2a9c Head {h00=0x0012, h01=0x0050, text=» SUK A1,3 /14?«, t00=0x001b, t01=0x0066}
0x2a9c…2ab2 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x007c}
0x2ab2…2ad4 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x001b, t01=0x0092}
0x2ad4…2ade Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00b4}
0x2ade…2aea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00be}
0x2aea…2af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ca}
0x2af4…2afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d4}
0x2afe…2b14 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x001b, t01=0x00de}
0x2b14…2b2a Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x001b, t01=0x00f4}
0x2b2a…2b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x010a}
0x2b34…2b4c Head {h00=0x0014, h01=0x0050, text=» SUK A1,2 /13 ? «, t00=0x001b, t01=0x0114}
0x2b4c…2b62 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x012c}
0x2b62…2b84 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/D LESS THAN /20 ?«, t00=0x001b, t01=0x0142}
0x2b84…2b90 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0164}
0x2b90…2b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0170}
0x2b9a…2ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x017a}
0x2ba4…2bba Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x001b, t01=0x0184}
0x2bba…2bd0 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x001c, t01=0x000a}
0x2bd0…2bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0020}
0x2bda…2bf0 Head {h00=0x0012, h01=0x0050, text=» SUK A1,2 /13?«, t00=0x001c, t01=0x002a}
0x2bf0…2c06 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001c, t01=0x0040}
0x2c06…2c1c Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 /14?«, t00=0x001c, t01=0x0056}
0x2c1c…2c32 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001c, t01=0x006c}
0x2c32…2c54 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x001c, t01=0x0082}
0x2c54…2c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00a4}
0x2c5e…2c6a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00ae}
0x2c6a…2c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ba}
0x2c74…2c9e Head {h00=0x0026, h01=0x0050, text=» RF(N) ACGP30 YES,CODE CHECK ERROR«, t00=0x001c, t01=0x00c4}
0x2c9e…2cc8 Head {h00=0x0026, h01=0x0050, text=» SUK A1,/8E ROOMLESS POINT? (AE) «, t00=0x001c, t01=0x00ee}
0x2cc8…2cde Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP100 «, t00=0x001c, t01=0x0118}
0x2cde…2d02 Head {h00=0x0020, h01=0x0050, text=» ADK A1,/4F GREATER THAN /5F«, t00=0x001c, t01=0x012e}
0x2d02…2d1c Head {h00=0x0016, h01=0x0050, text=» RB(NP) ACGP17 NO «, t00=0x001c, t01=0x0152}
0x2d1c…2d30 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x001c, t01=0x016c}
0x2d30…2d46 Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACGP30«, t00=0x001c, t01=0x0180}
0x2d46…2d80 Head {h00=0x0036, h01=0x0050, text=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F«, t00=0x001d, t01=0x0008}
0x2d80…2daa Head {h00=0x0026, h01=0x0050, text=» TO CHARACTER BETWEEN /40 TO /5F«, t00=0x001d, t01=0x0042}
0x2daa…2dbc Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x006c}
0x2dbc…2dd0 Head {h00=0x0010, h01=0x0050, text=»ACGP24 EQU *«, t00=0x001d, t01=0x007e}
0x2dd0…2de2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/D«, t00=0x001d, t01=0x0092}
0x2de2…2e00 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) ACGP26 NOT CR «, t00=0x001d, t01=0x00a4}
0x2e00…2e26 Head {h00=0x0022, h01=0x0050, text=» CM DWTST,A6 SET POS LTR.TO 0 «, t00=0x001d, t01=0x00c2}
0x2e26…2e52 Head {h00=0x0028, h01=0x0050, text=» CM DWTAP,A6 RESET HEAD POS.POIINTER«, t00=0x001d, t01=0x00e8}
0x2e52…2e6a Head {h00=0x0014, h01=0x0050, text=»ACGP26 ADK A1,3 «, t00=0x001d, t01=0x0114}
0x2e6a…2e8e Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ACGP17 NOT LINE FEED«, t00=0x001d, t01=0x012c}
0x2e8e…2ea0 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001d, t01=0x0150}
0x2ea0…2ece Head {h00=0x002a, h01=0x0050, text=» ADS A1,DWTST,A6 DECREMENT POS COUNTER«, t00=0x001d, t01=0x0162}
0x2ece…2ee0 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x0190}
0x2ee0…2eea Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001e, t01=0x0012}
0x2eea…2ef4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x001c}
0x2ef4…2f12 Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x001e, t01=0x0026}
0x2f12…2f1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0044}
0x2f1c…2f30 Head {h00=0x0010, h01=0x0050, text=»ACGP30 EQU *«, t00=0x001e, t01=0x004e}
0x2f30…2f46 Head {h00=0x0012, h01=0x0050, text=» LDK A1,CCERR «, t00=0x001e, t01=0x0062}
0x2f46…2f66 Head {h00=0x001c, h01=0x0050, text=» ORS A1,8,A8 RETURN CODE«, t00=0x001e, t01=0x0078}
0x2f66…2f78 Head {h00=0x000e, h01=0x0050, text=» RB ACGP20«, t00=0x001e, t01=0x0098}
0x2f78…2f82 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x001e, t01=0x00aa}
0x2f82…2f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b4}
0x2f8c…2fa4 Head {h00=0x0014, h01=0x0050, text=»* TABULATION «, t00=0x001e, t01=0x00be}
0x2fa4…2fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d6}
0x2fae…2fc2 Head {h00=0x0010, h01=0x0050, text=»ACGP40 EQU *«, t00=0x001e, t01=0x00e0}
0x2fc2…2ff2 Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR GET FIRST ASCII CHARACTER«, t00=0x001e, t01=0x00f4}
0x2ff2…3004 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001e, t01=0x0124}
0x3004…3036 Head {h00=0x002e, h01=0x0050, text=» CF A15,GETCHR GET SECOND ASCII CHARACTER «, t00=0x001e, t01=0x0136}
0x3036…3048 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001e, t01=0x0168}
0x3048…305a Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x001e, t01=0x017a}
0x305a…3070 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP44 «, t00=0x001e, t01=0x018c}
0x3070…30a4 Head {h00=0x0030, h01=0x0050, text=»ACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL«, t00=0x001f, t01=0x0012}
0x30a4…30b6 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001f, t01=0x0046}
0x30b6…30cc Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP43«, t00=0x001f, t01=0x0058}
0x30cc…3108 Head {h00=0x0038, h01=0x0050, text=»ACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER«, t00=0x001f, t01=0x006e}
0x3108…3120 Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTBC,A6 «, t00=0x001f, t01=0x00aa}
0x3120…3150 Head {h00=0x002c, h01=0x0050, text=» SUR A2,A4 AND REQUESTS POSITION COUNTER«, t00=0x001f, t01=0x00c2}
0x3150…317a Head {h00=0x0026, h01=0x0050, text=» TO GET NUMBER OF SPACES TO SEND«, t00=0x001f, t01=0x00f2}
0x317a…3190 Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP20«, t00=0x001f, t01=0x011c}
0x3190…31a2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001f, t01=0x0132}
0x31a2…31e0 Head {h00=0x003a, h01=0x0050, text=»ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE«, t00=0x001f, t01=0x0144}
0x31e0…31fc Head {h00=0x0018, h01=0x0050, text=»ACGP46 CF A5,OUTPUT «, t00=0x001f, t01=0x0182}
0x31fc…3228 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BUFFER INDEX «, t00=0x0020, t01=0x000e}
0x3228…323a Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0020, t01=0x003a}
0x323a…3250 Head {h00=0x0012, h01=0x0050, text=» RB(P) ACGP45 «, t00=0x0020, t01=0x004c}
0x3250…326c Head {h00=0x0018, h01=0x0050, text=» LDR A3,A3 RECOVERY?«, t00=0x0020, t01=0x0062}
0x326c…3282 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP20«, t00=0x0020, t01=0x007e}
0x3282…32b0 Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTBC,A6 RESET POSITION POINTER«, t00=0x0020, t01=0x0094}
0x32b0…32d4 Head {h00=0x0020, h01=0x0050, text=» LDK A3,2 START BUFFER INDEX«, t00=0x0020, t01=0x00c2}
0x32d4…32e6 Head {h00=0x000e, h01=0x0050, text=» RB ACGP19«, t00=0x0020, t01=0x00e6}
0x32e6…32f0 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0020, t01=0x00f8}
0x32f0…32fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0102}
0x32fa…3316 Head {h00=0x0018, h01=0x0050, text=»* ROOMLESS POINT «, t00=0x0020, t01=0x010c}
0x3316…3320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0128}
0x3320…3334 Head {h00=0x0010, h01=0x0050, text=»AGP100 EQU *«, t00=0x0020, t01=0x0132}
0x3334…333e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0146}
0x333e…3352 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x0020, t01=0x0150}
0x3352…335c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0164}
0x335c…3388 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CHARACTER TO SEND«, t00=0x0020, t01=0x016e}
0x3388…339a Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0021, t01=0x000a}
0x339a…33bc Head {h00=0x001e, h01=0x0050, text=» LC A2,ROMTAB,A2 TRANSFORM«, t00=0x0021, t01=0x001c}
0x33bc…33c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x003e}
0x33c6…33d2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0048}
0x33d2…33dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0054}
0x33dc…33e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005e}
0x33e6…33fa Head {h00=0x0010, h01=0x0050, text=» IFF CROOM=1«, t00=0x0021, t01=0x0068}
0x33fa…3404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x007c}
0x3404…3418 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0021, t01=0x0086}
0x3418…3422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x009a}
0x3422…342e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00a4}
0x342e…3438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b0}
0x3438…344a Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0021, t01=0x00ba}
0x344a…3454 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0021, t01=0x00cc}
0x3454…345e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00d6}
0x345e…3468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00e0}
0x3468…3494 Head {h00=0x0028, h01=0x0050, text=»* SEND LAST DUMMY , LOAD A1 WITH «, t00=0x0021, t01=0x00ea}
0x3494…34b8 Head {h00=0x0020, h01=0x0050, text=»* RETURN CODE AND END I/O«, t00=0x0021, t01=0x0116}
0x34b8…34c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x013a}
0x34c2…34d6 Head {h00=0x0010, h01=0x0050, text=»AGP400 EQU *«, t00=0x0021, t01=0x0144}
0x34d6…34f8 Head {h00=0x001e, h01=0x0050, text=» LDK A2,ETB END OF MESSAGE«, t00=0x0021, t01=0x0158}
0x34f8…3512 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x0021, t01=0x017a}
0x3512…3536 (34, 0, 400) Head {h00=0x0020, h01=0x0050, text=»AGP410 LDK A2,ETX LAST DUMMY«, t00=0x0022, t01=0x0004}
0x3536…3550 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x0022, t01=0x0028}
0x3550…3568 Head {h00=0x0014, h01=0x0050, text=»AGP415 EQU * =1«, t00=0x0022, t01=0x0042}
0x3568…3580 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x0022, t01=0x005a}
0x3580…35a0 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/4 PAPER IN ? =1«, t00=0x0022, t01=0x0072}
0x35a0…35be Head {h00=0x001a, h01=0x0050, text=» RF(NZ) AGP420 YES =1 «, t00=0x0022, t01=0x0092}
0x35be…35e4 Head {h00=0x0022, h01=0x0050, text=» LDK A1,/20 SET RETURN CODE =1«, t00=0x0022, t01=0x00b0}
0x35e4…35f6 Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x0022, t01=0x00d6}
0x35f6…360a Head {h00=0x0010, h01=0x0050, text=»AGP420 EQU *«, t00=0x0022, t01=0x00e8}
0x360a…363e Head {h00=0x0030, h01=0x0050, text=» CF A15,UPDAPP UPDATE HEAD POSITION COUNTER «, t00=0x0022, t01=0x00fc}
0x363e…3662 Head {h00=0x0020, h01=0x0050, text=»ENDIO CF A15,TENDIO END I/O «, t00=0x0022, t01=0x0130}
0x3662…368a Head {h00=0x0024, h01=0x0050, text=»EXIT ABL TDISP GO TO DISPATCHER «, t00=0x0022, t01=0x0154}
0x368a…369e Head {h00=0x0010, h01=0x0050, text=»AGP430 EQU *«, t00=0x0022, t01=0x017c}
0x369e…36b6 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x0022, t01=0x0190}
0x36b6…36d6 Head {h00=0x001c, h01=0x0050, text=» ST A3,6,A8 EFF. LENGTH «, t00=0x0023, t01=0x0018}
0x36d6…36ec Head {h00=0x0012, h01=0x0050, text=» RB AGP415 =1«, t00=0x0023, t01=0x0038}
0x36ec…36f6 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0023, t01=0x004e}
0x36f6…3700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0058}
0x3700…370a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0062}
0x370a…373a Head {h00=0x002c, h01=0x0050, text=»* UPDAPP = SUBROUTINE TO UPDATE HEAD «, t00=0x0023, t01=0x006c}
0x373a…376a Head {h00=0x002c, h01=0x0050, text=»* POSITION POINTER WHEN END «, t00=0x0023, t01=0x009c}
0x376a…3796 Head {h00=0x0028, h01=0x0050, text=»* OF REQUEST IS REACHED «, t00=0x0023, t01=0x00cc}
0x3796…37aa Head {h00=0x0010, h01=0x0050, text=»UPDAPP EQU *«, t00=0x0023, t01=0x00f8}
0x37aa…37d6 Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTBC,A6 GET POSITION COUNTER«, t00=0x0023, t01=0x010c}
0x37d6…380c Head {h00=0x0032, h01=0x0050, text=» ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER «, t00=0x0023, t01=0x0138}
0x380c…381e Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0023, t01=0x016e}
0x381e…384e Head {h00=0x002c, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER «, t00=0x0023, t01=0x0180}
0x384e…385e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0024, t01=0x0020}
0x385e…3874 Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0024, t01=0x0030}
0x3874…387e Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0024, t01=0x0046}
0x387e…3888 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0050}
0x3888…3892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x005a}
0x3892…38c0 Head {h00=0x002a, h01=0x0050, text=»* SKIPSP = SUBROTINE TO SKIP SPACES«, t00=0x0024, t01=0x0064}
0x38c0…38ec Head {h00=0x0028, h01=0x0050, text=»* IN END OF ECB-BUFFER. «, t00=0x0024, t01=0x0092}
0x38ec…3926 Head {h00=0x0036, h01=0x0050, text=»* REQUESTED LENGTH IN ECB IS UPDATED. «, t00=0x0024, t01=0x00be}
0x3926…3950 Head {h00=0x0026, h01=0x0050, text=»* A1,A2,A4 - WORK REG «, t00=0x0024, t01=0x00f8}
0x3950…395a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0122}
0x395a…396e Head {h00=0x0010, h01=0x0050, text=»SKIPSP EQU *«, t00=0x0024, t01=0x012c}
0x396e…399a Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS (BA) «, t00=0x0024, t01=0x0140}
0x399a…39c6 Head {h00=0x0028, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH(RL)«, t00=0x0024, t01=0x016c}
0x39c6…39ee Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 GET ADD END OF BUFFER«, t00=0x0025, t01=0x0008}
0x39ee…3a06 Head {h00=0x0014, h01=0x0050, text=»SKIP05 CWK A2,2 «, t00=0x0025, t01=0x0030}
0x3a06…3a24 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 3 «, t00=0x0025, t01=0x0048}
0x3a24…3a3e Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 DECR. BA«, t00=0x0025, t01=0x0066}
0x3a3e…3a5a Head {h00=0x0018, h01=0x0050, text=» LCR A4,A1 GET CHAR «, t00=0x0025, t01=0x0080}
0x3a5a…3a78 Head {h00=0x001a, h01=0x0050, text=» CCK A4,/2020 SPACE ? «, t00=0x0025, t01=0x009c}
0x3a78…3a92 Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP20 NO «, t00=0x0025, t01=0x00ba}
0x3a92…3ab2 Head {h00=0x001c, h01=0x0050, text=»SKIP07 SUK A2,1 DECR RL «, t00=0x0025, t01=0x00d4}
0x3ab2…3ace Head {h00=0x0018, h01=0x0050, text=» RB SKIP05 GET NEXT «, t00=0x0025, t01=0x00f4}
0x3ace…3ae6 Head {h00=0x0014, h01=0x0050, text=»SKIP20 CWK A2,4 «, t00=0x0025, t01=0x0110}
0x3ae6…3b04 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 5 «, t00=0x0025, t01=0x0128}
0x3b04…3b22 Head {h00=0x001a, h01=0x0050, text=» LC A4,-2,A1 GET CHAR «, t00=0x0025, t01=0x0146}
0x3b22…3b4a Head {h00=0x0024, h01=0x0050, text=» CCK A4,/1111 TABULATION CHAR ? «, t00=0x0025, t01=0x0164}
0x3b4a…3b64 Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP30 NO «, t00=0x0025, t01=0x018c}
0x3b64…3b7e Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 DECR BA «, t00=0x0026, t01=0x0016}
0x3b7e…3b98 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 DECR RL «, t00=0x0026, t01=0x0030}
0x3b98…3bb4 Head {h00=0x0018, h01=0x0050, text=» RB SKIP07 GET NEXT «, t00=0x0026, t01=0x004a}
0x3bb4…3bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0066}
0x3bbe…3be4 Head {h00=0x0022, h01=0x0050, text=»SKIP30 ST A2,4,A8 STORE NEW RL«, t00=0x0026, t01=0x0070}
0x3be4…3bf4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0026, t01=0x0096}
0x3bf4…3c00 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x00a6}
0x3c00…3c0a Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0026, t01=0x00b2}
0x3c0a…3c14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00bc}
0x3c14…3c28 Head {h00=0x0010, h01=0x0050, text=»* I H G P«, t00=0x0026, t01=0x00c6}
0x3c28…3c32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00da}
0x3c32…3c48 Head {h00=0x0012, h01=0x0050, text=»* INTERRUPT«, t00=0x0026, t01=0x00e4}
0x3c48…3c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00fa}
0x3c52…3c64 Head {h00=0x000e, h01=0x0050, text=»IHGP EQU *«, t00=0x0026, t01=0x0104}
0x3c64…3c82 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 BUSY? «, t00=0x0026, t01=0x0116}
0x3c82…3c98 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0026, t01=0x0134}
0x3c98…3cb6 Head {h00=0x001a, h01=0x0050, text=» SLL A4,2 ECHO MODE ? «, t00=0x0026, t01=0x014a}
0x3cb6…3ccc Head {h00=0x0012, h01=0x0050, text=» RF(N) IHGP10 «, t00=0x0026, t01=0x0168}
0x3ccc…3ce8 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0026, t01=0x017e}
0x3ce8…3d02 Head {h00=0x0016, h01=0x0050, text=» RF(Z) IHGP20 =2 «, t00=0x0027, t01=0x000a}
0x3d02…3d34 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ?«, t00=0x0027, t01=0x0024}
0x3d34…3d4a Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=0 «, t00=0x0027, t01=0x0056}
0x3d4a…3d5e Head {h00=0x0010, h01=0x0050, text=» RB(NZ) EXIT«, t00=0x0027, t01=0x006c}
0x3d5e…3d6a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0080}
0x3d6a…3d80 Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=1 «, t00=0x0027, t01=0x008c}
0x3d80…3d96 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AGP430«, t00=0x0027, t01=0x00a2}
0x3d96…3da2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x00b8}
0x3da2…3daa Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x00c4}
0x3daa…3de2 Head {h00=0x0034, h01=0x0050, text=»IHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x0027, t01=0x00cc}
0x3de2…3dfc Head {h00=0x0016, h01=0x0050, text=»IHGP20 EQU * DK1 «, t00=0x0027, t01=0x0104}
0x3dfc…3e24 Head {h00=0x0024, h01=0x0050, text=» ANK A2,/04 CHECK PAPER OUT DK1 «, t00=0x0027, t01=0x011e}
0x3e24…3e4a Head {h00=0x0022, h01=0x0050, text=» RF(NZ) IHGP25 PAPER OK... DK1«, t00=0x0027, t01=0x0146}
0x3e4a…3e74 Head {h00=0x0026, h01=0x0050, text=» LDK A1,PROUT SET RETURN-CODE DK1 «, t00=0x0027, t01=0x016c}
0x3e74…3e8e Head {h00=0x0016, h01=0x0050, text=»IHGP25 EQU * DK1 «, t00=0x0028, t01=0x0008}
0x3e8e…3eb4 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A1 RETURN-CODE OK? DK1«, t00=0x0028, t01=0x0022}
0x3eb4…3ee4 Head {h00=0x002c, h01=0x0050, text=» RB(Z) IHGP10 TEST ORDER AND TIME OUT =2«, t00=0x0028, t01=0x0048}
0x3ee4…3efa Head {h00=0x0012, h01=0x0050, text=» RB ENDIO =2 «, t00=0x0028, t01=0x0078}
0x3efa…3f04 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x0028, t01=0x008e}
0x3f04…3f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0098}
0x3f0e…3f26 Head {h00=0x0014, h01=0x0050, text=»* E C H O G P«, t00=0x0028, t01=0x00a2}
0x3f26…3f30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ba}
0x3f30…3f64 Head {h00=0x0030, h01=0x0050, text=»* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0028, t01=0x00c4}
0x3f64…3f6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00f8}
0x3f6e…3f82 Head {h00=0x0010, h01=0x0050, text=»ECHOGP EQU *«, t00=0x0028, t01=0x0102}
0x3f82…3f98 Head {h00=0x0012, h01=0x0050, text=» LDK A4,COSPAC«, t00=0x0028, t01=0x0116}
0x3f98…3fb0 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 EOR? «, t00=0x0028, t01=0x012c}
0x3fb0…3fca Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP17 YES «, t00=0x0028, t01=0x0144}
0x3fca…3fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x015e}
0x3fd4…3fea Head {h00=0x0012, h01=0x0050, text=» IFT EORECH=0 «, t00=0x0028, t01=0x0168}
0x3fea…3ff4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x017e}
0x3ff4…4016 Head {h00=0x001e, h01=0x0050, text=» SUK A2,/80 EOR-CHARACTER «, t00=0x0028, t01=0x0188}
0x4016…4030 Head {h00=0x0016, h01=0x0050, text=» RF(NN) ECGP20 YES«, t00=0x0029, t01=0x001a}
0x4030…4044 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x0029, t01=0x0034}
0x4044…404e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0048}
0x404e…405a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0052}
0x405a…4064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x005e}
0x4064…4076 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0029, t01=0x0068}
0x4076…408a Head {h00=0x0010, h01=0x0050, text=» ANK A1,/7F «, t00=0x0029, t01=0x007a}
0x408a…409c Head {h00=0x000e, h01=0x0050, text=» SUK A1,/8«, t00=0x0029, t01=0x008e}
0x409c…40bc Head {h00=0x001c, h01=0x0050, text=» RF(E) ECGP40 BACKSPACE «, t00=0x0029, t01=0x00a0}
0x40bc…40dc Head {h00=0x001c, h01=0x0050, text=» SUK A1,/2 LINE FEED =1 «, t00=0x0029, t01=0x00c0}
0x40dc…40f8 Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP10 YES =1«, t00=0x0029, t01=0x00e0}
0x40f8…4110 Head {h00=0x0014, h01=0x0050, text=» SUK A1,/3 CR =1«, t00=0x0029, t01=0x00fc}
0x4110…412c Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP10 YES =1«, t00=0x0029, t01=0x0114}
0x412c…4142 Head {h00=0x0012, h01=0x0050, text=» SUK A1,/B =1«, t00=0x0029, t01=0x0130}
0x4142…415e Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP50 CLEAR «, t00=0x0029, t01=0x0146}
0x415e…419a Head {h00=0x0038, h01=0x0050, text=» SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F«, t00=0x0029, t01=0x0162}
0x419a…41b0 Head {h00=0x0012, h01=0x0050, text=» RF(N) ECGP20 «, t00=0x002a, t01=0x000e}
0x41b0…41c8 Head {h00=0x0014, h01=0x0050, text=» SUK A1,/5F-/20 «, t00=0x002a, t01=0x0024}
0x41c8…41de Head {h00=0x0012, h01=0x0050, text=» RF(P) ECGP20 «, t00=0x002a, t01=0x003c}
0x41de…4208 Head {h00=0x0026, h01=0x0050, text=»ECGP10 CF A5,OUTPUT SEND CHARACTER«, t00=0x002a, t01=0x0052}
0x4208…4234 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 UPDATE POSITION COUNTER«, t00=0x002a, t01=0x007c}
0x4234…424e Head {h00=0x0016, h01=0x0050, text=» SUK A4,1 READY ? «, t00=0x002a, t01=0x00a8}
0x424e…4268 Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP20 YES «, t00=0x002a, t01=0x00c2}
0x4268…4296 Head {h00=0x002a, h01=0x0050, text=» RF(P) ECGP60 NO, GO TO CLEAR SECTION «, t00=0x002a, t01=0x00dc}
0x4296…42a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x010a}
0x42a0…42b6 Head {h00=0x0012, h01=0x0050, text=» IFT COSPAC=1 «, t00=0x002a, t01=0x0114}
0x42b6…42c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x012a}
0x42c0…42e4 Head {h00=0x0020, h01=0x0050, text=» LDK A2,SPACE NO SEND SPACE «, t00=0x002a, t01=0x0134}
0x42e4…42f6 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002a, t01=0x0158}
0x42f6…4300 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x016a}
0x4300…430c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0174}
0x430c…4316 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0180}
0x4316…4350 Head {h00=0x0036, h01=0x0050, text=»ECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER «, t00=0x002a, t01=0x018a}
0x4350…437c Head {h00=0x0028, h01=0x0050, text=»ECGP20 ABL ECHRTN RETURN TO KEYBOARD«, t00=0x002b, t01=0x0034}
0x437c…4386 Head {h00=0x0006, h01=0x0050, text=» «, t00=0x002b, t01=0x0060}
0x4386…4390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x006a}
0x4390…43a6 Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x002b, t01=0x0074}
0x43a6…43b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x008a}
0x43b0…43c4 Head {h00=0x0010, h01=0x0050, text=»ECGP40 EQU *«, t00=0x002b, t01=0x0094}
0x43c4…43ee Head {h00=0x0026, h01=0x0050, text=» LDK A2,GPBSP BACKSPACE CHARACTER «, t00=0x002b, t01=0x00a8}
0x43ee…4400 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002b, t01=0x00d2}
0x4400…440a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00e4}
0x440a…441e Head {h00=0x0010, h01=0x0050, text=»* CANCEL «, t00=0x002b, t01=0x00ee}
0x441e…4428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0102}
0x4428…443c Head {h00=0x0010, h01=0x0050, text=»ECGP50 EQU *«, t00=0x002b, t01=0x010c}
0x443c…4462 Head {h00=0x0022, h01=0x0050, text=» LDK A2,GPCLR CLEAR CHARACTER «, t00=0x002b, t01=0x0120}
0x4462…4474 Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x002b, t01=0x0146}
0x4474…4486 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002b, t01=0x0158}
0x4486…44a8 Head {h00=0x001e, h01=0x0050, text=»ECGP60 LDK A2,LF LINE FEED«, t00=0x002b, t01=0x016a}
0x44a8…44c0 Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTBC,A6 «, t00=0x002b, t01=0x018c}
0x44c0…44d4 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x002c, t01=0x0014}
0x44d4…44fa Head {h00=0x0022, h01=0x0050, text=»ECGP70 CF A5,OUTPUT SEND CHAR.«, t00=0x002c, t01=0x0028}
0x44fa…4518 Head {h00=0x001a, h01=0x0050, text=» LDK A2,/08 BACKSPACE «, t00=0x002c, t01=0x004e}
0x4518…452a Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x002c, t01=0x006c}
0x452a…4540 Head {h00=0x0012, h01=0x0050, text=» RB(NN) ECGP70«, t00=0x002c, t01=0x007e}
0x4540…4552 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002c, t01=0x0094}
0x4552…4580 Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER«, t00=0x002c, t01=0x00a6}
0x4580…4592 Head {h00=0x000e, h01=0x0050, text=» RB ECGP20«, t00=0x002c, t01=0x00d4}
0x4592…459c Head {h00=0x0006, h01=0x0050, text=» «, t00=0x002c, t01=0x00e6}
0x459c…45a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00f0}
0x45a6…45ba Head {h00=0x0010, h01=0x0050, text=»* R C G P«, t00=0x002c, t01=0x00fa}
0x45ba…45c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x010e}
0x45c4…45f8 Head {h00=0x0030, h01=0x0050, text=»* RCGP = RECOVERY ROUTINE GENERAL PRINTER«, t00=0x002c, t01=0x0118}
0x45f8…4602 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x014c}
0x4602…460c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0156}
0x460c…4638 Head {h00=0x0028, h01=0x0050, text=»* RECOVERY IS CARRIED OUT ONLY IF«, t00=0x002c, t01=0x0160}
0x4638…4658 Head {h00=0x001c, h01=0x0050, text=»* ORDER 6 IS RUNNING «, t00=0x002c, t01=0x018c}
0x4658…4662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x001c}
0x4662…4678 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x002d, t01=0x0026}
0x4678…4682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x003c}
0x4682…46a0 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x002d, t01=0x0046}
0x46a0…46b8 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x002d, t01=0x0064}
0x46b8…46d6 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x002d, t01=0x007c}
0x46d6…46e8 Head {h00=0x000e, h01=0x0050, text=»RCGP EQU *«, t00=0x002d, t01=0x009a}
0x46e8…46fe Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x002d, t01=0x00ac}
0x46fe…4728 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x002d, t01=0x00c2}
0x4728…4734 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x00ec}
0x4734…473e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00f8}
0x473e…4754 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x002d, t01=0x0102}
0x4754…477a Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x002d, t01=0x0118}
0x477a…4786 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x013e}
0x4786…4790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x014a}
0x4790…47ae Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTST,A6 BUSY ?«, t00=0x002d, t01=0x0154}
0x47ae…47c4 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x002d, t01=0x0172}
0x47c4…47f0 Head {h00=0x0028, h01=0x0050, text=» LDK A2,SOH RESET PRINT BUFFER CODE «, t00=0x002d, t01=0x0188}
0x47f0…480e Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND IT «, t00=0x002e, t01=0x0024}
0x480e…4820 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x002e, t01=0x0042}
0x4820…4836 Head {h00=0x0012, h01=0x0050, text=» RF(E) RCGP10 «, t00=0x002e, t01=0x0054}
0x4836…4850 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x002e, t01=0x006a}
0x4850…486a Head {h00=0x0016, h01=0x0050, text=» RF(E) RCGP05 YES «, t00=0x002e, t01=0x0084}
0x486a…4884 Head {h00=0x0016, h01=0x0050, text=» CWK A7,0 ORDER 0?«, t00=0x002e, t01=0x009e}
0x4884…489e Head {h00=0x0016, h01=0x0050, text=» ABL(E) ENDIO =3 «, t00=0x002e, t01=0x00b8}
0x489e…48b4 Head {h00=0x0012, h01=0x0050, text=» ABL EXIT =3 «, t00=0x002e, t01=0x00d2}
0x48b4…48c8 Head {h00=0x0010, h01=0x0050, text=»RCGP05 EQU *«, t00=0x002e, t01=0x00e8}
0x48c8…48fc Head {h00=0x0030, h01=0x0050, text=» LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD«, t00=0x002e, t01=0x00fc}
0x48fc…4920 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/4 LINE FEED DONE ? «, t00=0x002e, t01=0x0130}
0x4920…4938 Head {h00=0x0014, h01=0x0050, text=» ABL(E) ACGP NO «, t00=0x002e, t01=0x0154}
0x4938…494e Head {h00=0x0012, h01=0x0050, text=» LDK A2,SPACE «, t00=0x002e, t01=0x016c}
0x494e…496e Head {h00=0x001c, h01=0x0050, text=» CF A5,OUTPUT SEND SPACE«, t00=0x002e, t01=0x0182}
0x496e…4982 Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x002f, t01=0x0012}
0x4982…49a0 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND STX«, t00=0x002f, t01=0x0026}
0x49a0…49c2 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x002f, t01=0x0044}
0x49c2…49d4 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002f, t01=0x0066}
0x49d4…4a08 Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND«, t00=0x002f, t01=0x0078}
0x4a08…4a1c Head {h00=0x0010, h01=0x0050, text=» ABL ACGP46 «, t00=0x002f, t01=0x00ac}
0x4a1c…4a48 Head {h00=0x0028, h01=0x0050, text=»RCGP10 LDK A1,TPERR SET RETURN CODE «, t00=0x002f, t01=0x00c0}
0x4a48…4a5c Head {h00=0x0010, h01=0x0050, text=» ABL AGP430 «, t00=0x002f, t01=0x00ec}
0x4a5c…4a68 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002f, t01=0x0100}
0x4a68…4a6c Head {h00=0x4004, h01=0x0000}
0x4a6c…4a70 00 2f 01 0c ┆ / ┆
0x4a70…4a78 (48, 1, 8) 20 04 00 00 00 30 00 04 ┆ 0 ┆
0x4a78…4ac8 (49, 0, 398) 00 0e 00 0a 00 04 10 08 00 1a 20 02 00 23 00 01 00 04 00 0c 00 08 00 03 05 06 00 1c 00 14 00 01 00 16 00 0e 00 0a 00 04 10 08 00 28 20 02 ff ff 00 01 00 26 00 0c 00 08 00 03 07 06 00 2a 00 18 00 01 00 38 00 0c 00 08 00 03 05 06 00 2c 00 1a ┆ # ( & * 8 , ┆
0x4ac8…4b18 00 01 00 48 00 4a 00 46 00 22 00 44 00 00 01 51 4c 30 58 90 06 51 80 52 80 52 01 78 4c 01 73 4c 80 52 78 73 54 52 01 52 4c 30 58 93 00 52 00 74 20 48 59 03 01 74 4c 80 52 30 52 70 21 77 72 78 73 75 21 21 10 12 74 48 59 0c 00 62 40 00 00 01 ┆ H J F " D QL0X Q R R xL sL RxsTR RL0X R t HY tL R0Rp!wrxsu!! tHY b@ ┆
0x4b18…4b68 00 58 00 0c 00 08 00 03 07 06 00 43 00 08 00 01 00 a6 00 0c 00 08 00 03 07 06 00 53 00 08 00 01 00 b6 00 0c 00 08 00 03 06 06 00 59 00 74 00 01 00 c6 00 0c 00 08 00 03 06 06 00 5e 02 04 00 01 00 d6 00 0c 00 08 00 03 06 06 00 65 03 50 00 01 ┆ X C S Y t ^ e P ┆
0x4b68…4bb8 00 e6 00 0e 00 0a 00 04 10 08 00 6c 20 02 00 23 00 01 00 f6 00 0c 00 08 00 03 05 06 00 6e 00 14 00 01 01 08 00 0c 00 08 00 03 07 06 00 75 00 12 00 01 01 18 00 4a 00 46 00 22 00 44 00 40 52 21 80 52 62 52 57 0e 28 74 21 0a 00 62 41 00 52 21 ┆ l # n u J F " D @R! RbRW (t! bA R!┆
0x4bb8…4c06 80 52 62 52 40 58 80 52 48 58 04 80 52 5f 07 4b 00 52 80 52 5c 12 5f 58 01 53 4c 30 58 93 01 53 5f 68 80 52 25 00 51 75 21 21 00 52 20 02 00 01 01 28 00 0c 00 08 00 03 05 06 00 88 00 14 00 01 01 76 00 0c 00 08 00 03 05 06 00 92 00 0c ┆ RbR@X RHX R_ K R R _X SL0X S_h R% Qu!! R ( v ┆
0x4c06…4c56 (50, 0, 400) 00 01 01 86 00 0c 00 08 00 03 06 06 00 9a 01 4f 00 02 00 08 00 0c 00 08 00 03 02 06 00 9e 01 36 00 02 00 18 00 0c 00 08 00 03 02 06 00 9f 00 82 00 02 00 28 00 0c 00 08 00 03 02 06 00 a0 00 a2 00 02 00 38 00 0c 00 08 00 03 02 06 00 a1 00 af ┆ O 6 ( 8 ┆
0x4c56…4ca6 00 02 00 48 00 0c 00 08 00 03 06 06 00 b2 02 a1 00 02 00 58 00 0c 00 08 00 03 06 06 00 b3 02 c0 00 02 00 68 00 0c 00 08 00 03 06 06 00 b4 02 c4 00 02 00 78 00 0c 00 08 00 03 06 06 00 b5 02 d1 00 02 00 88 00 0c 00 08 00 03 06 06 00 b6 02 dd ┆ H X h x ┆
0x4ca6…4cf6 00 02 00 98 00 0c 00 08 00 03 06 06 00 b7 02 e4 00 02 00 a8 00 0c 00 08 00 03 06 06 00 b8 02 ee 00 02 00 b8 00 0c 00 08 00 03 06 06 00 b9 02 f2 00 02 00 c8 00 0c 00 08 00 03 06 06 00 ba 02 f6 00 02 00 d8 00 0c 00 08 00 03 06 06 00 bb 02 fa ┆ ┆
0x4cf6…4d46 00 02 00 e8 00 0c 00 08 00 03 06 06 00 bc 02 fe 00 02 00 f8 00 0c 00 08 00 03 06 06 00 bd 03 02 00 02 01 08 00 0c 00 08 00 03 06 06 00 be 03 06 00 02 01 18 00 0c 00 08 00 03 06 06 00 bf 03 0a 00 02 01 28 00 0c 00 08 00 03 06 06 00 c0 03 0e ┆ ( ┆
0x4d46…4d96 00 02 01 38 00 0c 00 08 00 03 06 06 00 c1 03 10 00 02 01 48 00 0c 00 08 00 03 06 06 00 c2 03 12 00 02 01 58 00 0c 00 08 00 03 06 06 00 c3 03 38 00 02 01 68 00 0c 00 08 00 03 06 06 00 c4 03 3a 00 02 01 78 00 0c 00 08 00 03 06 06 00 c5 03 3c ┆ 8 H X 8 h : x <┆
0x4d96…4de6 (51, 0, 398) 00 02 01 88 00 0c 00 08 00 03 06 06 00 c6 03 3e 00 03 00 08 00 0c 00 08 00 03 06 06 00 c7 03 40 00 03 00 18 00 0c 00 08 00 03 06 06 00 c8 03 42 00 03 00 28 00 0c 00 08 00 03 06 06 00 c9 03 44 00 03 00 38 00 0c 00 08 00 03 06 06 00 ca 03 48 ┆ > @ B ( D 8 H┆
0x4de6…4e36 00 03 00 48 00 0c 00 08 00 03 06 06 00 cb 03 4a 00 03 00 58 00 0c 00 08 00 03 06 06 00 cd 03 4e 00 03 00 68 00 4a 00 46 00 22 00 44 00 80 52 21 00 53 75 52 21 30 58 90 06 53 00 54 75 52 24 30 52 54 00 55 75 52 23 80 52 32 58 04 52 52 52 52 ┆ H J X N h J F " D R! SuR!0X S TuR$0RT UuR# R2X RRRR┆
0x4e36…4e86 41 57 04 55 21 6a 63 56 21 24 21 57 3e 33 56 1c 52 52 52 52 52 52 52 52 52 52 52 52 52 52 00 03 00 78 00 0c 00 08 00 03 02 06 00 d1 01 4d 00 03 00 c6 00 0c 00 08 00 03 02 06 00 d2 01 4d 00 03 00 d6 00 0c 00 08 00 03 02 06 00 d3 00 82 00 03 ┆AW U!jcV!$!W>3V RRRRRRRRRRRRRR x M M ┆
0x4e86…4ed6 00 e6 00 0c 00 08 00 03 02 06 00 d4 00 ed 00 03 00 f6 00 0c 00 08 00 03 02 06 00 d5 00 82 00 03 01 06 00 0c 00 08 00 03 02 06 00 d6 01 4d 00 03 01 16 00 0c 00 08 00 03 02 06 00 d7 01 4d 00 03 01 26 00 0c 00 08 00 03 02 06 00 d8 01 4d 00 03 ┆ M M & M ┆
0x4ed6…4f24 01 36 00 0c 00 08 00 03 02 06 00 d9 01 4d 00 03 01 46 00 0c 00 08 00 03 02 06 00 da 01 4d 00 03 01 56 00 0c 00 08 00 03 02 06 00 db 01 4d 00 03 01 66 00 0c 00 08 00 03 02 06 00 dc 01 4d 00 03 01 76 00 0c 00 08 00 03 02 06 00 dd 01 4d ┆ 6 M F M V M f M v M┆
0x4f24…4f74 (52, 0, 400) 00 03 01 86 00 0c 00 08 00 03 02 06 00 de 01 4d 00 04 00 08 00 0c 00 08 00 03 02 06 00 df 00 ed 00 04 00 18 00 0c 00 08 00 03 02 06 00 e0 00 77 00 04 00 28 00 0c 00 08 00 03 02 06 00 e1 00 82 00 04 00 38 00 0c 00 08 00 03 02 06 00 e2 00 ed ┆ M w ( 8 ┆
0x4f74…4fc4 00 04 00 48 00 0c 00 08 00 03 02 06 00 e3 00 ed 00 04 00 58 00 0c 00 08 00 03 02 06 00 e4 00 ed 00 04 00 68 00 0c 00 08 00 03 02 06 00 e5 00 ed 00 04 00 78 00 0c 00 08 00 03 02 06 00 e6 00 ed 00 04 00 88 00 0c 00 08 00 03 02 06 00 e7 00 ed ┆ H X h x ┆
0x4fc4…5014 00 04 00 98 00 0c 00 08 00 03 02 06 00 e8 00 ed 00 04 00 a8 00 0c 00 08 00 03 02 06 00 e9 00 ed 00 04 00 b8 00 0c 00 08 00 03 02 06 00 ea 01 4d 00 04 00 c8 00 0c 00 08 00 03 02 06 00 eb 01 4d 00 04 00 d8 00 0c 00 08 00 03 02 06 00 ec 01 4d ┆ M M M┆
0x5014…5064 00 04 00 e8 00 0c 00 08 00 03 06 06 00 f0 01 c4 00 04 00 f8 00 0c 00 08 00 03 06 06 00 f1 01 c6 00 04 01 08 00 0c 00 08 00 03 06 06 00 f2 01 c8 00 04 01 18 00 0c 00 08 00 03 06 06 00 f3 01 ca 00 04 01 28 00 0c 00 08 00 03 06 06 00 f4 01 cc ┆ ( ┆
0x5064…50b4 00 04 01 38 00 0c 00 08 00 03 06 06 00 f5 01 ce 00 04 01 48 00 0c 00 08 00 03 06 06 00 f6 01 d0 00 04 01 58 00 0c 00 08 00 03 06 06 00 f7 01 d2 00 04 01 68 00 0c 00 08 00 03 06 06 00 f8 01 d4 00 04 01 78 00 0c 00 08 00 03 06 06 00 f9 01 d6 ┆ 8 H X h x ┆