|
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: 20404 (0x4fb4)
Notes: pts_type(SC)
Names: »DRGP01.SC«
└─⟦4358b8014⟧ Bits:30009669 Philips computer tape "600124"
└─⟦this⟧ »MON10/DRGP01.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »M:DECE/DRGP01.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »MON10/DRGP01.SC«
IDENT DRGP01 REL 10.0 80-03-14 870105041000 PRR 10.0 79-12-07 =3,CORRECTION OF MMU BUFFER EQUATE 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 * EJECT * * 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 DWTBC BYTE COUNTER EXTRN DWTOR ORDER EXTRN DWTA3 SAVE AREA A3 * 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 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 * EJECT * * * 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 130 * =1 * SPECIAL CONDITION FOR ABIS PRINTER =1 ABIS EQU 0 =1 EJECT * * ******************************** * 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 * EJECT * * ********** * 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 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 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 EJECT =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 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 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 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 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 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? 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 LDR A1,A1 =2 RB(Z) IHGP10 TEST ORDER AND TIME OUT =2 RB ENDIO =2 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,/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 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 * 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? 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 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005a Head {h00=0x0018, h01=0x0050, text=» PRR 10.0 79-12-07«, t00=0x0000, t01=0x0042}
0x005a…0088 Head {h00=0x002a, h01=0x0050, text=» =3,CORRECTION OF MMU BUFFER EQUATE «, t00=0x0000, t01=0x005e}
0x0088…00a4 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-04-06 «, t00=0x0000, t01=0x008c}
0x00a4…00ce Head {h00=0x0026, h01=0x0050, text=» =1-2,GEN UPDATE TO 8.2+ STATUS «, t00=0x0000, t01=0x00a8}
0x00ce…00ea Head {h00=0x0018, h01=0x0050, text=» REL 8.2 79-03-16 «, t00=0x0000, t01=0x00d2}
0x00ea…010e Head {h00=0x0020, h01=0x0050, text=» =2,IMPROV. OF TEST ORDER «, t00=0x0000, t01=0x00ee}
0x010e…012a Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-11-19 «, t00=0x0000, t01=0x0112}
0x012a…0150 Head {h00=0x0022, h01=0x0050, text=» =1,ECHO OF LF AND CR, ABIS «, t00=0x0000, t01=0x012e}
0x0150…016c Head {h00=0x0018, h01=0x0050, text=» REL 8.2 78-09-15 «, t00=0x0000, t01=0x0154}
0x016c…0176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0170}
0x0176…0180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x017a}
0x0180…01ba Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0184}
0x01ba…01c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002e}
0x01c4…01ec Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x0038}
0x01ec…01f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x01f6…0222 Head {h00=0x0028, h01=0x0050, text=»* DRGP01 = DRIVER GENERAL PRINTER «, t00=0x0001, t01=0x006a}
0x0222…022c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0096}
0x022c…0236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a0}
0x0236…0240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00aa}
0x0240…024a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b4}
0x024a…0254 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00be}
0x0254…025e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c8}
0x025e…0298 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0001, t01=0x00d2}
0x0298…02a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x010c}
0x02a2…02ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0116}
0x02ac…02e6 Head {h00=0x0036, h01=0x0050, text=»* THIS DRIVER HANDLES GENERAL TERMINAL PRINTER «, t00=0x0001, t01=0x0120}
0x02e6…0326 Head {h00=0x003c, h01=0x0050, text=»* PTS 6321 CONNECTED TO THE SYSTEM VIA CHLT OR CHRT. «, t00=0x0001, t01=0x015a}
0x0326…0330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x000a}
0x0330…036c Head {h00=0x0038, h01=0x0050, text=»* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO «, t00=0x0002, t01=0x0014}
0x036c…03a6 Head {h00=0x0036, h01=0x0050, text=»* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE«, t00=0x0002, t01=0x0050}
0x03a6…03e0 Head {h00=0x0036, h01=0x0050, text=»* GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY-«, t00=0x0002, t01=0x008a}
0x03e0…0418 Head {h00=0x0034, h01=0x0050, text=»* BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD«, t00=0x0002, t01=0x00c4}
0x0418…0434 Head {h00=0x0018, h01=0x0050, text=»* DRIVER DRKB01. «, t00=0x0002, t01=0x00fc}
0x0434…043e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0118}
0x043e…0448 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0122}
0x0448…047c Head {h00=0x0030, h01=0x0050, text=»* THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0002, t01=0x012c}
0x047c…0486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0160}
0x0486…04b0 Head {h00=0x0026, h01=0x0050, text=»* A C G P ACTIVATION PART«, t00=0x0002, t01=0x016a}
0x04b0…04ba (3, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0004}
0x04ba…04e6 Head {h00=0x0028, h01=0x0050, text=»* I H G P INTERRUPT HANDLER«, t00=0x0003, t01=0x000e}
0x04e6…04f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003a}
0x04f0…051c Head {h00=0x0028, h01=0x0050, text=»* R C G P RECOVERY ROUTINE «, t00=0x0003, t01=0x0044}
0x051c…0526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…0550 Head {h00=0x0026, h01=0x0050, text=»* E C H O G P ECHO FUNCTIONS «, t00=0x0003, t01=0x007a}
0x0550…055a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a4}
0x055a…0568 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00ae}
0x0568…0572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…05a0 Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0003, t01=0x00c6}
0x05a0…05aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f4}
0x05aa…05cc Head {h00=0x001e, h01=0x0050, text=»* ORDER 00: TEST STATUS«, t00=0x0003, t01=0x00fe}
0x05cc…05ee Head {h00=0x001e, h01=0x0050, text=»* 05: BASIC WRITE«, t00=0x0003, t01=0x0120}
0x05ee…0614 Head {h00=0x0022, h01=0x0050, text=»* 06: STANDARD WRITE «, t00=0x0003, t01=0x0142}
0x0614…061e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0168}
0x061e…0640 Head {h00=0x001e, h01=0x0050, text=»* NORMAL REGISTER USAGE«, t00=0x0003, t01=0x0172}
0x0640…064a (4, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0004}
0x064a…0670 Head {h00=0x0022, h01=0x0050, text=»* REGISTER A1 = RETURN CODE«, t00=0x0004, t01=0x000e}
0x0670…069c Head {h00=0x0028, h01=0x0050, text=»* A2 = OUTPUT CHARACTER «, t00=0x0004, t01=0x0034}
0x069c…06c4 Head {h00=0x0024, h01=0x0050, text=»* A3 = BUFFER INDEX «, t00=0x0004, t01=0x0060}
0x06c4…06ec Head {h00=0x0024, h01=0x0050, text=»* A4 = WORK REGISTER«, t00=0x0004, t01=0x0088}
0x06ec…0712 Head {h00=0x0022, h01=0x0050, text=»* A5 = STACK BASE «, t00=0x0004, t01=0x00b0}
0x0712…0738 Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT-ADDRESS«, t00=0x0004, t01=0x00d6}
0x0738…0758 Head {h00=0x001c, h01=0x0050, text=»* A7 = ORDER«, t00=0x0004, t01=0x00fc}
0x0758…077e Head {h00=0x0022, h01=0x0050, text=»* A8 = ECB-ADDRESS«, t00=0x0004, t01=0x011c}
0x077e…0788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0142}
0x0788…0792 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014c}
0x0792…07b0 Head {h00=0x001a, h01=0x0050, text=»* SYSTEM ADAPTATION«, t00=0x0004, t01=0x0156}
0x07b0…07ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0174}
0x07ba…07f8 Head {h00=0x003a, h01=0x0050, text=»* THE CODES FOR ECHO OF BACKSPACE (GPBSP) AND CLEAR«, t00=0x0004, t01=0x017e}
0x07f8…0824 Head {h00=0x0028, h01=0x0050, text=»* (GPCLR) KEYS SHOULD BE DEFINED.«, t00=0x0005, t01=0x002c}
0x0824…082e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0058}
0x082e…086a Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS «, t00=0x0005, t01=0x0062}
0x086a…089e Head {h00=0x0030, h01=0x0050, text=»* ADAPTED TO HANDLE FOLLOWING FUNCTIONS. «, t00=0x0005, t01=0x009e}
0x089e…08bc Head {h00=0x001a, h01=0x0050, text=»* --ROOMLESS POINT «, t00=0x0005, t01=0x00d2}
0x08bc…08fa Head {h00=0x003a, h01=0x0050, text=»* --ACCEPTANCE OF SPECIAL CHARACTER /13,/14 OR BOTH«, t00=0x0005, t01=0x00f0}
0x08fa…0904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012e}
0x0904…094c Head {h00=0x0044, h01=0x0050, text=»* --EXCLUDE ECHOING OF AN EXTRA SPACE BETWEEN EACH CHARACTER «, t00=0x0005, t01=0x0138}
0x094c…0986 Head {h00=0x0036, h01=0x0050, text=»* --SUPPRESS ECHOING OF END OF RECORD CHARACTER«, t00=0x0005, t01=0x0180}
0x0986…09b4 Head {h00=0x002a, h01=0x0050, text=»** --SUPPRESION OF TRAILING BLANKS «, t00=0x0006, t01=0x002a}
0x09b4…09f8 Head {h00=0x0040, h01=0x0050, text=»* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE«, t00=0x0006, t01=0x0058}
0x09f8…0a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009c}
0x0a02…0a3c Head {h00=0x0036, h01=0x0050, text=»* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS«, t00=0x0006, t01=0x00a6}
0x0a3c…0a86 Head {h00=0x0046, h01=0x0050, text=»* IS DEFINED IN A SPECIAL TABLE. STANDARD IS SHB CHARACTER SET «, t00=0x0006, t01=0x00e0}
0x0a86…0a94 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x012a}
0x0a94…0a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0138}
0x0a9e…0aa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0142}
0x0aa8…0ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0ab2…0abc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0156}
0x0abc…0ad0 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x0160}
0x0ad0…0ae4 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0006, t01=0x0174}
0x0ae4…0af8 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x0188}
0x0af8…0b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000c}
0x0b02…0b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0016}
0x0b0c…0b16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0020}
0x0b16…0b42 Head {h00=0x0028, h01=0x0050, text=» ENTRY GPAD ADDRESS TO ADDRESSBLOCK «, t00=0x0007, t01=0x002a}
0x0b42…0b76 Head {h00=0x0030, h01=0x0050, text=» ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0007, t01=0x0056}
0x0b76…0b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x008a}
0x0b80…0b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0094}
0x0b8a…0b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009e}
0x0b94…0b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a8}
0x0b9e…0bd0 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x00b2}
0x0bd0…0c02 Head {h00=0x002e, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES * «, t00=0x0007, t01=0x00e4}
0x0c02…0c34 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0116}
0x0c34…0c3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0148}
0x0c3e…0c48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0152}
0x0c48…0c70 Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0007, t01=0x015c}
0x0c70…0ca2 Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER«, t00=0x0007, t01=0x0184}
0x0ca2…0cc2 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0008, t01=0x0026}
0x0cc2…0d04 Head {h00=0x003e, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN «, t00=0x0008, t01=0x0046}
0x0d04…0d22 Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0008, t01=0x0088}
0x0d22…0d54 Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK«, t00=0x0008, t01=0x00a6}
0x0d54…0d88 Head {h00=0x0030, h01=0x0050, text=» EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO «, t00=0x0008, t01=0x00d8}
0x0d88…0dbc Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB-BUFFER «, t00=0x0008, t01=0x010c}
0x0dbc…0dca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0140}
0x0dca…0dd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x014e}
0x0dd4…0dde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0158}
0x0dde…0dfe Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0008, t01=0x0162}
0x0dfe…0e1e Head {h00=0x001c, h01=0x0050, text=»* DWT PARAMETERS *«, t00=0x0008, t01=0x0182}
0x0e1e…0e3e Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0009, t01=0x0012}
0x0e3e…0e48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0032}
0x0e48…0e52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003c}
0x0e52…0e6e Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0009, t01=0x0046}
0x0e6e…0e90 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0009, t01=0x0062}
0x0e90…0eaa Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0009, t01=0x0084}
0x0eaa…0ecc Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0009, t01=0x009e}
0x0ecc…0ed6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00c0}
0x0ed6…0ee4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00ca}
0x0ee4…0eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d8}
0x0eee…0ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e2}
0x0ef8…0f0e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x00ec}
0x0f0e…0f24 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x0102}
0x0f24…0f3a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x0118}
0x0f3a…0f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012e}
0x0f44…0f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0138}
0x0f4e…0f8c Head {h00=0x003a, h01=0x0050, text=»SOH EQU /01 RESET PRINT BUFFER REMOTE AND LOCAL DUMMY «, t00=0x0009, t01=0x0142}
0x0f8c…0fb0 Head {h00=0x0020, h01=0x0050, text=»STX EQU /82 START OF MESSAGE«, t00=0x0009, t01=0x0180}
0x0fb0…0fd2 Head {h00=0x001e, h01=0x0050, text=»ETB EQU /97 END OF MESSAGE«, t00=0x000a, t01=0x0014}
0x0fd2…0ff0 Head {h00=0x001a, h01=0x0050, text=»ETX EQU /03 LAST DUMMY«, t00=0x000a, t01=0x0036}
0x0ff0…1012 Head {h00=0x001e, h01=0x0050, text=»CR EQU /0D CARRIAGE RETURN«, t00=0x000a, t01=0x0054}
0x1012…102e Head {h00=0x0018, h01=0x0050, text=»LF EQU /0A LINE FEED«, t00=0x000a, t01=0x0076}
0x102e…104c Head {h00=0x001a, h01=0x0050, text=»FFED EQU /0C FORM FEED«, t00=0x000a, t01=0x0092}
0x104c…1068 Head {h00=0x0018, h01=0x0050, text=»SPACE EQU /20 SPACE «, t00=0x000a, t01=0x00b0}
0x1068…109c Head {h00=0x0030, h01=0x0050, text=»PROUT EQU /04 PAPER OUT OR READY SWITCH OFF «, t00=0x000a, t01=0x00cc}
0x109c…10a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0100}
0x10a6…10b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x010a}
0x10b4…10be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0118}
0x10be…10c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0122}
0x10c8…10f6 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000a, t01=0x012c}
0x10f6…1124 Head {h00=0x002a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000a, t01=0x015a}
0x1124…1152 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x000a, t01=0x0188}
0x1152…115c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0026}
0x115c…1192 Head {h00=0x0032, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT «, t00=0x000b, t01=0x0030}
0x1192…11ba Head {h00=0x0024, h01=0x0050, text=»* FUNCTION BY SETTING X:A = 0«, t00=0x000b, t01=0x0066}
0x11ba…11c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008e}
0x11c4…11d6 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x000b, t01=0x0098}
0x11d6…11ea Head {h00=0x0010, h01=0x0050, text=»CROOM EQU 0 «, t00=0x000b, t01=0x00aa}
0x11ea…11f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00be}
0x11f4…122c Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE «, t00=0x000b, t01=0x00c8}
0x122c…1260 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:B=1«, t00=0x000b, t01=0x0100}
0x1260…126a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0134}
0x126a…127c Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000b, t01=0x013e}
0x127c…1290 Head {h00=0x0010, h01=0x0050, text=»TRETON EQU 0«, t00=0x000b, t01=0x0150}
0x1290…129a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0164}
0x129a…12d2 Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE «, t00=0x000b, t01=0x016e}
0x12d2…1306 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:C=1«, t00=0x000c, t01=0x0016}
0x1306…1310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004a}
0x1310…1322 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000c, t01=0x0054}
0x1322…1336 Head {h00=0x0010, h01=0x0050, text=»FJOTON EQU 0«, t00=0x000c, t01=0x0066}
0x1336…1340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x007a}
0x1340…1372 Head {h00=0x002e, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ECHOING OF «, t00=0x000c, t01=0x0084}
0x1372…13a2 Head {h00=0x002c, h01=0x0050, text=»* AN EXTRA SPACE AFTER EACH CHARACTER«, t00=0x000c, t01=0x00b6}
0x13a2…13be Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:D=0«, t00=0x000c, t01=0x00e6}
0x13be…13c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0102}
0x13c8…13da Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x000c, t01=0x010c}
0x13da…13ee Head {h00=0x0010, h01=0x0050, text=»COSPAC EQU 0«, t00=0x000c, t01=0x011e}
0x13ee…13f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0132}
0x13f8…1406 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x013c}
0x1406…1410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014a}
0x1410…141a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0154}
0x141a…1456 Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x000c, t01=0x015e}
0x1456…1492 Head {h00=0x0038, h01=0x0050, text=»* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER.«, t00=0x000d, t01=0x000a}
0x1492…14ce Head {h00=0x0038, h01=0x0050, text=»* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0.«, t00=0x000d, t01=0x0046}
0x14ce…14d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0082}
0x14d8…14ea Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000d, t01=0x008c}
0x14ea…14fe Head {h00=0x0010, h01=0x0050, text=»EORECH EQU 0«, t00=0x000d, t01=0x009e}
0x14fe…1508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b2}
0x1508…1540 Head {h00=0x0034, h01=0x0050, text=»* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE«, t00=0x000d, t01=0x00bc}
0x1540…155e Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:F=1 «, t00=0x000d, t01=0x00f4}
0x155e…1568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0112}
0x1568…157a Head {h00=0x000e, h01=0x0050, text=»X:F EQU 0 «, t00=0x000d, t01=0x011c}
0x157a…158e Head {h00=0x0010, h01=0x0050, text=»SUPSPA EQU 1«, t00=0x000d, t01=0x012e}
0x158e…1598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0142}
0x1598…15c4 Head {h00=0x0028, h01=0x0050, text=»* END OF REQUEST IN SITUATIONS WHERE«, t00=0x000d, t01=0x014c}
0x15c4…15f4 Head {h00=0x002c, h01=0x0050, text=»* THE SELECTOR UNIT OR PRINTER HARDWARE «, t00=0x000d, t01=0x0178}
0x15f4…1622 Head {h00=0x002a, h01=0x0050, text=»* IS INACTIVE CAN BE CHOSEN BY SETTING«, t00=0x000e, t01=0x0018}
0x1622…1644 Head {h00=0x001e, h01=0x0050, text=»* THE CONSTANT RECEND = 1 «, t00=0x000e, t01=0x0046}
0x1644…1656 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x000e, t01=0x0068}
0x1656…166a Head {h00=0x0010, h01=0x0050, text=»RECEND EQU 1«, t00=0x000e, t01=0x007a}
0x166a…1674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x008e}
0x1674…16a6 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000e, t01=0x0098}
0x16a6…16d4 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x00ca}
0x16d4…16de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f8}
0x16de…16f2 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x000e, t01=0x0102}
0x16f2…16fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0116}
0x16fc…1706 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0120}
0x1706…1740 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x012a}
0x1740…1772 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x0164}
0x1772…177c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0008}
0x177c…1790 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x000f, t01=0x0012}
0x1790…179a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x179a…17b6 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x000f, t01=0x0030}
0x17b6…17c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004c}
0x17c0…17d4 Head {h00=0x0010, h01=0x0050, text=»X:H EQU 120 «, t00=0x000f, t01=0x0056}
0x17d4…17ea Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 130«, t00=0x000f, t01=0x006a}
0x17ea…17fa Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x000f, t01=0x0080}
0x17fa…182a Head {h00=0x002c, h01=0x0050, text=»* SPECIAL CONDITION FOR ABIS PRINTER =1«, t00=0x000f, t01=0x0090}
0x182a…1840 Head {h00=0x0012, h01=0x0050, text=»ABIS EQU 0 =1«, t00=0x000f, t01=0x00c0}
0x1840…184e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00d6}
0x184e…1858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e4}
0x1858…1862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ee}
0x1862…188a Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000f, t01=0x00f8}
0x188a…18b2 Head {h00=0x0024, h01=0x0050, text=»* DWT-DISPLACEMENT *«, t00=0x000f, t01=0x0120}
0x18b2…18da Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000f, t01=0x0148}
0x18da…18e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0170}
0x18e4…18ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017a}
0x18ee…1922 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x0184}
0x1922…192c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0028}
0x192c…1942 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0010, t01=0x0032}
0x1942…195a Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0010, t01=0x0048}
0x195a…1966 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0060}
0x1966…1970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006c}
0x1970…1986 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x0076}
0x1986…19a0 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0010, t01=0x008c}
0x19a0…19ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00a6}
0x19ac…19b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x19b6…19e8 Head {h00=0x002e, h01=0x0050, text=»DWTAP EQU START+/12 HEAD POSITION POINTER «, t00=0x0010, t01=0x00bc}
0x19e8…19f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ee}
0x19f2…1a20 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x00f8}
0x1a20…1a50 Head {h00=0x002c, h01=0x0050, text=»* SPECIAL KEYS FOR ECHO FUNCTION * «, t00=0x0010, t01=0x0126}
0x1a50…1a7e Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x0156}
0x1a7e…1a88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0184}
0x1a88…1aa8 Head {h00=0x001c, h01=0x0050, text=»GPBSP EQU /2D BACK SPACE«, t00=0x0010, t01=0x018e}
0x1aa8…1ac4 Head {h00=0x0018, h01=0x0050, text=»GPCLR EQU /3F CLEAR «, t00=0x0011, t01=0x001e}
0x1ac4…1ace Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x003a}
0x1ace…1aea Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x0044}
0x1aea…1b06 Head {h00=0x0018, h01=0x0050, text=»* RETURN CODES *«, t00=0x0011, t01=0x0060}
0x1b06…1b22 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x007c}
0x1b22…1b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0098}
0x1b2c…1b60 Head {h00=0x0030, h01=0x0050, text=»PAROUT EQU /20 PAPER OUT OR READY SWITCH OFF«, t00=0x0011, t01=0x00a2}
0x1b60…1b86 Head {h00=0x0022, h01=0x0050, text=»CCERR EQU /4 CODE CHECK ERROR «, t00=0x0011, t01=0x00d6}
0x1b86…1bac Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x0011, t01=0x00fc}
0x1bac…1bd8 Head {h00=0x0028, h01=0x0050, text=»OPERR EQU /1 NOT OPERABLE, POWER OFF«, t00=0x0011, t01=0x0122}
0x1bd8…1be2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x014e}
0x1be2…1bf0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0158}
0x1bf0…1bfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0166}
0x1bfa…1c04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0170}
0x1c04…1c16 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0011, t01=0x017a}
0x1c16…1c28 Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x0011, t01=0x018c}
0x1c28…1c3a Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0012, t01=0x000e}
0x1c3a…1c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0020}
0x1c44…1c4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x002a}
0x1c4e…1c62 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x0012, t01=0x0034}
0x1c62…1c6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0048}
0x1c6c…1c80 Head {h00=0x0010, h01=0x0050, text=»ROMTAB EQU *«, t00=0x0012, t01=0x0052}
0x1c80…1cae Head {h00=0x002a, h01=0x0050, text=» TABLE FOR ROOMLESS POINT CHARACTERS«, t00=0x0012, t01=0x0066}
0x1cae…1cda Head {h00=0x0028, h01=0x0050, text=» DATA /2122,/2426,/3B3C,/3E40,/5E5F «, t00=0x0012, t01=0x0094}
0x1cda…1ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c0}
0x1ce4…1cf0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00ca}
0x1cf0…1cfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d6}
0x1cfa…1d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e0}
0x1d04…1d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ea}
0x1d0e…1d34 Head {h00=0x0022, h01=0x0050, text=» DATA DVBLEN MMU BUFFER LENGTH«, t00=0x0012, t01=0x00f4}
0x1d34…1d50 Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0012, t01=0x011a}
0x1d50…1d70 Head {h00=0x001c, h01=0x0050, text=»GPAD EQU * ADDRESS BLOCK«, t00=0x0012, t01=0x0136}
0x1d70…1d94 Head {h00=0x0020, h01=0x0050, text=» DATA ACGP ACTIVATION DRIVER«, t00=0x0012, t01=0x0156}
0x1d94…1dba Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0012, t01=0x017a}
0x1dba…1dde Head {h00=0x0020, h01=0x0050, text=» DATA IHGP INTERRUPT HANDLER«, t00=0x0013, t01=0x0010}
0x1dde…1e02 Head {h00=0x0020, h01=0x0050, text=» DATA RCGP RECOVERY ROUTINE «, t00=0x0013, t01=0x0034}
0x1e02…1e34 Head {h00=0x002e, h01=0x0050, text=» DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE«, t00=0x0013, t01=0x0058}
0x1e34…1e42 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x008a}
0x1e42…1e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0098}
0x1e4c…1e60 Head {h00=0x0010, h01=0x0050, text=»* A C G P«, t00=0x0013, t01=0x00a2}
0x1e60…1e6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00b6}
0x1e6a…1ea0 Head {h00=0x0032, h01=0x0050, text=»* ACGP = ACTIVATION DRIVER GENERAL PRINTER «, t00=0x0013, t01=0x00c0}
0x1ea0…1eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00f6}
0x1eaa…1ef6 Head {h00=0x0048, h01=0x0050, text=»* ORDER 00: TEST STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE«, t00=0x0013, t01=0x0100}
0x1ef6…1f36 Head {h00=0x003c, h01=0x0050, text=»* IS SET IF PAPER OUT OR READY SWITCH OFF. «, t00=0x0013, t01=0x014c}
0x1f36…1f82 Head {h00=0x0048, h01=0x0050, text=»* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM«, t00=0x0013, t01=0x018c}
0x1f82…1fa6 Head {h00=0x0020, h01=0x0050, text=»* CHANNEL UNIT.«, t00=0x0014, t01=0x0048}
0x1fa6…1fb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006c}
0x1fb0…1ff2 Head {h00=0x003e, h01=0x0050, text=»* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER «, t00=0x0014, t01=0x0076}
0x1ff2…2018 Head {h00=0x0022, h01=0x0050, text=»* FROM ECB-BUFFER«, t00=0x0014, t01=0x00b8}
0x2018…2022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00de}
0x2022…206c Head {h00=0x0046, h01=0x0050, text=»* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO PRINTER FROM«, t00=0x0014, t01=0x00e8}
0x206c…20ac Head {h00=0x003c, h01=0x0050, text=»* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. «, t00=0x0014, t01=0x0132}
0x20ac…20b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0172}
0x20b6…20c8 Head {h00=0x000e, h01=0x0050, text=»ACGP EQU *«, t00=0x0014, t01=0x017c}
0x20c8…20ec Head {h00=0x0020, h01=0x0050, text=» LDK A2,STX START OF MESSAGE«, t00=0x0014, t01=0x018e}
0x20ec…2102 Head {h00=0x0012, h01=0x0050, text=» LDR A3,A7 =1«, t00=0x0015, t01=0x0022}
0x2102…2122 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ACGP10 ORDER 0 =2«, t00=0x0015, t01=0x0038}
0x2122…2138 Head {h00=0x0012, h01=0x0050, text=» SUK A3,5 =1 «, t00=0x0015, t01=0x0058}
0x2138…2158 Head {h00=0x001c, h01=0x0050, text=» RF(E) ACGP09 ORDER 5 =1«, t00=0x0015, t01=0x006e}
0x2158…216e Head {h00=0x0012, h01=0x0050, text=» SUK A3,1 =1 «, t00=0x0015, t01=0x008e}
0x216e…219a Head {h00=0x0028, h01=0x0050, text=» ABL(NE) DISIOE I/O REQUEST ERROR =1«, t00=0x0015, t01=0x00a4}
0x219a…21c8 Head {h00=0x002a, h01=0x0050, text=» LD A3,4,A8 ORDER 6 GET REQ LENGTH =1 «, t00=0x0015, t01=0x00d0}
0x21c8…21e2 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ACGP01 =1 «, t00=0x0015, t01=0x00fe}
0x21e2…220c Head {h00=0x0026, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS =1 «, t00=0x0015, t01=0x0118}
0x220c…2238 Head {h00=0x0028, h01=0x0050, text=» LC A3,1,A3 GET CONTROL CHARACTER =1«, t00=0x0015, t01=0x0142}
0x2238…2250 Head {h00=0x0014, h01=0x0050, text=» ANK A3,/FF =1 «, t00=0x0015, t01=0x016e}
0x2250…226e Head {h00=0x001a, h01=0x0050, text=»ACGP01 SUK A3,/2B =1 «, t00=0x0015, t01=0x0186}
0x226e…2296 Head {h00=0x0024, h01=0x0050, text=» RF(E) ACGP06 CONTROL CHAR 2B =1«, t00=0x0016, t01=0x0014}
0x2296…22b8 Head {h00=0x001e, h01=0x0050, text=» CF A5,OUTPUT SEND STX =1 «, t00=0x0016, t01=0x003c}
0x22b8…22ce Head {h00=0x0012, h01=0x0050, text=» LDK A2,CR =1«, t00=0x0016, t01=0x005e}
0x22ce…22e8 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =1 «, t00=0x0016, t01=0x0074}
0x22e8…2300 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x0016, t01=0x008e}
0x2300…2318 Head {h00=0x0014, h01=0x0050, text=» LDK A2,FFED =1«, t00=0x0016, t01=0x00a6}
0x2318…2334 Head {h00=0x0018, h01=0x0050, text=» CWK A3,/31-/2B =1 «, t00=0x0016, t01=0x00be}
0x2334…235c Head {h00=0x0024, h01=0x0050, text=» RF(E) ACGP03 CONTROL CHAR 31 =1«, t00=0x0016, t01=0x00da}
0x235c…236e Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x0016, t01=0x0102}
0x236e…2384 Head {h00=0x0012, h01=0x0050, text=» LDK A2,LF =1«, t00=0x0016, t01=0x0114}
0x2384…23a0 Head {h00=0x0018, h01=0x0050, text=» SUK A3,/30-/2B =1 «, t00=0x0016, t01=0x012a}
0x23a0…23ce Head {h00=0x002a, h01=0x0050, text=» RF(NE) ACGP03 NOT CONTROL CHAR 30 =1 «, t00=0x0016, t01=0x0146}
0x23ce…23e8 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =1 «, t00=0x0016, t01=0x0174}
0x23e8…23fe Head {h00=0x0012, h01=0x0050, text=» LDK A2,LF =1«, t00=0x0016, t01=0x018e}
0x23fe…242e Head {h00=0x002c, h01=0x0050, text=»ACGP03 LDK A1,1 RESET HEAD POS COUNTR =1«, t00=0x0017, t01=0x0014}
0x242e…244a Head {h00=0x0018, h01=0x0050, text=» ST A1,DWTAP,A6 =1 «, t00=0x0017, t01=0x0044}
0x244a…2478 Head {h00=0x002a, h01=0x0050, text=»ACGP06 LDK A3,2 START BUFFER INDEX =1 «, t00=0x0017, t01=0x0060}
0x2478…2498 Head {h00=0x001c, h01=0x0050, text=»ACGP09 CF A5,OUTPUT =1 «, t00=0x0017, t01=0x008e}
0x2498…24ae Head {h00=0x0012, h01=0x0050, text=» RF ACGP19 =1«, t00=0x0017, t01=0x00ae}
0x24ae…24c2 Head {h00=0x0010, h01=0x0050, text=» EJECT =2 «, t00=0x0017, t01=0x00c4}
0x24c2…24d2 Head {h00=0x000c, h01=0x0050, text=»* =2 «, t00=0x0017, t01=0x00d8}
0x24d2…24f0 Head {h00=0x001a, h01=0x0050, text=»* ORDER 00: TEST =2«, t00=0x0017, t01=0x00e8}
0x24f0…2542 Head {h00=0x004e, h01=0x0050, text=»* IMPROVED TEST OF BOTH SUM OFF AND PRINTER NOT THERE =2 «, t00=0x0017, t01=0x0106}
0x2542…2552 Head {h00=0x000c, h01=0x0050, text=»* =2 «, t00=0x0017, t01=0x0158}
0x2552…257a Head {h00=0x0024, h01=0x0050, text=»ACGP10 LDK A2,2 SEND CHAR /02 =2«, t00=0x0017, t01=0x0168}
0x257a…2594 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =2 «, t00=0x0017, t01=0x0190}
0x2594…25c2 Head {h00=0x002a, h01=0x0050, text=» LDK A2,0 SEND CHAR /00=END OF TEST =2«, t00=0x0018, t01=0x001a}
0x25c2…25dc Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =2 «, t00=0x0018, t01=0x0048}
0x25dc…25f2 Head {h00=0x0012, h01=0x0050, text=» RF AGP410 =2«, t00=0x0018, t01=0x0062}
0x25f2…2600 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0078}
0x2600…260a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0086}
0x260a…2634 Head {h00=0x0026, h01=0x0050, text=»* GET, CHECK AND SEND CHARACTER«, t00=0x0018, t01=0x0090}
0x2634…2656 Head {h00=0x001e, h01=0x0050, text=»* (IF ORDER 5 NO CHECK)«, t00=0x0018, t01=0x00ba}
0x2656…2660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00dc}
0x2660…267c Head {h00=0x0018, h01=0x0050, text=»ACGP17 CF A5,OUTPUT «, t00=0x0018, t01=0x00e6}
0x267c…26b0 Head {h00=0x0030, h01=0x0050, text=»ACGP18 IM DWTST,A6 POSITION COUNTER UPDATING«, t00=0x0018, t01=0x0102}
0x26b0…26c4 Head {h00=0x0010, h01=0x0050, text=»ACGP19 EQU *«, t00=0x0018, t01=0x0136}
0x26c4…26f2 Head {h00=0x002a, h01=0x0050, text=» LDKL A4,/400 INDICATE LINE FEED DONE «, t00=0x0018, t01=0x014a}
0x26f2…270a Head {h00=0x0014, h01=0x0050, text=» ORS A4,DWTST,A6«, t00=0x0018, t01=0x0178}
0x270a…2720 Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0018, t01=0x0190}
0x2720…2758 Head {h00=0x0034, h01=0x0050, text=» CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER «, t00=0x0019, t01=0x0016}
0x2758…2764 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x004e}
0x2764…2776 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0019, t01=0x005a}
0x2776…27b0 Head {h00=0x0036, h01=0x0050, text=»ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER«, t00=0x0019, t01=0x006c}
0x27b0…27d2 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER?«, t00=0x0019, t01=0x00a6}
0x27d2…27ec Head {h00=0x0016, h01=0x0050, text=» RF(NP) AGP400 YES«, t00=0x0019, t01=0x00c8}
0x27ec…27fe Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0019, t01=0x00e2}
0x27fe…2818 Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0019, t01=0x00f4}
0x2818…283a Head {h00=0x001e, h01=0x0050, text=» RF(E) ACGP24 BASIC WRITE «, t00=0x0019, t01=0x010e}
0x283a…2862 Head {h00=0x0024, h01=0x0050, text=» SUK A1,9 HARDWARE TABULATION ? «, t00=0x0019, t01=0x0130}
0x2862…2878 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP22«, t00=0x0019, t01=0x0158}
0x2878…28ac Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x0019, t01=0x016e}
0x28ac…28be Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001a, t01=0x0012}
0x28be…28ec Head {h00=0x002a, h01=0x0050, text=»ACGP22 SUK A1,8 TABULATION CHARACTER ?«, t00=0x001a, t01=0x0024}
0x28ec…2902 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP40 «, t00=0x001a, t01=0x0052}
0x2902…291a Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x001a, t01=0x0068}
0x291a…2938 Head {h00=0x001a, h01=0x0050, text=» CWK A2,/07 BELL ? =1 «, t00=0x001a, t01=0x0080}
0x2938…2952 Head {h00=0x0016, h01=0x0050, text=» RB(E) ACGP09 =1 «, t00=0x001a, t01=0x009e}
0x2952…2964 Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x001a, t01=0x00b8}
0x2964…296e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ca}
0x296e…2984 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x001a, t01=0x00d4}
0x2984…299a Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x001a, t01=0x00ea}
0x299a…29a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0100}
0x29a4…29c6 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/F LESS THAN /20 ?«, t00=0x001a, t01=0x010a}
0x29c6…29d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x012c}
0x29d0…29dc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0136}
0x29dc…29e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0142}
0x29e6…29fc Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x001a, t01=0x014c}
0x29fc…2a12 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x001a, t01=0x0162}
0x2a12…2a1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0178}
0x2a1c…2a32 Head {h00=0x0012, h01=0x0050, text=» SUK A1,3 /14?«, t00=0x001a, t01=0x0182}
0x2a32…2a48 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x0008}
0x2a48…2a6a Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x001b, t01=0x001e}
0x2a6a…2a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0040}
0x2a74…2a80 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x004a}
0x2a80…2a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0056}
0x2a8a…2a94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0060}
0x2a94…2aaa Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x001b, t01=0x006a}
0x2aaa…2ac0 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x001b, t01=0x0080}
0x2ac0…2aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0096}
0x2aca…2ae2 Head {h00=0x0014, h01=0x0050, text=» SUK A1,2 /13 ? «, t00=0x001b, t01=0x00a0}
0x2ae2…2af8 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x00b8}
0x2af8…2b1a Head {h00=0x001e, h01=0x0050, text=» SUK A1,/D LESS THAN /20 ?«, t00=0x001b, t01=0x00ce}
0x2b1a…2b26 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00f0}
0x2b26…2b30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00fc}
0x2b30…2b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0106}
0x2b3a…2b50 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x001b, t01=0x0110}
0x2b50…2b66 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x001b, t01=0x0126}
0x2b66…2b70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x013c}
0x2b70…2b86 Head {h00=0x0012, h01=0x0050, text=» SUK A1,2 /13?«, t00=0x001b, t01=0x0146}
0x2b86…2b9c Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x015c}
0x2b9c…2bb2 Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 /14?«, t00=0x001b, t01=0x0172}
0x2bb2…2bc8 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x0188}
0x2bc8…2bea Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x001c, t01=0x000e}
0x2bea…2bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0030}
0x2bf4…2c00 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x003a}
0x2c00…2c0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0046}
0x2c0a…2c34 Head {h00=0x0026, h01=0x0050, text=» RF(N) ACGP30 YES,CODE CHECK ERROR«, t00=0x001c, t01=0x0050}
0x2c34…2c5e Head {h00=0x0026, h01=0x0050, text=» SUK A1,/8E ROOMLESS POINT? (AE) «, t00=0x001c, t01=0x007a}
0x2c5e…2c74 Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP100 «, t00=0x001c, t01=0x00a4}
0x2c74…2c98 Head {h00=0x0020, h01=0x0050, text=» ADK A1,/4F GREATER THAN /5F«, t00=0x001c, t01=0x00ba}
0x2c98…2cb2 Head {h00=0x0016, h01=0x0050, text=» RB(NP) ACGP17 NO «, t00=0x001c, t01=0x00de}
0x2cb2…2cc6 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x001c, t01=0x00f8}
0x2cc6…2cdc Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACGP30«, t00=0x001c, t01=0x010c}
0x2cdc…2d16 Head {h00=0x0036, h01=0x0050, text=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F«, t00=0x001c, t01=0x0122}
0x2d16…2d40 Head {h00=0x0026, h01=0x0050, text=» TO CHARACTER BETWEEN /40 TO /5F«, t00=0x001c, t01=0x015c}
0x2d40…2d52 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001c, t01=0x0186}
0x2d52…2d66 Head {h00=0x0010, h01=0x0050, text=»ACGP24 EQU *«, t00=0x001d, t01=0x0008}
0x2d66…2d78 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/D«, t00=0x001d, t01=0x001c}
0x2d78…2d96 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) ACGP26 NOT CR «, t00=0x001d, t01=0x002e}
0x2d96…2dbc Head {h00=0x0022, h01=0x0050, text=» CM DWTST,A6 SET POS LTR.TO 0 «, t00=0x001d, t01=0x004c}
0x2dbc…2de8 Head {h00=0x0028, h01=0x0050, text=» CM DWTAP,A6 RESET HEAD POS.POIINTER«, t00=0x001d, t01=0x0072}
0x2de8…2e00 Head {h00=0x0014, h01=0x0050, text=»ACGP26 ADK A1,3 «, t00=0x001d, t01=0x009e}
0x2e00…2e24 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ACGP17 NOT LINE FEED«, t00=0x001d, t01=0x00b6}
0x2e24…2e36 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001d, t01=0x00da}
0x2e36…2e64 Head {h00=0x002a, h01=0x0050, text=» ADS A1,DWTST,A6 DECREMENT POS COUNTER«, t00=0x001d, t01=0x00ec}
0x2e64…2e76 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x011a}
0x2e76…2e84 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x012c}
0x2e84…2e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x013a}
0x2e8e…2eac Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x001d, t01=0x0144}
0x2eac…2eb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0162}
0x2eb6…2eca Head {h00=0x0010, h01=0x0050, text=»ACGP30 EQU *«, t00=0x001d, t01=0x016c}
0x2eca…2ee0 Head {h00=0x0012, h01=0x0050, text=» LDK A1,CCERR «, t00=0x001d, t01=0x0180}
0x2ee0…2f00 Head {h00=0x001c, h01=0x0050, text=» ORS A1,8,A8 RETURN CODE«, t00=0x001e, t01=0x0008}
0x2f00…2f12 Head {h00=0x000e, h01=0x0050, text=» RB ACGP20«, t00=0x001e, t01=0x0028}
0x2f12…2f20 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x003a}
0x2f20…2f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0048}
0x2f2a…2f42 Head {h00=0x0014, h01=0x0050, text=»* TABULATION «, t00=0x001e, t01=0x0052}
0x2f42…2f4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x006a}
0x2f4c…2f60 Head {h00=0x0010, h01=0x0050, text=»ACGP40 EQU *«, t00=0x001e, t01=0x0074}
0x2f60…2f90 Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR GET FIRST ASCII CHARACTER«, t00=0x001e, t01=0x0088}
0x2f90…2fa2 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001e, t01=0x00b8}
0x2fa2…2fd4 Head {h00=0x002e, h01=0x0050, text=» CF A15,GETCHR GET SECOND ASCII CHARACTER «, t00=0x001e, t01=0x00ca}
0x2fd4…2fe6 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001e, t01=0x00fc}
0x2fe6…2ff8 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x001e, t01=0x010e}
0x2ff8…300e Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP44 «, t00=0x001e, t01=0x0120}
0x300e…3042 Head {h00=0x0030, h01=0x0050, text=»ACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL«, t00=0x001e, t01=0x0136}
0x3042…3054 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001e, t01=0x016a}
0x3054…306a Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP43«, t00=0x001e, t01=0x017c}
0x306a…30a6 (31, 0, 400) Head {h00=0x0038, h01=0x0050, text=»ACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER«, t00=0x001f, t01=0x0004}
0x30a6…30be Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTBC,A6 «, t00=0x001f, t01=0x0040}
0x30be…30ee Head {h00=0x002c, h01=0x0050, text=» SUR A2,A4 AND REQUESTS POSITION COUNTER«, t00=0x001f, t01=0x0058}
0x30ee…3118 Head {h00=0x0026, h01=0x0050, text=» TO GET NUMBER OF SPACES TO SEND«, t00=0x001f, t01=0x0088}
0x3118…312e Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP20«, t00=0x001f, t01=0x00b2}
0x312e…3140 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001f, t01=0x00c8}
0x3140…317e Head {h00=0x003a, h01=0x0050, text=»ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE«, t00=0x001f, t01=0x00da}
0x317e…319a Head {h00=0x0018, h01=0x0050, text=»ACGP46 CF A5,OUTPUT «, t00=0x001f, t01=0x0118}
0x319a…31c6 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BUFFER INDEX «, t00=0x001f, t01=0x0134}
0x31c6…31d8 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001f, t01=0x0160}
0x31d8…31ee Head {h00=0x0012, h01=0x0050, text=» RB(P) ACGP45 «, t00=0x001f, t01=0x0172}
0x31ee…320a Head {h00=0x0018, h01=0x0050, text=» LDR A3,A3 RECOVERY?«, t00=0x001f, t01=0x0188}
0x320a…3220 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP20«, t00=0x0020, t01=0x0014}
0x3220…324e Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTBC,A6 RESET POSITION POINTER«, t00=0x0020, t01=0x002a}
0x324e…3272 Head {h00=0x0020, h01=0x0050, text=» LDK A3,2 START BUFFER INDEX«, t00=0x0020, t01=0x0058}
0x3272…3284 Head {h00=0x000e, h01=0x0050, text=» RB ACGP19«, t00=0x0020, t01=0x007c}
0x3284…3292 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x008e}
0x3292…329c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x009c}
0x329c…32b8 Head {h00=0x0018, h01=0x0050, text=»* ROOMLESS POINT «, t00=0x0020, t01=0x00a6}
0x32b8…32c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00c2}
0x32c2…32d6 Head {h00=0x0010, h01=0x0050, text=»AGP100 EQU *«, t00=0x0020, t01=0x00cc}
0x32d6…32e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00e0}
0x32e0…32f4 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x0020, t01=0x00ea}
0x32f4…32fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00fe}
0x32fe…332a Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CHARACTER TO SEND«, t00=0x0020, t01=0x0108}
0x332a…333c Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0020, t01=0x0134}
0x333c…335e Head {h00=0x001e, h01=0x0050, text=» LC A2,ROMTAB,A2 TRANSFORM«, t00=0x0020, t01=0x0146}
0x335e…3368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0168}
0x3368…3374 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0172}
0x3374…337e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x017e}
0x337e…3388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0188}
0x3388…339c (33, 0, 400) Head {h00=0x0010, h01=0x0050, text=» IFF CROOM=1«, t00=0x0021, t01=0x0004}
0x339c…33a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0018}
0x33a6…33ba Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0021, t01=0x0022}
0x33ba…33c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0036}
0x33c4…33d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0040}
0x33d0…33da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004c}
0x33da…33ec Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0021, t01=0x0056}
0x33ec…33fa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0068}
0x33fa…3404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0076}
0x3404…340e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0080}
0x340e…343a Head {h00=0x0028, h01=0x0050, text=»* SEND LAST DUMMY , LOAD A1 WITH «, t00=0x0021, t01=0x008a}
0x343a…345e Head {h00=0x0020, h01=0x0050, text=»* RETURN CODE AND END I/O«, t00=0x0021, t01=0x00b6}
0x345e…3468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00da}
0x3468…347c Head {h00=0x0010, h01=0x0050, text=»AGP400 EQU *«, t00=0x0021, t01=0x00e4}
0x347c…349e Head {h00=0x001e, h01=0x0050, text=» LDK A2,ETB END OF MESSAGE«, t00=0x0021, t01=0x00f8}
0x349e…34b8 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x0021, t01=0x011a}
0x34b8…34dc Head {h00=0x0020, h01=0x0050, text=»AGP410 LDK A2,ETX LAST DUMMY«, t00=0x0021, t01=0x0134}
0x34dc…34f6 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x0021, t01=0x0158}
0x34f6…350e Head {h00=0x0014, h01=0x0050, text=»AGP415 EQU * =1«, t00=0x0021, t01=0x0172}
0x350e…3526 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x0021, t01=0x018a}
0x3526…3546 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/4 PAPER IN ? =1«, t00=0x0022, t01=0x0012}
0x3546…3564 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) AGP420 YES =1 «, t00=0x0022, t01=0x0032}
0x3564…358a Head {h00=0x0022, h01=0x0050, text=» LDK A1,/20 SET RETURN CODE =1«, t00=0x0022, t01=0x0050}
0x358a…359c Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x0022, t01=0x0076}
0x359c…35b0 Head {h00=0x0010, h01=0x0050, text=»AGP420 EQU *«, t00=0x0022, t01=0x0088}
0x35b0…35e4 Head {h00=0x0030, h01=0x0050, text=» CF A15,UPDAPP UPDATE HEAD POSITION COUNTER «, t00=0x0022, t01=0x009c}
0x35e4…3608 Head {h00=0x0020, h01=0x0050, text=»ENDIO CF A15,TENDIO END I/O «, t00=0x0022, t01=0x00d0}
0x3608…3630 Head {h00=0x0024, h01=0x0050, text=»EXIT ABL TDISP GO TO DISPATCHER «, t00=0x0022, t01=0x00f4}
0x3630…3644 Head {h00=0x0010, h01=0x0050, text=»AGP430 EQU *«, t00=0x0022, t01=0x011c}
0x3644…365c Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x0022, t01=0x0130}
0x365c…367c Head {h00=0x001c, h01=0x0050, text=» ST A3,6,A8 EFF. LENGTH «, t00=0x0022, t01=0x0148}
0x367c…3692 Head {h00=0x0012, h01=0x0050, text=» RB AGP415 =1«, t00=0x0022, t01=0x0168}
0x3692…36a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x017e}
0x36a0…36aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x018c}
0x36aa…36b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0008}
0x36b4…36e4 Head {h00=0x002c, h01=0x0050, text=»* UPDAPP = SUBROUTINE TO UPDATE HEAD «, t00=0x0023, t01=0x0012}
0x36e4…3714 Head {h00=0x002c, h01=0x0050, text=»* POSITION POINTER WHEN END «, t00=0x0023, t01=0x0042}
0x3714…3740 Head {h00=0x0028, h01=0x0050, text=»* OF REQUEST IS REACHED «, t00=0x0023, t01=0x0072}
0x3740…3754 Head {h00=0x0010, h01=0x0050, text=»UPDAPP EQU *«, t00=0x0023, t01=0x009e}
0x3754…3780 Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTBC,A6 GET POSITION COUNTER«, t00=0x0023, t01=0x00b2}
0x3780…37b6 Head {h00=0x0032, h01=0x0050, text=» ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER «, t00=0x0023, t01=0x00de}
0x37b6…37c8 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0023, t01=0x0114}
0x37c8…37f8 Head {h00=0x002c, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER «, t00=0x0023, t01=0x0126}
0x37f8…3808 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0023, t01=0x0156}
0x3808…381e Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0023, t01=0x0166}
0x381e…382c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x017c}
0x382c…3836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x018a}
0x3836…3840 (36, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0004}
0x3840…386e Head {h00=0x002a, h01=0x0050, text=»* SKIPSP = SUBROTINE TO SKIP SPACES«, t00=0x0024, t01=0x000e}
0x386e…389a Head {h00=0x0028, h01=0x0050, text=»* IN END OF ECB-BUFFER. «, t00=0x0024, t01=0x003c}
0x389a…38d4 Head {h00=0x0036, h01=0x0050, text=»* REQUESTED LENGTH IN ECB IS UPDATED. «, t00=0x0024, t01=0x0068}
0x38d4…38fe Head {h00=0x0026, h01=0x0050, text=»* A1,A2,A4 - WORK REG «, t00=0x0024, t01=0x00a2}
0x38fe…3908 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00cc}
0x3908…391c Head {h00=0x0010, h01=0x0050, text=»SKIPSP EQU *«, t00=0x0024, t01=0x00d6}
0x391c…3948 Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS (BA) «, t00=0x0024, t01=0x00ea}
0x3948…3974 Head {h00=0x0028, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH(RL)«, t00=0x0024, t01=0x0116}
0x3974…399c Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 GET ADD END OF BUFFER«, t00=0x0024, t01=0x0142}
0x399c…39b4 Head {h00=0x0014, h01=0x0050, text=»SKIP05 CWK A2,2 «, t00=0x0024, t01=0x016a}
0x39b4…39d2 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 3 «, t00=0x0024, t01=0x0182}
0x39d2…39ec Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 DECR. BA«, t00=0x0025, t01=0x0010}
0x39ec…3a08 Head {h00=0x0018, h01=0x0050, text=» LCR A4,A1 GET CHAR «, t00=0x0025, t01=0x002a}
0x3a08…3a26 Head {h00=0x001a, h01=0x0050, text=» CCK A4,/2020 SPACE ? «, t00=0x0025, t01=0x0046}
0x3a26…3a40 Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP20 NO «, t00=0x0025, t01=0x0064}
0x3a40…3a60 Head {h00=0x001c, h01=0x0050, text=»SKIP07 SUK A2,1 DECR RL «, t00=0x0025, t01=0x007e}
0x3a60…3a7c Head {h00=0x0018, h01=0x0050, text=» RB SKIP05 GET NEXT «, t00=0x0025, t01=0x009e}
0x3a7c…3a94 Head {h00=0x0014, h01=0x0050, text=»SKIP20 CWK A2,4 «, t00=0x0025, t01=0x00ba}
0x3a94…3ab2 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 5 «, t00=0x0025, t01=0x00d2}
0x3ab2…3ad0 Head {h00=0x001a, h01=0x0050, text=» LC A4,-2,A1 GET CHAR «, t00=0x0025, t01=0x00f0}
0x3ad0…3af8 Head {h00=0x0024, h01=0x0050, text=» CCK A4,/1111 TABULATION CHAR ? «, t00=0x0025, t01=0x010e}
0x3af8…3b12 Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP30 NO «, t00=0x0025, t01=0x0136}
0x3b12…3b2c Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 DECR BA «, t00=0x0025, t01=0x0150}
0x3b2c…3b46 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 DECR RL «, t00=0x0025, t01=0x016a}
0x3b46…3b62 Head {h00=0x0018, h01=0x0050, text=» RB SKIP07 GET NEXT «, t00=0x0025, t01=0x0184}
0x3b62…3b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0010}
0x3b6c…3b92 Head {h00=0x0022, h01=0x0050, text=»SKIP30 ST A2,4,A8 STORE NEW RL«, t00=0x0026, t01=0x001a}
0x3b92…3ba2 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0026, t01=0x0040}
0x3ba2…3bae Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x0050}
0x3bae…3bbc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x005c}
0x3bbc…3bc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006a}
0x3bc6…3bda Head {h00=0x0010, h01=0x0050, text=»* I H G P«, t00=0x0026, t01=0x0074}
0x3bda…3be4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0088}
0x3be4…3bfa Head {h00=0x0012, h01=0x0050, text=»* INTERRUPT«, t00=0x0026, t01=0x0092}
0x3bfa…3c04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a8}
0x3c04…3c16 Head {h00=0x000e, h01=0x0050, text=»IHGP EQU *«, t00=0x0026, t01=0x00b2}
0x3c16…3c34 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 BUSY? «, t00=0x0026, t01=0x00c4}
0x3c34…3c4a Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0026, t01=0x00e2}
0x3c4a…3c68 Head {h00=0x001a, h01=0x0050, text=» SLL A4,2 ECHO MODE ? «, t00=0x0026, t01=0x00f8}
0x3c68…3c7e Head {h00=0x0012, h01=0x0050, text=» RF(N) IHGP10 «, t00=0x0026, t01=0x0116}
0x3c7e…3c9a Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0026, t01=0x012c}
0x3c9a…3cb4 Head {h00=0x0016, h01=0x0050, text=» RF(Z) IHGP20 =2 «, t00=0x0026, t01=0x0148}
0x3cb4…3ce6 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ?«, t00=0x0026, t01=0x0162}
0x3ce6…3cfc (39, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=0 «, t00=0x0027, t01=0x0004}
0x3cfc…3d10 Head {h00=0x0010, h01=0x0050, text=» RB(NZ) EXIT«, t00=0x0027, t01=0x001a}
0x3d10…3d1c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x002e}
0x3d1c…3d32 Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=1 «, t00=0x0027, t01=0x003a}
0x3d32…3d48 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AGP430«, t00=0x0027, t01=0x0050}
0x3d48…3d54 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0066}
0x3d54…3d5c Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0072}
0x3d5c…3d94 Head {h00=0x0034, h01=0x0050, text=»IHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x0027, t01=0x007a}
0x3d94…3db0 Head {h00=0x0018, h01=0x0050, text=»IHGP20 LDR A1,A1 =2«, t00=0x0027, t01=0x00b2}
0x3db0…3de0 Head {h00=0x002c, h01=0x0050, text=» RB(Z) IHGP10 TEST ORDER AND TIME OUT =2«, t00=0x0027, t01=0x00ce}
0x3de0…3df6 Head {h00=0x0012, h01=0x0050, text=» RB ENDIO =2 «, t00=0x0027, t01=0x00fe}
0x3df6…3e04 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0114}
0x3e04…3e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0122}
0x3e0e…3e26 Head {h00=0x0014, h01=0x0050, text=»* E C H O G P«, t00=0x0027, t01=0x012c}
0x3e26…3e30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0144}
0x3e30…3e64 Head {h00=0x0030, h01=0x0050, text=»* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0027, t01=0x014e}
0x3e64…3e6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0182}
0x3e6e…3e82 Head {h00=0x0010, h01=0x0050, text=»ECHOGP EQU *«, t00=0x0027, t01=0x018c}
0x3e82…3e98 Head {h00=0x0012, h01=0x0050, text=» LDK A4,COSPAC«, t00=0x0028, t01=0x0010}
0x3e98…3eb0 Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 EOR? «, t00=0x0028, t01=0x0026}
0x3eb0…3eca Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP17 YES «, t00=0x0028, t01=0x003e}
0x3eca…3ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0058}
0x3ed4…3eea Head {h00=0x0012, h01=0x0050, text=» IFT EORECH=0 «, t00=0x0028, t01=0x0062}
0x3eea…3ef4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0078}
0x3ef4…3f16 Head {h00=0x001e, h01=0x0050, text=» SUK A2,/80 EOR-CHARACTER «, t00=0x0028, t01=0x0082}
0x3f16…3f30 Head {h00=0x0016, h01=0x0050, text=» RF(NN) ECGP20 YES«, t00=0x0028, t01=0x00a4}
0x3f30…3f44 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x0028, t01=0x00be}
0x3f44…3f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00d2}
0x3f4e…3f5a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00dc}
0x3f5a…3f64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e8}
0x3f64…3f76 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0028, t01=0x00f2}
0x3f76…3f8a Head {h00=0x0010, h01=0x0050, text=» ANK A1,/7F «, t00=0x0028, t01=0x0104}
0x3f8a…3f9c Head {h00=0x000e, h01=0x0050, text=» SUK A1,/8«, t00=0x0028, t01=0x0118}
0x3f9c…3fbc Head {h00=0x001c, h01=0x0050, text=» RF(E) ECGP40 BACKSPACE «, t00=0x0028, t01=0x012a}
0x3fbc…3fdc Head {h00=0x001c, h01=0x0050, text=» SUK A1,/2 LINE FEED =1 «, t00=0x0028, t01=0x014a}
0x3fdc…3ff8 Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP10 YES =1«, t00=0x0028, t01=0x016a}
0x3ff8…4010 Head {h00=0x0014, h01=0x0050, text=» SUK A1,/3 CR =1«, t00=0x0028, t01=0x0186}
0x4010…402c Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP10 YES =1«, t00=0x0029, t01=0x000e}
0x402c…4042 Head {h00=0x0012, h01=0x0050, text=» SUK A1,/B =1«, t00=0x0029, t01=0x002a}
0x4042…405e Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP50 CLEAR «, t00=0x0029, t01=0x0040}
0x405e…409a Head {h00=0x0038, h01=0x0050, text=» SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F«, t00=0x0029, t01=0x005c}
0x409a…40b0 Head {h00=0x0012, h01=0x0050, text=» RF(N) ECGP20 «, t00=0x0029, t01=0x0098}
0x40b0…40c8 Head {h00=0x0014, h01=0x0050, text=» SUK A1,/5F-/20 «, t00=0x0029, t01=0x00ae}
0x40c8…40de Head {h00=0x0012, h01=0x0050, text=» RF(P) ECGP20 «, t00=0x0029, t01=0x00c6}
0x40de…4108 Head {h00=0x0026, h01=0x0050, text=»ECGP10 CF A5,OUTPUT SEND CHARACTER«, t00=0x0029, t01=0x00dc}
0x4108…4134 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 UPDATE POSITION COUNTER«, t00=0x0029, t01=0x0106}
0x4134…414e Head {h00=0x0016, h01=0x0050, text=» SUK A4,1 READY ? «, t00=0x0029, t01=0x0132}
0x414e…4168 Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP20 YES «, t00=0x0029, t01=0x014c}
0x4168…4196 Head {h00=0x002a, h01=0x0050, text=» RF(P) ECGP60 NO, GO TO CLEAR SECTION «, t00=0x0029, t01=0x0166}
0x4196…41a0 (42, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0004}
0x41a0…41b6 Head {h00=0x0012, h01=0x0050, text=» IFT COSPAC=1 «, t00=0x002a, t01=0x000e}
0x41b6…41c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0024}
0x41c0…41e4 Head {h00=0x0020, h01=0x0050, text=» LDK A2,SPACE NO SEND SPACE «, t00=0x002a, t01=0x002e}
0x41e4…41f6 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002a, t01=0x0052}
0x41f6…4200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0064}
0x4200…420c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x006e}
0x420c…4216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x007a}
0x4216…4250 Head {h00=0x0036, h01=0x0050, text=»ECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER «, t00=0x002a, t01=0x0084}
0x4250…427c Head {h00=0x0028, h01=0x0050, text=»ECGP20 ABL ECHRTN RETURN TO KEYBOARD«, t00=0x002a, t01=0x00be}
0x427c…428a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00ea}
0x428a…4294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00f8}
0x4294…42aa Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x002a, t01=0x0102}
0x42aa…42b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0118}
0x42b4…42c8 Head {h00=0x0010, h01=0x0050, text=»ECGP40 EQU *«, t00=0x002a, t01=0x0122}
0x42c8…42f2 Head {h00=0x0026, h01=0x0050, text=» LDK A2,GPBSP BACKSPACE CHARACTER «, t00=0x002a, t01=0x0136}
0x42f2…4304 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002a, t01=0x0160}
0x4304…430e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0172}
0x430e…4322 Head {h00=0x0010, h01=0x0050, text=»* CANCEL «, t00=0x002a, t01=0x017c}
0x4322…432c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0190}
0x432c…4340 Head {h00=0x0010, h01=0x0050, text=»ECGP50 EQU *«, t00=0x002b, t01=0x000a}
0x4340…4366 Head {h00=0x0022, h01=0x0050, text=» LDK A2,GPCLR CLEAR CHARACTER «, t00=0x002b, t01=0x001e}
0x4366…4378 Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x002b, t01=0x0044}
0x4378…438a Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002b, t01=0x0056}
0x438a…43ac Head {h00=0x001e, h01=0x0050, text=»ECGP60 LDK A2,LF LINE FEED«, t00=0x002b, t01=0x0068}
0x43ac…43c4 Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTBC,A6 «, t00=0x002b, t01=0x008a}
0x43c4…43d8 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x002b, t01=0x00a2}
0x43d8…43fe Head {h00=0x0022, h01=0x0050, text=»ECGP70 CF A5,OUTPUT SEND CHAR.«, t00=0x002b, t01=0x00b6}
0x43fe…441c Head {h00=0x001a, h01=0x0050, text=» LDK A2,/08 BACKSPACE «, t00=0x002b, t01=0x00dc}
0x441c…442e Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x002b, t01=0x00fa}
0x442e…4444 Head {h00=0x0012, h01=0x0050, text=» RB(NN) ECGP70«, t00=0x002b, t01=0x010c}
0x4444…4456 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002b, t01=0x0122}
0x4456…4484 Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER«, t00=0x002b, t01=0x0134}
0x4484…4496 Head {h00=0x000e, h01=0x0050, text=» RB ECGP20«, t00=0x002b, t01=0x0162}
0x4496…44a4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0174}
0x44a4…44ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0182}
0x44ae…44c2 Head {h00=0x0010, h01=0x0050, text=»* R C G P«, t00=0x002b, t01=0x018c}
0x44c2…44cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0010}
0x44cc…4500 Head {h00=0x0030, h01=0x0050, text=»* RCGP = RECOVERY ROUTINE GENERAL PRINTER«, t00=0x002c, t01=0x001a}
0x4500…450a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x004e}
0x450a…4514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0058}
0x4514…4540 Head {h00=0x0028, h01=0x0050, text=»* RECOVERY IS CARRIED OUT ONLY IF«, t00=0x002c, t01=0x0062}
0x4540…4560 Head {h00=0x001c, h01=0x0050, text=»* ORDER 6 IS RUNNING «, t00=0x002c, t01=0x008e}
0x4560…456a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00ae}
0x456a…4580 Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x002c, t01=0x00b8}
0x4580…458a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00ce}
0x458a…45a8 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x002c, t01=0x00d8}
0x45a8…45c0 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x002c, t01=0x00f6}
0x45c0…45de Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x002c, t01=0x010e}
0x45de…45f0 Head {h00=0x000e, h01=0x0050, text=»RCGP EQU *«, t00=0x002c, t01=0x012c}
0x45f0…4606 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x002c, t01=0x013e}
0x4606…4630 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x002c, t01=0x0154}
0x4630…463c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x017e}
0x463c…4646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x018a}
0x4646…465c (45, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x002d, t01=0x0004}
0x465c…4682 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x002d, t01=0x001a}
0x4682…468e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0040}
0x468e…4698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x004c}
0x4698…46b6 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTST,A6 BUSY ?«, t00=0x002d, t01=0x0056}
0x46b6…46cc Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x002d, t01=0x0074}
0x46cc…46f8 Head {h00=0x0028, h01=0x0050, text=» LDK A2,SOH RESET PRINT BUFFER CODE «, t00=0x002d, t01=0x008a}
0x46f8…4716 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND IT «, t00=0x002d, t01=0x00b6}
0x4716…4728 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x002d, t01=0x00d4}
0x4728…473e Head {h00=0x0012, h01=0x0050, text=» RF(E) RCGP10 «, t00=0x002d, t01=0x00e6}
0x473e…4758 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x002d, t01=0x00fc}
0x4758…4772 Head {h00=0x0016, h01=0x0050, text=» RF(E) RCGP05 YES «, t00=0x002d, t01=0x0116}
0x4772…478c Head {h00=0x0016, h01=0x0050, text=» CWK A7,0 ORDER 0?«, t00=0x002d, t01=0x0130}
0x478c…47a0 Head {h00=0x0010, h01=0x0050, text=» RB(E) ENDIO«, t00=0x002d, t01=0x014a}
0x47a0…47b0 Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x002d, t01=0x015e}
0x47b0…47c4 Head {h00=0x0010, h01=0x0050, text=»RCGP05 EQU *«, t00=0x002d, t01=0x016e}
0x47c4…47f8 Head {h00=0x0030, h01=0x0050, text=» LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD«, t00=0x002d, t01=0x0182}
0x47f8…481c Head {h00=0x0020, h01=0x0050, text=» ANK A2,/4 LINE FEED DONE ? «, t00=0x002e, t01=0x0026}
0x481c…4834 Head {h00=0x0014, h01=0x0050, text=» ABL(E) ACGP NO «, t00=0x002e, t01=0x004a}
0x4834…484a Head {h00=0x0012, h01=0x0050, text=» LDK A2,SPACE «, t00=0x002e, t01=0x0062}
0x484a…486a Head {h00=0x001c, h01=0x0050, text=» CF A5,OUTPUT SEND SPACE«, t00=0x002e, t01=0x0078}
0x486a…487e Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x002e, t01=0x0098}
0x487e…489c Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND STX«, t00=0x002e, t01=0x00ac}
0x489c…48be Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x002e, t01=0x00ca}
0x48be…48d0 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002e, t01=0x00ec}
0x48d0…4904 Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND«, t00=0x002e, t01=0x00fe}
0x4904…4918 Head {h00=0x0010, h01=0x0050, text=» ABL ACGP46 «, t00=0x002e, t01=0x0132}
0x4918…4944 Head {h00=0x0028, h01=0x0050, text=»RCGP10 LDK A1,TPERR SET RETURN CODE «, t00=0x002e, t01=0x0146}
0x4944…4958 Head {h00=0x0010, h01=0x0050, text=» ABL AGP430 «, t00=0x002e, t01=0x0172}
0x4958…4964 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002e, t01=0x0186}
0x4964…4968 (47, 2, 8) Head {h00=0x4004, h01=0x0000}
0x4968…496c 00 2f 00 04 ┆ / ┆
0x496c…4974 (48, 1, 8) 20 04 00 00 00 30 00 04 ┆ 0 ┆
0x4974…49c4 (49, 0, 400) 52 41 43 54 45 52 2c 50 4f 53 20 49 46 20 43 54 52 4c 2c 53 48 49 46 54 00 30 01 60 00 24 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 35 20 49 53 20 44 45 53 54 52 4f 59 45 44 21 00 31 00 20 00 06 00 50 2a 20 00 31 00 48 00 06 ┆RACTER,POS IF CTRL,SHIFT 0 ` $ P* A5 IS DESTROYED! 1 P* 1 H ┆
0x49c4…4a14 00 50 2a 20 00 31 00 52 00 10 00 50 4b 4f 4e 56 45 52 5c 45 51 55 5c 2a 00 31 00 5c 00 0e 00 50 5c 4c 44 52 5c 41 34 2c 41 32 00 31 00 70 00 12 00 50 5c 49 46 54 5c 4e 53 48 49 46 54 3d 30 20 00 31 00 82 00 1a 00 50 5c 53 55 4b 5c 41 34 2c ┆ P* 1 R PKONVER EQU * 1 P LDR A4,A2 1 p P IFT NSHIFT=0 1 P SUK A4,┆
0x4a14…4a64 2f 37 43 5c 43 4f 44 45 20 3e 20 2f 37 42 00 31 00 98 00 16 00 50 5c 52 46 28 4e 4e 29 5c 4b 4f 4e 35 30 30 5c 59 45 53 00 31 00 b6 00 20 00 50 5c 4c 44 52 5c 41 34 2c 41 32 5c 52 45 53 54 4f 52 45 20 43 48 41 52 41 43 54 45 52 00 31 00 d0 ┆/7C CODE > /7B 1 P RF(NN) KON500 YES 1 P LDR A4,A2 RESTORE CHARACTER 1 ┆
0x4a64…4ab4 00 08 00 50 5c 58 49 46 00 31 00 f4 00 38 00 50 5c 53 54 52 5c 41 32 2c 41 31 35 5c 53 54 4f 52 45 20 43 48 41 52 41 43 54 45 52 20 49 4e 20 43 41 53 45 20 4f 46 20 4e 4f 20 43 4f 4e 56 45 52 53 49 4f 4e 00 31 01 00 00 10 00 50 5c 4c 44 52 ┆ P XIF 1 8 P STR A2,A15 STORE CHARACTER IN CASE OF NO CONVERSION 1 P LDR┆
0x4ab4…4b04 2a 5c 41 35 2c 41 36 20 00 31 01 3c 00 10 00 50 5c 53 55 4b 5c 41 34 2c 2f 32 30 20 00 31 01 50 00 1a 00 50 5c 52 46 28 4e 29 5c 4b 4f 4e 31 30 35 5c 46 55 4e 43 54 49 4f 4e 00 31 01 64 00 16 00 50 4b 4f 4e 31 30 30 5c 53 55 4b 5c 41 34 2c ┆* A5,A6 1 < P SUK A4,/20 1 P P RF(N) KON105 FUNCTION 1 d PKON100 SUK A4,┆
0x4b04…4b54 (50, 0, 400) 2f 34 30 20 00 31 01 82 00 1e 00 50 5c 52 46 28 4e 29 5c 4b 4f 4e 31 38 30 5c 41 4c 46 41 4e 55 4d 45 52 49 43 20 00 32 00 0c 00 18 00 50 5c 53 55 4b 5c 41 34 2c 2f 31 30 5c 46 55 4e 43 54 49 4f 4e 00 32 00 2e 00 16 00 50 5c 52 46 28 4e 4e ┆/40 1 P RF(N) KON180 ALFANUMERIC 2 P SUK A4,/10 FUNCTION 2 . P RF(NN┆
0x4b54…4ba4 29 5c 4b 4f 4e 31 31 30 5c 4e 4f 20 00 32 00 4a 00 14 00 50 5c 53 55 4b 5c 41 32 2c 2f 34 30 5c 59 45 53 20 00 32 00 64 00 10 00 50 4b 4f 4e 31 30 35 5c 45 51 55 5c 2a 00 32 00 7c 00 10 00 50 5c 41 4e 4b 5c 41 35 2c 2f 31 30 20 00 32 00 90 ┆) KON110 NO 2 J P SUK A2,/40 YES 2 d PKON105 EQU * 2 | P ANK A5,/10 2 ┆
0x4ba4…4bf4 00 0e 00 50 5c 53 52 4c 5c 41 35 2c 33 20 00 32 00 a4 00 0e 00 50 5c 52 46 5c 4b 4f 4e 32 30 30 00 32 00 b6 00 2a 00 50 4b 4f 4e 31 31 30 5c 53 55 4b 5c 41 34 2c 38 5c 28 55 4e 29 43 54 52 4c 20 4f 52 20 28 55 4e 29 53 48 49 46 54 20 00 32 ┆ P SRL A5,3 2 P RF KON200 2 * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2┆
0x4bf4…4c44 00 c8 00 1a 00 50 5c 52 46 28 4e 29 5c 4b 4f 4e 34 30 30 5c 4b 45 59 2d 4c 4f 43 4b 00 32 00 f6 00 1a 00 50 5c 52 46 28 5a 29 5c 4b 4f 4e 31 34 30 5c 53 48 49 46 54 20 4f 4e 00 32 01 14 00 0e 00 50 5c 53 55 4b 5c 41 34 2c 32 20 00 32 01 32 ┆ P RF(N) KON400 KEY-LOCK 2 P RF(Z) KON140 SHIFT ON 2 P SUK A4,2 2 2┆
0x4c44…4c94 00 1c 00 50 5c 52 46 28 4e 29 5c 4b 4f 4e 31 36 30 5c 53 48 49 46 54 20 4f 46 46 20 00 32 01 44 00 1c 00 50 5c 52 46 28 5a 29 5c 4b 4f 4e 31 37 30 5c 43 4f 4e 54 52 4f 4c 20 4f 4e 00 32 01 64 00 12 00 50 5c 49 46 54 5c 4e 53 48 49 46 54 3d ┆ P RF(N) KON160 SHIFT OFF 2 D P RF(Z) KON170 CONTROL ON 2 d P IFT NSHIFT=┆
0x4c94…4ce4 (51, 0, 400) 31 20 00 32 01 84 00 0e 00 50 5c 53 55 4b 5c 41 34 2c 32 20 00 33 00 0a 00 1e 00 50 5c 52 46 28 4e 29 5c 4b 4f 4e 31 32 35 5c 43 4f 4e 54 52 4f 4c 20 4f 46 46 20 00 33 00 1c 00 24 00 50 5c 52 46 28 45 29 5c 4b 4f 4e 31 34 30 5c 4e 55 4d 45 ┆1 2 P SUK A4,2 3 P RF(N) KON125 CONTROL OFF 3 $ P RF(E) KON140 NUME┆
0x4ce4…4d34 52 49 43 41 4c 20 53 48 49 46 54 20 4f 4e 00 33 00 3e 00 22 00 50 5c 52 46 5c 4b 4f 4e 31 36 30 5c 4e 55 4d 45 52 49 43 41 4c 20 53 48 49 46 54 20 4f 46 46 00 33 00 66 00 08 00 50 5c 58 49 46 00 33 00 8c 00 10 00 50 4b 4f 4e 31 32 35 5c 45 ┆RICAL SHIFT ON 3 > " P RF KON160 NUMERICAL SHIFT OFF 3 f P XIF 3 PKON125 E┆
0x4d34…4d84 51 55 5c 2a 00 33 00 98 00 1a 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 46 46 44 46 5c 55 4e 43 54 52 4c 20 00 33 00 ac 00 14 00 50 4b 4f 4e 31 32 30 5c 41 4e 52 5c 41 35 2c 41 32 00 33 00 ca 00 1c 00 50 4b 4f 4e 31 33 30 5c 53 54 52 5c 41 35 2c ┆QU * 3 P LDKL A2,/FFDF UNCTRL 3 PKON120 ANR A5,A2 3 PKON130 STR A5,┆
0x4d84…4dd4 41 36 5c 44 57 54 43 48 50 20 00 33 00 e2 00 10 00 50 5c 4c 44 4b 5c 41 34 2c 2f 31 30 20 00 33 01 02 00 18 00 50 5c 52 46 5c 4b 4f 4e 34 30 30 5c 47 4f 20 48 4f 4d 45 21 20 00 33 01 16 00 10 00 50 4b 4f 4e 31 34 30 5c 45 51 55 5c 2a 00 33 ┆A6 DWTCHP 3 P LDK A4,/10 3 P RF KON400 GO HOME! 3 PKON140 EQU * 3┆
0x4dd4…4e24 01 32 00 12 00 50 5c 49 46 54 5c 4e 53 48 49 46 54 3d 31 20 00 33 01 46 00 0e 00 50 5c 4c 44 52 5c 41 34 2c 41 35 00 33 01 5c 00 10 00 50 5c 41 4e 4b 5c 41 34 2c 2f 31 30 20 00 33 01 6e 00 1e 00 50 5c 52 46 28 5a 29 5c 4b 4f 4e 31 34 35 5c ┆ 2 P IFT NSHIFT=1 3 F P LDR A4,A5 3 P ANK A4,/10 3 n P RF(Z) KON145 ┆
0x4e24…4e74 (52, 0, 400) 53 48 49 46 54 20 4e 4f 54 20 4f 4e 00 33 01 82 00 10 00 50 5c 4c 44 4b 5c 41 32 2c 2f 39 30 20 00 34 00 14 00 0e 00 50 5c 52 46 5c 4b 4f 4e 31 35 30 00 34 00 28 00 08 00 50 5c 58 49 46 00 34 00 3a 00 10 00 50 4b 4f 4e 31 34 35 5c 45 51 55 ┆SHIFT NOT ON 3 P LDK A2,/90 4 P RF KON150 4 ( P XIF 4 : PKON145 EQU┆
0x4e74…4ec4 5c 2a 00 34 00 46 00 16 00 50 5c 4c 44 4b 5c 41 32 2c 2f 31 30 5c 53 48 49 46 54 20 00 34 00 5a 00 14 00 50 4b 4f 4e 31 35 30 5c 4f 52 52 5c 41 35 2c 41 32 00 34 00 74 00 0e 00 50 5c 52 42 5c 4b 4f 4e 31 33 30 00 34 00 8c 00 10 00 50 4b 4f ┆ * 4 F P LDK A2,/10 SHIFT 4 Z PKON150 ORR A5,A2 4 t P RB KON130 4 PKO┆
0x4ec4…4f14 4e 31 36 30 5c 45 51 55 5c 2a 00 34 00 9e 00 12 00 50 5c 49 46 54 5c 4e 53 48 49 46 54 3d 31 20 00 34 00 b2 00 0e 00 50 5c 4c 44 52 5c 41 34 2c 41 35 00 34 00 c8 00 10 00 50 5c 41 4e 4b 5c 41 34 2c 2f 38 30 20 00 34 00 da 00 12 00 50 5c 52 ┆N160 EQU * 4 P IFT NSHIFT=1 4 P LDR A4,A5 4 P ANK A4,/80 4 P R┆
0x4f14…4f64 46 28 5a 29 5c 4b 4f 4e 31 36 35 20 00 34 00 ee 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 46 46 37 46 00 34 01 04 00 0e 00 50 5c 52 42 5c 4b 4f 4e 31 32 30 00 34 01 1a 00 08 00 50 5c 58 49 46 00 34 01 2c 00 10 00 50 4b 4f 4e 31 36 35 5c 45 ┆F(Z) KON165 4 P LDKL A2,/FF7F 4 P RB KON120 4 P XIF 4 , PKON165 E┆
0x4f64…4fb4 51 55 5c 2a 00 34 01 38 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 46 46 45 46 00 34 01 4c 00 0e 00 50 5c 52 42 5c 4b 4f 4e 31 32 30 00 34 01 62 00 0e 00 50 5c 52 42 5c 4b 4f 4e 31 32 30 00 34 01 74 00 1a 00 50 4b 4f 4e 31 37 30 5c 4c 44 4b ┆QU * 4 8 P LDKL A2,/FFEF 4 L P RB KON120 4 b P RB KON120 4 t PKON170 LDK┆