|
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: 20686 (0x50ce)
Notes: pts_type(SC)
Names: »DRDU01.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/DRDU01.SC«
IDENT DRDU01 REL 8.2 78-09-15 870105040820 * ********************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRDU01 = DRIVER FOR ONE/TWO DISC UNITS X/1215 AND/OR X/1216 * * * * * * * ************************************************** * * THIS DISC DRIVER HANDLES UP TO TWO DISC * DRIVES X/1215,X/1216 CONNECTED TO CPU VIA IOP * ON MULTIPLEX CHANNEL * * * THE FOLLOWING ORDERS ARE TRAETED : * * /00 TEST STATUS * /01 BASIC READ * /05 BASIC WRITE * /11 PHYSICAL READ * /15 PHYSICAL WRITE * EJECT DRDU01 * *********** * ENTRIES * *********** * ENTRY DUADR ACTIVATION ADDRESS ENTRY DUON RECIVERY ROUTINE ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1 ENTRY IHDU INTERRUPT HANDLER DISC UNIT NO. 1 ENTRY IHDU2 INTERRUPT HANDLER DISC UNIT NO. 2 ENTRY DWDU01 DWT-ADDRESS DISC UNIT NO. 1 ENTRY DWDU02 DWT-ADDRESS DISC UNIT NO. 2 * ************* * EXTERNALS * ************* * EXTRN TDISP DISPATCHER EXTRN TENDIO ENDIO EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK EXTRN DISIOE REQUEST ERROR EXTRN DWTST DWT STATUS EXTRN DWTOR ORDER EXTRN DWTECB ECB-ADDRESS EXTRN INIFLG INITIALIZATION FLAG EXTRN DWTVOL VOLUME NAME EXTRN INTSAV SAVEAREA LAST INTERRUPT EXTRN SETIMP TIMER EJECT * ************************** * * * CONDITIONAL ASSEMBLY * * * ************************** * * READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15 * BY SETTING X:A = 0 * X:A EQU 0 RAW EQU X:A * * * THIS DRIVER CAN HANDLE TWO DISC UNITS * IF X:B := 2 * X:B EQU 1 NUNITS EQU X:B * * * DRIVE 1 MAY BE A X/1216 INSTEAD OF A X/1215 * BY SETTING X:C = 1 * X:C EQU 0 TYPE1 EQU X:C * * DRIVE 2 MAY BE A X/1216 INSTEAD OF A X/1215 * BY SETTING X:D = 1 * X:D EQU 0 TYPE2 EQU X:D EJECT DRDU01 * ************* * CONSTANTS * ************* * DAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1 DAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1 DAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2 DAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2 WER1 EQU /10 MULTIPLEXOR ADDRESS CUADR EQU /08 CONTROL UNIT ADDRESS MAXCY5 EQU 203 MAX CYLINDER NO X/1215 MAXCY6 EQU 407 MAX. CYLINDER NO X/1216 LENGTH EQU 410 SECTOR LENGTH, CARACTERS RY1 EQU 1 RETRY COUNT FOR BASIC ORDERS RY4 EQU 4 RETRY COUNT TIME EQU 1000 2 MINUTES * *********************** * * * DWT-DISPLACEMENTS * * * *********************** * DWTA2 EQU /12 DWT-DISPLACEMENT,SAVE A2 DWTA4 EQU /14 ,SAVE A4 DWTA5 EQU /16 ,SAVE A5 DWTSB1 EQU /1A ,1:ST STACK BASE DWTSB2 EQU /1E ,STACK BASE EJECT DRDU01 ************** * DUADR DATA DUAD ACTIVATION ADDRESS BUF RES 5 SECTOR BUFFER - 200 WORDS IFT RAW=1 RES 200 READ AFTER WRITE BUFFER XIF * RETRY IS USED TO DETECT RETRIES RETRY DATA 0 MAX NO OF TRIES * * * TABLE FOR CONVERSION FROM LOGICAL TO PHYSICAL * SECTOR NUMBER * * SECTAB DATA /0003,/0609,/0C0F,/0205,/080B,/0E01,/0407,/0A0D DATA /1013,/1619,/1C1F,/1215,/181B,/1E11,/1417,/1A1D EJECT DRDU01 * * ***************** * * * ACTIVATION * * * ***************** * DUAD EQU * ACTIVATION ENTRY IFT NUNITS=2 LDKL A1,/7FFF LDR* A2,A6 GET OTHER DISC UNIT DWT ANS A1,DWTST,A2 SET OTHER DISC UNIT BUSY XIF SUK A5,4 STACK BASE LDK A4,RY1 RETRY COUNT = 1 ST A4,RETRY MAX NO OF TRIES LC A1,DWTOR,A6 GET INDEX ANK A1,1 ADR A1,A1 ADR A1,A6 LD A2,DWTBSY,A1 RF(Z) DUA:10 DISC READY LDR A7,A7 RF(Z) DUA:10 TEST STATUS ORDER LDK A1,/80 DISC HAS BECOME READY ABL END:15 EJECT DUA:10 LDR A1,A7 ORDER RF(Z) DU:010 TEST STATUS SUK A1,1 RF(Z) DUA:30 BASIC READ SUK A1,4 RF(Z) DUA:30 BASIC WRITE SUK A1,12 RF(Z) DUA:20 PHYSICAL READ SUK A1,4 RF(Z) DUA:20 PHYSICAL WRITE EJECT DUERR ABL DISIOE REQUEST ERROR DUA:20 LDK A4,RY4 RETRY COUNT = 4 ST A4,RETRY MAX NO OF TRIES DUA:30 LD A1,4,A8 REQUESTED LENGTH SUKL A1,LENGTH RB(NZ) DUERR REQUESTED LENGTH # 410 EJECT DRDU01 LD A2,10,A8 RELATIVE SECTOR NUMBER LDR A3,A2 ANK A3,/1F LOGICAL SECTOR NUMBER LC A3,SECTAB,A3 PHYSICAL SECTOR NUMBER SC A3,DWTSEC,A6 SAVE IT SRL A2,5 CYLINDER NUMBER CW A2,DWTCMX,A6 RB(G) DUERR CYLINDER NO GREATER THAN MAX. CW A2,DWTCYL,A6 COMPARE WITH CURRENT CYLINDER NUMBER RF(E) DU:030 DISC HEAD ALREADT POSITIONED ST A2,DWTCYL,A6 SAVE CYLINDER NUMBER EJECT DRDU01 * ************************ * * * SEEK SECTOR N * * * ************************ * DU:010 CF A5,SEEK SEEK CYLINDER N SLC A1,6 RF(NN) DU:030 OK. SEEK COMPLETED * ************************ * * * SEEK CYLINDER 0 * * * ************************ * DU:015 CF A5,SEEKZ SEEK CYLINDER 0 SLC A1,6 RF(N) DU:020 SECTOR 0 NOT FOUND SUK A4,1 RB(NZ) DU:010 TRY AGAIN DU:020 LDKL A3,/FFFF ALL RETRIES DONE ST A3,DWTCYL,A6 SET ILLEGAL CYLINDER NUMBER LDKL A1,/200 SEEK ERROR RETURN CODE ABL END:IO PERFORM ENDIO EJECT DRDU01 * ************************** * * * GO AND EXECUTE ORDER * * * ************************** * * DU:030 LDR A1,A7 ORDER RF(Z) TEST TEST STATUS SUK A1,5 RF(Z) WRIT:N BASIC WRITE SUK A1,12 RF(NP) READ:N READ * ************************ * * * READ SECTOR N-1 * * * ************************ * P:WRIT CF A5,WER:R5 EXECUTE WER INSTRUCTIONS CF A5,READ5 READ FIVE WORDS ANK A1,2 RF(Z) P:WR10 OK. CHECK CYLINDER NUMBER SUK A4,1 DECREMENT RETRY COUNTER ABL(Z) END:IO ALL RETRIES DONE RB P:WRIT TRY AGAIN EJECT DRDU01 P:WR10 LD A2,DWTCYL,A6 CYLINDER NUMBER CW A2,BUF+1 COMPARE WITH CURRENT CYLINDER NUMBER RB(NE) DU:015 ERROR.SEEK CYLINDER 0 * ********************* * * * WRITE SECTOR N * * * ********************* * WRIT:N CF A5,WER:W EXECUTE WER INSTRUCTIONS CF A5,WRITE WRITE SECTOR N ANK A1,/1F RF(Z) WRIT20 OK. NO RETURN CODE SUK A4,1 DECREMENT RETRY COUNTER ABL(Z) END:IO ALL RETRIES DONE RB WRIT:N TRY AGAIN IFT RAW=1 WRIT20 CWK A7,5 ABL(E) END:IO BASIC WRITE LDKL A3,BUF DRIVER BUFFER ADDRESS XIF IFF RAW=1 WRIT20 ABL END:IO PERFORM END:IO XIF EJECT DRDU01 * ********************** * * * READ SECTOR N * * * ********************** * READ:N CF A5,WER:R EXECUTE WER INSTRUCTIONS CF A5,READ READ SECTOR N ANK A1,/F RF(Z) READ10 OK. NO RETURN CODE SUK A4,1 DECREMENT RETRY COUNTER ABL(Z) END:IO ALL RETRIES DONE RB READ:N TRY AGAIN * *************************** * * * CHECK CYLINDER NUMBER * * * *************************** * * READ10 LD A2,DWTCYL,A6 REQUESTED CYLINDER NUMBER CW* A2,2,A8 COMPARE WITH CURRENT CYLINDER NUMBER RB(NE) DU:015 ERROR. SEEK CYLINDER 0 ABL END:IO 0K. PEABLORM ENDIO EJECT DRDU01 * ********************* * * * TEST STATUS * * * ********************* * TEST LDKL A2,DWTNAM VOLUME NAME DWT DISPLACEMENT ADR A2,A6 LC A3,DWTOR,A6 DWT INDEX ANK A3,1 RF(Z) TEST10 FIXED DISC ADK A2,6 CARTRIDGE DISC TEST10 ST A2,10,A8 SAVE ADDRESS TO VOLUME NAME SUR A1,A1 SET RETURN CODE=0 ABL END:IO PEABLORM ENDIO EJECT DRDU01 * ****************************** * * * EXECUTE WER INSTRUCTIONS * * * ****************************** * WER:R5 LDKL A2,/8005 READ 5 WORDS LDKL A3,BUF DRIVER BUFFER ADDRESS RF EX:WER WER:R LDKL A2,/80CD READ 1 SECTOR CWK A3,BUF RF(E) EX:WER RF WER:WB WER:W LDKL A2,/C0CD WRITE 1 SECTOR WER:WB LD A3,2,A8 USER BUFFER ADDRESS EX:WER EX DWTWR1,A6 EXECUTE 1:ST WER EX DWTWR2,A6 EXECUTE 2:ND WER RTN A5 EJECT DRDU01 * ******************* * * * SEEK CYLINDER * * * ******************* * SEEK LD A2,DWTCYL,A6 CYLINDER NUMBER SLL A2,3 ORK A2,2 RF CIO EXECUTE CIO-START SEEKZ EQU * LDK A2,3 RF CIO EXECUTE CIO-START READ5 LC A2,DWTSEC,A6 SECTOR NUMBER ANK A2,/1F SUK A2,3 SECTOR N-1 ANK A2,/1F SLL A2,2 RF CIO EXECUTE CIO-START EJECT DRDU01 READ LC A2,DWTSEC,A6 SECTOR NUMBER ANK A2,/1F SLL A2,2 RF CIO EXECUTE CIO-START WRITE LD A2,DWTCYL,A6 CYLINDER NUMBER ST* A2,2,A8 PUT CYLNMB. IN USER BUFFER LC A2,DWTSEC,A6 SECTOR NUMBER SLL A2,2 ADK A2,1 EJECT DRDU01 CIO EQU * EX:CIO LC A1,DWTOR,A6 ANK A1,1 INDEX ADR A1,A1 DOUBLE INDEX ADR A1,A6 EX DWTCIO,A1 EXECUTE CIO-START SAVE ST A2,DWTA2,A6 SAVE REGS. A2 ST A4,DWTA4,A6 A4 ST A5,DWTA5,A6 A5 T:DISP ABL TDISP GO TO DISPATCHER EJECT DRDU01 * ********************** * * * RECOVERY ROUTINE * * * ********************** * DUON CF A15,SAVE8 SAVE REGS. A1-A8 ON A15 STACK LDKL A6,DWDU01 LD A1,INIFLG INITIALIZATION FLAG RF(Z) DUON08 POWER UP DURED2 EQU * LDKL A1,/7FFF ANS A1,DWTST,A6 SET DISC UNIT BUSY DUON05 LDKL A5,DWTSB2 STACK BASE LDKL A6,DWDU01 ADR A5,A6 STACK BASE CF A5,VO:NAM GET VOLUME NAME CF A15,TENDIO EJECT IFT NUNITS=2 LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS LDKL A5,DWTSB2 ADR A5,A6 STACK BASE LDKL A1,/7FFF ANS A1,DWTST,A6 SET DWT BUSY CF A5,VO:NAM GET VOLUME NAME CF A15,TENDIO PERFORM ENDIO XIF RB T:DISP DISPATCH * * * READY INTERRUPT * DUREDY LD A1,TIMER RB(Z) DURED2 NO TIMER ACTIVE RB T:DISP TIMER ACTIVE EJECT DUON08 EQU * LDK A1,2 THROUGHPUT ERROR LD A2,DWTST,A6 GET DWT STATUS RF(N) DUON10 UNIT FREE CF A15,TENDIO PERFORM ENDIO DUON10 EQU * IFT NUNITS=2 LDKL A6,DWDU02 DISC UNIT NO. 2 LD A2,DWTST,A6 DWT STSTUS RF(N) DUON20 UNIT FREE CF A15,TENDIO PERFORM ENDIO XIF * * SET DISC BUSY AND START TIMER * DUON20 LDKL A1,/7FFF IFT NUNITS=2 ANS A1,DWTST,A6 SET UNIT BUSY LDR* A6,A6 OTHER DWT ADDRESS XIF ANS A1,DWTST,A6 SET UNIT BUSY LDKL A4,TIMER TIMER POINTER ADDRESS LDR* A3,A4 RF(Z) DUON30 NO TIMER ACTIVE LDKL A1,-TIME STR A1,A3 RESTART TIMER RB T:DISP * DUON30 CF A15,SETIMP START TIMER DATA DUON40,TIME TIME OUT ADDRESS, TIME RB T:DISP * * TIME-OUT * DUON40 LDKL A6,DWDU01 CM TIMER RB DURED2 EJECT DRDU01 * *********************** * * * INTERRUPT HANDLER * * * *********************** * IHDU2 EQU * IFT NUNITS=2 ST P,INTSAV SAVE LAST INTERRUPT CF A15,SAVE8 LDKL A6,DWDU02 DISC UNIT NO. 2 RF IHDU10 XIF IHDU EQU * IHDU1 EQU * ST P,INTSAV SAVE LAST INTERRUPT CF A15,SAVE8 LDKL A6,DWDU01 DISC UNIT NO. 1 IHDU10 SST A1,CUADR GET STATUS IFT NUNITS=2 LDR A2,A1 ANK A2,/40 RF(Z) IHDU20 LDKL A6,DWDU02 XIF IHDU20 EQU * ANKL A1,/440F MASK RETURN CODE SLL A1,1 RB(N) DUREDY READY INTERRUPT SRL A1,1 LD A2,DWTSAV,A6 RF(NN) GET LDR A3,A1 ANK A3,1 RF(NZ) END:IO DISC UNIT NOT OPERABLE EJECT DRDU01 GET LD A5,DWTA5,A6 RELOAD REGISTERS A5 LD A4,DWTA4,A6 A4 LD A2,DWTA2,A6 A2 LD A7,DWTOR,A6 ANK A7,/FF ORDER LD A8,DWTECB,A6 ECB-ADDRESS RTN A5 EJECT DRDU01 * ******************* * * * PERFORM ENDIO * * * ******************* * END:IO EQU * ANKL A1,/28F MASK RETURN CODE RF(NZ) END:10 ERROR LD A2,4,A8 REQUESTED LENGTH = ST A2,6,A8 EFFECTIVE LENGTH END:10 EQU * LD A2,RETRY MAX NO OF TRIES CW A2,DWTA4,A6 RF(E) END:15 NO RETRY ORKL A1,/100 BIT 7 = RETRIES END:15 EQU * LC A2,DWTOR,A6 ORDER ANK A2,1 INDEX ADR A2,A2 ADR A2,A6 CM DWTBSY,A2 RESET READY WORD IFT NUNITS=2 LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS CF A15,TENDIO PERFORM ENDIO LDR* A6,A6 ACTIVE DISC UNIT DWT-ADDRESS XIF CF A15,TENDIO PERFORM ENDIO END:20 ABL TDISP GO TO DISPATCHER EJECT VO:NAM LD A1,DWTOR,A6 ORDER ST A1,DWTSAV,A6 SAVE IT CM DWTOR,A6 INDEX=0 VO:NA5 EQU * DU:NAM CF A5,SEEKZ SEEK SECTOR 0 ANKL A1,/203 RF(NZ) VO:NA8 SEEK-,THROUGHPUT-ERROR,NOT OPERABLE CF A5,WER:R5 EXECUTE WER INSTRUCTIONS SUR A2,A2 CYLINDER NUMBER = 0 ST A2,DWTCYL,A6 CF A5,CIO READ VOLUME LABEL ANK A1,3 RF(NZ) VO:NA8 THROUGHPUT-ERROR,NOT OPERABLE LDKL A2,DWTNAM ADR A2,A6 LC A1,DWTOR,A6 ANK A1,1 DISC INDEX RF(Z) DUNA10 FIXED DISC ADK A2,6 CARTRIDGE DISC DUNA10 SUR A1,A1 RESET RETURN CODE LDKL A3,BUF+2 BUFFER ADDRESS LDK A4,6 DUNA20 LDR* A7,A3 GET VOLUME NAME CWR* A7,A2 COMPARE WITH LAST VOLUME NAME RF(E) DUNA30 SAME DISC LDK A1,/80 NEW DISC LOADED DUNA30 STR A7,A2 SAVE DISC NAME ADK A2,2 INCREMENT POINTERS ADK A3,2 SUK A4,2 RB(NZ) DUNA20 GET NEXT WORD LDR A1,A1 RF(Z) DUNA40 VOLUME MATCH LC A2,DWTOR,A6 INDEX ANK A2,1 ADR A2,A2 ADR A2,A6 ST A1,DWTBSY,A2 NEW VOLUME LOADED DUNA40 EQU * LD A1,DWTOR,A6 ORDER RF(NZ) VO:NA8 LDK A1,1 SC A1,DWTOR,A6 INDEX=1 RB VO:NA5 VO:NA8 LD A1,DWTSAV,A6 GET OLD DWT CONTENTS ST A1,DWTOR,A6 SAVE IT LDKL A1,-1 ST A1,DWTSAV,A6 LDKL A5,DWTSB1 ADR A5,A6 STACK BASE LDK A1,1 RETURN CODE. NOT OPERABLE RTN A5 * * * TIMER POINTER * TIMER DATA 0 TIMER POINTER EJECT DRDU01 * * DEVICE WORK TABLE DISC UNIT NO. 2 * * DWDU02 EQU * IFT NUNITS=2 DATA DWDU01 POINTER TO OTHER DWT DATA /8000 DWT STATUS DATA 0 ECB-ADDRESS DATA 0 ORDER DATA DUADR ACTIVATION ADDRESS DATA 0 TTAB-ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE DATA /00FF LEFT BYTE=SECTOR NUMBER DATA 0,0,0 SAVE AREA FOR REGISTERS DATA 0,0 STACK DATA 0,0 DATA /80 DISC UNIT BUSY INDICATOR DATA /80 RIGHT BYTE = CYLINDER NUMBER CIO A2,1,DAF2 CIO-START FIXED DISC CIO A2,1,DAC2 CIO-START CARTRIDGE DISC WER A2,WER1 WER A3,WER1+1 DATA 0,0,0 VOLUME NAME FIXED DISC DATA 0,0,0 VOLUME NAME CARTRIDGE DISC DATA -1 DATA /FFFF CYLINDER NO. IFT TYPE2=0 DATA MAXCY5 MAX CYLINDER NO XIF IFT NUNITS+TYPE2=3 DATA MAXCY6 MAX CYLINDER NO XIF EJECT DRDU01 * * DEVICE WORK TABLE DISC UNIT NO. 1 * * DWDU01 EQU * DATA DWDU02 POINTER TO OTHER DWT DATA /8000 DWT-STATUS DATA 0 ECB-ADDRESS DATA 0 ORDER DATA DUADR ACTIVATION ADDRESS DATA 0 TTAB-ADDRESS DATA 0 WAIT/ACTIVATE INDICATOR DATA 0 TERMINAL QUEUE DWTSEC EQU *-DWDU01 DATA /00FF LEFT BYTE=SECTOR NUMBER DATA 0,0,0 SAVE AREA FOR REGISTERS DATA 0,0 STACK DATA 0,0 DWTBSY EQU *-DWDU01 DATA /80 UNIT BUSY INDICATOR DATA /80 UNIT BUSY INDICATOR DWTCIO EQU *-DWDU01 CIO-START CIO A2,1,DAF1 CIO A2,1,DAC1 DWTWR1 EQU *-DWDU01 1:ST WER INSTRUCTION WER A2,WER1 DWTWR2 EQU *-DWDU01 2:ND WER INSTRUCTION WER A3,WER1+1 DWTNAM EQU *-DWDU01 DATA 0,0,0 VOLUME NAME FIXED DISC DATA 0,0,0 VOLUME NAME CARTRIDGE DISC DWTSAV EQU *-DWDU01 DATA -1 DWTCYL EQU *-DWDU01 DATA /FFFF CYLINDER NUMBER IFT TYPE1=0 DWTCMX EQU *-DWDU01 DATA MAXCY5 MAX CYLINDER X/1215 XIF IFT TYPE1=1 DWTCMX EQU *-DWDU01 DATA MAXCY6 MAX CYLINDER NO X/1216 XIF END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRDU01 REL 8.2 78-09-15 870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…007e Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0000, t01=0x004c}
0x007e…0088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0082}
0x0088…00b0 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008c}
0x00b0…00ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b4}
0x00ba…0102 Head {h00=0x0044, h01=0x0050, text=»* DRDU01 = DRIVER FOR ONE/TWO DISC UNITS X/1215 AND/OR X/1216 «, t00=0x0000, t01=0x00be}
0x0102…010c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012e}
0x0134…013e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0138}
0x013e…0148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0142}
0x0148…0182 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x014c}
0x0182…018c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0186}
0x018c…01c0 Head {h00=0x0030, h01=0x0050, text=»* THIS DISC DRIVER HANDLES UP TO TWO DISC «, t00=0x0000, t01=0x0190}
0x01c0…01fa Head {h00=0x0036, h01=0x0050, text=»* DRIVES X/1215,X/1216 CONNECTED TO CPU VIA IOP «, t00=0x0001, t01=0x0034}
0x01fa…021a Head {h00=0x001c, h01=0x0050, text=»* ON MULTIPLEX CHANNEL«, t00=0x0001, t01=0x006e}
0x021a…0224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008e}
0x0224…022e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0098}
0x022e…025c Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TRAETED :«, t00=0x0001, t01=0x00a2}
0x025c…0266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d0}
0x0266…0284 Head {h00=0x001a, h01=0x0050, text=»* /00 TEST STATUS«, t00=0x0001, t01=0x00da}
0x0284…02a2 Head {h00=0x001a, h01=0x0050, text=»* /01 BASIC READ «, t00=0x0001, t01=0x00f8}
0x02a2…02c0 Head {h00=0x001a, h01=0x0050, text=»* /05 BASIC WRITE«, t00=0x0001, t01=0x0116}
0x02c0…02e0 Head {h00=0x001c, h01=0x0050, text=»* /11 PHYSICAL READ«, t00=0x0001, t01=0x0134}
0x02e0…0302 Head {h00=0x001e, h01=0x0050, text=»* /15 PHYSICAL WRITE «, t00=0x0001, t01=0x0154}
0x0302…030c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0176}
0x030c…0324 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0001, t01=0x0180}
0x0324…032c Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0008}
0x032c…0334 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0010}
0x0334…033e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0018}
0x033e…0352 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0022}
0x0352…0366 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0036}
0x0366…037a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x004a}
0x037a…0384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005e}
0x0384…03ac Head {h00=0x0024, h01=0x0050, text=» ENTRY DUADR ACTIVATION ADDRESS «, t00=0x0002, t01=0x0068}
0x03ac…03d0 Head {h00=0x0020, h01=0x0050, text=» ENTRY DUON RECIVERY ROUTINE«, t00=0x0002, t01=0x0090}
0x03d0…0406 Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1«, t00=0x0002, t01=0x00b4}
0x0406…043c Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU INTERRUPT HANDLER DISC UNIT NO. 1 «, t00=0x0002, t01=0x00ea}
0x043c…0472 Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU2 INTERRUPT HANDLER DISC UNIT NO. 2«, t00=0x0002, t01=0x0120}
0x0472…04a4 Head {h00=0x002e, h01=0x0050, text=» ENTRY DWDU01 DWT-ADDRESS DISC UNIT NO. 1 «, t00=0x0002, t01=0x0156}
0x04a4…04d6 Head {h00=0x002e, h01=0x0050, text=» ENTRY DWDU02 DWT-ADDRESS DISC UNIT NO. 2 «, t00=0x0002, t01=0x0188}
0x04d6…04de Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x002a}
0x04de…04e6 Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x0032}
0x04e6…04ee Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x003a}
0x04ee…04f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0042}
0x04f8…050e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x004c}
0x050e…0524 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x0062}
0x0524…053a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0078}
0x053a…0544 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x008e}
0x0544…0564 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0003, t01=0x0098}
0x0564…0580 Head {h00=0x0018, h01=0x0050, text=» EXTRN TENDIO ENDIO «, t00=0x0003, t01=0x00b8}
0x0580…05b2 Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK«, t00=0x0003, t01=0x00d4}
0x05b2…05d6 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x0106}
0x05d6…05f6 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x012a}
0x05f6…0610 Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0003, t01=0x014a}
0x0610…0632 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0003, t01=0x0164}
0x0632…065c Head {h00=0x0026, h01=0x0050, text=» EXTRN INIFLG INITIALIZATION FLAG «, t00=0x0003, t01=0x0186}
0x065c…067e Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTVOL VOLUME NAME «, t00=0x0004, t01=0x0020}
0x067e…06ac Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVEAREA LAST INTERRUPT «, t00=0x0004, t01=0x0042}
0x06ac…06c8 Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0004, t01=0x0070}
0x06c8…06d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x008c}
0x06d6…06de Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x009a}
0x06de…06e6 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x00a2}
0x06e6…06f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00aa}
0x06f0…0712 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0004, t01=0x00b4}
0x0712…0734 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0004, t01=0x00d6}
0x0734…0756 Head {h00=0x001e, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0004, t01=0x00f8}
0x0756…0778 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0004, t01=0x011a}
0x0778…079a Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0004, t01=0x013c}
0x079a…07a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015e}
0x07a4…07de Head {h00=0x0036, h01=0x0050, text=»* READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15«, t00=0x0004, t01=0x0168}
0x07de…07fc Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:A = 0«, t00=0x0005, t01=0x0012}
0x07fc…0806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0030}
0x0806…080e Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x003a}
0x080e…0820 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0005, t01=0x0042}
0x0820…0834 Head {h00=0x0010, h01=0x0050, text=»RAW EQU X:A «, t00=0x0005, t01=0x0054}
0x0834…083e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0068}
0x083e…0848 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0072}
0x0848…087a Head {h00=0x002e, h01=0x0050, text=»* THIS DRIVER CAN HANDLE TWO DISC UNITS «, t00=0x0005, t01=0x007c}
0x087a…0892 Head {h00=0x0014, h01=0x0050, text=»* IF X:B := 2 «, t00=0x0005, t01=0x00ae}
0x0892…089c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c6}
0x089c…08a4 Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x00d0}
0x08a4…08b6 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0005, t01=0x00d8}
0x08b6…08cc Head {h00=0x0012, h01=0x0050, text=»NUNITS EQU X:B«, t00=0x0005, t01=0x00ea}
0x08cc…08d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0100}
0x08d6…08e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010a}
0x08e0…0918 Head {h00=0x0034, h01=0x0050, text=»* DRIVE 1 MAY BE A X/1216 INSTEAD OF A X/1215 «, t00=0x0005, t01=0x0114}
0x0918…0936 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:C = 1«, t00=0x0005, t01=0x014c}
0x0936…0940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x0940…0952 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x0005, t01=0x0174}
0x0952…0968 Head {h00=0x0012, h01=0x0050, text=»TYPE1 EQU X:C «, t00=0x0005, t01=0x0186}
0x0968…0972 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x000c}
0x0972…09aa Head {h00=0x0034, h01=0x0050, text=»* DRIVE 2 MAY BE A X/1216 INSTEAD OF A X/1215 «, t00=0x0006, t01=0x0016}
0x09aa…09c8 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:D = 1«, t00=0x0006, t01=0x004e}
0x09c8…09d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09d2…09e4 Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x0006, t01=0x0076}
0x09e4…09fa Head {h00=0x0012, h01=0x0050, text=»TYPE2 EQU X:D «, t00=0x0006, t01=0x0088}
0x09fa…0a12 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0006, t01=0x009e}
0x0a12…0a1a Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00b6}
0x0a1a…0a22 Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00be}
0x0a22…0a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c6}
0x0a2c…0a42 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x00d0}
0x0a42…0a58 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0006, t01=0x00e6}
0x0a58…0a6e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x00fc}
0x0a6e…0a78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0112}
0x0a78…0aac Head {h00=0x0030, h01=0x0050, text=»DAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1«, t00=0x0006, t01=0x011c}
0x0aac…0ae4 Head {h00=0x0034, h01=0x0050, text=»DAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1«, t00=0x0006, t01=0x0150}
0x0ae4…0b18 Head {h00=0x0030, h01=0x0050, text=»DAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2«, t00=0x0006, t01=0x0188}
0x0b18…0b50 Head {h00=0x0034, h01=0x0050, text=»DAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2«, t00=0x0007, t01=0x002c}
0x0b50…0b78 Head {h00=0x0024, h01=0x0050, text=»WER1 EQU /10 MULTIPLEXOR ADDRESS«, t00=0x0007, t01=0x0064}
0x0b78…0ba2 Head {h00=0x0026, h01=0x0050, text=»CUADR EQU /08 CONTROL UNIT ADDRESS«, t00=0x0007, t01=0x008c}
0x0ba2…0baa Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x00b6}
0x0baa…0bb2 Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x00be}
0x0bb2…0be0 Head {h00=0x002a, h01=0x0050, text=»MAXCY5 EQU 203 MAX CYLINDER NO X/1215 «, t00=0x0007, t01=0x00c6}
0x0be0…0c0e Head {h00=0x002a, h01=0x0050, text=»MAXCY6 EQU 407 MAX. CYLINDER NO X/1216«, t00=0x0007, t01=0x00f4}
0x0c0e…0c3e Head {h00=0x002c, h01=0x0050, text=»LENGTH EQU 410 SECTOR LENGTH, CARACTERS «, t00=0x0007, t01=0x0122}
0x0c3e…0c6c Head {h00=0x002a, h01=0x0050, text=»RY1 EQU 1 RETRY COUNT FOR BASIC ORDERS«, t00=0x0007, t01=0x0152}
0x0c6c…0c8a Head {h00=0x001a, h01=0x0050, text=»RY4 EQU 4 RETRY COUNT «, t00=0x0007, t01=0x0180}
0x0c8a…0caa Head {h00=0x001c, h01=0x0050, text=»TIME EQU 1000 2 MINUTES «, t00=0x0008, t01=0x000e}
0x0caa…0cb2 Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x002e}
0x0cb2…0cba Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0036}
0x0cba…0cc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x003e}
0x0cc4…0ce4 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0008, t01=0x0048}
0x0ce4…0d04 Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0008, t01=0x0068}
0x0d04…0d24 Head {h00=0x001c, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x0008, t01=0x0088}
0x0d24…0d44 Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0008, t01=0x00a8}
0x0d44…0d64 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0008, t01=0x00c8}
0x0d64…0d6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e8}
0x0d6e…0d9c Head {h00=0x002a, h01=0x0050, text=»DWTA2 EQU /12 DWT-DISPLACEMENT,SAVE A2«, t00=0x0008, t01=0x00f2}
0x0d9c…0dca Head {h00=0x002a, h01=0x0050, text=»DWTA4 EQU /14 ,SAVE A4«, t00=0x0008, t01=0x0120}
0x0dca…0df8 Head {h00=0x002a, h01=0x0050, text=»DWTA5 EQU /16 ,SAVE A5«, t00=0x0008, t01=0x014e}
0x0df8…0e30 Head {h00=0x0034, h01=0x0050, text=»DWTSB1 EQU /1A ,1:ST STACK BASE «, t00=0x0008, t01=0x017c}
0x0e30…0e62 Head {h00=0x002e, h01=0x0050, text=»DWTSB2 EQU /1E ,STACK BASE«, t00=0x0009, t01=0x0024}
0x0e62…0e7a Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0009, t01=0x0056}
0x0e7a…0e82 Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x006e}
0x0e82…0e8a Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0076}
0x0e8a…0ea0 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0009, t01=0x007e}
0x0ea0…0eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0094}
0x0eaa…0ed4 Head {h00=0x0026, h01=0x0050, text=»DUADR DATA DUAD ACTIVATION ADDRESS«, t00=0x0009, t01=0x009e}
0x0ed4…0f00 Head {h00=0x0028, h01=0x0050, text=»BUF RES 5 SECTOR BUFFER - 200 WORDS «, t00=0x0009, t01=0x00c8}
0x0f00…0f12 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0009, t01=0x00f4}
0x0f12…0f3a Head {h00=0x0024, h01=0x0050, text=» RES 200 READ AFTER WRITE BUFFER«, t00=0x0009, t01=0x0106}
0x0f3a…0f46 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x012e}
0x0f46…0f72 Head {h00=0x0028, h01=0x0050, text=»* RETRY IS USED TO DETECT RETRIES «, t00=0x0009, t01=0x013a}
0x0f72…0f96 Head {h00=0x0020, h01=0x0050, text=»RETRY DATA 0 MAX NO OF TRIES«, t00=0x0009, t01=0x0166}
0x0f96…0f9e Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x018a}
0x0f9e…0fa8 (10, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0004}
0x0fa8…0fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x000e}
0x0fb2…0fec Head {h00=0x0036, h01=0x0050, text=»* TABLE FOR CONVERSION FROM LOGICAL TO PHYSICAL «, t00=0x000a, t01=0x0018}
0x0fec…1006 Head {h00=0x0016, h01=0x0050, text=»* SECTOR NUMBER «, t00=0x000a, t01=0x0052}
0x1006…1010 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006c}
0x1010…101a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0076}
0x101a…105e Head {h00=0x0040, h01=0x0050, text=»SECTAB DATA /0003,/0609,/0C0F,/0205,/080B,/0E01,/0407,/0A0D «, t00=0x000a, t01=0x0080}
0x105e…109c Head {h00=0x003a, h01=0x0050, text=» DATA /1013,/1619,/1C1F,/1215,/181B,/1E11,/1417,/1A1D «, t00=0x000a, t01=0x00c4}
0x109c…10b4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x000a, t01=0x0102}
0x10b4…10be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011a}
0x10be…10c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0124}
0x10c8…10e2 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000a, t01=0x012e}
0x10e2…10fc Head {h00=0x0016, h01=0x0050, text=»* * «, t00=0x000a, t01=0x0148}
0x10fc…1116 Head {h00=0x0016, h01=0x0050, text=»* ACTIVATION * «, t00=0x000a, t01=0x0162}
0x1116…1130 Head {h00=0x0016, h01=0x0050, text=»* * «, t00=0x000a, t01=0x017c}
0x1130…114a Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000b, t01=0x0008}
0x114a…1154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0022}
0x1154…1178 Head {h00=0x0020, h01=0x0050, text=»DUAD EQU * ACTIVATION ENTRY «, t00=0x000b, t01=0x002c}
0x1178…118e Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x000b, t01=0x0050}
0x118e…11a4 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FFF«, t00=0x000b, t01=0x0066}
0x11a4…11d0 Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A6 GET OTHER DISC UNIT DWT «, t00=0x000b, t01=0x007c}
0x11d0…1202 Head {h00=0x002e, h01=0x0050, text=» ANS A1,DWTST,A2 SET OTHER DISC UNIT BUSY «, t00=0x000b, t01=0x00a8}
0x1202…120e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00da}
0x120e…1216 Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00e6}
0x1216…121e Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00ee}
0x121e…123a Head {h00=0x0018, h01=0x0050, text=» SUK A5,4 STACK BASE«, t00=0x000b, t01=0x00f6}
0x123a…125e Head {h00=0x0020, h01=0x0050, text=» LDK A4,RY1 RETRY COUNT = 1 «, t00=0x000b, t01=0x0112}
0x125e…1282 Head {h00=0x0020, h01=0x0050, text=» ST A4,RETRY MAX NO OF TRIES«, t00=0x000b, t01=0x0136}
0x1282…12a4 Head {h00=0x001e, h01=0x0050, text=» LC A1,DWTOR,A6 GET INDEX «, t00=0x000b, t01=0x015a}
0x12a4…12b6 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x000b, t01=0x017c}
0x12b6…12c8 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A1«, t00=0x000b, t01=0x018e}
0x12c8…12da Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x000c, t01=0x0010}
0x12da…12f2 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTBSY,A1«, t00=0x000c, t01=0x0022}
0x12f2…1312 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:10 DISC READY«, t00=0x000c, t01=0x003a}
0x1312…1324 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x000c, t01=0x005a}
0x1324…134c Head {h00=0x0024, h01=0x0050, text=» RF(Z) DUA:10 TEST STATUS ORDER «, t00=0x000c, t01=0x006c}
0x134c…1376 Head {h00=0x0026, h01=0x0050, text=» LDK A1,/80 DISC HAS BECOME READY «, t00=0x000c, t01=0x0094}
0x1376…138a Head {h00=0x0010, h01=0x0050, text=» ABL END:15 «, t00=0x000c, t01=0x00be}
0x138a…1398 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00d2}
0x1398…13a0 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00e0}
0x13a0…13a8 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00e8}
0x13a8…13c6 Head {h00=0x001a, h01=0x0050, text=»DUA:10 LDR A1,A7 ORDER«, t00=0x000c, t01=0x00f0}
0x13c6…13e8 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DU:010 TEST STATUS «, t00=0x000c, t01=0x010e}
0x13e8…13fa Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000c, t01=0x0130}
0x13fa…141a Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:30 BASIC READ«, t00=0x000c, t01=0x0142}
0x141a…142c Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000c, t01=0x0162}
0x142c…144e Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUA:30 BASIC WRITE «, t00=0x000c, t01=0x0174}
0x144e…1462 Head {h00=0x0010, h01=0x0050, text=» SUK A1,12 «, t00=0x000d, t01=0x0008}
0x1462…1486 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:20 PHYSICAL READ «, t00=0x000d, t01=0x001c}
0x1486…1498 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000d, t01=0x0040}
0x1498…14bc Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:20 PHYSICAL WRITE«, t00=0x000d, t01=0x0052}
0x14bc…14c4 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0076}
0x14c4…14d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x007e}
0x14d2…14da Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x008c}
0x14da…14e2 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0094}
0x14e2…1508 Head {h00=0x0022, h01=0x0050, text=»DUERR ABL DISIOE REQUEST ERROR«, t00=0x000d, t01=0x009c}
0x1508…1510 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00c2}
0x1510…1518 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00ca}
0x1518…1542 Head {h00=0x0026, h01=0x0050, text=»DUA:20 LDK A4,RY4 RETRY COUNT = 4 «, t00=0x000d, t01=0x00d2}
0x1542…154a Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00fc}
0x154a…156e Head {h00=0x0020, h01=0x0050, text=» ST A4,RETRY MAX NO OF TRIES«, t00=0x000d, t01=0x0104}
0x156e…1576 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0128}
0x1576…15a0 Head {h00=0x0026, h01=0x0050, text=»DUA:30 LD A1,4,A8 REQUESTED LENGTH«, t00=0x000d, t01=0x0130}
0x15a0…15b8 Head {h00=0x0014, h01=0x0050, text=» SUKL A1,LENGTH «, t00=0x000d, t01=0x015a}
0x15b8…15e4 Head {h00=0x0028, h01=0x0050, text=» RB(NZ) DUERR REQUESTED LENGTH # 410«, t00=0x000d, t01=0x0172}
0x15e4…15fc Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x000e, t01=0x000e}
0x15fc…1604 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0026}
0x1604…160c Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x002e}
0x160c…1638 Head {h00=0x0028, h01=0x0050, text=» LD A2,10,A8 RELATIVE SECTOR NUMBER «, t00=0x000e, t01=0x0036}
0x1638…164a Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000e, t01=0x0062}
0x164a…1674 Head {h00=0x0026, h01=0x0050, text=» ANK A3,/1F LOGICAL SECTOR NUMBER «, t00=0x000e, t01=0x0074}
0x1674…16a4 Head {h00=0x002c, h01=0x0050, text=» LC A3,SECTAB,A3 PHYSICAL SECTOR NUMBER «, t00=0x000e, t01=0x009e}
0x16a4…16c4 Head {h00=0x001c, h01=0x0050, text=» SC A3,DWTSEC,A6 SAVE IT«, t00=0x000e, t01=0x00ce}
0x16c4…16cc Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00ee}
0x16cc…16d4 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00f6}
0x16d4…16f6 Head {h00=0x001e, h01=0x0050, text=» SRL A2,5 CYLINDER NUMBER «, t00=0x000e, t01=0x00fe}
0x16f6…170e Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTCMX,A6«, t00=0x000e, t01=0x0120}
0x170e…1740 Head {h00=0x002e, h01=0x0050, text=» RB(G) DUERR CYLINDER NO GREATER THAN MAX.«, t00=0x000e, t01=0x0138}
0x1740…1748 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x016a}
0x1748…1750 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0172}
0x1750…1758 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x017a}
0x1758…1796 Head {h00=0x003a, h01=0x0050, text=» CW A2,DWTCYL,A6 COMPARE WITH CURRENT CYLINDER NUMBER «, t00=0x000e, t01=0x0182}
0x1796…17c8 Head {h00=0x002e, h01=0x0050, text=» RF(E) DU:030 DISC HEAD ALREADT POSITIONED«, t00=0x000f, t01=0x0030}
0x17c8…17f6 Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTCYL,A6 SAVE CYLINDER NUMBER «, t00=0x000f, t01=0x0062}
0x17f6…17fe Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0090}
0x17fe…1816 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x000f, t01=0x0098}
0x1816…181e Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x00b0}
0x181e…1826 Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x00b8}
0x1826…1830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c0}
0x1830…1850 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000f, t01=0x00ca}
0x1850…1870 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x000f, t01=0x00ea}
0x1870…1890 Head {h00=0x001c, h01=0x0050, text=»* SEEK SECTOR N *«, t00=0x000f, t01=0x010a}
0x1890…18b0 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x000f, t01=0x012a}
0x18b0…18d0 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000f, t01=0x014a}
0x18d0…18da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x016a}
0x18da…1904 Head {h00=0x0026, h01=0x0050, text=»DU:010 CF A5,SEEK SEEK CYLINDER N «, t00=0x000f, t01=0x0174}
0x1904…1916 Head {h00=0x000e, h01=0x0050, text=» SLC A1,6 «, t00=0x0010, t01=0x000e}
0x1916…1940 Head {h00=0x0026, h01=0x0050, text=» RF(NN) DU:030 OK. SEEK COMPLETED «, t00=0x0010, t01=0x0020}
0x1940…1948 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x004a}
0x1948…1950 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0052}
0x1950…195a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x005a}
0x195a…197a Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x0064}
0x197a…199a Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0010, t01=0x0084}
0x199a…19ba Head {h00=0x001c, h01=0x0050, text=»* SEEK CYLINDER 0 *«, t00=0x0010, t01=0x00a4}
0x19ba…19da Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0010, t01=0x00c4}
0x19da…19fa Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x00e4}
0x19fa…1a04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0104}
0x1a04…1a2e Head {h00=0x0026, h01=0x0050, text=»DU:015 CF A5,SEEKZ SEEK CYLINDER 0«, t00=0x0010, t01=0x010e}
0x1a2e…1a40 Head {h00=0x000e, h01=0x0050, text=» SLC A1,6 «, t00=0x0010, t01=0x0138}
0x1a40…1a68 Head {h00=0x0024, h01=0x0050, text=» RF(N) DU:020 SECTOR 0 NOT FOUND«, t00=0x0010, t01=0x014a}
0x1a68…1a7a Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0010, t01=0x0172}
0x1a7a…1a9a Head {h00=0x001c, h01=0x0050, text=» RB(NZ) DU:010 TRY AGAIN«, t00=0x0010, t01=0x0184}
0x1a9a…1aa2 Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x0014}
0x1aa2…1ad0 Head {h00=0x002a, h01=0x0050, text=»DU:020 LDKL A3,/FFFF ALL RETRIES DONE «, t00=0x0011, t01=0x001c}
0x1ad0…1b04 Head {h00=0x0030, h01=0x0050, text=» ST A3,DWTCYL,A6 SET ILLEGAL CYLINDER NUMBER«, t00=0x0011, t01=0x004a}
0x1b04…1b30 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,/200 SEEK ERROR RETURN CODE«, t00=0x0011, t01=0x007e}
0x1b30…1b52 Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM ENDIO «, t00=0x0011, t01=0x00aa}
0x1b52…1b6a Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0011, t01=0x00cc}
0x1b6a…1b72 Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x00e4}
0x1b72…1b7a Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x00ec}
0x1b7a…1b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f4}
0x1b84…1ba6 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0011, t01=0x00fe}
0x1ba6…1bc8 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0011, t01=0x0120}
0x1bc8…1bea Head {h00=0x001e, h01=0x0050, text=»* GO AND EXECUTE ORDER *«, t00=0x0011, t01=0x0142}
0x1bea…1c0c Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0011, t01=0x0164}
0x1c0c…1c2e Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0011, t01=0x0186}
0x1c2e…1c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0018}
0x1c38…1c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0022}
0x1c42…1c60 Head {h00=0x001a, h01=0x0050, text=»DU:030 LDR A1,A7 ORDER«, t00=0x0012, t01=0x002c}
0x1c60…1c80 Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEST TEST STATUS «, t00=0x0012, t01=0x004a}
0x1c80…1c92 Head {h00=0x000e, h01=0x0050, text=» SUK A1,5 «, t00=0x0012, t01=0x006a}
0x1c92…1cb4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRIT:N BASIC WRITE «, t00=0x0012, t01=0x007c}
0x1cb4…1cc6 Head {h00=0x000e, h01=0x0050, text=» SUK A1,12«, t00=0x0012, t01=0x009e}
0x1cc6…1ce2 Head {h00=0x0018, h01=0x0050, text=» RF(NP) READ:N READ «, t00=0x0012, t01=0x00b0}
0x1ce2…1cea Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00cc}
0x1cea…1cf2 Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00d4}
0x1cf2…1cfa Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00dc}
0x1cfa…1d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e4}
0x1d04…1d24 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0012, t01=0x00ee}
0x1d24…1d44 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0012, t01=0x010e}
0x1d44…1d64 Head {h00=0x001c, h01=0x0050, text=»* READ SECTOR N-1 *«, t00=0x0012, t01=0x012e}
0x1d64…1d84 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0012, t01=0x014e}
0x1d84…1da4 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0012, t01=0x016e}
0x1da4…1dae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x018e}
0x1dae…1de2 Head {h00=0x0030, h01=0x0050, text=»P:WRIT CF A5,WER:R5 EXECUTE WER INSTRUCTIONS«, t00=0x0013, t01=0x0008}
0x1de2…1e06 Head {h00=0x0020, h01=0x0050, text=» CF A5,READ5 READ FIVE WORDS«, t00=0x0013, t01=0x003c}
0x1e06…1e18 Head {h00=0x000e, h01=0x0050, text=» ANK A1,2 «, t00=0x0013, t01=0x0060}
0x1e18…1e48 Head {h00=0x002c, h01=0x0050, text=» RF(Z) P:WR10 OK. CHECK CYLINDER NUMBER «, t00=0x0013, t01=0x0072}
0x1e48…1e72 Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0013, t01=0x00a2}
0x1e72…1e9a Head {h00=0x0024, h01=0x0050, text=» ABL(Z) END:IO ALL RETRIES DONE «, t00=0x0013, t01=0x00cc}
0x1e9a…1eb6 Head {h00=0x0018, h01=0x0050, text=» RB P:WRIT TRY AGAIN«, t00=0x0013, t01=0x00f4}
0x1eb6…1ebe Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0110}
0x1ebe…1ed6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0013, t01=0x0118}
0x1ed6…1ede Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0130}
0x1ede…1ee6 Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0138}
0x1ee6…1f14 Head {h00=0x002a, h01=0x0050, text=»P:WR10 LD A2,DWTCYL,A6 CYLINDER NUMBER«, t00=0x0013, t01=0x0140}
0x1f14…1f4e Head {h00=0x0036, h01=0x0050, text=» CW A2,BUF+1 COMPARE WITH CURRENT CYLINDER NUMBER «, t00=0x0013, t01=0x016e}
0x1f4e…1f7a Head {h00=0x0028, h01=0x0050, text=» RB(NE) DU:015 ERROR.SEEK CYLINDER 0«, t00=0x0014, t01=0x0018}
0x1f7a…1f82 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0044}
0x1f82…1f8a Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x004c}
0x1f8a…1f92 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0054}
0x1f92…1f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005c}
0x1f9c…1fba Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0014, t01=0x0066}
0x1fba…1fd8 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0014, t01=0x0084}
0x1fd8…1ff6 Head {h00=0x001a, h01=0x0050, text=»* WRITE SECTOR N * «, t00=0x0014, t01=0x00a2}
0x1ff6…2014 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0014, t01=0x00c0}
0x2014…2032 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0014, t01=0x00de}
0x2032…203c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fc}
0x203c…2070 Head {h00=0x0030, h01=0x0050, text=»WRIT:N CF A5,WER:W EXECUTE WER INSTRUCTIONS «, t00=0x0014, t01=0x0106}
0x2070…2094 Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITE WRITE SECTOR N «, t00=0x0014, t01=0x013a}
0x2094…20a8 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x0014, t01=0x015e}
0x20a8…20d0 Head {h00=0x0024, h01=0x0050, text=» RF(Z) WRIT20 OK. NO RETURN CODE«, t00=0x0014, t01=0x0172}
0x20d0…20fa Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0015, t01=0x000a}
0x20fa…2122 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) END:IO ALL RETRIES DONE «, t00=0x0015, t01=0x0034}
0x2122…213e Head {h00=0x0018, h01=0x0050, text=» RB WRIT:N TRY AGAIN«, t00=0x0015, t01=0x005c}
0x213e…2146 Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0078}
0x2146…2158 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0015, t01=0x0080}
0x2158…2170 Head {h00=0x0014, h01=0x0050, text=»WRIT20 CWK A7,5 «, t00=0x0015, t01=0x0092}
0x2170…2192 Head {h00=0x001e, h01=0x0050, text=» ABL(E) END:IO BASIC WRITE«, t00=0x0015, t01=0x00aa}
0x2192…21bc Head {h00=0x0026, h01=0x0050, text=» LDKL A3,BUF DRIVER BUFFER ADDRESS«, t00=0x0015, t01=0x00cc}
0x21bc…21c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00f6}
0x21c8…21da Head {h00=0x000e, h01=0x0050, text=» IFF RAW=1«, t00=0x0015, t01=0x0102}
0x21da…2202 Head {h00=0x0024, h01=0x0050, text=»WRIT20 ABL END:IO PERFORM END:IO«, t00=0x0015, t01=0x0114}
0x2202…220e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x013c}
0x220e…2226 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0015, t01=0x0148}
0x2226…222e Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0160}
0x222e…2236 Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0168}
0x2236…2240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0170}
0x2240…225e Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0015, t01=0x017a}
0x225e…227c Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x0016, t01=0x0008}
0x227c…229a Head {h00=0x001a, h01=0x0050, text=»* READ SECTOR N *«, t00=0x0016, t01=0x0026}
0x229a…22b8 Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x0016, t01=0x0044}
0x22b8…22d6 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0016, t01=0x0062}
0x22d6…22e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0080}
0x22e0…2314 Head {h00=0x0030, h01=0x0050, text=»READ:N CF A5,WER:R EXECUTE WER INSTRUCTIONS «, t00=0x0016, t01=0x008a}
0x2314…2336 Head {h00=0x001e, h01=0x0050, text=» CF A5,READ READ SECTOR N «, t00=0x0016, t01=0x00be}
0x2336…2348 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0016, t01=0x00e0}
0x2348…2370 Head {h00=0x0024, h01=0x0050, text=» RF(Z) READ10 OK. NO RETURN CODE«, t00=0x0016, t01=0x00f2}
0x2370…239a Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0016, t01=0x011a}
0x239a…23c2 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) END:IO ALL RETRIES DONE «, t00=0x0016, t01=0x0144}
0x23c2…23de Head {h00=0x0018, h01=0x0050, text=» RB READ:N TRY AGAIN«, t00=0x0016, t01=0x016c}
0x23de…23e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0188}
0x23e8…240c (23, 0, 398) Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0017, t01=0x0004}
0x240c…2430 Head {h00=0x0020, h01=0x0050, text=»* * «, t00=0x0017, t01=0x0028}
0x2430…2454 Head {h00=0x0020, h01=0x0050, text=»* CHECK CYLINDER NUMBER * «, t00=0x0017, t01=0x004c}
0x2454…2478 Head {h00=0x0020, h01=0x0050, text=»* * «, t00=0x0017, t01=0x0070}
0x2478…249c Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0017, t01=0x0094}
0x249c…24a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b8}
0x24a6…24b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c2}
0x24b0…24e8 Head {h00=0x0034, h01=0x0050, text=»READ10 LD A2,DWTCYL,A6 REQUESTED CYLINDER NUMBER«, t00=0x0017, t01=0x00cc}
0x24e8…2522 Head {h00=0x0036, h01=0x0050, text=» CW* A2,2,A8 COMPARE WITH CURRENT CYLINDER NUMBER «, t00=0x0017, t01=0x0104}
0x2522…2550 Head {h00=0x002a, h01=0x0050, text=» RB(NE) DU:015 ERROR. SEEK CYLINDER 0 «, t00=0x0017, t01=0x013e}
0x2550…2576 Head {h00=0x0022, h01=0x0050, text=» ABL END:IO 0K. PEABLORM ENDIO«, t00=0x0017, t01=0x016c}
0x2576…258e (24, 0, 400) Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0018, t01=0x0004}
0x258e…2596 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x001c}
0x2596…259e Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0024}
0x259e…25a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x002c}
0x25a8…25c6 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0018, t01=0x0036}
0x25c6…25e4 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0018, t01=0x0054}
0x25e4…2602 Head {h00=0x001a, h01=0x0050, text=»* TEST STATUS * «, t00=0x0018, t01=0x0072}
0x2602…2620 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0018, t01=0x0090}
0x2620…263e Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0018, t01=0x00ae}
0x263e…2648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00cc}
0x2648…2680 Head {h00=0x0034, h01=0x0050, text=»TEST LDKL A2,DWTNAM VOLUME NAME DWT DISPLACEMENT«, t00=0x0018, t01=0x00d6}
0x2680…2692 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0018, t01=0x010e}
0x2692…26b4 Head {h00=0x001e, h01=0x0050, text=» LC A3,DWTOR,A6 DWT INDEX «, t00=0x0018, t01=0x0120}
0x26b4…26c6 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0018, t01=0x0142}
0x26c6…26e6 Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEST10 FIXED DISC«, t00=0x0018, t01=0x0154}
0x26e6…2706 Head {h00=0x001c, h01=0x0050, text=» ADK A2,6 CARTRIDGE DISC«, t00=0x0018, t01=0x0174}
0x2706…273c (25, 0, 400) Head {h00=0x0032, h01=0x0050, text=»TEST10 ST A2,10,A8 SAVE ADDRESS TO VOLUME NAME«, t00=0x0019, t01=0x0004}
0x273c…2760 Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 SET RETURN CODE=0«, t00=0x0019, t01=0x003a}
0x2760…2782 Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PEABLORM ENDIO«, t00=0x0019, t01=0x005e}
0x2782…279a Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0019, t01=0x0080}
0x279a…27a2 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0098}
0x27a2…27aa Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x00a0}
0x27aa…27b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00a8}
0x27b4…27da Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0019, t01=0x00b2}
0x27da…2800 Head {h00=0x0022, h01=0x0050, text=»* *«, t00=0x0019, t01=0x00d8}
0x2800…2826 Head {h00=0x0022, h01=0x0050, text=»* EXECUTE WER INSTRUCTIONS *«, t00=0x0019, t01=0x00fe}
0x2826…284c Head {h00=0x0022, h01=0x0050, text=»* *«, t00=0x0019, t01=0x0124}
0x284c…2872 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0019, t01=0x014a}
0x2872…287c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0170}
0x287c…28a6 Head {h00=0x0026, h01=0x0050, text=»WER:R5 LDKL A2,/8005 READ 5 WORDS «, t00=0x0019, t01=0x017a}
0x28a6…28d0 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,BUF DRIVER BUFFER ADDRESS«, t00=0x001a, t01=0x0014}
0x28d0…28e2 Head {h00=0x000e, h01=0x0050, text=» RF EX:WER«, t00=0x001a, t01=0x003e}
0x28e2…28ea Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0050}
0x28ea…28f2 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0058}
0x28f2…291c Head {h00=0x0026, h01=0x0050, text=»WER:R LDKL A2,/80CD READ 1 SECTOR «, t00=0x001a, t01=0x0060}
0x291c…2930 Head {h00=0x0010, h01=0x0050, text=» CWK A3,BUF «, t00=0x001a, t01=0x008a}
0x2930…2946 Head {h00=0x0012, h01=0x0050, text=» RF(E) EX:WER «, t00=0x001a, t01=0x009e}
0x2946…2958 Head {h00=0x000e, h01=0x0050, text=» RF WER:WB«, t00=0x001a, t01=0x00b4}
0x2958…2960 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00c6}
0x2960…2968 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00ce}
0x2968…2992 Head {h00=0x0026, h01=0x0050, text=»WER:W LDKL A2,/C0CD WRITE 1 SECTOR«, t00=0x001a, t01=0x00d6}
0x2992…29c0 Head {h00=0x002a, h01=0x0050, text=»WER:WB LD A3,2,A8 USER BUFFER ADDRESS «, t00=0x001a, t01=0x0100}
0x29c0…29c8 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x012e}
0x29c8…29d0 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0136}
0x29d0…29fc Head {h00=0x0028, h01=0x0050, text=»EX:WER EX DWTWR1,A6 EXECUTE 1:ST WER«, t00=0x001a, t01=0x013e}
0x29fc…2a22 Head {h00=0x0022, h01=0x0050, text=» EX DWTWR2,A6 EXECUTE 2:ND WER«, t00=0x001a, t01=0x016a}
0x2a22…2a32 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x001a, t01=0x0190}
0x2a32…2a4a Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001b, t01=0x0010}
0x2a4a…2a52 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0028}
0x2a52…2a5a Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0030}
0x2a5a…2a64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0038}
0x2a64…2a80 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001b, t01=0x0042}
0x2a80…2a9c Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x001b, t01=0x005e}
0x2a9c…2ab8 Head {h00=0x0018, h01=0x0050, text=»* SEEK CYLINDER * «, t00=0x001b, t01=0x007a}
0x2ab8…2ad4 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x001b, t01=0x0096}
0x2ad4…2af0 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001b, t01=0x00b2}
0x2af0…2afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ce}
0x2afa…2b26 Head {h00=0x0028, h01=0x0050, text=»SEEK LD A2,DWTCYL,A6 CYLINDER NUMBER«, t00=0x001b, t01=0x00d8}
0x2b26…2b38 Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x001b, t01=0x0104}
0x2b38…2b4a Head {h00=0x000e, h01=0x0050, text=» ORK A2,2 «, t00=0x001b, t01=0x0116}
0x2b4a…2b6c Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001b, t01=0x0128}
0x2b6c…2b74 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x014a}
0x2b74…2b7c Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0152}
0x2b7c…2b90 Head {h00=0x0010, h01=0x0050, text=»SEEKZ EQU * «, t00=0x001b, t01=0x015a}
0x2b90…2ba2 Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x001b, t01=0x016e}
0x2ba2…2bc4 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001b, t01=0x0180}
0x2bc4…2bcc Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0012}
0x2bcc…2bd4 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x001a}
0x2bd4…2c00 Head {h00=0x0028, h01=0x0050, text=»READ5 LC A2,DWTSEC,A6 SECTOR NUMBER «, t00=0x001c, t01=0x0022}
0x2c00…2c14 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x001c, t01=0x004e}
0x2c14…2c30 Head {h00=0x0018, h01=0x0050, text=» SUK A2,3 SECTOR N-1«, t00=0x001c, t01=0x0062}
0x2c30…2c44 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x001c, t01=0x007e}
0x2c44…2c56 Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x001c, t01=0x0092}
0x2c56…2c78 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001c, t01=0x00a4}
0x2c78…2c90 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001c, t01=0x00c6}
0x2c90…2c98 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00de}
0x2c98…2ca0 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00e6}
0x2ca0…2cca Head {h00=0x0026, h01=0x0050, text=»READ LC A2,DWTSEC,A6 SECTOR NUMBER«, t00=0x001c, t01=0x00ee}
0x2cca…2cde Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x001c, t01=0x0118}
0x2cde…2cf0 Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x001c, t01=0x012c}
0x2cf0…2d12 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001c, t01=0x013e}
0x2d12…2d1a Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0160}
0x2d1a…2d22 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0168}
0x2d22…2d50 Head {h00=0x002a, h01=0x0050, text=»WRITE LD A2,DWTCYL,A6 CYLINDER NUMBER «, t00=0x001c, t01=0x0170}
0x2d50…2d80 Head {h00=0x002c, h01=0x0050, text=» ST* A2,2,A8 PUT CYLNMB. IN USER BUFFER «, t00=0x001d, t01=0x000e}
0x2d80…2da6 Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTSEC,A6 SECTOR NUMBER«, t00=0x001d, t01=0x003e}
0x2da6…2db8 Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x001d, t01=0x0064}
0x2db8…2dca Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x001d, t01=0x0076}
0x2dca…2de2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001d, t01=0x0088}
0x2de2…2dea Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00a0}
0x2dea…2df2 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00a8}
0x2df2…2dfa Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00b0}
0x2dfa…2e0c Head {h00=0x000e, h01=0x0050, text=»CIO EQU * «, t00=0x001d, t01=0x00b8}
0x2e0c…2e14 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00ca}
0x2e14…2e1c Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00d2}
0x2e1c…2e3a Head {h00=0x001a, h01=0x0050, text=»EX:CIO LC A1,DWTOR,A6 «, t00=0x001d, t01=0x00da}
0x2e3a…2e52 Head {h00=0x0014, h01=0x0050, text=» ANK A1,1 INDEX «, t00=0x001d, t01=0x00f8}
0x2e52…2e72 Head {h00=0x001c, h01=0x0050, text=» ADR A1,A1 DOUBLE INDEX «, t00=0x001d, t01=0x0110}
0x2e72…2e84 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x001d, t01=0x0130}
0x2e84…2eac Head {h00=0x0024, h01=0x0050, text=» EX DWTCIO,A1 EXECUTE CIO-START «, t00=0x001d, t01=0x0142}
0x2eac…2eb4 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x016a}
0x2eb4…2ebc Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0172}
0x2ebc…2ee6 Head {h00=0x0026, h01=0x0050, text=»SAVE ST A2,DWTA2,A6 SAVE REGS. A2 «, t00=0x001d, t01=0x017a}
0x2ee6…2f0c Head {h00=0x0022, h01=0x0050, text=» ST A4,DWTA4,A6 A4 «, t00=0x001e, t01=0x0014}
0x2f0c…2f32 Head {h00=0x0022, h01=0x0050, text=» ST A5,DWTA5,A6 A5 «, t00=0x001e, t01=0x003a}
0x2f32…2f5c Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x001e, t01=0x0060}
0x2f5c…2f74 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001e, t01=0x008a}
0x2f74…2f7c Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00a2}
0x2f7c…2f84 Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00aa}
0x2f84…2f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b2}
0x2f8e…2fac Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x001e, t01=0x00bc}
0x2fac…2fca Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x001e, t01=0x00da}
0x2fca…2fe8 Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINE *«, t00=0x001e, t01=0x00f8}
0x2fe8…3006 Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x001e, t01=0x0116}
0x3006…3024 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x001e, t01=0x0134}
0x3024…302e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0152}
0x302e…3066 Head {h00=0x0034, h01=0x0050, text=»DUON CF A15,SAVE8 SAVE REGS. A1-A8 ON A15 STACK «, t00=0x001e, t01=0x015c}
0x3066…307e (31, 0, 400) Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x001f, t01=0x0004}
0x307e…3086 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x001c}
0x3086…30b0 Head {h00=0x0026, h01=0x0050, text=» LD A1,INIFLG INITIALIZATION FLAG «, t00=0x001f, t01=0x0024}
0x30b0…30ce Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON08 POWER UP«, t00=0x001f, t01=0x004e}
0x30ce…30d6 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x006c}
0x30d6…30de Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0074}
0x30de…30f2 Head {h00=0x0010, h01=0x0050, text=»DURED2 EQU *«, t00=0x001f, t01=0x007c}
0x30f2…3108 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FFF«, t00=0x001f, t01=0x0090}
0x3108…3134 Head {h00=0x0028, h01=0x0050, text=» ANS A1,DWTST,A6 SET DISC UNIT BUSY «, t00=0x001f, t01=0x00a6}
0x3134…315c Head {h00=0x0024, h01=0x0050, text=»DUON05 LDKL A5,DWTSB2 STACK BASE«, t00=0x001f, t01=0x00d2}
0x315c…3174 Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x001f, t01=0x00fa}
0x3174…3192 Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x001f, t01=0x0112}
0x3192…31b8 Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM GET VOLUME NAME «, t00=0x001f, t01=0x0130}
0x31b8…31ce Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x001f, t01=0x0156}
0x31ce…31dc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x016c}
0x31dc…31e4 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x017a}
0x31e4…31fa Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x001f, t01=0x0182}
0x31fa…322a Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS «, t00=0x0020, t01=0x0008}
0x322a…3242 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x0020, t01=0x0038}
0x3242…3260 Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x0020, t01=0x0050}
0x3260…3268 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x006e}
0x3268…3270 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0076}
0x3270…3286 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FFF«, t00=0x0020, t01=0x007e}
0x3286…32ac Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 SET DWT BUSY «, t00=0x0020, t01=0x0094}
0x32ac…32b4 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00ba}
0x32b4…32bc Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00c2}
0x32bc…32e2 Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM GET VOLUME NAME «, t00=0x0020, t01=0x00ca}
0x32e2…3306 Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0020, t01=0x00f0}
0x3306…3312 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0114}
0x3312…331a Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0120}
0x331a…3336 Head {h00=0x0018, h01=0x0050, text=» RB T:DISP DISPATCH «, t00=0x0020, t01=0x0128}
0x3336…3340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0144}
0x3340…334a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014e}
0x334a…3366 Head {h00=0x0018, h01=0x0050, text=»* READY INTERRUPT«, t00=0x0020, t01=0x0158}
0x3366…3370 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0174}
0x3370…338a Head {h00=0x0016, h01=0x0050, text=»DUREDY LD A1,TIMER«, t00=0x0020, t01=0x017e}
0x338a…33b0 Head {h00=0x0022, h01=0x0050, text=» RB(Z) DURED2 NO TIMER ACTIVE «, t00=0x0021, t01=0x0008}
0x33b0…33d0 Head {h00=0x001c, h01=0x0050, text=» RB T:DISP TIMER ACTIVE «, t00=0x0021, t01=0x002e}
0x33d0…33de Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x004e}
0x33de…33f2 Head {h00=0x0010, h01=0x0050, text=»DUON08 EQU *«, t00=0x0021, t01=0x005c}
0x33f2…3414 Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 THROUGHPUT ERROR«, t00=0x0021, t01=0x0070}
0x3414…343a Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT STATUS«, t00=0x0021, t01=0x0092}
0x343a…345a Head {h00=0x001c, h01=0x0050, text=» RF(N) DUON10 UNIT FREE «, t00=0x0021, t01=0x00b8}
0x345a…347e Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0021, t01=0x00d8}
0x347e…3486 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00fc}
0x3486…348e Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0104}
0x348e…34a2 Head {h00=0x0010, h01=0x0050, text=»DUON10 EQU *«, t00=0x0021, t01=0x010c}
0x34a2…34b8 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0021, t01=0x0120}
0x34b8…34e0 Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU02 DISC UNIT NO. 2 «, t00=0x0021, t01=0x0136}
0x34e0…3502 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STSTUS«, t00=0x0021, t01=0x015e}
0x3502…3522 Head {h00=0x001c, h01=0x0050, text=» RF(N) DUON20 UNIT FREE «, t00=0x0021, t01=0x0180}
0x3522…3546 Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0022, t01=0x0010}
0x3546…3552 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0034}
0x3552…355c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0040}
0x355c…3584 Head {h00=0x0024, h01=0x0050, text=»* SET DISC BUSY AND START TIMER«, t00=0x0022, t01=0x004a}
0x3584…358e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0072}
0x358e…35aa Head {h00=0x0018, h01=0x0050, text=»DUON20 LDKL A1,/7FFF«, t00=0x0022, t01=0x007c}
0x35aa…35c0 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0022, t01=0x0098}
0x35c0…35e6 Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 SET UNIT BUSY«, t00=0x0022, t01=0x00ae}
0x35e6…360c Head {h00=0x0022, h01=0x0050, text=» LDR* A6,A6 OTHER DWT ADDRESS «, t00=0x0022, t01=0x00d4}
0x360c…3618 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00fa}
0x3618…363e Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 SET UNIT BUSY«, t00=0x0022, t01=0x0106}
0x363e…366a Head {h00=0x0028, h01=0x0050, text=» LDKL A4,TIMER TIMER POINTER ADDRESS«, t00=0x0022, t01=0x012c}
0x366a…367e Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A4 «, t00=0x0022, t01=0x0158}
0x367e…36a4 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON30 NO TIMER ACTIVE «, t00=0x0022, t01=0x016c}
0x36a4…36ba (35, 0, 400) Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x0023, t01=0x0004}
0x36ba…36da Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 RESTART TIMER«, t00=0x0023, t01=0x001a}
0x36da…36ec Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0023, t01=0x003a}
0x36ec…36f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x004c}
0x36f6…371e Head {h00=0x0024, h01=0x0050, text=»DUON30 CF A15,SETIMP START TIMER«, t00=0x0023, t01=0x0056}
0x371e…374e Head {h00=0x002c, h01=0x0050, text=» DATA DUON40,TIME TIME OUT ADDRESS, TIME«, t00=0x0023, t01=0x007e}
0x374e…3760 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0023, t01=0x00ae}
0x3760…376a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c0}
0x376a…377e Head {h00=0x0010, h01=0x0050, text=»* TIME-OUT«, t00=0x0023, t01=0x00ca}
0x377e…3788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00de}
0x3788…37a6 Head {h00=0x001a, h01=0x0050, text=»DUON40 LDKL A6,DWDU01 «, t00=0x0023, t01=0x00e8}
0x37a6…37b8 Head {h00=0x000e, h01=0x0050, text=» CM TIMER «, t00=0x0023, t01=0x0106}
0x37b8…37ca Head {h00=0x000e, h01=0x0050, text=» RB DURED2«, t00=0x0023, t01=0x0118}
0x37ca…37e2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0023, t01=0x012a}
0x37e2…37ea Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0142}
0x37ea…37f2 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x014a}
0x37f2…37fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0152}
0x37fc…381c Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0023, t01=0x015c}
0x381c…383c Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0023, t01=0x017c}
0x383c…385c Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT HANDLER * «, t00=0x0024, t01=0x000c}
0x385c…387c Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0024, t01=0x002c}
0x387c…389c Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0024, t01=0x004c}
0x389c…38a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x006c}
0x38a6…38ba Head {h00=0x0010, h01=0x0050, text=»IHDU2 EQU * «, t00=0x0024, t01=0x0076}
0x38ba…38d0 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0024, t01=0x008a}
0x38d0…38f8 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x00a0}
0x38f8…390e Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0024, t01=0x00c8}
0x390e…3936 Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU02 DISC UNIT NO. 2 «, t00=0x0024, t01=0x00de}
0x3936…3948 Head {h00=0x000e, h01=0x0050, text=» RF IHDU10«, t00=0x0024, t01=0x0106}
0x3948…3954 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0118}
0x3954…3966 Head {h00=0x000e, h01=0x0050, text=»IHDU EQU *«, t00=0x0024, t01=0x0124}
0x3966…397a Head {h00=0x0010, h01=0x0050, text=»IHDU1 EQU * «, t00=0x0024, t01=0x0136}
0x397a…39a2 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x014a}
0x39a2…39b8 Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0024, t01=0x0172}
0x39b8…39e0 Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU01 DISC UNIT NO. 1 «, t00=0x0024, t01=0x0188}
0x39e0…39e8 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0020}
0x39e8…39f0 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0028}
0x39f0…3a16 Head {h00=0x0022, h01=0x0050, text=»IHDU10 SST A1,CUADR GET STATUS«, t00=0x0025, t01=0x0030}
0x3a16…3a2c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0025, t01=0x0056}
0x3a2c…3a3e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0025, t01=0x006c}
0x3a3e…3a52 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/40 «, t00=0x0025, t01=0x007e}
0x3a52…3a68 Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHDU20 «, t00=0x0025, t01=0x0092}
0x3a68…3a80 Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU02 «, t00=0x0025, t01=0x00a8}
0x3a80…3a8c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00c0}
0x3a8c…3aa0 Head {h00=0x0010, h01=0x0050, text=»IHDU20 EQU *«, t00=0x0025, t01=0x00cc}
0x3aa0…3ac8 Head {h00=0x0024, h01=0x0050, text=» ANKL A1,/440F MASK RETURN CODE «, t00=0x0025, t01=0x00e0}
0x3ac8…3ada Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0025, t01=0x0108}
0x3ada…3b00 Head {h00=0x0022, h01=0x0050, text=» RB(N) DUREDY READY INTERRUPT «, t00=0x0025, t01=0x011a}
0x3b00…3b12 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0025, t01=0x0140}
0x3b12…3b1a Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0152}
0x3b1a…3b22 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x015a}
0x3b22…3b3a Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTSAV,A6«, t00=0x0025, t01=0x0162}
0x3b3a…3b4e Head {h00=0x0010, h01=0x0050, text=» RF(NN) GET «, t00=0x0025, t01=0x017a}
0x3b4e…3b60 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0025, t01=0x018e}
0x3b60…3b72 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0026, t01=0x0010}
0x3b72…3ba0 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) END:IO DISC UNIT NOT OPERABLE «, t00=0x0026, t01=0x0022}
0x3ba0…3bb8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0026, t01=0x0050}
0x3bb8…3bc0 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0068}
0x3bc0…3bc8 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0070}
0x3bc8…3bf6 Head {h00=0x002a, h01=0x0050, text=»GET LD A5,DWTA5,A6 RELOAD REGISTERS A5«, t00=0x0026, t01=0x0078}
0x3bf6…3c22 Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTA4,A6 A4 «, t00=0x0026, t01=0x00a6}
0x3c22…3c4e Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTA2,A6 A2 «, t00=0x0026, t01=0x00d2}
0x3c4e…3c66 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0026, t01=0x00fe}
0x3c66…3c80 Head {h00=0x0016, h01=0x0050, text=» ANK A7,/FF ORDER «, t00=0x0026, t01=0x0116}
0x3c80…3ca4 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB-ADDRESS«, t00=0x0026, t01=0x0130}
0x3ca4…3cb4 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0026, t01=0x0154}
0x3cb4…3ccc Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0026, t01=0x0164}
0x3ccc…3cd4 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x017c}
0x3cd4…3cdc Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0184}
0x3cdc…3ce6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x018c}
0x3ce6…3d02 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0027, t01=0x0008}
0x3d02…3d1e Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x0027, t01=0x0024}
0x3d1e…3d3a Head {h00=0x0018, h01=0x0050, text=»* PERFORM ENDIO * «, t00=0x0027, t01=0x0040}
0x3d3a…3d56 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x0027, t01=0x005c}
0x3d56…3d72 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0027, t01=0x0078}
0x3d72…3d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0094}
0x3d7c…3d90 Head {h00=0x0010, h01=0x0050, text=»END:IO EQU *«, t00=0x0027, t01=0x009e}
0x3d90…3d98 Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x00b2}
0x3d98…3dbe Head {h00=0x0022, h01=0x0050, text=» ANKL A1,/28F MASK RETURN CODE«, t00=0x0027, t01=0x00ba}
0x3dbe…3dda Head {h00=0x0018, h01=0x0050, text=» RF(NZ) END:10 ERROR«, t00=0x0027, t01=0x00e0}
0x3dda…3e00 Head {h00=0x0022, h01=0x0050, text=» LD A2,4,A8 REQUESTED LENGTH =«, t00=0x0027, t01=0x00fc}
0x3e00…3e24 Head {h00=0x0020, h01=0x0050, text=» ST A2,6,A8 EFFECTIVE LENGTH«, t00=0x0027, t01=0x0122}
0x3e24…3e2c Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0146}
0x3e2c…3e34 Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x014e}
0x3e34…3e48 Head {h00=0x0010, h01=0x0050, text=»END:10 EQU *«, t00=0x0027, t01=0x0156}
0x3e48…3e6c Head {h00=0x0020, h01=0x0050, text=» LD A2,RETRY MAX NO OF TRIES«, t00=0x0027, t01=0x016a}
0x3e6c…3e84 Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTA4,A6 «, t00=0x0027, t01=0x018e}
0x3e84…3ea2 Head {h00=0x001a, h01=0x0050, text=» RF(E) END:15 NO RETRY«, t00=0x0028, t01=0x0016}
0x3ea2…3ec8 Head {h00=0x0022, h01=0x0050, text=» ORKL A1,/100 BIT 7 = RETRIES «, t00=0x0028, t01=0x0034}
0x3ec8…3edc Head {h00=0x0010, h01=0x0050, text=»END:15 EQU *«, t00=0x0028, t01=0x005a}
0x3edc…3efa Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTOR,A6 ORDER «, t00=0x0028, t01=0x006e}
0x3efa…3f12 Head {h00=0x0014, h01=0x0050, text=» ANK A2,1 INDEX «, t00=0x0028, t01=0x008c}
0x3f12…3f24 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x0028, t01=0x00a4}
0x3f24…3f36 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0028, t01=0x00b6}
0x3f36…3f5c Head {h00=0x0022, h01=0x0050, text=» CM DWTBSY,A2 RESET READY WORD«, t00=0x0028, t01=0x00c8}
0x3f5c…3f72 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0028, t01=0x00ee}
0x3f72…3fa2 Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS «, t00=0x0028, t01=0x0104}
0x3fa2…3fc6 Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0028, t01=0x0134}
0x3fc6…3ff6 Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A6 ACTIVE DISC UNIT DWT-ADDRESS«, t00=0x0028, t01=0x0158}
0x3ff6…4002 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0188}
0x4002…4026 (41, 0, 400) Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0029, t01=0x0004}
0x4026…4050 Head {h00=0x0026, h01=0x0050, text=»END:20 ABL TDISP GO TO DISPATCHER «, t00=0x0029, t01=0x0028}
0x4050…405e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0052}
0x405e…4066 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0060}
0x4066…406e Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0068}
0x406e…4092 Head {h00=0x0020, h01=0x0050, text=»VO:NAM LD A1,DWTOR,A6 ORDER «, t00=0x0029, t01=0x0070}
0x4092…40b2 Head {h00=0x001c, h01=0x0050, text=» ST A1,DWTSAV,A6 SAVE IT«, t00=0x0029, t01=0x0094}
0x40b2…40ce Head {h00=0x0018, h01=0x0050, text=» CM DWTOR,A6 INDEX=0«, t00=0x0029, t01=0x00b4}
0x40ce…40e2 Head {h00=0x0010, h01=0x0050, text=»VO:NA5 EQU *«, t00=0x0029, t01=0x00d0}
0x40e2…40ea Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00e4}
0x40ea…40f2 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00ec}
0x40f2…40fa Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00f4}
0x40fa…4122 Head {h00=0x0024, h01=0x0050, text=»DU:NAM CF A5,SEEKZ SEEK SECTOR 0«, t00=0x0029, t01=0x00fc}
0x4122…4138 Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/203 «, t00=0x0029, t01=0x0124}
0x4138…4172 Head {h00=0x0036, h01=0x0050, text=» RF(NZ) VO:NA8 SEEK-,THROUGHPUT-ERROR,NOT OPERABLE«, t00=0x0029, t01=0x013a}
0x4172…41a0 Head {h00=0x002a, h01=0x0050, text=» CF A5,WER:R5 EXECUTE WER INSTRUCTIONS«, t00=0x0029, t01=0x0174}
0x41a0…41c6 Head {h00=0x0022, h01=0x0050, text=» SUR A2,A2 CYLINDER NUMBER = 0«, t00=0x002a, t01=0x0012}
0x41c6…41de Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTCYL,A6«, t00=0x002a, t01=0x0038}
0x41de…4202 Head {h00=0x0020, h01=0x0050, text=» CF A5,CIO READ VOLUME LABEL«, t00=0x002a, t01=0x0050}
0x4202…4214 Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x002a, t01=0x0074}
0x4214…4248 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) VO:NA8 THROUGHPUT-ERROR,NOT OPERABLE«, t00=0x002a, t01=0x0086}
0x4248…4250 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x00ba}
0x4250…4258 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x00c2}
0x4258…4270 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,DWTNAM «, t00=0x002a, t01=0x00ca}
0x4270…4282 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x002a, t01=0x00e2}
0x4282…429a Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOR,A6 «, t00=0x002a, t01=0x00f4}
0x429a…42b6 Head {h00=0x0018, h01=0x0050, text=» ANK A1,1 DISC INDEX«, t00=0x002a, t01=0x010c}
0x42b6…42d6 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUNA10 FIXED DISC«, t00=0x002a, t01=0x0128}
0x42d6…42f6 Head {h00=0x001c, h01=0x0050, text=» ADK A2,6 CARTRIDGE DISC«, t00=0x002a, t01=0x0148}
0x42f6…42fe Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0168}
0x42fe…4306 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0170}
0x4306…4330 Head {h00=0x0026, h01=0x0050, text=»DUNA10 SUR A1,A1 RESET RETURN CODE«, t00=0x002a, t01=0x0178}
0x4330…4356 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,BUF+2 BUFFER ADDRESS «, t00=0x002b, t01=0x0012}
0x4356…4368 Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x002b, t01=0x0038}
0x4368…4370 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x004a}
0x4370…4378 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0052}
0x4378…4380 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x005a}
0x4380…43aa Head {h00=0x0026, h01=0x0050, text=»DUNA20 LDR* A7,A3 GET VOLUME NAME «, t00=0x002b, t01=0x0062}
0x43aa…43dc Head {h00=0x002e, h01=0x0050, text=» CWR* A7,A2 COMPARE WITH LAST VOLUME NAME «, t00=0x002b, t01=0x008c}
0x43dc…43fc Head {h00=0x001c, h01=0x0050, text=» RF(E) DUNA30 SAME DISC «, t00=0x002b, t01=0x00be}
0x43fc…4420 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/80 NEW DISC LOADED «, t00=0x002b, t01=0x00de}
0x4420…4428 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0102}
0x4428…4430 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x010a}
0x4430…4438 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0112}
0x4438…4460 Head {h00=0x0024, h01=0x0050, text=»DUNA30 STR A7,A2 SAVE DISC NAME «, t00=0x002b, t01=0x011a}
0x4460…4484 Head {h00=0x0020, h01=0x0050, text=» ADK A2,2 INCREMENT POINTERS«, t00=0x002b, t01=0x0142}
0x4484…4496 Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x002b, t01=0x0166}
0x4496…44a8 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x002b, t01=0x0178}
0x44a8…44cc Head {h00=0x0020, h01=0x0050, text=» RB(NZ) DUNA20 GET NEXT WORD«, t00=0x002b, t01=0x018a}
0x44cc…44d4 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x001e}
0x44d4…44dc Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0026}
0x44dc…44ee Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002c, t01=0x002e}
0x44ee…4510 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUNA40 VOLUME MATCH«, t00=0x002c, t01=0x0040}
0x4510…452e Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTOR,A6 INDEX «, t00=0x002c, t01=0x0062}
0x452e…4540 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x002c, t01=0x0080}
0x4540…4552 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x002c, t01=0x0092}
0x4552…4564 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x002c, t01=0x00a4}
0x4564…458e Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTBSY,A2 NEW VOLUME LOADED«, t00=0x002c, t01=0x00b6}
0x458e…45a2 Head {h00=0x0010, h01=0x0050, text=»DUNA40 EQU *«, t00=0x002c, t01=0x00e0}
0x45a2…45aa Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x00f4}
0x45aa…45b2 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x00fc}
0x45b2…45d0 Head {h00=0x001a, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER «, t00=0x002c, t01=0x0104}
0x45d0…45e6 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) VO:NA8«, t00=0x002c, t01=0x0122}
0x45e6…45f8 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x002c, t01=0x0138}
0x45f8…4618 Head {h00=0x001c, h01=0x0050, text=» SC A1,DWTOR,A6 INDEX=1 «, t00=0x002c, t01=0x014a}
0x4618…462a Head {h00=0x000e, h01=0x0050, text=» RB VO:NA5«, t00=0x002c, t01=0x016a}
0x462a…4632 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x017c}
0x4632…4666 Head {h00=0x0030, h01=0x0050, text=»VO:NA8 LD A1,DWTSAV,A6 GET OLD DWT CONTENTS «, t00=0x002c, t01=0x0184}
0x4666…4686 Head {h00=0x001c, h01=0x0050, text=» ST A1,DWTOR,A6 SAVE IT «, t00=0x002d, t01=0x0028}
0x4686…469a Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x002d, t01=0x0048}
0x469a…46b2 Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTSAV,A6«, t00=0x002d, t01=0x005c}
0x46b2…46ca Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB1 «, t00=0x002d, t01=0x0074}
0x46ca…46e8 Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x002d, t01=0x008c}
0x46e8…4714 Head {h00=0x0028, h01=0x0050, text=» LDK A1,1 RETURN CODE. NOT OPERABLE «, t00=0x002d, t01=0x00aa}
0x4714…4724 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x00d6}
0x4724…472e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00e6}
0x472e…4738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00f0}
0x4738…4752 Head {h00=0x0016, h01=0x0050, text=»* TIMER POINTER «, t00=0x002d, t01=0x00fa}
0x4752…475c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0114}
0x475c…477e Head {h00=0x001e, h01=0x0050, text=»TIMER DATA 0 TIMER POINTER«, t00=0x002d, t01=0x011e}
0x477e…4796 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x002d, t01=0x0140}
0x4796…479e Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x0158}
0x479e…47a6 Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x0160}
0x47a6…47b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0168}
0x47b0…47de Head {h00=0x002a, h01=0x0050, text=»* DEVICE WORK TABLE DISC UNIT NO. 2 «, t00=0x002d, t01=0x0172}
0x47de…47e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0010}
0x47e8…47f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x001a}
0x47f2…4806 Head {h00=0x0010, h01=0x0050, text=»DWDU02 EQU *«, t00=0x002e, t01=0x0024}
0x4806…481c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x002e, t01=0x0038}
0x481c…4846 Head {h00=0x0026, h01=0x0050, text=» DATA DWDU01 POINTER TO OTHER DWT «, t00=0x002e, t01=0x004e}
0x4846…4864 Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT STATUS«, t00=0x002e, t01=0x0078}
0x4864…4880 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x002e, t01=0x0096}
0x4880…4896 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x002e, t01=0x00b2}
0x4896…48bc Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x002e, t01=0x00c8}
0x48bc…48d8 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x002e, t01=0x00ee}
0x48d8…4900 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x002e, t01=0x010a}
0x4900…491e Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x002e, t01=0x0132}
0x491e…494a Head {h00=0x0028, h01=0x0050, text=» DATA /00FF LEFT BYTE=SECTOR NUMBER «, t00=0x002e, t01=0x0150}
0x494a…4976 Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x002e, t01=0x017c}
0x4976…498e Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x002f, t01=0x0018}
0x498e…49a0 Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x002f, t01=0x0030}
0x49a0…49ca Head {h00=0x0026, h01=0x0050, text=» DATA /80 DISC UNIT BUSY INDICATOR«, t00=0x002f, t01=0x0042}
0x49ca…49dc Head {h00=0x000e, h01=0x0050, text=» DATA /80 «, t00=0x002f, t01=0x006c}
0x49dc…4a04 Head {h00=0x0024, h01=0x0050, text=» RIGHT BYTE = CYLINDER NUMBER «, t00=0x002f, t01=0x007e}
0x4a04…4a30 Head {h00=0x0028, h01=0x0050, text=» CIO A2,1,DAF2 CIO-START FIXED DISC «, t00=0x002f, t01=0x00a6}
0x4a30…4a60 Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,DAC2 CIO-START CARTRIDGE DISC «, t00=0x002f, t01=0x00d2}
0x4a60…4a74 Head {h00=0x0010, h01=0x0050, text=» WER A2,WER1«, t00=0x002f, t01=0x0102}
0x4a74…4a8a Head {h00=0x0012, h01=0x0050, text=» WER A3,WER1+1«, t00=0x002f, t01=0x0116}
0x4a8a…4ab4 Head {h00=0x0026, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME FIXED DISC«, t00=0x002f, t01=0x012c}
0x4ab4…4ae2 Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME CARTRIDGE DISC«, t00=0x002f, t01=0x0156}
0x4ae2…4af2 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x002f, t01=0x0184}
0x4af2…4b12 (48, 0, 400) Head {h00=0x001c, h01=0x0050, text=» DATA /FFFF CYLINDER NO.«, t00=0x0030, t01=0x0004}
0x4b12…4b26 Head {h00=0x0010, h01=0x0050, text=» IFT TYPE2=0«, t00=0x0030, t01=0x0024}
0x4b26…4b4a Head {h00=0x0020, h01=0x0050, text=» DATA MAXCY5 MAX CYLINDER NO«, t00=0x0030, t01=0x0038}
0x4b4a…4b56 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x005c}
0x4b56…4b72 Head {h00=0x0018, h01=0x0050, text=» IFT NUNITS+TYPE2=3 «, t00=0x0030, t01=0x0068}
0x4b72…4b96 Head {h00=0x0020, h01=0x0050, text=» DATA MAXCY6 MAX CYLINDER NO«, t00=0x0030, t01=0x0084}
0x4b96…4ba2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00a8}
0x4ba2…4bba Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0030, t01=0x00b4}
0x4bba…4bc2 Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x00cc}
0x4bc2…4bcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d4}
0x4bcc…4bfa Head {h00=0x002a, h01=0x0050, text=»* DEVICE WORK TABLE DISC UNIT NO. 1 «, t00=0x0030, t01=0x00de}
0x4bfa…4c04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x010c}
0x4c04…4c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0116}
0x4c0e…4c22 Head {h00=0x0010, h01=0x0050, text=»DWDU01 EQU *«, t00=0x0030, t01=0x0120}
0x4c22…4c4c Head {h00=0x0026, h01=0x0050, text=» DATA DWDU02 POINTER TO OTHER DWT «, t00=0x0030, t01=0x0134}
0x4c4c…4c6a Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT-STATUS«, t00=0x0030, t01=0x015e}
0x4c6a…4c86 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0030, t01=0x017c}
0x4c86…4c9c Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0031, t01=0x0008}
0x4c9c…4cc2 Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x0031, t01=0x001e}
0x4cc2…4cde Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x0031, t01=0x0044}
0x4cde…4d06 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0031, t01=0x0060}
0x4d06…4d24 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0031, t01=0x0088}
0x4d24…4d40 Head {h00=0x0018, h01=0x0050, text=»DWTSEC EQU *-DWDU01 «, t00=0x0031, t01=0x00a6}
0x4d40…4d6c Head {h00=0x0028, h01=0x0050, text=» DATA /00FF LEFT BYTE=SECTOR NUMBER «, t00=0x0031, t01=0x00c2}
0x4d6c…4d98 Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x0031, t01=0x00ee}
0x4d98…4db0 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x0031, t01=0x011a}
0x4db0…4dc2 Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x0031, t01=0x0132}
0x4dc2…4dde Head {h00=0x0018, h01=0x0050, text=»DWTBSY EQU *-DWDU01 «, t00=0x0031, t01=0x0144}
0x4dde…4e04 Head {h00=0x0022, h01=0x0050, text=» DATA /80 UNIT BUSY INDICATOR «, t00=0x0031, t01=0x0160}
0x4e04…4e2a Head {h00=0x0022, h01=0x0050, text=» DATA /80 UNIT BUSY INDICATOR «, t00=0x0031, t01=0x0186}
0x4e2a…4e50 Head {h00=0x0022, h01=0x0050, text=»DWTCIO EQU *-DWDU01 CIO-START «, t00=0x0032, t01=0x001c}
0x4e50…4e66 Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DAF1«, t00=0x0032, t01=0x0042}
0x4e66…4e7c Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DAC1«, t00=0x0032, t01=0x0058}
0x4e7c…4eac Head {h00=0x002c, h01=0x0050, text=»DWTWR1 EQU *-DWDU01 1:ST WER INSTRUCTION«, t00=0x0032, t01=0x006e}
0x4eac…4ec0 Head {h00=0x0010, h01=0x0050, text=» WER A2,WER1«, t00=0x0032, t01=0x009e}
0x4ec0…4ef0 Head {h00=0x002c, h01=0x0050, text=»DWTWR2 EQU *-DWDU01 2:ND WER INSTRUCTION«, t00=0x0032, t01=0x00b2}
0x4ef0…4f06 Head {h00=0x0012, h01=0x0050, text=» WER A3,WER1+1«, t00=0x0032, t01=0x00e2}
0x4f06…4f22 Head {h00=0x0018, h01=0x0050, text=»DWTNAM EQU *-DWDU01 «, t00=0x0032, t01=0x00f8}
0x4f22…4f4c Head {h00=0x0026, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME FIXED DISC«, t00=0x0032, t01=0x0114}
0x4f4c…4f7a Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME CARTRIDGE DISC«, t00=0x0032, t01=0x013e}
0x4f7a…4f96 Head {h00=0x0018, h01=0x0050, text=»DWTSAV EQU *-DWDU01 «, t00=0x0032, t01=0x016c}
0x4f96…4fa6 Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0032, t01=0x0188}
0x4fa6…4fc2 Head {h00=0x0018, h01=0x0050, text=»DWTCYL EQU *-DWDU01 «, t00=0x0033, t01=0x0008}
0x4fc2…4fe6 Head {h00=0x0020, h01=0x0050, text=» DATA /FFFF CYLINDER NUMBER «, t00=0x0033, t01=0x0024}
0x4fe6…4ffa Head {h00=0x0010, h01=0x0050, text=» IFT TYPE1=0«, t00=0x0033, t01=0x0048}
0x4ffa…5016 Head {h00=0x0018, h01=0x0050, text=»DWTCMX EQU *-DWDU01 «, t00=0x0033, t01=0x005c}
0x5016…503e Head {h00=0x0024, h01=0x0050, text=» DATA MAXCY5 MAX CYLINDER X/1215«, t00=0x0033, t01=0x0078}
0x503e…504a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x00a0}
0x504a…505e Head {h00=0x0010, h01=0x0050, text=» IFT TYPE1=1«, t00=0x0033, t01=0x00ac}
0x505e…507a Head {h00=0x0018, h01=0x0050, text=»DWTCMX EQU *-DWDU01 «, t00=0x0033, t01=0x00c0}
0x507a…50a6 Head {h00=0x0028, h01=0x0050, text=» DATA MAXCY6 MAX CYLINDER NO X/1216 «, t00=0x0033, t01=0x00dc}
0x50a6…50b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0108}
0x50b2…50be Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0033, t01=0x0114}
0x50be…50c2 Head {h00=0x4004, h01=0x0000}
0x50c2…50c6 00 33 01 20 ┆ 3 ┆
0x50c6…50ce (52, 1, 8) 20 04 00 00 00 34 00 04 ┆ 4 ┆