|
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: 11080 (0x2b48)
Notes: pts_type(SC)
Names: »DRLP01.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/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 X:A * * 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 X:B * * 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…08cc Head {h00=0x0010, h01=0x0050, text=»CHAN EQU X:A«, t00=0x0005, t01=0x00ee}
0x08cc…08d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0102}
0x08d6…0908 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x010c}
0x0908…0936 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0005, t01=0x013e}
0x0936…0940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016c}
0x0940…0954 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0005, t01=0x0176}
0x0954…095e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018a}
0x095e…0968 (6, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0004}
0x0968…09a2 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x000e}
0x09a2…09d4 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0006, t01=0x0048}
0x09d4…09de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007a}
0x09de…09f2 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0006, t01=0x0084}
0x09f2…09fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0098}
0x09fc…0a18 Head {h00=0x0018, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0006, t01=0x00a2}
0x0a18…0a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00be}
0x0a22…0a34 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 67«, t00=0x0006, t01=0x00c8}
0x0a34…0a4a Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:B«, t00=0x0006, t01=0x00da}
0x0a4a…0a54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f0}
0x0a54…0a70 Head {h00=0x0018, h01=0x0050, text=»* MMU DEVICE INDEX«, t00=0x0006, t01=0x00fa}
0x0a70…0a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0116}
0x0a7a…0a8c Head {h00=0x000e, h01=0x0050, text=»X:C EQU 2 «, t00=0x0006, t01=0x0120}
0x0a8c…0abc Head {h00=0x002c, h01=0x0050, text=»DEVIND EQU X:C LINE PRINTER DEVICE INDEX«, t00=0x0006, t01=0x0132}
0x0abc…0ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac6…0ade Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0006, t01=0x016c}
0x0ade…0ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0184}
0x0ae8…0af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018e}
0x0af2…0b12 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0007, t01=0x0008}
0x0b12…0b32 Head {h00=0x001c, h01=0x0050, text=»* ORDERS * «, t00=0x0007, t01=0x0028}
0x0b32…0b52 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0007, t01=0x0048}
0x0b52…0b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0068}
0x0b5c…0b80 Head {h00=0x0020, h01=0x0050, text=»* ORDER /00: TEST STATUS.«, t00=0x0007, t01=0x0072}
0x0b80…0bbc Head {h00=0x0038, h01=0x0050, text=»* A TST INSTRUCTION IS EXECUTED TO SEE«, t00=0x0007, t01=0x0096}
0x0bbc…0bf0 Head {h00=0x0030, h01=0x0050, text=»* IF LINE PRINTER IS OPERABLE.«, t00=0x0007, t01=0x00d2}
0x0bf0…0bfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0106}
0x0bfa…0c1e Head {h00=0x0020, h01=0x0050, text=»* ORDER /05: BASIC WRITE.«, t00=0x0007, t01=0x0110}
0x0c1e…0c28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0134}
0x0c28…0c66 Head {h00=0x003a, h01=0x0050, text=»* THE REQUESTED NUMBER OF CHARACTERS ARE«, t00=0x0007, t01=0x013e}
0x0c66…0caa Head {h00=0x0040, h01=0x0050, text=»* SENT TO THE LINE PRINTER WITHOUT ANY CHECK. «, t00=0x0007, t01=0x017c}
0x0caa…0cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0030}
0x0cb4…0cdc Head {h00=0x0024, h01=0x0050, text=»* ORDER /06: STANDARD WRITE. «, t00=0x0008, t01=0x003a}
0x0cdc…0d20 Head {h00=0x0040, h01=0x0050, text=»* FIRST WORD IN ECB BUFFER CONTAINS A CONTROL «, t00=0x0008, t01=0x0062}
0x0d20…0d42 Head {h00=0x001e, h01=0x0050, text=»* CHARACTER.«, t00=0x0008, t01=0x00a6}
0x0d42…0d82 Head {h00=0x003c, h01=0x0050, text=»* /2B: PRINT LINE WITHOUT ADVANCING PAPER «, t00=0x0008, t01=0x00c8}
0x0d82…0dc0 Head {h00=0x003a, h01=0x0050, text=»* /30: ADVANCE TWO LINES BEFORE PRINTING«, t00=0x0008, t01=0x0108}
0x0dc0…0e00 Head {h00=0x003c, h01=0x0050, text=»* /31: SKIP TO TOP OF FORM BEFORE PRINTING«, t00=0x0008, t01=0x0146}
0x0e00…0e42 Head {h00=0x003e, h01=0x0050, text=»* OTHER CHARACTERS GIVES A LINE FEED BEFORE «, t00=0x0008, t01=0x0186}
0x0e42…0e64 Head {h00=0x001e, h01=0x0050, text=»* PRINTING. «, t00=0x0009, t01=0x0038}
0x0e64…0e6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x005a}
0x0e6e…0e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0064}
0x0e78…0eba Head {h00=0x003e, h01=0x0050, text=»* CHARACTERS IN BUFFER SHOULD BE WITHIN THE «, t00=0x0009, t01=0x006e}
0x0eba…0efc Head {h00=0x003e, h01=0x0050, text=»* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT «, t00=0x0009, t01=0x00b0}
0x0efc…0f42 Head {h00=0x0042, h01=0x0050, text=»* BY DRIVER. AT THE END OF ECB BUFFER ONE BYTE «, t00=0x0009, t01=0x00f2}
0x0f42…0f84 Head {h00=0x003e, h01=0x0050, text=»* MUST BE RESERVED FOR THE DRIVER TO STORE A«, t00=0x0009, t01=0x0138}
0x0f84…0fac Head {h00=0x0024, h01=0x0050, text=»* PRINT CHARACTER.«, t00=0x0009, t01=0x017a}
0x0fac…0fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0012}
0x0fb6…0fce Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000a, t01=0x001c}
0x0fce…0fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0034}
0x0fd8…0fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003e}
0x0fe2…100e Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x000a, t01=0x0048}
0x100e…103a Head {h00=0x0028, h01=0x0050, text=»* NORMAL REGISTER USAGE *«, t00=0x000a, t01=0x0074}
0x103a…1066 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x000a, t01=0x00a0}
0x1066…1070 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00cc}
0x1070…107a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d6}
0x107a…1098 Head {h00=0x001a, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x000a, t01=0x00e0}
0x1098…10b8 Head {h00=0x001c, h01=0x0050, text=»* A2 = WORK REGISTER «, t00=0x000a, t01=0x00fe}
0x10b8…10d8 Head {h00=0x001c, h01=0x0050, text=»* A3 = WORK REGISTER «, t00=0x000a, t01=0x011e}
0x10d8…10f8 Head {h00=0x001c, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x000a, t01=0x013e}
0x10f8…1114 Head {h00=0x0018, h01=0x0050, text=»* A5 = STACK BASE«, t00=0x000a, t01=0x015e}
0x1114…1132 Head {h00=0x001a, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x000a, t01=0x017a}
0x1132…114a Head {h00=0x0014, h01=0x0050, text=»* A7 = ORDER «, t00=0x000b, t01=0x0008}
0x114a…1168 Head {h00=0x001a, h01=0x0050, text=»* A8 = ECB ADDRESS «, t00=0x000b, t01=0x0020}
0x1168…1172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003e}
0x1172…117c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0048}
0x117c…11a4 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000b, t01=0x0052}
0x11a4…11cc Head {h00=0x0024, h01=0x0050, text=»* TABLES *«, t00=0x000b, t01=0x007a}
0x11cc…11f4 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x000b, t01=0x00a2}
0x11f4…11fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ca}
0x11fe…1208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00d4}
0x1208…1236 Head {h00=0x002a, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER LENGTH «, t00=0x000b, t01=0x00de}
0x1236…1258 Head {h00=0x001e, h01=0x0050, text=» DATA DEVIND DEVICE INDEX «, t00=0x000b, t01=0x010c}
0x1258…1282 Head {h00=0x0026, h01=0x0050, text=»LPADR DATA ACLP ACTIVATION DRIVER «, t00=0x000b, t01=0x012e}
0x1282…12a8 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000b, t01=0x0158}
0x12a8…12b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017e}
0x12b2…12ca Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000b, t01=0x0188}
0x12ca…12d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0010}
0x12d4…12de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001a}
0x12de…12fe Head {h00=0x001c, h01=0x0050, text=»* A C T I V A T I O N«, t00=0x000c, t01=0x0024}
0x12fe…1308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0044}
0x1308…1312 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004e}
0x1312…1324 Head {h00=0x000e, h01=0x0050, text=»ACLP EQU *«, t00=0x000c, t01=0x0058}
0x1324…1348 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/0D CARRIAGE RETURN «, t00=0x000c, t01=0x006a}
0x1348…1364 Head {h00=0x0018, h01=0x0050, text=» LDR A7,A7 ORDER 0 ?«, t00=0x000c, t01=0x008e}
0x1364…137e Head {h00=0x0016, h01=0x0050, text=» RF(NE) ACLP05 NO «, t00=0x000c, t01=0x00aa}
0x137e…13a2 Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTBC BYTE COUNTER «, t00=0x000c, t01=0x00c4}
0x13a2…13c4 Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT ADDRESS«, t00=0x000c, t01=0x00e8}
0x13c4…13ec Head {h00=0x0024, h01=0x0050, text=» SCR A1,A4 STORE CARRIAGE RETURN«, t00=0x000c, t01=0x010a}
0x13ec…13fe Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x000c, t01=0x0132}
0x13fe…1410 Head {h00=0x000e, h01=0x0050, text=» RF ACLP30«, t00=0x000c, t01=0x0144}
0x1410…141a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0156}
0x141a…1442 Head {h00=0x0024, h01=0x0050, text=»ACLP05 LD A4,2,A8 BUFFER ADDRESS«, t00=0x000c, t01=0x0160}
0x1442…1462 Head {h00=0x001c, h01=0x0050, text=» LD A2,4,A8 REQ. LENGTH «, t00=0x000c, t01=0x0188}
0x1462…147e Head {h00=0x0018, h01=0x0050, text=» SUK A7,5 ORDER 5 ? «, t00=0x000d, t01=0x0018}
0x147e…1494 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACLP30 «, t00=0x000d, t01=0x0034}
0x1494…14b0 Head {h00=0x0018, h01=0x0050, text=» SUK A7,1 ORDER 6 ? «, t00=0x000d, t01=0x004a}
0x14b0…14c6 Head {h00=0x0012, h01=0x0050, text=» RF(E) ACLP10 «, t00=0x000d, t01=0x0066}
0x14c6…14d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007c}
0x14d0…14e8 Head {h00=0x0014, h01=0x0050, text=»ACERR ABL DISIOE«, t00=0x000d, t01=0x0086}
0x14e8…14f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x009e}
0x14f2…150a Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000d, t01=0x00a8}
0x150a…1514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c0}
0x1514…151e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ca}
0x151e…1532 Head {h00=0x0010, h01=0x0050, text=»ACLP10 EQU *«, t00=0x000d, t01=0x00d4}
0x1532…1556 Head {h00=0x0020, h01=0x0050, text=» CWK A2,2 REQ. LENGTH < 2 ? «, t00=0x000d, t01=0x00e8}
0x1556…1570 Head {h00=0x0016, h01=0x0050, text=» RF(NL) ACLP12 NO «, t00=0x000d, t01=0x010c}
0x1570…15aa Head {h00=0x0036, h01=0x0050, text=» LDK A2,2 YES , SAME ACTIONS AS FOR REQ. LENGTH=2 «, t00=0x000d, t01=0x0126}
0x15aa…15b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0160}
0x15b4…15c8 Head {h00=0x0010, h01=0x0050, text=»ACLP12 EQU *«, t00=0x000d, t01=0x016a}
0x15c8…15ea Head {h00=0x001e, h01=0x0050, text=» LDR A3,A4 BUFFER ADDRESS «, t00=0x000d, t01=0x017e}
0x15ea…1614 Head {h00=0x0026, h01=0x0050, text=» ADR A3,A2 ADDED WITH REQ. LENGTH «, t00=0x000e, t01=0x0010}
0x1614…163c Head {h00=0x0024, h01=0x0050, text=» SCR A1,A3 STORE PRINT CHARACTER«, t00=0x000e, t01=0x003a}
0x163c…164e Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x000e, t01=0x0062}
0x164e…1660 Head {h00=0x000e, h01=0x0050, text=» LCR A3,A4«, t00=0x000e, t01=0x0074}
0x1660…1672 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x000e, t01=0x0086}
0x1672…169c Head {h00=0x0026, h01=0x0050, text=» LC A3,1,A4 GET CONTROL CHARACTER «, t00=0x000e, t01=0x0098}
0x169c…16b2 Head {h00=0x0012, h01=0x0050, text=» ST A3,CONCHA «, t00=0x000e, t01=0x00c2}
0x16b2…16c6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x000e, t01=0x00d8}
0x16c6…16ee Head {h00=0x0024, h01=0x0050, text=» SUK A3,/2B SUPER POSITIONING ? «, t00=0x000e, t01=0x00ec}
0x16ee…1708 Head {h00=0x0016, h01=0x0050, text=» RF(NE) ACLP15 NO «, t00=0x000e, t01=0x0114}
0x1708…1730 Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT REQ. LENGTH «, t00=0x000e, t01=0x012e}
0x1730…175a Head {h00=0x0026, h01=0x0050, text=» ADK A4,2 INCREMENT BUFFER ADDRESS«, t00=0x000e, t01=0x0156}
0x175a…176c Head {h00=0x000e, h01=0x0050, text=» RF ACLP30«, t00=0x000e, t01=0x0180}
0x176c…1776 (15, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0004}
0x1776…179a Head {h00=0x0020, h01=0x0050, text=»ACLP15 LDK A1,/0A LINE FEED «, t00=0x000f, t01=0x000e}
0x179a…17c8 Head {h00=0x002a, h01=0x0050, text=» SC A1,1,A4 SECOND CHARACTER IN BUFFER«, t00=0x000f, t01=0x0032}
0x17c8…17ea Head {h00=0x001e, h01=0x0050, text=» SUK A3,5 TWO LINE FEEDS ?«, t00=0x000f, t01=0x0060}
0x17ea…1804 Head {h00=0x0016, h01=0x0050, text=» RF(E) ACLP20 YES «, t00=0x000f, t01=0x0082}
0x1804…1824 Head {h00=0x001c, h01=0x0050, text=» LDK A1,/0C TOP OF FORM «, t00=0x000f, t01=0x009c}
0x1824…183e Head {h00=0x0016, h01=0x0050, text=» SUK A3,1 WANTED ?«, t00=0x000f, t01=0x00bc}
0x183e…1858 Head {h00=0x0016, h01=0x0050, text=» RF(E) ACLP20 YES «, t00=0x000f, t01=0x00d6}
0x1858…187c Head {h00=0x0020, h01=0x0050, text=» LDK A1,/0D CARRIAGE RETURN «, t00=0x000f, t01=0x00f0}
0x187c…1886 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0114}
0x1886…189e Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x000f, t01=0x011e}
0x189e…18a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0136}
0x18a8…18b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0140}
0x18b2…18ea Head {h00=0x0034, h01=0x0050, text=»ACLP20 SCR A1,A4 STORE FIRST CHARACTER IN BUFFER«, t00=0x000f, t01=0x014a}
0x18ea…1912 Head {h00=0x0024, h01=0x0050, text=»ACLP30 CF A5,CIOSTA SEND BUFFER «, t00=0x000f, t01=0x0182}
0x1912…192e Head {h00=0x0018, h01=0x0050, text=» SUK A7,6 ORDER 6 ? «, t00=0x0010, t01=0x001a}
0x192e…1944 Head {h00=0x0012, h01=0x0050, text=» RF(NE) ENDIO «, t00=0x0010, t01=0x0036}
0x1944…1956 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A2«, t00=0x0010, t01=0x004c}
0x1956…196c Head {h00=0x0012, h01=0x0050, text=» RF(NN) ACLP35«, t00=0x0010, t01=0x005e}
0x196c…19a4 Head {h00=0x0034, h01=0x0050, text=» IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D)«, t00=0x0010, t01=0x0074}
0x19a4…19ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ac}
0x19ae…19c2 Head {h00=0x0010, h01=0x0050, text=»ACLP35 EQU *«, t00=0x0010, t01=0x00b6}
0x19c2…19e4 Head {h00=0x001e, h01=0x0050, text=» LD A4,2,A8 BUFFER ADDRESS«, t00=0x0010, t01=0x00ca}
0x19e4…19f6 Head {h00=0x000e, h01=0x0050, text=» LDKL A3,0«, t00=0x0010, t01=0x00ec}
0x19f6…1a0c Head {h00=0x0012, h01=0x0050, text=»CONCHA EQU *-2«, t00=0x0010, t01=0x00fe}
0x1a0c…1a42 Head {h00=0x0032, h01=0x0050, text=» SC A3,1,A4 RESET CONTROL CHARACTER IN BUFFER «, t00=0x0010, t01=0x0114}
0x1a42…1a54 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x0010, t01=0x014a}
0x1a54…1a7c Head {h00=0x0024, h01=0x0050, text=» SCR A3,A4 ALSO RESET FIRST BYTE«, t00=0x0010, t01=0x015c}
0x1a7c…1a86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0184}
0x1a86…1aae Head {h00=0x0024, h01=0x0050, text=»ENDIO CF A15,TENDIO END REQUEST «, t00=0x0010, t01=0x018e}
0x1aae…1ac4 Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0011, t01=0x0026}
0x1ac4…1ace Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x003c}
0x1ace…1ae6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0011, t01=0x0046}
0x1ae6…1af0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x005e}
0x1af0…1afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0068}
0x1afa…1b0e Head {h00=0x0010, h01=0x0050, text=»* CIOSTA «, t00=0x0011, t01=0x0072}
0x1b0e…1b34 Head {h00=0x0022, h01=0x0050, text=»* SUBROUTINE TO SEND BUFFER«, t00=0x0011, t01=0x0086}
0x1b34…1b3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ac}
0x1b3e…1b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b6}
0x1b48…1b5c Head {h00=0x0010, h01=0x0050, text=»CIOSTA EQU *«, t00=0x0011, t01=0x00c0}
0x1b5c…1b7c Head {h00=0x001c, h01=0x0050, text=» ST A5,DWTA5,A6 SAVE A5 «, t00=0x0011, t01=0x00d4}
0x1b7c…1b90 Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0011, t01=0x00f4}
0x1b90…1bca Head {h00=0x0036, h01=0x0050, text=» ORKL A2,/4000 INDICATE CHARACTER MODE, OUTPUT AND«, t00=0x0011, t01=0x0108}
0x1bca…1bec Head {h00=0x001e, h01=0x0050, text=» IN RIGHT BYTE NUMBER OF«, t00=0x0011, t01=0x0142}
0x1bec…1c0a Head {h00=0x001a, h01=0x0050, text=» CHARACTERS TO SEND «, t00=0x0011, t01=0x0164}
0x1c0a…1c3e Head {h00=0x0030, h01=0x0050, text=» WER A2,MUXLP FIRST WRITE EXTERNAL REGISTER «, t00=0x0011, t01=0x0182}
0x1c3e…1c74 Head {h00=0x0032, h01=0x0050, text=» WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER«, t00=0x0012, t01=0x0026}
0x1c74…1c80 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x005c}
0x1c80…1c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0068}
0x1c8a…1c9e Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=1 «, t00=0x0012, t01=0x0072}
0x1c9e…1cca Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTA3,A6 SAVE BUFFER ADDRESS «, t00=0x0012, t01=0x0086}
0x1cca…1cdc Head {h00=0x000e, h01=0x0050, text=» ADR A4,A2«, t00=0x0012, t01=0x00b2}
0x1cdc…1d0e Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 «, t00=0x0012, t01=0x00c4}
0x1d0e…1d1a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00f6}
0x1d1a…1d24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0102}
0x1d24…1d46 Head {h00=0x001e, h01=0x0050, text=» CIO A2,1,DWALP CIO START «, t00=0x0012, t01=0x010c}
0x1d46…1d66 Head {h00=0x001c, h01=0x0050, text=» RB(Z) EXIT ACCEPTED =1 «, t00=0x0012, t01=0x012e}
0x1d66…1d7e Head {h00=0x0014, h01=0x0050, text=» LDK A1,1 ERROR «, t00=0x0012, t01=0x014e}
0x1d7e…1d90 Head {h00=0x000e, h01=0x0050, text=» RB ENDIO «, t00=0x0012, t01=0x0166}
0x1d90…1d9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0178}
0x1d9a…1db2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0012, t01=0x0182}
0x1db2…1dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000a}
0x1dbc…1dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0014}
0x1dc6…1de4 Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINE «, t00=0x0013, t01=0x001e}
0x1de4…1dee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003c}
0x1dee…1df8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0046}
0x1df8…1e0a Head {h00=0x000e, h01=0x0050, text=»LPON EQU *«, t00=0x0013, t01=0x0050}
0x1e0a…1e20 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0013, t01=0x0062}
0x1e20…1e4a Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0013, t01=0x0078}
0x1e4a…1e56 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00a2}
0x1e56…1e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ae}
0x1e60…1e76 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0013, t01=0x00b8}
0x1e76…1e9c Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0013, t01=0x00ce}
0x1e9c…1ea8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00f4}
0x1ea8…1eb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0100}
0x1eb2…1ed0 Head {h00=0x001a, h01=0x0050, text=» LDK A1,1 NOT OPERABLE«, t00=0x0013, t01=0x010a}
0x1ed0…1ef4 Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DWLP01 DWT ADDRESS «, t00=0x0013, t01=0x0128}
0x1ef4…1f16 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x0013, t01=0x014c}
0x1f16…1f32 Head {h00=0x0018, h01=0x0050, text=» RB(N) EXIT LP FREE «, t00=0x0013, t01=0x016e}
0x1f32…1f44 Head {h00=0x000e, h01=0x0050, text=» RF IHLP30«, t00=0x0013, t01=0x018a}
0x1f44…1f4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x000c}
0x1f4e…1f66 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0014, t01=0x0016}
0x1f66…1f70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002e}
0x1f70…1f7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0038}
0x1f7a…1f98 Head {h00=0x001a, h01=0x0050, text=»* I N T E R R U P T«, t00=0x0014, t01=0x0042}
0x1f98…1fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0060}
0x1fa2…1fac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x006a}
0x1fac…1fbe Head {h00=0x000e, h01=0x0050, text=»IHLP EQU *«, t00=0x0014, t01=0x0074}
0x1fbe…1fe6 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0014, t01=0x0086}
0x1fe6…1ffa Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0014, t01=0x00ae}
0x1ffa…2010 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0014, t01=0x00c2}
0x2010…203a Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0014, t01=0x00d8}
0x203a…2046 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0102}
0x2046…2050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x010e}
0x2050…2064 Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0014, t01=0x0118}
0x2064…207a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0014, t01=0x012c}
0x207a…20a0 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0014, t01=0x0142}
0x20a0…20ac Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0168}
0x20ac…20b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0174}
0x20b6…20ca Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=1 «, t00=0x0014, t01=0x017e}
0x20ca…20de (21, 0, 400) Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x0015, t01=0x0004}
0x20de…20f2 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x0015, t01=0x0018}
0x20f2…2116 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,DWLP01 DWT-ADDRESS «, t00=0x0015, t01=0x002c}
0x2116…214c Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER«, t00=0x0015, t01=0x0050}
0x214c…2168 Head {h00=0x0018, h01=0x0050, text=» LCR A2,A1 NEXT BYTE«, t00=0x0015, t01=0x0086}
0x2168…218e Head {h00=0x0022, h01=0x0050, text=» OTR A2,0,DWALP WRITE ONE BYTE«, t00=0x0015, t01=0x00a2}
0x218e…21b2 Head {h00=0x0020, h01=0x0050, text=» RF(NA) IHLP20 NOT ACCEPTED «, t00=0x0015, t01=0x00c8}
0x21b2…21d6 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,DWLP01 DWT-ADDRESS «, t00=0x0015, t01=0x00ec}
0x21d6…21e8 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0015, t01=0x0110}
0x21e8…220e Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTA3,A2 UPDATE POINTER«, t00=0x0015, t01=0x0122}
0x220e…2226 Head {h00=0x0014, h01=0x0050, text=» CW A1,DWTA4,A2 «, t00=0x0015, t01=0x0148}
0x2226…224a Head {h00=0x0020, h01=0x0050, text=» RF(NE) IHLP10 NOT LAST BYTE«, t00=0x0015, t01=0x0160}
0x224a…226a Head {h00=0x001c, h01=0x0050, text=» CIO A2,0,DWALP CIO HALT«, t00=0x0015, t01=0x0184}
0x226a…227e Head {h00=0x0010, h01=0x0050, text=»IHLP10 EQU *«, t00=0x0016, t01=0x0014}
0x227e…2292 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0016, t01=0x0028}
0x2292…22a6 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0016, t01=0x003c}
0x22a6…22b6 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0016, t01=0x0050}
0x22b6…22c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x22c0…22ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006a}
0x22ca…22d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0074}
0x22d4…22ee Head {h00=0x0016, h01=0x0050, text=»IHLP20 STR A3,A15 «, t00=0x0016, t01=0x007e}
0x22ee…2302 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0016, t01=0x0098}
0x2302…2316 Head {h00=0x0010, h01=0x0050, text=» STR A5,A15 «, t00=0x0016, t01=0x00ac}
0x2316…232a Head {h00=0x0010, h01=0x0050, text=» STR A6,A15 «, t00=0x0016, t01=0x00c0}
0x232a…233e Head {h00=0x0010, h01=0x0050, text=» STR A7,A15 «, t00=0x0016, t01=0x00d4}
0x233e…2352 Head {h00=0x0010, h01=0x0050, text=» STR A8,A15 «, t00=0x0016, t01=0x00e8}
0x2352…235e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00fc}
0x235e…2368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0108}
0x2368…2388 Head {h00=0x001c, h01=0x0050, text=» SST A1,DWALP GET STATUS«, t00=0x0016, t01=0x0112}
0x2388…23ac Head {h00=0x0020, h01=0x0050, text=» LDKL A6,DWLP01 DWT ADDRESS «, t00=0x0016, t01=0x0132}
0x23ac…23b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0156}
0x23b6…23ca Head {h00=0x0010, h01=0x0050, text=»IHLP30 EQU *«, t00=0x0016, t01=0x0160}
0x23ca…23e8 Head {h00=0x001a, h01=0x0050, text=» LD A7,DWTOR,A6 ORDER «, t00=0x0016, t01=0x0174}
0x23e8…23fc (23, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0017, t01=0x0004}
0x23fc…2420 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0017, t01=0x0018}
0x2420…242a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x003c}
0x242a…243e Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=0 «, t00=0x0017, t01=0x0046}
0x243e…2476 Head {h00=0x0034, h01=0x0050, text=» RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR.«, t00=0x0017, t01=0x005a}
0x2476…248c Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFF «, t00=0x0017, t01=0x0092}
0x248c…24c8 Head {h00=0x0038, h01=0x0050, text=» LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS«, t00=0x0017, t01=0x00a8}
0x24c8…24da Head {h00=0x000e, h01=0x0050, text=» SUR A2,A3«, t00=0x0017, t01=0x00e4}
0x24da…24e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00f6}
0x24e6…24f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0102}
0x24f0…2508 Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0017, t01=0x010c}
0x2508…2512 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0124}
0x2512…251c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012e}
0x251c…2530 Head {h00=0x0010, h01=0x0050, text=» IFT CHAN=1 «, t00=0x0017, t01=0x0138}
0x2530…255a Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTA3,A6 GET BUFFER-POINTER«, t00=0x0017, t01=0x014c}
0x255a…2574 Head {h00=0x0016, h01=0x0050, text=» CWK A7,6 ORDER 6?«, t00=0x0017, t01=0x0176}
0x2574…258a Head {h00=0x0012, h01=0x0050, text=» RF(NE) IHLP35«, t00=0x0017, t01=0x0190}
0x258a…25a0 Head {h00=0x0012, h01=0x0050, text=» ADK A2,1 YES «, t00=0x0018, t01=0x0016}
0x25a0…25b4 Head {h00=0x0010, h01=0x0050, text=»IHLP35 EQU *«, t00=0x0018, t01=0x002c}
0x25b4…25f0 Head {h00=0x0038, h01=0x0050, text=» SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS«, t00=0x0018, t01=0x0040}
0x25f0…25fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x007c}
0x25fc…2622 Head {h00=0x0022, h01=0x0050, text=» ST A2,6,A8 STORE EFF. LENGTH «, t00=0x0018, t01=0x0088}
0x2622…264a Head {h00=0x0024, h01=0x0050, text=» LD A5,DWTA5,A6 GET STACK VALUE «, t00=0x0018, t01=0x00ae}
0x264a…265a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0018, t01=0x00d6}
0x265a…2664 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e6}
0x2664…267c Head {h00=0x0014, h01=0x0050, text=» EJECT DRLP01 «, t00=0x0018, t01=0x00f0}
0x267c…2686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0108}
0x2686…269e Head {h00=0x0014, h01=0x0050, text=»* D W L P 0 1«, t00=0x0018, t01=0x0112}
0x269e…26a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x012a}
0x26a8…26d8 Head {h00=0x002c, h01=0x0050, text=»* DEVICE WORK TABLE FOR LINE PRINTER «, t00=0x0018, t01=0x0134}
0x26d8…26e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0164}
0x26e2…26f6 Head {h00=0x0010, h01=0x0050, text=»DWLP01 EQU *«, t00=0x0018, t01=0x016e}
0x26f6…2718 Head {h00=0x001e, h01=0x0050, text=» DATA 0 CHANNEL PARAMETER «, t00=0x0018, t01=0x0182}
0x2718…2732 Head {h00=0x0016, h01=0x0050, text=» DATA /8000 STATUS«, t00=0x0019, t01=0x0014}
0x2732…274e Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0019, t01=0x002e}
0x274e…2764 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0019, t01=0x004a}
0x2764…2790 Head {h00=0x0028, h01=0x0050, text=» DATA LPADR ADDRESS TO ADDRESS BLOCK«, t00=0x0019, t01=0x0060}
0x2790…27ac Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0019, t01=0x008c}
0x27ac…27d4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0019, t01=0x00a8}
0x27d4…27f2 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0019, t01=0x00d0}
0x27f2…2808 Head {h00=0x0012, h01=0x000d, text=» IFT MMUPAG=1 «, t00=0x0019, t01=0x00ee}
0x2808…2832 Head {h00=0x0026, h01=0x0022, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0019, t01=0x0104}
0x2832…2856 Head {h00=0x0020, h01=0x001c, text=» DATA DEVECB MMU ECB ADDRESS«, t00=0x0019, t01=0x012e}
0x2856…2862 Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x0019, t01=0x0152}
0x2862…2884 Head {h00=0x001e, h01=0x0050, text=» DATA 0 OUTPUT QUEUE LINK «, t00=0x0019, t01=0x015e}
0x2884…28a4 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A3«, t00=0x0019, t01=0x0180}
0x28a4…28c4 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A4«, t00=0x001a, t01=0x0010}
0x28c4…28e4 Head {h00=0x001c, h01=0x0050, text=» DATA 0 SAVE AREA FOR A5«, t00=0x001a, t01=0x0030}
0x28e4…28fc Head {h00=0x0014, h01=0x0050, text=» RES 4 DWT STACK«, t00=0x001a, t01=0x0050}
0x28fc…2906 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0068}
0x2906…291c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001a, t01=0x0072}
0x291c…2930 Head {h00=0x0010, h01=0x0050, text=»DEVECB EQU *«, t00=0x001a, t01=0x0088}
0x2930…2940 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x001a, t01=0x009c}
0x2940…2954 Head {h00=0x0010, h01=0x0050, text=» DATA LP:BUF«, t00=0x001a, t01=0x00ac}
0x2954…296a Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,0,0 «, t00=0x001a, t01=0x00c0}
0x296a…2986 Head {h00=0x0018, h01=0x0050, text=»LP:BUF RES DVBLEN+1 «, t00=0x001a, t01=0x00d6}
0x2986…2992 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00f2}
0x2992…299c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00fe}
0x299c…29a8 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001a, t01=0x0108}
0x29a8…29ac Head {h00=0x4004, h01=0x0000}
0x29ac…29b0 00 1a 01 14 ┆ ┆
0x29b0…29b8 (27, 1, 8) 20 04 00 00 00 1b 00 04 ┆ ┆
0x29b8…2a08 (28, 0, 400) 2a 20 20 20 20 20 20 20 20 20 20 20 20 41 36 3a 5c 44 57 54 2d 41 44 44 52 45 53 53 00 03 01 90 00 1a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 41 37 3a 5c 4f 52 44 45 52 00 04 00 24 00 20 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 41 ┆* A6: DWT-ADDRESS P* A7: ORDER $ P* A┆
0x2a08…2a58 38 3a 5c 45 43 42 2d 41 44 44 52 45 53 53 00 04 00 42 00 06 00 50 2a 20 00 04 00 66 00 06 00 50 2a 20 00 04 00 70 00 1a 00 50 2a 20 20 20 53 59 53 54 45 4d 20 41 44 41 50 54 41 54 49 4f 4e 3a 00 04 00 7a 00 06 00 50 2a 20 00 04 00 98 00 44 ┆8: ECB-ADDRESS B P* f P* p P* SYSTEM ADAPTATION: z P* D┆
0x2a58…2aa8 00 50 2a 20 20 20 42 59 20 4d 45 41 4e 53 20 4f 46 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 54 48 45 20 46 4f 4c 4c 4f 57 49 4e 47 20 46 55 4e 43 54 49 4f 4e 53 20 43 41 4e 00 04 00 a2 00 14 00 50 2a 20 20 20 42 45 ┆ P* BY MEANS OF CONDITIONAL ASSEMBLY THE FOLLOWING FUNCTIONS CAN P* BE┆
0x2aa8…2af8 20 45 58 43 4c 55 44 45 44 3a 00 04 00 ea 00 06 00 50 2a 20 00 04 01 02 00 1c 00 50 2a 20 20 20 4f 52 44 45 52 20 30 37 20 20 28 50 54 53 20 36 32 32 33 29 00 04 01 0c 00 34 00 50 2a 20 20 20 43 55 54 2f 50 45 52 46 4f 52 41 54 45 20 4a 4f ┆ EXCLUDED: P* P* ORDER 07 (PTS 6223) 4 P* CUT/PERFORATE JO┆
0x2af8…2b48 55 52 4e 41 4c 20 54 41 50 45 20 20 28 50 54 53 20 36 32 32 31 2c 36 32 32 32 29 20 00 04 01 2c 00 30 00 50 2a 20 20 20 41 43 43 41 50 54 41 4e 43 45 20 4f 46 20 53 50 45 43 49 41 4c 20 43 48 41 52 41 43 54 45 52 20 2f 31 33 2c 2f 31 34 20 ┆URNAL TAPE (PTS 6221,6222) , 0 P* ACCAPTANCE OF SPECIAL CHARACTER /13,/14 ┆