|
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: 11078 (0x2b46)
Notes: pts_type(SC)
Names: »DRLP01.SC«
└─⟦781e933ac⟧ Bits:30009686 Philips computer tape "600310"
└─⟦this⟧ »M:92T1/DRLP01.SC«
└─⟦7e2393f80⟧ Bits:30009710 Philips computer tape "M_KONV"
└─⟦this⟧ »M:KONV/DRLP01.SC«
IDENT DRLP01 REL 9.2 79-11-16 870105040920 =1, INTERFACE UNKNOWN HANG-UP REL 9.1 79-05-23 * * ********************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRLP01 = DRIVER LINE PRINTER * * * * * * ********************************************************** * * * THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED * TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED * CHANNEL * EJECT DRLP01 * * ************************ * ENTRIES * ************************ * * ENTRY LPADR ADDRESS BLOCK ENTRY ACLP ACTIVATION DRIVER ENTRY IHLP INTERRUPT HANDLER ENTRY LPON RECOVERY ROUTINE ENTRY DWLP01 DWT FOR LINE PRINTER * * **************************************** * EXTERNAL TOSS MODULE ENTRIES * **************************************** * * EXTRN TDISP DISPATCHER EXTRN TENDIO END I/O EXTRN SAVE8 SAVE 8 REGS ON STACK EXTRN DISIOE REQUEST ERROR EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS EXTRN DWTOR DWT INDEX AND ORDER EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 EXTRN DWTSB2 STACK BASE 2 IN DWT EXTRN INTSAV SAVE AREA LAST INTERRUPT EJECT DRLP01 * * ***************************** * CONSTANTS * ***************************** * * DWALP EQU /0F MUXLP EQU DWALP+DWALP MUX ADDRESS * EJECT DRLP01 * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * PROGRAMMED CHANNEL MAY BE USED INSTEAD OF * MULTIPLEX CHANNEL BY SETTING X:A=1 * X:A EQU 0 CHAN EQU 0 * * 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:B EQU 67 DVBLEN EQU 000 * * MMU DEVICE INDEX * X:C EQU 2 DEVIND EQU X:C LINE PRINTER DEVICE INDEX * EJECT DRLP01 * * *********************** * ORDERS * *********************** * * ORDER /00: TEST STATUS. * A TST INSTRUCTION IS EXECUTED TO SEE * IF LINE PRINTER IS OPERABLE. * * ORDER /05: BASIC WRITE. * * THE REQUESTED NUMBER OF CHARACTERS ARE * SENT TO THE LINE PRINTER WITHOUT ANY CHECK. * * ORDER /06: STANDARD WRITE. * FIRST WORD IN ECB BUFFER CONTAINS A CONTROL * CHARACTER. * /2B: PRINT LINE WITHOUT ADVANCING PAPER * /30: ADVANCE TWO LINES BEFORE PRINTING * /31: SKIP TO TOP OF FORM BEFORE PRINTING * OTHER CHARACTERS GIVES A LINE FEED BEFORE * PRINTING. * * * CHARACTERS IN BUFFER SHOULD BE WITHIN THE * INTERVAL /20-/5F. NO CHECK IS CARRIED OUT * BY DRIVER. AT THE END OF ECB BUFFER ONE BYTE * MUST BE RESERVED FOR THE DRIVER TO STORE A * PRINT CHARACTER. * EJECT DRLP01 * * ************************************ * NORMAL REGISTER USAGE * ************************************ * * * A1 = RETURN CODE * A2 = WORK REGISTER * A3 = WORK REGISTER * A4 = BUFFER ADDRESS * A5 = STACK BASE * A6 = DWT ADDRESS * A7 = ORDER * A8 = ECB ADDRESS * * ******************************** * TABLES * ******************************** * * DATA DVBLEN+DVBLEN MMU BUFFER LENGTH DATA DEVIND DEVICE INDEX LPADR DATA ACLP ACTIVATION DRIVER DATA 0 ABORT ROUTINE ADDRESS * EJECT DRLP01 * * * A C T I V A T I O N * * ACLP EQU * LDK A1,/0D CARRIAGE RETURN LDR A7,A7 ORDER 0 ? RF(NE) ACLP05 NO LDKL A4,DWTBC BYTE COUNTER ADR A4,A6 ADD DWT ADDRESS SCR A1,A4 STORE CARRIAGE RETURN LDK A2,1 RF ACLP30 * ACLP05 LD A4,2,A8 BUFFER ADDRESS LD A2,4,A8 REQ. LENGTH SUK A7,5 ORDER 5 ? RF(E) ACLP30 SUK A7,1 ORDER 6 ? RF(E) ACLP10 * ACERR ABL DISIOE * EJECT DRLP01 * * ACLP10 EQU * CWK A2,2 REQ. LENGTH < 2 ? RF(NL) ACLP12 NO LDK A2,2 YES , SAME ACTIONS AS FOR REQ. LENGTH=2 * ACLP12 EQU * LDR A3,A4 BUFFER ADDRESS ADR A3,A2 ADDED WITH REQ. LENGTH SCR A1,A3 STORE PRINT CHARACTER ADK A2,1 LCR A3,A4 ECR A3,A3 LC A3,1,A4 GET CONTROL CHARACTER ST A3,CONCHA ANK A3,/FF SUK A3,/2B SUPER POSITIONING ? RF(NE) ACLP15 NO SUK A2,2 DECREMENT REQ. LENGTH ADK A4,2 INCREMENT BUFFER ADDRESS RF ACLP30 * ACLP15 LDK A1,/0A LINE FEED SC A1,1,A4 SECOND CHARACTER IN BUFFER SUK A3,5 TWO LINE FEEDS ? RF(E) ACLP20 YES LDK A1,/0C TOP OF FORM SUK A3,1 WANTED ? RF(E) ACLP20 YES LDK A1,/0D CARRIAGE RETURN * EJECT DRLP01 * * ACLP20 SCR A1,A4 STORE FIRST CHARACTER IN BUFFER ACLP30 CF A5,CIOSTA SEND BUFFER SUK A7,6 ORDER 6 ? RF(NE) ENDIO LDR A2,A2 RF(NN) ACLP35 IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D) * ACLP35 EQU * LD A4,2,A8 BUFFER ADDRESS LDKL A3,0 CONCHA EQU *-2 SC A3,1,A4 RESET CONTROL CHARACTER IN BUFFER ECR A3,A3 SCR A3,A4 ALSO RESET FIRST BYTE * ENDIO CF A15,TENDIO END REQUEST EXIT ABL TDISP * EJECT DRLP01 * * * CIOSTA * SUBROUTINE TO SEND BUFFER * * CIOSTA EQU * ST A5,DWTA5,A6 SAVE A5 IFT CHAN=0 ORKL A2,/4000 INDICATE CHARACTER MODE, OUTPUT AND IN RIGHT BYTE NUMBER OF CHARACTERS TO SEND WER A2,MUXLP FIRST WRITE EXTERNAL REGISTER WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER XIF * IFT CHAN=1 ST A4,DWTA3,A6 SAVE BUFFER ADDRESS ADR A4,A2 ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 XIF * CIO A2,1,DWALP CIO START RB(Z) EXIT ACCEPTED =1 LDK A1,1 ERROR RB ENDIO * EJECT DRLP01 * * * RECOVERY ROUTINE * * LPON 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 * LDK A1,1 NOT OPERABLE LDKL A6,DWLP01 DWT ADDRESS LD A2,DWTST,A6 DWT STATUS RB(N) EXIT LP FREE RF IHLP30 * EJECT DRLP01 * * * I N T E R R U P T * * IHLP EQU * ST P,INTSAV SAVE LAST INTERRUPT IFT CHAN=0 IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CHAN=0 IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * IFT CHAN=1 STR A1,A15 STR A2,A15 LDKL A2,DWLP01 DWT-ADDRESS LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER LCR A2,A1 NEXT BYTE OTR A2,0,DWALP WRITE ONE BYTE RF(NA) IHLP20 NOT ACCEPTED LDKL A2,DWLP01 DWT-ADDRESS ADK A1,1 ST A1,DWTA3,A2 UPDATE POINTER CW A1,DWTA4,A2 RF(NE) IHLP10 NOT LAST BYTE CIO A2,0,DWALP CIO HALT IHLP10 EQU * LDR* A2,A15 LDR* A1,A15 RTN A15 * * * IHLP20 STR A3,A15 STR A4,A15 STR A5,A15 STR A6,A15 STR A7,A15 STR A8,A15 XIF * SST A1,DWALP GET STATUS LDKL A6,DWLP01 DWT ADDRESS * IHLP30 EQU * LD A7,DWTOR,A6 ORDER ANK A7,/FF LD A8,DWTECB,A6 ECB ADDRESS * IFT CHAN=0 RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR. ANKL A3,/FFF LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS SUR A2,A3 XIF * EJECT DRLP01 * * IFT CHAN=1 LD A2,DWTA3,A6 GET BUFFER-POINTER CWK A7,6 ORDER 6? RF(NE) IHLP35 ADK A2,1 YES IHLP35 EQU * SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS XIF ST A2,6,A8 STORE EFF. LENGTH LD A5,DWTA5,A6 GET STACK VALUE RTN A5 * EJECT DRLP01 * * D W L P 0 1 * * DEVICE WORK TABLE FOR LINE PRINTER * DWLP01 EQU * DATA 0 CHANNEL PARAMETER DATA /8000 STATUS DATA 0 ECB ADDRESS DATA 0 ORDER DATA LPADR ADDRESS TO ADDRESS BLOCK DATA 0 TTAB ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE IFT MMUPAG=1 DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRESS XIF DATA 0 OUTPUT QUEUE LINK DATA 0 SAVE AREA FOR A3 DATA 0 SAVE AREA FOR A4 DATA 0 SAVE AREA FOR A5 RES 4 DWT STACK * IFT MMUPAG=1 DEVECB EQU * DATA 0 DATA LP:BUF DATA 0,0,0,0 LP:BUF RES DVBLEN+1 XIF * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRLP01 REL 9.2 79-11-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0066 Head {h00=0x0024, h01=0x0050, text=» =1, INTERFACE UNKNOWN HANG-UP«, t00=0x0000, t01=0x0042}
0x0066…0082 Head {h00=0x0018, h01=0x0050, text=» REL 9.1 79-05-23 «, t00=0x0000, t01=0x006a}
0x0082…008c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0086}
0x008c…0096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0090}
0x0096…00d8 Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0000, t01=0x009a}
0x00d8…00e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00dc}
0x00e2…010a Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00e6}
0x010a…0114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…013c Head {h00=0x0024, h01=0x0050, text=»* DRLP01 = DRIVER LINE PRINTER«, t00=0x0000, t01=0x0118}
0x013c…0146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0140}
0x0146…0150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014a}
0x0150…015a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0154}
0x015a…0164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x0164…016e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x016e…0178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x0178…01ba Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x0000, t01=0x017c}
0x01ba…01c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x002e}
0x01c4…01ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0038}
0x01ce…0212 Head {h00=0x0040, h01=0x0050, text=»* THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED«, t00=0x0001, t01=0x0042}
0x0212…0252 Head {h00=0x003c, h01=0x0050, text=»* TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED «, t00=0x0001, t01=0x0086}
0x0252…0266 Head {h00=0x0010, h01=0x0050, text=»* CHANNEL«, t00=0x0001, t01=0x00c6}
0x0266…0270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x0270…0288 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0001, t01=0x00e4}
0x0288…0292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x0292…029c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0106}
0x029c…02bc Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0001, t01=0x0110}
0x02bc…02dc Head {h00=0x001c, h01=0x0050, text=»* ENTRIES *«, t00=0x0001, t01=0x0130}
0x02dc…02fc Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0001, t01=0x0150}
0x02fc…0306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0170}
0x0306…0310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017a}
0x0310…0332 Head {h00=0x001e, h01=0x0050, text=» ENTRY LPADR ADDRESS BLOCK«, t00=0x0001, t01=0x0184}
0x0332…0358 Head {h00=0x0022, h01=0x0050, text=» ENTRY ACLP ACTIVATION DRIVER «, t00=0x0002, t01=0x0016}
0x0358…037e Head {h00=0x0022, h01=0x0050, text=» ENTRY IHLP INTERRUPT HANDLER «, t00=0x0002, t01=0x003c}
0x037e…03a2 Head {h00=0x0020, h01=0x0050, text=» ENTRY LPON RECOVERY ROUTINE«, t00=0x0002, t01=0x0062}
0x03a2…03cc Head {h00=0x0026, h01=0x0050, text=» ENTRY DWLP01 DWT FOR LINE PRINTER«, t00=0x0002, t01=0x0086}
0x03cc…03d4 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00b0}
0x03d4…03dc Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00b8}
0x03dc…03e4 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00c0}
0x03e4…03ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c8}
0x03ee…03f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d2}
0x03f8…0428 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0002, t01=0x00dc}
0x0428…0458 Head {h00=0x002c, h01=0x0050, text=»* EXTERNAL TOSS MODULE ENTRIES *«, t00=0x0002, t01=0x010c}
0x0458…0488 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0002, t01=0x013c}
0x0488…0492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016c}
0x0492…049c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x049c…04bc Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0002, t01=0x0180}
0x04bc…04da Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0003, t01=0x0010}
0x04da…0504 Head {h00=0x0026, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGS ON STACK «, t00=0x0003, t01=0x002e}
0x0504…0528 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x0058}
0x0528…0544 Head {h00=0x0018, h01=0x0013, text=» EXTRN DWTST STATUS «, t00=0x0003, t01=0x007c}
0x0544…0566 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0003, t01=0x0098}
0x0566…0588 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0003, t01=0x00ba}
0x0588…05b0 Head {h00=0x0024, h01=0x0020, text=» EXTRN DWTOR DWT INDEX AND ORDER«, t00=0x0003, t01=0x00dc}
0x05b0…05d2 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0003, t01=0x0104}
0x05d2…05f4 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0003, t01=0x0126}
0x05f4…0616 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0003, t01=0x0148}
0x0616…0640 Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0003, t01=0x016a}
0x0640…066e (4, 0, 398) Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x0004}
0x066e…0686 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0004, t01=0x0032}
0x0686…0690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004a}
0x0690…069a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0054}
0x069a…06c0 Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0004, t01=0x005e}
0x06c0…06e6 Head {h00=0x0022, h01=0x0050, text=»* CONSTANTS * «, t00=0x0004, t01=0x0084}
0x06e6…070c Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0004, t01=0x00aa}
0x070c…0716 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d0}
0x0716…0720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00da}
0x0720…0736 Head {h00=0x0012, h01=0x0050, text=»DWALP EQU /0F «, t00=0x0004, t01=0x00e4}
0x0736…0760 Head {h00=0x0026, h01=0x0050, text=»MUXLP EQU DWALP+DWALP MUX ADDRESS «, t00=0x0004, t01=0x00fa}
0x0760…076a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0124}
0x076a…0782 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0004, t01=0x012e}
0x0782…078c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0146}
0x078c…0796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0150}
0x0796…07c8 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0004, t01=0x015a}
0x07c8…07d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018c}
0x07d2…07f0 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0005, t01=0x0008}
0x07f0…07fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0026}
0x07fa…082c Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0005, t01=0x0030}
0x082c…0836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0062}
0x0836…086c Head {h00=0x0032, h01=0x0050, text=»* PROGRAMMED CHANNEL MAY BE USED INSTEAD OF«, t00=0x0005, t01=0x006c}
0x086c…089c Head {h00=0x002c, h01=0x0050, text=»* MULTIPLEX CHANNEL BY SETTING X:A=1 «, t00=0x0005, t01=0x00a2}
0x089c…08a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d2}
0x08a6…08b8 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0005, t01=0x00dc}
0x08b8…08ca Head {h00=0x000e, h01=0x0050, text=»CHAN EQU 0«, t00=0x0005, t01=0x00ee}
0x08ca…08d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0100}
0x08d4…0906 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x010a}
0x0906…0934 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0005, t01=0x013c}
0x0934…093e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x093e…0952 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0005, t01=0x0174}
0x0952…095c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0188}
0x095c…0966 (6, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x0966…09a0 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x000e}
0x09a0…09d2 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0006, t01=0x0048}
0x09d2…09dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007a}
0x09dc…09f0 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0006, t01=0x0084}
0x09f0…09fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0098}
0x09fa…0a16 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0006, t01=0x00a2}
0x0a16…0a20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00be}
0x0a20…0a32 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 67«, t00=0x0006, t01=0x00c8}
0x0a32…0a48 Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU 000«, t00=0x0006, t01=0x00da}
0x0a48…0a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f0}
0x0a52…0a6e Head {h00=0x0018, h01=0x0050, text=»* MMU DEVICE INDEX«, t00=0x0006, t01=0x00fa}
0x0a6e…0a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0116}
0x0a78…0a8a Head {h00=0x000e, h01=0x0050, text=»X:C EQU 2 «, t00=0x0006, t01=0x0120}
0x0a8a…0aba Head {h00=0x002c, h01=0x0050, text=»DEVIND EQU X:C LINE PRINTER DEVICE INDEX«, t00=0x0006, t01=0x0132}
0x0aba…0ac4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac4…0adc Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0006, t01=0x016c}
0x0adc…0ae6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0184}
0x0ae6…0af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018e}
0x0af0…0b10 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0007, t01=0x0008}
0x0b10…0b30 Head {h00=0x001c, h01=0x0050, text=»* ORDERS * «, t00=0x0007, t01=0x0028}
0x0b30…0b50 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0007, t01=0x0048}
0x0b50…0b5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0068}
0x0b5a…0b7e Head {h00=0x0020, h01=0x0050, text=»* ORDER /00: TEST STATUS.«, t00=0x0007, t01=0x0072}
0x0b7e…0bba Head {h00=0x0038, h01=0x0050, text=»* A TST INSTRUCTION IS EXECUTED TO SEE«, t00=0x0007, t01=0x0096}
0x0bba…0bee Head {h00=0x0030, h01=0x0050, text=»* IF LINE PRINTER IS OPERABLE.«, t00=0x0007, t01=0x00d2}
0x0bee…0bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0106}
0x0bf8…0c1c Head {h00=0x0020, h01=0x0050, text=»* ORDER /05: BASIC WRITE.«, t00=0x0007, t01=0x0110}
0x0c1c…0c26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0134}
0x0c26…0c64 Head {h00=0x003a, h01=0x0050, text=»* THE REQUESTED NUMBER OF CHARACTERS ARE«, t00=0x0007, t01=0x013e}
0x0c64…0ca8 Head {h00=0x0040, h01=0x0050, text=»* SENT TO THE LINE PRINTER WITHOUT ANY CHECK. «, t00=0x0007, t01=0x017c}
0x0ca8…0cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0030}
0x0cb2…0cda Head {h00=0x0024, h01=0x0050, text=»* ORDER /06: STANDARD WRITE. «, t00=0x0008, t01=0x003a}
0x0cda…0d1e Head {h00=0x0040, h01=0x0050, text=»* FIRST WORD IN ECB BUFFER CONTAINS A CONTROL «, t00=0x0008, t01=0x0062}
0x0d1e…0d40 Head {h00=0x001e, h01=0x0050, text=»* CHARACTER.«, t00=0x0008, t01=0x00a6}
0x0d40…0d80 Head {h00=0x003c, h01=0x0050, text=»* /2B: PRINT LINE WITHOUT ADVANCING PAPER «, t00=0x0008, t01=0x00c8}
0x0d80…0dbe Head {h00=0x003a, h01=0x0050, text=»* /30: ADVANCE TWO LINES BEFORE PRINTING«, t00=0x0008, t01=0x0108}
0x0dbe…0dfe Head {h00=0x003c, h01=0x0050, text=»* /31: SKIP TO TOP OF FORM BEFORE PRINTING«, t00=0x0008, t01=0x0146}
0x0dfe…0e40 Head {h00=0x003e, h01=0x0050, text=»* OTHER CHARACTERS GIVES A LINE FEED BEFORE «, t00=0x0008, t01=0x0186}
0x0e40…0e62 Head {h00=0x001e, h01=0x0050, text=»* PRINTING. «, t00=0x0009, t01=0x0038}
0x0e62…0e6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x005a}
0x0e6c…0e76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0064}
0x0e76…0eb8 Head {h00=0x003e, h01=0x0050, text=»* CHARACTERS IN BUFFER SHOULD BE WITHIN THE «, t00=0x0009, t01=0x006e}
0x0eb8…0efa Head {h00=0x003e, h01=0x0050, text=»* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT «, t00=0x0009, t01=0x00b0}
0x0efa…0f40 Head {h00=0x0042, h01=0x0050, text=»* BY DRIVER. AT THE END OF ECB BUFFER ONE BYTE «, t00=0x0009, t01=0x00f2}
0x0f40…0f82 Head {h00=0x003e, h01=0x0050, text=»* MUST BE RESERVED FOR THE DRIVER TO STORE A«, t00=0x0009, t01=0x0138}
0x0f82…0faa Head {h00=0x0024, h01=0x0050, text=»* PRINT CHARACTER.«, t00=0x0009, t01=0x017a}
0x0faa…0fb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0012}
0x0fb4…0fcc Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000a, t01=0x001c}
0x0fcc…0fd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0034}
0x0fd6…0fe0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003e}
0x0fe0…100c Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x000a, t01=0x0048}
0x100c…1038 Head {h00=0x0028, h01=0x0050, text=»* NORMAL REGISTER USAGE *«, t00=0x000a, t01=0x0074}
0x1038…1064 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x000a, t01=0x00a0}
0x1064…106e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00cc}
0x106e…1078 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d6}
0x1078…1096 Head {h00=0x001a, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x000a, t01=0x00e0}
0x1096…10b6 Head {h00=0x001c, h01=0x0050, text=»* A2 = WORK REGISTER «, t00=0x000a, t01=0x00fe}
0x10b6…10d6 Head {h00=0x001c, h01=0x0050, text=»* A3 = WORK REGISTER «, t00=0x000a, t01=0x011e}
0x10d6…10f6 Head {h00=0x001c, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x000a, t01=0x013e}
0x10f6…1112 Head {h00=0x0018, h01=0x0050, text=»* A5 = STACK BASE«, t00=0x000a, t01=0x015e}
0x1112…1130 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x000a, t01=0x017a}
0x1130…1148 Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x000b, t01=0x0008}
0x1148…1166 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB ADDRESS «, t00=0x000b, t01=0x0020}
0x1166…1170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003e}
0x1170…117a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0048}
0x117a…11a2 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000b, t01=0x0052}
0x11a2…11ca Head {h00=0x0024, h01=0x0050, text=»* TABLES *«, t00=0x000b, t01=0x007a}
0x11ca…11f2 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000b, t01=0x00a2}
0x11f2…11fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ca}
0x11fc…1206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00d4}
0x1206…1234 Head {h00=0x002a, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER LENGTH «, t00=0x000b, t01=0x00de}
0x1234…1256 Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x000b, t01=0x010c}
0x1256…1280 Head {h00=0x0026, h01=0x0050, text=»LPADR DATA ACLP ACTIVATION DRIVER «, t00=0x000b, t01=0x012e}
0x1280…12a6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000b, t01=0x0158}
0x12a6…12b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017e}
0x12b0…12c8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000b, t01=0x0188}
0x12c8…12d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0010}
0x12d2…12dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001a}
0x12dc…12fc Head {h00=0x001c, h01=0x0050, text=»* A C T I V A T I O N«, t00=0x000c, t01=0x0024}
0x12fc…1306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0044}
0x1306…1310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004e}
0x1310…1322 Head {h00=0x000e, h01=0x0050, text=»ACLP EQU *«, t00=0x000c, t01=0x0058}
0x1322…1346 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/0D CARRIAGE RETURN «, t00=0x000c, t01=0x006a}
0x1346…1362 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0 ?«, t00=0x000c, t01=0x008e}
0x1362…137c Head {h00=0x0016, h01=0x0050, text=» RF(NE) ACLP05 NO «, t00=0x000c, t01=0x00aa}
0x137c…13a0 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTBC BYTE COUNTER «, t00=0x000c, t01=0x00c4}
0x13a0…13c2 Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT ADDRESS«, t00=0x000c, t01=0x00e8}
0x13c2…13ea Head {h00=0x0024, h01=0x0050, text=» SCR A1,A4 STORE CARRIAGE RETURN«, t00=0x000c, t01=0x010a}
0x13ea…13fc Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x000c, t01=0x0132}
0x13fc…140e Head {h00=0x000e, h01=0x0050, text=» RF ACLP30«, t00=0x000c, t01=0x0144}
0x140e…1418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0156}
0x1418…1440 Head {h00=0x0024, h01=0x0050, text=»ACLP05 LD A4,2,A8 BUFFER ADDRESS«, t00=0x000c, t01=0x0160}
0x1440…1460 Head {h00=0x001c, h01=0x0050, text=» LD A2,4,A8 REQ. LENGTH «, t00=0x000c, t01=0x0188}
0x1460…147c Head {h00=0x0018, h01=0x0050, text=» SUK A7,5 ORDER 5 ? «, t00=0x000d, t01=0x0018}
0x147c…1492 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACLP30 «, t00=0x000d, t01=0x0034}
0x1492…14ae Head {h00=0x0018, h01=0x0050, text=» SUK A7,1 ORDER 6 ? «, t00=0x000d, t01=0x004a}
0x14ae…14c4 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACLP10 «, t00=0x000d, t01=0x0066}
0x14c4…14ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007c}
0x14ce…14e6 Head {h00=0x0014, h01=0x0050, text=»ACERR ABL DISIOE«, t00=0x000d, t01=0x0086}
0x14e6…14f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x009e}
0x14f0…1508 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000d, t01=0x00a8}
0x1508…1512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c0}
0x1512…151c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ca}
0x151c…1530 Head {h00=0x0010, h01=0x0050, text=»ACLP10 EQU *«, t00=0x000d, t01=0x00d4}
0x1530…1554 Head {h00=0x0020, h01=0x0050, text=» CWK A2,2 REQ. LENGTH < 2 ? «, t00=0x000d, t01=0x00e8}
0x1554…156e Head {h00=0x0016, h01=0x0050, text=» RF(NL) ACLP12 NO «, t00=0x000d, t01=0x010c}
0x156e…15a8 Head {h00=0x0036, h01=0x0050, text=» LDK A2,2 YES , SAME ACTIONS AS FOR REQ. LENGTH=2 «, t00=0x000d, t01=0x0126}
0x15a8…15b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0160}
0x15b2…15c6 Head {h00=0x0010, h01=0x0050, text=»ACLP12 EQU *«, t00=0x000d, t01=0x016a}
0x15c6…15e8 Head {h00=0x001e, h01=0x0050, text=» LDR A3,A4 BUFFER ADDRESS «, t00=0x000d, t01=0x017e}
0x15e8…1612 Head {h00=0x0026, h01=0x0050, text=» ADR A3,A2 ADDED WITH REQ. LENGTH «, t00=0x000e, t01=0x0010}
0x1612…163a Head {h00=0x0024, h01=0x0050, text=» SCR A1,A3 STORE PRINT CHARACTER«, t00=0x000e, t01=0x003a}
0x163a…164c Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x000e, t01=0x0062}
0x164c…165e Head {h00=0x000e, h01=0x0050, text=» LCR A3,A4«, t00=0x000e, t01=0x0074}
0x165e…1670 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x000e, t01=0x0086}
0x1670…169a Head {h00=0x0026, h01=0x0050, text=» LC A3,1,A4 GET CONTROL CHARACTER «, t00=0x000e, t01=0x0098}
0x169a…16b0 Head {h00=0x0012, h01=0x0050, text=» ST A3,CONCHA «, t00=0x000e, t01=0x00c2}
0x16b0…16c4 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x000e, t01=0x00d8}
0x16c4…16ec Head {h00=0x0024, h01=0x0050, text=» SUK A3,/2B SUPER POSITIONING ? «, t00=0x000e, t01=0x00ec}
0x16ec…1706 Head {h00=0x0016, h01=0x0050, text=» RF(NE) ACLP15 NO «, t00=0x000e, t01=0x0114}
0x1706…172e Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT REQ. LENGTH «, t00=0x000e, t01=0x012e}
0x172e…1758 Head {h00=0x0026, h01=0x0050, text=» ADK A4,2 INCREMENT BUFFER ADDRESS«, t00=0x000e, t01=0x0156}
0x1758…176a Head {h00=0x000e, h01=0x0050, text=» RF ACLP30«, t00=0x000e, t01=0x0180}
0x176a…1774 (15, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0004}
0x1774…1798 Head {h00=0x0020, h01=0x0050, text=»ACLP15 LDK A1,/0A LINE FEED «, t00=0x000f, t01=0x000e}
0x1798…17c6 Head {h00=0x002a, h01=0x0050, text=» SC A1,1,A4 SECOND CHARACTER IN BUFFER«, t00=0x000f, t01=0x0032}
0x17c6…17e8 Head {h00=0x001e, h01=0x0050, text=» SUK A3,5 TWO LINE FEEDS ?«, t00=0x000f, t01=0x0060}
0x17e8…1802 Head {h00=0x0016, h01=0x0050, text=» RF(E) ACLP20 YES «, t00=0x000f, t01=0x0082}
0x1802…1822 Head {h00=0x001c, h01=0x0050, text=» LDK A1,/0C TOP OF FORM «, t00=0x000f, t01=0x009c}
0x1822…183c Head {h00=0x0016, h01=0x0050, text=» SUK A3,1 WANTED ?«, t00=0x000f, t01=0x00bc}
0x183c…1856 Head {h00=0x0016, h01=0x0050, text=» RF(E) ACLP20 YES «, t00=0x000f, t01=0x00d6}
0x1856…187a Head {h00=0x0020, h01=0x0050, text=» LDK A1,/0D CARRIAGE RETURN «, t00=0x000f, t01=0x00f0}
0x187a…1884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0114}
0x1884…189c Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000f, t01=0x011e}
0x189c…18a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0136}
0x18a6…18b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0140}
0x18b0…18e8 Head {h00=0x0034, h01=0x0050, text=»ACLP20 SCR A1,A4 STORE FIRST CHARACTER IN BUFFER«, t00=0x000f, t01=0x014a}
0x18e8…1910 Head {h00=0x0024, h01=0x0050, text=»ACLP30 CF A5,CIOSTA SEND BUFFER «, t00=0x000f, t01=0x0182}
0x1910…192c Head {h00=0x0018, h01=0x0050, text=» SUK A7,6 ORDER 6 ? «, t00=0x0010, t01=0x001a}
0x192c…1942 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ENDIO «, t00=0x0010, t01=0x0036}
0x1942…1954 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0010, t01=0x004c}
0x1954…196a Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACLP35«, t00=0x0010, t01=0x005e}
0x196a…19a2 Head {h00=0x0034, h01=0x0050, text=» IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D)«, t00=0x0010, t01=0x0074}
0x19a2…19ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ac}
0x19ac…19c0 Head {h00=0x0010, h01=0x0050, text=»ACLP35 EQU *«, t00=0x0010, t01=0x00b6}
0x19c0…19e2 Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0010, t01=0x00ca}
0x19e2…19f4 Head {h00=0x000e, h01=0x0050, text=» LDKL A3,0«, t00=0x0010, t01=0x00ec}
0x19f4…1a0a Head {h00=0x0012, h01=0x0050, text=»CONCHA EQU *-2«, t00=0x0010, t01=0x00fe}
0x1a0a…1a40 Head {h00=0x0032, h01=0x0050, text=» SC A3,1,A4 RESET CONTROL CHARACTER IN BUFFER «, t00=0x0010, t01=0x0114}
0x1a40…1a52 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0010, t01=0x014a}
0x1a52…1a7a Head {h00=0x0024, h01=0x0050, text=» SCR A3,A4 ALSO RESET FIRST BYTE«, t00=0x0010, t01=0x015c}
0x1a7a…1a84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0184}
0x1a84…1aac Head {h00=0x0024, h01=0x0050, text=»ENDIO CF A15,TENDIO END REQUEST «, t00=0x0010, t01=0x018e}
0x1aac…1ac2 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0011, t01=0x0026}
0x1ac2…1acc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x003c}
0x1acc…1ae4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0011, t01=0x0046}
0x1ae4…1aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x005e}
0x1aee…1af8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0068}
0x1af8…1b0c Head {h00=0x0010, h01=0x0050, text=»* CIOSTA «, t00=0x0011, t01=0x0072}
0x1b0c…1b32 Head {h00=0x0022, h01=0x0050, text=»* SUBROUTINE TO SEND BUFFER«, t00=0x0011, t01=0x0086}
0x1b32…1b3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ac}
0x1b3c…1b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b6}
0x1b46…1b5a Head {h00=0x0010, h01=0x0050, text=»CIOSTA EQU *«, t00=0x0011, t01=0x00c0}
0x1b5a…1b7a Head {h00=0x001c, h01=0x0050, text=» ST A5,DWTA5,A6 SAVE A5 «, t00=0x0011, t01=0x00d4}
0x1b7a…1b8e Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0011, t01=0x00f4}
0x1b8e…1bc8 Head {h00=0x0036, h01=0x0050, text=» ORKL A2,/4000 INDICATE CHARACTER MODE, OUTPUT AND«, t00=0x0011, t01=0x0108}
0x1bc8…1bea Head {h00=0x001e, h01=0x0050, text=» IN RIGHT BYTE NUMBER OF«, t00=0x0011, t01=0x0142}
0x1bea…1c08 Head {h00=0x001a, h01=0x0050, text=» CHARACTERS TO SEND «, t00=0x0011, t01=0x0164}
0x1c08…1c3c Head {h00=0x0030, h01=0x0050, text=» WER A2,MUXLP FIRST WRITE EXTERNAL REGISTER «, t00=0x0011, t01=0x0182}
0x1c3c…1c72 Head {h00=0x0032, h01=0x0050, text=» WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER«, t00=0x0012, t01=0x0026}
0x1c72…1c7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x005c}
0x1c7e…1c88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0068}
0x1c88…1c9c Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=1 «, t00=0x0012, t01=0x0072}
0x1c9c…1cc8 Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTA3,A6 SAVE BUFFER ADDRESS «, t00=0x0012, t01=0x0086}
0x1cc8…1cda Head {h00=0x000e, h01=0x0050, text=» ADR A4,A2«, t00=0x0012, t01=0x00b2}
0x1cda…1d0c Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 «, t00=0x0012, t01=0x00c4}
0x1d0c…1d18 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00f6}
0x1d18…1d22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0102}
0x1d22…1d44 Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,DWALP CIO START «, t00=0x0012, t01=0x010c}
0x1d44…1d64 Head {h00=0x001c, h01=0x0050, text=» RB(Z) EXIT ACCEPTED =1 «, t00=0x0012, t01=0x012e}
0x1d64…1d7c Head {h00=0x0014, h01=0x0050, text=» LDK A1,1 ERROR «, t00=0x0012, t01=0x014e}
0x1d7c…1d8e Head {h00=0x000e, h01=0x0050, text=» RB ENDIO «, t00=0x0012, t01=0x0166}
0x1d8e…1d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0178}
0x1d98…1db0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0012, t01=0x0182}
0x1db0…1dba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000a}
0x1dba…1dc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0014}
0x1dc4…1de2 Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINE «, t00=0x0013, t01=0x001e}
0x1de2…1dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003c}
0x1dec…1df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0046}
0x1df6…1e08 Head {h00=0x000e, h01=0x0050, text=»LPON EQU *«, t00=0x0013, t01=0x0050}
0x1e08…1e1e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0013, t01=0x0062}
0x1e1e…1e48 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0013, t01=0x0078}
0x1e48…1e54 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00a2}
0x1e54…1e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ae}
0x1e5e…1e74 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0013, t01=0x00b8}
0x1e74…1e9a Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0013, t01=0x00ce}
0x1e9a…1ea6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00f4}
0x1ea6…1eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0100}
0x1eb0…1ece Head {h00=0x001a, h01=0x0050, text=» LDK A1,1 NOT OPERABLE«, t00=0x0013, t01=0x010a}
0x1ece…1ef2 Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DWLP01 DWT ADDRESS «, t00=0x0013, t01=0x0128}
0x1ef2…1f14 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x0013, t01=0x014c}
0x1f14…1f30 Head {h00=0x0018, h01=0x0050, text=» RB(N) EXIT LP FREE «, t00=0x0013, t01=0x016e}
0x1f30…1f42 Head {h00=0x000e, h01=0x0050, text=» RF IHLP30«, t00=0x0013, t01=0x018a}
0x1f42…1f4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x000c}
0x1f4c…1f64 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0014, t01=0x0016}
0x1f64…1f6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002e}
0x1f6e…1f78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0038}
0x1f78…1f96 Head {h00=0x001a, h01=0x0050, text=»* I N T E R R U P T«, t00=0x0014, t01=0x0042}
0x1f96…1fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0060}
0x1fa0…1faa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006a}
0x1faa…1fbc Head {h00=0x000e, h01=0x0050, text=»IHLP EQU *«, t00=0x0014, t01=0x0074}
0x1fbc…1fe4 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0014, t01=0x0086}
0x1fe4…1ff8 Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0014, t01=0x00ae}
0x1ff8…200e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0014, t01=0x00c2}
0x200e…2038 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0014, t01=0x00d8}
0x2038…2044 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0102}
0x2044…204e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x010e}
0x204e…2062 Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0014, t01=0x0118}
0x2062…2078 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0014, t01=0x012c}
0x2078…209e Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0014, t01=0x0142}
0x209e…20aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0168}
0x20aa…20b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0174}
0x20b4…20c8 Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=1 «, t00=0x0014, t01=0x017e}
0x20c8…20dc (21, 0, 400) Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x0015, t01=0x0004}
0x20dc…20f0 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x0015, t01=0x0018}
0x20f0…2114 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,DWLP01 DWT-ADDRESS «, t00=0x0015, t01=0x002c}
0x2114…214a Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER«, t00=0x0015, t01=0x0050}
0x214a…2166 Head {h00=0x0018, h01=0x0050, text=» LCR A2,A1 NEXT BYTE«, t00=0x0015, t01=0x0086}
0x2166…218c Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,DWALP WRITE ONE BYTE«, t00=0x0015, t01=0x00a2}
0x218c…21b0 Head {h00=0x0020, h01=0x0050, text=» RF(NA) IHLP20 NOT ACCEPTED «, t00=0x0015, t01=0x00c8}
0x21b0…21d4 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,DWLP01 DWT-ADDRESS «, t00=0x0015, t01=0x00ec}
0x21d4…21e6 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0015, t01=0x0110}
0x21e6…220c Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTA3,A2 UPDATE POINTER«, t00=0x0015, t01=0x0122}
0x220c…2224 Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTA4,A2 «, t00=0x0015, t01=0x0148}
0x2224…2248 Head {h00=0x0020, h01=0x0050, text=» RF(NE) IHLP10 NOT LAST BYTE«, t00=0x0015, t01=0x0160}
0x2248…2268 Head {h00=0x001c, h01=0x0050, text=» CIO A2,0,DWALP CIO HALT«, t00=0x0015, t01=0x0184}
0x2268…227c Head {h00=0x0010, h01=0x0050, text=»IHLP10 EQU *«, t00=0x0016, t01=0x0014}
0x227c…2290 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0016, t01=0x0028}
0x2290…22a4 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0016, t01=0x003c}
0x22a4…22b4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0016, t01=0x0050}
0x22b4…22be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x22be…22c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006a}
0x22c8…22d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0074}
0x22d2…22ec Head {h00=0x0016, h01=0x0050, text=»IHLP20 STR A3,A15 «, t00=0x0016, t01=0x007e}
0x22ec…2300 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0016, t01=0x0098}
0x2300…2314 Head {h00=0x0010, h01=0x0050, text=» STR A5,A15 «, t00=0x0016, t01=0x00ac}
0x2314…2328 Head {h00=0x0010, h01=0x0050, text=» STR A6,A15 «, t00=0x0016, t01=0x00c0}
0x2328…233c Head {h00=0x0010, h01=0x0050, text=» STR A7,A15 «, t00=0x0016, t01=0x00d4}
0x233c…2350 Head {h00=0x0010, h01=0x0050, text=» STR A8,A15 «, t00=0x0016, t01=0x00e8}
0x2350…235c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00fc}
0x235c…2366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0108}
0x2366…2386 Head {h00=0x001c, h01=0x0050, text=» SST A1,DWALP GET STATUS«, t00=0x0016, t01=0x0112}
0x2386…23aa Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DWLP01 DWT ADDRESS «, t00=0x0016, t01=0x0132}
0x23aa…23b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0156}
0x23b4…23c8 Head {h00=0x0010, h01=0x0050, text=»IHLP30 EQU *«, t00=0x0016, t01=0x0160}
0x23c8…23e6 Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTOR,A6 ORDER «, t00=0x0016, t01=0x0174}
0x23e6…23fa (23, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0017, t01=0x0004}
0x23fa…241e Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0017, t01=0x0018}
0x241e…2428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003c}
0x2428…243c Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0017, t01=0x0046}
0x243c…2474 Head {h00=0x0034, h01=0x0050, text=» RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR.«, t00=0x0017, t01=0x005a}
0x2474…248a Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFF «, t00=0x0017, t01=0x0092}
0x248a…24c6 Head {h00=0x0038, h01=0x0050, text=» LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS«, t00=0x0017, t01=0x00a8}
0x24c6…24d8 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A3«, t00=0x0017, t01=0x00e4}
0x24d8…24e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00f6}
0x24e4…24ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0102}
0x24ee…2506 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0017, t01=0x010c}
0x2506…2510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0124}
0x2510…251a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012e}
0x251a…252e Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=1 «, t00=0x0017, t01=0x0138}
0x252e…2558 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTA3,A6 GET BUFFER-POINTER«, t00=0x0017, t01=0x014c}
0x2558…2572 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x0017, t01=0x0176}
0x2572…2588 Head {h00=0x0012, h01=0x0050, text=» RF(NE) IHLP35«, t00=0x0017, t01=0x0190}
0x2588…259e Head {h00=0x0012, h01=0x0050, text=» ADK A2,1 YES «, t00=0x0018, t01=0x0016}
0x259e…25b2 Head {h00=0x0010, h01=0x0050, text=»IHLP35 EQU *«, t00=0x0018, t01=0x002c}
0x25b2…25ee Head {h00=0x0038, h01=0x0050, text=» SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS«, t00=0x0018, t01=0x0040}
0x25ee…25fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x007c}
0x25fa…2620 Head {h00=0x0022, h01=0x0050, text=» ST A2,6,A8 STORE EFF. LENGTH «, t00=0x0018, t01=0x0088}
0x2620…2648 Head {h00=0x0024, h01=0x0050, text=» LD A5,DWTA5,A6 GET STACK VALUE «, t00=0x0018, t01=0x00ae}
0x2648…2658 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0018, t01=0x00d6}
0x2658…2662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e6}
0x2662…267a Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0018, t01=0x00f0}
0x267a…2684 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0108}
0x2684…269c Head {h00=0x0014, h01=0x0050, text=»* D W L P 0 1«, t00=0x0018, t01=0x0112}
0x269c…26a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x012a}
0x26a6…26d6 Head {h00=0x002c, h01=0x0050, text=»* DEVICE WORK TABLE FOR LINE PRINTER «, t00=0x0018, t01=0x0134}
0x26d6…26e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0164}
0x26e0…26f4 Head {h00=0x0010, h01=0x0050, text=»DWLP01 EQU *«, t00=0x0018, t01=0x016e}
0x26f4…2716 Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0018, t01=0x0182}
0x2716…2730 Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x0019, t01=0x0014}
0x2730…274c Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0019, t01=0x002e}
0x274c…2762 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0019, t01=0x004a}
0x2762…278e Head {h00=0x0028, h01=0x0050, text=» DATA LPADR ADDRESS TO ADDRESS BLOCK«, t00=0x0019, t01=0x0060}
0x278e…27aa Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0019, t01=0x008c}
0x27aa…27d2 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0019, t01=0x00a8}
0x27d2…27f0 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0019, t01=0x00d0}
0x27f0…2806 Head {h00=0x0012, h01=0x000d, text=» IFT MMUPAG=1 «, t00=0x0019, t01=0x00ee}
0x2806…2830 Head {h00=0x0026, h01=0x0022, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0019, t01=0x0104}
0x2830…2854 Head {h00=0x0020, h01=0x001c, text=» DATA DEVECB MMU ECB ADDRESS«, t00=0x0019, t01=0x012e}
0x2854…2860 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0019, t01=0x0152}
0x2860…2882 Head {h00=0x001e, h01=0x0050, text=» DATA 0 OUTPUT QUEUE LINK «, t00=0x0019, t01=0x015e}
0x2882…28a2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A3«, t00=0x0019, t01=0x0180}
0x28a2…28c2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A4«, t00=0x001a, t01=0x0010}
0x28c2…28e2 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A5«, t00=0x001a, t01=0x0030}
0x28e2…28fa Head {h00=0x0014, h01=0x0050, text=» RES 4 DWT STACK«, t00=0x001a, t01=0x0050}
0x28fa…2904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0068}
0x2904…291a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001a, t01=0x0072}
0x291a…292e Head {h00=0x0010, h01=0x0050, text=»DEVECB EQU *«, t00=0x001a, t01=0x0088}
0x292e…293e Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x001a, t01=0x009c}
0x293e…2952 Head {h00=0x0010, h01=0x0050, text=» DATA LP:BUF«, t00=0x001a, t01=0x00ac}
0x2952…2968 Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,0,0 «, t00=0x001a, t01=0x00c0}
0x2968…2984 Head {h00=0x0018, h01=0x0050, text=»LP:BUF RES DVBLEN+1 «, t00=0x001a, t01=0x00d6}
0x2984…2990 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00f2}
0x2990…299a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00fe}
0x299a…29a6 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001a, t01=0x0108}
0x29a6…29aa Head {h00=0x4004, h01=0x0000}
0x29aa…29ae 00 1a 01 14 ┆ ┆
0x29ae…29b6 (27, 1, 8) 20 04 00 00 00 1b 00 04 ┆ ┆
0x29b6…2a06 (28, 0, 400) 36 31 39 2c 2f 31 43 31 46 2c 2f 31 32 31 35 2c 2f 31 38 31 42 2c 2f 31 45 31 31 2c 2f 31 34 31 37 2c 2f 31 41 31 44 20 00 0b 01 82 00 06 00 50 2a 20 00 0c 00 30 00 1c 00 50 5c 45 4a 45 43 54 5c 5c 5c 44 52 44 55 30 31 5c 5c 5c 44 52 44 55 ┆619,/1C1F,/1215,/181B,/1E11,/1417,/1A1D P* 0 P EJECT DRDU01 DRDU┆
0x2a06…2a56 30 31 00 0c 00 3a 00 06 00 50 2a 20 00 0c 00 5a 00 06 00 50 2a 20 00 0c 00 64 00 16 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0c 00 6e 00 16 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 0c 00 88 00 16 ┆01 : P* Z P* d P***************** n P* * ┆
0x2a56…2aa6 00 50 2a 20 20 41 43 54 49 56 41 54 49 4f 4e 20 20 20 2a 20 00 0c 00 a2 00 16 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 0c 00 bc 00 16 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0c 00 d6 00 06 00 50 ┆ P* ACTIVATION * P* * P***************** P┆
0x2aa6…2af6 2a 20 00 0c 00 f0 00 06 00 50 2a 20 00 0c 00 fa 00 20 00 50 44 55 41 44 5c 45 51 55 5c 2a 5c 41 43 54 49 56 41 54 49 4f 4e 20 45 4e 54 52 59 20 00 0c 01 04 00 12 00 50 5c 49 46 54 5c 4e 55 4e 49 54 53 3d 32 20 00 0c 01 28 00 12 00 50 5c 4c ┆* P* PDUAD EQU * ACTIVATION ENTRY P IFT NUNITS=2 ( P L┆
0x2af6…2b46 44 4b 4c 5c 41 31 2c 2f 37 46 46 46 00 0c 01 3e 00 28 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 36 5c 47 45 54 20 4f 54 48 45 52 20 44 49 53 43 20 55 4e 49 54 20 44 57 54 20 00 0c 01 54 00 2e 00 50 5c 41 4e 53 5c 41 31 2c 44 57 54 53 54 2c 41 32 ┆DKL A1,/7FFF > ( P LDR* A2,A6 GET OTHER DISC UNIT DWT T . P ANS A1,DWTST,A2┆