|
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: 20418 (0x4fc2)
Notes: pts_type(SC)
Names: »DRGP01.SC«
└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
└─⟦this⟧ »TOSSWORK/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 X:A * * ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE * INCLUDED IN THE DRIVER BY SETTING X:B=1 * X:B EQU 0 TRETON EQU X:B * * ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE * INCLUDED IN THE DRIVER BY SETTING X:C=1 * X:C EQU 0 FJOTON EQU X:C * * IT IS POSSIBLE TO EXCLUDE ECHOING OF * AN EXTRA SPACE AFTER EACH CHARACTER * BY SETTING X:D=0 * X:D EQU 0 COSPAC EQU X:D * 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 X:E * * SUPPRESSING OF SPACES IN RIGHT HAND OF LINE * BY SETTING X:F=1 * X:F EQU 0 SUPSPA EQU X:F * * END OF REQUEST IN SITUATIONS WHERE * THE SELECTOR UNIT OR PRINTER HARDWARE * IS INACTIVE CAN BE CHOSEN BY SETTING * THE CONSTANT RECEND = 1 X:G EQU 0 RECEND EQU X:G * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * MMU BUFFER SIZE * X:H EQU 120 DVBLEN EQU X:H * =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…11ec Head {h00=0x0012, h01=0x0050, text=»CROOM EQU X:A «, t00=0x000b, t01=0x00aa}
0x11ec…11f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c0}
0x11f6…122e Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE «, t00=0x000b, t01=0x00ca}
0x122e…1262 Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:B=1«, t00=0x000b, t01=0x0102}
0x1262…126c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0136}
0x126c…127e Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000b, t01=0x0140}
0x127e…1294 Head {h00=0x0012, h01=0x0050, text=»TRETON EQU X:B«, t00=0x000b, t01=0x0152}
0x1294…129e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0168}
0x129e…12d6 Head {h00=0x0034, h01=0x0050, text=»* ACCEPTANCE OF SPECIAL CHARACTER /14 CAN BE «, t00=0x000b, t01=0x0172}
0x12d6…130a Head {h00=0x0030, h01=0x0050, text=»* INCLUDED IN THE DRIVER BY SETTING X:C=1«, t00=0x000c, t01=0x001a}
0x130a…1314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004e}
0x1314…1326 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x000c, t01=0x0058}
0x1326…133c Head {h00=0x0012, h01=0x0050, text=»FJOTON EQU X:C«, t00=0x000c, t01=0x006a}
0x133c…1346 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0080}
0x1346…1378 Head {h00=0x002e, h01=0x0050, text=»* IT IS POSSIBLE TO EXCLUDE ECHOING OF «, t00=0x000c, t01=0x008a}
0x1378…13a8 Head {h00=0x002c, h01=0x0050, text=»* AN EXTRA SPACE AFTER EACH CHARACTER«, t00=0x000c, t01=0x00bc}
0x13a8…13c4 Head {h00=0x0018, h01=0x0050, text=»* BY SETTING X:D=0«, t00=0x000c, t01=0x00ec}
0x13c4…13ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0108}
0x13ce…13e0 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x000c, t01=0x0112}
0x13e0…13f6 Head {h00=0x0012, h01=0x0050, text=»COSPAC EQU X:D«, t00=0x000c, t01=0x0124}
0x13f6…1400 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013a}
0x1400…140e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0144}
0x140e…1418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0152}
0x1418…1422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x015c}
0x1422…145e Head {h00=0x0038, h01=0x0050, text=»* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x000c, t01=0x0166}
0x145e…149a Head {h00=0x0038, h01=0x0050, text=»* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER.«, t00=0x000d, t01=0x0012}
0x149a…14d6 Head {h00=0x0038, h01=0x0050, text=»* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0.«, t00=0x000d, t01=0x004e}
0x14d6…14e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x008a}
0x14e0…14f2 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000d, t01=0x0094}
0x14f2…1508 Head {h00=0x0012, h01=0x0050, text=»EORECH EQU X:E«, t00=0x000d, t01=0x00a6}
0x1508…1512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00bc}
0x1512…154a Head {h00=0x0034, h01=0x0050, text=»* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE«, t00=0x000d, t01=0x00c6}
0x154a…1568 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:F=1 «, t00=0x000d, t01=0x00fe}
0x1568…1572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011c}
0x1572…1584 Head {h00=0x000e, h01=0x0050, text=»X:F EQU 0 «, t00=0x000d, t01=0x0126}
0x1584…159a Head {h00=0x0012, h01=0x0050, text=»SUPSPA EQU X:F«, t00=0x000d, t01=0x0138}
0x159a…15a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014e}
0x15a4…15d0 Head {h00=0x0028, h01=0x0050, text=»* END OF REQUEST IN SITUATIONS WHERE«, t00=0x000d, t01=0x0158}
0x15d0…1600 Head {h00=0x002c, h01=0x0050, text=»* THE SELECTOR UNIT OR PRINTER HARDWARE «, t00=0x000d, t01=0x0184}
0x1600…162e Head {h00=0x002a, h01=0x0050, text=»* IS INACTIVE CAN BE CHOSEN BY SETTING«, t00=0x000e, t01=0x0024}
0x162e…1650 Head {h00=0x001e, h01=0x0050, text=»* THE CONSTANT RECEND = 1 «, t00=0x000e, t01=0x0052}
0x1650…1662 Head {h00=0x000e, h01=0x0050, text=»X:G EQU 0 «, t00=0x000e, t01=0x0074}
0x1662…1678 Head {h00=0x0012, h01=0x0050, text=»RECEND EQU X:G«, t00=0x000e, t01=0x0086}
0x1678…1682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009c}
0x1682…16b4 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000e, t01=0x00a6}
0x16b4…16e2 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000e, t01=0x00d8}
0x16e2…16ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0106}
0x16ec…1700 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000e, t01=0x0110}
0x1700…170a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0124}
0x170a…1714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012e}
0x1714…174e Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000e, t01=0x0138}
0x174e…1780 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000e, t01=0x0172}
0x1780…178a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0014}
0x178a…179e Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000f, t01=0x001e}
0x179e…17a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0032}
0x17a8…17c4 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x000f, t01=0x003c}
0x17c4…17ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0058}
0x17ce…17e2 Head {h00=0x0010, h01=0x0050, text=»X:H EQU 120 «, t00=0x000f, t01=0x0062}
0x17e2…17f8 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:H«, t00=0x000f, t01=0x0076}
0x17f8…1808 Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x000f, t01=0x008c}
0x1808…1838 Head {h00=0x002c, h01=0x0050, text=»* SPECIAL CONDITION FOR ABIS PRINTER =1«, t00=0x000f, t01=0x009c}
0x1838…184e Head {h00=0x0012, h01=0x0050, text=»ABIS EQU 0 =1«, t00=0x000f, t01=0x00cc}
0x184e…185c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x00e2}
0x185c…1866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f0}
0x1866…1870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00fa}
0x1870…1898 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000f, t01=0x0104}
0x1898…18c0 Head {h00=0x0024, h01=0x0050, text=»* DWT-DISPLACEMENT *«, t00=0x000f, t01=0x012c}
0x18c0…18e8 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000f, t01=0x0154}
0x18e8…18f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017c}
0x18f2…18fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0186}
0x18fc…1930 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000f, t01=0x0190}
0x1930…193a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x193a…1950 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0010, t01=0x003e}
0x1950…1968 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0010, t01=0x0054}
0x1968…1974 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x006c}
0x1974…197e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0078}
0x197e…1994 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x0082}
0x1994…19ae Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0010, t01=0x0098}
0x19ae…19ba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00b2}
0x19ba…19c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00be}
0x19c4…19f6 Head {h00=0x002e, h01=0x0050, text=»DWTAP EQU START+/12 HEAD POSITION POINTER «, t00=0x0010, t01=0x00c8}
0x19f6…1a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00fa}
0x1a00…1a2e Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x0104}
0x1a2e…1a5e Head {h00=0x002c, h01=0x0050, text=»* SPECIAL KEYS FOR ECHO FUNCTION * «, t00=0x0010, t01=0x0132}
0x1a5e…1a8c Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0010, t01=0x0162}
0x1a8c…1a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0190}
0x1a96…1ab6 Head {h00=0x001c, h01=0x0050, text=»GPBSP EQU /2D BACK SPACE«, t00=0x0011, t01=0x000a}
0x1ab6…1ad2 Head {h00=0x0018, h01=0x0050, text=»GPCLR EQU /3F CLEAR «, t00=0x0011, t01=0x002a}
0x1ad2…1adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0046}
0x1adc…1af8 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x0050}
0x1af8…1b14 Head {h00=0x0018, h01=0x0050, text=»* RETURN CODES *«, t00=0x0011, t01=0x006c}
0x1b14…1b30 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0011, t01=0x0088}
0x1b30…1b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a4}
0x1b3a…1b6e Head {h00=0x0030, h01=0x0050, text=»PAROUT EQU /20 PAPER OUT OR READY SWITCH OFF«, t00=0x0011, t01=0x00ae}
0x1b6e…1b94 Head {h00=0x0022, h01=0x0050, text=»CCERR EQU /4 CODE CHECK ERROR «, t00=0x0011, t01=0x00e2}
0x1b94…1bba Head {h00=0x0022, h01=0x0050, text=»TPERR EQU /2 THROUGHPUT ERROR «, t00=0x0011, t01=0x0108}
0x1bba…1be6 Head {h00=0x0028, h01=0x0050, text=»OPERR EQU /1 NOT OPERABLE, POWER OFF«, t00=0x0011, t01=0x012e}
0x1be6…1bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x015a}
0x1bf0…1bfe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0164}
0x1bfe…1c08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0172}
0x1c08…1c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x017c}
0x1c12…1c24 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0011, t01=0x0186}
0x1c24…1c36 Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x0012, t01=0x0008}
0x1c36…1c48 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0012, t01=0x001a}
0x1c48…1c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x002c}
0x1c52…1c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0036}
0x1c5c…1c70 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x0012, t01=0x0040}
0x1c70…1c7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0054}
0x1c7a…1c8e Head {h00=0x0010, h01=0x0050, text=»ROMTAB EQU *«, t00=0x0012, t01=0x005e}
0x1c8e…1cbc Head {h00=0x002a, h01=0x0050, text=» TABLE FOR ROOMLESS POINT CHARACTERS«, t00=0x0012, t01=0x0072}
0x1cbc…1ce8 Head {h00=0x0028, h01=0x0050, text=» DATA /2122,/2426,/3B3C,/3E40,/5E5F «, t00=0x0012, t01=0x00a0}
0x1ce8…1cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00cc}
0x1cf2…1cfe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00d6}
0x1cfe…1d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e2}
0x1d08…1d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ec}
0x1d12…1d1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f6}
0x1d1c…1d42 Head {h00=0x0022, h01=0x0050, text=» DATA DVBLEN MMU BUFFER LENGTH«, t00=0x0012, t01=0x0100}
0x1d42…1d5e Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0012, t01=0x0126}
0x1d5e…1d7e Head {h00=0x001c, h01=0x0050, text=»GPAD EQU * ADDRESS BLOCK«, t00=0x0012, t01=0x0142}
0x1d7e…1da2 Head {h00=0x0020, h01=0x0050, text=» DATA ACGP ACTIVATION DRIVER«, t00=0x0012, t01=0x0162}
0x1da2…1dc8 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0012, t01=0x0186}
0x1dc8…1dec Head {h00=0x0020, h01=0x0050, text=» DATA IHGP INTERRUPT HANDLER«, t00=0x0013, t01=0x001c}
0x1dec…1e10 Head {h00=0x0020, h01=0x0050, text=» DATA RCGP RECOVERY ROUTINE «, t00=0x0013, t01=0x0040}
0x1e10…1e42 Head {h00=0x002e, h01=0x0050, text=» DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE«, t00=0x0013, t01=0x0064}
0x1e42…1e50 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0096}
0x1e50…1e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a4}
0x1e5a…1e6e Head {h00=0x0010, h01=0x0050, text=»* A C G P«, t00=0x0013, t01=0x00ae}
0x1e6e…1e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c2}
0x1e78…1eae Head {h00=0x0032, h01=0x0050, text=»* ACGP = ACTIVATION DRIVER GENERAL PRINTER «, t00=0x0013, t01=0x00cc}
0x1eae…1eb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0102}
0x1eb8…1f04 Head {h00=0x0048, h01=0x0050, text=»* ORDER 00: TEST STATUS. DUMMY IS SENT TO PRINTER AND RETURN CODE«, t00=0x0013, t01=0x010c}
0x1f04…1f44 Head {h00=0x003c, h01=0x0050, text=»* IS SET IF PAPER OUT OR READY SWITCH OFF. «, t00=0x0013, t01=0x0158}
0x1f44…1f90 Head {h00=0x0048, h01=0x0050, text=»* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM«, t00=0x0014, t01=0x0008}
0x1f90…1fb4 Head {h00=0x0020, h01=0x0050, text=»* CHANNEL UNIT.«, t00=0x0014, t01=0x0054}
0x1fb4…1fbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0078}
0x1fbe…2000 Head {h00=0x003e, h01=0x0050, text=»* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER «, t00=0x0014, t01=0x0082}
0x2000…2026 Head {h00=0x0022, h01=0x0050, text=»* FROM ECB-BUFFER«, t00=0x0014, t01=0x00c4}
0x2026…2030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ea}
0x2030…207a Head {h00=0x0046, h01=0x0050, text=»* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO PRINTER FROM«, t00=0x0014, t01=0x00f4}
0x207a…20ba Head {h00=0x003c, h01=0x0050, text=»* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. «, t00=0x0014, t01=0x013e}
0x20ba…20c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017e}
0x20c4…20d6 Head {h00=0x000e, h01=0x0050, text=»ACGP EQU *«, t00=0x0014, t01=0x0188}
0x20d6…20fa Head {h00=0x0020, h01=0x0050, text=» LDK A2,STX START OF MESSAGE«, t00=0x0015, t01=0x000a}
0x20fa…2110 Head {h00=0x0012, h01=0x0050, text=» LDR A3,A7 =1«, t00=0x0015, t01=0x002e}
0x2110…2130 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ACGP10 ORDER 0 =2«, t00=0x0015, t01=0x0044}
0x2130…2146 Head {h00=0x0012, h01=0x0050, text=» SUK A3,5 =1 «, t00=0x0015, t01=0x0064}
0x2146…2166 Head {h00=0x001c, h01=0x0050, text=» RF(E) ACGP09 ORDER 5 =1«, t00=0x0015, t01=0x007a}
0x2166…217c Head {h00=0x0012, h01=0x0050, text=» SUK A3,1 =1 «, t00=0x0015, t01=0x009a}
0x217c…21a8 Head {h00=0x0028, h01=0x0050, text=» ABL(NE) DISIOE I/O REQUEST ERROR =1«, t00=0x0015, t01=0x00b0}
0x21a8…21d6 Head {h00=0x002a, h01=0x0050, text=» LD A3,4,A8 ORDER 6 GET REQ LENGTH =1 «, t00=0x0015, t01=0x00dc}
0x21d6…21f0 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ACGP01 =1 «, t00=0x0015, t01=0x010a}
0x21f0…221a Head {h00=0x0026, h01=0x0050, text=» LD A3,2,A8 GET BUFFER ADDRESS =1 «, t00=0x0015, t01=0x0124}
0x221a…2246 Head {h00=0x0028, h01=0x0050, text=» LC A3,1,A3 GET CONTROL CHARACTER =1«, t00=0x0015, t01=0x014e}
0x2246…225e Head {h00=0x0014, h01=0x0050, text=» ANK A3,/FF =1 «, t00=0x0015, t01=0x017a}
0x225e…227c (22, 0, 400) Head {h00=0x001a, h01=0x0050, text=»ACGP01 SUK A3,/2B =1 «, t00=0x0016, t01=0x0004}
0x227c…22a4 Head {h00=0x0024, h01=0x0050, text=» RF(E) ACGP06 CONTROL CHAR 2B =1«, t00=0x0016, t01=0x0022}
0x22a4…22c6 Head {h00=0x001e, h01=0x0050, text=» CF A5,OUTPUT SEND STX =1 «, t00=0x0016, t01=0x004a}
0x22c6…22dc Head {h00=0x0012, h01=0x0050, text=» LDK A2,CR =1«, t00=0x0016, t01=0x006c}
0x22dc…22f6 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =1 «, t00=0x0016, t01=0x0082}
0x22f6…230e Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x0016, t01=0x009c}
0x230e…2326 Head {h00=0x0014, h01=0x0050, text=» LDK A2,FFED =1«, t00=0x0016, t01=0x00b4}
0x2326…2342 Head {h00=0x0018, h01=0x0050, text=» CWK A3,/31-/2B =1 «, t00=0x0016, t01=0x00cc}
0x2342…236a Head {h00=0x0024, h01=0x0050, text=» RF(E) ACGP03 CONTROL CHAR 31 =1«, t00=0x0016, t01=0x00e8}
0x236a…237c Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x0016, t01=0x0110}
0x237c…2392 Head {h00=0x0012, h01=0x0050, text=» LDK A2,LF =1«, t00=0x0016, t01=0x0122}
0x2392…23ae Head {h00=0x0018, h01=0x0050, text=» SUK A3,/30-/2B =1 «, t00=0x0016, t01=0x0138}
0x23ae…23dc Head {h00=0x002a, h01=0x0050, text=» RF(NE) ACGP03 NOT CONTROL CHAR 30 =1 «, t00=0x0016, t01=0x0154}
0x23dc…23f6 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =1 «, t00=0x0016, t01=0x0182}
0x23f6…240c Head {h00=0x0012, h01=0x0050, text=» LDK A2,LF =1«, t00=0x0017, t01=0x000c}
0x240c…243c Head {h00=0x002c, h01=0x0050, text=»ACGP03 LDK A1,1 RESET HEAD POS COUNTR =1«, t00=0x0017, t01=0x0022}
0x243c…2458 Head {h00=0x0018, h01=0x0050, text=» ST A1,DWTAP,A6 =1 «, t00=0x0017, t01=0x0052}
0x2458…2486 Head {h00=0x002a, h01=0x0050, text=»ACGP06 LDK A3,2 START BUFFER INDEX =1 «, t00=0x0017, t01=0x006e}
0x2486…24a6 Head {h00=0x001c, h01=0x0050, text=»ACGP09 CF A5,OUTPUT =1 «, t00=0x0017, t01=0x009c}
0x24a6…24bc Head {h00=0x0012, h01=0x0050, text=» RF ACGP19 =1«, t00=0x0017, t01=0x00bc}
0x24bc…24d0 Head {h00=0x0010, h01=0x0050, text=» EJECT =2 «, t00=0x0017, t01=0x00d2}
0x24d0…24e0 Head {h00=0x000c, h01=0x0050, text=»* =2 «, t00=0x0017, t01=0x00e6}
0x24e0…24fe Head {h00=0x001a, h01=0x0050, text=»* ORDER 00: TEST =2«, t00=0x0017, t01=0x00f6}
0x24fe…2550 Head {h00=0x004e, h01=0x0050, text=»* IMPROVED TEST OF BOTH SUM OFF AND PRINTER NOT THERE =2 «, t00=0x0017, t01=0x0114}
0x2550…2560 Head {h00=0x000c, h01=0x0050, text=»* =2 «, t00=0x0017, t01=0x0166}
0x2560…2588 Head {h00=0x0024, h01=0x0050, text=»ACGP10 LDK A2,2 SEND CHAR /02 =2«, t00=0x0017, t01=0x0176}
0x2588…25a2 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =2 «, t00=0x0018, t01=0x000e}
0x25a2…25d0 Head {h00=0x002a, h01=0x0050, text=» LDK A2,0 SEND CHAR /00=END OF TEST =2«, t00=0x0018, t01=0x0028}
0x25d0…25ea Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT =2 «, t00=0x0018, t01=0x0056}
0x25ea…2600 Head {h00=0x0012, h01=0x0050, text=» RF AGP410 =2«, t00=0x0018, t01=0x0070}
0x2600…260e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0086}
0x260e…2618 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0094}
0x2618…2642 Head {h00=0x0026, h01=0x0050, text=»* GET, CHECK AND SEND CHARACTER«, t00=0x0018, t01=0x009e}
0x2642…2664 Head {h00=0x001e, h01=0x0050, text=»* (IF ORDER 5 NO CHECK)«, t00=0x0018, t01=0x00c8}
0x2664…266e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ea}
0x266e…268a Head {h00=0x0018, h01=0x0050, text=»ACGP17 CF A5,OUTPUT «, t00=0x0018, t01=0x00f4}
0x268a…26be Head {h00=0x0030, h01=0x0050, text=»ACGP18 IM DWTST,A6 POSITION COUNTER UPDATING«, t00=0x0018, t01=0x0110}
0x26be…26d2 Head {h00=0x0010, h01=0x0050, text=»ACGP19 EQU *«, t00=0x0018, t01=0x0144}
0x26d2…2700 Head {h00=0x002a, h01=0x0050, text=» LDKL A4,/400 INDICATE LINE FEED DONE «, t00=0x0018, t01=0x0158}
0x2700…2718 Head {h00=0x0014, h01=0x0050, text=» ORS A4,DWTST,A6«, t00=0x0018, t01=0x0186}
0x2718…272e Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0019, t01=0x000e}
0x272e…2766 Head {h00=0x0034, h01=0x0050, text=» CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER «, t00=0x0019, t01=0x0024}
0x2766…2772 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x005c}
0x2772…2784 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0019, t01=0x0068}
0x2784…27be Head {h00=0x0036, h01=0x0050, text=»ACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER«, t00=0x0019, t01=0x007a}
0x27be…27e0 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER?«, t00=0x0019, t01=0x00b4}
0x27e0…27fa Head {h00=0x0016, h01=0x0050, text=» RF(NP) AGP400 YES«, t00=0x0019, t01=0x00d6}
0x27fa…280c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0019, t01=0x00f0}
0x280c…2826 Head {h00=0x0016, h01=0x0050, text=» SUK A7,5 ORDER 5?«, t00=0x0019, t01=0x0102}
0x2826…2848 Head {h00=0x001e, h01=0x0050, text=» RF(E) ACGP24 BASIC WRITE «, t00=0x0019, t01=0x011c}
0x2848…2870 Head {h00=0x0024, h01=0x0050, text=» SUK A1,9 HARDWARE TABULATION ? «, t00=0x0019, t01=0x013e}
0x2870…2886 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACGP22«, t00=0x0019, t01=0x0166}
0x2886…28ba Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTAP,A6 RESET HEAD POSITION POINTER «, t00=0x0019, t01=0x017c}
0x28ba…28cc Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001a, t01=0x0020}
0x28cc…28fa Head {h00=0x002a, h01=0x0050, text=»ACGP22 SUK A1,8 TABULATION CHARACTER ?«, t00=0x001a, t01=0x0032}
0x28fa…2910 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP40 «, t00=0x001a, t01=0x0060}
0x2910…2928 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x001a, t01=0x0076}
0x2928…2946 Head {h00=0x001a, h01=0x0050, text=» CWK A2,/07 BELL ? =1 «, t00=0x001a, t01=0x008e}
0x2946…2960 Head {h00=0x0016, h01=0x0050, text=» RB(E) ACGP09 =1 «, t00=0x001a, t01=0x00ac}
0x2960…2972 Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x001a, t01=0x00c6}
0x2972…297c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d8}
0x297c…2992 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x001a, t01=0x00e2}
0x2992…29a8 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x001a, t01=0x00f8}
0x29a8…29b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x010e}
0x29b2…29d4 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/F LESS THAN /20 ?«, t00=0x001a, t01=0x0118}
0x29d4…29de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013a}
0x29de…29ea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0144}
0x29ea…29f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0150}
0x29f4…2a0a Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=0 «, t00=0x001a, t01=0x015a}
0x2a0a…2a20 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x001a, t01=0x0170}
0x2a20…2a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0186}
0x2a2a…2a40 Head {h00=0x0012, h01=0x0050, text=» SUK A1,3 /14?«, t00=0x001a, t01=0x0190}
0x2a40…2a56 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x0016}
0x2a56…2a78 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x001b, t01=0x002c}
0x2a78…2a82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x004e}
0x2a82…2a8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0058}
0x2a8e…2a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0064}
0x2a98…2aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006e}
0x2aa2…2ab8 Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x001b, t01=0x0078}
0x2ab8…2ace Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=0 «, t00=0x001b, t01=0x008e}
0x2ace…2ad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a4}
0x2ad8…2af0 Head {h00=0x0014, h01=0x0050, text=» SUK A1,2 /13 ? «, t00=0x001b, t01=0x00ae}
0x2af0…2b06 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x00c6}
0x2b06…2b28 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/D LESS THAN /20 ?«, t00=0x001b, t01=0x00dc}
0x2b28…2b34 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00fe}
0x2b34…2b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x010a}
0x2b3e…2b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0114}
0x2b48…2b5e Head {h00=0x0012, h01=0x0050, text=» IFT TRETON=1 «, t00=0x001b, t01=0x011e}
0x2b5e…2b74 Head {h00=0x0012, h01=0x0050, text=» IFT FJOTON=1 «, t00=0x001b, t01=0x0134}
0x2b74…2b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x014a}
0x2b7e…2b94 Head {h00=0x0012, h01=0x0050, text=» SUK A1,2 /13?«, t00=0x001b, t01=0x0154}
0x2b94…2baa Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001b, t01=0x016a}
0x2baa…2bc0 Head {h00=0x0012, h01=0x0050, text=» SUK A1,1 /14?«, t00=0x001b, t01=0x0180}
0x2bc0…2bd6 Head {h00=0x0012, h01=0x0050, text=» RB(E) ACGP17 «, t00=0x001c, t01=0x0008}
0x2bd6…2bf8 Head {h00=0x001e, h01=0x0050, text=» SUK A1,/C LESS THAN /20 ?«, t00=0x001c, t01=0x001e}
0x2bf8…2c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0040}
0x2c02…2c0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x004a}
0x2c0e…2c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0056}
0x2c18…2c42 Head {h00=0x0026, h01=0x0050, text=» RF(N) ACGP30 YES,CODE CHECK ERROR«, t00=0x001c, t01=0x0060}
0x2c42…2c6c Head {h00=0x0026, h01=0x0050, text=» SUK A1,/8E ROOMLESS POINT? (AE) «, t00=0x001c, t01=0x008a}
0x2c6c…2c82 Head {h00=0x0012, h01=0x0050, text=» RF(E) AGP100 «, t00=0x001c, t01=0x00b4}
0x2c82…2ca6 Head {h00=0x0020, h01=0x0050, text=» ADK A1,/4F GREATER THAN /5F«, t00=0x001c, t01=0x00ca}
0x2ca6…2cc0 Head {h00=0x0016, h01=0x0050, text=» RB(NP) ACGP17 NO «, t00=0x001c, t01=0x00ee}
0x2cc0…2cd4 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/20 «, t00=0x001c, t01=0x0108}
0x2cd4…2cea Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACGP30«, t00=0x001c, t01=0x011c}
0x2cea…2d24 Head {h00=0x0036, h01=0x0050, text=» SUK A2,/20 TRANSFORM CHARACTER BETWEEN /60 TO /7F«, t00=0x001c, t01=0x0132}
0x2d24…2d4e Head {h00=0x0026, h01=0x0050, text=» TO CHARACTER BETWEEN /40 TO /5F«, t00=0x001c, t01=0x016c}
0x2d4e…2d60 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x0008}
0x2d60…2d74 Head {h00=0x0010, h01=0x0050, text=»ACGP24 EQU *«, t00=0x001d, t01=0x001a}
0x2d74…2d86 Head {h00=0x000e, h01=0x0050, text=» SUK A1,/D«, t00=0x001d, t01=0x002e}
0x2d86…2da4 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) ACGP26 NOT CR «, t00=0x001d, t01=0x0040}
0x2da4…2dca Head {h00=0x0022, h01=0x0050, text=» CM DWTST,A6 SET POS LTR.TO 0 «, t00=0x001d, t01=0x005e}
0x2dca…2df6 Head {h00=0x0028, h01=0x0050, text=» CM DWTAP,A6 RESET HEAD POS.POIINTER«, t00=0x001d, t01=0x0084}
0x2df6…2e0e Head {h00=0x0014, h01=0x0050, text=»ACGP26 ADK A1,3 «, t00=0x001d, t01=0x00b0}
0x2e0e…2e32 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ACGP17 NOT LINE FEED«, t00=0x001d, t01=0x00c8}
0x2e32…2e44 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001d, t01=0x00ec}
0x2e44…2e72 Head {h00=0x002a, h01=0x0050, text=» ADS A1,DWTST,A6 DECREMENT POS COUNTER«, t00=0x001d, t01=0x00fe}
0x2e72…2e84 Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x001d, t01=0x012c}
0x2e84…2e92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x013e}
0x2e92…2e9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x014c}
0x2e9c…2eba Head {h00=0x001a, h01=0x0050, text=»* CODE CHECK ERROR «, t00=0x001d, t01=0x0156}
0x2eba…2ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0174}
0x2ec4…2ed8 Head {h00=0x0010, h01=0x0050, text=»ACGP30 EQU *«, t00=0x001d, t01=0x017e}
0x2ed8…2eee (30, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LDK A1,CCERR «, t00=0x001e, t01=0x0004}
0x2eee…2f0e Head {h00=0x001c, h01=0x0050, text=» ORS A1,8,A8 RETURN CODE«, t00=0x001e, t01=0x001a}
0x2f0e…2f20 Head {h00=0x000e, h01=0x0050, text=» RB ACGP20«, t00=0x001e, t01=0x003a}
0x2f20…2f2e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x004c}
0x2f2e…2f38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005a}
0x2f38…2f50 Head {h00=0x0014, h01=0x0050, text=»* TABULATION «, t00=0x001e, t01=0x0064}
0x2f50…2f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x007c}
0x2f5a…2f6e Head {h00=0x0010, h01=0x0050, text=»ACGP40 EQU *«, t00=0x001e, t01=0x0086}
0x2f6e…2f9e Head {h00=0x002c, h01=0x0050, text=» CF A15,GETCHR GET FIRST ASCII CHARACTER«, t00=0x001e, t01=0x009a}
0x2f9e…2fb0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001e, t01=0x00ca}
0x2fb0…2fe2 Head {h00=0x002e, h01=0x0050, text=» CF A15,GETCHR GET SECOND ASCII CHARACTER «, t00=0x001e, t01=0x00dc}
0x2fe2…2ff4 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001e, t01=0x010e}
0x2ff4…3006 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x001e, t01=0x0120}
0x3006…301c Head {h00=0x0012, h01=0x0050, text=» RF(E) ACGP44 «, t00=0x001e, t01=0x0132}
0x301c…3050 Head {h00=0x0030, h01=0x0050, text=»ACGP43 ADK A2,/A FROM DECIMAL TO HEXADECIMAL«, t00=0x001e, t01=0x0148}
0x3050…3062 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001e, t01=0x017c}
0x3062…3078 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP43«, t00=0x001e, t01=0x018e}
0x3078…30b4 Head {h00=0x0038, h01=0x0050, text=»ACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER«, t00=0x001f, t01=0x0014}
0x30b4…30cc Head {h00=0x0014, h01=0x0050, text=» LC A4,DWTBC,A6 «, t00=0x001f, t01=0x0050}
0x30cc…30fc Head {h00=0x002c, h01=0x0050, text=» SUR A2,A4 AND REQUESTS POSITION COUNTER«, t00=0x001f, t01=0x0068}
0x30fc…3126 Head {h00=0x0026, h01=0x0050, text=» TO GET NUMBER OF SPACES TO SEND«, t00=0x001f, t01=0x0098}
0x3126…313c Head {h00=0x0012, h01=0x0050, text=» RB(NP) ACGP20«, t00=0x001f, t01=0x00c2}
0x313c…314e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x001f, t01=0x00d8}
0x314e…318c Head {h00=0x003a, h01=0x0050, text=»ACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY ROUTINE«, t00=0x001f, t01=0x00ea}
0x318c…31a8 Head {h00=0x0018, h01=0x0050, text=»ACGP46 CF A5,OUTPUT «, t00=0x001f, t01=0x0128}
0x31a8…31d4 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 INCREMENT BUFFER INDEX «, t00=0x001f, t01=0x0144}
0x31d4…31e6 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001f, t01=0x0170}
0x31e6…31fc Head {h00=0x0012, h01=0x0050, text=» RB(P) ACGP45 «, t00=0x001f, t01=0x0182}
0x31fc…3218 Head {h00=0x0018, h01=0x0050, text=» LDR A3,A3 RECOVERY?«, t00=0x0020, t01=0x0008}
0x3218…322e Head {h00=0x0012, h01=0x0050, text=» RB(NE) ACGP20«, t00=0x0020, t01=0x0024}
0x322e…325c Head {h00=0x002a, h01=0x0050, text=» SC A4,DWTBC,A6 RESET POSITION POINTER«, t00=0x0020, t01=0x003a}
0x325c…3280 Head {h00=0x0020, h01=0x0050, text=» LDK A3,2 START BUFFER INDEX«, t00=0x0020, t01=0x0068}
0x3280…3292 Head {h00=0x000e, h01=0x0050, text=» RB ACGP19«, t00=0x0020, t01=0x008c}
0x3292…32a0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x009e}
0x32a0…32aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ac}
0x32aa…32c6 Head {h00=0x0018, h01=0x0050, text=»* ROOMLESS POINT «, t00=0x0020, t01=0x00b6}
0x32c6…32d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00d2}
0x32d0…32e4 Head {h00=0x0010, h01=0x0050, text=»AGP100 EQU *«, t00=0x0020, t01=0x00dc}
0x32e4…32ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00f0}
0x32ee…3302 Head {h00=0x0010, h01=0x0050, text=» IFT CROOM=1«, t00=0x0020, t01=0x00fa}
0x3302…330c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x010e}
0x330c…3338 Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CHARACTER TO SEND«, t00=0x0020, t01=0x0118}
0x3338…334a Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0020, t01=0x0144}
0x334a…336c Head {h00=0x001e, h01=0x0050, text=» LC A2,ROMTAB,A2 TRANSFORM«, t00=0x0020, t01=0x0156}
0x336c…3376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0178}
0x3376…3382 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0182}
0x3382…338c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x018e}
0x338c…3396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0008}
0x3396…33aa Head {h00=0x0010, h01=0x0050, text=» IFF CROOM=1«, t00=0x0021, t01=0x0012}
0x33aa…33b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0026}
0x33b4…33c8 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0021, t01=0x0030}
0x33c8…33d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0044}
0x33d2…33de Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x004e}
0x33de…33e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005a}
0x33e8…33fa Head {h00=0x000e, h01=0x0050, text=» RB ACGP17«, t00=0x0021, t01=0x0064}
0x33fa…3408 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0076}
0x3408…3412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0084}
0x3412…341c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x008e}
0x341c…3448 Head {h00=0x0028, h01=0x0050, text=»* SEND LAST DUMMY , LOAD A1 WITH «, t00=0x0021, t01=0x0098}
0x3448…346c Head {h00=0x0020, h01=0x0050, text=»* RETURN CODE AND END I/O«, t00=0x0021, t01=0x00c4}
0x346c…3476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00e8}
0x3476…348a Head {h00=0x0010, h01=0x0050, text=»AGP400 EQU *«, t00=0x0021, t01=0x00f2}
0x348a…34ac Head {h00=0x001e, h01=0x0050, text=» LDK A2,ETB END OF MESSAGE«, t00=0x0021, t01=0x0106}
0x34ac…34c6 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x0021, t01=0x0128}
0x34c6…34ea Head {h00=0x0020, h01=0x0050, text=»AGP410 LDK A2,ETX LAST DUMMY«, t00=0x0021, t01=0x0142}
0x34ea…3504 Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x0021, t01=0x0166}
0x3504…351c Head {h00=0x0014, h01=0x0050, text=»AGP415 EQU * =1«, t00=0x0021, t01=0x0180}
0x351c…3534 Head {h00=0x0014, h01=0x0050, text=» IFT ABIS=1 =1 «, t00=0x0022, t01=0x0008}
0x3534…3554 Head {h00=0x001c, h01=0x0050, text=» ANK A2,/4 PAPER IN ? =1«, t00=0x0022, t01=0x0020}
0x3554…3572 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) AGP420 YES =1 «, t00=0x0022, t01=0x0040}
0x3572…3598 Head {h00=0x0022, h01=0x0050, text=» LDK A1,/20 SET RETURN CODE =1«, t00=0x0022, t01=0x005e}
0x3598…35aa Head {h00=0x000e, h01=0x0050, text=» XIF =1 «, t00=0x0022, t01=0x0084}
0x35aa…35be Head {h00=0x0010, h01=0x0050, text=»AGP420 EQU *«, t00=0x0022, t01=0x0096}
0x35be…35f2 Head {h00=0x0030, h01=0x0050, text=» CF A15,UPDAPP UPDATE HEAD POSITION COUNTER «, t00=0x0022, t01=0x00aa}
0x35f2…3616 Head {h00=0x0020, h01=0x0050, text=»ENDIO CF A15,TENDIO END I/O «, t00=0x0022, t01=0x00de}
0x3616…363e Head {h00=0x0024, h01=0x0050, text=»EXIT ABL TDISP GO TO DISPATCHER «, t00=0x0022, t01=0x0102}
0x363e…3652 Head {h00=0x0010, h01=0x0050, text=»AGP430 EQU *«, t00=0x0022, t01=0x012a}
0x3652…366a Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x0022, t01=0x013e}
0x366a…368a Head {h00=0x001c, h01=0x0050, text=» ST A3,6,A8 EFF. LENGTH «, t00=0x0022, t01=0x0156}
0x368a…36a0 Head {h00=0x0012, h01=0x0050, text=» RB AGP415 =1«, t00=0x0022, t01=0x0176}
0x36a0…36ae Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x018c}
0x36ae…36b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x000a}
0x36b8…36c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0014}
0x36c2…36f2 Head {h00=0x002c, h01=0x0050, text=»* UPDAPP = SUBROUTINE TO UPDATE HEAD «, t00=0x0023, t01=0x001e}
0x36f2…3722 Head {h00=0x002c, h01=0x0050, text=»* POSITION POINTER WHEN END «, t00=0x0023, t01=0x004e}
0x3722…374e Head {h00=0x0028, h01=0x0050, text=»* OF REQUEST IS REACHED «, t00=0x0023, t01=0x007e}
0x374e…3762 Head {h00=0x0010, h01=0x0050, text=»UPDAPP EQU *«, t00=0x0023, t01=0x00aa}
0x3762…378e Head {h00=0x0028, h01=0x0050, text=» LC A3,DWTBC,A6 GET POSITION COUNTER«, t00=0x0023, t01=0x00be}
0x378e…37c4 Head {h00=0x0032, h01=0x0050, text=» ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER «, t00=0x0023, t01=0x00ea}
0x37c4…37d6 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0023, t01=0x0120}
0x37d6…3806 Head {h00=0x002c, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER «, t00=0x0023, t01=0x0132}
0x3806…3816 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0023, t01=0x0162}
0x3816…382c Head {h00=0x0012, h01=0x0050, text=» IFT SUPSPA=1 «, t00=0x0023, t01=0x0172}
0x382c…383a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0188}
0x383a…3844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x3844…384e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0012}
0x384e…387c Head {h00=0x002a, h01=0x0050, text=»* SKIPSP = SUBROTINE TO SKIP SPACES«, t00=0x0024, t01=0x001c}
0x387c…38a8 Head {h00=0x0028, h01=0x0050, text=»* IN END OF ECB-BUFFER. «, t00=0x0024, t01=0x004a}
0x38a8…38e2 Head {h00=0x0036, h01=0x0050, text=»* REQUESTED LENGTH IN ECB IS UPDATED. «, t00=0x0024, t01=0x0076}
0x38e2…390c Head {h00=0x0026, h01=0x0050, text=»* A1,A2,A4 - WORK REG «, t00=0x0024, t01=0x00b0}
0x390c…3916 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00da}
0x3916…392a Head {h00=0x0010, h01=0x0050, text=»SKIPSP EQU *«, t00=0x0024, t01=0x00e4}
0x392a…3956 Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A8 GET BUFFER ADDRESS (BA) «, t00=0x0024, t01=0x00f8}
0x3956…3982 Head {h00=0x0028, h01=0x0050, text=» LD A2,4,A8 GET REQUESTED LENGTH(RL)«, t00=0x0024, t01=0x0124}
0x3982…39aa Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 GET ADD END OF BUFFER«, t00=0x0024, t01=0x0150}
0x39aa…39c2 Head {h00=0x0014, h01=0x0050, text=»SKIP05 CWK A2,2 «, t00=0x0024, t01=0x0178}
0x39c2…39e0 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 3 «, t00=0x0024, t01=0x0190}
0x39e0…39fa Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 DECR. BA«, t00=0x0025, t01=0x001e}
0x39fa…3a16 Head {h00=0x0018, h01=0x0050, text=» LCR A4,A1 GET CHAR «, t00=0x0025, t01=0x0038}
0x3a16…3a34 Head {h00=0x001a, h01=0x0050, text=» CCK A4,/2020 SPACE ? «, t00=0x0025, t01=0x0054}
0x3a34…3a4e Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP20 NO «, t00=0x0025, t01=0x0072}
0x3a4e…3a6e Head {h00=0x001c, h01=0x0050, text=»SKIP07 SUK A2,1 DECR RL «, t00=0x0025, t01=0x008c}
0x3a6e…3a8a Head {h00=0x0018, h01=0x0050, text=» RB SKIP05 GET NEXT «, t00=0x0025, t01=0x00ac}
0x3a8a…3aa2 Head {h00=0x0014, h01=0x0050, text=»SKIP20 CWK A2,4 «, t00=0x0025, t01=0x00c8}
0x3aa2…3ac0 Head {h00=0x001a, h01=0x0050, text=» RF(NG) SKIP30 RL < 5 «, t00=0x0025, t01=0x00e0}
0x3ac0…3ade Head {h00=0x001a, h01=0x0050, text=» LC A4,-2,A1 GET CHAR «, t00=0x0025, t01=0x00fe}
0x3ade…3b06 Head {h00=0x0024, h01=0x0050, text=» CCK A4,/1111 TABULATION CHAR ? «, t00=0x0025, t01=0x011c}
0x3b06…3b20 Head {h00=0x0016, h01=0x0050, text=» RF(NE) SKIP30 NO «, t00=0x0025, t01=0x0144}
0x3b20…3b3a Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 DECR BA «, t00=0x0025, t01=0x015e}
0x3b3a…3b54 Head {h00=0x0016, h01=0x0050, text=» SUK A2,2 DECR RL «, t00=0x0025, t01=0x0178}
0x3b54…3b70 (38, 0, 400) Head {h00=0x0018, h01=0x0050, text=» RB SKIP07 GET NEXT «, t00=0x0026, t01=0x0004}
0x3b70…3b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0020}
0x3b7a…3ba0 Head {h00=0x0022, h01=0x0050, text=»SKIP30 ST A2,4,A8 STORE NEW RL«, t00=0x0026, t01=0x002a}
0x3ba0…3bb0 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0026, t01=0x0050}
0x3bb0…3bbc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x0060}
0x3bbc…3bca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x006c}
0x3bca…3bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x007a}
0x3bd4…3be8 Head {h00=0x0010, h01=0x0050, text=»* I H G P«, t00=0x0026, t01=0x0084}
0x3be8…3bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0098}
0x3bf2…3c08 Head {h00=0x0012, h01=0x0050, text=»* INTERRUPT«, t00=0x0026, t01=0x00a2}
0x3c08…3c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00b8}
0x3c12…3c24 Head {h00=0x000e, h01=0x0050, text=»IHGP EQU *«, t00=0x0026, t01=0x00c2}
0x3c24…3c42 Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 BUSY? «, t00=0x0026, t01=0x00d4}
0x3c42…3c58 Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x0026, t01=0x00f2}
0x3c58…3c76 Head {h00=0x001a, h01=0x0050, text=» SLL A4,2 ECHO MODE ? «, t00=0x0026, t01=0x0108}
0x3c76…3c8c Head {h00=0x0012, h01=0x0050, text=» RF(N) IHGP10 «, t00=0x0026, t01=0x0126}
0x3c8c…3ca8 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0? «, t00=0x0026, t01=0x013c}
0x3ca8…3cc2 Head {h00=0x0016, h01=0x0050, text=» RF(Z) IHGP20 =2 «, t00=0x0026, t01=0x0158}
0x3cc2…3cf4 Head {h00=0x002e, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ?«, t00=0x0026, t01=0x0172}
0x3cf4…3d0a Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=0 «, t00=0x0027, t01=0x0014}
0x3d0a…3d1e Head {h00=0x0010, h01=0x0050, text=» RB(NZ) EXIT«, t00=0x0027, t01=0x002a}
0x3d1e…3d2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x003e}
0x3d2a…3d40 Head {h00=0x0012, h01=0x0050, text=» IFT RECEND=1 «, t00=0x0027, t01=0x004a}
0x3d40…3d56 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) AGP430«, t00=0x0027, t01=0x0060}
0x3d56…3d62 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x0076}
0x3d62…3d6a Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0082}
0x3d6a…3da2 Head {h00=0x0034, h01=0x0050, text=»IHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 «, t00=0x0027, t01=0x008a}
0x3da2…3dbe Head {h00=0x0018, h01=0x0050, text=»IHGP20 LDR A1,A1 =2«, t00=0x0027, t01=0x00c2}
0x3dbe…3dee Head {h00=0x002c, h01=0x0050, text=» RB(Z) IHGP10 TEST ORDER AND TIME OUT =2«, t00=0x0027, t01=0x00de}
0x3dee…3e04 Head {h00=0x0012, h01=0x0050, text=» RB ENDIO =2 «, t00=0x0027, t01=0x010e}
0x3e04…3e12 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0124}
0x3e12…3e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0132}
0x3e1c…3e34 Head {h00=0x0014, h01=0x0050, text=»* E C H O G P«, t00=0x0027, t01=0x013c}
0x3e34…3e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0154}
0x3e3e…3e72 Head {h00=0x0030, h01=0x0050, text=»* ECHOGP = DEVICE-DEPENDENT ECHO-ROUTINE «, t00=0x0027, t01=0x015e}
0x3e72…3e7c (40, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0004}
0x3e7c…3e90 Head {h00=0x0010, h01=0x0050, text=»ECHOGP EQU *«, t00=0x0028, t01=0x000e}
0x3e90…3ea6 Head {h00=0x0012, h01=0x0050, text=» LDK A4,COSPAC«, t00=0x0028, t01=0x0022}
0x3ea6…3ebe Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 EOR? «, t00=0x0028, t01=0x0038}
0x3ebe…3ed8 Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP17 YES «, t00=0x0028, t01=0x0050}
0x3ed8…3ee2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x006a}
0x3ee2…3ef8 Head {h00=0x0012, h01=0x0050, text=» IFT EORECH=0 «, t00=0x0028, t01=0x0074}
0x3ef8…3f02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008a}
0x3f02…3f24 Head {h00=0x001e, h01=0x0050, text=» SUK A2,/80 EOR-CHARACTER «, t00=0x0028, t01=0x0094}
0x3f24…3f3e Head {h00=0x0016, h01=0x0050, text=» RF(NN) ECGP20 YES«, t00=0x0028, t01=0x00b6}
0x3f3e…3f52 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x0028, t01=0x00d0}
0x3f52…3f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e4}
0x3f5c…3f68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00ee}
0x3f68…3f72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00fa}
0x3f72…3f84 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0028, t01=0x0104}
0x3f84…3f98 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/7F «, t00=0x0028, t01=0x0116}
0x3f98…3faa Head {h00=0x000e, h01=0x0050, text=» SUK A1,/8«, t00=0x0028, t01=0x012a}
0x3faa…3fca Head {h00=0x001c, h01=0x0050, text=» RF(E) ECGP40 BACKSPACE «, t00=0x0028, t01=0x013c}
0x3fca…3fea Head {h00=0x001c, h01=0x0050, text=» SUK A1,/2 LINE FEED =1 «, t00=0x0028, t01=0x015c}
0x3fea…4006 Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP10 YES =1«, t00=0x0028, t01=0x017c}
0x4006…401e Head {h00=0x0014, h01=0x0050, text=» SUK A1,/3 CR =1«, t00=0x0029, t01=0x0008}
0x401e…403a Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP10 YES =1«, t00=0x0029, t01=0x0020}
0x403a…4050 Head {h00=0x0012, h01=0x0050, text=» SUK A1,/B =1«, t00=0x0029, t01=0x003c}
0x4050…406c Head {h00=0x0018, h01=0x0050, text=» RF(E) ECGP50 CLEAR «, t00=0x0029, t01=0x0052}
0x406c…40a8 Head {h00=0x0038, h01=0x0050, text=» SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F«, t00=0x0029, t01=0x006e}
0x40a8…40be Head {h00=0x0012, h01=0x0050, text=» RF(N) ECGP20 «, t00=0x0029, t01=0x00aa}
0x40be…40d6 Head {h00=0x0014, h01=0x0050, text=» SUK A1,/5F-/20 «, t00=0x0029, t01=0x00c0}
0x40d6…40ec Head {h00=0x0012, h01=0x0050, text=» RF(P) ECGP20 «, t00=0x0029, t01=0x00d8}
0x40ec…4116 Head {h00=0x0026, h01=0x0050, text=»ECGP10 CF A5,OUTPUT SEND CHARACTER«, t00=0x0029, t01=0x00ee}
0x4116…4142 Head {h00=0x0028, h01=0x0050, text=» IM DWTST,A6 UPDATE POSITION COUNTER«, t00=0x0029, t01=0x0118}
0x4142…415c Head {h00=0x0016, h01=0x0050, text=» SUK A4,1 READY ? «, t00=0x0029, t01=0x0144}
0x415c…4176 Head {h00=0x0016, h01=0x0050, text=» RF(N) ECGP20 YES «, t00=0x0029, t01=0x015e}
0x4176…41a4 Head {h00=0x002a, h01=0x0050, text=» RF(P) ECGP60 NO, GO TO CLEAR SECTION «, t00=0x0029, t01=0x0178}
0x41a4…41ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0016}
0x41ae…41c4 Head {h00=0x0012, h01=0x0050, text=» IFT COSPAC=1 «, t00=0x002a, t01=0x0020}
0x41c4…41ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0036}
0x41ce…41f2 Head {h00=0x0020, h01=0x0050, text=» LDK A2,SPACE NO SEND SPACE «, t00=0x002a, t01=0x0040}
0x41f2…4204 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002a, t01=0x0064}
0x4204…420e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0076}
0x420e…421a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x0080}
0x421a…4224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x008c}
0x4224…425e Head {h00=0x0036, h01=0x0050, text=»ECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER «, t00=0x002a, t01=0x0096}
0x425e…428a Head {h00=0x0028, h01=0x0050, text=»ECGP20 ABL ECHRTN RETURN TO KEYBOARD«, t00=0x002a, t01=0x00d0}
0x428a…4298 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00fc}
0x4298…42a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x010a}
0x42a2…42b8 Head {h00=0x0012, h01=0x0050, text=»* BACKSPACE«, t00=0x002a, t01=0x0114}
0x42b8…42c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x012a}
0x42c2…42d6 Head {h00=0x0010, h01=0x0050, text=»ECGP40 EQU *«, t00=0x002a, t01=0x0134}
0x42d6…4300 Head {h00=0x0026, h01=0x0050, text=» LDK A2,GPBSP BACKSPACE CHARACTER «, t00=0x002a, t01=0x0148}
0x4300…4312 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002a, t01=0x0172}
0x4312…431c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0184}
0x431c…4330 Head {h00=0x0010, h01=0x0050, text=»* CANCEL «, t00=0x002a, t01=0x018e}
0x4330…433a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0012}
0x433a…434e Head {h00=0x0010, h01=0x0050, text=»ECGP50 EQU *«, t00=0x002b, t01=0x001c}
0x434e…4374 Head {h00=0x0022, h01=0x0050, text=» LDK A2,GPCLR CLEAR CHARACTER «, t00=0x002b, t01=0x0030}
0x4374…4386 Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x002b, t01=0x0056}
0x4386…4398 Head {h00=0x000e, h01=0x0050, text=» RB ECGP10«, t00=0x002b, t01=0x0068}
0x4398…43ba Head {h00=0x001e, h01=0x0050, text=»ECGP60 LDK A2,LF LINE FEED«, t00=0x002b, t01=0x007a}
0x43ba…43d2 Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTBC,A6 «, t00=0x002b, t01=0x009c}
0x43d2…43e6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x002b, t01=0x00b4}
0x43e6…440c Head {h00=0x0022, h01=0x0050, text=»ECGP70 CF A5,OUTPUT SEND CHAR.«, t00=0x002b, t01=0x00c8}
0x440c…442a Head {h00=0x001a, h01=0x0050, text=» LDK A2,/08 BACKSPACE «, t00=0x002b, t01=0x00ee}
0x442a…443c Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x002b, t01=0x010c}
0x443c…4452 Head {h00=0x0012, h01=0x0050, text=» RB(NN) ECGP70«, t00=0x002b, t01=0x011e}
0x4452…4464 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002b, t01=0x0134}
0x4464…4492 Head {h00=0x002a, h01=0x0050, text=» SC A3,DWTBC,A6 RESET POSITION COUNTER«, t00=0x002b, t01=0x0146}
0x4492…44a4 Head {h00=0x000e, h01=0x0050, text=» RB ECGP20«, t00=0x002b, t01=0x0174}
0x44a4…44b2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0186}
0x44b2…44bc (44, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0004}
0x44bc…44d0 Head {h00=0x0010, h01=0x0050, text=»* R C G P«, t00=0x002c, t01=0x000e}
0x44d0…44da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0022}
0x44da…450e Head {h00=0x0030, h01=0x0050, text=»* RCGP = RECOVERY ROUTINE GENERAL PRINTER«, t00=0x002c, t01=0x002c}
0x450e…4518 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0060}
0x4518…4522 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x006a}
0x4522…454e Head {h00=0x0028, h01=0x0050, text=»* RECOVERY IS CARRIED OUT ONLY IF«, t00=0x002c, t01=0x0074}
0x454e…456e Head {h00=0x001c, h01=0x0050, text=»* ORDER 6 IS RUNNING «, t00=0x002c, t01=0x00a0}
0x456e…4578 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00c0}
0x4578…458e Head {h00=0x0012, h01=0x0050, text=»* ON ENTRY:«, t00=0x002c, t01=0x00ca}
0x458e…4598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00e0}
0x4598…45b6 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT-ADDRESS «, t00=0x002c, t01=0x00ea}
0x45b6…45ce Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x002c, t01=0x0108}
0x45ce…45ec Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB-ADDRESS «, t00=0x002c, t01=0x0120}
0x45ec…45fe Head {h00=0x000e, h01=0x0050, text=»RCGP EQU *«, t00=0x002c, t01=0x013e}
0x45fe…4614 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x002c, t01=0x0150}
0x4614…463e Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x002c, t01=0x0166}
0x463e…464a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002c, t01=0x0190}
0x464a…4654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x000c}
0x4654…466a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x002d, t01=0x0016}
0x466a…4690 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x002d, t01=0x002c}
0x4690…469c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0052}
0x469c…46a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x005e}
0x46a6…46c4 Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTST,A6 BUSY ?«, t00=0x002d, t01=0x0068}
0x46c4…46da Head {h00=0x0012, h01=0x0050, text=» RB(N) EXIT NO«, t00=0x002d, t01=0x0086}
0x46da…4706 Head {h00=0x0028, h01=0x0050, text=» LDK A2,SOH RESET PRINT BUFFER CODE «, t00=0x002d, t01=0x009c}
0x4706…4724 Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND IT «, t00=0x002d, t01=0x00c8}
0x4724…4736 Head {h00=0x000e, h01=0x0050, text=» CWK A7,5 «, t00=0x002d, t01=0x00e6}
0x4736…474c Head {h00=0x0012, h01=0x0050, text=» RF(E) RCGP10 «, t00=0x002d, t01=0x00f8}
0x474c…4766 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x002d, t01=0x010e}
0x4766…4780 Head {h00=0x0016, h01=0x0050, text=» RF(E) RCGP05 YES «, t00=0x002d, t01=0x0128}
0x4780…479a Head {h00=0x0016, h01=0x0050, text=» CWK A7,0 ORDER 0?«, t00=0x002d, t01=0x0142}
0x479a…47ae Head {h00=0x0010, h01=0x0050, text=» RB(E) ENDIO«, t00=0x002d, t01=0x015c}
0x47ae…47be Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x002d, t01=0x0170}
0x47be…47d2 Head {h00=0x0010, h01=0x0050, text=»RCGP05 EQU *«, t00=0x002d, t01=0x0180}
0x47d2…4806 (46, 0, 400) Head {h00=0x0030, h01=0x0050, text=» LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD«, t00=0x002e, t01=0x0004}
0x4806…482a Head {h00=0x0020, h01=0x0050, text=» ANK A2,/4 LINE FEED DONE ? «, t00=0x002e, t01=0x0038}
0x482a…4842 Head {h00=0x0014, h01=0x0050, text=» ABL(E) ACGP NO «, t00=0x002e, t01=0x005c}
0x4842…4858 Head {h00=0x0012, h01=0x0050, text=» LDK A2,SPACE «, t00=0x002e, t01=0x0074}
0x4858…4878 Head {h00=0x001c, h01=0x0050, text=» CF A5,OUTPUT SEND SPACE«, t00=0x002e, t01=0x008a}
0x4878…488c Head {h00=0x0010, h01=0x0050, text=» LDK A2,STX «, t00=0x002e, t01=0x00aa}
0x488c…48aa Head {h00=0x001a, h01=0x0050, text=» CF A5,OUTPUT SEND STX«, t00=0x002e, t01=0x00be}
0x48aa…48cc Head {h00=0x001e, h01=0x0050, text=» LDK A2,CR CARRIAGE RETURN«, t00=0x002e, t01=0x00dc}
0x48cc…48de Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x002e, t01=0x00fe}
0x48de…4912 Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND«, t00=0x002e, t01=0x0110}
0x4912…4926 Head {h00=0x0010, h01=0x0050, text=» ABL ACGP46 «, t00=0x002e, t01=0x0144}
0x4926…4952 Head {h00=0x0028, h01=0x0050, text=»RCGP10 LDK A1,TPERR SET RETURN CODE «, t00=0x002e, t01=0x0158}
0x4952…4966 Head {h00=0x0010, h01=0x0050, text=» ABL AGP430 «, t00=0x002e, t01=0x0184}
0x4966…4972 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002f, t01=0x0008}
0x4972…4976 Head {h00=0x4004, h01=0x0000}
0x4976…497a 00 2f 00 14 ┆ / ┆
0x497a…4982 (48, 1, 8) 20 04 00 00 00 30 00 04 ┆ 0 ┆
0x4982…49d2 (49, 0, 400) 20 56 41 4c 55 45 00 20 01 6c 00 1c 00 50 5c 52 46 28 5a 29 5c 54 49 4d 45 31 30 5c 4e 4f 20 54 49 4d 49 4e 47 20 00 21 00 0e 00 12 00 50 5c 53 54 5c 41 32 2c 54 49 4d 45 52 52 20 00 21 00 2e 00 12 00 50 5c 43 46 5c 41 31 35 2c 53 45 54 49 ┆ VALUE l P RF(Z) TIME10 NO TIMING ! P ST A2,TIMERR ! . P CF A15,SETI┆
0x49d2…4a22 4d 45 00 21 00 44 00 10 00 50 5c 44 41 54 41 5c 54 4f 55 54 52 45 00 21 00 5a 00 12 00 50 54 49 4d 45 52 52 5c 44 41 54 41 5c 30 20 00 21 00 6e 00 28 00 50 5c 53 54 5c 41 34 2c 44 57 54 54 50 2c 41 36 5c 53 54 4f 52 45 20 54 49 4d 45 52 20 ┆ME ! D P DATA TOUTRE ! Z PTIMERR DATA 0 ! n ( P ST A4,DWTTP,A6 STORE TIMER ┆
0x4a22…4a72 50 4f 49 4e 54 45 52 20 00 21 00 84 00 10 00 50 54 49 4d 45 31 30 5c 45 51 55 5c 2a 00 21 00 b0 00 16 00 50 5c 52 46 5c 47 42 55 46 31 30 5c 52 45 54 55 52 4e 20 00 21 00 c4 00 06 00 50 2a 20 00 21 00 de 00 18 00 50 2a 5c 54 49 4d 45 4f 55 ┆POINTER ! PTIME10 EQU * ! P RF GBUF10 RETURN ! P* ! P* TIMEOU┆
0x4a72…4ac2 54 20 52 45 41 44 20 54 49 4d 45 52 00 21 00 e8 00 06 00 50 2a 20 00 21 01 04 00 10 00 50 54 4f 55 54 52 45 5c 45 51 55 5c 2a 00 21 01 0e 00 18 00 50 5c 4c 44 52 5c 41 36 2c 41 31 5c 46 45 54 43 48 20 44 57 54 00 21 01 22 00 10 00 50 5c 43 ┆T READ TIMER ! P* ! PTOUTRE EQU * ! P LDR A6,A1 FETCH DWT ! " P C┆
0x4ac2…4b12 4d 5c 44 57 54 54 50 2c 41 36 00 21 01 3e 00 10 00 50 54 4f 55 54 52 31 5c 45 51 55 5c 2a 00 21 01 52 00 22 00 50 5c 4c 44 4b 5c 41 31 2c 2f 34 30 5c 49 4e 44 49 43 41 54 45 20 54 49 4d 45 20 4f 55 54 20 00 21 01 66 00 24 00 50 54 4f 55 54 ┆M DWTTP,A6 ! > PTOUTR1 EQU * ! R " P LDK A1,/40 INDICATE TIME OUT ! f $ PTOUT┆
0x4b12…4b62 (50, 0, 400) 52 32 5c 52 42 5c 45 4e 44 49 4f 5c 43 4f 4d 50 4c 45 54 45 20 52 45 51 55 45 53 54 00 21 01 8c 00 06 00 50 2a 20 00 22 00 24 00 18 00 50 2a 5c 57 52 49 54 45 20 54 49 4d 45 52 3d 54 49 4d 57 52 20 00 22 00 2e 00 06 00 50 2a 20 00 22 00 4a ┆R2 RB ENDIO COMPLETE REQUEST ! P* " $ P* WRITE TIMER=TIMWR " . P* " J┆
0x4b62…4bb2 00 14 00 50 54 49 4d 45 57 52 5c 4c 44 52 5c 41 31 2c 41 36 00 22 00 54 00 2e 00 50 5c 4c 44 5c 41 32 2c 44 57 54 54 49 4d 2c 41 36 5c 47 45 54 20 52 45 51 55 45 53 54 20 54 49 4d 45 4f 55 54 20 56 41 4c 55 45 00 22 00 6c 00 1c 00 50 5c 52 ┆ PTIMEWR LDR A1,A6 " T . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE " l P R┆
0x4bb2…4c02 42 28 5a 29 5c 54 49 4d 45 31 30 5c 4e 4f 20 54 49 4d 49 4e 47 20 00 22 00 9e 00 10 00 50 5c 53 54 5c 41 32 2c 54 49 4d 57 52 00 22 00 be 00 12 00 50 5c 43 46 5c 41 31 35 2c 53 45 54 49 4d 45 00 22 00 d2 00 10 00 50 5c 44 41 54 41 5c 54 4f ┆B(Z) TIME10 NO TIMING " P ST A2,TIMWR " P CF A15,SETIME " P DATA TO┆
0x4c02…4c52 55 54 57 52 00 22 00 e8 00 10 00 50 54 49 4d 57 52 5c 44 41 54 41 5c 30 00 22 00 fc 00 14 00 50 5c 53 54 5c 41 34 2c 44 57 54 54 50 2c 41 36 20 00 22 01 10 00 0e 00 50 5c 52 42 5c 54 49 4d 45 31 30 00 22 01 28 00 0a 00 50 5c 45 4a 45 43 54 ┆UTWR " PTIMWR DATA 0 " P ST A4,DWTTP,A6 " P RB TIME10 " ( P EJECT┆
0x4c52…4ca2 00 22 01 3a 00 06 00 50 2a 20 00 22 01 48 00 1a 00 50 2a 5c 54 49 4d 45 4f 55 54 20 57 52 49 54 45 20 54 49 4d 45 52 20 00 22 01 52 00 06 00 50 2a 20 00 22 01 70 00 10 00 50 54 4f 55 54 57 52 5c 45 51 55 5c 2a 00 22 01 7a 00 18 00 50 5c 4c ┆ " : P* " H P* TIMEOUT WRITE TIMER " R P* " p PTOUTWR EQU * " z P L┆
0x4ca2…4cf2 (51, 0, 400) 44 52 5c 41 36 2c 41 31 5c 46 45 54 43 48 20 44 57 54 00 22 01 8e 00 10 00 50 5c 43 4d 5c 44 57 54 54 50 2c 41 36 00 23 00 1a 00 2a 00 50 5c 43 46 5c 41 31 35 2c 52 45 4d 4f 56 57 5c 52 45 4d 4f 56 45 20 46 52 4f 4d 20 57 52 49 54 45 20 51 ┆DR A6,A1 FETCH DWT " P CM DWTTP,A6 # * P CF A15,REMOVW REMOVE FROM WRITE Q┆
0x4cf2…4d42 55 45 55 45 00 23 00 2e 00 06 00 50 2a 20 00 23 00 5c 00 26 00 50 2a 5c 54 48 49 53 20 49 4e 53 54 52 55 43 54 49 4f 4e 20 44 4f 45 53 20 4e 4f 54 20 42 45 4c 4f 4e 47 00 23 00 66 00 20 00 50 2a 5c 54 4f 20 54 48 45 20 53 54 41 4e 44 41 52 ┆UEUE # . P* # & P* THIS INSTRUCTION DOES NOT BELONG # f P* TO THE STANDAR┆
0x4d42…4d92 44 20 49 4e 54 45 52 46 41 43 45 20 00 23 00 90 00 12 00 50 5c 4c 44 5c 41 32 2c 46 44 57 54 55 54 20 00 23 00 b4 00 0e 00 50 5c 43 57 52 5c 41 32 2c 41 36 00 23 00 ca 00 2a 00 50 5c 52 42 28 4e 45 29 5c 54 4f 55 54 52 31 5c 54 48 49 53 20 ┆D INTERFACE # P LD A2,FDWTUT # P CWR A2,A6 # * P RB(NE) TOUTR1 THIS ┆
0x4d92…4de2 44 57 54 20 49 53 20 4e 4f 54 20 57 52 49 54 49 4e 47 00 23 00 dc 00 28 00 50 5c 43 4d 5c 58 41 43 4b 5c 49 4e 44 49 43 41 54 45 20 27 41 43 4b 20 4e 4f 54 20 45 58 50 45 43 54 45 44 27 00 23 01 0a 00 0e 00 50 5c 43 4d 5c 46 44 57 54 55 54 ┆DWT IS NOT WRITING # ( P CM XACK INDICATE 'ACK NOT EXPECTED' # P CM FDWTUT┆
0x4de2…4e32 00 23 01 36 00 06 00 50 2a 20 00 23 01 48 00 06 00 50 2a 20 00 23 01 52 00 0e 00 50 5c 52 42 5c 54 4f 55 54 52 31 00 23 01 5c 00 0a 00 50 5c 45 4a 45 43 54 00 23 01 6e 00 06 00 50 2a 20 00 23 01 7c 00 06 00 50 2a 20 00 23 01 86 00 1a 00 50 ┆ # 6 P* # H P* # R P RB TOUTR1 # P EJECT # n P* # | P* # P┆
0x4e32…4e82 (52, 0, 400) 2a 5c 53 54 4f 50 20 52 45 51 55 45 53 54 20 54 49 4d 49 4e 47 20 00 23 01 90 00 06 00 50 2a 20 00 24 00 1e 00 26 00 50 2a 5c 52 45 4d 41 49 4e 49 4e 47 20 54 49 4d 45 20 49 53 20 52 45 54 55 52 4e 45 44 20 49 4e 20 41 32 00 24 00 28 00 06 ┆* STOP REQUEST TIMING # P* $ & P* REMAINING TIME IS RETURNED IN A2 $ ( ┆
0x4e82…4ed2 00 50 2a 20 00 24 00 52 00 06 00 50 2a 20 00 24 00 5c 00 10 00 50 43 54 49 4d 45 5c 45 51 55 5c 2a 20 00 24 00 66 00 26 00 50 5c 4c 44 5c 41 32 2c 44 57 54 54 50 2c 41 36 5c 47 45 54 20 54 49 4d 45 52 20 50 4f 49 4e 54 45 52 20 00 24 00 7a ┆ P* $ R P* $ PCTIME EQU * $ f & P LD A2,DWTTP,A6 GET TIMER POINTER $ z┆
0x4ed2…4f22 00 1e 00 50 5c 52 46 28 5a 29 5c 43 54 49 4d 31 30 5c 4e 4f 54 20 52 55 4e 4e 49 4e 47 20 00 24 00 a4 00 10 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 32 20 00 24 00 c6 00 22 00 50 5c 4e 47 52 5c 41 32 2c 41 32 5c 47 45 54 20 52 45 4d 41 49 4e 49 ┆ P RF(Z) CTIM10 NOT RUNNING $ P LDR* A2,A2 $ " P NGR A2,A2 GET REMAINI┆
0x4f22…4f72 4e 47 20 54 49 4d 45 20 00 24 00 da 00 1c 00 50 5c 43 4d 2a 5c 44 57 54 54 50 2c 41 36 5c 53 54 4f 50 20 54 49 4d 45 52 00 24 01 00 00 10 00 50 5c 43 4d 5c 44 57 54 54 50 2c 41 36 00 24 01 20 00 10 00 50 43 54 49 4d 31 30 5c 45 51 55 5c 2a ┆NG TIME $ P CM* DWTTP,A6 STOP TIMER $ P CM DWTTP,A6 $ PCTIM10 EQU *┆
0x4f72…4fc2 00 24 01 34 00 0e 00 50 5c 52 46 5c 47 42 55 46 31 30 00 24 01 48 00 0a 00 50 5c 45 4a 45 43 54 00 24 01 5a 00 06 00 50 2a 20 00 24 01 68 00 18 00 50 2a 5c 47 45 54 20 52 45 43 45 49 56 45 20 42 55 46 46 45 52 00 24 01 72 00 06 00 50 2a 20 ┆ $ 4 P RF GBUF10 $ H P EJECT $ Z P* $ h P* GET RECEIVE BUFFER $ r P* ┆