1 /RL0.PA RL01 DRIVE 0 NON-SYSTEM HANDLER 2 / 3 / 4 / 5 / 6 / 7 / 8 / 9 / 10 / 11 /COPYRIGHT (C) 1977, 1984 BY DIGITAL EQUIPMENT CORPORATION 12 / 13 / 14 / 15 / 16 / 17 / 18 / 19 / 20 / 21 / 22 /THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE 23 /AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 24 /CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 25 /FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 26 / 27 /THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE PURCHASER 28 /UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED 29 /(WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH 30 /SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED IN WRITING BY DIGITAL. 31 / 32 /DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE 33 /OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY 34 /DIGITAL. 35 / 36 / 37 / 38 / 39 / 40 / 41 / 42 / 43 / 44 / 45 46 /RL01 DRIVE 0 NON-SYSTEM HANDLER 47 48 VERSION="B&77 49 50 NOCHK= 0 / 0 = No ctrl c check, 1 = check 51 52 /NOTES: 53 /1. PRE-OMNIBUS COMPUTERS NOT SUPPORTED. 54 55 /EDIT HISTORY: 56 / 13-OCT-77 CREATION 57 / 13-AUG-84 added ctrl c switch 58 59 /INSTRUCTIONS THAT GENERATE CONSTANTS 60 61 AC0001=CLA IAC 62 AC0002=CLA CLL CML RTL 63 AC0003=CLA CLL CML IAC RAL /* 64 AC0004=CLA CLL IAC RTL /* 65 AC0006=CLA CLL CML IAC RTL /* 66 AC0100=CLA IAC BSW /* 67 AC2000=CLA CLL CML RTR 68 AC3777=CLA CLL CMA RAR 69 AC4000=CLA CLL CML RAR 70 AC5777=CLA CLL CMA RTR 71 AC6000=CLA CLL CML IAC RTR /* 72 AC7775=CLA CLL CMA RTL 73 AC7776=CLA CLL CMA RAL 74 75 /* USE ONLY ON VT-78 AND PDP-8E,F,M,A 76 77 /ID CODE AT START OF BAD BLOCK LIST (BBL) 78 ID=123 79 80 /BAD BLOCK LIST FORMAT: 81 /WORD CONTENTS 82 /0 ID (IDENTIFICATION CODE) 83 /1 BAD BLOCKS FOR DEVICE A (ASCENDING ORDER) 84 /... ... 85 /20 0 (TERMINATOR FOR LIST A) 86 /21 BAD BLOCKS FOR DEVICE B (ASCENDING ORDER) 87 /... ... 88 /40 0 (TERMINATOR FOR LIST B) 89 90 /RL01 DEFINITIONS 91 92 RLIOT=6600 93 RLDC=RLIOT 0 /CLEAR DEVICE 94 RLSD=RLIOT 1 /SKIP IF DONE 95 RLMA=RLIOT 2 /LOAD MEM ADDR 96 RLCA=RLIOT 3 /LOAD REGISTER "A" 97 RLCB=RLIOT 4 /LOAD REG "B" AND EXECUTE 98 RLSA=RLIOT 5 /LOAD SECTOR ADDR 99 /RLIOT 6 UNUSED 100 RLWC=RLIOT 7 /LOAD WORD COUNT 101 RRER=RLIOT 10 /READ ERROR REG 102 RRWC=RLIOT 11 /READ WORD COUNT 103 RRCA=RLIOT 12 /READ REG "A" 104 RRCB=RLIOT 13 /READ REG "B" 105 RRSA=RLIOT 14 /READ SECTOR ADDR 106 RRSI=RLIOT 15 /READ SILO BYTE 107 /RLIOT 16 UNUSED 108 RLSE=RLIOT 17 /SKIP IF ERROR 109 /RLCB FUNCTION BITS: 110 RLMT=0 /MAINTENANCE MODE 111 RLRE=1 /RESET DRIVE ERRORS 112 RLST=2 /READ STATUS REGS INTO SILO 113 RLSK=3 /SEEK 114 RLRH=4 /READ HEADER 115 RLWR=5 /WRITE 116 RLRD=6 /READ 117 RLRN=7 /READ WITH NO HEADER CHECK 118 /BIT DEFINITIONS IN REGISTERS: 119 BYTE=1000 /BYTE TRANSFER MODE 120 /HEADER BLOCK FOR USE BY "BUILD" 121 122 *0 123 000000 7776 -2 /- NR DEVICES PER HANDLER 124 125 /FORMAT OF ENTRIES IN HEADER BLOCK: 126 /WORD DESCRIPTION 127 /0 GROUP NAME (4 CHAR) 128 /2 DEVICE NAME (4 CHAR) 129 /4 DCB WORD FOR AN RL (TYPE 26) DIRECTORY DEVICE 130 /5 OFFSET TO ENTRY POINT, 2-PAGE INDICATOR 131 /6 0 (UNUSED WORD) 132 /7 0 TO REPRESENT NON-SYSTEM DEVICE 133 134 DRIVE=0 135 136 000001 2214 DEVICE RL0;DEVICE RL0A;4260;RLA&177+4000;0;0 000002 6000 000003 2214 000004 6001 000005 4260 000006 4044 000007 0000 000010 0000 137 000011 2214 DEVICE RL0;DEVICE RL0B;4260;RLB&177+4000;0;0 000012 6000 000013 2214 000014 6002 000015 4260 000016 4040 000017 0000 000020 0000 138 /HANDLER CODE 139 *200 /FIRST PAGE 140 141 /DATA 142 143 000200 0017 A17, 17 144 000201 0047 A47, 47 145 000202 0175 A175, 175 146 000203 0200 A200, 200 147 000204 0377 A377, 377 148 000205 7751 A7751, 7751 149 000206 1264 BASE, TAD BBL+1 150 000207 0146 ABLOCK, BLOCK-MAIN 151 000210 0161 AMA, MA-MAIN /RELATIVE ADDR OF MA 152 000211 0151 ASECT, SECTOR-MAIN 153 000212 0147 ATRACK, TRACK-MAIN 154 000213 0141 AERROR, ERRORR-MAIN 155 156 /SET UP ARGUMENTS BY CALLING 2ND PAGE SUBROUTINE 157 000214 1243 SET, TAD OFFSET /INITIALIZE MAPPING (BELOW) 158 000215 7002 BSW 159 000216 7106 CLL RTL /(0 OR 20: DEVICE A OR B) 160 000217 1206 TAD BASE 161 000220 3223 DCA MAP 162 000221 1240 TAD RLB /ADDR OF ARGS 163 000222 4662 JMS I GO /SETUP (AC NON-ZERO) 164 /MAP NEXT BLOCK AROUND ANY BAD BLOCKS BELOW IT 165 000223 1000 MAP, TAD /INITIALIZED ABOVE 166 000224 7450 SNA /0 TERMINATES LIST 167 000225 5327 JMP MAPPED 168 000226 7161 STL CIA /13-BIT NEGATE 169 000227 1607 TAD I ABLOCK /COMPARE WITH BLOCK 170 000230 7630 SZL CLA 171 000231 5327 JMP MAPPED /BAD BLOCK IS ABOVE CURRENT BLOCK 172 000232 2223 ISZ MAP /TRY NEXT BAD BLOCK ALSO 173 000233 2607 NEXT, ISZ I ABLOCK /INCREMENT CURRENT BLOCK NUMBER, 174 /EITHER DURING 175 /BAD BLOCK MAPPING OR AFTER SUCCESSFUL TRANSFER 176 /OF TWO SECTORS (PAGES) WITH MORE TO GO 177 000234 5223 JMP MAP /CONTINUE MAPPING 178 000235 5613 JMP I AERROR /ERROR ON BLOCK OVERFLOW 179 000236 0000 ZBLOCK 240+DRIVE-. /UNUSED 000237 0000 180 181 /ENTRY POINT FOR DEVICE B 182 183 000240 0002 RLB, VERSION 184 000241 7307 AC0004 /TRACK OFFSET WILL BE 400 185 000242 5250 JMP START /SKIP AROUND RLA ENTRY POINT 186 000243 0000 OFFSET, 0 /TRACK OFFSET FOR DEVICE (0 OR 400) 187 188 /ENTRY POINT FOR DEVICE A 189 190 000244 0002 RLA, VERSION 191 000245 7600 A7600, 7600 /=CLA 192 000246 1244 TAD RLA /TRANSFER CALLING ADDR 193 000247 3240 DCA RLB 194 000250 7002 START, BSW /SET OFFSET TO 0 IF DEV A, 400 IF DEV B 195 000251 3243 DCA OFFSET 196 000252 1245 TAD A7600 /RETURN TO KEYBOARD MONITOR 197 IFNZRO NOCHK < KRS > /IF CTRL,C TYPED 198 000253 7000 IFZERO NOCHK < NOP > 199 000254 1202 TAD A175 /-CTRL,C 200 000255 7650 SNA CLA 201 000256 6031 KSF 202 000257 5377 ONCE, JMP ONLY /THIS INSTRUCTION IS DONE ONCE ONLY. IT IS 203 /THEN CHANGED TO "JMP SET" AFTER HANDLER RELOCATION 204 /IS DONE AND THE BAD BLOCK LIST IS READ IN. 205 000260 6203 ACDIF, CIF CDF 00 206 000261 5645 JMP I A7600 /CALL KB MONITOR 207 /THIS LOC IS SET TO ADDR OF NEXT PAGE BY ONCE-ONLY CODE 208 000262 0000 GO, 0 /ADDR OF MAIN 209 /-----BOUNDARY OF BAD BLOCK LIST----- 210 BBL, 211 /ONCE-ONLY CODE, REPLACED BY BAD BLOCK LIST 212 /READ IN BAD BLOCK LIST (BBL) 213 /SAVE CALLING DATA FIELD 214 000263 6214 RDF 215 000264 1266 TAD OOCDF 216 000265 3325 DCA BACK 217 000266 6201 OOCDF, CDF 00 /SET TO CURRENT FIELD 218 /REPLACE ONCE-ONLY JUMP INSTRUCTION 219 000267 1326 TAD JMPSET 220 000270 3257 DCA ONCE 221 000271 1303 LOOP, TAD LIST /RELOCATE CROSS-PAGE REFERENCES; 222 /SCAN "LIST" FOR RELATIVE LOCATIONS 223 /OF VALUES TO BE RELOCATED 224 000272 7450 SNA /0 ACTS AS TERMINATOR 225 000273 5323 JMP OUT 226 000274 1262 TAD GO /RELOCATE RELATIVE ADDRESS 227 000275 3377 DCA ONLY /"ONLY" IS NOW TEMP STORAGE 228 000276 2271 ISZ LOOP /NEXT VALUE 229 000277 1262 TAD GO 230 000300 1777 TAD I ONLY /RELOCATE THE CONTENTS 231 000301 3777 DCA I ONLY 232 000302 5271 JMP LOOP /CONTINUE UNTIL DONE 233 234 /LIST OF RELATIVE ADDRESSES OF RELATIVE VALUES 235 236 000303 0160 LIST, BARG-MAIN 237 000304 7607 ABLOCK-MAIN 238 000305 0162 BBBL-MAIN 239 000306 7610 AMA-MAIN 240 000307 7611 ASECT-MAIN 241 000310 7612 ATRACK-MAIN 242 000311 0161 MA-MAIN 243 000312 7613 AERROR-MAIN 244 000313 0000 0 /TERMINATOR 245 246 000314 0000 ZBLOCK BBL+40-. /UNUSED (IN BBL BUFFER) 000315 0000 000316 0000 000317 0000 000320 0000 000321 0000 000322 0000 247 248 /ONCE-ONLY CODE CONTINUES 249 000323 4662 OUT, JMS I GO /READ BAD BLOCK LIST 250 /-----BOUNDARY OF BAD BLOCK LIST----- 251 000324 7200 OK, CLA /ERROR RETURN (IGNORE) 252 000325 6201 BACK, CDF /RESTORE CALLING FIELD 253 000326 5214 JMPSET, JMP SET /SETUP FOR TRANSFER 254 255 /END OF ONCE-ONLY CODE 256 /SETUP ARGS FOR CALL TO 2ND PAGE SUBROUTINE 257 /CALCULATE TRACK AND SECTOR FROM BLOCK 258 000327 1607 MAPPED, TAD I ABLOCK 259 000330 7012 RTR 260 000331 7012 RTR 261 000332 0204 AND A377 262 000333 1243 TAD OFFSET /DEVICE OFFSET (0 OR 400) 263 000334 3612 DCA I ATRACK 264 000335 1607 TAD I ABLOCK /CALCULATE SECTOR FROM BLOCK 265 000336 0200 AND A17 /SECTOR CODE 266 000337 7106 CLL RTL 267 000340 1205 TAD A7751 268 000341 7510 SPA 269 000342 1201 TAD A47 270 000343 7002 BSW 271 000344 3611 DCA I ASECT 272 /TRANSFER 1ST PAGE OF BLOCK 273 000345 4662 JMS I GO 274 000346 1203 TAD A200 /INCREMENT MA 275 000347 1610 TAD I AMA 276 000350 3610 DCA I AMA 277 /INCREMENT SECTOR 278 000351 1203 TAD A200 279 000352 1611 TAD I ASECT 280 000353 3611 DCA I ASECT 281 /TRANSFER 2ND PAGE OF BLOCK 282 000354 4662 JMS I GO 283 000355 1203 TAD A200 /INCREMENT MA 284 000356 1610 TAD I AMA 285 000357 3610 DCA I AMA 286 /CONTINUE WITH NEXT BLOCK 287 000360 5233 JMP NEXT 288 289 /ONCE-ONLY CODE AT END OF PAGE 290 000361 0000 ZBLOCK 377-. /UNUSED 000362 0000 000363 0000 000364 0000 000365 0000 000366 0000 000367 0000 000370 0000 000371 0000 000372 0000 000373 0000 000374 0000 000375 0000 000376 0000 291 000377 4262 ONLY, JMS GO /EXECUTED ONCE ONLY; STORES ADDR OF 292 /2ND PAGE IN LOC "GO" 293 *400 294 /2ND PAGE OF HANDLER 295 296 /SUBROUTINE TO SETUP AND TRANSFER 297 /AC=0 FOR TRANSFER ELSE SETUP 298 000400 0000 MAIN, 0 299 000401 7450 SNA 300 000402 5242 JMP TRANS 301 /GET HANDLER ARGUMENTS 302 000403 3360 SETUP, DCA BARG /ADDR OF HANDLER ARGS 303 000404 7332 AC2000 /SET "OLDTRK" TO INVALID TRACK 304 000405 3355 DCA OLDTRK /TO FORCE READING NEXT HEADER. 305 000406 1365 TAD B7600 /SET FOR FULL PAGE TRANSFERS 306 000407 3350 DCA WC /(WAS SMALLER FOR BBL READ) 307 000410 1760 TAD I BARG /NOW GET HANDLER ARGUMENTS 308 /FUNCTION WORD 309 /NOTE: THE FOLLOWING INSTRUCTION IS USED AS A CONSTANT 310 000411 0377 B377, AND B4070 /CONVERT TO RLCB FORMAT 311 000412 7510 SPA 312 000413 1364 TAD B3777 313 000414 1366 TAD BRLRD 314 000415 3357 DCA FNC 315 000416 1760 TAD I BARG /FUNCTION WORD 316 000417 7004 RAL /CONVERT TO PAGE COUNT IN BITS [7600] 317 000420 0365 AND B7600 318 000421 3356 DCA PAGES 319 000422 2360 ISZ BARG 320 000423 1760 TAD I BARG /MA 321 000424 3361 DCA MA 322 000425 2360 ISZ BARG 323 000426 1760 TAD I BARG /BLOCK 324 000427 3346 DCA BLOCK 325 000430 2360 ISZ BARG 326 /SAVE CALLING FIELD FOR RETURN 327 000431 6214 RDF 328 000432 1234 TAD BCDIF 329 000433 3344 DCA BRTN 330 /RESET DATA FIELD AND RETURN FROM SETUP WITH AC=BLOCK 331 000434 6203 BCDIF, CIF CDF 00 332 /GET DEVICE OFFSET FROM 1ST PAGE 333 000435 1762 TAD I BBBL /CHECK FOR BBL VALIDITY - 334 000436 1371 TAD CHECK /1ST LOC OF BBL CONTAINS AN 335 000437 7640 SZA CLA /IDENTIFICATION CODE ("ID") 336 000440 5341 JMP ERRORR /TAKE ERROR RETURN FROM HANDLER 337 /IF BBL IS INVALID. 338 000441 5600 JMP I MAIN 339 /TRANSFER ONE OR MORE PAGES TO/FROM DISK 340 /GET INTERPAGE ARGUMENTS 341 /RESET RETRY COUNT FOR 2 RETRIES ON I/O ERRORS 342 000442 7346 TRANS, AC7775 /AC=-3 343 000443 3354 DCA ERRCNT 344 /CALCULATE CYLINDER AND SURFACE FROM TRACK 345 000444 1347 TAD TRACK 346 000445 7110 CLL RAR 347 000446 3352 DCA CYL 348 000447 7012 RTR 349 000450 3353 DCA SURF 350 /COMPARE WITH OLD (PREVIOUS) TRACK; IF SAME, DO TRANSFER 351 000451 4300 JMS TRKCMP 352 /IF REQUESTED TRACK IS DIFFERENT, SEEK TO TRACK 353 /RESET DRIVE (FUNCTION=1) 354 000452 6600 RETRY, RLDC /CLEAR CONTROLLER, AC 355 /SEEK (FUNCTION=3) WHEN CALLED FROM BELOW 356 000453 7001 SEEK, IAC /AC=(1 OR 3) 357 000454 4330 JMS IO /RESET DRIVE OR SEEK 358 /READ NEXT HEADER TO FIND OUT ACTUAL CURRENT TRACK 359 000455 1367 TAD HEADER 360 000456 4330 JMS IO /READ NEXT HEADER 361 000457 6615 RRSI /GET HEADER BYTE #1 362 000460 7002 BSW 363 000461 0363 AND B3 364 000462 3355 DCA OLDTRK /SAVE 2 LSB 365 000463 6615 RRSI /GET HEADER BYTE #2 366 000464 0211 AND B377 /HARDWARE SHOULD DO THIS 367 000465 7106 CLL RTL 368 000466 1355 TAD OLDTRK /ADD IN MSB 369 000467 3355 DCA OLDTRK 370 /COMPARE WITH OLD (PREVIOUS) TRACK; IF SAME, DO TRANSFER 371 000470 4300 JMS TRKCMP 372 /IF REQUESTED TRACK IS DIFFERENT, SEEK TO TRACK 373 /CALCULATE DIFFERENCE WORD FOR SEEK FROM TRACK DIFFERENCE 374 000471 7510 SPA /IF POSITIVE, LINK WILL BE SET 375 000472 7141 CLL CIA /IF NEGATIVE, CLEAR LINK 376 000473 7010 RAR /DELETE SURFACE, INCLUDE DIRECTION 377 000474 1353 TAD SURF /ADD SURFACE 378 000475 6603 RLCA /LOAD DIFFERENCE WORD 379 000476 7326 AC0002 /PREPARE FOR SEEK 380 /LOOP BACK AND PERFORM SEEK; THIS ENSURES THAT THE TRACK 381 /REACHED IS THE CORRECT ONE IN SPITE OF POSSIBLE RL01 382 /SEEK UNRELIABILITY 383 000477 5253 JMP SEEK 384 /SUBROUTINE TO COMPARE REQUESTED TRACK WITH OLD (REMEMBERED) 385 /TRACK; IF SAME, DO TRANSFER. IF DIFFERENT, RETURN WITH AC= 386 /REQUESTED-OLD, AND LINK=1 387 000500 0000 TRKCMP, 0 388 000501 1355 TAD OLDTRK /CALCULATE DIFFERENCE 389 000502 7041 CIA 390 000503 1347 TAD TRACK 391 000504 7120 STL /LINK MUST BE SET WHEN 392 /DIFFERENCE IS POSITIVE. 393 000505 7440 SZA 394 000506 5700 JMP I TRKCMP /DIFFERENT; RETURN 395 /ON TRACK: DO TRANSFER 396 /LOAD ALL REGISTERS 397 000507 1351 TAD SECTOR 398 000510 6605 RLSA 399 000511 1350 TAD WC 400 000512 6607 RLWC 401 000513 1353 TAD SURF 402 000514 1352 TAD CYL 403 000515 6603 RLCA 404 000516 1361 TAD MA 405 000517 6602 RLMA 406 /DO THE READ OR WRITE 407 000520 1357 TAD FNC 408 000521 4330 JMS IO 409 /COUNT REQUESTED NUMBER OF PAGES 410 000522 1365 TAD B7600 411 000523 1356 TAD PAGES 412 000524 7450 SNA 413 000525 5343 JMP DONE 414 000526 3356 DCA PAGES 415 000527 5600 JMP I MAIN /RETURN FOR MORE 416 /SUBROUTINE TO DO THE ACTUAL I/O 417 000530 0000 IO, 0 /AC=MODE,FIELD,FUNCTION 418 000531 1370 TAD BDRIVE 419 000532 6604 RLCB /DO THE OPERATION 420 000533 6601 RLSD /WAIT UNTIL DONE 421 000534 5333 JMP .-1 422 000535 6617 RLSE /TEST FOR I/O ERROR(S) 423 000536 5730 JMP I IO /NONE; RETURN 424 /IF ERROR, RETRY TWICE 425 000537 2354 ISZ ERRCNT /MORE RETRIES LEFT? 426 000540 5252 JMP RETRY /YES 427 /AFTER THREE TRIES, TAKE HANDLER ERROR RETURN 428 /WITH AC=4000 429 000541 7330 ERRORR, AC4000 430 000542 7410 SKP 431 /NORMAL RETURN FROM HANDLER 432 000543 2360 DONE, ISZ BARG /SKIP ERROR RETURN 433 000544 6203 BRTN, CIF CDF 00 /RETURN TO CALLING FIELD 434 /BBL READ: NOP (FIELD 0) 435 000545 5760 JMP I BARG /RETURN TO CALLING PROGRAM 436 /DATA 437 000546 0000 BLOCK, 0 438 000547 0000 TRACK, 0 /BBL READ: TRACK 0 439 000550 7737 WC, -41 /BBL READ: -BBL LENGTH 440 000551 1400 SECTOR, 1400 /BBL READ: SECTOR 14 441 000552 0000 CYL, 0 442 000553 0000 SURF, 0 443 000554 0000 ERRCNT, 0 /COUNT OF RETRIES 444 000555 2000 OLDTRK, 2000 /FORCE INITIAL SEEK 445 000556 0200 PAGES, 200 /BBL READ: ONE PAGE 446 000557 0006 FNC, RLRD /BBL READ: READ FUNCTION 447 448 /RELOCATED RELATIVE ADDRESSES 449 000560 7724 BARG, OK-MAIN /BBL READ: RETURN FROM READ 450 /ADDRESS OF HANDLER ARGUMENTS 451 000561 7663 MA, BBL-MAIN /BBL READ: ADDR OF BBL 452 000562 7663 BBBL, BBL-MAIN 453 454 000563 0003 B3, 3 455 000564 3777 B3777, 3777 456 000565 7600 B7600, 7600 457 000566 0006 BRLRD, RLRD 458 000567 1004 HEADER, BYTE RLRH 459 000570 0000 BDRIVE, DRIVE^100 /DRIVE BITS FOR RLCB 460 000571 7655 CHECK, -ID 461 462 /THIS CONSTANT MUST BE AT END OF PAGE 463 000572 0000 ZBLOCK 577-. 000573 0000 000574 0000 000575 0000 000576 0000 464 000577 4070 B4070, 4070 465 $ A17 0200 A175 0202 A200 0203 A377 0204 A47 0201 A7600 0245 A7751 0205 ABLOCK 0207 AC0001 7201 unreferenced AC0002 7326 AC0003 7325 unreferenced AC0004 7307 AC0006 7327 unreferenced AC0100 7203 unreferenced AC2000 7332 AC3777 7350 unreferenced AC4000 7330 AC5777 7352 unreferenced AC6000 7333 unreferenced AC7775 7346 AC7776 7344 unreferenced ACDIF 0260 unreferenced AERROR 0213 AMA 0210 ASECT 0211 ATRACK 0212 B3 0563 B377 0411 B3777 0564 B4070 0577 B7600 0565 BACK 0325 BARG 0560 BASE 0206 BBBL 0562 BBL 0263 BCDIF 0434 BDRIVE 0570 BLOCK 0546 BRLRD 0566 BRTN 0544 BYTE 1000 CHECK 0571 CYL 0552 DONE 0543 DRIVE 0000 ERRCNT 0554 ERRORR 0541 FNC 0557 GO 0262 HEADER 0567 ID 0123 IO 0530 JMPSET 0326 LIST 0303 LOOP 0271 MA 0561 MAIN 0400 MAP 0223 MAPPED 0327 NEXT 0233 NOCHK 0000 OFFSET 0243 OK 0324 OLDTRK 0555 ONCE 0257 ONLY 0377 OOCDF 0266 OUT 0323 PAGES 0556 RETRY 0452 RLA 0244 RLB 0240 RLCA 6603 RLCB 6604 RLDC 6600 RLIOT 6600 RLMA 6602 RLMT 0000 unreferenced RLRD 0006 RLRE 0001 unreferenced RLRH 0004 RLRN 0007 unreferenced RLSA 6605 RLSD 6601 RLSE 6617 RLSK 0003 unreferenced RLST 0002 unreferenced RLWC 6607 RLWR 0005 unreferenced RRCA 6612 unreferenced RRCB 6613 unreferenced RRER 6610 unreferenced RRSA 6614 unreferenced RRSI 6615 RRWC 6611 unreferenced SECTOR 0551 SEEK 0453 SET 0214 SETUP 0403 unreferenced START 0250 SURF 0553 TRACK 0547 TRANS 0442 TRKCMP 0500 VERSIO 0002 WC 0550