|
|
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: 58976 (0xe660)
Notes: pts_type(SC)
Names: »DRDU01.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »M:TU10/DRDU01.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »M:TU10/DRDU01.SC«
IDENT DRDU01 REL 10.0 80-03-14 870105041000 * * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRDU01 = DRIVER FOR ONE/TWO DISC UNITS * * PTS 6875 (X1215) AND/OR PTS 6876 (X1216) * * * * * ************************************************** * * * THIS DISC DRIVER HANDLES UP TO TWO DISC * DRIVES X1215,X1216 CONNECTED TO CPU VIA IOP * ON MULTIPLEX CHANNEL * * * THE FOLLOWING ORDERS ARE TREATED : * * /00 TEST STATUS * /01 BASIC READ * /05 BASIC WRITE * /11 PHYSICAL READ * /15 PHYSICAL WRITE * /1F FORMAT VOLUME * EJECT DRDU01 DRDU01 * * *********** * ENTRIES * *********** * * ENTRY DUADR ACTIVATION ADDRESS ENTRY DUON RECOVERY 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 EJECT DRDU01 * * ************* * EXTERNALS * ************* * * EXTRN TDISP DISPATCHER EXTRN TENDIO END I/O EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK EXTRN NVLCHK CHECK IF NEW VOLUME LOADED EXTRN VOLGET PUT VOLUME NAME IN DWT SET NVL EXTRN VOLNAM VOLUME NAME FROM DWT TO USER BUFFER EXTRN VOLCLR CLEAR VOLUME NAMES IN DWT EXTRN INXDWT DOUBLED INDEX + DWT ADDRESS EXTRN DISIOE REQUEST ERROR EXTRN INIFLG INITIALIZATION FLAG EXTRN PFPOST PWF POST PROCESSING FLAG EXTRN INTSAV SAVE AREA LAST INTERRUPT EXTRN SETIMP TIMER EXTRN TTB:MT EXTRN DWTST STATUS EXTRN DWTECB ECB ADDRESS EXTRN DWTOR DWT INDEX AND ORDER EXTRN DWTA2 SAVE AREA A2 EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 EXTRN DWTSB1 STACK BASE 1 IN DWT EXTRN DWTSB2 STACK BASE 2 IN DWT EXTRN DWTUEC USER ECB ADDRESS EXTRN DWTORD SAVE AREA FOR ORDER EXTRN DWTNVL NEM VOLUME LOADED INDICATORS EXTRN DWTVOL VOLUME NAMES EXTRN DWTTAB TTAB ADDRESS EXTRN ECBBA ECB BUFFER ADDRESS EXTRN ECBRL ECB REQUESTED LENGTH EXTRN ECBEL ECB EFFECTIVE LENGTH EXTRN ECBRC ECB RETURN CODE EXTRN ECBCW1 ECB 1:ST CONTROL WORD EXTRN ECBCW2 ECB 2:ND CONTROL WORD EJECT DRDU01 * * ************************** * * * 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 2 * * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * EJECT DRDU01 * * * A PROGRAM VERSION USING THE INSTRUCTION SET OF * CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1 * X:E EQU 0 CPU857 EQU 00 * * * PROGRAM VERSION FOR FORMAT * A2 IS OBTAINED BY SETTING VERSA2 EQU 1 * A3 IS OBTAINED BY SETTING VERSA3 EQU 1 * X:C EQU 1 VERSA2 EQU 1 * X:D EQU 1 VERSA3 EQU 1 * EJECT DRDU01 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 * MAXSEC EQU 6528 MAX NO OF SECTORS ON UNPACKED PTS 6875 SECLEN EQU 256 SECTOR LENGTH, CHARACTERS PHSECL EQU 384 PHYSICAL SECTOR LENGTH QRETRY EQU 4 NO OF RETRIES TIME EQU 1000 1 MIN 40 SEC * DEVIND EQU 10 * EJECT DRDU01 DRDU01 * * DATA 0 INDICATES NO MMU BUFFER DATA DEVIND DISC DEVICE INDEX DUADR DATA DUAD ACTIVATION ADDRESS DATA 0 ABORT ROUTINE ADDRESS * IFT VERSA3=1 BUFFER RES 193 XIF * IFT VERSA3=0 BUFFER RES 25 * IFT RAW=1 RES 103 XIF * EJECT DRDU01 DRDU01 * * ***************** * * * ACTIVATION * * * ***************** * * DUAD EQU * CM DWTRTY,A6 RETRY INDICATOR CM DWTFBU,A6 RESET DRIVER BUFFER INDICATOR LDK A1,0 LC A1,DWTOR,A6 GET INDEX IFT NUNITS=1 SUK A1,1 XIF IFT NUNITS=2 SUK A1,3 XIF RF(P) DUERR FAULT IN INDEX * DUA:00 EQU * * LDK A5,DWTSB3 ADR A5,A6 LOAD STACK BASE IFT MMUPAG=1 MLR 2,A8 GET 18 BIT BUFFER ADDRESS SLC A1,4 MOST SIGN. BITS ANK A1,3 SRL A2,1 WORD ADDDRESS CF A5,MMULOG GET LOGICAL ADDRESS XIF * CF A15,NVLCHK CHECK IF NEW VOLUME LOADED * SAVE INDEX AND ORDER ADK A7,0 SET CR RF(NZ) DUA:05 NOT TEST STATUS ORDER * EJECT DRDU01 * * ********************* * * * TEST STATUS * * * ********************* * * ORS A1,ECBRC,A8 NVL BIT LDKL A2,/200 ANS A2,DWTOR,A6 VO:NAM ON FIRST OR SECOND UNIT LDK A2,1 ST A2,DWTSAV,A6 INDICATE TEST STATUS CF A5,VO:NAM READ VOLUME NAME ADK A1,0 RF(NZ) TESEND NOT OPERABLE LD A2,DWTORD,A6 RESTORE INDEX AND ORDER ST A2,DWTOR,A6 LD A8,DWTECB,A6 ECB ADDRESS CF A15,VOLNAM TRANSFER VOLUME NAME TO USER BUFFER LDK A1,0 RESET RETURN CODE TESEND EQU * LDKL A2,-1 ST A2,DWTSAV,A6 INDICATE TEST STATUS DONE ABL END:IO PERFORM ENDIO * EJECT DRDU01 * *************************************** * * * NEW VOLUME LOADED CHECK * * ORDER CODE CHECK * * * *************************************** * * INPUT: A1=NVL RETURN CODE FROM NVLCHK * A7=ORDER CODE * * DUA:05 EQU * ADK A1,0 CHECK IF NEW VOLUME LOADED ABL(NZ) END:IO PERFORM TENDIO SUK A7,1 RF(Z) DUA:10 BASIC READ SUK A7,4 RF(Z) DUA:10 BASIC WRITE SUK A7,12 RF(Z) DUA:10 PHYSICAL READ SUK A7,4 RF(Z) DUA:10 PHYSICAL WRITE SUK A7,10 RF(Z) FORMAT FORMAT VOLUME * DUERR ABL DISIOE REQUEST ERROR * INCLEN EQU * REQUESTED LENGTH ERROR LDKL A1,/8008 ABL END:20 EJECT DRDU01 * * ************************** * * * FORMAT VOLUME * * * ************************** * * FORMAT EQU * LDK A7,204 NUMBER OF CYLINDERS ON PTS 6875 LD A1,ECBCW1,A8 GET DISC TYPE IFT VERSA2+VERSA3=2 ECR A2,A1 XIF ANK A1,1 RF(NZ) FORM03 PTS 6875 ADK A7,204 PTS 6876 FORM03 EQU * * IFT VERSA2+VERSA3=2 LDKL A3,BUFFER LDKL A1,/C001 WRITE ONE WORD ANK A2,3 SUK A2,3 RF(NZ) FORM05 A1 OR A2 LDKL A1,/C0C1 WRITE 386 BYTES ADKL A3,PHSECL FORM05 EQU * ST A1,DWTFBU,A6 SAVE 1ST WER XIF * IFT VERSA2=1 IFT VERSA3=0 LDKL A3,BUFFER XIF * IFT VERSA2=0 IFT VERSA3=1 LDKL A3,BUFFER+PHSECL POSITION FOR CYL ID XIF * STR A3,A6 DRIVER BUFFER POINTER IFT NUNITS=2 CF A5,INXUNI CM DWTCYL,A2 CYLINDER ZERO XIF IFT NUNITS=1 CM DWTCYL,A6 CYLINDER ZERO XIF * EJECT DRDU01 * * FORM20 EQU * LDK A4,QRETRY FORM30 EQU * IFT NUNITS=2 CF A5,INXUNI GET UNIT INDEX XIF CF A5,SEEK SEEK CYLINDER SLL A1,5 STATUS RF(NN) FORM40 SEEK ERROR IFT NUNITS=2 CF A5,INXUNI LD A1,DWTCYL,A2 XIF IFT NUNITS=1 LD A1,DWTCYL,A6 XIF ST* A1,0,A6 PREPARE DRIVER BUFFER WITH CYL. ID LDK A3,0 CF A5,SKEW WRITE SECTOR 0 ON EVEN CYLINDERS * WRITE SECTOR 8 ON ODD CYLINDERS ORK A3,1 ORDER CODE: WRITE * IFT VERSA2+VERSA3=2 LD A1,DWTFBU,A6 GET 1ST WER XIF * IFT VERSA2=1 IFT VERSA3=0 LDKL A1,/C002 XIF * IFT VERSA2=0 IFT VERSA3=1 LDKL A1,/C0C1 1ST WER WRITE 386 BYTES XIF * LDKL A2,BUFFER CF A5,CIO:50 CIO:50 SECTOR ANK A1,/1F RF(NZ) FORM40 WRITE ERROR IFT NUNITS=2 CF A5,INXUNI IM DWTCYL,A2 XIF IFT NUNITS=1 IM DWTCYL,A6 XIF SUK A7,1 DECREMENT CYLINDER COUNTER RB(NZ) FORM20 LD A2,ECBCW1,A8 GET FORMAT AND TYPE OF DISC ABL TRANPA PUT FORMAT AND TYPE IN DWT FORM40 EQU * CF A5,SEEKZ SEEK CYLINDER 0 SLL A1,6 RF(N) FORM50 SEEK ERROR SUK A4,1 RETRY COUNTER RB(NZ) FORM30 RETRY FORM50 EQU * LDK A1,2 SEEK ERROR RETURN CODE ABL END:IO PERFORM END IO EJECT DRDU01 DRDU01 * * ************************************************* * * * CHECK IF ALLOWED SECTOR LENGTH, BUFFER SIZE * * AND SECTOR NUMBER * * SAVE BUFFER ADDRESS AND SET SECTOR COUNTER * * * ************************************************* * * INPUT: ECB * OUTPUT: A7=SECTOR COUNTER * DWTUBU=USER BUFFER POINTER * * DUA:10 EQU * LD A3,ECBRL,A8 REQUESTED LENGTH RB(Z) INCLEN ECR A7,A3 DIVIDE BY 256 TO GET NUMBER OF SECTORS ANK A3,/FF SET CONDITION REGISTER RB(NZ) INCLEN NOT AN INTEGER NUMBER OF SECTORS LD A3,ECBCW2,A8 SECTOR NUMBER WHERE THE BUFFER BEGIN RB(N) DUERR INCORRECT SECTOR NUMBER CW A3,DWTSMX,A2 RB(NL) DUERR INCORRECT SECTOR NUMBER ADR A3,A7 CW A3,DWTSMX,A2 RB(G) INCLEN SECTOR NUMBER OVERFLOW * IFT MMUPAG=0 LD A1,ECBBA,A8 ST A1,DWTUBU,A6 USER BUFFER POINTER XIF * EJECT DRDU01 * IFT VERSA2+VERSA3=2 * * ****************************** * * * DISC VERSION SEPARATION * * * ***************************** * * LD A2,DWTFOR,A2 SUK A2,2 RF(Z) RW:800 VERSION A2 XIF * EJECT DRDU01 * IFT VERSA3=1 * ************************************* * * * * * GET PHYSICAL SECTOR NUMBER BY * * DIVIDE BY 3 * * * ************************************* * IFT CPU852=0 LDK A1,0 PREPARE FOR DIVISION LD A2,ECBCW2,A8 GET LOGICAL SECTOR NUMBER DVK 3 * A1=REMAINER=LOGICAL SECTOR POSITION * A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC XIF * IFT VERSA3=1 IFT CPU852=1 LD A1,ECBCW2,A8 LDR A3,A1 SECTOR NUMBER LDK A2,0 DVK:00 EQU * ADR A2,A3 I:= I+I/4 SRL A3,2 I:= I/4 RB(NZ) DVK:00 SRL A2,2 TRUNCATE SUR A1,A2 SUR A1,A2 SUR A1,A2 REST AFTER LOOP SUK A2,1 DVK:10 EQU * ADK A2,1 SUK A1,3 DIVIDE BY 3 RB(NN) DVK:10 ADK A1,3 REST * A1=REMAINER=LOGICAL SECTOR POSITION * A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC * EJECT DRDU01 XIF * IFT VERSA3=1 * ************************************* * * * SAVE PHYSICAL SECTOR NUMBER * * AND SECTOR POSITION * * BRANCH ACCORDING TO SECTOR * * POSITION * * * ************************************* * * INPUT: A1=SECTOR POSITION INDICATOR * A2=LOGICAL SECTOR NUMBER / 3 * * ADR A2,A2 STR A2,A6 SAVE PHYSICAL SECTOR NUMBER SUK A1,1 IFT RAW=1 ST A1,DWTSEP,A6 SAVE SECTOR POSITION ST A2,DWTSEI,A6 SAVE 1ST PHYS. SECTOR NUMBER XIF * IFT VERSA3=1 * LOGICAL SECTOR POSITION RF(N) RW:300 ,XXXX , , RF(Z) RW:200 , XX,XX , * , , XXXX, * EJECT DRDU01 * ************************************* * * * READ/WRITE FROM SECTOR IN * * POSITION , , xxxx, * * * ************************************* * IMR A6 LOG. SECTOR IN NEXT PHYSICAL IFT RAW=1 IM DWTSEI,A6 SAVE FOR READ AFTER WRITE XIF * IFT VERSA3=1 CF A5,IOROUT DATA /0084 SUK A7,1 RF RW:300 * EJECT DRDU01 * ************************************* * * * READ/WRITE FROM SECTOR IN * * POSITION , xx, * * * ************************************* * * RW:200 EQU * CF A5,IOROUT DATA /0048 SUK A7,2 NUMBER OF SECTORS RF(N) RW:230 1 SECTOR IN IO RF(NZ) RW:260 >2 SECTORS IN IO * , XX,XXXXXX, CF A5,IOROUT DATA /00C0 RF RW:600 RW:230 EQU * , XX,XX , CF A5,IOROUT DATA /0040 RF RW:600 RW:260 EQU * , XX,XXXXXX, CF A5,IOROUT DATA /80C0 * EJECT DRDU01 * ************************************ * * * DIRECT READ/WRITE AS LONG * * AS POSIBLE * * * ************************************ * * RW:300 EQU * SUK A7,3 SECTOR COUNTER RF(NG) RW:500 LESS THAN FOUR SECTORS IN IO CF A5,IOROUT DATA /80C0 CF A5,IOROUT DATA /80C0 RB RW:300 * EJECT DRDU01 * ************************************ * * * READ/WRITE ON THE LAST SECTORS * * IN IO * * * ************************************ * * RW:500 EQU * RF(Z) RW:580 3 SECTORS ADK A7,2 RF(P) RW:560 2 SECTORS RF(N) RW:600 0 SECTORS RW:530 EQU * ,XXXX , , CF A5,IOROUT DATA /0080 RF RW:600 RW:560 EQU * ,XXXXXX,XX , CF A5,IOROUT DATA /80C0 CF A5,IOROUT DATA /0040 RF RW:600 RW:580 EQU * ,XXXXXX,XXXXXX, CF A5,IOROUT DATA /80C0 CF A5,IOROUT DATA /00C0 * EJECT DRDU01 * * RW:600 EQU * IFT RAW=1 * ************************ * * * READ AFTER WRITE * * * ************************ * * DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO * 1ST POS IN DWT=LAST PHYSICAL SECTOR NUMBER IN IO * A7=SECTOR COUNTER * LD A7,DWTOR,A6 ANK A7,/FF GET ORDER SUK A7,/15 RF(NZ) RW:700 NOT PHYSICAL WRITE LDKL A2,-/100 LD A1,DWTSEP,A6 GET 1ST SECTOR POSITION RF(Z) RW:645 , XX, RF(P) RW:640 , XXXX, ADK A2,/80 RW:640 EQU * ADK A2,/80 RW:645 EQU * ST A2,ECBEL,A8 PREPARE EFFECTIVE LENGTH LD A1,DWTSEI,A6 RAW FROM THIS SECTOR LDR* A7,A6 GET LAST SECTOR NO SUR A7,A1 GET NUMBER OF PHYSICAL SECTORS STR A1,A6 * EJECT DRDU01 * * RW:650 EQU * CF A5,IOROUT DATA /40C0 IMR A6 NEXT PHYSICAL SECTOR LDKL A1,PHSECL ADS A1,ECBEL,A8 UPDATE ECBEL SUK A7,1 RB(NZ) RW:650 LD A7,ECBRL,A8 ST A7,ECBEL,A8 CORRECT EFFECTIVE LENGTH XIF * IFT VERSA3=1 RW:700 EQU * LDK A1,0 RETURN CODE ABL END:20 ENDIO * XIF * EJECT DRDU01 * IFT VERSA2=1 * * ********************************* * * * DISC FORMAT A2 * * * ********************************* * * RW:800 EQU * CF A5,DIV31 IFT RAW=1 ST A7,DWTSEI,A6 SAVE NUMBER OF SECTORS FOR READ AFTER WRITE XIF * IFT VERSA2=1 RW:850 EQU * CF A5,IOROUT DATA /A080 INDICATE FORMAT A2 LDKL A1,/100 ADS A1,DWTUBU,A6 UPDATE USER BUFFER POINTER SUK A7,1 RB(NZ) RW:850 MORE SECTORS IN IO * EJECT DRDU01 * * IFT RAW=1 LD A7,DWTOR,A6 GET ORDER ANK A7,/FF SUK A7,/15 * IFT VERSA3=1 RB(NZ) RW:700 NOT PHYSICAL WRITE XIF * IFT VERSA3=0 IFT VERSA2=1 IFT RAW=1 RF(NZ) RW:905 XIF * IFT VERSA2=1 IFT RAW=1 CM ECBEL,A8 PREPARE FOR READ AFTER WRITE LD A7,DWTSEI,A6 CF A5,DIV31 * EJECT DRDU01 * * RW:900 EQU * CF A5,IOROUT DATA /E080 READ AFTER WRITE SUK A7,1 RB(NZ) RW:900 XIF * IFT VERSA2+VERSA3=2 RB RW:700 XIF * IFT VERSA3=0 IFT VERSA2=1 RW:905 EQU * LDK A1,0 RESET RETURN CODE ABL END:20 XIF * EJECT DRDU01 * *********************************************** * * * IOROUT PERFORM READ OR WRITE AND SEEK * * IF NECESSARY * * * *********************************************** * * INPUT : ONE DATA WORD AFTER CF * BIT 0 :INDICATES DIRECT IO * BIT 1 :INDICATES READ AFTER WRITE * BIT 2 :INDICATES FORMAT A2 * BIT 8-11:NUMBER OF WORDS/16 * BIT12-15:START IN DRIVER BUFFER/32 * AFTER SEEK THE CYLINDER ID WILL BE CHECKED BY A READ * DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER * DWTRTY INDICATES RETRIES DONE * DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER * IOROUT EQU * LDR* A3,A6 GET PHYSICAL SECTOR NUMBER SRL A3,5 GET CYLINDER NUMBER * IFT VERSA2+VERSA3=2 LD* A4,4,A5 GET DATA WORD SLL A4,2 RF(NN) SEE:05 FORMAT A3 ADK A3,0 XIF * EJECT DRDU01 * * IFT VERSA2=1 RF(NZ) SEE:05 NOT CYLINDER 0 CF A5,SEEKZ SLL A1,6 RF(N) SEE:20 ERROR IFT NUNITS=2 CF A5,INXUNI CM DWTCYL,A2 CYLINDER ZERO RF VA2BR XIF IFT VERSA2=1 IFT NUNITS=1 CM DWTCYL,A6 RF VA2BR XIF * EJECT DRDU01 * * SEE:05 EQU * IFT NUNITS=2 CF A5,INXUNI CW A3,DWTCYL,A2 COMPARE WITH PRESENT XIF IFT NUNITS=1 CW A3,DWTCYL,A6 XIF * IFT VERSA2=1 IFT VERSA3=0 RF(E) VA2:00 XIF * IFT VERSA2=0 IFT VERSA3=1 RF(E) SEE:90 HEAD IN POSITION XIF * IFT VERSA2+VERSA3=2 RF(NE) SEE:07 NOT SAME CYLINDER ADK A4,0 RF(N) VA2BR FORMAT A2 RF SEE:90 * EJECT DRDU01 * * SEE:07 EQU * XIF * IFT NUNITS=1 ST A3,DWTCYL,A6 NEW CYLINDER NUMBER XIF * IFT NUNITS=2 ST A3,DWTCYL,A2 NEW CYLINDER XIF LDK A4,QRETRY NUMBER OF RETRIES SEE:10 EQU * IFT NUNITS=2 CF A5,INXUNI DOUBLED UNIT INDEX XIF CF A5,SEEK SLC A1,5 RETURN CODE RF(N) SEE:30 OK * EJECT DRDU01 * * SEE:15 EQU * CF A5,SEEKZ SEEK CYL ZERO SLC A1,6 RETURN CODE RF(N) SEE:20 ERROR IM DWTRTY,A6 INDICATE RETRY SUK A4,1 RETRY COUNTER RB(NZ) SEE:10 TRY AGAIN SEE:20 EQU * LDKL A3,/FFFF IFT NUNITS=2 CF A5,INXUNI ST A3,DWTCYL,A2 DUMMY CYLINDER NUMBER XIF IFT NUNITS=1 ST A3,DWTCYL,A6 DUMMY CYLINDER NUMBER XIF LDK A1,/02 RETURN CODE RF SEE:35 END IO * EJECT DRDU01 * * SEE:30 EQU * IFT NUNITS=2 CF A5,INXUNI XIF IFT VERSA2+VERSA3=2 LD* A1,4,A5 GET DATA WORD SLL A1,2 RF(NN) SEE:31 FORMAT A3 XIF * IFT VERSA2=1 EJECT DRDU01 * * * FORMAT A2 * LDK A3,0 CF A5,SKEW LDKL A1,/8002 READ 2 WORDS LDKL A2,BUFFER READ TO DRIVER BUFFER CF A5,CIO:50 ANK A1,/1F ERROR CHECK RF(NZ) SEE:32 LD A3,BUFFER GET CYL ID IFT NUNITS=2 CF A5,INXUNI CW A3,DWTCYL,A2 CHECK IF SAME CYLINDER XIF IFT VERSA2=1 IFT NUNITS=1 CW A3,DWTCYL,A6 CHECK IF SAME CYLINDER XIF IFT VERSA2=1 RB(NE) SEE:15 NOT SAME CYL ID VA2BR EQU * ABL VA2:00 XIF * IFT VERSA3=1 EJECT DRDU01 * * * FORMAT A3 * SEE:31 EQU * IFT NUNITS=2 LD A3,DWTCYL,A2 XIF IFT VERSA3=1 IFT NUNITS=1 LD A3,DWTCYL,A6 XIF * IFT VERSA3=1 SLL A3,5 GET SECTOR NUMBER ST A3,DWTBSE,A6 SAVE FOR BSELOD LDK A3,0 CF A5,SKEW TO READ SECTOR 0 OR 8 ON DISC IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER CF A5,READ LD A3,DWTBSE,A6 GET SECTOR NUMBER FOR BSELOD ANK A1,/1F ERROR CODE CHECK CF A5,BSEL00 RF(Z) SEE:40 OK XIF * SEE:32 EQU * IM DWTRTY,A6 INDICATE RETRY SUK A4,1 RETRY COUNTER RB(NZ) SEE:15 RETRY SEE:35 EQU * ABL END:10 * IFT VERSA3=1 * EJECT DRDU01 * * SEE:40 EQU * IFT NUNITS=2 CF A5,INXUNI LD A3,DWTCYL,A2 GET CYLINDER NUMBER XIF IFT VERSA3=1 IFT NUNITS=1 LD A3,DWTCYL,A6 GET CYLINDER NUMBER XIF IFT VERSA3=1 CW A3,BUFFER+PHSECL COMPARE WITH CYL ID RB(NE) SEE:15 RETRY * EJECT DRDU01 * ************************* * * * READ AND WRITE * * FORMAT A3 * * * ************************* * SEE:90 EQU * LD A4,DWTOR,A6 GET ORDER ANK A4,4 RF(Z) READ00 READ ORDER LD* A2,4,A5 RF(N) WRIT20 WRITE DIRECT FROM USER BUFFER SLL A2,1 IFT RAW=1 RF(N) READWR READ AFTER WRITE XIF * IFT VERSA3=1 CWK A2,PHSECL RF(E) WRIT10 WRITE FROM DRIVER BUFFER IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER CF A5,REA:00 READ BEFORE WRITE * EJECT DRDU01 * * WRIT10 EQU * LD* A2,4,A5 GET DATA WORD LDR A4,A2 ANK A4,/C0 GET NUMBER OF WORDS TO MOVE SLL A4,1 BYTES ANK A2,/F BEG ADRESS IN DRIVER BUFFER SLL A2,5 CF A5,MOVWRI MOVE TO DRIVER BUFFER IFT NUNITS=2 CF A5,INXUNI LD A2,DWTCYL,A2 GET CYLINDER NUMBER XIF IFT VERSA3=1 IFT NUNITS=1 LD A2,DWTCYL,A6 GET CYLINDER NUMBER XIF IFT VERSA3=1 ST A2,BUFFER+PHSECL PUT IN DRIVER BUFFER IM DWTFBU,A6 INDICATE WRITE FROM DRIVER BUFFER CF A5,WRI:00 WRITE FROM DRIVER BUFFER RF SEE:95 * EJECT DRDU01 * * WRIT20 EQU * IFT MMUPAG=0 LDKL A2,PHSECL PHYSICAL SECTOR LENGTH ADS A2,DWTUBU,A6 UPDATE USER BUFFER POINTER LD* A4,DWTUBU,A6 GET WORD IN USER BUFFER ST A4,DWTSWD,A6 SAVE WORD IM DWTFSW,A6 INDICATE SAVED WORD IFT NUNITS=2 CF A5,INXUNI LD A2,DWTCYL,A2 GET CYLINDER NUMBER ST* A2,DWTUBU,A6 PUT IN USER BUFFER XIF IFT VERSA3=1 IFT MMUPAG=0 IFT NUNITS=1 LD A2,DWTCYL,A6 ST* A2,DWTUBU,A6 PUT IN USER BUFFER XIF * IFT VERSA3=1 IFT MMUPAG=1 IFT NUNITS=2 CF A5,INXUNI LD A4,DWTCYL,A2 GET CYLINDER NUMBER XIF IFT VERSA3=1 IFT MMUPAG=1 IFT NUNITS=1 LD A4,DWTCYL,A6 GET CYLINDER NUMBER XIF IFT VERSA3=1 IFT MMUPAG=1 ML 2,DWTBA1,A6 GET PHYSICAL BUFFER ADDRESS RF(Z) WRIT30 SYSTEM AREA TS -30,A15 SAVE REGISTERS ON STACK TL DWTPAG,A6 LOAD PAGE WITH CYL ID LD A2,DWTUBU,A6 GET LOGICAL BUFFER POINTER EL A3,PHSECL,A2 GET WORD TO SAVE ES A4,PHSECL,A2 PUT CYL ID IN POSITION TL -30,A15 GET REGISTERS RF WRIT40 WRIT30 EQU * SLL A2,1 BYTE ADDRESS LD A3,PHSECL,A2 GET WORD TO BE SAVED ST A4,PHSECL,A2 CYL ID IN POSITION WRIT40 EQU * ST A3,DWTSWD,A6 SAVA WORD IM DWTFSW,A6 INDICATE SAVED WORD XIF * IFT VERSA3=1 CM DWTFBU,A6 INDICATE WRITE FROM USER BUFFER CF A5,WRI:00 WRITE SECTOR FROM USER BUFFER CF A5,REWORD RESTORE WORD TO USER BUFFER RF SEE:95 * EJECT DRDU01 * * IFT RAW=1 READWR EQU * CF A5,REA:10 READ AFTER WRITE RF SEE:97 XIF * IFT VERSA3=1 READ00 EQU * LD* A2,4,A5 GET DATA WORD RF(N) READ20 DIRECT READ IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER CF A5,REA:00 READ TO DRIVER BUFFER LD* A1,4,A5 GET DATA WORD SLL A1,1 LDR A4,A1 ANKL A4,/180 GET NUMBER OF BYTES TO BE MOVED ANK A1,/18 GET POSITION SLL A1,4 CF A5,MOVRED RF SEE:95 READ20 EQU * IFT MMUPAG=0 LDKL A3,PHSECL ADS A3,DWTUBU,A6 UPDATE USER BUFFER POINTER XIF * IFT VERSA3=1 CM DWTFBU,A6 INDICATE READ TO USER BUFFER CF A5,REA:00 READ TO USER BUFFER SEE:95 EQU * IMR A6 UPDATE PHYSICAL SECTOR POINTER XIF * EJECT DRDU01 * * SEE:96 EQU * LD* A2,4,A5 GET DATA WORD ANK A2,/C0 LENGTH SLL A2,1 ADS A2,ECBEL,A8 UPDATE ECBEL * IFT MMUPAG=1 LDK A1,0 SRL A2,1 WORD MODE DA DWTBA1,A6 UPDATE PHYSICAL BUFFER ADDRESS CF A5,MMULOG GET LOGICAL ADDRESS XIF * SEE:97 EQU * LDK A1,2 UPDATE RETURN ADS A1,4,A5 RTN A5 * EJECT DRDU01 * IFT VERSA2=1 * * ******************************** * * * DISC FORMAT A2 * * * ******************************** * * VA2:00 EQU * LDK A4,QRETRY RETRIES VA2:10 EQU * IFT NUNITS=2 CF A5,INXUNI XIF IFT VERSA2=1 CF A5,INLACE INTERLACE AND SKEW * IFT MMUPAG=0 LDKL A1,/8080 1ST WER IFT RAW=1 LD* A2,4,A5 SLL A2,1 RF(NN) VA2:20 NOT READ AFTER WRITE LDKL A2,BUFFER RF VA2:35 VA2:20 EQU * XIF * IFT VERSA2=1 IFT MMUPAG=1 LDKL A1,/0808 1ST WER SHIFTED XIF * IFT VERSA2=1 IFT RAW=1 IFT MMUPAG=1 LD* A2,4,A5 SLL A2,1 RF(NN) VA2:20 NOT READ AFTER WRITE LDKL A1,/8080 LDKL A2,BUFFER RF VA2:35 VA2:20 EQU * XIF * IFT VERSA2=1 LD A2,DWTOR,A6 GET ORDER ANK A2,4 RF(Z) VA2:30 READ * IFT MMUPAG=0 LDKL A1,/C080 XIF * IFT VERSA2=1 IFT MMUPAG=1 LDKL A1,/080C 1ST WER SHIFTED XIF * IFT VERSA2=1 ADK A3,1 ORDER CODE FOR WRITE * EJECT DRDU01 * * VA2:30 EQU * * IFT MMUPAG=0 LD A2,DWTUBU,A6 2ND WER XIF * IFT VERSA2=1 IFT MMUPAG=1 LDK A2,0 DA DWTBA1,A6 SRC A1,4 1ST WER IN POSITION SLL A2,1 2ND WER IN POSITION XIF * IFT VERSA2=1 VA2:35 EQU * CF A5,CIO:50 ANK A1,/1F RF(Z) VA2:40 IO ERROR IM DWTRTY,A6 SUK A4,1 RB(NZ) VA2:10 RETRY RF WRI:50 ERROR * EJECT DRDU01 * * VA2:40 EQU * LDR* A3,A6 GET PHYSICAL SECTOR NUMBER ADK A3,1 NEXT SECTOR LDR A2,A3 CWK A2,31 RF(NE) VA2:50 NOT CYLINDER 0 ADK A3,2 CYLINDER 0 TO CYLINDER 1 VA2:50 EQU * ANK A2,/1F RF(NZ) VA2:60 SAME CYLINDER ADK A3,1 NEW CYLINDER VA2:60 EQU * STR A3,A6 PHYSICAL SECTOR NUMBER RB SEE:96 XIF * IFT VERSA3=1 EJECT DRDU01 * **************************** * * * SUBROUTINES FOR WRITE * * FROM USER BUFFER: * * FROM DRIVER : * * * **************************** * WRI:00 EQU * LDK A4,QRETRY RETRIES WRI:20 EQU * IFT NUNITS=2 CF A5,INXUNI XIF IFT VERSA3=1 CF A5,INLACE INTERLACE SECTOR NUMBER CF A5,WRITE CIO ANK A1,/1F RETURN CODE ? CF A5,BSELOD RF(Z) WRI:80 NO RETURN CODE IM DWTRTY,A6 INDICATE RETRY SUK A4,1 DECREMENT RETRY COUNTER RB(NZ) WRI:20 CF A5,REWORD RESTORE WORD IF NECESSARY XIF * WRI:50 EQU * ABL END:10 ERROR END IO * IFT VERSA3=1 * WRI:80 EQU * RTN A5 * EJECT DRDU01 * ********************************* * * * SUBROUTINES FOR READ TO * * USER BUFFER : * * DRIVER BUFFER : * * * ********************************* * REA:00 EQU * LD A3,DWTOR,A6 GET INDEX ANKL A3,/300 SLL A3,6 IN POSITION ORR* A3,A6 ADD SECTOR NUMBER CW A3,DWTBSE,A6 ALLREADY READ ? RF(E) REA:85 REA:10 EQU * LDK A4,QRETRY REA:20 EQU * IFT NUNITS=2 CF A5,INXUNI XIF IFT VERSA3=1 CF A5,INLACE INTERLACE SECTOR NUMBER CF A5,READ READ SECTOR ANK A1,/F CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR RF(Z) REA:30 NO RETURN CODE REA:25 EQU * IM DWTRTY,A6 INDICATE RETRY SUK A4,1 DECREMENT RETRY COUNTER RB(NZ) REA:20 RETRY ABL END:20 * EJECT DRDU01 * * REA:30 EQU * LD A2,DWTFBU,A6 RF(NZ) REA:40 READ TO DRIVER BUFFER IFT MMUPAG=0 LD* A3,DWTUBU,A6 GET CYLINDER ID FROM USER BUFFER RF REA:50 XIF * IFT VERSA3=1 IFT MMUPAG=1 ML 2,DWTBA1,A6 GET PHYSICAL ADDRESS RF(Z) REA:35 SYSTEM AREA TS -30,A15 SAVE REGISTERS TL DWTPAG,A6 LOAD MMUPAGE LD A3,DWTUBU,A6 GET LOGICAL BUFFER POINTER EL A3,PHSECL,A3 GET CYL ID TL -30,A15 RESET REGISTERS RF REA:50 REA:35 EQU * SLL A2,1 ADDRESS TO BYTE MODE LD A3,PHSECL,A2 GET CYL ID RF REA:50 XIF * IFT VERSA3=1 REA:40 EQU * LD A3,BUFFER+PHSECL GET CYL ID REA:50 EQU * IFT NUNITS=2 CF A5,INXUNI CW A3,DWTCYL,A2 XIF IFT VERSA3=1 IFT NUNITS=1 CW A3,DWTCYL,A6 XIF IFT VERSA3=1 RF(E) REA:90 RIGHT CYLINDER ID LDK A1,2 SEEK ERROR * EJECT DRDU01 * * RB REA:25 REA:85 EQU * LD A1,DWTFBU,A6 RF(NZ) REA:90 READ TO DRIVER BUFFER LDKL A4,/180 BYTES TO BE MOVED IFT MMUPAG=0 NGR A2,A4 ADS A2,DWTUBU,A6 RESET USER BUFFER POINTER FOR DIRECT MOVE XIF IFT VERSA3=1 CF A5,MOVRED MOVE TO USER BUFFER REA:90 EQU * RTN A5 * EJECT DRDU01 * * ************************************* * * * SUBROUTINES FOR MOVING WORDS * * USER BUFFER TO DRIVER BUFFER: * MOVWRI * * DRIVER BUFFER TO USER BUFFER * * MOVRED * * * ************************************* * * A1 BUFFER ADDRESS IN * A2 BUFFER ADDRESS OUT * A4 BUFFER LENGTH * A3 USED * MOVRED EQU * ADKL A1,BUFFER IFT MMUPAG+CPU857=0 LD A2,DWTUBU,A6 PRESENT POINT IN USER BUFFER XIF * IFT VERSA3=1 IFT CPU852+MMUPAG=0 IFT CPU857=1 LD A2,DWTUBU,A6 GET USER BUFFER POINTER ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER MVB A4 XIF * IFT VERSA3=1 IFT CPU852=0 IFT MMUPAG=1 LD A2,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS SLL A2,1 BYTE MODE TS -30,A15 SAVE REGISTERS TL DWTPAG,A6 LD A2,DWTUBU,A6 GET LOGICAL ADDRESS MVSU A4 XIF * IFT VERSA3=1 RF MOV:00 * EJECT DRDU01 * * MOVWRI EQU * ADKL A2,BUFFER DRIVER BUFFER POINTER IFT MMUPAG+CPU857=0 LD A1,DWTUBU,A6 PRESENT POINT IN USER BUFFER XIF * IFT VERSA3=1 IFT CPU852+MMUPAG=0 IFT CPU857=1 LD A1,DWTUBU,A6 GET USER BUFFER POINTER ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER MVB A4 XIF * IFT VERSA3=1 IFT CPU852=0 IFT MMUPAG=1 LD A1,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS SLL A1,1 BYTE MODE TS -30,A15 SAVE REGISTERS TL DWTPAG,A6 LD A1,DWTUBU,A6 GET LOGICAL ADDRESS MVUS A4 XIF * IFT VERSA3=1 MOV:00 EQU * IFT MMUPAG+CPU857=0 ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER XIF * IFT VERSA3=1 IFT MMUPAG=1 TL -30,A15 RESET REGISTERS XIF * IFT VERSA3=1 IFT MMUPAG+CPU857=0 IFT CPU852=1 * EJECT DRDU01 * * MOV:10 EQU * LDR* A3,A1 STR A3,A2 ADK A1,2 ADK A2,2 SUK A4,2 RB(P) MOV:10 XIF * IFT VERSA3=1 IFT CPU852=0 IFT MMUPAG+CPU857=0 MSR 12,A15 SAVE REGISTERS ON STACK LDR A11,A4 NUMBER OF BYTES LDR A10,A2 OUTPUT ADDRESS LDR A9,A1 INPUT ADDRESS LDKL A12,16 BYTES IN EACH LOOP MOV:15 EQU * MLR 8,A9 MSR 8,A10 ADR A10,A12 ADR A9,A12 SUR A11,A12 RB(P) MOV:15 MLR 12,A15 RESTORE REGISTERS FROM STACK XIF * IFT VERSA3=1 RTN A5 * XIF * IFT VERSA2=1 EJECT DRDU01 * * *************************** * * * DIV31 * * * *************************** * * INPUT: ECBCW2=LOGICAL SECTOR NUMBER * OUTPUT: 1ST DWT = PHYSICAL SECTOR NUMBER * DIV31 EQU * * IFT CPU852=1 LD A1,ECBCW2,A8 GET LOGICAL SECTOR NUMBER LDR A3,A1 LDK A2,0 DIV:20 EQU * ADR A2,A3 I0:=I0+I1 SRL A3,5 I1:=I1/32 RB(NZ) DIV:20 LDR A3,A2 ANKL A3,/FFE0 32* SRL A2,5 TRUNCATE SUR A3,A2 SUR A3,A1 ADK A3,31 RF(P) DIV:30 ADK A2,1 NEXT CYLINDER DIV:30 EQU * ADK A2,0 RF(Z) DIV:50 CYLINDER 0 ADR A1,A2 ADK A1,1 * EJECT DRDU01 * * DIV:50 EQU * STR A1,A6 PUT PHYSICAL SECTOR NUMBER IN DWT RTN A5 * XIF * IFT VERSA2=1 IFT CPU852=0 LD A2,ECBCW2,A8 GET SECTOR NUMBER STR A2,A6 PHYSICAL SECTOR NUMBER LDK A1,0 DVK 31 ADK A2,0 RF(Z) DIV:10 CYLINDER 0 ADK A2,1 DIV:10 EQU * ADRS A2,A6 PHYSICAL SECTOR NUMBER RTN A5 XIF * EJECT DRDU01 * ********************************* * * * SUBROUTINES FOR * * INTERLACING AND/OR * * SKEWING * * * ********************************* * * OUTPUT : A3 CONTAINING INTERLACED AND SKEWED SECTOR NUMBER * INLACE EQU * LDR* A3,A6 GET PHYSICAL SECTOR NUMBER LDR A1,A3 ADR A3,A3 ADR A3,A1 INTERLACING FACTOR 3 SKEW EQU * IFT NUNITS=2 LD A2,DWTCYL,A2 GET CYLINDER NUMBER XIF IFT NUNITS=1 LD A2,DWTCYL,A6 GET CYLINDER NUMBER XIF ANK A2,1 RF(Z) INLAC5 EVEN CYLINDER ADK A3,8 SKEW FACTOR 180 DEG. INLAC5 EQU * ANK A3,/1F SLL A3,2 IN POSITION RTN A5 * IFT NUNITS=2 EJECT DRDU01 * * ********** * INXUNI * ********** * * OUTPUT A2=DOUBLED UNIT INDEX + DWT ADDRESS * INXUNI EQU * LC A2,DWTOR,A6 ANK A2,2 ADR A2,A6 RTN A5 XIF * IFT MMUPAG=1 EJECT DRDU01 * * ****************************************** * * * MMULOG : GET LOGICAL ADDRESS AND * * PAGE * * * ****************************************** * * MMULOG EQU * MS 2,DWTBA1,A6 SAVE PHYSICAL WORD ADDRESS DLA 4 SRC A1,6 IN POSITION ST A1,DWTPAG,A6 PAGE ADKL A1,/400 NEXT PAGE ST A1,DWTPAG+2,A6 PSEUDO MMU TABLE SRL A2,3 ST A2,DWTUBU,A6 LOGICAL ADDRESS RTN A5 * XIF * EJECT DRDU01 * IFT VERSA3=1 * * ****************************** * * UPDATE DRIVER BUFFER INDICATOR * ******************************* * * INPUT A1=RETURN CODE (AFTER READ) * OUTPUT DWTBSE=DRIVER BUFFER INDICATOR * BSELOD EQU * LDR* A3,A6 GET READ SECTOR NUMBER BSEL00 EQU * FROM SEEK VERIFY LD A2,DWTFBU,A6 RF(Z) BSEL50 READ/WRITE TO USER BUFFER LDKL A2,/FFFF DUMMY ADK A1,0 RF(NZ) BSEL40 READ ERROR LD A2,DWTOR,A6 GET INDEX ANKL A2,/300 SLL A2,6 ORR A2,A3 BSEL40 EQU * ST A2,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR BSEL50 EQU * RTN A5 * EJECT DRDU01 * * *************************************** * * * RESTORE WORD TO USER BUFFER * * IF NECESSARY * * * *************************************** * * INPUT: DWTFSW=SAVED WORD INDICATOR * DWTSWD=SAVED WORD * DWTUBU=POINTER TO USER BUFFER * REWORD EQU * LD A3,DWTFSW,A6 RF(Z) REWO50 NO SAVED WORD LD A3,DWTSWD,A6 IFT MMUPAG=1 ML 2,DWTBA1,A6 GET BUFFER ADDRESS RF(Z) REWO20 SYSTEM AREA TS -30,A15 SAVE REGISTERS TL DWTPAG,A6 SET MMU REGISTERS LD A2,DWTUBU,A6 GET LOGICAL BUFFER ADDRESS ES A3,PHSECL,A2 RESTORE SAVED WORD TL -30,A15 RESET REGISTERS RF REWO50 REWO20 EQU * SLL A2,1 BYTE MODE ST A3,PHSECL,A2 RESTORE WORD XIF * IFT VERSA3=1 IFT MMUPAG=0 ST* A3,DWTUBU,A6 RESTORE SAVED WORD XIF * IFT VERSA3=1 CM DWTFSW,A6 INDICATE NO SAVED WORD REWO50 EQU * RTN A5 * XIF * EJECT DRDU01 DRDU01 * * ******************* * * * SEEK CYLINDER * * * ******************* * * SEEK EQU * IFT NUNITS=2 LD A3,DWTCYL,A2 CYLINDER NUMBER XIF IFT NUNITS=1 LD A3,DWTCYL,A6 XIF SLL A3,3 ORK A3,2 RF CIO EXECUTE CIO-START * SEEKZ EQU * LDK A3,3 RF CIO EXECUTE CIO-START * EJECT DRDU01 * * ********************************** * * * CIO: READ AND WRITE * * * ********************************** * * INPUT: A3=PHYSICAL SECTOR NUMBER SHIFTED * IFT VERSA3=1 IFT MMUPAG=0 READ EQU * LDKL A1,/80C1 1ST WER RF CIO:20 WRITE EQU * LDKL A1,/C0C1 1ST WER ADK A3,1 ORDER CODE CIO:20 EQU * LD A2,DWTFBU,A6 RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER LD A2,DWTUBU,A6 USER BUFFER POINTER SUKL A2,PHSECL RF CIO:50 CIO:30 EQU * LDKL A2,BUFFER DRIVER BUFFER ADDRESS XIF * IFT VERSA3=1 IFT MMUPAG=1 READ EQU * LDKL A1,/0C18 1ST WER SHIFTED RF CIO:20 WRITE EQU * LDKL A1,/0C1C 1ST WER SHIFTED ADK A3,1 ORDER CODE CIO:20 EQU * LD A2,DWTFBU,A6 RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER DA DWTBA1,A6 GET USER BUFFER ADDRESS SLL A2,1 BYTE MODE ADDRESS RF CIO:40 CIO:30 EQU * LDKL A2,BUFFER DRIVER BUFFER ADDRESS CIO:40 EQU * SRC A1,4 1ST WER IN POSITION XIF * CIO:50 EQU * WER A1,WER1 WER A2,WER1+1 * EJECT DRDU01 DRDU01 * * CIO EQU * ST A4,DWTA4,A6 SAVE A4 LD A2,PFPOST RF(NZ) CIOAB PWF POST PROCESSING ON CF A15,INXDWT GET INDEXED DWT ADDRESS EX DWTCIO,A4 EXECUTE CIO-START ABL(3) END:30 CU ADDRESS UNKNOWN CIOAB EQU * ST A5,DWTA5,A6 A5 ST A7,DWTA2,A6 SAVE SECTOR COUNTER * T:DISP ABL TDISP GO TO DISPATCHER * EJECT DRDU01 DRDU01 * * ********************** * * * RECOVERY ROUTINE * * * ********************** * * DUON EQU * * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * LDKL A6,DWDU01 LDK A5,DWTSB3 GET STACK BASE ADR A5,A6 CM DWTST,A6 UNIT BUSY CM DWTSAV,A6 INDICATE RECOVERY LD A1,INIFLG INITIALIZATION FLAG RF(NZ) DUON05 NOT POWER UP * EJECT DRDU01 * * CM DWTOR,A6 1ST UNIT CF A5,SEEKZ TEST IF OPERABLE ANK A1,1 RF(NZ) DUON26 NOT OPERABLE IFT NUNITS=2 LDK A1,2 SC A1,DWTOR,A6 NEXT UNIT CF A5,SEEKZ ANK A1,1 RF(NZ) DUON26 NOT OPERABLE XIF * EJECT DRDU01 * * DUON05 EQU * CM DWTOR,A6 CF A5,VO:NAM READ VOLUME NAME ANK A1,1 RF(Z) DUON07 NO ERROR CM DWTOR,A6 PREPARE FOR VOLCLR LDK A1,12 CF A15,VOLCLR DUON07 EQU * IFT NUNITS=2 LDK A1,2 OTHER DISC UNIT SC A1,DWTOR,A6 CF A5,VO:NAM ANK A1,1 RF(Z) DUON08 NO ERROR LDK A1,2 OTHER DISC UNIT SC A1,DWTOR,A6 LDK A1,12 CF A15,VOLCLR DUON08 EQU * XIF IM DWTST,A6 INDICATE VOLUME NAMES READ LDKL A1,-1 ST A1,DWTSAV,A6 RECOVERY DONE * EJECT DRDU01 * * LD A8,DWTECB,A6 GET ECB ADDRESS RF(Z) END:IO NO REQUEST ON? * DUON10 LD A7,DWTORD,A6 GET ORDER ST A7,DWTOR,A6 RESTORE INDEX AND ORDER ANK A7,/3F * IFT VERSA3=1 CF A5,REWORD RESTORE WORD IF NECESSARY XIF * CM ECBEL,A8 RESET EFFECTIVE LENGTH ABL DUA:00 REPEAT REQUEST * EJECT DRDU01 * * READY INTERRUPT * DUREDY LD A1,TIMER RF(Z) DUON50 NO TIMER ACTIVE * IFT NUNITS=1 CM* TIMER KILL TIMER RF DUON40 XIF * IFT NUNITS=2 RB T:DISP TIMER ACTIVE XIF * EJECT DRDU01 * * DUON26 EQU * 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 DUON50 EQU * CM DWTST,A6 SET UNIT BUSY CM DWTSAV,A6 INDICATE RECOVERY LDK A5,DWTSB3 GET STACK BASE ADR A5,A6 RB DUON05 * EJECT DRDU01 DRDU01 * * *********************** * * * INTERRUPT HANDLER * * * *********************** * * IHDU EQU * IHDU1 EQU * IHDU2 EQU * ST P,INTSAV SAVE LAST INTERRUPT * IFT CPU852=1 CF A15,SAVE8 SAVE A1-A8 ON STACK XIF * IFT CPU852=0 MSR 8,A15 SAVE A1-A8 ON STACK XIF * LDKL A6,DWDU01 DISC UNIT NO. 1 * EJECT DRDU01 * * IHDU10 SST A1,CUADR GET STATUS IHDU20 ANKL A1,/460F MASK RETURN CODE SLL A1,1 RB(N) DUREDY READY INTERRUPT SRL A1,1 LDR A2,A1 ANKL A2,/200 SEEK ERROR RF(Z) IHDU30 ANKL A1,/440F MOVE SEEK ERROR BIT ORK A1,/02 IHDU30 EQU * LD A8,DWTECB,A6 ECB ADDRESS LD A2,DWTSAV,A6 RF(NN) GET LDR A3,A1 ANK A3,1 RF(NZ) END:IO DISC UNIT NOT OPERABLE * GET LD A5,DWTA5,A6 RELOAD REGISTERS A5 LD A4,DWTA4,A6 A4 LD A7,DWTA2,A6 GET SECTOR COUNTER RTN A5 * EJECT DRDU01 DRDU01 * * ******************* * * * PERFORM ENDIO * * * ******************* * * END:30 EQU * CU ADDRESS UNKNOWN LDK A1,1 NOT OPERABLE ST A1,DWTST,A6 INDICATE RECOVERY DONE RF END:IO END:10 EQU * * IFT RAW=1 LD* A7,DWTSB3-2,A6 GET 1ST RETURN ADDRESS SLL A7,1 RF(N) END:20 READ AFTER WRITE LD A7,DWTORD,A6 ANK A7,/FF GET ORDER SUK A7,/15 RF(NZ) END:20 NOT READ AFTER WRITE CM ECBEL,A8 RESET SECTORS DONE XIF * END:20 EQU * LDKL A2,/FF00 ANS A2,ECBEL,A8 LD A2,DWTRTY,A6 GET RETRY INDICATOR RF(Z) END:IO NO RETRIES DONE ORKL A1,/100 SET BIT 7 IN RETURN CODE EJECT DRDU01 * * END:IO EQU * CF A15,TENDIO PERFORM ENDIO ABL TDISP GO TO DISPATCHER * EJECT DRDU01 * * VO:NAM EQU * CF A5,SEEKZ SEEK SECTOR 0 ANK A1,1 RF(NZ) VO:NA8 SEEK-,THROUGHPUT ERROR,NOT OPERABLE CMR A6 SECTOR 0 IFT NUNITS=2 CF A5,INXUNI CM DWTCYL,A2 CYLINDER 0 XIF IFT NUNITS=1 CM DWTCYL,A6 XIF LDK A3,0 SECTOR 0 * IFT VERSA3=1 IM DWTFBU,A6 READ TO DRIVER BUFFER CF A5,READ ANK A1,3 CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR XIF * IFT VERSA3=0 LDKL A1,/8019 READ SECTOR ZERO LDKL A2,BUFFER TO DRIVER BUFFER CF A5,CIO:50 ANK A1,3 ERROR ? XIF * RF(NZ) VO:NA8 THROUGHPUT ERROR,NOT OPERABLE LDKL A2,BUFFER LDK A3,/F0 FILE CODE LD A1,DWTSAV,A6 RF(Z) VO:NA6 LDKL A3,/80F0 INDICATE TEST STATUS VO:NA6 EQU * CF A15,VOLGET VOLUMR NAME TO DWT INDICATE NVL EJECT DRDU01 * * DUNA40 EQU * LDK A1,1 LDK A7,1 TO INDICATE NOT TRANSFER PARAMETER ORDER LD A2,BUFFER+32 CHECK IF TOSS DISC CWK A2,'TO' RF(NE) DUNA70 NO TOSS LD A2,BUFFER+40 CHECK IF RELEASE 10 OR GREATER CWK A2,/2031 RF(NE) DUNA70 REL LESS THAN 10 LD A2,BUFFER+48 GET FORMAT AND DEVICE TYPE PARAMETER TRANPA EQU * LABEL FOR TRANSFER PARAMETER ORDER CF A15,INXDWT GET INDEXED DWT ADDRESS ECR A3,A2 SEPARATE THE PARAMETERS ANK A3,/3 ANK A2,/3 ST A3,DWTFOR,A4 SAVE FORMAT PARAMETER LDKL A1,6324 SECTORS ON VERSION A2 SUK A3,2 FORMAT ? RF(Z) DUNA60 VERSION A2 RF(N) DUNA50 VERSION A1 ADK A1,204 VERSION A3 DUNA50 EQU * ADKL A1,9588-6324 DUNA60 EQU * SUK A2,1 RF(Z) DUNA70 PTS 6875 ADR A1,A1 PTS 6876 2*MAXSEC ON PTS 6875 DUNA70 EQU * ST A1,DWTSMX,A4 MAX SECTOR NO IN DWT LDK A1,0 RESET RETURN CODE FOR TRANSFER PARAM. ADK A7,0 CHECK IF TRANSFER PARAMETER RB(Z) END:20 * EJECT DRDU01 * * LD A4,DWTA4,A6 RESTORE RETRY COUNTER LC A1,DWTOR,A6 ADK A1,1 SC A1,DWTOR,A6 ANK A1,1 RB(NZ) VO:NAM RF VO:NA9 VO:NA8 EQU * LDK A1,1 ERROR CODE VO:NA9 EQU * RTN A5 * * TIMER POINTER * TIMER DATA 0 TIMER POINTER * EJECT DRDU01 DRDU01 * * ************************************* * * * DEVICE WORK TABLE * * * ************************************* * * DWDU01 EQU * DATA 0 PHYSICAL SECTOR NUMBER 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 * IFT MMUPAG=1 DATA 0 SAVE AREA USER ECB ADDRESS DATA ECBDU1 MMU ECB ADDRESS XIF * DWTFSW EQU *-DWDU01 DATA 0 DATA 0,0,0 SAVE AREA FOR REGISTERS DWTBSE EQU *-DWDU01 DATA 0 DWTUBU EQU *-DWDU01 USER BUFFER POINTER DATA 0 DWTSWD EQU *-DWDU01 DATA 0 * EJECT DRDU01 * * DWTRTY EQU *-DWDU01 DATA 0 DATA 0 DATA /C000 FIXED DATA /8000 NEW VOLUME LOADED INDICATOR CARTR. 1 DATA /C000 FIXED DATA /8000 NEW VOLUME LOADED IND. CARTR. 2 DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST FIXED DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST CARTRIDGE * IFT NUNITS=2 DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND FIXED DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND CARTRIDGE XIF * EJECT DRDU01 * * DWTSAV EQU *-DWDU01 DATA -1 DWTFBU EQU *-DWDU01 FLAG INDICATING IO TO DRIVER BUF DATA 0 DWTCIO EQU *-DWDU01 CIO-START CIO A3,1,DAF1 CIO A3,1,DAC1 * IFT NUNITS=2 CIO A3,1,DAF2 CIO A3,1,DAC2 XIF * DWTCYL EQU *-DWDU01 DATA /FFFF CYLINDER NUMBER * IFT NUNITS=2 DATA /FFFF 2ND UNIT XIF * DWTSMX EQU *-DWDU01 DATA 1 MAX SECTORS ON FIXED DISC DATA 1 MAX SECTORS ON CARTRIDGE * IFT NUNITS=2 DATA 1 2ND UNIT DATA 1 2ND UNIT XIF * DWTFOR EQU *-DWDU01 DATA 0 DISC FORMAT ON FIXED DATA 0 DISC FORMAT CARTRIDGE * IFT NUNITS=2 DATA 0 DATA 0 XIF * DATA 0,0 STACK DATA 0,0 STACK DATA 0,0 DWTSB3 EQU *-DWDU01-2 * IFT RAW=1 DWTSEP EQU *-DWDU01 DATA 0 DWTSEI EQU *-DWDU01 DATA 0 XIF * IFT MMUPAG=1 ECBDU1 EQU * DATA 0,0,0,0,0,0,0 DWTBA1 EQU *-DWDU01 DATA 0 DWTBA2 EQU *-DWDU01 DATA 0 DWTPAG EQU *-DWDU01 MMU PAGE DATA 0 DATA 0 XIF * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRDU01 REL 10.0 80-03-14 870105041000 «, 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…0052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004c}
0x0052…008c Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0056}
0x008c…0096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0090}
0x0096…00be Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x009a}
0x00be…00c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c2}
0x00c8…00fa Head {h00=0x002e, h01=0x0050, text=»* DRDU01 = DRIVER FOR ONE/TWO DISC UNITS«, t00=0x0000, t01=0x00cc}
0x00fa…0104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fe}
0x0104…0138 Head {h00=0x0030, h01=0x0050, text=»* PTS 6875 (X1215) AND/OR PTS 6876 (X1216)«, t00=0x0000, t01=0x0108}
0x0138…0142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013c}
0x0142…014c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0146}
0x014c…0156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0150}
0x0156…0160 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015a}
0x0160…016a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0164}
0x016a…01a4 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x016e}
0x01a4…01ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0018}
0x01ae…01b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0022}
0x01b8…01ec Head {h00=0x0030, h01=0x0050, text=»* THIS DISC DRIVER HANDLES UP TO TWO DISC «, t00=0x0001, t01=0x002c}
0x01ec…0224 Head {h00=0x0034, h01=0x0050, text=»* DRIVES X1215,X1216 CONNECTED TO CPU VIA IOP «, t00=0x0001, t01=0x0060}
0x0224…0244 Head {h00=0x001c, h01=0x0050, text=»* ON MULTIPLEX CHANNEL«, t00=0x0001, t01=0x0098}
0x0244…024e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b8}
0x024e…0258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x0258…0286 Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING ORDERS ARE TREATED :«, t00=0x0001, t01=0x00cc}
0x0286…0290 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…02ae Head {h00=0x001a, h01=0x0050, text=»* /00 TEST STATUS«, t00=0x0001, t01=0x0104}
0x02ae…02cc Head {h00=0x001a, h01=0x0050, text=»* /01 BASIC READ «, t00=0x0001, t01=0x0122}
0x02cc…02ea Head {h00=0x001a, h01=0x0050, text=»* /05 BASIC WRITE«, t00=0x0001, t01=0x0140}
0x02ea…030a Head {h00=0x001c, h01=0x0050, text=»* /11 PHYSICAL READ«, t00=0x0001, t01=0x015e}
0x030a…032c Head {h00=0x001e, h01=0x0050, text=»* /15 PHYSICAL WRITE «, t00=0x0001, t01=0x017e}
0x032c…034c Head {h00=0x001c, h01=0x0050, text=»* /1F FORMAT VOLUME«, t00=0x0002, t01=0x0010}
0x034c…0356 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0030}
0x0356…0376 Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x0002, t01=0x003a}
0x0376…0380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x0380…038a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0064}
0x038a…039e Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x006e}
0x039e…03b2 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0082}
0x03b2…03c6 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0096}
0x03c6…03d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00aa}
0x03d0…03da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b4}
0x03da…0402 Head {h00=0x0024, h01=0x0050, text=» ENTRY DUADR ACTIVATION ADDRESS «, t00=0x0002, t01=0x00be}
0x0402…0426 Head {h00=0x0020, h01=0x0050, text=» ENTRY DUON RECOVERY ROUTINE«, t00=0x0002, t01=0x00e6}
0x0426…045c Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1«, t00=0x0002, t01=0x010a}
0x045c…0492 Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU INTERRUPT HANDLER DISC UNIT NO. 1 «, t00=0x0002, t01=0x0140}
0x0492…04c8 Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU2 INTERRUPT HANDLER DISC UNIT NO. 2«, t00=0x0002, t01=0x0176}
0x04c8…04fa Head {h00=0x002e, h01=0x0050, text=» ENTRY DWDU01 DWT ADDRESS DISC UNIT NO. 1 «, t00=0x0003, t01=0x001c}
0x04fa…0512 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0003, t01=0x004e}
0x0512…051c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0066}
0x051c…0526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…053c Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x007a}
0x053c…0552 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x0090}
0x0552…0568 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x00a6}
0x0568…0572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…057c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c6}
0x057c…059c Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0003, t01=0x00d0}
0x059c…05ba Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0003, t01=0x00f0}
0x05ba…05ec Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK«, t00=0x0003, t01=0x010e}
0x05ec…061c Head {h00=0x002c, h01=0x0050, text=» EXTRN NVLCHK CHECK IF NEW VOLUME LOADED«, t00=0x0003, t01=0x0140}
0x061c…0650 Head {h00=0x0030, h01=0x0050, text=» EXTRN VOLGET PUT VOLUME NAME IN DWT SET NVL«, t00=0x0003, t01=0x0170}
0x0650…068a Head {h00=0x0036, h01=0x0050, text=» EXTRN VOLNAM VOLUME NAME FROM DWT TO USER BUFFER «, t00=0x0004, t01=0x0014}
0x068a…06ba Head {h00=0x002c, h01=0x0050, text=» EXTRN VOLCLR CLEAR VOLUME NAMES IN DWT «, t00=0x0004, t01=0x004e}
0x06ba…06ec Head {h00=0x002e, h01=0x0050, text=» EXTRN INXDWT DOUBLED INDEX + DWT ADDRESS «, t00=0x0004, t01=0x007e}
0x06ec…0710 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x00b0}
0x0710…073a Head {h00=0x0026, h01=0x0050, text=» EXTRN INIFLG INITIALIZATION FLAG «, t00=0x0004, t01=0x00d4}
0x073a…0768 Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST PWF POST PROCESSING FLAG«, t00=0x0004, t01=0x00fe}
0x0768…0796 Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x012c}
0x0796…07b2 Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0004, t01=0x015a}
0x07b2…07c8 Head {h00=0x0012, h01=0x0050, text=» EXTRN TTB:MT «, t00=0x0004, t01=0x0176}
0x07c8…07e4 Head {h00=0x0018, h01=0x0013, text=» EXTRN DWTST STATUS «, t00=0x0004, t01=0x018c}
0x07e4…0806 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0005, t01=0x0018}
0x0806…082e Head {h00=0x0024, h01=0x0020, text=» EXTRN DWTOR DWT INDEX AND ORDER«, t00=0x0005, t01=0x003a}
0x082e…0850 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA2 SAVE AREA A2 «, t00=0x0005, t01=0x0062}
0x0850…0872 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0005, t01=0x0084}
0x0872…0894 Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0005, t01=0x00a6}
0x0894…08be Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0005, t01=0x00c8}
0x08be…08e8 Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0005, t01=0x00f2}
0x08e8…090e Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB ADDRESS«, t00=0x0005, t01=0x011c}
0x090e…0938 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTORD SAVE AREA FOR ORDER «, t00=0x0005, t01=0x0142}
0x0938…096a Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTNVL NEM VOLUME LOADED INDICATORS«, t00=0x0005, t01=0x016c}
0x096a…098c Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTVOL VOLUME NAMES«, t00=0x0006, t01=0x000e}
0x098c…09ae Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0006, t01=0x0030}
0x09ae…09d6 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0006, t01=0x0052}
0x09d6…0a00 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0006, t01=0x007a}
0x0a00…0a2a Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0006, t01=0x00a4}
0x0a2a…0a4e Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0006, t01=0x00ce}
0x0a4e…0a7a Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBCW1 ECB 1:ST CONTROL WORD «, t00=0x0006, t01=0x00f2}
0x0a7a…0aa6 Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBCW2 ECB 2:ND CONTROL WORD «, t00=0x0006, t01=0x011e}
0x0aa6…0abe Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0006, t01=0x014a}
0x0abe…0ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac8…0ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016c}
0x0ad2…0af4 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0006, t01=0x0176}
0x0af4…0b16 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0007, t01=0x0008}
0x0b16…0b38 Head {h00=0x001e, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0007, t01=0x002a}
0x0b38…0b5a Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0007, t01=0x004c}
0x0b5a…0b7c Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0007, t01=0x006e}
0x0b7c…0b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0090}
0x0b86…0b90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009a}
0x0b90…0bca Head {h00=0x0036, h01=0x0050, text=»* READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15«, t00=0x0007, t01=0x00a4}
0x0bca…0be8 Head {h00=0x001a, h01=0x0050, text=»* BY SETTING X:A = 0«, t00=0x0007, t01=0x00de}
0x0be8…0bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fc}
0x0bf2…0c04 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0007, t01=0x0106}
0x0c04…0c16 Head {h00=0x000e, h01=0x0050, text=»RAW EQU 1 «, t00=0x0007, t01=0x0118}
0x0c16…0c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012a}
0x0c20…0c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0134}
0x0c2a…0c5c Head {h00=0x002e, h01=0x0050, text=»* THIS DRIVER CAN HANDLE TWO DISC UNITS «, t00=0x0007, t01=0x013e}
0x0c5c…0c74 Head {h00=0x0014, h01=0x0050, text=»* IF X:B := 2 «, t00=0x0007, t01=0x0170}
0x0c74…0c7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0188}
0x0c7e…0c90 (8, 0, 400) Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0008, t01=0x0004}
0x0c90…0ca4 Head {h00=0x0010, h01=0x0050, text=»NUNITS EQU 2«, t00=0x0008, t01=0x0016}
0x0ca4…0cae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002a}
0x0cae…0cb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0034}
0x0cb8…0cea Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0008, t01=0x003e}
0x0cea…0d18 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0008, t01=0x0070}
0x0d18…0d22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x009e}
0x0d22…0d36 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0008, t01=0x00a8}
0x0d36…0d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00bc}
0x0d40…0d4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c6}
0x0d4a…0d84 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0008, t01=0x00d0}
0x0d84…0db6 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0008, t01=0x010a}
0x0db6…0dc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x013c}
0x0dc0…0dd4 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x0146}
0x0dd4…0dde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015a}
0x0dde…0df4 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0008, t01=0x0164}
0x0df4…0dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x017a}
0x0dfe…0e08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0184}
0x0e08…0e40 Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION USING THE INSTRUCTION SET OF«, t00=0x0008, t01=0x018e}
0x0e40…0e76 Head {h00=0x0032, h01=0x0050, text=»* CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1 «, t00=0x0009, t01=0x0036}
0x0e76…0e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006c}
0x0e80…0e92 Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x0009, t01=0x0076}
0x0e92…0ea8 Head {h00=0x0012, h01=0x0050, text=»CPU857 EQU 00 «, t00=0x0009, t01=0x0088}
0x0ea8…0eb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009e}
0x0eb2…0ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a8}
0x0ebc…0ee0 Head {h00=0x0020, h01=0x0050, text=»* PROGRAM VERSION FOR FORMAT«, t00=0x0009, t01=0x00b2}
0x0ee0…0f10 Head {h00=0x002c, h01=0x0050, text=»* A2 IS OBTAINED BY SETTING VERSA2 EQU 1«, t00=0x0009, t01=0x00d6}
0x0f10…0f40 Head {h00=0x002c, h01=0x0050, text=»* A3 IS OBTAINED BY SETTING VERSA3 EQU 1«, t00=0x0009, t01=0x0106}
0x0f40…0f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0136}
0x0f4a…0f5c Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x0009, t01=0x0140}
0x0f5c…0f70 Head {h00=0x0010, h01=0x0050, text=»VERSA2 EQU 1«, t00=0x0009, t01=0x0152}
0x0f70…0f7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0166}
0x0f7a…0f8c Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x0009, t01=0x0170}
0x0f8c…0fa0 Head {h00=0x0010, h01=0x0050, text=»VERSA3 EQU 1«, t00=0x0009, t01=0x0182}
0x0fa0…0faa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0008}
0x0faa…0fca Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x000a, t01=0x0012}
0x0fca…0fd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0032}
0x0fd4…0fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003c}
0x0fde…0ff4 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0046}
0x0ff4…100a Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000a, t01=0x005c}
0x100a…1020 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0072}
0x1020…102a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0088}
0x102a…1034 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0092}
0x1034…1068 Head {h00=0x0030, h01=0x0050, text=»DAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1«, t00=0x000a, t01=0x009c}
0x1068…10a0 Head {h00=0x0034, h01=0x0050, text=»DAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1«, t00=0x000a, t01=0x00d0}
0x10a0…10d4 Head {h00=0x0030, h01=0x0050, text=»DAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2«, t00=0x000a, t01=0x0108}
0x10d4…110c Head {h00=0x0034, h01=0x0050, text=»DAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2«, t00=0x000a, t01=0x013c}
0x110c…1134 Head {h00=0x0024, h01=0x0050, text=»WER1 EQU /10 MULTIPLEXOR ADDRESS«, t00=0x000a, t01=0x0174}
0x1134…115e Head {h00=0x0026, h01=0x0050, text=»CUADR EQU /08 CONTROL UNIT ADDRESS«, t00=0x000b, t01=0x000c}
0x115e…1168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0036}
0x1168…11a6 Head {h00=0x003a, h01=0x0050, text=»MAXSEC EQU 6528 MAX NO OF SECTORS ON UNPACKED PTS 6875«, t00=0x000b, t01=0x0040}
0x11a6…11d6 Head {h00=0x002c, h01=0x0050, text=»SECLEN EQU 256 SECTOR LENGTH, CHARACTERS«, t00=0x000b, t01=0x007e}
0x11d6…1204 Head {h00=0x002a, h01=0x0050, text=»PHSECL EQU 384 PHYSICAL SECTOR LENGTH «, t00=0x000b, t01=0x00ae}
0x1204…1226 Head {h00=0x001e, h01=0x0050, text=»QRETRY EQU 4 NO OF RETRIES«, t00=0x000b, t01=0x00dc}
0x1226…1248 Head {h00=0x001e, h01=0x0050, text=»TIME EQU 1000 1 MIN 40 SEC«, t00=0x000b, t01=0x00fe}
0x1248…1252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0120}
0x1252…1268 Head {h00=0x0012, h01=0x0050, text=»DEVIND EQU 10 «, t00=0x000b, t01=0x012a}
0x1268…1272 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0140}
0x1272…1292 Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x000b, t01=0x014a}
0x1292…129c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016a}
0x129c…12a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0174}
0x12a6…12ce Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x000b, t01=0x017e}
0x12ce…12f4 Head {h00=0x0022, h01=0x0050, text=» DATA DEVIND DISC DEVICE INDEX«, t00=0x000c, t01=0x0016}
0x12f4…131e Head {h00=0x0026, h01=0x0050, text=»DUADR DATA DUAD ACTIVATION ADDRESS«, t00=0x000c, t01=0x003c}
0x131e…1344 Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000c, t01=0x0066}
0x1344…134e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008c}
0x134e…1364 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x000c, t01=0x0096}
0x1364…137a Head {h00=0x0012, h01=0x0050, text=»BUFFER RES 193«, t00=0x000c, t01=0x00ac}
0x137a…1386 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00c2}
0x1386…1390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ce}
0x1390…13a6 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x000c, t01=0x00d8}
0x13a6…13bc Head {h00=0x0012, h01=0x0050, text=»BUFFER RES 25 «, t00=0x000c, t01=0x00ee}
0x13bc…13c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0104}
0x13c6…13d8 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x000c, t01=0x010e}
0x13d8…13e8 Head {h00=0x000c, h01=0x0050, text=» RES 103«, t00=0x000c, t01=0x0120}
0x13e8…13f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0130}
0x13f4…13fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013c}
0x13fe…141e Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x000c, t01=0x0146}
0x141e…1428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0166}
0x1428…1432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0170}
0x1432…144c Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000c, t01=0x017a}
0x144c…1466 (13, 0, 400) Head {h00=0x0016, h01=0x0050, text=»* * «, t00=0x000d, t01=0x0004}
0x1466…1480 Head {h00=0x0016, h01=0x0050, text=»* ACTIVATION * «, t00=0x000d, t01=0x001e}
0x1480…149a Head {h00=0x0016, h01=0x0050, text=»* * «, t00=0x000d, t01=0x0038}
0x149a…14b4 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000d, t01=0x0052}
0x14b4…14be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006c}
0x14be…14c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0076}
0x14c8…14da Head {h00=0x000e, h01=0x0050, text=»DUAD EQU *«, t00=0x000d, t01=0x0080}
0x14da…1500 Head {h00=0x0022, h01=0x0050, text=» CM DWTRTY,A6 RETRY INDICATOR «, t00=0x000d, t01=0x0092}
0x1500…1534 Head {h00=0x0030, h01=0x0050, text=» CM DWTFBU,A6 RESET DRIVER BUFFER INDICATOR «, t00=0x000d, t01=0x00b8}
0x1534…1546 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x000d, t01=0x00ec}
0x1546…1568 Head {h00=0x001e, h01=0x0050, text=» LC A1,DWTOR,A6 GET INDEX «, t00=0x000d, t01=0x00fe}
0x1568…157e Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x000d, t01=0x0120}
0x157e…1590 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000d, t01=0x0136}
0x1590…159c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0148}
0x159c…15b2 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x000d, t01=0x0154}
0x15b2…15c4 Head {h00=0x000e, h01=0x0050, text=» SUK A1,3 «, t00=0x000d, t01=0x016a}
0x15c4…15d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x017c}
0x15d0…15f4 Head {h00=0x0020, h01=0x0050, text=» RF(P) DUERR FAULT IN INDEX «, t00=0x000d, t01=0x0188}
0x15f4…15fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x001c}
0x15fe…1612 Head {h00=0x0010, h01=0x0050, text=»DUA:00 EQU *«, t00=0x000e, t01=0x0026}
0x1612…161c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003a}
0x161c…1632 Head {h00=0x0012, h01=0x0050, text=» LDK A5,DWTSB3«, t00=0x000e, t01=0x0044}
0x1632…1654 Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 LOAD STACK BASE«, t00=0x000e, t01=0x005a}
0x1654…166a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x007c}
0x166a…1696 Head {h00=0x0028, h01=0x0050, text=» MLR 2,A8 GET 18 BIT BUFFER ADDRESS «, t00=0x000e, t01=0x0092}
0x1696…16b8 Head {h00=0x001e, h01=0x0050, text=» SLC A1,4 MOST SIGN. BITS «, t00=0x000e, t01=0x00be}
0x16b8…16ca Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x000e, t01=0x00e0}
0x16ca…16ea Head {h00=0x001c, h01=0x0050, text=» SRL A2,1 WORD ADDDRESS «, t00=0x000e, t01=0x00f2}
0x16ea…1714 Head {h00=0x0026, h01=0x0050, text=» CF A5,MMULOG GET LOGICAL ADDRESS «, t00=0x000e, t01=0x0112}
0x1714…1720 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x013c}
0x1720…172a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0148}
0x172a…175c Head {h00=0x002e, h01=0x0050, text=» CF A15,NVLCHK CHECK IF NEW VOLUME LOADED «, t00=0x000e, t01=0x0152}
0x175c…177c Head {h00=0x001c, h01=0x0050, text=»* SAVE INDEX AND ORDER«, t00=0x000e, t01=0x0184}
0x177c…1794 Head {h00=0x0014, h01=0x0050, text=» ADK A7,0 SET CR«, t00=0x000f, t01=0x0014}
0x1794…17c0 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DUA:05 NOT TEST STATUS ORDER«, t00=0x000f, t01=0x002c}
0x17c0…17ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0058}
0x17ca…17e0 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x000f, t01=0x0062}
0x17e0…17ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0078}
0x17ea…17f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0082}
0x17f4…1812 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000f, t01=0x008c}
0x1812…1830 Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x000f, t01=0x00aa}
0x1830…184e Head {h00=0x001a, h01=0x0050, text=»* TEST STATUS * «, t00=0x000f, t01=0x00c8}
0x184e…186c Head {h00=0x001a, h01=0x0050, text=»* * «, t00=0x000f, t01=0x00e6}
0x186c…188a Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000f, t01=0x0104}
0x188a…1894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0122}
0x1894…189e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x012c}
0x189e…18be Head {h00=0x001c, h01=0x0050, text=» ORS A1,ECBRC,A8 NVL BIT«, t00=0x000f, t01=0x0136}
0x18be…18d4 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/200 «, t00=0x000f, t01=0x0156}
0x18d4…190c Head {h00=0x0034, h01=0x0050, text=» ANS A2,DWTOR,A6 VO:NAM ON FIRST OR SECOND UNIT «, t00=0x000f, t01=0x016c}
0x190c…191e Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0010, t01=0x0014}
0x191e…194c Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTSAV,A6 INDICATE TEST STATUS «, t00=0x0010, t01=0x0026}
0x194c…1972 Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM READ VOLUME NAME«, t00=0x0010, t01=0x0054}
0x1972…1984 Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x0010, t01=0x007a}
0x1984…19a8 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TESEND NOT OPERABLE «, t00=0x0010, t01=0x008c}
0x19a8…19d8 Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTORD,A6 RESTORE INDEX AND ORDER«, t00=0x0010, t01=0x00b0}
0x19d8…19f0 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTOR,A6 «, t00=0x0010, t01=0x00e0}
0x19f0…1a14 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0010, t01=0x00f8}
0x1a14…1a4e Head {h00=0x0036, h01=0x0050, text=» CF A15,VOLNAM TRANSFER VOLUME NAME TO USER BUFFER«, t00=0x0010, t01=0x011c}
0x1a4e…1a72 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0010, t01=0x0156}
0x1a72…1a86 Head {h00=0x0010, h01=0x0050, text=»TESEND EQU *«, t00=0x0010, t01=0x017a}
0x1a86…1a9a Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-1 «, t00=0x0010, t01=0x018e}
0x1a9a…1acc Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTSAV,A6 INDICATE TEST STATUS DONE«, t00=0x0011, t01=0x0012}
0x1acc…1aee Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM ENDIO «, t00=0x0011, t01=0x0044}
0x1aee…1af8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0066}
0x1af8…1b10 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0011, t01=0x0070}
0x1b10…1b1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0088}
0x1b1a…1b4a Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0011, t01=0x0092}
0x1b4a…1b7a Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x0011, t01=0x00c2}
0x1b7a…1baa Head {h00=0x002c, h01=0x0050, text=»* NEW VOLUME LOADED CHECK * «, t00=0x0011, t01=0x00f2}
0x1baa…1bda Head {h00=0x002c, h01=0x0050, text=»* ORDER CODE CHECK * «, t00=0x0011, t01=0x0122}
0x1bda…1c0a Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x0011, t01=0x0152}
0x1c0a…1c3a Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0011, t01=0x0182}
0x1c3a…1c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0022}
0x1c44…1c76 Head {h00=0x002e, h01=0x0050, text=»* INPUT: A1=NVL RETURN CODE FROM NVLCHK «, t00=0x0012, t01=0x002c}
0x1c76…1c96 Head {h00=0x001c, h01=0x0050, text=»* A7=ORDER CODE«, t00=0x0012, t01=0x005e}
0x1c96…1ca0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x007e}
0x1ca0…1caa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0088}
0x1caa…1cbe Head {h00=0x0010, h01=0x0050, text=»DUA:05 EQU *«, t00=0x0012, t01=0x0092}
0x1cbe…1cea Head {h00=0x0028, h01=0x0050, text=» ADK A1,0 CHECK IF NEW VOLUME LOADED«, t00=0x0012, t01=0x00a6}
0x1cea…1d10 Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) END:IO PERFORM TENDIO«, t00=0x0012, t01=0x00d2}
0x1d10…1d22 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0012, t01=0x00f8}
0x1d22…1d42 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:10 BASIC READ«, t00=0x0012, t01=0x010a}
0x1d42…1d54 Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0012, t01=0x012a}
0x1d54…1d76 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUA:10 BASIC WRITE «, t00=0x0012, t01=0x013c}
0x1d76…1d8a Head {h00=0x0010, h01=0x0050, text=» SUK A7,12 «, t00=0x0012, t01=0x015e}
0x1d8a…1dae Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:10 PHYSICAL READ «, t00=0x0012, t01=0x0172}
0x1dae…1dc0 Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0013, t01=0x0008}
0x1dc0…1de4 Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:10 PHYSICAL WRITE«, t00=0x0013, t01=0x001a}
0x1de4…1df6 Head {h00=0x000e, h01=0x0050, text=» SUK A7,10«, t00=0x0013, t01=0x003e}
0x1df6…1e1a Head {h00=0x0020, h01=0x0050, text=» RF(Z) FORMAT FORMAT VOLUME «, t00=0x0013, t01=0x0050}
0x1e1a…1e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0074}
0x1e24…1e4a Head {h00=0x0022, h01=0x0050, text=»DUERR ABL DISIOE REQUEST ERROR«, t00=0x0013, t01=0x007e}
0x1e4a…1e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a4}
0x1e54…1e80 Head {h00=0x0028, h01=0x0050, text=»INCLEN EQU * REQUESTED LENGTH ERROR «, t00=0x0013, t01=0x00ae}
0x1e80…1e96 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8008«, t00=0x0013, t01=0x00da}
0x1e96…1eaa Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0013, t01=0x00f0}
0x1eaa…1ec0 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0013, t01=0x0104}
0x1ec0…1eca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011a}
0x1eca…1ed4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0124}
0x1ed4…1ef6 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0013, t01=0x012e}
0x1ef6…1f18 Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0013, t01=0x0150}
0x1f18…1f3c Head {h00=0x0020, h01=0x0050, text=»* FORMAT VOLUME * «, t00=0x0013, t01=0x0172}
0x1f3c…1f5e Head {h00=0x001e, h01=0x0050, text=»* *«, t00=0x0014, t01=0x0008}
0x1f5e…1f80 Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0014, t01=0x002a}
0x1f80…1f8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x004c}
0x1f8a…1f94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0056}
0x1f94…1fa8 Head {h00=0x0010, h01=0x0050, text=»FORMAT EQU *«, t00=0x0014, t01=0x0060}
0x1fa8…1fdc Head {h00=0x0030, h01=0x0050, text=» LDK A7,204 NUMBER OF CYLINDERS ON PTS 6875 «, t00=0x0014, t01=0x0074}
0x1fdc…2002 Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DISC TYPE«, t00=0x0014, t01=0x00a8}
0x2002…201e Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0014, t01=0x00ce}
0x201e…2030 Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x0014, t01=0x00ea}
0x2030…203c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00fc}
0x203c…204e Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0014, t01=0x0108}
0x204e…206e Head {h00=0x001c, h01=0x0050, text=» RF(NZ) FORM03 PTS 6875 «, t00=0x0014, t01=0x011a}
0x206e…208a Head {h00=0x0018, h01=0x0050, text=» ADK A7,204 PTS 6876«, t00=0x0014, t01=0x013a}
0x208a…209e Head {h00=0x0010, h01=0x0050, text=»FORM03 EQU *«, t00=0x0014, t01=0x0156}
0x209e…20a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x016a}
0x20a8…20c4 Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0014, t01=0x0174}
0x20c4…20dc Head {h00=0x0014, h01=0x0050, text=» LDKL A3,BUFFER «, t00=0x0014, t01=0x0190}
0x20dc…2102 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/C001 WRITE ONE WORD «, t00=0x0015, t01=0x0018}
0x2102…2114 Head {h00=0x000e, h01=0x0050, text=» ANK A2,3 «, t00=0x0015, t01=0x003e}
0x2114…2126 Head {h00=0x000e, h01=0x0050, text=» SUK A2,3 «, t00=0x0015, t01=0x0050}
0x2126…2146 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) FORM05 A1 OR A2 «, t00=0x0015, t01=0x0062}
0x2146…216c Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/C0C1 WRITE 386 BYTES«, t00=0x0015, t01=0x0082}
0x216c…2184 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,PHSECL «, t00=0x0015, t01=0x00a8}
0x2184…2198 Head {h00=0x0010, h01=0x0050, text=»FORM05 EQU *«, t00=0x0015, t01=0x00c0}
0x2198…21be Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTFBU,A6 SAVE 1ST WER «, t00=0x0015, t01=0x00d4}
0x21be…21ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00fa}
0x21ca…21d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0106}
0x21d4…21ea Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0015, t01=0x0110}
0x21ea…2200 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0015, t01=0x0126}
0x2200…2218 Head {h00=0x0014, h01=0x0050, text=» LDKL A3,BUFFER «, t00=0x0015, t01=0x013c}
0x2218…2224 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0154}
0x2224…222e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0160}
0x222e…2244 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0015, t01=0x016a}
0x2244…225a Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0015, t01=0x0180}
0x225a…228c Head {h00=0x002e, h01=0x0050, text=» LDKL A3,BUFFER+PHSECL POSITION FOR CYL ID«, t00=0x0016, t01=0x0008}
0x228c…2298 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x003a}
0x2298…22a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0046}
0x22a2…22ca Head {h00=0x0024, h01=0x0050, text=» STR A3,A6 DRIVER BUFFER POINTER«, t00=0x0016, t01=0x0050}
0x22ca…22e0 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0016, t01=0x0078}
0x22e0…22f6 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0016, t01=0x008e}
0x22f6…231a Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER ZERO «, t00=0x0016, t01=0x00a4}
0x231a…2326 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00c8}
0x2326…233c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0016, t01=0x00d4}
0x233c…2360 Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A6 CYLINDER ZERO «, t00=0x0016, t01=0x00ea}
0x2360…236c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x010e}
0x236c…2376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x011a}
0x2376…238c Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0016, t01=0x0124}
0x238c…2396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x013a}
0x2396…23a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0144}
0x23a0…23b4 Head {h00=0x0010, h01=0x0050, text=»FORM20 EQU *«, t00=0x0016, t01=0x014e}
0x23b4…23ca Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRETRY«, t00=0x0016, t01=0x0162}
0x23ca…23de Head {h00=0x0010, h01=0x0050, text=»FORM30 EQU *«, t00=0x0016, t01=0x0178}
0x23de…23f4 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0016, t01=0x018c}
0x23f4…2418 Head {h00=0x0020, h01=0x0050, text=» CF A5,INXUNI GET UNIT INDEX«, t00=0x0017, t01=0x0012}
0x2418…2424 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0036}
0x2424…2446 Head {h00=0x001e, h01=0x0050, text=» CF A5,SEEK SEEK CYLINDER «, t00=0x0017, t01=0x0042}
0x2446…245e Head {h00=0x0014, h01=0x0050, text=» SLL A1,5 STATUS«, t00=0x0017, t01=0x0064}
0x245e…2480 Head {h00=0x001e, h01=0x0050, text=» RF(NN) FORM40 SEEK ERROR «, t00=0x0017, t01=0x007c}
0x2480…2496 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0017, t01=0x009e}
0x2496…24ac Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0017, t01=0x00b4}
0x24ac…24c4 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCYL,A2«, t00=0x0017, t01=0x00ca}
0x24c4…24d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00e2}
0x24d0…24e6 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0017, t01=0x00ee}
0x24e6…24fe Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCYL,A6«, t00=0x0017, t01=0x0104}
0x24fe…250a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x011c}
0x250a…2542 Head {h00=0x0034, h01=0x0050, text=» ST* A1,0,A6 PREPARE DRIVER BUFFER WITH CYL. ID «, t00=0x0017, t01=0x0128}
0x2542…2554 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0017, t01=0x0160}
0x2554…2588 Head {h00=0x0030, h01=0x0050, text=» CF A5,SKEW WRITE SECTOR 0 ON EVEN CYLINDERS«, t00=0x0017, t01=0x0172}
0x2588…25b4 Head {h00=0x0028, h01=0x0050, text=»* WRITE SECTOR 8 ON ODD CYLINDERS «, t00=0x0018, t01=0x0016}
0x25b4…25d8 Head {h00=0x0020, h01=0x0050, text=» ORK A3,1 ORDER CODE: WRITE «, t00=0x0018, t01=0x0042}
0x25d8…25e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0066}
0x25e2…25fe Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0018, t01=0x0070}
0x25fe…2622 Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTFBU,A6 GET 1ST WER«, t00=0x0018, t01=0x008c}
0x2622…262e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00b0}
0x262e…2638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00bc}
0x2638…264e Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0018, t01=0x00c6}
0x264e…2664 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0018, t01=0x00dc}
0x2664…267a Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C002«, t00=0x0018, t01=0x00f2}
0x267a…2686 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0108}
0x2686…2690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0114}
0x2690…26a6 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0018, t01=0x011e}
0x26a6…26bc Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0018, t01=0x0134}
0x26bc…26ea Head {h00=0x002a, h01=0x0050, text=» LDKL A1,/C0C1 1ST WER WRITE 386 BYTES«, t00=0x0018, t01=0x014a}
0x26ea…26f6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0178}
0x26f6…2700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0184}
0x2700…2718 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x0018, t01=0x018e}
0x2718…273c Head {h00=0x0020, h01=0x0050, text=» CF A5,CIO:50 CIO:50 SECTOR «, t00=0x0019, t01=0x0016}
0x273c…2750 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x0019, t01=0x003a}
0x2750…2772 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) FORM40 WRITE ERROR«, t00=0x0019, t01=0x004e}
0x2772…2788 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0019, t01=0x0070}
0x2788…279e Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0019, t01=0x0086}
0x279e…27b4 Head {h00=0x0012, h01=0x0050, text=» IM DWTCYL,A2 «, t00=0x0019, t01=0x009c}
0x27b4…27c0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00b2}
0x27c0…27d6 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0019, t01=0x00be}
0x27d6…27ec Head {h00=0x0012, h01=0x0050, text=» IM DWTCYL,A6 «, t00=0x0019, t01=0x00d4}
0x27ec…27f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00ea}
0x27f8…2824 Head {h00=0x0028, h01=0x0050, text=» SUK A7,1 DECREMENT CYLINDER COUNTER«, t00=0x0019, t01=0x00f6}
0x2824…283a Head {h00=0x0012, h01=0x0050, text=» RB(NZ) FORM20«, t00=0x0019, t01=0x0122}
0x283a…286e Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBCW1,A8 GET FORMAT AND TYPE OF DISC«, t00=0x0019, t01=0x0138}
0x286e…289c Head {h00=0x002a, h01=0x0050, text=» ABL TRANPA PUT FORMAT AND TYPE IN DWT«, t00=0x0019, t01=0x016c}
0x289c…28b0 Head {h00=0x0010, h01=0x0050, text=»FORM40 EQU *«, t00=0x001a, t01=0x000a}
0x28b0…28d4 Head {h00=0x0020, h01=0x0050, text=» CF A5,SEEKZ SEEK CYLINDER 0«, t00=0x001a, t01=0x001e}
0x28d4…28e6 Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x001a, t01=0x0042}
0x28e6…2906 Head {h00=0x001c, h01=0x0050, text=» RF(N) FORM50 SEEK ERROR«, t00=0x001a, t01=0x0054}
0x2906…2926 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x001a, t01=0x0074}
0x2926…2942 Head {h00=0x0018, h01=0x0050, text=» RB(NZ) FORM30 RETRY«, t00=0x001a, t01=0x0094}
0x2942…2956 Head {h00=0x0010, h01=0x0050, text=»FORM50 EQU *«, t00=0x001a, t01=0x00b0}
0x2956…297e Head {h00=0x0024, h01=0x0050, text=» LDK A1,2 SEEK ERROR RETURN CODE«, t00=0x001a, t01=0x00c4}
0x297e…29a0 Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM END IO«, t00=0x001a, t01=0x00ec}
0x29a0…29c0 Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x001a, t01=0x010e}
0x29c0…29ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x012e}
0x29ca…29d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0138}
0x29d4…2a0e Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001a, t01=0x0142}
0x2a0e…2a48 Head {h00=0x0036, h01=0x0050, text=»* * «, t00=0x001a, t01=0x017c}
0x2a48…2a82 Head {h00=0x0036, h01=0x0050, text=»* CHECK IF ALLOWED SECTOR LENGTH, BUFFER SIZE * «, t00=0x001b, t01=0x0026}
0x2a82…2abc Head {h00=0x0036, h01=0x0050, text=»* AND SECTOR NUMBER * «, t00=0x001b, t01=0x0060}
0x2abc…2af6 Head {h00=0x0036, h01=0x0050, text=»* SAVE BUFFER ADDRESS AND SET SECTOR COUNTER * «, t00=0x001b, t01=0x009a}
0x2af6…2b30 Head {h00=0x0036, h01=0x0050, text=»* * «, t00=0x001b, t01=0x00d4}
0x2b30…2b6a Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001b, t01=0x010e}
0x2b6a…2b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0148}
0x2b74…2b8a Head {h00=0x0012, h01=0x0050, text=»* INPUT: ECB«, t00=0x001b, t01=0x0152}
0x2b8a…2bb0 Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A7=SECTOR COUNTER «, t00=0x001b, t01=0x0168}
0x2bb0…2bde Head {h00=0x002a, h01=0x0050, text=»* DWTUBU=USER BUFFER POINTER«, t00=0x001b, t01=0x018e}
0x2bde…2be8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x002c}
0x2be8…2bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0036}
0x2bf2…2c06 Head {h00=0x0010, h01=0x0050, text=»DUA:10 EQU *«, t00=0x001c, t01=0x0040}
0x2c06…2c2e Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 REQUESTED LENGTH«, t00=0x001c, t01=0x0054}
0x2c2e…2c44 Head {h00=0x0012, h01=0x0050, text=» RB(Z) INCLEN «, t00=0x001c, t01=0x007c}
0x2c44…2c7e Head {h00=0x0036, h01=0x0050, text=» ECR A7,A3 DIVIDE BY 256 TO GET NUMBER OF SECTORS «, t00=0x001c, t01=0x0092}
0x2c7e…2ca8 Head {h00=0x0026, h01=0x0050, text=» ANK A3,/FF SET CONDITION REGISTER«, t00=0x001c, t01=0x00cc}
0x2ca8…2ce0 Head {h00=0x0034, h01=0x0050, text=» RB(NZ) INCLEN NOT AN INTEGER NUMBER OF SECTORS «, t00=0x001c, t01=0x00f6}
0x2ce0…2d1e Head {h00=0x003a, h01=0x0050, text=» LD A3,ECBCW2,A8 SECTOR NUMBER WHERE THE BUFFER BEGIN «, t00=0x001c, t01=0x012e}
0x2d1e…2d4a Head {h00=0x0028, h01=0x0050, text=» RB(N) DUERR INCORRECT SECTOR NUMBER«, t00=0x001c, t01=0x016c}
0x2d4a…2d62 Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTSMX,A2«, t00=0x001d, t01=0x0008}
0x2d62…2d90 Head {h00=0x002a, h01=0x0050, text=» RB(NL) DUERR INCORRECT SECTOR NUMBER «, t00=0x001d, t01=0x0020}
0x2d90…2da2 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A7«, t00=0x001d, t01=0x004e}
0x2da2…2dba Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTSMX,A2«, t00=0x001d, t01=0x0060}
0x2dba…2de6 Head {h00=0x0028, h01=0x0050, text=» RB(G) INCLEN SECTOR NUMBER OVERFLOW«, t00=0x001d, t01=0x0078}
0x2de6…2df0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a4}
0x2df0…2e06 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001d, t01=0x00ae}
0x2e06…2e1e Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A8 «, t00=0x001d, t01=0x00c4}
0x2e1e…2e4a Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTUBU,A6 USER BUFFER POINTER«, t00=0x001d, t01=0x00dc}
0x2e4a…2e56 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0108}
0x2e56…2e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0114}
0x2e60…2e76 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x001d, t01=0x011e}
0x2e76…2e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0134}
0x2e80…2e9c Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x001d, t01=0x013e}
0x2e9c…2ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x015a}
0x2ea6…2eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0164}
0x2eb0…2ed6 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x001d, t01=0x016e}
0x2ed6…2efc (30, 0, 400) Head {h00=0x0022, h01=0x0050, text=»* *«, t00=0x001e, t01=0x0004}
0x2efc…2f22 Head {h00=0x0022, h01=0x0050, text=»* DISC VERSION SEPARATION *«, t00=0x001e, t01=0x002a}
0x2f22…2f48 Head {h00=0x0022, h01=0x0050, text=»* *«, t00=0x001e, t01=0x0050}
0x2f48…2f6e Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x001e, t01=0x0076}
0x2f6e…2f78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009c}
0x2f78…2f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a6}
0x2f82…2f9a Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFOR,A2«, t00=0x001e, t01=0x00b0}
0x2f9a…2fac Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x001e, t01=0x00c8}
0x2fac…2fcc Head {h00=0x001c, h01=0x0050, text=» RF(Z) RW:800 VERSION A2«, t00=0x001e, t01=0x00da}
0x2fcc…2fd8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00fa}
0x2fd8…2fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0106}
0x2fe2…2ff8 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x001e, t01=0x0110}
0x2ff8…3002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0126}
0x3002…3018 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x001e, t01=0x0130}
0x3018…3022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0146}
0x3022…3050 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x001e, t01=0x0150}
0x3050…307e Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x001e, t01=0x017e}
0x307e…30ac Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x001f, t01=0x001c}
0x30ac…30da Head {h00=0x002a, h01=0x0050, text=»* GET PHYSICAL SECTOR NUMBER BY * «, t00=0x001f, t01=0x004a}
0x30da…3108 Head {h00=0x002a, h01=0x0050, text=»* DIVIDE BY 3 * «, t00=0x001f, t01=0x0078}
0x3108…3136 Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x001f, t01=0x00a6}
0x3136…3164 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x001f, t01=0x00d4}
0x3164…316e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0102}
0x316e…3184 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001f, t01=0x010c}
0x3184…31aa Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 PREPARE FOR DIVISION«, t00=0x001f, t01=0x0122}
0x31aa…31dc Head {h00=0x002e, h01=0x0050, text=» LD A2,ECBCW2,A8 GET LOGICAL SECTOR NUMBER«, t00=0x001f, t01=0x0148}
0x31dc…31ea Head {h00=0x000a, h01=0x0050, text=» DVK 3«, t00=0x001f, t01=0x017a}
0x31ea…321a Head {h00=0x002c, h01=0x0050, text=»* A1=REMAINER=LOGICAL SECTOR POSITION «, t00=0x001f, t01=0x0188}
0x321a…3250 Head {h00=0x0032, h01=0x0050, text=»* A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC«, t00=0x0020, t01=0x0028}
0x3250…325c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x005e}
0x325c…3266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006a}
0x3266…327c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0020, t01=0x0074}
0x327c…3292 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x008a}
0x3292…32aa Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBCW2,A8«, t00=0x0020, t01=0x00a0}
0x32aa…32ca Head {h00=0x001c, h01=0x0050, text=» LDR A3,A1 SECTOR NUMBER«, t00=0x0020, t01=0x00b8}
0x32ca…32dc Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0020, t01=0x00d8}
0x32dc…32f0 Head {h00=0x0010, h01=0x0050, text=»DVK:00 EQU *«, t00=0x0020, t01=0x00ea}
0x32f0…330c Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 I:= I+I/4«, t00=0x0020, t01=0x00fe}
0x330c…3326 Head {h00=0x0016, h01=0x0050, text=» SRL A3,2 I:= I/4 «, t00=0x0020, t01=0x011a}
0x3326…333c Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DVK:00«, t00=0x0020, t01=0x0134}
0x333c…3356 Head {h00=0x0016, h01=0x0050, text=» SRL A2,2 TRUNCATE«, t00=0x0020, t01=0x014a}
0x3356…3368 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0020, t01=0x0164}
0x3368…337a Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0020, t01=0x0176}
0x337a…339c Head {h00=0x001e, h01=0x0050, text=» SUR A1,A2 REST AFTER LOOP«, t00=0x0020, t01=0x0188}
0x339c…33ae Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0021, t01=0x001a}
0x33ae…33c2 Head {h00=0x0010, h01=0x0050, text=»DVK:10 EQU *«, t00=0x0021, t01=0x002c}
0x33c2…33d4 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0021, t01=0x0040}
0x33d4…33f2 Head {h00=0x001a, h01=0x0050, text=» SUK A1,3 DIVIDE BY 3 «, t00=0x0021, t01=0x0052}
0x33f2…3408 Head {h00=0x0012, h01=0x0050, text=» RB(NN) DVK:10«, t00=0x0021, t01=0x0070}
0x3408…341e Head {h00=0x0012, h01=0x0050, text=» ADK A1,3 REST«, t00=0x0021, t01=0x0086}
0x341e…344e Head {h00=0x002c, h01=0x0050, text=»* A1=REMAINER=LOGICAL SECTOR POSITION «, t00=0x0021, t01=0x009c}
0x344e…3484 Head {h00=0x0032, h01=0x0050, text=»* A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC«, t00=0x0021, t01=0x00cc}
0x3484…348e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0102}
0x348e…34a4 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0021, t01=0x010c}
0x34a4…34b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0122}
0x34b0…34ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x012e}
0x34ba…34d0 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0021, t01=0x0138}
0x34d0…34da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x014e}
0x34da…3508 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0021, t01=0x0158}
0x3508…3536 Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0021, t01=0x0186}
0x3536…3564 Head {h00=0x002a, h01=0x0050, text=»* SAVE PHYSICAL SECTOR NUMBER * «, t00=0x0022, t01=0x0024}
0x3564…3592 Head {h00=0x002a, h01=0x0050, text=»* AND SECTOR POSITION * «, t00=0x0022, t01=0x0052}
0x3592…35c0 Head {h00=0x002a, h01=0x0050, text=»* BRANCH ACCORDING TO SECTOR * «, t00=0x0022, t01=0x0080}
0x35c0…35ee Head {h00=0x002a, h01=0x0050, text=»* POSITION * «, t00=0x0022, t01=0x00ae}
0x35ee…361c Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0022, t01=0x00dc}
0x361c…364a Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0022, t01=0x010a}
0x364a…3654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0138}
0x3654…3684 Head {h00=0x002c, h01=0x0050, text=»* INPUT: A1=SECTOR POSITION INDICATOR «, t00=0x0022, t01=0x0142}
0x3684…36b4 Head {h00=0x002c, h01=0x0050, text=»* A2=LOGICAL SECTOR NUMBER / 3 «, t00=0x0022, t01=0x0172}
0x36b4…36be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0012}
0x36be…36c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x001c}
0x36c8…36da Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x0023, t01=0x0026}
0x36da…3708 Head {h00=0x002a, h01=0x0050, text=» STR A2,A6 SAVE PHYSICAL SECTOR NUMBER«, t00=0x0023, t01=0x0038}
0x3708…371a Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0023, t01=0x0066}
0x371a…372c Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0023, t01=0x0078}
0x372c…375a Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTSEP,A6 SAVE SECTOR POSITION «, t00=0x0023, t01=0x008a}
0x375a…3790 Head {h00=0x0032, h01=0x0050, text=» ST A2,DWTSEI,A6 SAVE 1ST PHYS. SECTOR NUMBER «, t00=0x0023, t01=0x00b8}
0x3790…379c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x00ee}
0x379c…37a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00fa}
0x37a6…37bc Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0023, t01=0x0104}
0x37bc…37e0 Head {h00=0x0020, h01=0x001b, text=»* LOGICAL SECTOR POSITION «, t00=0x0023, t01=0x011a}
0x37e0…3806 Head {h00=0x0022, h01=0x0050, text=» RF(N) RW:300 ,XXXX , , «, t00=0x0023, t01=0x013e}
0x3806…382c Head {h00=0x0022, h01=0x0050, text=» RF(Z) RW:200 , XX,XX , «, t00=0x0023, t01=0x0164}
0x382c…3848 Head {h00=0x0018, h01=0x0013, text=»* , , XXXX, «, t00=0x0023, t01=0x018a}
0x3848…3852 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0016}
0x3852…3868 Head {h00=0x0012, h01=0x000e, text=» EJECT DRDU01«, t00=0x0024, t01=0x0020}
0x3868…3872 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0036}
0x3872…38a0 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0024, t01=0x0040}
0x38a0…38ce Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0024, t01=0x006e}
0x38ce…38fc Head {h00=0x002a, h01=0x0050, text=»* READ/WRITE FROM SECTOR IN * «, t00=0x0024, t01=0x009c}
0x38fc…392a Head {h00=0x002a, h01=0x0050, text=»* POSITION , , xxxx, * «, t00=0x0024, t01=0x00ca}
0x392a…3958 Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0024, t01=0x00f8}
0x3958…3986 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0024, t01=0x0126}
0x3986…3990 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0154}
0x3990…39bc Head {h00=0x0028, h01=0x0050, text=» IMR A6 LOG. SECTOR IN NEXT PHYSICAL«, t00=0x0024, t01=0x015e}
0x39bc…39ce Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0024, t01=0x018a}
0x39ce…39fe Head {h00=0x002c, h01=0x0050, text=» IM DWTSEI,A6 SAVE FOR READ AFTER WRITE «, t00=0x0025, t01=0x000c}
0x39fe…3a0a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x003c}
0x3a0a…3a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0048}
0x3a14…3a2a Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0025, t01=0x0052}
0x3a2a…3a40 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0025, t01=0x0068}
0x3a40…3a54 Head {h00=0x0010, h01=0x0050, text=» DATA /0084 «, t00=0x0025, t01=0x007e}
0x3a54…3a66 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0025, t01=0x0092}
0x3a66…3a78 Head {h00=0x000e, h01=0x0050, text=» RF RW:300«, t00=0x0025, t01=0x00a4}
0x3a78…3a82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00b6}
0x3a82…3a98 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0025, t01=0x00c0}
0x3a98…3aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00d6}
0x3aa2…3ad0 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0025, t01=0x00e0}
0x3ad0…3afe Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0025, t01=0x010e}
0x3afe…3b2c Head {h00=0x002a, h01=0x0050, text=»* READ/WRITE FROM SECTOR IN * «, t00=0x0025, t01=0x013c}
0x3b2c…3b5a Head {h00=0x002a, h01=0x0050, text=»* POSITION , xx, * «, t00=0x0025, t01=0x016a}
0x3b5a…3b88 Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0026, t01=0x0008}
0x3b88…3bb6 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0026, t01=0x0036}
0x3bb6…3bc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0064}
0x3bc0…3bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x006e}
0x3bca…3bde Head {h00=0x0010, h01=0x0050, text=»RW:200 EQU *«, t00=0x0026, t01=0x0078}
0x3bde…3bf4 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0026, t01=0x008c}
0x3bf4…3c08 Head {h00=0x0010, h01=0x0050, text=» DATA /0048 «, t00=0x0026, t01=0x00a2}
0x3c08…3c2c Head {h00=0x0020, h01=0x0050, text=» SUK A7,2 NUMBER OF SECTORS «, t00=0x0026, t01=0x00b6}
0x3c2c…3c50 Head {h00=0x0020, h01=0x0050, text=» RF(N) RW:230 1 SECTOR IN IO«, t00=0x0026, t01=0x00da}
0x3c50…3c78 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RW:260 >2 SECTORS IN IO «, t00=0x0026, t01=0x00fe}
0x3c78…3c94 Head {h00=0x0018, h01=0x0050, text=»* , XX,XXXXXX, «, t00=0x0026, t01=0x0126}
0x3c94…3caa Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0026, t01=0x0142}
0x3caa…3cbe Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x0026, t01=0x0158}
0x3cbe…3cd0 Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x0026, t01=0x016c}
0x3cd0…3cf4 Head {h00=0x0020, h01=0x0050, text=»RW:230 EQU * , XX,XX ,«, t00=0x0026, t01=0x017e}
0x3cf4…3d0a Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x0012}
0x3d0a…3d1e Head {h00=0x0010, h01=0x0050, text=» DATA /0040 «, t00=0x0027, t01=0x0028}
0x3d1e…3d30 Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x0027, t01=0x003c}
0x3d30…3d54 Head {h00=0x0020, h01=0x0050, text=»RW:260 EQU * , XX,XXXXXX,«, t00=0x0027, t01=0x004e}
0x3d54…3d6a Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x0072}
0x3d6a…3d7e Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0027, t01=0x0088}
0x3d7e…3d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x009c}
0x3d88…3d9e Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0027, t01=0x00a6}
0x3d9e…3da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00bc}
0x3da8…3dd4 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0027, t01=0x00c6}
0x3dd4…3e00 Head {h00=0x0028, h01=0x0050, text=»* *«, t00=0x0027, t01=0x00f2}
0x3e00…3e2c Head {h00=0x0028, h01=0x0050, text=»* DIRECT READ/WRITE AS LONG *«, t00=0x0027, t01=0x011e}
0x3e2c…3e58 Head {h00=0x0028, h01=0x0050, text=»* AS POSIBLE *«, t00=0x0027, t01=0x014a}
0x3e58…3e84 Head {h00=0x0028, h01=0x0050, text=»* *«, t00=0x0027, t01=0x0176}
0x3e84…3eb0 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0028, t01=0x0012}
0x3eb0…3eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x003e}
0x3eba…3ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0048}
0x3ec4…3ed8 Head {h00=0x0010, h01=0x0050, text=»RW:300 EQU *«, t00=0x0028, t01=0x0052}
0x3ed8…3ef8 Head {h00=0x001c, h01=0x0050, text=» SUK A7,3 SECTOR COUNTER«, t00=0x0028, t01=0x0066}
0x3ef8…3f2c Head {h00=0x0030, h01=0x0050, text=» RF(NG) RW:500 LESS THAN FOUR SECTORS IN IO «, t00=0x0028, t01=0x0086}
0x3f2c…3f42 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0028, t01=0x00ba}
0x3f42…3f56 Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0028, t01=0x00d0}
0x3f56…3f6c Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0028, t01=0x00e4}
0x3f6c…3f80 Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0028, t01=0x00fa}
0x3f80…3f92 Head {h00=0x000e, h01=0x0050, text=» RB RW:300«, t00=0x0028, t01=0x010e}
0x3f92…3f9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0120}
0x3f9c…3fb2 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0028, t01=0x012a}
0x3fb2…3fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0140}
0x3fbc…3fe8 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0028, t01=0x014a}
0x3fe8…4014 Head {h00=0x0028, h01=0x0050, text=»* *«, t00=0x0028, t01=0x0176}
0x4014…4040 Head {h00=0x0028, h01=0x0050, text=»* READ/WRITE ON THE LAST SECTORS *«, t00=0x0029, t01=0x0012}
0x4040…406c Head {h00=0x0028, h01=0x0050, text=»* IN IO *«, t00=0x0029, t01=0x003e}
0x406c…4098 Head {h00=0x0028, h01=0x0050, text=»* *«, t00=0x0029, t01=0x006a}
0x4098…40c4 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0029, t01=0x0096}
0x40c4…40ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c2}
0x40ce…40d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00cc}
0x40d8…40ec Head {h00=0x0010, h01=0x0050, text=»RW:500 EQU *«, t00=0x0029, t01=0x00d6}
0x40ec…410c Head {h00=0x001c, h01=0x0050, text=» RF(Z) RW:580 3 SECTORS «, t00=0x0029, t01=0x00ea}
0x410c…411e Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0029, t01=0x010a}
0x411e…413e Head {h00=0x001c, h01=0x0050, text=» RF(P) RW:560 2 SECTORS «, t00=0x0029, t01=0x011c}
0x413e…415e Head {h00=0x001c, h01=0x0050, text=» RF(N) RW:600 0 SECTORS «, t00=0x0029, t01=0x013c}
0x415e…4182 Head {h00=0x0020, h01=0x0050, text=»RW:530 EQU * ,XXXX , ,«, t00=0x0029, t01=0x015c}
0x4182…4198 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0029, t01=0x0180}
0x4198…41ac Head {h00=0x0010, h01=0x0050, text=» DATA /0080 «, t00=0x002a, t01=0x0008}
0x41ac…41be Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x002a, t01=0x001c}
0x41be…41e2 Head {h00=0x0020, h01=0x0050, text=»RW:560 EQU * ,XXXXXX,XX ,«, t00=0x002a, t01=0x002e}
0x41e2…41f8 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x0052}
0x41f8…420c Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x002a, t01=0x0068}
0x420c…4222 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x007c}
0x4222…4236 Head {h00=0x0010, h01=0x0050, text=» DATA /0040 «, t00=0x002a, t01=0x0092}
0x4236…4248 Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x002a, t01=0x00a6}
0x4248…426c Head {h00=0x0020, h01=0x0050, text=»RW:580 EQU * ,XXXXXX,XXXXXX,«, t00=0x002a, t01=0x00b8}
0x426c…4282 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x00dc}
0x4282…4296 Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x002a, t01=0x00f2}
0x4296…42ac Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x0106}
0x42ac…42c0 Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x002a, t01=0x011c}
0x42c0…42ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0130}
0x42ca…42e0 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x002a, t01=0x013a}
0x42e0…42ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0150}
0x42ea…42f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x015a}
0x42f4…4308 Head {h00=0x0010, h01=0x0050, text=»RW:600 EQU *«, t00=0x002a, t01=0x0164}
0x4308…431a Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x002a, t01=0x0178}
0x431a…4324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x018a}
0x4324…4344 (43, 0, 400) Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002b, t01=0x0004}
0x4344…4364 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x002b, t01=0x0024}
0x4364…4384 Head {h00=0x001c, h01=0x0050, text=»* READ AFTER WRITE *«, t00=0x002b, t01=0x0044}
0x4384…43a4 Head {h00=0x001c, h01=0x0050, text=»* *«, t00=0x002b, t01=0x0064}
0x43a4…43c4 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002b, t01=0x0084}
0x43c4…43ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a4}
0x43ce…4402 Head {h00=0x0030, h01=0x0050, text=»* DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO«, t00=0x002b, t01=0x00ae}
0x4402…443e Head {h00=0x0038, h01=0x0050, text=»* 1ST POS IN DWT=LAST PHYSICAL SECTOR NUMBER IN IO«, t00=0x002b, t01=0x00e2}
0x443e…445c Head {h00=0x001a, h01=0x0050, text=»* A7=SECTOR COUNTER «, t00=0x002b, t01=0x011e}
0x445c…4466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x013c}
0x4466…447e Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x002b, t01=0x0146}
0x447e…449c Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF GET ORDER «, t00=0x002b, t01=0x015e}
0x449c…44b0 Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x002b, t01=0x017c}
0x44b0…44da Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RW:700 NOT PHYSICAL WRITE «, t00=0x002b, t01=0x0190}
0x44da…44f0 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,-/100«, t00=0x002c, t01=0x002a}
0x44f0…4520 Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTSEP,A6 GET 1ST SECTOR POSITION«, t00=0x002c, t01=0x0040}
0x4520…453e Head {h00=0x001a, h01=0x0050, text=» RF(Z) RW:645 , XX,«, t00=0x002c, t01=0x0070}
0x453e…455c Head {h00=0x001a, h01=0x0050, text=» RF(P) RW:640 , XXXX,«, t00=0x002c, t01=0x008e}
0x455c…4570 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x002c, t01=0x00ac}
0x4570…4584 Head {h00=0x0010, h01=0x0050, text=»RW:640 EQU *«, t00=0x002c, t01=0x00c0}
0x4584…4598 Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x002c, t01=0x00d4}
0x4598…45ac Head {h00=0x0010, h01=0x0050, text=»RW:645 EQU *«, t00=0x002c, t01=0x00e8}
0x45ac…45dc Head {h00=0x002c, h01=0x0050, text=» ST A2,ECBEL,A8 PREPARE EFFECTIVE LENGTH«, t00=0x002c, t01=0x00fc}
0x45dc…460a Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTSEI,A6 RAW FROM THIS SECTOR «, t00=0x002c, t01=0x012c}
0x460a…4630 Head {h00=0x0022, h01=0x0050, text=» LDR* A7,A6 GET LAST SECTOR NO«, t00=0x002c, t01=0x015a}
0x4630…4662 Head {h00=0x002e, h01=0x0050, text=» SUR A7,A1 GET NUMBER OF PHYSICAL SECTORS «, t00=0x002c, t01=0x0180}
0x4662…4674 Head {h00=0x000e, h01=0x0050, text=» STR A1,A6«, t00=0x002d, t01=0x0022}
0x4674…467e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0034}
0x467e…4694 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x002d, t01=0x003e}
0x4694…469e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0054}
0x469e…46a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x005e}
0x46a8…46bc Head {h00=0x0010, h01=0x0050, text=»RW:650 EQU *«, t00=0x002d, t01=0x0068}
0x46bc…46d2 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002d, t01=0x007c}
0x46d2…46e6 Head {h00=0x0010, h01=0x0050, text=» DATA /40C0 «, t00=0x002d, t01=0x0092}
0x46e6…470a Head {h00=0x0020, h01=0x0050, text=» IMR A6 NEXT PHYSICAL SECTOR«, t00=0x002d, t01=0x00a6}
0x470a…4722 Head {h00=0x0014, h01=0x0050, text=» LDKL A1,PHSECL «, t00=0x002d, t01=0x00ca}
0x4722…4748 Head {h00=0x0022, h01=0x0050, text=» ADS A1,ECBEL,A8 UPDATE ECBEL «, t00=0x002d, t01=0x00e2}
0x4748…475a Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x002d, t01=0x0108}
0x475a…4770 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RW:650«, t00=0x002d, t01=0x011a}
0x4770…4788 Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRL,A8 «, t00=0x002d, t01=0x0130}
0x4788…47b8 Head {h00=0x002c, h01=0x0050, text=» ST A7,ECBEL,A8 CORRECT EFFECTIVE LENGTH«, t00=0x002d, t01=0x0148}
0x47b8…47c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0178}
0x47c4…47ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0184}
0x47ce…47e4 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x002d, t01=0x018e}
0x47e4…47f8 Head {h00=0x0010, h01=0x0050, text=»RW:700 EQU *«, t00=0x002e, t01=0x0014}
0x47f8…4816 Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x002e, t01=0x0028}
0x4816…4830 Head {h00=0x0016, h01=0x0050, text=» ABL END:20 ENDIO «, t00=0x002e, t01=0x0046}
0x4830…483a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0060}
0x483a…4846 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x006a}
0x4846…4850 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0076}
0x4850…4866 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x002e, t01=0x0080}
0x4866…4870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0096}
0x4870…4886 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x002e, t01=0x00a0}
0x4886…4890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00b6}
0x4890…489a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c0}
0x489a…48c4 Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002e, t01=0x00ca}
0x48c4…48ee Head {h00=0x0026, h01=0x0050, text=»* * «, t00=0x002e, t01=0x00f4}
0x48ee…4918 Head {h00=0x0026, h01=0x0050, text=»* DISC FORMAT A2 * «, t00=0x002e, t01=0x011e}
0x4918…4942 Head {h00=0x0026, h01=0x0050, text=»* * «, t00=0x002e, t01=0x0148}
0x4942…496c Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002e, t01=0x0172}
0x496c…4976 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x000c}
0x4976…4980 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0016}
0x4980…4994 Head {h00=0x0010, h01=0x0050, text=»RW:800 EQU *«, t00=0x002f, t01=0x0020}
0x4994…49a8 Head {h00=0x0010, h01=0x0050, text=» CF A5,DIV31«, t00=0x002f, t01=0x0034}
0x49a8…49ba Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x002f, t01=0x0048}
0x49ba…49fe Head {h00=0x0040, h01=0x0050, text=» ST A7,DWTSEI,A6 SAVE NUMBER OF SECTORS FOR READ AFTER WRITE«, t00=0x002f, t01=0x005a}
0x49fe…4a0a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x009e}
0x4a0a…4a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00aa}
0x4a14…4a2a Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x002f, t01=0x00b4}
0x4a2a…4a3e Head {h00=0x0010, h01=0x0050, text=»RW:850 EQU *«, t00=0x002f, t01=0x00ca}
0x4a3e…4a54 Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002f, t01=0x00de}
0x4a54…4a7a Head {h00=0x0022, h01=0x0050, text=» DATA /A080 INDICATE FORMAT A2«, t00=0x002f, t01=0x00f4}
0x4a7a…4a90 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x002f, t01=0x011a}
0x4a90…4ac4 Head {h00=0x0030, h01=0x0050, text=» ADS A1,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x002f, t01=0x0130}
0x4ac4…4ad6 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x002f, t01=0x0164}
0x4ad6…4b00 Head {h00=0x0026, h01=0x0050, text=» RB(NZ) RW:850 MORE SECTORS IN IO «, t00=0x002f, t01=0x0176}
0x4b00…4b0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0010}
0x4b0a…4b20 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0030, t01=0x001a}
0x4b20…4b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0030}
0x4b2a…4b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x003a}
0x4b34…4b46 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x0044}
0x4b46…4b68 Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x0030, t01=0x0056}
0x4b68…4b7c Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0030, t01=0x0078}
0x4b7c…4b90 Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x0030, t01=0x008c}
0x4b90…4b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a0}
0x4b9a…4bb0 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0030, t01=0x00aa}
0x4bb0…4bda Head {h00=0x0026, h01=0x0050, text=» RB(NZ) RW:700 NOT PHYSICAL WRITE «, t00=0x0030, t01=0x00c0}
0x4bda…4be6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00ea}
0x4be6…4bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00f6}
0x4bf0…4c06 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0030, t01=0x0100}
0x4c06…4c1c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0030, t01=0x0116}
0x4c1c…4c2e Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x012c}
0x4c2e…4c44 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RW:905«, t00=0x0030, t01=0x013e}
0x4c44…4c50 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0154}
0x4c50…4c5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0160}
0x4c5a…4c70 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0030, t01=0x016a}
0x4c70…4c82 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x0180}
0x4c82…4cb4 (49, 0, 398) Head {h00=0x002e, h01=0x0050, text=» CM ECBEL,A8 PREPARE FOR READ AFTER WRITE «, t00=0x0031, t01=0x0004}
0x4cb4…4ccc Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTSEI,A6«, t00=0x0031, t01=0x0036}
0x4ccc…4ce0 Head {h00=0x0010, h01=0x0050, text=» CF A5,DIV31«, t00=0x0031, t01=0x004e}
0x4ce0…4cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0062}
0x4cea…4d00 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0031, t01=0x006c}
0x4d00…4d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0082}
0x4d0a…4d14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x008c}
0x4d14…4d28 Head {h00=0x0010, h01=0x0050, text=»RW:900 EQU *«, t00=0x0031, t01=0x0096}
0x4d28…4d3e Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0031, t01=0x00aa}
0x4d3e…4d62 Head {h00=0x0020, h01=0x0050, text=» DATA /E080 READ AFTER WRITE«, t00=0x0031, t01=0x00c0}
0x4d62…4d74 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0031, t01=0x00e4}
0x4d74…4d8a Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RW:900«, t00=0x0031, t01=0x00f6}
0x4d8a…4d96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x010c}
0x4d96…4da0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0118}
0x4da0…4dbc Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0031, t01=0x0122}
0x4dbc…4dce Head {h00=0x000e, h01=0x0050, text=» RB RW:700«, t00=0x0031, t01=0x013e}
0x4dce…4dda Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0150}
0x4dda…4de4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x015c}
0x4de4…4dfa Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0031, t01=0x0166}
0x4dfa…4e10 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0031, t01=0x017c}
0x4e10…4e24 (50, 0, 400) Head {h00=0x0010, h01=0x0050, text=»RW:905 EQU *«, t00=0x0032, t01=0x0004}
0x4e24…4e48 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0032, t01=0x0018}
0x4e48…4e5c Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0032, t01=0x003c}
0x4e5c…4e68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0050}
0x4e68…4e72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x005c}
0x4e72…4e88 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0032, t01=0x0066}
0x4e88…4e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x007c}
0x4e92…4eca Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0032, t01=0x0086}
0x4eca…4f02 Head {h00=0x0034, h01=0x0050, text=»* * «, t00=0x0032, t01=0x00be}
0x4f02…4f3a Head {h00=0x0034, h01=0x0050, text=»* IOROUT PERFORM READ OR WRITE AND SEEK * «, t00=0x0032, t01=0x00f6}
0x4f3a…4f72 Head {h00=0x0034, h01=0x0050, text=»* IF NECESSARY * «, t00=0x0032, t01=0x012e}
0x4f72…4faa Head {h00=0x0034, h01=0x0050, text=»* * «, t00=0x0032, t01=0x0166}
0x4faa…4fe2 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0033, t01=0x000e}
0x4fe2…4fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0046}
0x4fec…5016 Head {h00=0x0026, h01=0x0050, text=»* INPUT : ONE DATA WORD AFTER CF«, t00=0x0033, t01=0x0050}
0x5016…5044 Head {h00=0x002a, h01=0x0050, text=»* BIT 0 :INDICATES DIRECT IO «, t00=0x0033, t01=0x007a}
0x5044…5078 Head {h00=0x0030, h01=0x0050, text=»* BIT 1 :INDICATES READ AFTER WRITE«, t00=0x0033, t01=0x00a8}
0x5078…50a6 Head {h00=0x002a, h01=0x0050, text=»* BIT 2 :INDICATES FORMAT A2 «, t00=0x0033, t01=0x00dc}
0x50a6…50d4 Head {h00=0x002a, h01=0x0050, text=»* BIT 8-11:NUMBER OF WORDS/16«, t00=0x0033, t01=0x010a}
0x50d4…510a Head {h00=0x0032, h01=0x0050, text=»* BIT12-15:START IN DRIVER BUFFER/32 «, t00=0x0033, t01=0x0138}
0x510a…514a Head {h00=0x003c, h01=0x0050, text=»* AFTER SEEK THE CYLINDER ID WILL BE CHECKED BY A READ«, t00=0x0033, t01=0x016e}
0x514a…518e Head {h00=0x0040, h01=0x0050, text=»* DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER «, t00=0x0034, t01=0x001e}
0x518e…51b8 Head {h00=0x0026, h01=0x0050, text=»* DWTRTY INDICATES RETRIES DONE «, t00=0x0034, t01=0x0062}
0x51b8…5204 Head {h00=0x0048, h01=0x0050, text=»* DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER«, t00=0x0034, t01=0x008c}
0x5204…520e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00d8}
0x520e…5222 Head {h00=0x0010, h01=0x0050, text=»IOROUT EQU *«, t00=0x0034, t01=0x00e2}
0x5222…5250 Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0034, t01=0x00f6}
0x5250…5276 Head {h00=0x0022, h01=0x0050, text=» SRL A3,5 GET CYLINDER NUMBER «, t00=0x0034, t01=0x0124}
0x5276…5280 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x014a}
0x5280…529c Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0034, t01=0x0154}
0x529c…52be Head {h00=0x001e, h01=0x0050, text=» LD* A4,4,A5 GET DATA WORD«, t00=0x0034, t01=0x0170}
0x52be…52d0 (53, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SLL A4,2 «, t00=0x0035, t01=0x0004}
0x52d0…52f0 Head {h00=0x001c, h01=0x0050, text=» RF(NN) SEE:05 FORMAT A3«, t00=0x0035, t01=0x0016}
0x52f0…5302 Head {h00=0x000e, h01=0x0050, text=» ADK A3,0 «, t00=0x0035, t01=0x0036}
0x5302…530e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0048}
0x530e…5318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0054}
0x5318…532e Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0035, t01=0x005e}
0x532e…5338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0074}
0x5338…5342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x007e}
0x5342…5358 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0035, t01=0x0088}
0x5358…537e Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SEE:05 NOT CYLINDER 0 «, t00=0x0035, t01=0x009e}
0x537e…5392 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEKZ«, t00=0x0035, t01=0x00c4}
0x5392…53a4 Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0035, t01=0x00d8}
0x53a4…53c0 Head {h00=0x0018, h01=0x0050, text=» RF(N) SEE:20 ERROR «, t00=0x0035, t01=0x00ea}
0x53c0…53d6 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0035, t01=0x0106}
0x53d6…53ec Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0035, t01=0x011c}
0x53ec…5410 Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER ZERO «, t00=0x0035, t01=0x0132}
0x5410…5422 Head {h00=0x000e, h01=0x0050, text=» RF VA2BR «, t00=0x0035, t01=0x0156}
0x5422…542e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0168}
0x542e…5444 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0035, t01=0x0174}
0x5444…545a Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0035, t01=0x018a}
0x545a…5470 Head {h00=0x0012, h01=0x0050, text=» CM DWTCYL,A6 «, t00=0x0036, t01=0x0010}
0x5470…5482 Head {h00=0x000e, h01=0x0050, text=» RF VA2BR «, t00=0x0036, t01=0x0026}
0x5482…548e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0038}
0x548e…5498 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0044}
0x5498…54ae Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0036, t01=0x004e}
0x54ae…54b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0064}
0x54b8…54c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x006e}
0x54c2…54d6 Head {h00=0x0010, h01=0x0050, text=»SEE:05 EQU *«, t00=0x0036, t01=0x0078}
0x54d6…54ec Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0036, t01=0x008c}
0x54ec…5502 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0036, t01=0x00a2}
0x5502…5530 Head {h00=0x002a, h01=0x0050, text=» CW A3,DWTCYL,A2 COMPARE WITH PRESENT «, t00=0x0036, t01=0x00b8}
0x5530…553c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00e6}
0x553c…5552 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0036, t01=0x00f2}
0x5552…556a Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A6«, t00=0x0036, t01=0x0108}
0x556a…5576 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0120}
0x5576…5580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x012c}
0x5580…5596 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0036, t01=0x0136}
0x5596…55ac Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0036, t01=0x014c}
0x55ac…55c2 Head {h00=0x0012, h01=0x0050, text=» RF(E) VA2:00 «, t00=0x0036, t01=0x0162}
0x55c2…55ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0178}
0x55ce…55d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0184}
0x55d8…55ee Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0036, t01=0x018e}
0x55ee…5604 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0037, t01=0x0014}
0x5604…562a Head {h00=0x0022, h01=0x0050, text=» RF(E) SEE:90 HEAD IN POSITION«, t00=0x0037, t01=0x002a}
0x562a…5636 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0050}
0x5636…5640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x005c}
0x5640…565c Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0037, t01=0x0066}
0x565c…5684 Head {h00=0x0024, h01=0x0050, text=» RF(NE) SEE:07 NOT SAME CYLINDER«, t00=0x0037, t01=0x0082}
0x5684…5696 Head {h00=0x000e, h01=0x0050, text=» ADK A4,0 «, t00=0x0037, t01=0x00aa}
0x5696…56b4 Head {h00=0x001a, h01=0x0050, text=» RF(N) VA2BR FORMAT A2«, t00=0x0037, t01=0x00bc}
0x56b4…56c6 Head {h00=0x000e, h01=0x0050, text=» RF SEE:90«, t00=0x0037, t01=0x00da}
0x56c6…56d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00ec}
0x56d0…56e6 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0037, t01=0x00f6}
0x56e6…56f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x010c}
0x56f0…56fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0116}
0x56fa…570e Head {h00=0x0010, h01=0x0050, text=»SEE:07 EQU *«, t00=0x0037, t01=0x0120}
0x570e…571a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0134}
0x571a…5724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0140}
0x5724…573a Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0037, t01=0x014a}
0x573a…5766 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTCYL,A6 NEW CYLINDER NUMBER«, t00=0x0037, t01=0x0160}
0x5766…5772 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x018c}
0x5772…577c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0008}
0x577c…5792 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0038, t01=0x0012}
0x5792…57b8 Head {h00=0x0022, h01=0x0050, text=» ST A3,DWTCYL,A2 NEW CYLINDER «, t00=0x0038, t01=0x0028}
0x57b8…57c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x004e}
0x57c4…57ec Head {h00=0x0024, h01=0x0050, text=» LDK A4,QRETRY NUMBER OF RETRIES«, t00=0x0038, t01=0x005a}
0x57ec…5800 Head {h00=0x0010, h01=0x0050, text=»SEE:10 EQU *«, t00=0x0038, t01=0x0082}
0x5800…5816 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0038, t01=0x0096}
0x5816…583e Head {h00=0x0024, h01=0x0050, text=» CF A5,INXUNI DOUBLED UNIT INDEX«, t00=0x0038, t01=0x00ac}
0x583e…584a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00d4}
0x584a…585e Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEK «, t00=0x0038, t01=0x00e0}
0x585e…587c Head {h00=0x001a, h01=0x0050, text=» SLC A1,5 RETURN CODE «, t00=0x0038, t01=0x00f4}
0x587c…5894 Head {h00=0x0014, h01=0x0050, text=» RF(N) SEE:30 OK«, t00=0x0038, t01=0x0112}
0x5894…589e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x012a}
0x589e…58b4 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0038, t01=0x0134}
0x58b4…58be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x014a}
0x58be…58c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0154}
0x58c8…58dc Head {h00=0x0010, h01=0x0050, text=»SEE:15 EQU *«, t00=0x0038, t01=0x015e}
0x58dc…58fe Head {h00=0x001e, h01=0x0050, text=» CF A5,SEEKZ SEEK CYL ZERO«, t00=0x0038, t01=0x0172}
0x58fe…591c (57, 0, 400) Head {h00=0x001a, h01=0x0050, text=» SLC A1,6 RETURN CODE «, t00=0x0039, t01=0x0004}
0x591c…5938 Head {h00=0x0018, h01=0x0050, text=» RF(N) SEE:20 ERROR «, t00=0x0039, t01=0x0022}
0x5938…595c Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0039, t01=0x003e}
0x595c…597c Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x0039, t01=0x0062}
0x597c…599c Head {h00=0x001c, h01=0x0050, text=» RB(NZ) SEE:10 TRY AGAIN«, t00=0x0039, t01=0x0082}
0x599c…59b0 Head {h00=0x0010, h01=0x0050, text=»SEE:20 EQU *«, t00=0x0039, t01=0x00a2}
0x59b0…59c6 Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFF«, t00=0x0039, t01=0x00b6}
0x59c6…59dc Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0039, t01=0x00cc}
0x59dc…59f2 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0039, t01=0x00e2}
0x59f2…5a20 Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTCYL,A2 DUMMY CYLINDER NUMBER«, t00=0x0039, t01=0x00f8}
0x5a20…5a2c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0126}
0x5a2c…5a42 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0039, t01=0x0132}
0x5a42…5a70 Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTCYL,A6 DUMMY CYLINDER NUMBER«, t00=0x0039, t01=0x0148}
0x5a70…5a7c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0176}
0x5a7c…5a9c Head {h00=0x001c, h01=0x0050, text=» LDK A1,/02 RETURN CODE «, t00=0x0039, t01=0x0182}
0x5a9c…5ab6 Head {h00=0x0016, h01=0x0050, text=» RF SEE:35 END IO «, t00=0x003a, t01=0x0012}
0x5ab6…5ac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x002c}
0x5ac0…5ad6 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x003a, t01=0x0036}
0x5ad6…5ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x004c}
0x5ae0…5aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0056}
0x5aea…5afe Head {h00=0x0010, h01=0x0050, text=»SEE:30 EQU *«, t00=0x003a, t01=0x0060}
0x5afe…5b14 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003a, t01=0x0074}
0x5b14…5b2a Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003a, t01=0x008a}
0x5b2a…5b36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x00a0}
0x5b36…5b52 Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x003a, t01=0x00ac}
0x5b52…5b74 Head {h00=0x001e, h01=0x0050, text=» LD* A1,4,A5 GET DATA WORD«, t00=0x003a, t01=0x00c8}
0x5b74…5b86 Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x003a, t01=0x00ea}
0x5b86…5ba6 Head {h00=0x001c, h01=0x0050, text=» RF(NN) SEE:31 FORMAT A3«, t00=0x003a, t01=0x00fc}
0x5ba6…5bb2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x011c}
0x5bb2…5bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0128}
0x5bbc…5bd2 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003a, t01=0x0132}
0x5bd2…5be8 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x003a, t01=0x0148}
0x5be8…5bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x015e}
0x5bf2…5bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0168}
0x5bfc…5c12 Head {h00=0x0012, h01=0x0050, text=»* FORMAT A2 «, t00=0x003a, t01=0x0172}
0x5c12…5c1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0188}
0x5c1c…5c2e (59, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003b, t01=0x0004}
0x5c2e…5c42 Head {h00=0x0010, h01=0x0050, text=» CF A5,SKEW «, t00=0x003b, t01=0x0016}
0x5c42…5c66 Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/8002 READ 2 WORDS «, t00=0x003b, t01=0x002a}
0x5c66…5c94 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER READ TO DRIVER BUFFER «, t00=0x003b, t01=0x004e}
0x5c94…5caa Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x003b, t01=0x007c}
0x5caa…5cca Head {h00=0x001c, h01=0x0050, text=» ANK A1,/1F ERROR CHECK «, t00=0x003b, t01=0x0092}
0x5cca…5ce0 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEE:32«, t00=0x003b, t01=0x00b2}
0x5ce0…5d00 Head {h00=0x001c, h01=0x0050, text=» LD A3,BUFFER GET CYL ID«, t00=0x003b, t01=0x00c8}
0x5d00…5d16 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003b, t01=0x00e8}
0x5d16…5d2c Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003b, t01=0x00fe}
0x5d2c…5d5c Head {h00=0x002c, h01=0x0050, text=» CW A3,DWTCYL,A2 CHECK IF SAME CYLINDER «, t00=0x003b, t01=0x0114}
0x5d5c…5d68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0144}
0x5d68…5d7e Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003b, t01=0x0150}
0x5d7e…5d94 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003b, t01=0x0166}
0x5d94…5dc4 Head {h00=0x002c, h01=0x0050, text=» CW A3,DWTCYL,A6 CHECK IF SAME CYLINDER «, t00=0x003b, t01=0x017c}
0x5dc4…5dd0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x001c}
0x5dd0…5de6 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003c, t01=0x0028}
0x5de6…5e0c Head {h00=0x0022, h01=0x0050, text=» RB(NE) SEE:15 NOT SAME CYL ID«, t00=0x003c, t01=0x003e}
0x5e0c…5e20 Head {h00=0x0010, h01=0x0050, text=»VA2BR EQU * «, t00=0x003c, t01=0x0064}
0x5e20…5e34 Head {h00=0x0010, h01=0x0050, text=» ABL VA2:00 «, t00=0x003c, t01=0x0078}
0x5e34…5e40 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x008c}
0x5e40…5e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0098}
0x5e4a…5e60 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003c, t01=0x00a2}
0x5e60…5e76 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x003c, t01=0x00b8}
0x5e76…5e80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00ce}
0x5e80…5e8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00d8}
0x5e8a…5ea0 Head {h00=0x0012, h01=0x0050, text=»* FORMAT A3 «, t00=0x003c, t01=0x00e2}
0x5ea0…5eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00f8}
0x5eaa…5ebe Head {h00=0x0010, h01=0x0050, text=»SEE:31 EQU *«, t00=0x003c, t01=0x0102}
0x5ebe…5ed4 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003c, t01=0x0116}
0x5ed4…5eec Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A2«, t00=0x003c, t01=0x012c}
0x5eec…5ef8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0144}
0x5ef8…5f0e Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003c, t01=0x0150}
0x5f0e…5f24 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003c, t01=0x0166}
0x5f24…5f3c Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A6«, t00=0x003c, t01=0x017c}
0x5f3c…5f48 (61, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0004}
0x5f48…5f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0010}
0x5f52…5f68 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003d, t01=0x001a}
0x5f68…5f8c Head {h00=0x0020, h01=0x0050, text=» SLL A3,5 GET SECTOR NUMBER «, t00=0x003d, t01=0x0030}
0x5f8c…5fb4 Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTBSE,A6 SAVE FOR BSELOD«, t00=0x003d, t01=0x0054}
0x5fb4…5fc6 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003d, t01=0x007c}
0x5fc6…5ff8 Head {h00=0x002e, h01=0x0050, text=» CF A5,SKEW TO READ SECTOR 0 OR 8 ON DISC «, t00=0x003d, t01=0x008e}
0x5ff8…602c Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x003d, t01=0x00c0}
0x602c…6040 Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x003d, t01=0x00f4}
0x6040…6076 Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTBSE,A6 GET SECTOR NUMBER FOR BSELOD «, t00=0x003d, t01=0x0108}
0x6076…609a Head {h00=0x0020, h01=0x0050, text=» ANK A1,/1F ERROR CODE CHECK«, t00=0x003d, t01=0x013e}
0x609a…60b0 Head {h00=0x0012, h01=0x0050, text=» CF A5,BSEL00 «, t00=0x003d, t01=0x0162}
0x60b0…60c8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) SEE:40 OK«, t00=0x003d, t01=0x0178}
0x60c8…60d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0190}
0x60d4…60de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x000c}
0x60de…60f2 Head {h00=0x0010, h01=0x0050, text=»SEE:32 EQU *«, t00=0x003e, t01=0x0016}
0x60f2…6116 Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x003e, t01=0x002a}
0x6116…6136 Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x003e, t01=0x004e}
0x6136…6152 Head {h00=0x0018, h01=0x0050, text=» RB(NZ) SEE:15 RETRY«, t00=0x003e, t01=0x006e}
0x6152…6166 Head {h00=0x0010, h01=0x0050, text=»SEE:35 EQU *«, t00=0x003e, t01=0x008a}
0x6166…617a Head {h00=0x0010, h01=0x0050, text=» ABL END:10 «, t00=0x003e, t01=0x009e}
0x617a…6184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00b2}
0x6184…619a Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003e, t01=0x00bc}
0x619a…61a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00d2}
0x61a4…61ba Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x003e, t01=0x00dc}
0x61ba…61c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00f2}
0x61c4…61ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00fc}
0x61ce…61e2 Head {h00=0x0010, h01=0x0050, text=»SEE:40 EQU *«, t00=0x003e, t01=0x0106}
0x61e2…61f8 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003e, t01=0x011a}
0x61f8…620e Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003e, t01=0x0130}
0x620e…623a Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x003e, t01=0x0146}
0x623a…6246 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0172}
0x6246…625c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003e, t01=0x017e}
0x625c…6272 (63, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003f, t01=0x0004}
0x6272…629e Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x003f, t01=0x001a}
0x629e…62aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0046}
0x62aa…62c0 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003f, t01=0x0052}
0x62c0…62f0 Head {h00=0x002c, h01=0x0050, text=» CW A3,BUFFER+PHSECL COMPARE WITH CYL ID«, t00=0x003f, t01=0x0068}
0x62f0…630c Head {h00=0x0018, h01=0x0050, text=» RB(NE) SEE:15 RETRY«, t00=0x003f, t01=0x0098}
0x630c…6316 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00b4}
0x6316…632c Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x003f, t01=0x00be}
0x632c…6336 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00d4}
0x6336…6358 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x003f, t01=0x00de}
0x6358…637a Head {h00=0x001e, h01=0x0050, text=»* * «, t00=0x003f, t01=0x0100}
0x637a…639c Head {h00=0x001e, h01=0x0050, text=»* READ AND WRITE * «, t00=0x003f, t01=0x0122}
0x639c…63be Head {h00=0x001e, h01=0x0050, text=»* FORMAT A3 * «, t00=0x003f, t01=0x0144}
0x63be…63e0 Head {h00=0x001e, h01=0x0050, text=»* * «, t00=0x003f, t01=0x0166}
0x63e0…6402 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x003f, t01=0x0188}
0x6402…640c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x001a}
0x640c…6420 Head {h00=0x0010, h01=0x0050, text=»SEE:90 EQU *«, t00=0x0040, t01=0x0024}
0x6420…6442 Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTOR,A6 GET ORDER «, t00=0x0040, t01=0x0038}
0x6442…6454 Head {h00=0x000e, h01=0x0050, text=» ANK A4,4 «, t00=0x0040, t01=0x005a}
0x6454…6474 Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ00 READ ORDER«, t00=0x0040, t01=0x006c}
0x6474…6488 Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x0040, t01=0x008c}
0x6488…64bc Head {h00=0x0030, h01=0x0050, text=» RF(N) WRIT20 WRITE DIRECT FROM USER BUFFER «, t00=0x0040, t01=0x00a0}
0x64bc…64ce Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0040, t01=0x00d4}
0x64ce…64e0 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0040, t01=0x00e6}
0x64e0…6506 Head {h00=0x0022, h01=0x0050, text=» RF(N) READWR READ AFTER WRITE«, t00=0x0040, t01=0x00f8}
0x6506…6512 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x011e}
0x6512…651c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x012a}
0x651c…6532 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0040, t01=0x0134}
0x6532…654a Head {h00=0x0014, h01=0x0050, text=» CWK A2,PHSECL «, t00=0x0040, t01=0x014a}
0x654a…6578 Head {h00=0x002a, h01=0x0050, text=» RF(E) WRIT10 WRITE FROM DRIVER BUFFER«, t00=0x0040, t01=0x0162}
0x6578…65ac Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x0040, t01=0x0190}
0x65ac…65d4 Head {h00=0x0024, h01=0x0050, text=» CF A5,REA:00 READ BEFORE WRITE «, t00=0x0041, t01=0x0034}
0x65d4…65de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x005c}
0x65de…65f4 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0041, t01=0x0066}
0x65f4…65fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x007c}
0x65fe…6608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0086}
0x6608…661c Head {h00=0x0010, h01=0x0050, text=»WRIT10 EQU *«, t00=0x0041, t01=0x0090}
0x661c…663e Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0041, t01=0x00a4}
0x663e…6650 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0041, t01=0x00c6}
0x6650…6680 Head {h00=0x002c, h01=0x0050, text=» ANK A4,/C0 GET NUMBER OF WORDS TO MOVE «, t00=0x0041, t01=0x00d8}
0x6680…6698 Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 BYTES «, t00=0x0041, t01=0x0108}
0x6698…66c6 Head {h00=0x002a, h01=0x0050, text=» ANK A2,/F BEG ADRESS IN DRIVER BUFFER«, t00=0x0041, t01=0x0120}
0x66c6…66d8 Head {h00=0x000e, h01=0x0050, text=» SLL A2,5 «, t00=0x0041, t01=0x014e}
0x66d8…6704 Head {h00=0x0028, h01=0x0050, text=» CF A5,MOVWRI MOVE TO DRIVER BUFFER «, t00=0x0041, t01=0x0160}
0x6704…671a Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0041, t01=0x018c}
0x671a…6730 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0042, t01=0x0012}
0x6730…675c Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0042, t01=0x0028}
0x675c…6768 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0054}
0x6768…677e Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0042, t01=0x0060}
0x677e…6794 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0042, t01=0x0076}
0x6794…67c0 Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0042, t01=0x008c}
0x67c0…67cc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x00b8}
0x67cc…67e2 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0042, t01=0x00c4}
0x67e2…6814 Head {h00=0x002e, h01=0x0050, text=» ST A2,BUFFER+PHSECL PUT IN DRIVER BUFFER «, t00=0x0042, t01=0x00da}
0x6814…684c Head {h00=0x0034, h01=0x0050, text=» IM DWTFBU,A6 INDICATE WRITE FROM DRIVER BUFFER «, t00=0x0042, t01=0x010c}
0x684c…687a Head {h00=0x002a, h01=0x0050, text=» CF A5,WRI:00 WRITE FROM DRIVER BUFFER«, t00=0x0042, t01=0x0144}
0x687a…688c Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0042, t01=0x0172}
0x688c…6896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0184}
0x6896…68ac Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0042, t01=0x018e}
0x68ac…68b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0014}
0x68b6…68c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x001e}
0x68c0…68d4 Head {h00=0x0010, h01=0x0050, text=»WRIT20 EQU *«, t00=0x0043, t01=0x0028}
0x68d4…68ea Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0043, t01=0x003c}
0x68ea…6918 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,PHSECL PHYSICAL SECTOR LENGTH«, t00=0x0043, t01=0x0052}
0x6918…694c Head {h00=0x0030, h01=0x0050, text=» ADS A2,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0043, t01=0x0080}
0x694c…697e Head {h00=0x002e, h01=0x0050, text=» LD* A4,DWTUBU,A6 GET WORD IN USER BUFFER «, t00=0x0043, t01=0x00b4}
0x697e…69a0 Head {h00=0x001e, h01=0x0050, text=» ST A4,DWTSWD,A6 SAVE WORD«, t00=0x0043, t01=0x00e6}
0x69a0…69ca Head {h00=0x0026, h01=0x0050, text=» IM DWTFSW,A6 INDICATE SAVED WORD «, t00=0x0043, t01=0x0108}
0x69ca…69e0 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0043, t01=0x0132}
0x69e0…69f6 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0043, t01=0x0148}
0x69f6…6a22 Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0043, t01=0x015e}
0x6a22…6a4e Head {h00=0x0028, h01=0x0050, text=» ST* A2,DWTUBU,A6 PUT IN USER BUFFER«, t00=0x0043, t01=0x018a}
0x6a4e…6a5a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0026}
0x6a5a…6a70 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0044, t01=0x0032}
0x6a70…6a86 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0044, t01=0x0048}
0x6a86…6a9c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0044, t01=0x005e}
0x6a9c…6ab4 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTCYL,A6«, t00=0x0044, t01=0x0074}
0x6ab4…6ae0 Head {h00=0x0028, h01=0x0050, text=» ST* A2,DWTUBU,A6 PUT IN USER BUFFER«, t00=0x0044, t01=0x008c}
0x6ae0…6aec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00b8}
0x6aec…6af6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00c4}
0x6af6…6b0c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0044, t01=0x00ce}
0x6b0c…6b22 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0044, t01=0x00e4}
0x6b22…6b38 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0044, t01=0x00fa}
0x6b38…6b4e Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0044, t01=0x0110}
0x6b4e…6b7a Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0044, t01=0x0126}
0x6b7a…6b86 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0152}
0x6b86…6b9c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0044, t01=0x015e}
0x6b9c…6bb2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0044, t01=0x0174}
0x6bb2…6bc8 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0044, t01=0x018a}
0x6bc8…6bf4 Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0045, t01=0x0010}
0x6bf4…6c00 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x003c}
0x6c00…6c16 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0045, t01=0x0048}
0x6c16…6c2c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0045, t01=0x005e}
0x6c2c…6c60 Head {h00=0x0030, h01=0x0050, text=» ML 2,DWTBA1,A6 GET PHYSICAL BUFFER ADDRESS «, t00=0x0045, t01=0x0074}
0x6c60…6c82 Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRIT30 SYSTEM AREA «, t00=0x0045, t01=0x00a8}
0x6c82…6cae Head {h00=0x0028, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS ON STACK «, t00=0x0045, t01=0x00ca}
0x6cae…6cda Head {h00=0x0028, h01=0x0050, text=» TL DWTPAG,A6 LOAD PAGE WITH CYL ID «, t00=0x0045, t01=0x00f6}
0x6cda…6d0e Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL BUFFER POINTER «, t00=0x0045, t01=0x0122}
0x6d0e…6d38 Head {h00=0x0026, h01=0x0050, text=» EL A3,PHSECL,A2 GET WORD TO SAVE «, t00=0x0045, t01=0x0156}
0x6d38…6d68 Head {h00=0x002c, h01=0x0050, text=» ES A4,PHSECL,A2 PUT CYL ID IN POSITION «, t00=0x0045, t01=0x0180}
0x6d68…6d8a Head {h00=0x001e, h01=0x0050, text=» TL -30,A15 GET REGISTERS «, t00=0x0046, t01=0x0020}
0x6d8a…6d9c Head {h00=0x000e, h01=0x0050, text=» RF WRIT40«, t00=0x0046, t01=0x0042}
0x6d9c…6db0 Head {h00=0x0010, h01=0x0050, text=»WRIT30 EQU *«, t00=0x0046, t01=0x0054}
0x6db0…6dce Head {h00=0x001a, h01=0x0050, text=» SLL A2,1 BYTE ADDRESS«, t00=0x0046, t01=0x0068}
0x6dce…6dfc Head {h00=0x002a, h01=0x0050, text=» LD A3,PHSECL,A2 GET WORD TO BE SAVED «, t00=0x0046, t01=0x0086}
0x6dfc…6e28 Head {h00=0x0028, h01=0x0050, text=» ST A4,PHSECL,A2 CYL ID IN POSITION «, t00=0x0046, t01=0x00b4}
0x6e28…6e3c Head {h00=0x0010, h01=0x0050, text=»WRIT40 EQU *«, t00=0x0046, t01=0x00e0}
0x6e3c…6e5e Head {h00=0x001e, h01=0x0050, text=» ST A3,DWTSWD,A6 SAVA WORD«, t00=0x0046, t01=0x00f4}
0x6e5e…6e88 Head {h00=0x0026, h01=0x0050, text=» IM DWTFSW,A6 INDICATE SAVED WORD «, t00=0x0046, t01=0x0116}
0x6e88…6e94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0140}
0x6e94…6e9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x014c}
0x6e9e…6eb4 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0046, t01=0x0156}
0x6eb4…6eea Head {h00=0x0032, h01=0x0050, text=» CM DWTFBU,A6 INDICATE WRITE FROM USER BUFFER «, t00=0x0046, t01=0x016c}
0x6eea…6f1e Head {h00=0x0030, h01=0x0050, text=» CF A5,WRI:00 WRITE SECTOR FROM USER BUFFER «, t00=0x0047, t01=0x0012}
0x6f1e…6f50 Head {h00=0x002e, h01=0x0050, text=» CF A5,REWORD RESTORE WORD TO USER BUFFER «, t00=0x0047, t01=0x0046}
0x6f50…6f62 Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0047, t01=0x0078}
0x6f62…6f6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x008a}
0x6f6c…6f82 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0047, t01=0x0094}
0x6f82…6f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00aa}
0x6f8c…6f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00b4}
0x6f96…6fa8 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0047, t01=0x00be}
0x6fa8…6fbc Head {h00=0x0010, h01=0x0050, text=»READWR EQU *«, t00=0x0047, t01=0x00d0}
0x6fbc…6fe2 Head {h00=0x0022, h01=0x0050, text=» CF A5,REA:10 READ AFTER WRITE«, t00=0x0047, t01=0x00e4}
0x6fe2…6ff4 Head {h00=0x000e, h01=0x0050, text=» RF SEE:97«, t00=0x0047, t01=0x010a}
0x6ff4…7000 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x011c}
0x7000…700a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0128}
0x700a…7020 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0047, t01=0x0132}
0x7020…7034 Head {h00=0x0010, h01=0x0050, text=»READ00 EQU *«, t00=0x0047, t01=0x0148}
0x7034…7056 Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0047, t01=0x015c}
0x7056…7078 Head {h00=0x001e, h01=0x0050, text=» RF(N) READ20 DIRECT READ «, t00=0x0047, t01=0x017e}
0x7078…70ac Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x0048, t01=0x0010}
0x70ac…70d8 Head {h00=0x0028, h01=0x0050, text=» CF A5,REA:00 READ TO DRIVER BUFFER «, t00=0x0048, t01=0x0044}
0x70d8…70fa Head {h00=0x001e, h01=0x0050, text=» LD* A1,4,A5 GET DATA WORD«, t00=0x0048, t01=0x0070}
0x70fa…710c Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0048, t01=0x0092}
0x710c…711e Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0048, t01=0x00a4}
0x711e…7154 Head {h00=0x0032, h01=0x0050, text=» ANKL A4,/180 GET NUMBER OF BYTES TO BE MOVED «, t00=0x0048, t01=0x00b6}
0x7154…7174 Head {h00=0x001c, h01=0x0050, text=» ANK A1,/18 GET POSITION«, t00=0x0048, t01=0x00ec}
0x7174…7186 Head {h00=0x000e, h01=0x0050, text=» SLL A1,4 «, t00=0x0048, t01=0x010c}
0x7186…719c Head {h00=0x0012, h01=0x0050, text=» CF A5,MOVRED «, t00=0x0048, t01=0x011e}
0x719c…71ae Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0048, t01=0x0134}
0x71ae…71c2 Head {h00=0x0010, h01=0x0050, text=»READ20 EQU *«, t00=0x0048, t01=0x0146}
0x71c2…71d8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0048, t01=0x015a}
0x71d8…71f0 Head {h00=0x0014, h01=0x0050, text=» LDKL A3,PHSECL «, t00=0x0048, t01=0x0170}
0x71f0…7224 Head {h00=0x0030, h01=0x0050, text=» ADS A3,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0048, t01=0x0188}
0x7224…7230 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x002c}
0x7230…723a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0038}
0x723a…7250 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0049, t01=0x0042}
0x7250…7282 Head {h00=0x002e, h01=0x0050, text=» CM DWTFBU,A6 INDICATE READ TO USER BUFFER«, t00=0x0049, t01=0x0058}
0x7282…72ac Head {h00=0x0026, h01=0x0050, text=» CF A5,REA:00 READ TO USER BUFFER «, t00=0x0049, t01=0x008a}
0x72ac…72c0 Head {h00=0x0010, h01=0x0050, text=»SEE:95 EQU *«, t00=0x0049, t01=0x00b4}
0x72c0…72ee Head {h00=0x002a, h01=0x0050, text=» IMR A6 UPDATE PHYSICAL SECTOR POINTER«, t00=0x0049, t01=0x00c8}
0x72ee…72fa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x00f6}
0x72fa…7304 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0102}
0x7304…731a Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0049, t01=0x010c}
0x731a…7324 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0122}
0x7324…732e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x012c}
0x732e…7342 Head {h00=0x0010, h01=0x0050, text=»SEE:96 EQU *«, t00=0x0049, t01=0x0136}
0x7342…7364 Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0049, t01=0x014a}
0x7364…737e Head {h00=0x0016, h01=0x0050, text=» ANK A2,/C0 LENGTH«, t00=0x0049, t01=0x016c}
0x737e…7390 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0049, t01=0x0186}
0x7390…73b6 Head {h00=0x0022, h01=0x0050, text=» ADS A2,ECBEL,A8 UPDATE ECBEL «, t00=0x004a, t01=0x0008}
0x73b6…73c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x002e}
0x73c0…73d6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004a, t01=0x0038}
0x73d6…73e8 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x004a, t01=0x004e}
0x73e8…7404 Head {h00=0x0018, h01=0x0050, text=» SRL A2,1 WORD MODE «, t00=0x004a, t01=0x0060}
0x7404…7438 Head {h00=0x0030, h01=0x0050, text=» DA DWTBA1,A6 UPDATE PHYSICAL BUFFER ADDRESS«, t00=0x004a, t01=0x007c}
0x7438…7462 Head {h00=0x0026, h01=0x0050, text=» CF A5,MMULOG GET LOGICAL ADDRESS «, t00=0x004a, t01=0x00b0}
0x7462…746e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00da}
0x746e…7478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00e6}
0x7478…748c Head {h00=0x0010, h01=0x0050, text=»SEE:97 EQU *«, t00=0x004a, t01=0x00f0}
0x748c…74ac Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 UPDATE RETURN «, t00=0x004a, t01=0x0104}
0x74ac…74c0 Head {h00=0x0010, h01=0x0050, text=» ADS A1,4,A5«, t00=0x004a, t01=0x0124}
0x74c0…74d0 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x004a, t01=0x0138}
0x74d0…74da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0148}
0x74da…74f0 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x004a, t01=0x0152}
0x74f0…74fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0168}
0x74fa…7510 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004a, t01=0x0172}
0x7510…751a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0188}
0x751a…7524 (75, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0004}
0x7524…754c Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x004b, t01=0x000e}
0x754c…7574 Head {h00=0x0024, h01=0x0050, text=»* *«, t00=0x004b, t01=0x0036}
0x7574…759c Head {h00=0x0024, h01=0x0050, text=»* DISC FORMAT A2 *«, t00=0x004b, t01=0x005e}
0x759c…75c4 Head {h00=0x0024, h01=0x0050, text=»* *«, t00=0x004b, t01=0x0086}
0x75c4…75ec Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x004b, t01=0x00ae}
0x75ec…75f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00d6}
0x75f6…7600 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00e0}
0x7600…7614 Head {h00=0x0010, h01=0x0050, text=»VA2:00 EQU *«, t00=0x004b, t01=0x00ea}
0x7614…7632 Head {h00=0x001a, h01=0x0050, text=» LDK A4,QRETRY RETRIES«, t00=0x004b, t01=0x00fe}
0x7632…7646 Head {h00=0x0010, h01=0x0050, text=»VA2:10 EQU *«, t00=0x004b, t01=0x011c}
0x7646…765c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x004b, t01=0x0130}
0x765c…7672 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x004b, t01=0x0146}
0x7672…767e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x015c}
0x767e…7694 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004b, t01=0x0168}
0x7694…76bc Head {h00=0x0024, h01=0x0050, text=» CF A5,INLACE INTERLACE AND SKEW«, t00=0x004b, t01=0x017e}
0x76bc…76c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0016}
0x76c6…76dc Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004c, t01=0x0020}
0x76dc…76fa Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8080 1ST WER«, t00=0x004c, t01=0x0036}
0x76fa…770c Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x004c, t01=0x0054}
0x770c…7720 Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x004c, t01=0x0066}
0x7720…7732 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004c, t01=0x007a}
0x7732…775e Head {h00=0x0028, h01=0x0050, text=» RF(NN) VA2:20 NOT READ AFTER WRITE «, t00=0x004c, t01=0x008c}
0x775e…7776 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x004c, t01=0x00b8}
0x7776…7788 Head {h00=0x000e, h01=0x0050, text=» RF VA2:35«, t00=0x004c, t01=0x00d0}
0x7788…779c Head {h00=0x0010, h01=0x0050, text=»VA2:20 EQU *«, t00=0x004c, t01=0x00e2}
0x779c…77a8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x00f6}
0x77a8…77b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0102}
0x77b2…77c8 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004c, t01=0x010c}
0x77c8…77de Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004c, t01=0x0122}
0x77de…7804 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0808 1ST WER SHIFTED«, t00=0x004c, t01=0x0138}
0x7804…7810 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x015e}
0x7810…781a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x016a}
0x781a…7830 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004c, t01=0x0174}
0x7830…7842 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x004c, t01=0x018a}
0x7842…7858 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004d, t01=0x000c}
0x7858…786c Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x004d, t01=0x0022}
0x786c…787e Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004d, t01=0x0036}
0x787e…78aa Head {h00=0x0028, h01=0x0050, text=» RF(NN) VA2:20 NOT READ AFTER WRITE «, t00=0x004d, t01=0x0048}
0x78aa…78c0 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8080«, t00=0x004d, t01=0x0074}
0x78c0…78d8 Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x004d, t01=0x008a}
0x78d8…78ea Head {h00=0x000e, h01=0x0050, text=» RF VA2:35«, t00=0x004d, t01=0x00a2}
0x78ea…78fe Head {h00=0x0010, h01=0x0050, text=»VA2:20 EQU *«, t00=0x004d, t01=0x00b4}
0x78fe…790a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x00c8}
0x790a…7914 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00d4}
0x7914…792a Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004d, t01=0x00de}
0x792a…794c Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x004d, t01=0x00f4}
0x794c…795e Head {h00=0x000e, h01=0x0050, text=» ANK A2,4 «, t00=0x004d, t01=0x0116}
0x795e…7978 Head {h00=0x0016, h01=0x0050, text=» RF(Z) VA2:30 READ«, t00=0x004d, t01=0x0128}
0x7978…7982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0142}
0x7982…7998 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004d, t01=0x014c}
0x7998…79ae Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C080«, t00=0x004d, t01=0x0162}
0x79ae…79ba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0178}
0x79ba…79c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0184}
0x79c4…79da Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004d, t01=0x018e}
0x79da…79f0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004e, t01=0x0014}
0x79f0…7a16 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/080C 1ST WER SHIFTED«, t00=0x004e, t01=0x002a}
0x7a16…7a22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0050}
0x7a22…7a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x005c}
0x7a2c…7a42 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x0066}
0x7a42…7a68 Head {h00=0x0022, h01=0x0050, text=» ADK A3,1 ORDER CODE FOR WRITE«, t00=0x004e, t01=0x007c}
0x7a68…7a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00a2}
0x7a72…7a88 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x004e, t01=0x00ac}
0x7a88…7a92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00c2}
0x7a92…7a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00cc}
0x7a9c…7ab0 Head {h00=0x0010, h01=0x0050, text=»VA2:30 EQU *«, t00=0x004e, t01=0x00d6}
0x7ab0…7aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00ea}
0x7aba…7ad0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004e, t01=0x00f4}
0x7ad0…7af0 Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTUBU,A6 2ND WER«, t00=0x004e, t01=0x010a}
0x7af0…7afc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x012a}
0x7afc…7b06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0136}
0x7b06…7b1c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x0140}
0x7b1c…7b32 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004e, t01=0x0156}
0x7b32…7b44 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x004e, t01=0x016c}
0x7b44…7b5a Head {h00=0x0012, h01=0x0050, text=» DA DWTBA1,A6 «, t00=0x004e, t01=0x017e}
0x7b5a…7b80 (79, 0, 400) Head {h00=0x0022, h01=0x0050, text=» SRC A1,4 1ST WER IN POSITION «, t00=0x004f, t01=0x0004}
0x7b80…7ba6 Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 2ND WER IN POSITION «, t00=0x004f, t01=0x002a}
0x7ba6…7bb2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x0050}
0x7bb2…7bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x005c}
0x7bbc…7bd2 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004f, t01=0x0066}
0x7bd2…7be6 Head {h00=0x0010, h01=0x0050, text=»VA2:35 EQU *«, t00=0x004f, t01=0x007c}
0x7be6…7bfc Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x004f, t01=0x0090}
0x7bfc…7c10 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x004f, t01=0x00a6}
0x7c10…7c2e Head {h00=0x001a, h01=0x0050, text=» RF(Z) VA2:40 IO ERROR«, t00=0x004f, t01=0x00ba}
0x7c2e…7c44 Head {h00=0x0012, h01=0x0050, text=» IM DWTRTY,A6 «, t00=0x004f, t01=0x00d8}
0x7c44…7c56 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x004f, t01=0x00ee}
0x7c56…7c72 Head {h00=0x0018, h01=0x0050, text=» RB(NZ) VA2:10 RETRY«, t00=0x004f, t01=0x0100}
0x7c72…7c8a Head {h00=0x0014, h01=0x0050, text=» RF WRI:50 ERROR«, t00=0x004f, t01=0x011c}
0x7c8a…7c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0134}
0x7c94…7caa Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x004f, t01=0x013e}
0x7caa…7cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0154}
0x7cb4…7cbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x015e}
0x7cbe…7cd2 Head {h00=0x0010, h01=0x0050, text=»VA2:40 EQU *«, t00=0x004f, t01=0x0168}
0x7cd2…7d00 Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x004f, t01=0x017c}
0x7d00…7d1e Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 NEXT SECTOR «, t00=0x0050, t01=0x001a}
0x7d1e…7d30 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0050, t01=0x0038}
0x7d30…7d42 Head {h00=0x000e, h01=0x0050, text=» CWK A2,31«, t00=0x0050, t01=0x004a}
0x7d42…7d68 Head {h00=0x0022, h01=0x0050, text=» RF(NE) VA2:50 NOT CYLINDER 0 «, t00=0x0050, t01=0x005c}
0x7d68…7d92 Head {h00=0x0026, h01=0x0050, text=» ADK A3,2 CYLINDER 0 TO CYLINDER 1«, t00=0x0050, t01=0x0082}
0x7d92…7da6 Head {h00=0x0010, h01=0x0050, text=»VA2:50 EQU *«, t00=0x0050, t01=0x00ac}
0x7da6…7dba Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x0050, t01=0x00c0}
0x7dba…7dde Head {h00=0x0020, h01=0x0050, text=» RF(NZ) VA2:60 SAME CYLINDER«, t00=0x0050, t01=0x00d4}
0x7dde…7dfc Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 NEW CYLINDER«, t00=0x0050, t01=0x00f8}
0x7dfc…7e10 Head {h00=0x0010, h01=0x0050, text=»VA2:60 EQU *«, t00=0x0050, t01=0x0116}
0x7e10…7e3a Head {h00=0x0026, h01=0x0050, text=» STR A3,A6 PHYSICAL SECTOR NUMBER «, t00=0x0050, t01=0x012a}
0x7e3a…7e4c Head {h00=0x000e, h01=0x0050, text=» RB SEE:96«, t00=0x0050, t01=0x0154}
0x7e4c…7e58 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0050, t01=0x0166}
0x7e58…7e62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0172}
0x7e62…7e78 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0050, t01=0x017c}
0x7e78…7e8e (81, 0, 400) Head {h00=0x0012, h01=0x000e, text=» EJECT DRDU01«, t00=0x0051, t01=0x0004}
0x7e8e…7e98 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0051, t01=0x001a}
0x7e98…7ebc Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0051, t01=0x0024}
0x7ebc…7ee0 Head {h00=0x0020, h01=0x0050, text=»* *«, t00=0x0051, t01=0x0048}
0x7ee0…7f04 Head {h00=0x0020, h01=0x0050, text=»* SUBROUTINES FOR WRITE *«, t00=0x0051, t01=0x006c}
0x7f04…7f28 Head {h00=0x0020, h01=0x0050, text=»* FROM USER BUFFER: *«, t00=0x0051, t01=0x0090}
0x7f28…7f4c Head {h00=0x0020, h01=0x0050, text=»* FROM DRIVER : *«, t00=0x0051, t01=0x00b4}
0x7f4c…7f70 Head {h00=0x0020, h01=0x0050, text=»* *«, t00=0x0051, t01=0x00d8}
0x7f70…7f94 Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0051, t01=0x00fc}
0x7f94…7f9e Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0051, t01=0x0120}
0x7f9e…7fb2 Head {h00=0x0010, h01=0x0050, text=»WRI:00 EQU *«, t00=0x0051, t01=0x012a}
0x7fb2…7fd0 Head {h00=0x001a, h01=0x0016, text=» LDK A4,QRETRY RETRIES«, t00=0x0051, t01=0x013e}
0x7fd0…7fe4 Head {h00=0x0010, h01=0x0050, text=»WRI:20 EQU *«, t00=0x0051, t01=0x015c}
0x7fe4…7ffa Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0051, t01=0x0170}
0x7ffa…8010 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0051, t01=0x0186}
0x8010…801c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x000c}
0x801c…8032 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0052, t01=0x0018}
0x8032…8060 Head {h00=0x002a, h01=0x0050, text=» CF A5,INLACE INTERLACE SECTOR NUMBER «, t00=0x0052, t01=0x002e}
0x8060…8078 Head {h00=0x0014, h01=0x0010, text=» CF A5,WRITE CIO«, t00=0x0052, t01=0x005c}
0x8078…809a Head {h00=0x001e, h01=0x0019, text=» ANK A1,/1F RETURN CODE ? «, t00=0x0052, t01=0x0074}
0x809a…80b0 Head {h00=0x0012, h01=0x0050, text=» CF A5,BSELOD «, t00=0x0052, t01=0x0096}
0x80b0…80d4 Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRI:80 NO RETURN CODE«, t00=0x0052, t01=0x00ac}
0x80d4…80f8 Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0052, t01=0x00d0}
0x80f8…8122 Head {h00=0x0026, h01=0x0021, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0052, t01=0x00f4}
0x8122…8138 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) WRI:20«, t00=0x0052, t01=0x011e}
0x8138…8168 Head {h00=0x002c, h01=0x0050, text=» CF A5,REWORD RESTORE WORD IF NECESSARY «, t00=0x0052, t01=0x0134}
0x8168…8174 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0164}
0x8174…817e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0170}
0x817e…8192 Head {h00=0x0010, h01=0x0050, text=»WRI:50 EQU *«, t00=0x0052, t01=0x017a}
0x8192…81b2 Head {h00=0x001c, h01=0x0050, text=» ABL END:10 ERROR END IO«, t00=0x0052, t01=0x018e}
0x81b2…81bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x001e}
0x81bc…81d2 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0053, t01=0x0028}
0x81d2…81dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x003e}
0x81dc…81f0 Head {h00=0x0010, h01=0x0050, text=»WRI:80 EQU *«, t00=0x0053, t01=0x0048}
0x81f0…8200 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0053, t01=0x005c}
0x8200…820a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0053, t01=0x006c}
0x820a…8220 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0053, t01=0x0076}
0x8220…822a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x008c}
0x822a…8254 Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0053, t01=0x0096}
0x8254…827e Head {h00=0x0026, h01=0x0050, text=»* * «, t00=0x0053, t01=0x00c0}
0x827e…82a8 Head {h00=0x0026, h01=0x0050, text=»* SUBROUTINES FOR READ TO * «, t00=0x0053, t01=0x00ea}
0x82a8…82d2 Head {h00=0x0026, h01=0x0050, text=»* USER BUFFER : * «, t00=0x0053, t01=0x0114}
0x82d2…82fc Head {h00=0x0026, h01=0x0050, text=»* DRIVER BUFFER : * «, t00=0x0053, t01=0x013e}
0x82fc…8326 Head {h00=0x0026, h01=0x0050, text=»* * «, t00=0x0053, t01=0x0168}
0x8326…8350 (84, 0, 398) Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0054, t01=0x0004}
0x8350…835a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x002e}
0x835a…836e Head {h00=0x0010, h01=0x0050, text=»REA:00 EQU *«, t00=0x0054, t01=0x0038}
0x836e…8390 Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTOR,A6 GET INDEX «, t00=0x0054, t01=0x004c}
0x8390…83a6 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/300 «, t00=0x0054, t01=0x006e}
0x83a6…83c4 Head {h00=0x001a, h01=0x0050, text=» SLL A3,6 IN POSITION «, t00=0x0054, t01=0x0084}
0x83c4…83ea Head {h00=0x0022, h01=0x0050, text=» ORR* A3,A6 ADD SECTOR NUMBER «, t00=0x0054, t01=0x00a2}
0x83ea…8412 Head {h00=0x0024, h01=0x0050, text=» CW A3,DWTBSE,A6 ALLREADY READ ?«, t00=0x0054, t01=0x00c8}
0x8412…8428 Head {h00=0x0012, h01=0x0050, text=» RF(E) REA:85 «, t00=0x0054, t01=0x00f0}
0x8428…843c Head {h00=0x0010, h01=0x0050, text=»REA:10 EQU *«, t00=0x0054, t01=0x0106}
0x843c…8452 Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRETRY«, t00=0x0054, t01=0x011a}
0x8452…8466 Head {h00=0x0010, h01=0x0050, text=»REA:20 EQU *«, t00=0x0054, t01=0x0130}
0x8466…847c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0054, t01=0x0144}
0x847c…8492 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0054, t01=0x015a}
0x8492…849e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x0170}
0x849e…84b4 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0054, t01=0x017c}
0x84b4…84e2 (85, 0, 398) Head {h00=0x002a, h01=0x0050, text=» CF A5,INLACE INTERLACE SECTOR NUMBER «, t00=0x0055, t01=0x0004}
0x84e2…8502 Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ SECTOR «, t00=0x0055, t01=0x0032}
0x8502…8514 Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0055, t01=0x0052}
0x8514…8548 Head {h00=0x0030, h01=0x0050, text=» CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR«, t00=0x0055, t01=0x0064}
0x8548…856c Head {h00=0x0020, h01=0x0050, text=» RF(Z) REA:30 NO RETURN CODE«, t00=0x0055, t01=0x0098}
0x856c…8580 Head {h00=0x0010, h01=0x0050, text=»REA:25 EQU *«, t00=0x0055, t01=0x00bc}
0x8580…85a4 Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0055, t01=0x00d0}
0x85a4…85ce Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0055, t01=0x00f4}
0x85ce…85ea Head {h00=0x0018, h01=0x0050, text=» RB(NZ) REA:20 RETRY«, t00=0x0055, t01=0x011e}
0x85ea…85fe Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0055, t01=0x013a}
0x85fe…8608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x014e}
0x8608…861e Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0055, t01=0x0158}
0x861e…8628 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x016e}
0x8628…8632 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0178}
0x8632…8646 Head {h00=0x0010, h01=0x0050, text=»REA:30 EQU *«, t00=0x0055, t01=0x0182}
0x8646…865e Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0056, t01=0x0008}
0x865e…868a Head {h00=0x0028, h01=0x0050, text=» RF(NZ) REA:40 READ TO DRIVER BUFFER«, t00=0x0056, t01=0x0020}
0x868a…86a0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0056, t01=0x004c}
0x86a0…86da Head {h00=0x0036, h01=0x0050, text=» LD* A3,DWTUBU,A6 GET CYLINDER ID FROM USER BUFFER«, t00=0x0056, t01=0x0062}
0x86da…86ec Head {h00=0x000e, h01=0x0050, text=» RF REA:50«, t00=0x0056, t01=0x009c}
0x86ec…86f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x00ae}
0x86f8…8702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00ba}
0x8702…8718 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0056, t01=0x00c4}
0x8718…872e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0056, t01=0x00da}
0x872e…875a Head {h00=0x0028, h01=0x0050, text=» ML 2,DWTBA1,A6 GET PHYSICAL ADDRESS«, t00=0x0056, t01=0x00f0}
0x875a…877c Head {h00=0x001e, h01=0x0050, text=» RF(Z) REA:35 SYSTEM AREA «, t00=0x0056, t01=0x011c}
0x877c…879e Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x0056, t01=0x013e}
0x879e…87c0 Head {h00=0x001e, h01=0x0050, text=» TL DWTPAG,A6 LOAD MMUPAGE«, t00=0x0056, t01=0x0160}
0x87c0…87f4 Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTUBU,A6 GET LOGICAL BUFFER POINTER «, t00=0x0056, t01=0x0182}
0x87f4…8818 Head {h00=0x0020, h01=0x0050, text=» EL A3,PHSECL,A3 GET CYL ID «, t00=0x0057, t01=0x0026}
0x8818…883c Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x0057, t01=0x004a}
0x883c…884e Head {h00=0x000e, h01=0x0050, text=» RF REA:50«, t00=0x0057, t01=0x006e}
0x884e…8862 Head {h00=0x0010, h01=0x0050, text=»REA:35 EQU *«, t00=0x0057, t01=0x0080}
0x8862…8888 Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 ADDRESS TO BYTE MODE«, t00=0x0057, t01=0x0094}
0x8888…88ac Head {h00=0x0020, h01=0x0050, text=» LD A3,PHSECL,A2 GET CYL ID «, t00=0x0057, t01=0x00ba}
0x88ac…88be Head {h00=0x000e, h01=0x0050, text=» RF REA:50«, t00=0x0057, t01=0x00de}
0x88be…88ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00f0}
0x88ca…88d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00fc}
0x88d4…88ea Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0057, t01=0x0106}
0x88ea…88fe Head {h00=0x0010, h01=0x0050, text=»REA:40 EQU *«, t00=0x0057, t01=0x011c}
0x88fe…8926 Head {h00=0x0024, h01=0x0050, text=» LD A3,BUFFER+PHSECL GET CYL ID «, t00=0x0057, t01=0x0130}
0x8926…893a Head {h00=0x0010, h01=0x0050, text=»REA:50 EQU *«, t00=0x0057, t01=0x0158}
0x893a…8950 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0057, t01=0x016c}
0x8950…8966 Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0057, t01=0x0182}
0x8966…897e Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A2«, t00=0x0058, t01=0x0008}
0x897e…898a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0020}
0x898a…89a0 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0058, t01=0x002c}
0x89a0…89b6 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0058, t01=0x0042}
0x89b6…89ce Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A6«, t00=0x0058, t01=0x0058}
0x89ce…89da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0070}
0x89da…89f0 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0058, t01=0x007c}
0x89f0…8a18 Head {h00=0x0024, h01=0x0050, text=» RF(E) REA:90 RIGHT CYLINDER ID «, t00=0x0058, t01=0x0092}
0x8a18…8a34 Head {h00=0x0018, h01=0x0050, text=» LDK A1,2 SEEK ERROR«, t00=0x0058, t01=0x00ba}
0x8a34…8a3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00d6}
0x8a3e…8a54 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0058, t01=0x00e0}
0x8a54…8a5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00f6}
0x8a5e…8a68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0100}
0x8a68…8a7a Head {h00=0x000e, h01=0x0050, text=» RB REA:25«, t00=0x0058, t01=0x010a}
0x8a7a…8a8e Head {h00=0x0010, h01=0x0050, text=»REA:85 EQU *«, t00=0x0058, t01=0x011c}
0x8a8e…8aa6 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTFBU,A6«, t00=0x0058, t01=0x0130}
0x8aa6…8ad2 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) REA:90 READ TO DRIVER BUFFER«, t00=0x0058, t01=0x0148}
0x8ad2…8afa Head {h00=0x0024, h01=0x0050, text=» LDKL A4,/180 BYTES TO BE MOVED «, t00=0x0058, t01=0x0174}
0x8afa…8b10 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0059, t01=0x000c}
0x8b10…8b22 Head {h00=0x000e, h01=0x0050, text=» NGR A2,A4«, t00=0x0059, t01=0x0022}
0x8b22…8b66 Head {h00=0x0040, h01=0x0050, text=» ADS A2,DWTUBU,A6 RESET USER BUFFER POINTER FOR DIRECT MOVE «, t00=0x0059, t01=0x0034}
0x8b66…8b72 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0078}
0x8b72…8b88 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0059, t01=0x0084}
0x8b88…8bb2 Head {h00=0x0026, h01=0x0050, text=» CF A5,MOVRED MOVE TO USER BUFFER «, t00=0x0059, t01=0x009a}
0x8bb2…8bc6 Head {h00=0x0010, h01=0x0050, text=»REA:90 EQU *«, t00=0x0059, t01=0x00c4}
0x8bc6…8bd6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0059, t01=0x00d8}
0x8bd6…8be0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00e8}
0x8be0…8bf6 Head {h00=0x0012, h01=0x000e, text=» EJECT DRDU01«, t00=0x0059, t01=0x00f2}
0x8bf6…8c00 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x0108}
0x8c00…8c0a Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x0112}
0x8c0a…8c38 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0059, t01=0x011c}
0x8c38…8c66 Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0059, t01=0x014a}
0x8c66…8c94 Head {h00=0x002a, h01=0x0050, text=»* SUBROUTINES FOR MOVING WORDS * «, t00=0x0059, t01=0x0178}
0x8c94…8cbe Head {h00=0x0026, h01=0x0050, text=»* USER BUFFER TO DRIVER BUFFER: «, t00=0x005a, t01=0x0016}
0x8cbe…8cec Head {h00=0x002a, h01=0x0050, text=»* MOVWRI * «, t00=0x005a, t01=0x0040}
0x8cec…8d1a Head {h00=0x002a, h01=0x0050, text=»* DRIVER BUFFER TO USER BUFFER * «, t00=0x005a, t01=0x006e}
0x8d1a…8d48 Head {h00=0x002a, h01=0x0050, text=»* MOVRED * «, t00=0x005a, t01=0x009c}
0x8d48…8d76 Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x005a, t01=0x00ca}
0x8d76…8da4 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x005a, t01=0x00f8}
0x8da4…8dae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0126}
0x8dae…8dd0 Head {h00=0x001e, h01=0x001a, text=»* A1 BUFFER ADDRESS IN«, t00=0x005a, t01=0x0130}
0x8dd0…8df4 Head {h00=0x0020, h01=0x001b, text=»* A2 BUFFER ADDRESS OUT «, t00=0x005a, t01=0x0152}
0x8df4…8e12 Head {h00=0x001a, h01=0x0016, text=»* A4 BUFFER LENGTH«, t00=0x005a, t01=0x0176}
0x8e12…8e28 (91, 0, 400) Head {h00=0x0012, h01=0x000d, text=»* A3 USED «, t00=0x005b, t01=0x0004}
0x8e28…8e32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x001a}
0x8e32…8e46 Head {h00=0x0010, h01=0x0050, text=»MOVRED EQU *«, t00=0x005b, t01=0x0024}
0x8e46…8e5e Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFFER «, t00=0x005b, t01=0x0038}
0x8e5e…8e7a Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005b, t01=0x0050}
0x8e7a…8eb0 Head {h00=0x0032, h01=0x0050, text=» LD A2,DWTUBU,A6 PRESENT POINT IN USER BUFFER «, t00=0x005b, t01=0x006c}
0x8eb0…8ebc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00a2}
0x8ebc…8ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00ae}
0x8ec6…8edc Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005b, t01=0x00b8}
0x8edc…8ef8 Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+MMUPAG=0«, t00=0x005b, t01=0x00ce}
0x8ef8…8f0e Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x005b, t01=0x00ea}
0x8f0e…8f3e Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTUBU,A6 GET USER BUFFER POINTER«, t00=0x005b, t01=0x0100}
0x8f3e…8f72 Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005b, t01=0x0130}
0x8f72…8f82 Head {h00=0x000c, h01=0x0050, text=» MVB A4 «, t00=0x005b, t01=0x0164}
0x8f82…8f8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0174}
0x8f8e…8f98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0180}
0x8f98…8fae Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005b, t01=0x018a}
0x8fae…8fc4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005c, t01=0x0010}
0x8fc4…8fda Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005c, t01=0x0026}
0x8fda…900e Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS«, t00=0x005c, t01=0x003c}
0x900e…902a Head {h00=0x0018, h01=0x0050, text=» SLL A2,1 BYTE MODE «, t00=0x005c, t01=0x0070}
0x902a…904c Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x005c, t01=0x008c}
0x904c…9062 Head {h00=0x0012, h01=0x0050, text=» TL DWTPAG,A6 «, t00=0x005c, t01=0x00ae}
0x9062…908e Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL ADDRESS«, t00=0x005c, t01=0x00c4}
0x908e…909e Head {h00=0x000c, h01=0x0050, text=» MVSU A4«, t00=0x005c, t01=0x00f0}
0x909e…90aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x0100}
0x90aa…90b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x010c}
0x90b4…90ca Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005c, t01=0x0116}
0x90ca…90dc Head {h00=0x000e, h01=0x0050, text=» RF MOV:00«, t00=0x005c, t01=0x012c}
0x90dc…90e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x013e}
0x90e6…90fc Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x005c, t01=0x0148}
0x90fc…9106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x015e}
0x9106…9110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0168}
0x9110…9124 Head {h00=0x0010, h01=0x0050, text=»MOVWRI EQU *«, t00=0x005c, t01=0x0172}
0x9124…9152 Head {h00=0x002a, h01=0x0050, text=» ADKL A2,BUFFER DRIVER BUFFER POINTER «, t00=0x005c, t01=0x0186}
0x9152…916e Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005d, t01=0x0024}
0x916e…91a4 Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTUBU,A6 PRESENT POINT IN USER BUFFER «, t00=0x005d, t01=0x0040}
0x91a4…91b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0076}
0x91b0…91ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0082}
0x91ba…91d0 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005d, t01=0x008c}
0x91d0…91ec Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+MMUPAG=0«, t00=0x005d, t01=0x00a2}
0x91ec…9202 Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x005d, t01=0x00be}
0x9202…9232 Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTUBU,A6 GET USER BUFFER POINTER«, t00=0x005d, t01=0x00d4}
0x9232…9266 Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005d, t01=0x0104}
0x9266…9276 Head {h00=0x000c, h01=0x0050, text=» MVB A4 «, t00=0x005d, t01=0x0138}
0x9276…9282 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0148}
0x9282…928c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0154}
0x928c…92a2 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005d, t01=0x015e}
0x92a2…92b8 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005d, t01=0x0174}
0x92b8…92ce Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005d, t01=0x018a}
0x92ce…9302 Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS«, t00=0x005e, t01=0x0010}
0x9302…931e Head {h00=0x0018, h01=0x0050, text=» SLL A1,1 BYTE MODE «, t00=0x005e, t01=0x0044}
0x931e…9340 Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x005e, t01=0x0060}
0x9340…9356 Head {h00=0x0012, h01=0x0050, text=» TL DWTPAG,A6 «, t00=0x005e, t01=0x0082}
0x9356…9382 Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTUBU,A6 GET LOGICAL ADDRESS«, t00=0x005e, t01=0x0098}
0x9382…9392 Head {h00=0x000c, h01=0x0050, text=» MVUS A4«, t00=0x005e, t01=0x00c4}
0x9392…939e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00d4}
0x939e…93a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00e0}
0x93a8…93be Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x00ea}
0x93be…93d2 Head {h00=0x0010, h01=0x000c, text=»MOV:00 EQU *«, t00=0x005e, t01=0x0100}
0x93d2…93ee Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005e, t01=0x0114}
0x93ee…9422 Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005e, t01=0x0130}
0x9422…942e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0164}
0x942e…9438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0170}
0x9438…944e Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x017a}
0x944e…9464 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005e, t01=0x0190}
0x9464…9488 Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x005f, t01=0x0016}
0x9488…9494 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x003a}
0x9494…949e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0046}
0x949e…94b4 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005f, t01=0x0050}
0x94b4…94d0 Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005f, t01=0x0066}
0x94d0…94e6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x005f, t01=0x0082}
0x94e6…94f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0098}
0x94f0…9506 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x005f, t01=0x00a2}
0x9506…9510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00b8}
0x9510…951a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00c2}
0x951a…952e Head {h00=0x0010, h01=0x0050, text=»MOV:10 EQU *«, t00=0x005f, t01=0x00cc}
0x952e…9542 Head {h00=0x0010, h01=0x000b, text=» LDR* A3,A1 «, t00=0x005f, t01=0x00e0}
0x9542…9554 Head {h00=0x000e, h01=0x000a, text=» STR A3,A2«, t00=0x005f, t01=0x00f4}
0x9554…9566 Head {h00=0x000e, h01=0x0009, text=» ADK A1,2 «, t00=0x005f, t01=0x0106}
0x9566…9578 Head {h00=0x000e, h01=0x0009, text=» ADK A2,2 «, t00=0x005f, t01=0x0118}
0x9578…958a Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x005f, t01=0x012a}
0x958a…95a0 Head {h00=0x0012, h01=0x0050, text=» RB(P) MOV:10 «, t00=0x005f, t01=0x013c}
0x95a0…95ac Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x005f, t01=0x0152}
0x95ac…95b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x015e}
0x95b6…95cc Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005f, t01=0x0168}
0x95cc…95e2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005f, t01=0x017e}
0x95e2…95fe (96, 0, 400) Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x0060, t01=0x0004}
0x95fe…962a Head {h00=0x0028, h01=0x0050, text=» MSR 12,A15 SAVE REGISTERS ON STACK «, t00=0x0060, t01=0x0020}
0x962a…964e Head {h00=0x0020, h01=0x0050, text=» LDR A11,A4 NUMBER OF BYTES «, t00=0x0060, t01=0x004c}
0x964e…9670 Head {h00=0x001e, h01=0x0050, text=» LDR A10,A2 OUTPUT ADDRESS«, t00=0x0060, t01=0x0070}
0x9670…9690 Head {h00=0x001c, h01=0x0050, text=» LDR A9,A1 INPUT ADDRESS«, t00=0x0060, t01=0x0092}
0x9690…96b8 Head {h00=0x0024, h01=0x0050, text=» LDKL A12,16 BYTES IN EACH LOOP «, t00=0x0060, t01=0x00b2}
0x96b8…96cc Head {h00=0x0010, h01=0x0050, text=»MOV:15 EQU *«, t00=0x0060, t01=0x00da}
0x96cc…96de Head {h00=0x000e, h01=0x0050, text=» MLR 8,A9 «, t00=0x0060, t01=0x00ee}
0x96de…96f0 Head {h00=0x000e, h01=0x0050, text=» MSR 8,A10«, t00=0x0060, t01=0x0100}
0x96f0…9704 Head {h00=0x0010, h01=0x0050, text=» ADR A10,A12«, t00=0x0060, t01=0x0112}
0x9704…9718 Head {h00=0x0010, h01=0x0050, text=» ADR A9,A12 «, t00=0x0060, t01=0x0126}
0x9718…972c Head {h00=0x0010, h01=0x0050, text=» SUR A11,A12«, t00=0x0060, t01=0x013a}
0x972c…9742 Head {h00=0x0012, h01=0x0050, text=» RB(P) MOV:15 «, t00=0x0060, t01=0x014e}
0x9742…9772 Head {h00=0x002c, h01=0x0050, text=» MLR 12,A15 RESTORE REGISTERS FROM STACK«, t00=0x0060, t01=0x0164}
0x9772…977e (97, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0004}
0x977e…9788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0010}
0x9788…979e Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0061, t01=0x001a}
0x979e…97ae Head {h00=0x000c, h01=0x0007, text=» RTN A5 «, t00=0x0061, t01=0x0030}
0x97ae…97b8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0061, t01=0x0040}
0x97b8…97c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x004a}
0x97c4…97ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0056}
0x97ce…97e4 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0061, t01=0x0060}
0x97e4…97fa Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0061, t01=0x0076}
0x97fa…9804 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x008c}
0x9804…980e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0096}
0x980e…9832 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0061, t01=0x00a0}
0x9832…9856 Head {h00=0x0020, h01=0x0050, text=»* * «, t00=0x0061, t01=0x00c4}
0x9856…987a Head {h00=0x0020, h01=0x0050, text=»* DIV31 * «, t00=0x0061, t01=0x00e8}
0x987a…989e Head {h00=0x0020, h01=0x0050, text=»* * «, t00=0x0061, t01=0x010c}
0x989e…98c2 Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0061, t01=0x0130}
0x98c2…98cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0154}
0x98cc…98fc Head {h00=0x002c, h01=0x0050, text=»* INPUT: ECBCW2=LOGICAL SECTOR NUMBER «, t00=0x0061, t01=0x015e}
0x98fc…9930 Head {h00=0x0030, h01=0x0050, text=»* OUTPUT: 1ST DWT = PHYSICAL SECTOR NUMBER«, t00=0x0061, t01=0x018e}
0x9930…993a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0032}
0x993a…994e Head {h00=0x0010, h01=0x0050, text=»DIV31 EQU * «, t00=0x0062, t01=0x003c}
0x994e…9958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0050}
0x9958…996e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0062, t01=0x005a}
0x996e…99a0 Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET LOGICAL SECTOR NUMBER«, t00=0x0062, t01=0x0070}
0x99a0…99b2 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0062, t01=0x00a2}
0x99b2…99c4 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0062, t01=0x00b4}
0x99c4…99d8 Head {h00=0x0010, h01=0x0050, text=»DIV:20 EQU *«, t00=0x0062, t01=0x00c6}
0x99d8…99f4 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 I0:=I0+I1«, t00=0x0062, t01=0x00da}
0x99f4…9a10 Head {h00=0x0018, h01=0x0050, text=» SRL A3,5 I1:=I1/32 «, t00=0x0062, t01=0x00f6}
0x9a10…9a26 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DIV:20«, t00=0x0062, t01=0x0112}
0x9a26…9a38 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0062, t01=0x0128}
0x9a38…9a52 Head {h00=0x0016, h01=0x0050, text=» ANKL A3,/FFE0 32*«, t00=0x0062, t01=0x013a}
0x9a52…9a6c Head {h00=0x0016, h01=0x0050, text=» SRL A2,5 TRUNCATE«, t00=0x0062, t01=0x0154}
0x9a6c…9a7e Head {h00=0x000e, h01=0x0050, text=» SUR A3,A2«, t00=0x0062, t01=0x016e}
0x9a7e…9a90 Head {h00=0x000e, h01=0x0050, text=» SUR A3,A1«, t00=0x0062, t01=0x0180}
0x9a90…9aa2 (99, 0, 400) Head {h00=0x000e, h01=0x0050, text=» ADK A3,31«, t00=0x0063, t01=0x0004}
0x9aa2…9ab8 Head {h00=0x0012, h01=0x0050, text=» RF(P) DIV:30 «, t00=0x0063, t01=0x0016}
0x9ab8…9ad8 Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 NEXT CYLINDER «, t00=0x0063, t01=0x002c}
0x9ad8…9aec Head {h00=0x0010, h01=0x0050, text=»DIV:30 EQU *«, t00=0x0063, t01=0x004c}
0x9aec…9afe Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0063, t01=0x0060}
0x9afe…9b1e Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIV:50 CYLINDER 0«, t00=0x0063, t01=0x0072}
0x9b1e…9b30 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0063, t01=0x0092}
0x9b30…9b42 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0063, t01=0x00a4}
0x9b42…9b4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00b6}
0x9b4c…9b62 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0063, t01=0x00c0}
0x9b62…9b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00d6}
0x9b6c…9b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00e0}
0x9b76…9b8a Head {h00=0x0010, h01=0x0050, text=»DIV:50 EQU *«, t00=0x0063, t01=0x00ea}
0x9b8a…9bbe Head {h00=0x0030, h01=0x0050, text=» STR A1,A6 PUT PHYSICAL SECTOR NUMBER IN DWT«, t00=0x0063, t01=0x00fe}
0x9bbe…9bce Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0063, t01=0x0132}
0x9bce…9bd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0142}
0x9bd8…9be4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x014c}
0x9be4…9bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0158}
0x9bee…9c04 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0063, t01=0x0162}
0x9c04…9c1a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0063, t01=0x0178}
0x9c1a…9c44 Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW2,A8 GET SECTOR NUMBER«, t00=0x0063, t01=0x018e}
0x9c44…9c6e Head {h00=0x0026, h01=0x0050, text=» STR A2,A6 PHYSICAL SECTOR NUMBER «, t00=0x0064, t01=0x0028}
0x9c6e…9c80 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0064, t01=0x0052}
0x9c80…9c90 Head {h00=0x000c, h01=0x0050, text=» DVK 31 «, t00=0x0064, t01=0x0064}
0x9c90…9ca2 Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0064, t01=0x0074}
0x9ca2…9cc2 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIV:10 CYLINDER 0«, t00=0x0064, t01=0x0086}
0x9cc2…9cd4 Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0064, t01=0x00a6}
0x9cd4…9ce8 Head {h00=0x0010, h01=0x0050, text=»DIV:10 EQU *«, t00=0x0064, t01=0x00b8}
0x9ce8…9d12 Head {h00=0x0026, h01=0x0050, text=» ADRS A2,A6 PHYSICAL SECTOR NUMBER«, t00=0x0064, t01=0x00cc}
0x9d12…9d22 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0064, t01=0x00f6}
0x9d22…9d2e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x0106}
0x9d2e…9d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0112}
0x9d38…9d4e Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0064, t01=0x011c}
0x9d4e…9d58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0132}
0x9d58…9d82 Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0064, t01=0x013c}
0x9d82…9dac Head {h00=0x0026, h01=0x0050, text=»* * «, t00=0x0064, t01=0x0166}
0x9dac…9dd6 Head {h00=0x0026, h01=0x0050, text=»* SUBROUTINES FOR * «, t00=0x0064, t01=0x0190}
0x9dd6…9e00 Head {h00=0x0026, h01=0x0050, text=»* INTERLACING AND/OR * «, t00=0x0065, t01=0x002a}
0x9e00…9e2a Head {h00=0x0026, h01=0x0050, text=»* SKEWING * «, t00=0x0065, t01=0x0054}
0x9e2a…9e54 Head {h00=0x0026, h01=0x0050, text=»* * «, t00=0x0065, t01=0x007e}
0x9e54…9e7e Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0065, t01=0x00a8}
0x9e7e…9e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00d2}
0x9e88…9ece Head {h00=0x0042, h01=0x0050, text=»* OUTPUT : A3 CONTAINING INTERLACED AND SKEWED SECTOR NUMBER «, t00=0x0065, t01=0x00dc}
0x9ece…9ed8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0122}
0x9ed8…9eec Head {h00=0x0010, h01=0x0050, text=»INLACE EQU *«, t00=0x0065, t01=0x012c}
0x9eec…9f1a Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0065, t01=0x0140}
0x9f1a…9f2c Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0065, t01=0x016e}
0x9f2c…9f3e Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x0065, t01=0x0180}
0x9f3e…9f66 (102, 0, 398) Head {h00=0x0024, h01=0x0050, text=» ADR A3,A1 INTERLACING FACTOR 3 «, t00=0x0066, t01=0x0004}
0x9f66…9f78 Head {h00=0x000e, h01=0x0050, text=»SKEW EQU *«, t00=0x0066, t01=0x002c}
0x9f78…9f8e Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0066, t01=0x003e}
0x9f8e…9fba Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0066, t01=0x0054}
0x9fba…9fc6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x0080}
0x9fc6…9fdc Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0066, t01=0x008c}
0x9fdc…a008 Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0066, t01=0x00a2}
0xa008…a014 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x00ce}
0xa014…a026 Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0066, t01=0x00da}
0xa026…a04a Head {h00=0x0020, h01=0x0050, text=» RF(Z) INLAC5 EVEN CYLINDER «, t00=0x0066, t01=0x00ec}
0xa04a…a070 Head {h00=0x0022, h01=0x0050, text=» ADK A3,8 SKEW FACTOR 180 DEG.«, t00=0x0066, t01=0x0110}
0xa070…a084 Head {h00=0x0010, h01=0x0050, text=»INLAC5 EQU *«, t00=0x0066, t01=0x0136}
0xa084…a098 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/1F «, t00=0x0066, t01=0x014a}
0xa098…a0b6 Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 IN POSITION «, t00=0x0066, t01=0x015e}
0xa0b6…a0c6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x017c}
0xa0c6…a0d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x018c}
0xa0d0…a0e6 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0067, t01=0x0008}
0xa0e6…a0fc Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0067, t01=0x001e}
0xa0fc…a106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0034}
0xa106…a110 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x003e}
0xa110…a122 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0067, t01=0x0048}
0xa122…a134 Head {h00=0x000e, h01=0x0050, text=»* INXUNI *«, t00=0x0067, t01=0x005a}
0xa134…a146 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0067, t01=0x006c}
0xa146…a150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x007e}
0xa150…a188 Head {h00=0x0034, h01=0x0050, text=»* OUTPUT A2=DOUBLED UNIT INDEX + DWT ADDRESS «, t00=0x0067, t01=0x0088}
0xa188…a192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00c0}
0xa192…a1a6 Head {h00=0x0010, h01=0x0050, text=»INXUNI EQU *«, t00=0x0067, t01=0x00ca}
0xa1a6…a1be Head {h00=0x0014, h01=0x0050, text=» LC A2,DWTOR,A6 «, t00=0x0067, t01=0x00de}
0xa1be…a1d0 Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0067, t01=0x00f6}
0xa1d0…a1e2 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0067, t01=0x0108}
0xa1e2…a1f2 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0067, t01=0x011a}
0xa1f2…a1fe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x012a}
0xa1fe…a208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0136}
0xa208…a21e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0067, t01=0x0140}
0xa21e…a234 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0067, t01=0x0156}
0xa234…a23e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x016c}
0xa23e…a248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0176}
0xa248…a27a Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0067, t01=0x0180}
0xa27a…a2ac Head {h00=0x002e, h01=0x0050, text=»* *«, t00=0x0068, t01=0x0022}
0xa2ac…a2de Head {h00=0x002e, h01=0x0050, text=»* MMULOG : GET LOGICAL ADDRESS AND *«, t00=0x0068, t01=0x0054}
0xa2de…a310 Head {h00=0x002e, h01=0x0050, text=»* PAGE *«, t00=0x0068, t01=0x0086}
0xa310…a342 Head {h00=0x002e, h01=0x0050, text=»* *«, t00=0x0068, t01=0x00b8}
0xa342…a374 Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0068, t01=0x00ea}
0xa374…a37e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x011c}
0xa37e…a388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0126}
0xa388…a39c Head {h00=0x0010, h01=0x0050, text=»MMULOG EQU *«, t00=0x0068, t01=0x0130}
0xa39c…a3ce Head {h00=0x002e, h01=0x0050, text=» MS 2,DWTBA1,A6 SAVE PHYSICAL WORD ADDRESS«, t00=0x0068, t01=0x0144}
0xa3ce…a3dc Head {h00=0x000a, h01=0x0050, text=» DLA 4«, t00=0x0068, t01=0x0176}
0xa3dc…a3fa Head {h00=0x001a, h01=0x0050, text=» SRC A1,6 IN POSITION «, t00=0x0068, t01=0x0184}
0xa3fa…a418 Head {h00=0x001a, h01=0x0050, text=» ST A1,DWTPAG,A6 PAGE «, t00=0x0069, t01=0x0012}
0xa418…a438 Head {h00=0x001c, h01=0x0050, text=» ADKL A1,/400 NEXT PAGE «, t00=0x0069, t01=0x0030}
0xa438…a464 Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTPAG+2,A6 PSEUDO MMU TABLE «, t00=0x0069, t01=0x0050}
0xa464…a476 Head {h00=0x000e, h01=0x0050, text=» SRL A2,3 «, t00=0x0069, t01=0x007c}
0xa476…a49e Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTUBU,A6 LOGICAL ADDRESS«, t00=0x0069, t01=0x008e}
0xa49e…a4ae Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0069, t01=0x00b6}
0xa4ae…a4b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00c6}
0xa4b8…a4c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x00d0}
0xa4c4…a4ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00dc}
0xa4ce…a4e6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0069, t01=0x00e6}
0xa4e6…a4f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00fe}
0xa4f0…a506 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0069, t01=0x0108}
0xa506…a510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x011e}
0xa510…a51a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0128}
0xa51a…a540 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0069, t01=0x0132}
0xa540…a54a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0158}
0xa54a…a574 Head {h00=0x0026, h01=0x0050, text=»* UPDATE DRIVER BUFFER INDICATOR «, t00=0x0069, t01=0x0162}
0xa574…a57e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x018c}
0xa57e…a5a6 Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x006a, t01=0x0008}
0xa5a6…a5b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0030}
0xa5b0…a5de Head {h00=0x002a, h01=0x0050, text=»* INPUT A1=RETURN CODE (AFTER READ)«, t00=0x006a, t01=0x003a}
0xa5de…a610 Head {h00=0x002e, h01=0x0050, text=»* OUTPUT DWTBSE=DRIVER BUFFER INDICATOR «, t00=0x006a, t01=0x0068}
0xa610…a61a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x009a}
0xa61a…a62e Head {h00=0x0010, h01=0x0050, text=»BSELOD EQU *«, t00=0x006a, t01=0x00a4}
0xa62e…a658 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A6 GET READ SECTOR NUMBER«, t00=0x006a, t01=0x00b8}
0xa658…a67e Head {h00=0x0022, h01=0x0050, text=»BSEL00 EQU * FROM SEEK VERIFY «, t00=0x006a, t01=0x00e2}
0xa67e…a696 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x006a, t01=0x0108}
0xa696…a6c6 Head {h00=0x002c, h01=0x0050, text=» RF(Z) BSEL50 READ/WRITE TO USER BUFFER «, t00=0x006a, t01=0x0120}
0xa6c6…a6e2 Head {h00=0x0018, h01=0x0050, text=» LDKL A2,/FFFF DUMMY«, t00=0x006a, t01=0x0150}
0xa6e2…a6f4 Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x006a, t01=0x016c}
0xa6f4…a716 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BSEL40 READ ERROR «, t00=0x006a, t01=0x017e}
0xa716…a738 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET INDEX «, t00=0x006b, t01=0x0010}
0xa738…a74e Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/300 «, t00=0x006b, t01=0x0032}
0xa74e…a760 Head {h00=0x000e, h01=0x0050, text=» SLL A2,6 «, t00=0x006b, t01=0x0048}
0xa760…a772 Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x006b, t01=0x005a}
0xa772…a786 Head {h00=0x0010, h01=0x0050, text=»BSEL40 EQU *«, t00=0x006b, t01=0x006c}
0xa786…a7be Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR «, t00=0x006b, t01=0x0080}
0xa7be…a7d2 Head {h00=0x0010, h01=0x0050, text=»BSEL50 EQU *«, t00=0x006b, t01=0x00b8}
0xa7d2…a7e2 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006b, t01=0x00cc}
0xa7e2…a7ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00dc}
0xa7ec…a802 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x006b, t01=0x00e6}
0xa802…a80c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00fc}
0xa80c…a816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0106}
0xa816…a846 Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x006b, t01=0x0110}
0xa846…a876 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x006b, t01=0x0140}
0xa876…a8a6 Head {h00=0x002c, h01=0x0050, text=»* RESTORE WORD TO USER BUFFER * «, t00=0x006b, t01=0x0170}
0xa8a6…a8d6 Head {h00=0x002c, h01=0x0050, text=»* IF NECESSARY * «, t00=0x006c, t01=0x0010}
0xa8d6…a906 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x006c, t01=0x0040}
0xa906…a936 Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x006c, t01=0x0070}
0xa936…a940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00a0}
0xa940…a96e Head {h00=0x002a, h01=0x0050, text=»* INPUT: DWTFSW=SAVED WORD INDICATOR«, t00=0x006c, t01=0x00aa}
0xa96e…a992 Head {h00=0x0020, h01=0x0050, text=»* DWTSWD=SAVED WORD«, t00=0x006c, t01=0x00d8}
0xa992…a9c2 Head {h00=0x002c, h01=0x0050, text=»* DWTUBU=POINTER TO USER BUFFER«, t00=0x006c, t01=0x00fc}
0xa9c2…a9cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x012c}
0xa9cc…a9e0 Head {h00=0x0010, h01=0x0050, text=»REWORD EQU *«, t00=0x006c, t01=0x0136}
0xa9e0…a9f8 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTFSW,A6«, t00=0x006c, t01=0x014a}
0xa9f8…aa1c Head {h00=0x0020, h01=0x0050, text=» RF(Z) REWO50 NO SAVED WORD «, t00=0x006c, t01=0x0162}
0xaa1c…aa34 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTSWD,A6«, t00=0x006c, t01=0x0186}
0xaa34…aa4a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006d, t01=0x000e}
0xaa4a…aa74 Head {h00=0x0026, h01=0x0050, text=» ML 2,DWTBA1,A6 GET BUFFER ADDRESS«, t00=0x006d, t01=0x0024}
0xaa74…aa96 Head {h00=0x001e, h01=0x0050, text=» RF(Z) REWO20 SYSTEM AREA «, t00=0x006d, t01=0x004e}
0xaa96…aab8 Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x006d, t01=0x0070}
0xaab8…aae0 Head {h00=0x0024, h01=0x0050, text=» TL DWTPAG,A6 SET MMU REGISTERS «, t00=0x006d, t01=0x0092}
0xaae0…ab14 Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL BUFFER ADDRESS «, t00=0x006d, t01=0x00ba}
0xab14…ab40 Head {h00=0x0028, h01=0x0050, text=» ES A3,PHSECL,A2 RESTORE SAVED WORD «, t00=0x006d, t01=0x00ee}
0xab40…ab64 Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x006d, t01=0x011a}
0xab64…ab76 Head {h00=0x000e, h01=0x0050, text=» RF REWO50«, t00=0x006d, t01=0x013e}
0xab76…ab8a Head {h00=0x0010, h01=0x0050, text=»REWO20 EQU *«, t00=0x006d, t01=0x0150}
0xab8a…aba6 Head {h00=0x0018, h01=0x0050, text=» SLL A2,1 BYTE MODE «, t00=0x006d, t01=0x0164}
0xaba6…abcc Head {h00=0x0022, h01=0x0050, text=» ST A3,PHSECL,A2 RESTORE WORD «, t00=0x006d, t01=0x0180}
0xabcc…abd8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0016}
0xabd8…abe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0022}
0xabe2…abf8 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x006e, t01=0x002c}
0xabf8…ac0e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006e, t01=0x0042}
0xac0e…ac3a Head {h00=0x0028, h01=0x0050, text=» ST* A3,DWTUBU,A6 RESTORE SAVED WORD«, t00=0x006e, t01=0x0058}
0xac3a…ac46 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0084}
0xac46…ac50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0090}
0xac50…ac66 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x006e, t01=0x009a}
0xac66…ac92 Head {h00=0x0028, h01=0x0050, text=» CM DWTFSW,A6 INDICATE NO SAVED WORD«, t00=0x006e, t01=0x00b0}
0xac92…aca6 Head {h00=0x0010, h01=0x0050, text=»REWO50 EQU *«, t00=0x006e, t01=0x00dc}
0xaca6…acb6 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006e, t01=0x00f0}
0xacb6…acc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0100}
0xacc0…accc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x010a}
0xaccc…acd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0116}
0xacd6…acf6 Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x006e, t01=0x0120}
0xacf6…ad00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0140}
0xad00…ad0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x014a}
0xad0a…ad26 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x006e, t01=0x0154}
0xad26…ad42 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x006e, t01=0x0170}
0xad42…ad5e Head {h00=0x0018, h01=0x0050, text=»* SEEK CYLINDER * «, t00=0x006e, t01=0x018c}
0xad5e…ad7a Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x006f, t01=0x0018}
0xad7a…ad96 Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x006f, t01=0x0034}
0xad96…ada0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0050}
0xada0…adaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x005a}
0xadaa…adbc Head {h00=0x000e, h01=0x0050, text=»SEEK EQU *«, t00=0x006f, t01=0x0064}
0xadbc…add2 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x006f, t01=0x0076}
0xadd2…adfa Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTCYL,A2 CYLINDER NUMBER«, t00=0x006f, t01=0x008c}
0xadfa…ae06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x00b4}
0xae06…ae1c Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x006f, t01=0x00c0}
0xae1c…ae34 Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A6«, t00=0x006f, t01=0x00d6}
0xae34…ae40 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x00ee}
0xae40…ae52 Head {h00=0x000e, h01=0x0050, text=» SLL A3,3 «, t00=0x006f, t01=0x00fa}
0xae52…ae64 Head {h00=0x000e, h01=0x0050, text=» ORK A3,2 «, t00=0x006f, t01=0x010c}
0xae64…ae86 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x006f, t01=0x011e}
0xae86…ae90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0140}
0xae90…aea4 Head {h00=0x0010, h01=0x0050, text=»SEEKZ EQU * «, t00=0x006f, t01=0x014a}
0xaea4…aeb6 Head {h00=0x000e, h01=0x0050, text=» LDK A3,3 «, t00=0x006f, t01=0x015e}
0xaeb6…aed8 Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x006f, t01=0x0170}
0xaed8…aee2 (112, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0004}
0xaee2…aef8 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0070, t01=0x000e}
0xaef8…af02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0024}
0xaf02…af0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x002e}
0xaf0c…af36 Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x0070, t01=0x0038}
0xaf36…af60 Head {h00=0x0026, h01=0x0050, text=»* *«, t00=0x0070, t01=0x0062}
0xaf60…af8a Head {h00=0x0026, h01=0x0050, text=»* CIO: READ AND WRITE *«, t00=0x0070, t01=0x008c}
0xaf8a…afb4 Head {h00=0x0026, h01=0x0050, text=»* *«, t00=0x0070, t01=0x00b6}
0xafb4…afde Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x0070, t01=0x00e0}
0xafde…afe8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x010a}
0xafe8…b01c Head {h00=0x0030, h01=0x0050, text=»* INPUT: A3=PHYSICAL SECTOR NUMBER SHIFTED «, t00=0x0070, t01=0x0114}
0xb01c…b026 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0148}
0xb026…b03c Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0070, t01=0x0152}
0xb03c…b052 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0070, t01=0x0168}
0xb052…b064 Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0070, t01=0x017e}
0xb064…b082 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/80C1 1ST WER«, t00=0x0070, t01=0x0190}
0xb082…b094 Head {h00=0x000e, h01=0x0050, text=» RF CIO:20«, t00=0x0071, t01=0x001e}
0xb094…b0a8 Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0071, t01=0x0030}
0xb0a8…b0c6 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/C0C1 1ST WER«, t00=0x0071, t01=0x0044}
0xb0c6…b0e2 Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 ORDER CODE«, t00=0x0071, t01=0x0062}
0xb0e2…b0f6 Head {h00=0x0010, h01=0x0050, text=»CIO:20 EQU *«, t00=0x0071, t01=0x007e}
0xb0f6…b10e Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0071, t01=0x0092}
0xb10e…b13e Head {h00=0x002c, h01=0x0050, text=» RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER «, t00=0x0071, t01=0x00aa}
0xb13e…b16a Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTUBU,A6 USER BUFFER POINTER«, t00=0x0071, t01=0x00da}
0xb16a…b182 Head {h00=0x0014, h01=0x0050, text=» SUKL A2,PHSECL «, t00=0x0071, t01=0x0106}
0xb182…b194 Head {h00=0x000e, h01=0x0050, text=» RF CIO:50«, t00=0x0071, t01=0x011e}
0xb194…b1a8 Head {h00=0x0010, h01=0x0050, text=»CIO:30 EQU *«, t00=0x0071, t01=0x0130}
0xb1a8…b1d6 Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER DRIVER BUFFER ADDRESS «, t00=0x0071, t01=0x0144}
0xb1d6…b1e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0172}
0xb1e2…b1ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x017e}
0xb1ec…b202 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0071, t01=0x0188}
0xb202…b218 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0072, t01=0x000e}
0xb218…b22a Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0072, t01=0x0024}
0xb22a…b250 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0C18 1ST WER SHIFTED«, t00=0x0072, t01=0x0036}
0xb250…b262 Head {h00=0x000e, h01=0x0050, text=» RF CIO:20«, t00=0x0072, t01=0x005c}
0xb262…b276 Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0072, t01=0x006e}
0xb276…b29c Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0C1C 1ST WER SHIFTED«, t00=0x0072, t01=0x0082}
0xb29c…b2b8 Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 ORDER CODE«, t00=0x0072, t01=0x00a8}
0xb2b8…b2cc Head {h00=0x0010, h01=0x0050, text=»CIO:20 EQU *«, t00=0x0072, t01=0x00c4}
0xb2cc…b2e4 Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0072, t01=0x00d8}
0xb2e4…b314 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER «, t00=0x0072, t01=0x00f0}
0xb314…b342 Head {h00=0x002a, h01=0x0050, text=» DA DWTBA1,A6 GET USER BUFFER ADDRESS «, t00=0x0072, t01=0x0120}
0xb342…b366 Head {h00=0x0020, h01=0x0050, text=» SLL A2,1 BYTE MODE ADDRESS «, t00=0x0072, t01=0x014e}
0xb366…b378 Head {h00=0x000e, h01=0x0050, text=» RF CIO:40«, t00=0x0072, t01=0x0172}
0xb378…b38c Head {h00=0x0010, h01=0x0050, text=»CIO:30 EQU *«, t00=0x0072, t01=0x0184}
0xb38c…b3ba Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER DRIVER BUFFER ADDRESS «, t00=0x0073, t01=0x0008}
0xb3ba…b3ce Head {h00=0x0010, h01=0x0050, text=»CIO:40 EQU *«, t00=0x0073, t01=0x0036}
0xb3ce…b3f4 Head {h00=0x0022, h01=0x0050, text=» SRC A1,4 1ST WER IN POSITION «, t00=0x0073, t01=0x004a}
0xb3f4…b400 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x0070}
0xb400…b40a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x007c}
0xb40a…b41e Head {h00=0x0010, h01=0x0050, text=»CIO:50 EQU *«, t00=0x0073, t01=0x0086}
0xb41e…b432 Head {h00=0x0010, h01=0x0050, text=» WER A1,WER1«, t00=0x0073, t01=0x009a}
0xb432…b448 Head {h00=0x0012, h01=0x0050, text=» WER A2,WER1+1«, t00=0x0073, t01=0x00ae}
0xb448…b452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00c4}
0xb452…b472 Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x0073, t01=0x00ce}
0xb472…b47c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00ee}
0xb47c…b486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00f8}
0xb486…b498 Head {h00=0x000e, h01=0x0050, text=»CIO EQU * «, t00=0x0073, t01=0x0102}
0xb498…b4b8 Head {h00=0x001c, h01=0x0050, text=» ST A4,DWTA4,A6 SAVE A4 «, t00=0x0073, t01=0x0114}
0xb4b8…b4ce Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x0073, t01=0x0134}
0xb4ce…b4fa Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CIOAB PWF POST PROCESSING ON«, t00=0x0073, t01=0x014a}
0xb4fa…b528 Head {h00=0x002a, h01=0x0050, text=» CF A15,INXDWT GET INDEXED DWT ADDRESS«, t00=0x0073, t01=0x0176}
0xb528…b550 Head {h00=0x0024, h01=0x0050, text=» EX DWTCIO,A4 EXECUTE CIO-START «, t00=0x0074, t01=0x0014}
0xb550…b57a Head {h00=0x0026, h01=0x0050, text=» ABL(3) END:30 CU ADDRESS UNKNOWN «, t00=0x0074, t01=0x003c}
0xb57a…b58e Head {h00=0x0010, h01=0x0050, text=»CIOAB EQU * «, t00=0x0074, t01=0x0066}
0xb58e…b5b4 Head {h00=0x0022, h01=0x0050, text=» ST A5,DWTA5,A6 A5 «, t00=0x0074, t01=0x007a}
0xb5b4…b5e0 Head {h00=0x0028, h01=0x0050, text=» ST A7,DWTA2,A6 SAVE SECTOR COUNTER «, t00=0x0074, t01=0x00a0}
0xb5e0…b5ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00cc}
0xb5ea…b614 Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x0074, t01=0x00d6}
0xb614…b61e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0100}
0xb61e…b63e Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x0074, t01=0x010a}
0xb63e…b648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x012a}
0xb648…b652 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0134}
0xb652…b670 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0074, t01=0x013e}
0xb670…b68e Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x0074, t01=0x015c}
0xb68e…b6ac Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINE *«, t00=0x0074, t01=0x017a}
0xb6ac…b6ca Head {h00=0x001a, h01=0x0050, text=»* *«, t00=0x0075, t01=0x0008}
0xb6ca…b6e8 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0075, t01=0x0026}
0xb6e8…b6f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0044}
0xb6f2…b6fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x004e}
0xb6fc…b70e Head {h00=0x000e, h01=0x0050, text=»DUON EQU *«, t00=0x0075, t01=0x0058}
0xb70e…b718 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x006a}
0xb718…b72e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0075, t01=0x0074}
0xb72e…b758 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0075, t01=0x008a}
0xb758…b764 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x00b4}
0xb764…b76e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00c0}
0xb76e…b784 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0075, t01=0x00ca}
0xb784…b7aa Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0075, t01=0x00e0}
0xb7aa…b7b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x0106}
0xb7b6…b7c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0112}
0xb7c0…b7d8 Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x0075, t01=0x011c}
0xb7d8…b7fe Head {h00=0x0022, h01=0x0050, text=» LDK A5,DWTSB3 GET STACK BASE «, t00=0x0075, t01=0x0134}
0xb7fe…b810 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0075, t01=0x015a}
0xb810…b82e Head {h00=0x001a, h01=0x0050, text=» CM DWTST,A6 UNIT BUSY«, t00=0x0075, t01=0x016c}
0xb82e…b856 Head {h00=0x0024, h01=0x0050, text=» CM DWTSAV,A6 INDICATE RECOVERY «, t00=0x0075, t01=0x018a}
0xb856…b880 Head {h00=0x0026, h01=0x0050, text=» LD A1,INIFLG INITIALIZATION FLAG «, t00=0x0076, t01=0x0022}
0xb880…b8a4 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON05 NOT POWER UP «, t00=0x0076, t01=0x004c}
0xb8a4…b8ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0070}
0xb8ae…b8c4 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0076, t01=0x007a}
0xb8c4…b8ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0090}
0xb8ce…b8d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x009a}
0xb8d8…b8f6 Head {h00=0x001a, h01=0x0050, text=» CM DWTOR,A6 1ST UNIT «, t00=0x0076, t01=0x00a4}
0xb8f6…b91c Head {h00=0x0022, h01=0x0050, text=» CF A5,SEEKZ TEST IF OPERABLE «, t00=0x0076, t01=0x00c2}
0xb91c…b92e Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0076, t01=0x00e8}
0xb92e…b952 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON26 NOT OPERABLE «, t00=0x0076, t01=0x00fa}
0xb952…b968 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0076, t01=0x011e}
0xb968…b97a Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0076, t01=0x0134}
0xb97a…b99c Head {h00=0x001e, h01=0x0050, text=» SC A1,DWTOR,A6 NEXT UNIT «, t00=0x0076, t01=0x0146}
0xb99c…b9b0 Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEKZ«, t00=0x0076, t01=0x0168}
0xb9b0…b9c2 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0076, t01=0x017c}
0xb9c2…b9e6 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON26 NOT OPERABLE «, t00=0x0076, t01=0x018e}
0xb9e6…b9f2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0022}
0xb9f2…b9fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x002e}
0xb9fc…ba14 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0077, t01=0x0038}
0xba14…ba1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0050}
0xba1e…ba28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x005a}
0xba28…ba3c Head {h00=0x0010, h01=0x0050, text=»DUON05 EQU *«, t00=0x0077, t01=0x0064}
0xba3c…ba50 Head {h00=0x0010, h01=0x0050, text=» CM DWTOR,A6«, t00=0x0077, t01=0x0078}
0xba50…ba76 Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM READ VOLUME NAME«, t00=0x0077, t01=0x008c}
0xba76…ba88 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0077, t01=0x00b2}
0xba88…baa6 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON07 NO ERROR«, t00=0x0077, t01=0x00c4}
0xbaa6…bace Head {h00=0x0024, h01=0x0050, text=» CM DWTOR,A6 PREPARE FOR VOLCLR «, t00=0x0077, t01=0x00e2}
0xbace…bae0 Head {h00=0x000e, h01=0x0050, text=» LDK A1,12«, t00=0x0077, t01=0x010a}
0xbae0…baf6 Head {h00=0x0012, h01=0x0050, text=» CF A15,VOLCLR«, t00=0x0077, t01=0x011c}
0xbaf6…bb0a Head {h00=0x0010, h01=0x0050, text=»DUON07 EQU *«, t00=0x0077, t01=0x0132}
0xbb0a…bb20 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0077, t01=0x0146}
0xbb20…bb42 Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 OTHER DISC UNIT «, t00=0x0077, t01=0x015c}
0xbb42…bb5a Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0077, t01=0x017e}
0xbb5a…bb70 Head {h00=0x0012, h01=0x0050, text=» CF A5,VO:NAM «, t00=0x0078, t01=0x0008}
0xbb70…bb82 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0078, t01=0x001e}
0xbb82…bba0 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON08 NO ERROR«, t00=0x0078, t01=0x0030}
0xbba0…bbc2 Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 OTHER DISC UNIT «, t00=0x0078, t01=0x004e}
0xbbc2…bbda Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0078, t01=0x0070}
0xbbda…bbec Head {h00=0x000e, h01=0x0050, text=» LDK A1,12«, t00=0x0078, t01=0x0088}
0xbbec…bc02 Head {h00=0x0012, h01=0x0050, text=» CF A15,VOLCLR«, t00=0x0078, t01=0x009a}
0xbc02…bc16 Head {h00=0x0010, h01=0x0050, text=»DUON08 EQU *«, t00=0x0078, t01=0x00b0}
0xbc16…bc22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x00c4}
0xbc22…bc52 Head {h00=0x002c, h01=0x0050, text=» IM DWTST,A6 INDICATE VOLUME NAMES READ «, t00=0x0078, t01=0x00d0}
0xbc52…bc66 Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x0078, t01=0x0100}
0xbc66…bc8c Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTSAV,A6 RECOVERY DONE«, t00=0x0078, t01=0x0114}
0xbc8c…bc96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x013a}
0xbc96…bcac Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0078, t01=0x0144}
0xbcac…bcb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x015a}
0xbcb6…bcc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0164}
0xbcc0…bce8 Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0078, t01=0x016e}
0xbce8…bd0c Head {h00=0x0020, h01=0x0050, text=» RF(Z) END:IO NO REQUEST ON?«, t00=0x0079, t01=0x0008}
0xbd0c…bd16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x002c}
0xbd16…bd3e Head {h00=0x0024, h01=0x0050, text=»DUON10 LD A7,DWTORD,A6 GET ORDER«, t00=0x0079, t01=0x0036}
0xbd3e…bd6e Head {h00=0x002c, h01=0x0050, text=» ST A7,DWTOR,A6 RESTORE INDEX AND ORDER «, t00=0x0079, t01=0x005e}
0xbd6e…bd82 Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0079, t01=0x008e}
0xbd82…bd8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00a2}
0xbd8c…bda2 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0079, t01=0x00ac}
0xbda2…bdd2 Head {h00=0x002c, h01=0x0050, text=» CF A5,REWORD RESTORE WORD IF NECESSARY «, t00=0x0079, t01=0x00c2}
0xbdd2…bdde Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00f2}
0xbdde…bde8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00fe}
0xbde8…be14 Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x0079, t01=0x0108}
0xbe14…be36 Head {h00=0x001e, h01=0x0050, text=» ABL DUA:00 REPEAT REQUEST«, t00=0x0079, t01=0x0134}
0xbe36…be40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0156}
0xbe40…be58 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0079, t01=0x0160}
0xbe58…be62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0178}
0xbe62…be7e Head {h00=0x0018, h01=0x0050, text=»* READY INTERRUPT«, t00=0x0079, t01=0x0182}
0xbe7e…be88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x000e}
0xbe88…bea2 Head {h00=0x0016, h01=0x0050, text=»DUREDY LD A1,TIMER«, t00=0x007a, t01=0x0018}
0xbea2…bec8 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON50 NO TIMER ACTIVE «, t00=0x007a, t01=0x0032}
0xbec8…bed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0058}
0xbed2…bee8 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x007a, t01=0x0062}
0xbee8…bf06 Head {h00=0x001a, h01=0x0050, text=» CM* TIMER KILL TIMER «, t00=0x007a, t01=0x0078}
0xbf06…bf18 Head {h00=0x000e, h01=0x0050, text=» RF DUON40«, t00=0x007a, t01=0x0096}
0xbf18…bf24 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00a8}
0xbf24…bf2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00b4}
0xbf2e…bf44 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x007a, t01=0x00be}
0xbf44…bf64 Head {h00=0x001c, h01=0x0050, text=» RB T:DISP TIMER ACTIVE «, t00=0x007a, t01=0x00d4}
0xbf64…bf70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00f4}
0xbf70…bf7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0100}
0xbf7a…bf92 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x007a, t01=0x010a}
0xbf92…bf9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0122}
0xbf9c…bfa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x012c}
0xbfa6…bfba Head {h00=0x0010, h01=0x0050, text=»DUON26 EQU *«, t00=0x007a, t01=0x0136}
0xbfba…bfe6 Head {h00=0x0028, h01=0x0050, text=» LDKL A4,TIMER TIMER POINTER ADDRESS«, t00=0x007a, t01=0x014a}
0xbfe6…bffa Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A4 «, t00=0x007a, t01=0x0176}
0xbffa…c020 Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON30 NO TIMER ACTIVE «, t00=0x007a, t01=0x018a}
0xc020…c036 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x007b, t01=0x0020}
0xc036…c056 Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 RESTART TIMER«, t00=0x007b, t01=0x0036}
0xc056…c068 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x007b, t01=0x0056}
0xc068…c072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0068}
0xc072…c07c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0072}
0xc07c…c0a4 Head {h00=0x0024, h01=0x0050, text=»DUON30 CF A15,SETIMP START TIMER«, t00=0x007b, t01=0x007c}
0xc0a4…c0d4 Head {h00=0x002c, h01=0x0050, text=» DATA DUON40,TIME TIME OUT ADDRESS, TIME«, t00=0x007b, t01=0x00a4}
0xc0d4…c0e6 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x007b, t01=0x00d4}
0xc0e6…c0f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00e6}
0xc0f0…c104 Head {h00=0x0010, h01=0x0050, text=»* TIME OUT«, t00=0x007b, t01=0x00f0}
0xc104…c10e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0104}
0xc10e…c12c Head {h00=0x001a, h01=0x0050, text=»DUON40 LDKL A6,DWDU01 «, t00=0x007b, t01=0x010e}
0xc12c…c13e Head {h00=0x000e, h01=0x0050, text=» CM TIMER «, t00=0x007b, t01=0x012c}
0xc13e…c152 Head {h00=0x0010, h01=0x0050, text=»DUON50 EQU *«, t00=0x007b, t01=0x013e}
0xc152…c174 Head {h00=0x001e, h01=0x0050, text=» CM DWTST,A6 SET UNIT BUSY«, t00=0x007b, t01=0x0152}
0xc174…c19c Head {h00=0x0024, h01=0x0050, text=» CM DWTSAV,A6 INDICATE RECOVERY «, t00=0x007b, t01=0x0174}
0xc19c…c1c2 Head {h00=0x0022, h01=0x0050, text=» LDK A5,DWTSB3 GET STACK BASE «, t00=0x007c, t01=0x000c}
0xc1c2…c1d4 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x007c, t01=0x0032}
0xc1d4…c1e6 Head {h00=0x000e, h01=0x0050, text=» RB DUON05«, t00=0x007c, t01=0x0044}
0xc1e6…c1f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0056}
0xc1f0…c210 Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x007c, t01=0x0060}
0xc210…c21a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0080}
0xc21a…c224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x008a}
0xc224…c244 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x007c, t01=0x0094}
0xc244…c264 Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x007c, t01=0x00b4}
0xc264…c284 Head {h00=0x001c, h01=0x0050, text=»* INTERRUPT HANDLER * «, t00=0x007c, t01=0x00d4}
0xc284…c2a4 Head {h00=0x001c, h01=0x0050, text=»* * «, t00=0x007c, t01=0x00f4}
0xc2a4…c2c4 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x007c, t01=0x0114}
0xc2c4…c2ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0134}
0xc2ce…c2d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x013e}
0xc2d8…c2ea Head {h00=0x000e, h01=0x0050, text=»IHDU EQU *«, t00=0x007c, t01=0x0148}
0xc2ea…c2fe Head {h00=0x0010, h01=0x0050, text=»IHDU1 EQU * «, t00=0x007c, t01=0x015a}
0xc2fe…c312 Head {h00=0x0010, h01=0x0050, text=»IHDU2 EQU * «, t00=0x007c, t01=0x016e}
0xc312…c33a Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x007c, t01=0x0182}
0xc33a…c344 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x001a}
0xc344…c35a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x007d, t01=0x0024}
0xc35a…c384 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x007d, t01=0x003a}
0xc384…c390 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x0064}
0xc390…c39a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0070}
0xc39a…c3b0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x007d, t01=0x007a}
0xc3b0…c3d6 Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x007d, t01=0x0090}
0xc3d6…c3e2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x00b6}
0xc3e2…c3ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00c2}
0xc3ec…c414 Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU01 DISC UNIT NO. 1 «, t00=0x007d, t01=0x00cc}
0xc414…c41e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00f4}
0xc41e…c436 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x007d, t01=0x00fe}
0xc436…c440 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0116}
0xc440…c44a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0120}
0xc44a…c470 Head {h00=0x0022, h01=0x0050, text=»IHDU10 SST A1,CUADR GET STATUS«, t00=0x007d, t01=0x012a}
0xc470…c49e Head {h00=0x002a, h01=0x0050, text=»IHDU20 ANKL A1,/460F MASK RETURN CODE «, t00=0x007d, t01=0x0150}
0xc49e…c4b0 Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x007d, t01=0x017e}
0xc4b0…c4d6 Head {h00=0x0022, h01=0x0050, text=» RB(N) DUREDY READY INTERRUPT «, t00=0x007d, t01=0x0190}
0xc4d6…c4e8 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007e, t01=0x0026}
0xc4e8…c4fa Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x007e, t01=0x0038}
0xc4fa…c51a Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/200 SEEK ERROR«, t00=0x007e, t01=0x004a}
0xc51a…c530 Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHDU30 «, t00=0x007e, t01=0x006a}
0xc530…c55a Head {h00=0x0026, h01=0x0050, text=» ANKL A1,/440F MOVE SEEK ERROR BIT«, t00=0x007e, t01=0x0080}
0xc55a…c56e Head {h00=0x0010, h01=0x0050, text=» ORK A1,/02 «, t00=0x007e, t01=0x00aa}
0xc56e…c582 Head {h00=0x0010, h01=0x0050, text=»IHDU30 EQU *«, t00=0x007e, t01=0x00be}
0xc582…c5a6 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x007e, t01=0x00d2}
0xc5a6…c5be Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTSAV,A6«, t00=0x007e, t01=0x00f6}
0xc5be…c5d2 Head {h00=0x0010, h01=0x0050, text=» RF(NN) GET «, t00=0x007e, t01=0x010e}
0xc5d2…c5e4 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x007e, t01=0x0122}
0xc5e4…c5f6 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x007e, t01=0x0134}
0xc5f6…c624 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) END:IO DISC UNIT NOT OPERABLE «, t00=0x007e, t01=0x0146}
0xc624…c62e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0174}
0xc62e…c65c Head {h00=0x002a, h01=0x0050, text=»GET LD A5,DWTA5,A6 RELOAD REGISTERS A5«, t00=0x007e, t01=0x017e}
0xc65c…c688 Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTA4,A6 A4 «, t00=0x007f, t01=0x001c}
0xc688…c6b2 Head {h00=0x0026, h01=0x0050, text=» LD A7,DWTA2,A6 GET SECTOR COUNTER«, t00=0x007f, t01=0x0048}
0xc6b2…c6c2 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007f, t01=0x0072}
0xc6c2…c6cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0082}
0xc6cc…c6ec Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x007f, t01=0x008c}
0xc6ec…c6f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00ac}
0xc6f6…c700 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00b6}
0xc700…c71c Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x007f, t01=0x00c0}
0xc71c…c738 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x007f, t01=0x00dc}
0xc738…c754 Head {h00=0x0018, h01=0x0050, text=»* PERFORM ENDIO * «, t00=0x007f, t01=0x00f8}
0xc754…c770 Head {h00=0x0018, h01=0x0050, text=»* * «, t00=0x007f, t01=0x0114}
0xc770…c78c Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x007f, t01=0x0130}
0xc78c…c796 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x014c}
0xc796…c7a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0156}
0xc7a0…c7c8 Head {h00=0x0024, h01=0x0050, text=»END:30 EQU * CU ADDRESS UNKNOWN «, t00=0x007f, t01=0x0160}
0xc7c8…c7e6 Head {h00=0x001a, h01=0x0050, text=» LDK A1,1 NOT OPERABLE«, t00=0x007f, t01=0x0188}
0xc7e6…c814 Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTST,A6 INDICATE RECOVERY DONE«, t00=0x0080, t01=0x0016}
0xc814…c826 Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x0080, t01=0x0044}
0xc826…c83a Head {h00=0x0010, h01=0x0050, text=»END:10 EQU *«, t00=0x0080, t01=0x0056}
0xc83a…c844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x006a}
0xc844…c856 Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0080, t01=0x0074}
0xc856…c888 Head {h00=0x002e, h01=0x0050, text=» LD* A7,DWTSB3-2,A6 GET 1ST RETURN ADDRESS«, t00=0x0080, t01=0x0086}
0xc888…c89a Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x0080, t01=0x00b8}
0xc89a…c8c0 Head {h00=0x0022, h01=0x0050, text=» RF(N) END:20 READ AFTER WRITE«, t00=0x0080, t01=0x00ca}
0xc8c0…c8d8 Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTORD,A6«, t00=0x0080, t01=0x00f0}
0xc8d8…c8f6 Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF GET ORDER «, t00=0x0080, t01=0x0108}
0xc8f6…c90a Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x0080, t01=0x0126}
0xc90a…c936 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) END:20 NOT READ AFTER WRITE «, t00=0x0080, t01=0x013a}
0xc936…c95e Head {h00=0x0024, h01=0x0050, text=» CM ECBEL,A8 RESET SECTORS DONE «, t00=0x0080, t01=0x0166}
0xc95e…c96a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x018e}
0xc96a…c974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x000a}
0xc974…c988 Head {h00=0x0010, h01=0x0050, text=»END:20 EQU *«, t00=0x0081, t01=0x0014}
0xc988…c99e Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FF00«, t00=0x0081, t01=0x0028}
0xc99e…c9b6 Head {h00=0x0014, h01=0x0050, text=» ANS A2,ECBEL,A8«, t00=0x0081, t01=0x003e}
0xc9b6…c9e2 Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTRTY,A6 GET RETRY INDICATOR«, t00=0x0081, t01=0x0056}
0xc9e2…ca08 Head {h00=0x0022, h01=0x0050, text=» RF(Z) END:IO NO RETRIES DONE «, t00=0x0081, t01=0x0082}
0xca08…ca36 Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/100 SET BIT 7 IN RETURN CODE«, t00=0x0081, t01=0x00a8}
0xca36…ca4c Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0081, t01=0x00d6}
0xca4c…ca56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00ec}
0xca56…ca60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00f6}
0xca60…ca74 Head {h00=0x0010, h01=0x0050, text=»END:IO EQU *«, t00=0x0081, t01=0x0100}
0xca74…ca98 Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0081, t01=0x0114}
0xca98…cabc Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER«, t00=0x0081, t01=0x0138}
0xcabc…cac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x015c}
0xcac6…cade Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0081, t01=0x0166}
0xcade…cae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x017e}
0xcae8…caf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0188}
0xcaf2…cb06 (130, 0, 398) Head {h00=0x0010, h01=0x0050, text=»VO:NAM EQU *«, t00=0x0082, t01=0x0004}
0xcb06…cb2a Head {h00=0x0020, h01=0x0050, text=» CF A5,SEEKZ SEEK SECTOR 0 «, t00=0x0082, t01=0x0018}
0xcb2a…cb3c Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0082, t01=0x003c}
0xcb3c…cb76 Head {h00=0x0036, h01=0x0050, text=» RF(NZ) VO:NA8 SEEK-,THROUGHPUT ERROR,NOT OPERABLE«, t00=0x0082, t01=0x004e}
0xcb76…cb8e Head {h00=0x0014, h01=0x0050, text=» CMR A6 SECTOR 0«, t00=0x0082, t01=0x0088}
0xcb8e…cba4 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0082, t01=0x00a0}
0xcba4…cbba Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0082, t01=0x00b6}
0xcbba…cbda Head {h00=0x001c, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER 0«, t00=0x0082, t01=0x00cc}
0xcbda…cbe6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x00ec}
0xcbe6…cbfc Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0082, t01=0x00f8}
0xcbfc…cc12 Head {h00=0x0012, h01=0x0050, text=» CM DWTCYL,A6 «, t00=0x0082, t01=0x010e}
0xcc12…cc1e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0124}
0xcc1e…cc38 Head {h00=0x0016, h01=0x0050, text=» LDK A3,0 SECTOR 0«, t00=0x0082, t01=0x0130}
0xcc38…cc42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x014a}
0xcc42…cc58 Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0082, t01=0x0154}
0xcc58…cc84 Head {h00=0x0028, h01=0x0050, text=» IM DWTFBU,A6 READ TO DRIVER BUFFER «, t00=0x0082, t01=0x016a}
0xcc84…cc98 Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x0083, t01=0x0008}
0xcc98…ccaa Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x0083, t01=0x001c}
0xccaa…ccde Head {h00=0x0030, h01=0x0050, text=» CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR«, t00=0x0083, t01=0x002e}
0xccde…ccea Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0062}
0xccea…ccf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x006e}
0xccf4…cd0a Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0083, t01=0x0078}
0xcd0a…cd32 Head {h00=0x0024, h01=0x0050, text=» LDKL A1,/8019 READ SECTOR ZERO «, t00=0x0083, t01=0x008e}
0xcd32…cd5a Head {h00=0x0024, h01=0x0050, text=» LDKL A2,BUFFER TO DRIVER BUFFER«, t00=0x0083, t01=0x00b6}
0xcd5a…cd70 Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x0083, t01=0x00de}
0xcd70…cd8a Head {h00=0x0016, h01=0x0050, text=» ANK A1,3 ERROR ? «, t00=0x0083, t01=0x00f4}
0xcd8a…cd96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x010e}
0xcd96…cda0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x011a}
0xcda0…cdd4 Head {h00=0x0030, h01=0x0050, text=» RF(NZ) VO:NA8 THROUGHPUT ERROR,NOT OPERABLE«, t00=0x0083, t01=0x0124}
0xcdd4…cdec Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x0083, t01=0x0158}
0xcdec…ce0a Head {h00=0x001a, h01=0x0050, text=» LDK A3,/F0 FILE CODE «, t00=0x0083, t01=0x0170}
0xce0a…ce22 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTSAV,A6«, t00=0x0083, t01=0x018e}
0xce22…ce38 Head {h00=0x0012, h01=0x0050, text=» RF(Z) VO:NA6 «, t00=0x0084, t01=0x0016}
0xce38…ce64 Head {h00=0x0028, h01=0x0050, text=» LDKL A3,/80F0 INDICATE TEST STATUS «, t00=0x0084, t01=0x002c}
0xce64…ce78 Head {h00=0x0010, h01=0x0050, text=»VO:NA6 EQU *«, t00=0x0084, t01=0x0058}
0xce78…ceae Head {h00=0x0032, h01=0x0050, text=» CF A15,VOLGET VOLUMR NAME TO DWT INDICATE NVL«, t00=0x0084, t01=0x006c}
0xceae…cec6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRDU01 «, t00=0x0084, t01=0x00a2}
0xcec6…ced0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00ba}
0xced0…ceda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00c4}
0xceda…ceee Head {h00=0x0010, h01=0x0050, text=»DUNA40 EQU *«, t00=0x0084, t01=0x00ce}
0xceee…cf00 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0084, t01=0x00e2}
0xcf00…cf3a Head {h00=0x0036, h01=0x0050, text=» LDK A7,1 TO INDICATE NOT TRANSFER PARAMETER ORDER«, t00=0x0084, t01=0x00f4}
0xcf3a…cf66 Head {h00=0x0028, h01=0x0050, text=» LD A2,BUFFER+32 CHECK IF TOSS DISC «, t00=0x0084, t01=0x012e}
0xcf66…cf7a Head {h00=0x0010, h01=0x0050, text=» CWK A2,'TO'«, t00=0x0084, t01=0x015a}
0xcf7a…cf98 Head {h00=0x001a, h01=0x0050, text=» RF(NE) DUNA70 NO TOSS«, t00=0x0084, t01=0x016e}
0xcf98…cfd0 Head {h00=0x0034, h01=0x0050, text=» LD A2,BUFFER+40 CHECK IF RELEASE 10 OR GREATER «, t00=0x0084, t01=0x018c}
0xcfd0…cfe6 Head {h00=0x0012, h01=0x0050, text=» CWK A2,/2031 «, t00=0x0085, t01=0x0034}
0xcfe6…d00e Head {h00=0x0024, h01=0x0050, text=» RF(NE) DUNA70 REL LESS THAN 10 «, t00=0x0085, t01=0x004a}
0xd00e…d04c Head {h00=0x003a, h01=0x0050, text=» LD A2,BUFFER+48 GET FORMAT AND DEVICE TYPE PARAMETER «, t00=0x0085, t01=0x0072}
0xd04c…d084 Head {h00=0x0034, h01=0x0050, text=»TRANPA EQU * LABEL FOR TRANSFER PARAMETER ORDER «, t00=0x0085, t01=0x00b0}
0xd084…d0b2 Head {h00=0x002a, h01=0x0050, text=» CF A15,INXDWT GET INDEXED DWT ADDRESS«, t00=0x0085, t01=0x00e8}
0xd0b2…d0dc Head {h00=0x0026, h01=0x0050, text=» ECR A3,A2 SEPARATE THE PARAMETERS«, t00=0x0085, t01=0x0116}
0xd0dc…d0ee Head {h00=0x000e, h01=0x0050, text=» ANK A3,/3«, t00=0x0085, t01=0x0140}
0xd0ee…d100 Head {h00=0x000e, h01=0x0050, text=» ANK A2,/3«, t00=0x0085, t01=0x0152}
0xd100…d12e Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTFOR,A4 SAVE FORMAT PARAMETER«, t00=0x0085, t01=0x0164}
0xd12e…d15a (134, 0, 400) Head {h00=0x0028, h01=0x0050, text=» LDKL A1,6324 SECTORS ON VERSION A2 «, t00=0x0086, t01=0x0004}
0xd15a…d174 Head {h00=0x0016, h01=0x0050, text=» SUK A3,2 FORMAT ?«, t00=0x0086, t01=0x0030}
0xd174…d194 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUNA60 VERSION A2«, t00=0x0086, t01=0x004a}
0xd194…d1b4 Head {h00=0x001c, h01=0x0050, text=» RF(N) DUNA50 VERSION A1«, t00=0x0086, t01=0x006a}
0xd1b4…d1d2 Head {h00=0x001a, h01=0x0050, text=» ADK A1,204 VERSION A3«, t00=0x0086, t01=0x008a}
0xd1d2…d1e6 Head {h00=0x0010, h01=0x0050, text=»DUNA50 EQU *«, t00=0x0086, t01=0x00a8}
0xd1e6…d200 Head {h00=0x0016, h01=0x0050, text=» ADKL A1,9588-6324«, t00=0x0086, t01=0x00bc}
0xd200…d214 Head {h00=0x0010, h01=0x0050, text=»DUNA60 EQU *«, t00=0x0086, t01=0x00d6}
0xd214…d226 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0086, t01=0x00ea}
0xd226…d244 Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUNA70 PTS 6875«, t00=0x0086, t01=0x00fc}
0xd244…d274 Head {h00=0x002c, h01=0x0050, text=» ADR A1,A1 PTS 6876 2*MAXSEC ON PTS 6875«, t00=0x0086, t01=0x011a}
0xd274…d288 Head {h00=0x0010, h01=0x0050, text=»DUNA70 EQU *«, t00=0x0086, t01=0x014a}
0xd288…d2b6 Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTSMX,A4 MAX SECTOR NO IN DWT «, t00=0x0086, t01=0x015e}
0xd2b6…d2ee Head {h00=0x0034, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE FOR TRANSFER PARAM. «, t00=0x0086, t01=0x018c}
0xd2ee…d31c Head {h00=0x002a, h01=0x0050, text=» ADK A7,0 CHECK IF TRANSFER PARAMETER «, t00=0x0087, t01=0x0034}
0xd31c…d332 Head {h00=0x0012, h01=0x0050, text=» RB(Z) END:20 «, t00=0x0087, t01=0x0062}
0xd332…d33c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0078}
0xd33c…d352 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x0087, t01=0x0082}
0xd352…d35c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0098}
0xd35c…d366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00a2}
0xd366…d394 Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTA4,A6 RESTORE RETRY COUNTER «, t00=0x0087, t01=0x00ac}
0xd394…d3ac Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOR,A6 «, t00=0x0087, t01=0x00da}
0xd3ac…d3be Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0087, t01=0x00f2}
0xd3be…d3d6 Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0087, t01=0x0104}
0xd3d6…d3e8 Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0087, t01=0x011c}
0xd3e8…d3fe Head {h00=0x0012, h01=0x0050, text=» RB(NZ) VO:NAM«, t00=0x0087, t01=0x012e}
0xd3fe…d410 Head {h00=0x000e, h01=0x0050, text=» RF VO:NA9«, t00=0x0087, t01=0x0144}
0xd410…d424 Head {h00=0x0010, h01=0x0050, text=»VO:NA8 EQU *«, t00=0x0087, t01=0x0156}
0xd424…d440 Head {h00=0x0018, h01=0x0050, text=» LDK A1,1 ERROR CODE«, t00=0x0087, t01=0x016a}
0xd440…d454 Head {h00=0x0010, h01=0x0050, text=»VO:NA9 EQU *«, t00=0x0087, t01=0x0186}
0xd454…d464 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0088, t01=0x000a}
0xd464…d46e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x001a}
0xd46e…d488 Head {h00=0x0016, h01=0x0050, text=»* TIMER POINTER «, t00=0x0088, t01=0x0024}
0xd488…d492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x003e}
0xd492…d4b4 Head {h00=0x001e, h01=0x0050, text=»TIMER DATA 0 TIMER POINTER«, t00=0x0088, t01=0x0048}
0xd4b4…d4be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x006a}
0xd4be…d4de Head {h00=0x001c, h01=0x0050, text=» EJECT DRDU01 DRDU01«, t00=0x0088, t01=0x0074}
0xd4de…d4e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0094}
0xd4e8…d4f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x009e}
0xd4f2…d520 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0088, t01=0x00a8}
0xd520…d54e Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0088, t01=0x00d6}
0xd54e…d57c Head {h00=0x002a, h01=0x0050, text=»* DEVICE WORK TABLE * «, t00=0x0088, t01=0x0104}
0xd57c…d5aa Head {h00=0x002a, h01=0x0050, text=»* * «, t00=0x0088, t01=0x0132}
0xd5aa…d5d8 Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0088, t01=0x0160}
0xd5d8…d5e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x018e}
0xd5e2…d5ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0008}
0xd5ec…d600 Head {h00=0x0010, h01=0x0050, text=»DWDU01 EQU *«, t00=0x0089, t01=0x0012}
0xd600…d626 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PHYSICAL SECTOR NUMBER«, t00=0x0089, t01=0x0026}
0xd626…d644 Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT STATUS«, t00=0x0089, t01=0x004c}
0xd644…d660 Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0089, t01=0x006a}
0xd660…d676 Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0089, t01=0x0086}
0xd676…d69c Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x0089, t01=0x009c}
0xd69c…d6b8 Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0089, t01=0x00c2}
0xd6b8…d6e0 Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0089, t01=0x00de}
0xd6e0…d6fe Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0089, t01=0x0106}
0xd6fe…d708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0124}
0xd708…d71e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0089, t01=0x012e}
0xd71e…d748 Head {h00=0x0026, h01=0x0022, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0089, t01=0x0144}
0xd748…d76c Head {h00=0x0020, h01=0x0050, text=» DATA ECBDU1 MMU ECB ADDRESS«, t00=0x0089, t01=0x016e}
0xd76c…d778 (138, 0, 400) Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x008a, t01=0x0004}
0xd778…d782 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0010}
0xd782…d79e Head {h00=0x0018, h01=0x0050, text=»DWTFSW EQU *-DWDU01 «, t00=0x008a, t01=0x001a}
0xd79e…d7ae Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0036}
0xd7ae…d7da Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x008a, t01=0x0046}
0xd7da…d7f6 Head {h00=0x0018, h01=0x0050, text=»DWTBSE EQU *-DWDU01 «, t00=0x008a, t01=0x0072}
0xd7f6…d806 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x008e}
0xd806…d836 Head {h00=0x002c, h01=0x0050, text=»DWTUBU EQU *-DWDU01 USER BUFFER POINTER «, t00=0x008a, t01=0x009e}
0xd836…d846 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x00ce}
0xd846…d862 Head {h00=0x0018, h01=0x0050, text=»DWTSWD EQU *-DWDU01 «, t00=0x008a, t01=0x00de}
0xd862…d872 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x00fa}
0xd872…d87c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x010a}
0xd87c…d892 Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x008a, t01=0x0114}
0xd892…d89c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x012a}
0xd89c…d8a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0134}
0xd8a6…d8c2 Head {h00=0x0018, h01=0x0050, text=»DWTRTY EQU *-DWDU01 «, t00=0x008a, t01=0x013e}
0xd8c2…d8d2 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x015a}
0xd8d2…d8e2 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x016a}
0xd8e2…d8fc Head {h00=0x0016, h01=0x0050, text=» DATA /C000 FIXED «, t00=0x008a, t01=0x017a}
0xd8fc…d934 (139, 0, 398) Head {h00=0x0034, h01=0x0050, text=» DATA /8000 NEW VOLUME LOADED INDICATOR CARTR. 1«, t00=0x008b, t01=0x0004}
0xd934…d94e Head {h00=0x0016, h01=0x0050, text=» DATA /C000 FIXED «, t00=0x008b, t01=0x003c}
0xd94e…d982 Head {h00=0x0030, h01=0x0050, text=» DATA /8000 NEW VOLUME LOADED IND. CARTR. 2 «, t00=0x008b, t01=0x0056}
0xd982…d9b8 Head {h00=0x0032, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST FIXED «, t00=0x008b, t01=0x008a}
0xd9b8…d9f2 Head {h00=0x0036, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST CARTRIDGE «, t00=0x008b, t01=0x00c0}
0xd9f2…d9fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00fa}
0xd9fc…da12 Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008b, t01=0x0104}
0xda12…da48 Head {h00=0x0032, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND FIXED «, t00=0x008b, t01=0x011a}
0xda48…da82 Head {h00=0x0036, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND CARTRIDGE «, t00=0x008b, t01=0x0150}
0xda82…da8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x018a}
0xda8e…da98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0008}
0xda98…daae Head {h00=0x0012, h01=0x0050, text=» EJECT DRDU01«, t00=0x008c, t01=0x0012}
0xdaae…dab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0028}
0xdab8…dac2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0032}
0xdac2…dade Head {h00=0x0018, h01=0x0050, text=»DWTSAV EQU *-DWDU01 «, t00=0x008c, t01=0x003c}
0xdade…daee Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x008c, t01=0x0058}
0xdaee…db2a Head {h00=0x0038, h01=0x0050, text=»DWTFBU EQU *-DWDU01 FLAG INDICATING IO TO DRIVER BUF«, t00=0x008c, t01=0x0068}
0xdb2a…db3a Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008c, t01=0x00a4}
0xdb3a…db60 Head {h00=0x0022, h01=0x0050, text=»DWTCIO EQU *-DWDU01 CIO-START «, t00=0x008c, t01=0x00b4}
0xdb60…db76 Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAF1«, t00=0x008c, t01=0x00da}
0xdb76…db8c Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAC1«, t00=0x008c, t01=0x00f0}
0xdb8c…db96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0106}
0xdb96…dbac Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008c, t01=0x0110}
0xdbac…dbc2 Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAF2«, t00=0x008c, t01=0x0126}
0xdbc2…dbd8 Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAC2«, t00=0x008c, t01=0x013c}
0xdbd8…dbe4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0152}
0xdbe4…dbee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x015e}
0xdbee…dc0a Head {h00=0x0018, h01=0x0050, text=»DWTCYL EQU *-DWDU01 «, t00=0x008c, t01=0x0168}
0xdc0a…dc2e Head {h00=0x0020, h01=0x0050, text=» DATA /FFFF CYLINDER NUMBER «, t00=0x008c, t01=0x0184}
0xdc2e…dc38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0018}
0xdc38…dc4e Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008d, t01=0x0022}
0xdc4e…dc6a Head {h00=0x0018, h01=0x0050, text=» DATA /FFFF 2ND UNIT«, t00=0x008d, t01=0x0038}
0xdc6a…dc76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0054}
0xdc76…dc80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0060}
0xdc80…dc9c Head {h00=0x0018, h01=0x0050, text=»DWTSMX EQU *-DWDU01 «, t00=0x008d, t01=0x006a}
0xdc9c…dcc6 Head {h00=0x0026, h01=0x0050, text=» DATA 1 MAX SECTORS ON FIXED DISC «, t00=0x008d, t01=0x0086}
0xdcc6…dcee Head {h00=0x0024, h01=0x0050, text=» DATA 1 MAX SECTORS ON CARTRIDGE«, t00=0x008d, t01=0x00b0}
0xdcee…dcf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00d8}
0xdcf8…dd0e Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008d, t01=0x00e2}
0xdd0e…dd26 Head {h00=0x0014, h01=0x0050, text=» DATA 1 2ND UNIT«, t00=0x008d, t01=0x00f8}
0xdd26…dd3e Head {h00=0x0014, h01=0x0050, text=» DATA 1 2ND UNIT«, t00=0x008d, t01=0x0110}
0xdd3e…dd4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0128}
0xdd4a…dd54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0134}
0xdd54…dd70 Head {h00=0x0018, h01=0x0050, text=»DWTFOR EQU *-DWDU01 «, t00=0x008d, t01=0x013e}
0xdd70…dd94 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DISC FORMAT ON FIXED«, t00=0x008d, t01=0x015a}
0xdd94…ddba Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISC FORMAT CARTRIDGE «, t00=0x008d, t01=0x017e}
0xddba…ddc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0014}
0xddc4…ddda Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008e, t01=0x001e}
0xddda…ddea Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0034}
0xddea…ddfa Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0044}
0xddfa…de06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0054}
0xde06…de10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0060}
0xde10…de28 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x008e, t01=0x006a}
0xde28…de40 Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x008e, t01=0x0082}
0xde40…de52 Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x008e, t01=0x009a}
0xde52…de70 Head {h00=0x001a, h01=0x0050, text=»DWTSB3 EQU *-DWDU01-2 «, t00=0x008e, t01=0x00ac}
0xde70…de7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00ca}
0xde7a…de8c Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x008e, t01=0x00d4}
0xde8c…dea8 Head {h00=0x0018, h01=0x0050, text=»DWTSEP EQU *-DWDU01 «, t00=0x008e, t01=0x00e6}
0xdea8…deb8 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0102}
0xdeb8…ded4 Head {h00=0x0018, h01=0x0050, text=»DWTSEI EQU *-DWDU01 «, t00=0x008e, t01=0x0112}
0xded4…dee4 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x012e}
0xdee4…def0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x013e}
0xdef0…defa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x014a}
0xdefa…df10 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x008e, t01=0x0154}
0xdf10…df24 Head {h00=0x0010, h01=0x0050, text=»ECBDU1 EQU *«, t00=0x008e, t01=0x016a}
0xdf24…df40 Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 «, t00=0x008e, t01=0x017e}
0xdf40…df5c Head {h00=0x0018, h01=0x0050, text=»DWTBA1 EQU *-DWDU01 «, t00=0x008f, t01=0x000a}
0xdf5c…df6c Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x0026}
0xdf6c…df88 Head {h00=0x0018, h01=0x0050, text=»DWTBA2 EQU *-DWDU01 «, t00=0x008f, t01=0x0036}
0xdf88…df98 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x0052}
0xdf98…dfbc Head {h00=0x0020, h01=0x0050, text=»DWTPAG EQU *-DWDU01 MMU PAGE«, t00=0x008f, t01=0x0062}
0xdfbc…dfcc Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x0086}
0xdfcc…dfdc Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x0096}
0xdfdc…dfe8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00a6}
0xdfe8…dff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00b2}
0xdff2…dffc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00bc}
0xdffc…e006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00c6}
0xe006…e012 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x008f, t01=0x00d0}
0xe012…e016 Head {h00=0x4004, h01=0x0000}
0xe016…e01a 00 8f 00 dc ┆ ┆
0xe01a…e022 (144, 1, 8) 20 04 00 00 00 90 00 04 ┆ ┆
0xe022…e072 (145, 0, 400) 20 57 49 54 48 20 38 20 52 45 47 49 53 54 45 52 53 20 4f 4e 20 41 31 35 20 53 54 41 43 4b 2e 20 00 00 01 76 00 3e 00 50 2a 20 20 20 54 48 45 20 44 49 53 50 41 54 43 48 45 52 20 43 48 45 43 4b 53 20 49 46 20 54 48 45 52 45 20 49 53 20 41 20 ┆ WITH 8 REGISTERS ON A15 STACK. v > P* THE DISPATCHER CHECKS IF THERE IS A ┆
0xe072…e0c2 54 41 53 4b 20 49 4e 20 44 49 53 50 41 54 43 48 45 52 00 01 00 28 00 3c 00 50 2a 20 20 20 51 55 45 55 45 20 57 49 54 48 20 48 49 47 48 45 52 20 50 52 49 4f 52 49 54 59 20 54 48 41 4e 20 49 4e 54 45 52 52 55 50 54 45 44 20 50 52 4f 47 52 41 ┆TASK IN DISPATCHER ( < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRA┆
0xe0c2…e112 4d 2e 00 01 00 6a 00 3a 00 50 2a 20 20 20 2d 20 49 46 20 53 4f 2c 20 54 48 45 20 52 55 4e 4e 49 4e 47 20 54 41 53 4b 20 49 53 20 51 55 45 55 45 44 20 41 4e 44 20 54 48 45 20 48 49 47 48 45 52 00 01 00 aa 00 24 00 50 2a 20 20 20 20 20 50 52 ┆M. j : P* - IF SO, THE RUNNING TASK IS QUEUED AND THE HIGHER $ P* PR┆
0xe112…e162 49 4f 52 49 54 59 20 54 41 53 4b 20 49 53 20 53 54 41 52 54 45 44 2e 20 00 01 00 e8 00 3a 00 50 2a 20 20 20 2d 20 49 46 20 4e 4f 54 2c 20 52 45 54 55 52 4e 20 49 53 20 47 49 56 45 4e 20 54 4f 20 49 4e 54 45 52 52 55 50 54 45 44 20 50 52 4f ┆IORITY TASK IS STARTED. : P* - IF NOT, RETURN IS GIVEN TO INTERRUPTED PRO┆
0xe162…e1b2 47 52 41 4d 2e 20 00 01 01 10 00 06 00 50 2a 20 00 01 01 4e 00 32 00 50 2a 20 20 20 45 4e 54 52 59 20 27 44 49 53 45 4e 44 27 20 43 41 4c 4c 53 20 54 45 4e 44 49 4f 20 42 45 46 4f 52 45 20 54 44 49 53 50 2e 20 00 01 01 58 00 06 00 50 2a 20 ┆GRAM. P* N 2 P* ENTRY 'DISEND' CALLS TENDIO BEFORE TDISP. X P* ┆
0xe1b2…e202 (146, 0, 400) 00 01 01 8e 00 36 00 50 2a 20 20 20 45 4e 54 52 59 20 27 44 49 53 49 4f 45 27 20 53 45 54 53 20 42 49 54 20 30 20 49 4e 20 41 31 20 42 45 46 4f 52 45 20 44 49 53 45 4e 44 2e 00 02 00 08 00 06 00 50 2a 20 00 02 00 42 00 38 00 50 2a 20 20 20 ┆ 6 P* ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND. P* B 8 P* ┆
0xe202…e252 45 4e 54 52 59 20 27 4d 45 58 49 54 27 20 45 58 49 54 53 20 41 20 4d 4f 4e 49 54 4f 52 20 54 41 53 4b 20 42 45 46 4f 52 45 20 54 44 49 53 50 2e 00 02 00 4c 00 06 00 50 2a 20 00 02 00 88 00 48 00 50 2a 20 20 20 45 4e 54 52 59 20 27 51 4d 45 ┆ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP. L P* H P* ENTRY 'QME┆
0xe252…e2a2 58 49 54 27 20 43 41 4c 4c 53 20 51 54 4a 4f 42 20 42 45 46 4f 52 45 20 45 58 49 54 20 49 53 20 4d 41 44 45 20 4f 4e 20 4d 4f 4e 49 54 4f 52 20 54 41 53 4b 2e 20 00 02 00 92 00 06 00 50 2a 20 00 02 00 de 00 30 00 50 2a 20 20 20 45 4e 54 52 ┆XIT' CALLS QTJOB BEFORE EXIT IS MADE ON MONITOR TASK. P* 0 P* ENTR┆
0xe2a2…e2f2 59 20 27 54 45 58 49 54 27 20 45 58 49 54 53 20 41 20 54 41 53 4b 20 42 45 46 4f 52 45 20 54 44 49 53 50 2e 00 02 00 e8 00 06 00 50 2a 20 00 02 01 1c 00 40 00 50 2a 20 20 20 45 4e 54 52 59 20 27 54 50 41 55 53 45 27 20 53 45 54 53 20 41 20 ┆Y 'TEXIT' EXITS A TASK BEFORE TDISP. P* @ P* ENTRY 'TPAUSE' SETS A ┆
0xe2f2…e342 54 41 53 4b 20 49 4e 20 50 41 55 53 45 20 53 54 41 54 45 20 42 45 46 4f 52 45 20 54 44 49 53 50 2e 20 00 02 01 26 00 06 00 50 2a 20 00 02 01 6a 00 36 00 50 2a 20 20 20 45 4e 54 52 59 20 27 41 43 54 44 49 53 27 20 41 43 54 49 56 41 54 45 53 ┆TASK IN PAUSE STATE BEFORE TDISP. & P* j 6 P* ENTRY 'ACTDIS' ACTIVATES┆
0xe342…e392 (147, 0, 400) 20 41 20 54 41 53 4b 20 42 45 46 4f 52 45 20 54 44 49 53 50 2e 20 00 02 01 74 00 06 00 50 2a 20 00 03 00 1e 00 44 00 50 2a 20 20 20 45 4e 54 52 59 20 27 52 45 54 55 52 38 27 20 4c 4f 41 44 53 20 38 20 52 45 47 49 53 54 45 52 53 20 46 52 4f ┆ A TASK BEFORE TDISP. t P* D P* ENTRY 'RETUR8' LOADS 8 REGISTERS FRO┆
0xe392…e3e2 4d 20 41 31 35 20 53 54 41 43 4b 20 41 4e 44 20 52 45 54 55 52 4e 53 2e 00 03 00 28 00 06 00 50 2a 20 00 03 00 70 00 12 00 50 5c 45 4a 45 43 54 5c 5c 5c 54 44 49 53 50 00 03 00 7a 00 06 00 50 2a 20 00 03 00 90 00 06 00 50 2a 20 00 03 00 9a ┆M A15 STACK AND RETURNS. ( P* p P EJECT TDISP z P* P* ┆
0xe3e2…e432 00 10 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 03 00 a4 00 10 00 50 2a 20 45 4e 54 52 49 45 53 20 2a 20 00 03 00 b8 00 10 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 03 00 cc 00 06 00 50 2a 20 00 03 00 e0 00 06 00 50 2a 20 00 03 00 ea ┆ P*********** P* ENTRIES * P*********** P* P* ┆
0xe432…e482 00 22 00 50 5c 45 4e 54 52 59 5c 54 44 49 53 50 5c 44 49 53 50 41 54 43 48 45 52 20 45 4e 54 52 59 20 00 03 00 f4 00 1c 00 50 5c 45 4e 54 52 59 5c 54 50 41 55 53 45 5c 50 41 55 53 45 20 54 41 53 4b 00 03 01 1a 00 1a 00 50 5c 45 4e 54 52 59 ┆ " P ENTRY TDISP DISPATCHER ENTRY P ENTRY TPAUSE PAUSE TASK P ENTRY┆
0xe482…e4d2 5c 54 45 58 49 54 5c 45 58 49 54 20 54 41 53 4b 00 03 01 3a 00 22 00 50 5c 45 4e 54 52 59 5c 4d 45 58 49 54 5c 45 58 49 54 20 4d 4f 4e 49 54 4f 52 20 54 41 53 4b 00 03 01 58 00 32 00 50 5c 45 4e 54 52 59 5c 51 4d 45 58 49 54 5c 51 55 45 55 ┆ TEXIT EXIT TASK : " P ENTRY MEXIT EXIT MONITOR TASK X 2 P ENTRY QMEXIT QUEU┆
0xe4d2…e522 (148, 0, 398) 45 20 54 41 53 4b 20 41 4e 44 20 45 58 49 54 20 4d 4f 4e 49 54 4f 52 20 54 41 53 4b 00 03 01 7e 00 2c 00 50 5c 45 4e 54 52 59 5c 41 43 54 44 49 53 5c 41 43 54 49 56 41 54 45 20 54 41 53 4b 20 41 4e 44 20 44 49 53 50 41 54 43 48 00 04 00 24 ┆E TASK AND EXIT MONITOR TASK ~ , P ENTRY ACTDIS ACTIVATE TASK AND DISPATCH $┆
0xe522…e572 00 22 00 50 5c 45 4e 54 52 59 5c 44 49 53 49 4f 45 5c 49 2f 4f 20 45 52 52 4f 52 20 45 4e 54 52 59 20 00 04 00 54 00 26 00 50 5c 45 4e 54 52 59 5c 44 49 53 45 4e 44 5c 45 4e 44 20 49 2f 4f 20 41 4e 44 20 44 49 53 50 41 54 43 48 00 04 00 7a ┆ " P ENTRY DISIOE I/O ERROR ENTRY T & P ENTRY DISEND END I/O AND DISPATCH z┆
0xe572…e5c2 00 36 00 50 5c 45 4e 54 52 59 5c 44 49 53 51 55 45 5c 50 4f 49 4e 54 45 52 20 54 4f 20 46 49 52 53 54 20 54 41 53 4b 20 49 4e 20 44 49 53 50 2e 20 51 55 45 55 45 00 04 00 a4 00 2c 00 50 5c 45 4e 54 52 59 5c 50 52 55 4e 5c 54 54 41 42 20 41 ┆ 6 P ENTRY DISQUE POINTER TO FIRST TASK IN DISP. QUEUE , P ENTRY PRUN TTAB A┆
0xe5c2…e612 44 44 52 45 53 53 20 4f 46 20 52 55 4e 4e 49 4e 47 20 54 41 53 4b 00 04 00 de 00 2e 00 50 5c 45 4e 54 52 59 5c 52 45 54 55 52 38 5c 4c 4f 41 44 20 38 20 52 45 47 49 53 54 45 52 53 20 41 4e 44 20 52 45 54 55 52 4e 20 00 04 01 0e 00 12 00 50 ┆DDRESS OF RUNNING TASK . P ENTRY RETUR8 LOAD 8 REGISTERS AND RETURN P┆
0xe612…e660 5c 45 4a 45 43 54 5c 5c 5c 54 44 49 53 50 00 04 01 40 00 06 00 50 2a 20 00 04 01 56 00 06 00 50 2a 20 00 04 01 60 00 12 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 04 01 6a 00 12 00 50 2a 20 45 58 54 45 52 4e 41 4c 53 20 2a 20 ┆ EJECT TDISP @ P* V P* ` P************* j P* EXTERNALS * ┆