|
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: 20678 (0x50c6)
Notes: pts_type(SC)
Names: »DRDU01.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/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 1 * * * THIS DRIVER CAN HANDLE TWO DISC UNITS * IF X:B := 2 * X:B EQU 1 NUNITS EQU 1 * * * DRIVE 1 MAY BE A X/1216 INSTEAD OF A X/1215 * BY SETTING X:C = 1 * X:C EQU 0 TYPE1 EQU 1 * * DRIVE 2 MAY BE A X/1216 INSTEAD OF A X/1215 * BY SETTING X:D = 1 * X:D EQU 0 TYPE2 EQU 1 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…0832 Head {h00=0x000e, h01=0x0050, text=»RAW EQU 1 «, t00=0x0005, t01=0x0054}
0x0832…083c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0066}
0x083c…0846 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0070}
0x0846…0878 Head {h00=0x002e, h01=0x0050, text=»* THIS DRIVER CAN HANDLE TWO DISC UNITS «, t00=0x0005, t01=0x007a}
0x0878…0890 Head {h00=0x0014, h01=0x0050, text=»* IF X:B := 2 «, t00=0x0005, t01=0x00ac}
0x0890…089a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c4}
0x089a…08a2 Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x00ce}
0x08a2…08b4 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0005, t01=0x00d6}
0x08b4…08c8 Head {h00=0x0010, h01=0x0050, text=»NUNITS EQU 1«, t00=0x0005, t01=0x00e8}
0x08c8…08d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fc}
0x08d2…08dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0106}
0x08dc…0914 Head {h00=0x0034, h01=0x0050, text=»* DRIVE 1 MAY BE A X/1216 INSTEAD OF A X/1215 «, t00=0x0005, t01=0x0110}
0x0914…0932 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:C = 1«, t00=0x0005, t01=0x0148}
0x0932…093c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0166}
0x093c…094e Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x0005, t01=0x0170}
0x094e…0962 Head {h00=0x0010, h01=0x0050, text=»TYPE1 EQU 1 «, t00=0x0005, t01=0x0182}
0x0962…096c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x096c…09a4 Head {h00=0x0034, h01=0x0050, text=»* DRIVE 2 MAY BE A X/1216 INSTEAD OF A X/1215 «, t00=0x0006, t01=0x0012}
0x09a4…09c2 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:D = 1«, t00=0x0006, t01=0x004a}
0x09c2…09cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0068}
0x09cc…09de Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x0006, t01=0x0072}
0x09de…09f2 Head {h00=0x0010, h01=0x0050, text=»TYPE2 EQU 1 «, t00=0x0006, t01=0x0084}
0x09f2…0a0a Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0006, t01=0x0098}
0x0a0a…0a12 Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00b0}
0x0a12…0a1a Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00b8}
0x0a1a…0a24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c0}
0x0a24…0a3a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x00ca}
0x0a3a…0a50 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0006, t01=0x00e0}
0x0a50…0a66 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x00f6}
0x0a66…0a70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010c}
0x0a70…0aa4 Head {h00=0x0030, h01=0x0050, text=»DAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1«, t00=0x0006, t01=0x0116}
0x0aa4…0adc Head {h00=0x0034, h01=0x0050, text=»DAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1«, t00=0x0006, t01=0x014a}
0x0adc…0b10 Head {h00=0x0030, h01=0x0050, text=»DAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2«, t00=0x0006, t01=0x0182}
0x0b10…0b48 Head {h00=0x0034, h01=0x0050, text=»DAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2«, t00=0x0007, t01=0x0026}
0x0b48…0b70 Head {h00=0x0024, h01=0x0050, text=»WER1 EQU /10 MULTIPLEXOR ADDRESS«, t00=0x0007, t01=0x005e}
0x0b70…0b9a Head {h00=0x0026, h01=0x0050, text=»CUADR EQU /08 CONTROL UNIT ADDRESS«, t00=0x0007, t01=0x0086}
0x0b9a…0ba2 Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x00b0}
0x0ba2…0baa Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x00b8}
0x0baa…0bd8 Head {h00=0x002a, h01=0x0050, text=»MAXCY5 EQU 203 MAX CYLINDER NO X/1215 «, t00=0x0007, t01=0x00c0}
0x0bd8…0c06 Head {h00=0x002a, h01=0x0050, text=»MAXCY6 EQU 407 MAX. CYLINDER NO X/1216«, t00=0x0007, t01=0x00ee}
0x0c06…0c36 Head {h00=0x002c, h01=0x0050, text=»LENGTH EQU 410 SECTOR LENGTH, CARACTERS «, t00=0x0007, t01=0x011c}
0x0c36…0c64 Head {h00=0x002a, h01=0x0050, text=»RY1 EQU 1 RETRY COUNT FOR BASIC ORDERS«, t00=0x0007, t01=0x014c}
0x0c64…0c82 Head {h00=0x001a, h01=0x0050, text=»RY4 EQU 4 RETRY COUNT «, t00=0x0007, t01=0x017a}
0x0c82…0ca2 Head {h00=0x001c, h01=0x0050, text=»TIME EQU 1000 2 MINUTES «, t00=0x0008, t01=0x0008}
0x0ca2…0caa Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0028}
0x0caa…0cb2 Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0030}
0x0cb2…0cbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0038}
0x0cbc…0cdc Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0008, t01=0x0042}
0x0cdc…0cfc Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0008, t01=0x0062}
0x0cfc…0d1c Head {h00=0x001c, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x0008, t01=0x0082}
0x0d1c…0d3c Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0008, t01=0x00a2}
0x0d3c…0d5c Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0008, t01=0x00c2}
0x0d5c…0d66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e2}
0x0d66…0d94 Head {h00=0x002a, h01=0x0050, text=»DWTA2 EQU /12 DWT-DISPLACEMENT,SAVE A2«, t00=0x0008, t01=0x00ec}
0x0d94…0dc2 Head {h00=0x002a, h01=0x0050, text=»DWTA4 EQU /14 ,SAVE A4«, t00=0x0008, t01=0x011a}
0x0dc2…0df0 Head {h00=0x002a, h01=0x0050, text=»DWTA5 EQU /16 ,SAVE A5«, t00=0x0008, t01=0x0148}
0x0df0…0e28 Head {h00=0x0034, h01=0x0050, text=»DWTSB1 EQU /1A ,1:ST STACK BASE «, t00=0x0008, t01=0x0176}
0x0e28…0e5a Head {h00=0x002e, h01=0x0050, text=»DWTSB2 EQU /1E ,STACK BASE«, t00=0x0009, t01=0x001e}
0x0e5a…0e72 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0009, t01=0x0050}
0x0e72…0e7a Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0068}
0x0e7a…0e82 Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0070}
0x0e82…0e98 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0009, t01=0x0078}
0x0e98…0ea2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x008e}
0x0ea2…0ecc Head {h00=0x0026, h01=0x0050, text=»DUADR DATA DUAD ACTIVATION ADDRESS«, t00=0x0009, t01=0x0098}
0x0ecc…0ef8 Head {h00=0x0028, h01=0x0050, text=»BUF RES 5 SECTOR BUFFER - 200 WORDS «, t00=0x0009, t01=0x00c2}
0x0ef8…0f0a Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0009, t01=0x00ee}
0x0f0a…0f32 Head {h00=0x0024, h01=0x0050, text=» RES 200 READ AFTER WRITE BUFFER«, t00=0x0009, t01=0x0100}
0x0f32…0f3e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0128}
0x0f3e…0f6a Head {h00=0x0028, h01=0x0050, text=»* RETRY IS USED TO DETECT RETRIES «, t00=0x0009, t01=0x0134}
0x0f6a…0f8e Head {h00=0x0020, h01=0x0050, text=»RETRY DATA 0 MAX NO OF TRIES«, t00=0x0009, t01=0x0160}
0x0f8e…0f96 Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0184}
0x0f96…0fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018c}
0x0fa0…0faa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0008}
0x0faa…0fe4 Head {h00=0x0036, h01=0x0050, text=»* TABLE FOR CONVERSION FROM LOGICAL TO PHYSICAL «, t00=0x000a, t01=0x0012}
0x0fe4…0ffe Head {h00=0x0016, h01=0x0050, text=»* SECTOR NUMBER «, t00=0x000a, t01=0x004c}
0x0ffe…1008 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0066}
0x1008…1012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0070}
0x1012…1056 Head {h00=0x0040, h01=0x0050, text=»SECTAB DATA /0003,/0609,/0C0F,/0205,/080B,/0E01,/0407,/0A0D «, t00=0x000a, t01=0x007a}
0x1056…1094 Head {h00=0x003a, h01=0x0050, text=» DATA /1013,/1619,/1C1F,/1215,/181B,/1E11,/1417,/1A1D «, t00=0x000a, t01=0x00be}
0x1094…10ac Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x000a, t01=0x00fc}
0x10ac…10b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0114}
0x10b6…10c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011e}
0x10c0…10da Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000a, t01=0x0128}
0x10da…10f4 Head {h00=0x0016, h01=0x0050, text=»* * «, t00=0x000a, t01=0x0142}
0x10f4…110e Head {h00=0x0016, h01=0x0050, text=»* ACTIVATION * «, t00=0x000a, t01=0x015c}
0x110e…1128 Head {h00=0x0016, h01=0x0050, text=»* * «, t00=0x000a, t01=0x0176}
0x1128…1142 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000a, t01=0x0190}
0x1142…114c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001a}
0x114c…1170 Head {h00=0x0020, h01=0x0050, text=»DUAD EQU * ACTIVATION ENTRY «, t00=0x000b, t01=0x0024}
0x1170…1186 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x000b, t01=0x0048}
0x1186…119c Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FFF«, t00=0x000b, t01=0x005e}
0x119c…11c8 Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A6 GET OTHER DISC UNIT DWT «, t00=0x000b, t01=0x0074}
0x11c8…11fa Head {h00=0x002e, h01=0x0050, text=» ANS A1,DWTST,A2 SET OTHER DISC UNIT BUSY «, t00=0x000b, t01=0x00a0}
0x11fa…1206 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00d2}
0x1206…120e Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00de}
0x120e…1216 Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x00e6}
0x1216…1232 Head {h00=0x0018, h01=0x0050, text=» SUK A5,4 STACK BASE«, t00=0x000b, t01=0x00ee}
0x1232…1256 Head {h00=0x0020, h01=0x0050, text=» LDK A4,RY1 RETRY COUNT = 1 «, t00=0x000b, t01=0x010a}
0x1256…127a Head {h00=0x0020, h01=0x0050, text=» ST A4,RETRY MAX NO OF TRIES«, t00=0x000b, t01=0x012e}
0x127a…129c Head {h00=0x001e, h01=0x0050, text=» LC A1,DWTOR,A6 GET INDEX «, t00=0x000b, t01=0x0152}
0x129c…12ae Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x000b, t01=0x0174}
0x12ae…12c0 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A1«, t00=0x000b, t01=0x0186}
0x12c0…12d2 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x000c, t01=0x0008}
0x12d2…12ea Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTBSY,A1«, t00=0x000c, t01=0x001a}
0x12ea…130a Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:10 DISC READY«, t00=0x000c, t01=0x0032}
0x130a…131c Head {h00=0x000e, h01=0x0050, text=» LDR A7,A7«, t00=0x000c, t01=0x0052}
0x131c…1344 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DUA:10 TEST STATUS ORDER «, t00=0x000c, t01=0x0064}
0x1344…136e Head {h00=0x0026, h01=0x0050, text=» LDK A1,/80 DISC HAS BECOME READY «, t00=0x000c, t01=0x008c}
0x136e…1382 Head {h00=0x0010, h01=0x0050, text=» ABL END:15 «, t00=0x000c, t01=0x00b6}
0x1382…1390 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00ca}
0x1390…1398 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00d8}
0x1398…13a0 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00e0}
0x13a0…13be Head {h00=0x001a, h01=0x0050, text=»DUA:10 LDR A1,A7 ORDER«, t00=0x000c, t01=0x00e8}
0x13be…13e0 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DU:010 TEST STATUS «, t00=0x000c, t01=0x0106}
0x13e0…13f2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000c, t01=0x0128}
0x13f2…1412 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:30 BASIC READ«, t00=0x000c, t01=0x013a}
0x1412…1424 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000c, t01=0x015a}
0x1424…1446 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUA:30 BASIC WRITE «, t00=0x000c, t01=0x016c}
0x1446…145a Head {h00=0x0010, h01=0x0050, text=» SUK A1,12 «, t00=0x000c, t01=0x018e}
0x145a…147e Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:20 PHYSICAL READ «, t00=0x000d, t01=0x0012}
0x147e…1490 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000d, t01=0x0036}
0x1490…14b4 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:20 PHYSICAL WRITE«, t00=0x000d, t01=0x0048}
0x14b4…14bc Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x006c}
0x14bc…14ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0074}
0x14ca…14d2 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0082}
0x14d2…14da Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x008a}
0x14da…1500 Head {h00=0x0022, h01=0x0050, text=»DUERR ABL DISIOE REQUEST ERROR«, t00=0x000d, t01=0x0092}
0x1500…1508 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00b8}
0x1508…1510 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00c0}
0x1510…153a Head {h00=0x0026, h01=0x0050, text=»DUA:20 LDK A4,RY4 RETRY COUNT = 4 «, t00=0x000d, t01=0x00c8}
0x153a…1542 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00f2}
0x1542…1566 Head {h00=0x0020, h01=0x0050, text=» ST A4,RETRY MAX NO OF TRIES«, t00=0x000d, t01=0x00fa}
0x1566…156e Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x011e}
0x156e…1598 Head {h00=0x0026, h01=0x0050, text=»DUA:30 LD A1,4,A8 REQUESTED LENGTH«, t00=0x000d, t01=0x0126}
0x1598…15b0 Head {h00=0x0014, h01=0x0050, text=» SUKL A1,LENGTH «, t00=0x000d, t01=0x0150}
0x15b0…15dc Head {h00=0x0028, h01=0x0050, text=» RB(NZ) DUERR REQUESTED LENGTH # 410«, t00=0x000d, t01=0x0168}
0x15dc…15f4 (14, 0, 400) Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x000e, t01=0x0004}
0x15f4…15fc Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x001c}
0x15fc…1604 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0024}
0x1604…1630 Head {h00=0x0028, h01=0x0050, text=» LD A2,10,A8 RELATIVE SECTOR NUMBER «, t00=0x000e, t01=0x002c}
0x1630…1642 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000e, t01=0x0058}
0x1642…166c Head {h00=0x0026, h01=0x0050, text=» ANK A3,/1F LOGICAL SECTOR NUMBER «, t00=0x000e, t01=0x006a}
0x166c…169c Head {h00=0x002c, h01=0x0050, text=» LC A3,SECTAB,A3 PHYSICAL SECTOR NUMBER «, t00=0x000e, t01=0x0094}
0x169c…16bc Head {h00=0x001c, h01=0x0050, text=» SC A3,DWTSEC,A6 SAVE IT«, t00=0x000e, t01=0x00c4}
0x16bc…16c4 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00e4}
0x16c4…16cc Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00ec}
0x16cc…16ee Head {h00=0x001e, h01=0x0050, text=» SRL A2,5 CYLINDER NUMBER «, t00=0x000e, t01=0x00f4}
0x16ee…1706 Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTCMX,A6«, t00=0x000e, t01=0x0116}
0x1706…1738 Head {h00=0x002e, h01=0x0050, text=» RB(G) DUERR CYLINDER NO GREATER THAN MAX.«, t00=0x000e, t01=0x012e}
0x1738…1740 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0160}
0x1740…1748 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0168}
0x1748…1750 Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0170}
0x1750…178e Head {h00=0x003a, h01=0x0050, text=» CW A2,DWTCYL,A6 COMPARE WITH CURRENT CYLINDER NUMBER «, t00=0x000e, t01=0x0178}
0x178e…17c0 Head {h00=0x002e, h01=0x0050, text=» RF(E) DU:030 DISC HEAD ALREADT POSITIONED«, t00=0x000f, t01=0x0026}
0x17c0…17ee Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTCYL,A6 SAVE CYLINDER NUMBER «, t00=0x000f, t01=0x0058}
0x17ee…17f6 Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0086}
0x17f6…180e Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x000f, t01=0x008e}
0x180e…1816 Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x00a6}
0x1816…181e Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x00ae}
0x181e…1828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b6}
0x1828…1848 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000f, t01=0x00c0}
0x1848…1868 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x000f, t01=0x00e0}
0x1868…1888 Head {h00=0x001c, h01=0x0050, text=»* SEEK SECTOR N *«, t00=0x000f, t01=0x0100}
0x1888…18a8 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x000f, t01=0x0120}
0x18a8…18c8 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000f, t01=0x0140}
0x18c8…18d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0160}
0x18d2…18fc Head {h00=0x0026, h01=0x0050, text=»DU:010 CF A5,SEEK SEEK CYLINDER N «, t00=0x000f, t01=0x016a}
0x18fc…190e (16, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SLC A1,6 «, t00=0x0010, t01=0x0004}
0x190e…1938 Head {h00=0x0026, h01=0x0050, text=» RF(NN) DU:030 OK. SEEK COMPLETED «, t00=0x0010, t01=0x0016}
0x1938…1940 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0040}
0x1940…1948 Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0048}
0x1948…1952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0050}
0x1952…1972 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x005a}
0x1972…1992 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0010, t01=0x007a}
0x1992…19b2 Head {h00=0x001c, h01=0x0050, text=»* SEEK CYLINDER 0 *«, t00=0x0010, t01=0x009a}
0x19b2…19d2 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0010, t01=0x00ba}
0x19d2…19f2 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x00da}
0x19f2…19fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00fa}
0x19fc…1a26 Head {h00=0x0026, h01=0x0050, text=»DU:015 CF A5,SEEKZ SEEK CYLINDER 0«, t00=0x0010, t01=0x0104}
0x1a26…1a38 Head {h00=0x000e, h01=0x0050, text=» SLC A1,6 «, t00=0x0010, t01=0x012e}
0x1a38…1a60 Head {h00=0x0024, h01=0x0050, text=» RF(N) DU:020 SECTOR 0 NOT FOUND«, t00=0x0010, t01=0x0140}
0x1a60…1a72 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0010, t01=0x0168}
0x1a72…1a92 Head {h00=0x001c, h01=0x0050, text=» RB(NZ) DU:010 TRY AGAIN«, t00=0x0010, t01=0x017a}
0x1a92…1a9a Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x000a}
0x1a9a…1ac8 Head {h00=0x002a, h01=0x0050, text=»DU:020 LDKL A3,/FFFF ALL RETRIES DONE «, t00=0x0011, t01=0x0012}
0x1ac8…1afc Head {h00=0x0030, h01=0x0050, text=» ST A3,DWTCYL,A6 SET ILLEGAL CYLINDER NUMBER«, t00=0x0011, t01=0x0040}
0x1afc…1b28 Head {h00=0x0028, h01=0x0050, text=» LDKL A1,/200 SEEK ERROR RETURN CODE«, t00=0x0011, t01=0x0074}
0x1b28…1b4a Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM ENDIO «, t00=0x0011, t01=0x00a0}
0x1b4a…1b62 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0011, t01=0x00c2}
0x1b62…1b6a Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x00da}
0x1b6a…1b72 Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x00e2}
0x1b72…1b7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ea}
0x1b7c…1b9e Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0011, t01=0x00f4}
0x1b9e…1bc0 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0011, t01=0x0116}
0x1bc0…1be2 Head {h00=0x001e, h01=0x0050, text=»* GO AND EXECUTE ORDER *«, t00=0x0011, t01=0x0138}
0x1be2…1c04 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0011, t01=0x015a}
0x1c04…1c26 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0011, t01=0x017c}
0x1c26…1c30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x000e}
0x1c30…1c3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0018}
0x1c3a…1c58 Head {h00=0x001a, h01=0x0050, text=»DU:030 LDR A1,A7 ORDER«, t00=0x0012, t01=0x0022}
0x1c58…1c78 Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEST TEST STATUS «, t00=0x0012, t01=0x0040}
0x1c78…1c8a Head {h00=0x000e, h01=0x0050, text=» SUK A1,5 «, t00=0x0012, t01=0x0060}
0x1c8a…1cac Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRIT:N BASIC WRITE «, t00=0x0012, t01=0x0072}
0x1cac…1cbe Head {h00=0x000e, h01=0x0050, text=» SUK A1,12«, t00=0x0012, t01=0x0094}
0x1cbe…1cda Head {h00=0x0018, h01=0x0050, text=» RF(NP) READ:N READ «, t00=0x0012, t01=0x00a6}
0x1cda…1ce2 Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00c2}
0x1ce2…1cea Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00ca}
0x1cea…1cf2 Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x00d2}
0x1cf2…1cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00da}
0x1cfc…1d1c Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0012, t01=0x00e4}
0x1d1c…1d3c Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0012, t01=0x0104}
0x1d3c…1d5c Head {h00=0x001c, h01=0x0050, text=»* READ SECTOR N-1 *«, t00=0x0012, t01=0x0124}
0x1d5c…1d7c Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x0012, t01=0x0144}
0x1d7c…1d9c Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0012, t01=0x0164}
0x1d9c…1da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0184}
0x1da6…1dda Head {h00=0x0030, h01=0x0050, text=»P:WRIT CF A5,WER:R5 EXECUTE WER INSTRUCTIONS«, t00=0x0012, t01=0x018e}
0x1dda…1dfe Head {h00=0x0020, h01=0x0050, text=» CF A5,READ5 READ FIVE WORDS«, t00=0x0013, t01=0x0032}
0x1dfe…1e10 Head {h00=0x000e, h01=0x0050, text=» ANK A1,2 «, t00=0x0013, t01=0x0056}
0x1e10…1e40 Head {h00=0x002c, h01=0x0050, text=» RF(Z) P:WR10 OK. CHECK CYLINDER NUMBER «, t00=0x0013, t01=0x0068}
0x1e40…1e6a Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0013, t01=0x0098}
0x1e6a…1e92 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) END:IO ALL RETRIES DONE «, t00=0x0013, t01=0x00c2}
0x1e92…1eae Head {h00=0x0018, h01=0x0050, text=» RB P:WRIT TRY AGAIN«, t00=0x0013, t01=0x00ea}
0x1eae…1eb6 Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0106}
0x1eb6…1ece Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0013, t01=0x010e}
0x1ece…1ed6 Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x0126}
0x1ed6…1ede Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x012e}
0x1ede…1f0c Head {h00=0x002a, h01=0x0050, text=»P:WR10 LD A2,DWTCYL,A6 CYLINDER NUMBER«, t00=0x0013, t01=0x0136}
0x1f0c…1f46 Head {h00=0x0036, h01=0x0050, text=» CW A2,BUF+1 COMPARE WITH CURRENT CYLINDER NUMBER «, t00=0x0013, t01=0x0164}
0x1f46…1f72 Head {h00=0x0028, h01=0x0050, text=» RB(NE) DU:015 ERROR.SEEK CYLINDER 0«, t00=0x0014, t01=0x000e}
0x1f72…1f7a Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x003a}
0x1f7a…1f82 Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0042}
0x1f82…1f8a Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x004a}
0x1f8a…1f94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0052}
0x1f94…1fb2 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0014, t01=0x005c}
0x1fb2…1fd0 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0014, t01=0x007a}
0x1fd0…1fee Head {h00=0x001a, h01=0x0050, text=»* WRITE SECTOR N * «, t00=0x0014, t01=0x0098}
0x1fee…200c Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0014, t01=0x00b6}
0x200c…202a Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0014, t01=0x00d4}
0x202a…2034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00f2}
0x2034…2068 Head {h00=0x0030, h01=0x0050, text=»WRIT:N CF A5,WER:W EXECUTE WER INSTRUCTIONS «, t00=0x0014, t01=0x00fc}
0x2068…208c Head {h00=0x0020, h01=0x0050, text=» CF A5,WRITE WRITE SECTOR N «, t00=0x0014, t01=0x0130}
0x208c…20a0 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x0014, t01=0x0154}
0x20a0…20c8 Head {h00=0x0024, h01=0x0050, text=» RF(Z) WRIT20 OK. NO RETURN CODE«, t00=0x0014, t01=0x0168}
0x20c8…20f2 Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0014, t01=0x0190}
0x20f2…211a Head {h00=0x0024, h01=0x0050, text=» ABL(Z) END:IO ALL RETRIES DONE «, t00=0x0015, t01=0x002a}
0x211a…2136 Head {h00=0x0018, h01=0x0050, text=» RB WRIT:N TRY AGAIN«, t00=0x0015, t01=0x0052}
0x2136…213e Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x006e}
0x213e…2150 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0015, t01=0x0076}
0x2150…2168 Head {h00=0x0014, h01=0x0050, text=»WRIT20 CWK A7,5 «, t00=0x0015, t01=0x0088}
0x2168…218a Head {h00=0x001e, h01=0x0050, text=» ABL(E) END:IO BASIC WRITE«, t00=0x0015, t01=0x00a0}
0x218a…21b4 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,BUF DRIVER BUFFER ADDRESS«, t00=0x0015, t01=0x00c2}
0x21b4…21c0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00ec}
0x21c0…21d2 Head {h00=0x000e, h01=0x0050, text=» IFF RAW=1«, t00=0x0015, t01=0x00f8}
0x21d2…21fa Head {h00=0x0024, h01=0x0050, text=»WRIT20 ABL END:IO PERFORM END:IO«, t00=0x0015, t01=0x010a}
0x21fa…2206 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0132}
0x2206…221e Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0015, t01=0x013e}
0x221e…2226 Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0156}
0x2226…222e Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x015e}
0x222e…2238 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0166}
0x2238…2256 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0015, t01=0x0170}
0x2256…2274 Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x0015, t01=0x018e}
0x2274…2292 Head {h00=0x001a, h01=0x0050, text=»* READ SECTOR N *«, t00=0x0016, t01=0x001c}
0x2292…22b0 Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x0016, t01=0x003a}
0x22b0…22ce Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0016, t01=0x0058}
0x22ce…22d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0076}
0x22d8…230c Head {h00=0x0030, h01=0x0050, text=»READ:N CF A5,WER:R EXECUTE WER INSTRUCTIONS «, t00=0x0016, t01=0x0080}
0x230c…232e Head {h00=0x001e, h01=0x0050, text=» CF A5,READ READ SECTOR N «, t00=0x0016, t01=0x00b4}
0x232e…2340 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0016, t01=0x00d6}
0x2340…2368 Head {h00=0x0024, h01=0x0050, text=» RF(Z) READ10 OK. NO RETURN CODE«, t00=0x0016, t01=0x00e8}
0x2368…2392 Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0016, t01=0x0110}
0x2392…23ba Head {h00=0x0024, h01=0x0050, text=» ABL(Z) END:IO ALL RETRIES DONE «, t00=0x0016, t01=0x013a}
0x23ba…23d6 Head {h00=0x0018, h01=0x0050, text=» RB READ:N TRY AGAIN«, t00=0x0016, t01=0x0162}
0x23d6…23e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x017e}
0x23e0…2404 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0016, t01=0x0188}
0x2404…2428 Head {h00=0x0020, h01=0x0050, text=»* * «, t00=0x0017, t01=0x001c}
0x2428…244c Head {h00=0x0020, h01=0x0050, text=»* CHECK CYLINDER NUMBER * «, t00=0x0017, t01=0x0040}
0x244c…2470 Head {h00=0x0020, h01=0x0050, text=»* * «, t00=0x0017, t01=0x0064}
0x2470…2494 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0017, t01=0x0088}
0x2494…249e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ac}
0x249e…24a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b6}
0x24a8…24e0 Head {h00=0x0034, h01=0x0050, text=»READ10 LD A2,DWTCYL,A6 REQUESTED CYLINDER NUMBER«, t00=0x0017, t01=0x00c0}
0x24e0…251a Head {h00=0x0036, h01=0x0050, text=» CW* A2,2,A8 COMPARE WITH CURRENT CYLINDER NUMBER «, t00=0x0017, t01=0x00f8}
0x251a…2548 Head {h00=0x002a, h01=0x0050, text=» RB(NE) DU:015 ERROR. SEEK CYLINDER 0 «, t00=0x0017, t01=0x0132}
0x2548…256e Head {h00=0x0022, h01=0x0050, text=» ABL END:IO 0K. PEABLORM ENDIO«, t00=0x0017, t01=0x0160}
0x256e…2586 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0017, t01=0x0186}
0x2586…258e Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x000e}
0x258e…2596 Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0016}
0x2596…25a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x001e}
0x25a0…25be Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0018, t01=0x0028}
0x25be…25dc Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0018, t01=0x0046}
0x25dc…25fa Head {h00=0x001a, h01=0x0050, text=»* TEST STATUS * «, t00=0x0018, t01=0x0064}
0x25fa…2618 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x0018, t01=0x0082}
0x2618…2636 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0018, t01=0x00a0}
0x2636…2640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00be}
0x2640…2678 Head {h00=0x0034, h01=0x0050, text=»TEST LDKL A2,DWTNAM VOLUME NAME DWT DISPLACEMENT«, t00=0x0018, t01=0x00c8}
0x2678…268a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0018, t01=0x0100}
0x268a…26ac Head {h00=0x001e, h01=0x0050, text=» LC A3,DWTOR,A6 DWT INDEX «, t00=0x0018, t01=0x0112}
0x26ac…26be Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0018, t01=0x0134}
0x26be…26de Head {h00=0x001c, h01=0x0050, text=» RF(Z) TEST10 FIXED DISC«, t00=0x0018, t01=0x0146}
0x26de…26fe Head {h00=0x001c, h01=0x0050, text=» ADK A2,6 CARTRIDGE DISC«, t00=0x0018, t01=0x0166}
0x26fe…2734 Head {h00=0x0032, h01=0x0050, text=»TEST10 ST A2,10,A8 SAVE ADDRESS TO VOLUME NAME«, t00=0x0018, t01=0x0186}
0x2734…2758 Head {h00=0x0020, h01=0x0050, text=» SUR A1,A1 SET RETURN CODE=0«, t00=0x0019, t01=0x002c}
0x2758…277a Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PEABLORM ENDIO«, t00=0x0019, t01=0x0050}
0x277a…2792 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0019, t01=0x0072}
0x2792…279a Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x008a}
0x279a…27a2 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0092}
0x27a2…27ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x009a}
0x27ac…27d2 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0019, t01=0x00a4}
0x27d2…27f8 Head {h00=0x0022, h01=0x0050, text=»* *«, t00=0x0019, t01=0x00ca}
0x27f8…281e Head {h00=0x0022, h01=0x0050, text=»* EXECUTE WER INSTRUCTIONS *«, t00=0x0019, t01=0x00f0}
0x281e…2844 Head {h00=0x0022, h01=0x0050, text=»* *«, t00=0x0019, t01=0x0116}
0x2844…286a Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0019, t01=0x013c}
0x286a…2874 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0162}
0x2874…289e Head {h00=0x0026, h01=0x0050, text=»WER:R5 LDKL A2,/8005 READ 5 WORDS «, t00=0x0019, t01=0x016c}
0x289e…28c8 Head {h00=0x0026, h01=0x0050, text=» LDKL A3,BUF DRIVER BUFFER ADDRESS«, t00=0x001a, t01=0x0008}
0x28c8…28da Head {h00=0x000e, h01=0x0050, text=» RF EX:WER«, t00=0x001a, t01=0x0032}
0x28da…28e2 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0044}
0x28e2…28ea Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x004c}
0x28ea…2914 Head {h00=0x0026, h01=0x0050, text=»WER:R LDKL A2,/80CD READ 1 SECTOR «, t00=0x001a, t01=0x0054}
0x2914…2928 Head {h00=0x0010, h01=0x0050, text=» CWK A3,BUF «, t00=0x001a, t01=0x007e}
0x2928…293e Head {h00=0x0012, h01=0x0050, text=» RF(E) EX:WER «, t00=0x001a, t01=0x0092}
0x293e…2950 Head {h00=0x000e, h01=0x0050, text=» RF WER:WB«, t00=0x001a, t01=0x00a8}
0x2950…2958 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00ba}
0x2958…2960 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00c2}
0x2960…298a Head {h00=0x0026, h01=0x0050, text=»WER:W LDKL A2,/C0CD WRITE 1 SECTOR«, t00=0x001a, t01=0x00ca}
0x298a…29b8 Head {h00=0x002a, h01=0x0050, text=»WER:WB LD A3,2,A8 USER BUFFER ADDRESS «, t00=0x001a, t01=0x00f4}
0x29b8…29c0 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0122}
0x29c0…29c8 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x012a}
0x29c8…29f4 Head {h00=0x0028, h01=0x0050, text=»EX:WER EX DWTWR1,A6 EXECUTE 1:ST WER«, t00=0x001a, t01=0x0132}
0x29f4…2a1a Head {h00=0x0022, h01=0x0050, text=» EX DWTWR2,A6 EXECUTE 2:ND WER«, t00=0x001a, t01=0x015e}
0x2a1a…2a2a Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x001a, t01=0x0184}
0x2a2a…2a42 (27, 0, 398) Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001b, t01=0x0004}
0x2a42…2a4a Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x001c}
0x2a4a…2a52 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0024}
0x2a52…2a5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x002c}
0x2a5c…2a78 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001b, t01=0x0036}
0x2a78…2a94 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x001b, t01=0x0052}
0x2a94…2ab0 Head {h00=0x0018, h01=0x0050, text=»* SEEK CYLINDER * «, t00=0x001b, t01=0x006e}
0x2ab0…2acc Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x001b, t01=0x008a}
0x2acc…2ae8 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x001b, t01=0x00a6}
0x2ae8…2af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00c2}
0x2af2…2b1e Head {h00=0x0028, h01=0x0050, text=»SEEK LD A2,DWTCYL,A6 CYLINDER NUMBER«, t00=0x001b, t01=0x00cc}
0x2b1e…2b30 Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x001b, t01=0x00f8}
0x2b30…2b42 Head {h00=0x000e, h01=0x0050, text=» ORK A2,2 «, t00=0x001b, t01=0x010a}
0x2b42…2b64 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001b, t01=0x011c}
0x2b64…2b6c Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x013e}
0x2b6c…2b74 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0146}
0x2b74…2b88 Head {h00=0x0010, h01=0x0050, text=»SEEKZ EQU * «, t00=0x001b, t01=0x014e}
0x2b88…2b9a Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x001b, t01=0x0162}
0x2b9a…2bbc Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001b, t01=0x0174}
0x2bbc…2bc4 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0008}
0x2bc4…2bcc Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0010}
0x2bcc…2bf8 Head {h00=0x0028, h01=0x0050, text=»READ5 LC A2,DWTSEC,A6 SECTOR NUMBER «, t00=0x001c, t01=0x0018}
0x2bf8…2c0c Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x001c, t01=0x0044}
0x2c0c…2c28 Head {h00=0x0018, h01=0x0050, text=» SUK A2,3 SECTOR N-1«, t00=0x001c, t01=0x0058}
0x2c28…2c3c Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x001c, t01=0x0074}
0x2c3c…2c4e Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x001c, t01=0x0088}
0x2c4e…2c70 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001c, t01=0x009a}
0x2c70…2c88 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001c, t01=0x00bc}
0x2c88…2c90 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00d4}
0x2c90…2c98 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x00dc}
0x2c98…2cc2 Head {h00=0x0026, h01=0x0050, text=»READ LC A2,DWTSEC,A6 SECTOR NUMBER«, t00=0x001c, t01=0x00e4}
0x2cc2…2cd6 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x001c, t01=0x010e}
0x2cd6…2ce8 Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x001c, t01=0x0122}
0x2ce8…2d0a Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x001c, t01=0x0134}
0x2d0a…2d12 Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0156}
0x2d12…2d1a Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x015e}
0x2d1a…2d48 Head {h00=0x002a, h01=0x0050, text=»WRITE LD A2,DWTCYL,A6 CYLINDER NUMBER «, t00=0x001c, t01=0x0166}
0x2d48…2d78 (29, 0, 400) Head {h00=0x002c, h01=0x0050, text=» ST* A2,2,A8 PUT CYLNMB. IN USER BUFFER «, t00=0x001d, t01=0x0004}
0x2d78…2d9e Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTSEC,A6 SECTOR NUMBER«, t00=0x001d, t01=0x0034}
0x2d9e…2db0 Head {h00=0x000e, h01=0x0050, text=» SLL A2,2 «, t00=0x001d, t01=0x005a}
0x2db0…2dc2 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x001d, t01=0x006c}
0x2dc2…2dda Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001d, t01=0x007e}
0x2dda…2de2 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0096}
0x2de2…2dea Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x009e}
0x2dea…2df2 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00a6}
0x2df2…2e04 Head {h00=0x000e, h01=0x0050, text=»CIO EQU * «, t00=0x001d, t01=0x00ae}
0x2e04…2e0c Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00c0}
0x2e0c…2e14 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x00c8}
0x2e14…2e32 Head {h00=0x001a, h01=0x0050, text=»EX:CIO LC A1,DWTOR,A6 «, t00=0x001d, t01=0x00d0}
0x2e32…2e4a Head {h00=0x0014, h01=0x0050, text=» ANK A1,1 INDEX «, t00=0x001d, t01=0x00ee}
0x2e4a…2e6a Head {h00=0x001c, h01=0x0050, text=» ADR A1,A1 DOUBLE INDEX «, t00=0x001d, t01=0x0106}
0x2e6a…2e7c Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x001d, t01=0x0126}
0x2e7c…2ea4 Head {h00=0x0024, h01=0x0050, text=» EX DWTCIO,A1 EXECUTE CIO-START «, t00=0x001d, t01=0x0138}
0x2ea4…2eac Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0160}
0x2eac…2eb4 Head {h00=0x0004, h01=0x0050, t00=0x001d, t01=0x0168}
0x2eb4…2ede Head {h00=0x0026, h01=0x0050, text=»SAVE ST A2,DWTA2,A6 SAVE REGS. A2 «, t00=0x001d, t01=0x0170}
0x2ede…2f04 Head {h00=0x0022, h01=0x0050, text=» ST A4,DWTA4,A6 A4 «, t00=0x001e, t01=0x000a}
0x2f04…2f2a Head {h00=0x0022, h01=0x0050, text=» ST A5,DWTA5,A6 A5 «, t00=0x001e, t01=0x0030}
0x2f2a…2f54 Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x001e, t01=0x0056}
0x2f54…2f6c Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x001e, t01=0x0080}
0x2f6c…2f74 Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0098}
0x2f74…2f7c Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00a0}
0x2f7c…2f86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a8}
0x2f86…2fa4 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x001e, t01=0x00b2}
0x2fa4…2fc2 Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x001e, t01=0x00d0}
0x2fc2…2fe0 Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINE *«, t00=0x001e, t01=0x00ee}
0x2fe0…2ffe Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x001e, t01=0x010c}
0x2ffe…301c Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x001e, t01=0x012a}
0x301c…3026 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0148}
0x3026…305e Head {h00=0x0034, h01=0x0050, text=»DUON CF A15,SAVE8 SAVE REGS. A1-A8 ON A15 STACK «, t00=0x001e, t01=0x0152}
0x305e…3076 Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x001e, t01=0x018a}
0x3076…307e Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0012}
0x307e…30a8 Head {h00=0x0026, h01=0x0050, text=» LD A1,INIFLG INITIALIZATION FLAG «, t00=0x001f, t01=0x001a}
0x30a8…30c6 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON08 POWER UP«, t00=0x001f, t01=0x0044}
0x30c6…30ce Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0062}
0x30ce…30d6 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x006a}
0x30d6…30ea Head {h00=0x0010, h01=0x0050, text=»DURED2 EQU *«, t00=0x001f, t01=0x0072}
0x30ea…3100 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FFF«, t00=0x001f, t01=0x0086}
0x3100…312c Head {h00=0x0028, h01=0x0050, text=» ANS A1,DWTST,A6 SET DISC UNIT BUSY «, t00=0x001f, t01=0x009c}
0x312c…3154 Head {h00=0x0024, h01=0x0050, text=»DUON05 LDKL A5,DWTSB2 STACK BASE«, t00=0x001f, t01=0x00c8}
0x3154…316c Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x001f, t01=0x00f0}
0x316c…318a Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x001f, t01=0x0108}
0x318a…31b0 Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM GET VOLUME NAME «, t00=0x001f, t01=0x0126}
0x31b0…31c6 Head {h00=0x0012, h01=0x0050, text=» CF A15,TENDIO«, t00=0x001f, t01=0x014c}
0x31c6…31d4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0162}
0x31d4…31dc Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0170}
0x31dc…31f2 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x001f, t01=0x0178}
0x31f2…3222 Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS «, t00=0x001f, t01=0x018e}
0x3222…323a Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x0020, t01=0x002e}
0x323a…3258 Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x0020, t01=0x0046}
0x3258…3260 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0064}
0x3260…3268 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x006c}
0x3268…327e Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FFF«, t00=0x0020, t01=0x0074}
0x327e…32a4 Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 SET DWT BUSY «, t00=0x0020, t01=0x008a}
0x32a4…32ac Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00b0}
0x32ac…32b4 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00b8}
0x32b4…32da Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM GET VOLUME NAME «, t00=0x0020, t01=0x00c0}
0x32da…32fe Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0020, t01=0x00e6}
0x32fe…330a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x010a}
0x330a…3312 Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0116}
0x3312…332e Head {h00=0x0018, h01=0x0050, text=» RB T:DISP DISPATCH «, t00=0x0020, t01=0x011e}
0x332e…3338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x013a}
0x3338…3342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0144}
0x3342…335e Head {h00=0x0018, h01=0x0050, text=»* READY INTERRUPT«, t00=0x0020, t01=0x014e}
0x335e…3368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x016a}
0x3368…3382 Head {h00=0x0016, h01=0x0050, text=»DUREDY LD A1,TIMER«, t00=0x0020, t01=0x0174}
0x3382…33a8 Head {h00=0x0022, h01=0x0050, text=» RB(Z) DURED2 NO TIMER ACTIVE «, t00=0x0020, t01=0x018e}
0x33a8…33c8 Head {h00=0x001c, h01=0x0050, text=» RB T:DISP TIMER ACTIVE «, t00=0x0021, t01=0x0024}
0x33c8…33d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0044}
0x33d6…33ea Head {h00=0x0010, h01=0x0050, text=»DUON08 EQU *«, t00=0x0021, t01=0x0052}
0x33ea…340c Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 THROUGHPUT ERROR«, t00=0x0021, t01=0x0066}
0x340c…3432 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT STATUS«, t00=0x0021, t01=0x0088}
0x3432…3452 Head {h00=0x001c, h01=0x0050, text=» RF(N) DUON10 UNIT FREE «, t00=0x0021, t01=0x00ae}
0x3452…3476 Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0021, t01=0x00ce}
0x3476…347e Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00f2}
0x347e…3486 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00fa}
0x3486…349a Head {h00=0x0010, h01=0x0050, text=»DUON10 EQU *«, t00=0x0021, t01=0x0102}
0x349a…34b0 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0021, t01=0x0116}
0x34b0…34d8 Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU02 DISC UNIT NO. 2 «, t00=0x0021, t01=0x012c}
0x34d8…34fa Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STSTUS«, t00=0x0021, t01=0x0154}
0x34fa…351a Head {h00=0x001c, h01=0x0050, text=» RF(N) DUON20 UNIT FREE «, t00=0x0021, t01=0x0176}
0x351a…353e Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0022, t01=0x0008}
0x353e…354a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x002c}
0x354a…3554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0038}
0x3554…357c Head {h00=0x0024, h01=0x0050, text=»* SET DISC BUSY AND START TIMER«, t00=0x0022, t01=0x0042}
0x357c…3586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x006a}
0x3586…35a2 Head {h00=0x0018, h01=0x0050, text=»DUON20 LDKL A1,/7FFF«, t00=0x0022, t01=0x0074}
0x35a2…35b8 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0022, t01=0x0090}
0x35b8…35de Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 SET UNIT BUSY«, t00=0x0022, t01=0x00a6}
0x35de…3604 Head {h00=0x0022, h01=0x0050, text=» LDR* A6,A6 OTHER DWT ADDRESS «, t00=0x0022, t01=0x00cc}
0x3604…3610 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00f2}
0x3610…3636 Head {h00=0x0022, h01=0x0050, text=» ANS A1,DWTST,A6 SET UNIT BUSY«, t00=0x0022, t01=0x00fe}
0x3636…3662 Head {h00=0x0028, h01=0x0050, text=» LDKL A4,TIMER TIMER POINTER ADDRESS«, t00=0x0022, t01=0x0124}
0x3662…3676 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A4 «, t00=0x0022, t01=0x0150}
0x3676…369c Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON30 NO TIMER ACTIVE «, t00=0x0022, t01=0x0164}
0x369c…36b2 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x0022, t01=0x018a}
0x36b2…36d2 Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 RESTART TIMER«, t00=0x0023, t01=0x0010}
0x36d2…36e4 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0023, t01=0x0030}
0x36e4…36ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0042}
0x36ee…3716 Head {h00=0x0024, h01=0x0050, text=»DUON30 CF A15,SETIMP START TIMER«, t00=0x0023, t01=0x004c}
0x3716…3746 Head {h00=0x002c, h01=0x0050, text=» DATA DUON40,TIME TIME OUT ADDRESS, TIME«, t00=0x0023, t01=0x0074}
0x3746…3758 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0023, t01=0x00a4}
0x3758…3762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00b6}
0x3762…3776 Head {h00=0x0010, h01=0x0050, text=»* TIME-OUT«, t00=0x0023, t01=0x00c0}
0x3776…3780 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00d4}
0x3780…379e Head {h00=0x001a, h01=0x0050, text=»DUON40 LDKL A6,DWDU01 «, t00=0x0023, t01=0x00de}
0x379e…37b0 Head {h00=0x000e, h01=0x0050, text=» CM TIMER «, t00=0x0023, t01=0x00fc}
0x37b0…37c2 Head {h00=0x000e, h01=0x0050, text=» RB DURED2«, t00=0x0023, t01=0x010e}
0x37c2…37da Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0023, t01=0x0120}
0x37da…37e2 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0138}
0x37e2…37ea Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0140}
0x37ea…37f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0148}
0x37f4…3814 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0023, t01=0x0152}
0x3814…3834 Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0023, t01=0x0172}
0x3834…3854 (36, 0, 400) Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT HANDLER * «, t00=0x0024, t01=0x0004}
0x3854…3874 Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x0024, t01=0x0024}
0x3874…3894 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0024, t01=0x0044}
0x3894…389e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0064}
0x389e…38b2 Head {h00=0x0010, h01=0x0050, text=»IHDU2 EQU * «, t00=0x0024, t01=0x006e}
0x38b2…38c8 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0024, t01=0x0082}
0x38c8…38f0 Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x0098}
0x38f0…3906 Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0024, t01=0x00c0}
0x3906…392e Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU02 DISC UNIT NO. 2 «, t00=0x0024, t01=0x00d6}
0x392e…3940 Head {h00=0x000e, h01=0x0050, text=» RF IHDU10«, t00=0x0024, t01=0x00fe}
0x3940…394c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x0110}
0x394c…395e Head {h00=0x000e, h01=0x0050, text=»IHDU EQU *«, t00=0x0024, t01=0x011c}
0x395e…3972 Head {h00=0x0010, h01=0x0050, text=»IHDU1 EQU * «, t00=0x0024, t01=0x012e}
0x3972…399a Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0024, t01=0x0142}
0x399a…39b0 Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x0024, t01=0x016a}
0x39b0…39d8 Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU01 DISC UNIT NO. 1 «, t00=0x0024, t01=0x0180}
0x39d8…39e0 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0018}
0x39e0…39e8 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0020}
0x39e8…3a0e Head {h00=0x0022, h01=0x0050, text=»IHDU10 SST A1,CUADR GET STATUS«, t00=0x0025, t01=0x0028}
0x3a0e…3a24 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0025, t01=0x004e}
0x3a24…3a36 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0025, t01=0x0064}
0x3a36…3a4a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/40 «, t00=0x0025, t01=0x0076}
0x3a4a…3a60 Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHDU20 «, t00=0x0025, t01=0x008a}
0x3a60…3a78 Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU02 «, t00=0x0025, t01=0x00a0}
0x3a78…3a84 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00b8}
0x3a84…3a98 Head {h00=0x0010, h01=0x0050, text=»IHDU20 EQU *«, t00=0x0025, t01=0x00c4}
0x3a98…3ac0 Head {h00=0x0024, h01=0x0050, text=» ANKL A1,/440F MASK RETURN CODE «, t00=0x0025, t01=0x00d8}
0x3ac0…3ad2 Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0025, t01=0x0100}
0x3ad2…3af8 Head {h00=0x0022, h01=0x0050, text=» RB(N) DUREDY READY INTERRUPT «, t00=0x0025, t01=0x0112}
0x3af8…3b0a Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0025, t01=0x0138}
0x3b0a…3b12 Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x014a}
0x3b12…3b1a Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0152}
0x3b1a…3b32 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTSAV,A6«, t00=0x0025, t01=0x015a}
0x3b32…3b46 Head {h00=0x0010, h01=0x0050, text=» RF(NN) GET «, t00=0x0025, t01=0x0172}
0x3b46…3b58 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0025, t01=0x0186}
0x3b58…3b6a Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0026, t01=0x0008}
0x3b6a…3b98 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) END:IO DISC UNIT NOT OPERABLE «, t00=0x0026, t01=0x001a}
0x3b98…3bb0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0026, t01=0x0048}
0x3bb0…3bb8 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0060}
0x3bb8…3bc0 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0068}
0x3bc0…3bee Head {h00=0x002a, h01=0x0050, text=»GET LD A5,DWTA5,A6 RELOAD REGISTERS A5«, t00=0x0026, t01=0x0070}
0x3bee…3c1a Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTA4,A6 A4 «, t00=0x0026, t01=0x009e}
0x3c1a…3c46 Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTA2,A6 A2 «, t00=0x0026, t01=0x00ca}
0x3c46…3c5e Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x0026, t01=0x00f6}
0x3c5e…3c78 Head {h00=0x0016, h01=0x0050, text=» ANK A7,/FF ORDER «, t00=0x0026, t01=0x010e}
0x3c78…3c9c Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB-ADDRESS«, t00=0x0026, t01=0x0128}
0x3c9c…3cac Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0026, t01=0x014c}
0x3cac…3cc4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0026, t01=0x015c}
0x3cc4…3ccc Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0174}
0x3ccc…3cd4 Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x017c}
0x3cd4…3cde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0184}
0x3cde…3cfa Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0026, t01=0x018e}
0x3cfa…3d16 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x0027, t01=0x001a}
0x3d16…3d32 Head {h00=0x0018, h01=0x0050, text=»* PERFORM ENDIO * «, t00=0x0027, t01=0x0036}
0x3d32…3d4e Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x0027, t01=0x0052}
0x3d4e…3d6a Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0027, t01=0x006e}
0x3d6a…3d74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x008a}
0x3d74…3d88 Head {h00=0x0010, h01=0x0050, text=»END:IO EQU *«, t00=0x0027, t01=0x0094}
0x3d88…3d90 Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x00a8}
0x3d90…3db6 Head {h00=0x0022, h01=0x0050, text=» ANKL A1,/28F MASK RETURN CODE«, t00=0x0027, t01=0x00b0}
0x3db6…3dd2 Head {h00=0x0018, h01=0x0050, text=» RF(NZ) END:10 ERROR«, t00=0x0027, t01=0x00d6}
0x3dd2…3df8 Head {h00=0x0022, h01=0x0050, text=» LD A2,4,A8 REQUESTED LENGTH =«, t00=0x0027, t01=0x00f2}
0x3df8…3e1c Head {h00=0x0020, h01=0x0050, text=» ST A2,6,A8 EFFECTIVE LENGTH«, t00=0x0027, t01=0x0118}
0x3e1c…3e24 Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x013c}
0x3e24…3e2c Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0144}
0x3e2c…3e40 Head {h00=0x0010, h01=0x0050, text=»END:10 EQU *«, t00=0x0027, t01=0x014c}
0x3e40…3e64 Head {h00=0x0020, h01=0x0050, text=» LD A2,RETRY MAX NO OF TRIES«, t00=0x0027, t01=0x0160}
0x3e64…3e7c Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTA4,A6 «, t00=0x0027, t01=0x0184}
0x3e7c…3e9a Head {h00=0x001a, h01=0x0050, text=» RF(E) END:15 NO RETRY«, t00=0x0028, t01=0x000c}
0x3e9a…3ec0 Head {h00=0x0022, h01=0x0050, text=» ORKL A1,/100 BIT 7 = RETRIES «, t00=0x0028, t01=0x002a}
0x3ec0…3ed4 Head {h00=0x0010, h01=0x0050, text=»END:15 EQU *«, t00=0x0028, t01=0x0050}
0x3ed4…3ef2 Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTOR,A6 ORDER «, t00=0x0028, t01=0x0064}
0x3ef2…3f0a Head {h00=0x0014, h01=0x0050, text=» ANK A2,1 INDEX «, t00=0x0028, t01=0x0082}
0x3f0a…3f1c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x0028, t01=0x009a}
0x3f1c…3f2e Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0028, t01=0x00ac}
0x3f2e…3f54 Head {h00=0x0022, h01=0x0050, text=» CM DWTBSY,A2 RESET READY WORD«, t00=0x0028, t01=0x00be}
0x3f54…3f6a Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0028, t01=0x00e4}
0x3f6a…3f9a Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A6 OTHER DISC UNIT DWT-ADDRESS «, t00=0x0028, t01=0x00fa}
0x3f9a…3fbe Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0028, t01=0x012a}
0x3fbe…3fee Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A6 ACTIVE DISC UNIT DWT-ADDRESS«, t00=0x0028, t01=0x014e}
0x3fee…3ffa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x017e}
0x3ffa…401e Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0028, t01=0x018a}
0x401e…4048 Head {h00=0x0026, h01=0x0050, text=»END:20 ABL TDISP GO TO DISPATCHER «, t00=0x0029, t01=0x001e}
0x4048…4056 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0048}
0x4056…405e Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0056}
0x405e…4066 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x005e}
0x4066…408a Head {h00=0x0020, h01=0x0050, text=»VO:NAM LD A1,DWTOR,A6 ORDER «, t00=0x0029, t01=0x0066}
0x408a…40aa Head {h00=0x001c, h01=0x0050, text=» ST A1,DWTSAV,A6 SAVE IT«, t00=0x0029, t01=0x008a}
0x40aa…40c6 Head {h00=0x0018, h01=0x0050, text=» CM DWTOR,A6 INDEX=0«, t00=0x0029, t01=0x00aa}
0x40c6…40da Head {h00=0x0010, h01=0x0050, text=»VO:NA5 EQU *«, t00=0x0029, t01=0x00c6}
0x40da…40e2 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00da}
0x40e2…40ea Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00e2}
0x40ea…40f2 Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00ea}
0x40f2…411a Head {h00=0x0024, h01=0x0050, text=»DU:NAM CF A5,SEEKZ SEEK SECTOR 0«, t00=0x0029, t01=0x00f2}
0x411a…4130 Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/203 «, t00=0x0029, t01=0x011a}
0x4130…416a Head {h00=0x0036, h01=0x0050, text=» RF(NZ) VO:NA8 SEEK-,THROUGHPUT-ERROR,NOT OPERABLE«, t00=0x0029, t01=0x0130}
0x416a…4198 Head {h00=0x002a, h01=0x0050, text=» CF A5,WER:R5 EXECUTE WER INSTRUCTIONS«, t00=0x0029, t01=0x016a}
0x4198…41be Head {h00=0x0022, h01=0x0050, text=» SUR A2,A2 CYLINDER NUMBER = 0«, t00=0x002a, t01=0x0008}
0x41be…41d6 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTCYL,A6«, t00=0x002a, t01=0x002e}
0x41d6…41fa Head {h00=0x0020, h01=0x0050, text=» CF A5,CIO READ VOLUME LABEL«, t00=0x002a, t01=0x0046}
0x41fa…420c Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x002a, t01=0x006a}
0x420c…4240 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) VO:NA8 THROUGHPUT-ERROR,NOT OPERABLE«, t00=0x002a, t01=0x007c}
0x4240…4248 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x00b0}
0x4248…4250 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x00b8}
0x4250…4268 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,DWTNAM «, t00=0x002a, t01=0x00c0}
0x4268…427a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x002a, t01=0x00d8}
0x427a…4292 Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOR,A6 «, t00=0x002a, t01=0x00ea}
0x4292…42ae Head {h00=0x0018, h01=0x0050, text=» ANK A1,1 DISC INDEX«, t00=0x002a, t01=0x0102}
0x42ae…42ce Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUNA10 FIXED DISC«, t00=0x002a, t01=0x011e}
0x42ce…42ee Head {h00=0x001c, h01=0x0050, text=» ADK A2,6 CARTRIDGE DISC«, t00=0x002a, t01=0x013e}
0x42ee…42f6 Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x015e}
0x42f6…42fe Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0166}
0x42fe…4328 Head {h00=0x0026, h01=0x0050, text=»DUNA10 SUR A1,A1 RESET RETURN CODE«, t00=0x002a, t01=0x016e}
0x4328…434e Head {h00=0x0022, h01=0x0050, text=» LDKL A3,BUF+2 BUFFER ADDRESS «, t00=0x002b, t01=0x0008}
0x434e…4360 Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x002b, t01=0x002e}
0x4360…4368 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0040}
0x4368…4370 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0048}
0x4370…4378 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0050}
0x4378…43a2 Head {h00=0x0026, h01=0x0050, text=»DUNA20 LDR* A7,A3 GET VOLUME NAME «, t00=0x002b, t01=0x0058}
0x43a2…43d4 Head {h00=0x002e, h01=0x0050, text=» CWR* A7,A2 COMPARE WITH LAST VOLUME NAME «, t00=0x002b, t01=0x0082}
0x43d4…43f4 Head {h00=0x001c, h01=0x0050, text=» RF(E) DUNA30 SAME DISC «, t00=0x002b, t01=0x00b4}
0x43f4…4418 Head {h00=0x0020, h01=0x0050, text=» LDK A1,/80 NEW DISC LOADED «, t00=0x002b, t01=0x00d4}
0x4418…4420 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x00f8}
0x4420…4428 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0100}
0x4428…4430 Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0108}
0x4430…4458 Head {h00=0x0024, h01=0x0050, text=»DUNA30 STR A7,A2 SAVE DISC NAME «, t00=0x002b, t01=0x0110}
0x4458…447c Head {h00=0x0020, h01=0x0050, text=» ADK A2,2 INCREMENT POINTERS«, t00=0x002b, t01=0x0138}
0x447c…448e Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x002b, t01=0x015c}
0x448e…44a0 Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x002b, t01=0x016e}
0x44a0…44c4 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) DUNA20 GET NEXT WORD«, t00=0x002b, t01=0x0180}
0x44c4…44cc Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0014}
0x44cc…44d4 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x001c}
0x44d4…44e6 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x002c, t01=0x0024}
0x44e6…4508 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUNA40 VOLUME MATCH«, t00=0x002c, t01=0x0036}
0x4508…4526 Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTOR,A6 INDEX «, t00=0x002c, t01=0x0058}
0x4526…4538 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x002c, t01=0x0076}
0x4538…454a Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x002c, t01=0x0088}
0x454a…455c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x002c, t01=0x009a}
0x455c…4586 Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTBSY,A2 NEW VOLUME LOADED«, t00=0x002c, t01=0x00ac}
0x4586…459a Head {h00=0x0010, h01=0x0050, text=»DUNA40 EQU *«, t00=0x002c, t01=0x00d6}
0x459a…45a2 Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x00ea}
0x45a2…45aa Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x00f2}
0x45aa…45c8 Head {h00=0x001a, h01=0x0050, text=» LD A1,DWTOR,A6 ORDER «, t00=0x002c, t01=0x00fa}
0x45c8…45de Head {h00=0x0012, h01=0x0050, text=» RF(NZ) VO:NA8«, t00=0x002c, t01=0x0118}
0x45de…45f0 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x002c, t01=0x012e}
0x45f0…4610 Head {h00=0x001c, h01=0x0050, text=» SC A1,DWTOR,A6 INDEX=1 «, t00=0x002c, t01=0x0140}
0x4610…4622 Head {h00=0x000e, h01=0x0050, text=» RB VO:NA5«, t00=0x002c, t01=0x0160}
0x4622…462a Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0172}
0x462a…465e Head {h00=0x0030, h01=0x0050, text=»VO:NA8 LD A1,DWTSAV,A6 GET OLD DWT CONTENTS «, t00=0x002c, t01=0x017a}
0x465e…467e Head {h00=0x001c, h01=0x0050, text=» ST A1,DWTOR,A6 SAVE IT «, t00=0x002d, t01=0x001e}
0x467e…4692 Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x002d, t01=0x003e}
0x4692…46aa Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTSAV,A6«, t00=0x002d, t01=0x0052}
0x46aa…46c2 Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB1 «, t00=0x002d, t01=0x006a}
0x46c2…46e0 Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x002d, t01=0x0082}
0x46e0…470c Head {h00=0x0028, h01=0x0050, text=» LDK A1,1 RETURN CODE. NOT OPERABLE «, t00=0x002d, t01=0x00a0}
0x470c…471c Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002d, t01=0x00cc}
0x471c…4726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00dc}
0x4726…4730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00e6}
0x4730…474a Head {h00=0x0016, h01=0x0050, text=»* TIMER POINTER «, t00=0x002d, t01=0x00f0}
0x474a…4754 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x010a}
0x4754…4776 Head {h00=0x001e, h01=0x0050, text=»TIMER DATA 0 TIMER POINTER«, t00=0x002d, t01=0x0114}
0x4776…478e Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x002d, t01=0x0136}
0x478e…4796 Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x014e}
0x4796…479e Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x0156}
0x479e…47a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x015e}
0x47a8…47d6 Head {h00=0x002a, h01=0x0050, text=»* DEVICE WORK TABLE DISC UNIT NO. 2 «, t00=0x002d, t01=0x0168}
0x47d6…47e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0008}
0x47e0…47ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0012}
0x47ea…47fe Head {h00=0x0010, h01=0x0050, text=»DWDU02 EQU *«, t00=0x002e, t01=0x001c}
0x47fe…4814 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x002e, t01=0x0030}
0x4814…483e Head {h00=0x0026, h01=0x0050, text=» DATA DWDU01 POINTER TO OTHER DWT «, t00=0x002e, t01=0x0046}
0x483e…485c Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT STATUS«, t00=0x002e, t01=0x0070}
0x485c…4878 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x002e, t01=0x008e}
0x4878…488e Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x002e, t01=0x00aa}
0x488e…48b4 Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x002e, t01=0x00c0}
0x48b4…48d0 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x002e, t01=0x00e6}
0x48d0…48f8 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x002e, t01=0x0102}
0x48f8…4916 Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x002e, t01=0x012a}
0x4916…4942 Head {h00=0x0028, h01=0x0050, text=» DATA /00FF LEFT BYTE=SECTOR NUMBER «, t00=0x002e, t01=0x0148}
0x4942…496e Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x002e, t01=0x0174}
0x496e…4986 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x002f, t01=0x0010}
0x4986…4998 Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x002f, t01=0x0028}
0x4998…49c2 Head {h00=0x0026, h01=0x0050, text=» DATA /80 DISC UNIT BUSY INDICATOR«, t00=0x002f, t01=0x003a}
0x49c2…49d4 Head {h00=0x000e, h01=0x0050, text=» DATA /80 «, t00=0x002f, t01=0x0064}
0x49d4…49fc Head {h00=0x0024, h01=0x0050, text=» RIGHT BYTE = CYLINDER NUMBER «, t00=0x002f, t01=0x0076}
0x49fc…4a28 Head {h00=0x0028, h01=0x0050, text=» CIO A2,1,DAF2 CIO-START FIXED DISC «, t00=0x002f, t01=0x009e}
0x4a28…4a58 Head {h00=0x002c, h01=0x0050, text=» CIO A2,1,DAC2 CIO-START CARTRIDGE DISC «, t00=0x002f, t01=0x00ca}
0x4a58…4a6c Head {h00=0x0010, h01=0x0050, text=» WER A2,WER1«, t00=0x002f, t01=0x00fa}
0x4a6c…4a82 Head {h00=0x0012, h01=0x0050, text=» WER A3,WER1+1«, t00=0x002f, t01=0x010e}
0x4a82…4aac Head {h00=0x0026, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME FIXED DISC«, t00=0x002f, t01=0x0124}
0x4aac…4ada Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME CARTRIDGE DISC«, t00=0x002f, t01=0x014e}
0x4ada…4aea Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x002f, t01=0x017c}
0x4aea…4b0a Head {h00=0x001c, h01=0x0050, text=» DATA /FFFF CYLINDER NO.«, t00=0x002f, t01=0x018c}
0x4b0a…4b1e Head {h00=0x0010, h01=0x0050, text=» IFT TYPE2=0«, t00=0x0030, t01=0x001c}
0x4b1e…4b42 Head {h00=0x0020, h01=0x0050, text=» DATA MAXCY5 MAX CYLINDER NO«, t00=0x0030, t01=0x0030}
0x4b42…4b4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0054}
0x4b4e…4b6a Head {h00=0x0018, h01=0x0050, text=» IFT NUNITS+TYPE2=3 «, t00=0x0030, t01=0x0060}
0x4b6a…4b8e Head {h00=0x0020, h01=0x0050, text=» DATA MAXCY6 MAX CYLINDER NO«, t00=0x0030, t01=0x007c}
0x4b8e…4b9a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00a0}
0x4b9a…4bb2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0030, t01=0x00ac}
0x4bb2…4bba Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x00c4}
0x4bba…4bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00cc}
0x4bc4…4bf2 Head {h00=0x002a, h01=0x0050, text=»* DEVICE WORK TABLE DISC UNIT NO. 1 «, t00=0x0030, t01=0x00d6}
0x4bf2…4bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0104}
0x4bfc…4c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x010e}
0x4c06…4c1a Head {h00=0x0010, h01=0x0050, text=»DWDU01 EQU *«, t00=0x0030, t01=0x0118}
0x4c1a…4c44 Head {h00=0x0026, h01=0x0050, text=» DATA DWDU02 POINTER TO OTHER DWT «, t00=0x0030, t01=0x012c}
0x4c44…4c62 Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT-STATUS«, t00=0x0030, t01=0x0156}
0x4c62…4c7e Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB-ADDRESS «, t00=0x0030, t01=0x0174}
0x4c7e…4c94 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0030, t01=0x0190}
0x4c94…4cba Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x0031, t01=0x0016}
0x4cba…4cd6 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB-ADDRESS«, t00=0x0031, t01=0x003c}
0x4cd6…4cfe Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0031, t01=0x0058}
0x4cfe…4d1c Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0031, t01=0x0080}
0x4d1c…4d38 Head {h00=0x0018, h01=0x0050, text=»DWTSEC EQU *-DWDU01 «, t00=0x0031, t01=0x009e}
0x4d38…4d64 Head {h00=0x0028, h01=0x0050, text=» DATA /00FF LEFT BYTE=SECTOR NUMBER «, t00=0x0031, t01=0x00ba}
0x4d64…4d90 Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x0031, t01=0x00e6}
0x4d90…4da8 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x0031, t01=0x0112}
0x4da8…4dba Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x0031, t01=0x012a}
0x4dba…4dd6 Head {h00=0x0018, h01=0x0050, text=»DWTBSY EQU *-DWDU01 «, t00=0x0031, t01=0x013c}
0x4dd6…4dfc Head {h00=0x0022, h01=0x0050, text=» DATA /80 UNIT BUSY INDICATOR «, t00=0x0031, t01=0x0158}
0x4dfc…4e22 Head {h00=0x0022, h01=0x0050, text=» DATA /80 UNIT BUSY INDICATOR «, t00=0x0031, t01=0x017e}
0x4e22…4e48 Head {h00=0x0022, h01=0x0050, text=»DWTCIO EQU *-DWDU01 CIO-START «, t00=0x0032, t01=0x0014}
0x4e48…4e5e Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DAF1«, t00=0x0032, t01=0x003a}
0x4e5e…4e74 Head {h00=0x0012, h01=0x0050, text=» CIO A2,1,DAC1«, t00=0x0032, t01=0x0050}
0x4e74…4ea4 Head {h00=0x002c, h01=0x0050, text=»DWTWR1 EQU *-DWDU01 1:ST WER INSTRUCTION«, t00=0x0032, t01=0x0066}
0x4ea4…4eb8 Head {h00=0x0010, h01=0x0050, text=» WER A2,WER1«, t00=0x0032, t01=0x0096}
0x4eb8…4ee8 Head {h00=0x002c, h01=0x0050, text=»DWTWR2 EQU *-DWDU01 2:ND WER INSTRUCTION«, t00=0x0032, t01=0x00aa}
0x4ee8…4efe Head {h00=0x0012, h01=0x0050, text=» WER A3,WER1+1«, t00=0x0032, t01=0x00da}
0x4efe…4f1a Head {h00=0x0018, h01=0x0050, text=»DWTNAM EQU *-DWDU01 «, t00=0x0032, t01=0x00f0}
0x4f1a…4f44 Head {h00=0x0026, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME FIXED DISC«, t00=0x0032, t01=0x010c}
0x4f44…4f72 Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0 VOLUME NAME CARTRIDGE DISC«, t00=0x0032, t01=0x0136}
0x4f72…4f8e Head {h00=0x0018, h01=0x0050, text=»DWTSAV EQU *-DWDU01 «, t00=0x0032, t01=0x0164}
0x4f8e…4f9e Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x0032, t01=0x0180}
0x4f9e…4fba Head {h00=0x0018, h01=0x0050, text=»DWTCYL EQU *-DWDU01 «, t00=0x0032, t01=0x0190}
0x4fba…4fde Head {h00=0x0020, h01=0x0050, text=» DATA /FFFF CYLINDER NUMBER «, t00=0x0033, t01=0x001c}
0x4fde…4ff2 Head {h00=0x0010, h01=0x0050, text=» IFT TYPE1=0«, t00=0x0033, t01=0x0040}
0x4ff2…500e Head {h00=0x0018, h01=0x0050, text=»DWTCMX EQU *-DWDU01 «, t00=0x0033, t01=0x0054}
0x500e…5036 Head {h00=0x0024, h01=0x0050, text=» DATA MAXCY5 MAX CYLINDER X/1215«, t00=0x0033, t01=0x0070}
0x5036…5042 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0098}
0x5042…5056 Head {h00=0x0010, h01=0x0050, text=» IFT TYPE1=1«, t00=0x0033, t01=0x00a4}
0x5056…5072 Head {h00=0x0018, h01=0x0050, text=»DWTCMX EQU *-DWDU01 «, t00=0x0033, t01=0x00b8}
0x5072…509e Head {h00=0x0028, h01=0x0050, text=» DATA MAXCY6 MAX CYLINDER NO X/1216 «, t00=0x0033, t01=0x00d4}
0x509e…50aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x0100}
0x50aa…50b6 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0033, t01=0x010c}
0x50b6…50ba Head {h00=0x4004, h01=0x0000}
0x50ba…50be 00 33 01 18 ┆ 3 ┆
0x50be…50c6 (52, 1, 8) 20 04 00 00 00 34 00 04 ┆ 4 ┆