* PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 1 0001 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER 0002 * 0003 * SEE FOR HARDWARE AND PROGRAMMING DETAILS THE HONEYWELL SERIES 16 MANUAL: 0004 * MOVING-HEAD DISK, OPTIONS 4613,4651 AND 4720 0005 * PROGRAMMERS' REFERENCE MANUAL 0006 * DOC NUMBER: CA38 / 701300725228 0007 * 0008 * AFTER STARTING THE TEST (AT '2000), THE PROGRAM MUST STOP A ADDRESS '2005 0009 * THE STOP INDICATES AN ERROR, WHICH IS OK IN THIS TEST BECAUSE IT SHOULD 0010 * INDICATE THAT ONLY UNIT 0 IS AVAILABLE AND THE OTHER 3 UNITS ARE NOT 0011 * AVAILABLE (A-REG SHOULD CONTAIN THE VALUE '250) 0012 * THEN AFTER CONTINUE: 0013 * 1ST 100 BLOCKS ARE WRITTEN, STARTING WITH BLOCK 0. 0014 * AFTER A BLOCK IS WRITTEN, THE BLOCK NUMBER IS INCREMENTED WITH 4. 0015 * AFTER THE 100 BLOCKS BEEN WRITTEN, A LAST BLOCK IS WRITTEN AT THE END OF THE 0016 * DISK. 0017 * THE 2ND STEP IS TO READ THE WRITTEN BLOCKS BACK AND DISPLAY THE CONTENT: 0018 * STRING '1234567890' BLOCK 00 .. BLOCK 99. 0019 * DURING THE 3RD STEP SINGLE BLOCKS ARE READ: 0020 * 1) THE LAST BLOCK => SHOULD DISPLAY: LAST BLOCK 0021 * 2) 2 * BLOCK 64 => SHOULD DISPLAY TWO TIMES: BLOCK 16 0022 * 3) BLOCK '350 => SHOULD CONTAIN NOTHING SO PRINT AN EMPTY LINE 0023 * 4) READ BLOCK 2500 => SHOULD CONTAIN: BLOCK 58 0024 * 5) READ BLOCK 5500 => ERROR, STOP AT '2145, BLOCK OUT OFF RANGE, A='1002 0025 * 6) READ FROM UNIT 1 => ERROR, STOP AT '2157, UNIT NOT OPERABLE, A='42002 0026 * 0027 **** ***** ***************** 0028 ORG '2000 0029 002000 STR EQU * 0030 * INIT THE DRIVER 0031 02000 0 10 00000 CALL DP$I 0032 02001 000000 OCT 0 RESULT 0033 02002 0 02 02001 LDA *-1 0034 02003 100040 SZE 0035 02004 000000 HLT MUST STOP HERE WITH '250 IN A-REG 0036 * THE STOP INDICATES THAT UNIT 0 IS AVAILABLE (BIT 15/16 = 0) 0037 * THE OTHER 3 UNITS ARE NOT AVAILABLE * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 2 0038 * 0039 * WRITE 100 BLOCKS 0040 02005 0 02 03656 LDA =-100 0041 02006 0 04 02246 STA CNT 0042 02007 0 02 02247 LDA NULL 0043 02010 0 04 02261 STA BLK 0044 * WRITE A BLOCK 0045 02011 0 10 00000 WB CALL DP$W 0046 02012 000000 DEC 0 UNIT 0047 02013 000000 BN DEC 0 LOGICAL BLOCK NUMBER 0048 02014 0 002250 DAC WBUF 128 BYTES (512 BYTES) LONG 0049 02015 000000 HLT ERROR 0050 * PREPARE WRITING NEXT BLOCK 0051 02016 0 12 02261 IRS BLK 0052 02017 0 02 02261 LDA BLK OVERFLOW OF LAST DIGIT? 0053 02020 141050 CAL 0054 02021 0 07 03655 SUB ='272 0055 02022 100040 SZE 0056 02023 0 01 02031 JMP FBN NO 0057 02024 0 02 02261 LDA BLK 0058 02025 141044 CAR 0059 02026 0 06 03654 ADD ='400 0060 02027 0 05 03653 ERA ='260 0061 02030 0 04 02261 STA BLK 0062 * FILL BLOCK NUMBER 0063 02031 0 02 02013 FBN LDA BN 0064 02032 0 06 03652 ADD =4 0065 02033 0 04 02013 STA BN 0066 * 0067 02034 0 12 02246 IRS CNT 0068 02035 0 01 02011 JMP WB AND WRITE 0069 * WRITE LAST BLOCK ON DISC 0070 02036 0 10 00000 CALL DP$W 0071 02037 000000 DEC 0 0072 02040 011277 DEC 4799 0073 02041 0 003250 DAC LBUF 0074 02042 000000 HLT * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 3 0075 * 0076 * READ THE BLOCKS 0077 02043 0 02 03656 LDA =-100 0078 02044 0 04 02246 STA CNT 0079 02045 0 10 02237 RB JST NLCR 0080 02046 0 10 00000 CALL DP$R 0081 02047 000000 DEC 0 UNIT 0082 02050 000000 BN1 DEC 0 LOGICAL BLOCK NUMBER 0083 02051 0 002650 DAC RBUF 0084 02052 000000 HLT ERROR 0085 02053 0 10 02165 JST PSTR 0086 02054 0 002650 DAC RBUF 0087 02055 0 02 02050 LDA BN1 0088 02056 0 06 03652 ADD =4 0089 02057 0 04 02050 STA BN1 0090 02060 0 12 02246 IRS CNT 0091 02061 0 01 02045 JMP RB 0092 * READ 2 * BLOCK 64 WHICH SHOULD SHOW 16/4 = BLOCK 16 0093 02062 0 10 02237 JST NLCR 0094 02063 0 10 00000 CALL DP$R 0095 02064 000000 DEC 0 UNIT 0096 02065 000100 OCT 100 LOGICAL BLOCK NUMBER 0097 02066 0 002650 DAC RBUF 0098 02067 000000 HLT ERROR 0099 02070 0 10 02165 JST PSTR 0100 02071 0 002650 DAC RBUF 0101 02072 0 10 02237 JST NLCR 0102 02073 0 10 00000 CALL DP$R 0103 02074 000000 DEC 0 UNIT 0104 02075 000100 OCT 100 LOGICAL BLOCK NUMBER 0105 02076 0 002650 DAC RBUF 0106 02077 000000 HLT ERROR 0107 02100 0 10 02165 JST PSTR 0108 02101 0 002650 DAC RBUF 0109 02102 0 10 02237 JST NLCR 0110 * READ THE LAST BLOCK 0111 02103 0 10 00000 CALL DP$R * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 4 0112 02104 000000 DEC 0 UNIT 0113 02105 011277 DEC 4799 LOGICAL BLOCK NUMBER 0114 02106 0 002650 DAC RBUF 0115 02107 000000 HLT ERROR 0116 02110 0 10 02165 JST PSTR 0117 02111 0 002650 DAC RBUF 0118 02112 0 10 02237 JST NLCR 0119 * READ BLOCK '350 => SHOULD CONTAIN NOTHING SO PRINT AN EMPTY LINE 0120 02113 0 10 02237 JST NLCR 0121 02114 0 10 00000 CALL DP$R 0122 02115 000000 DEC 0 UNIT 0123 02116 000350 OCT 350 LOGICAL BLOCK NUMBER 0124 02117 0 002650 DAC RBUF 0125 02120 000000 HLT ERROR 0126 02121 0 10 02165 JST PSTR 0127 02122 0 002650 DAC RBUF 0128 * 3 OTHER TESTS: 0129 * READ BLOCK 2500 => SHOULD CONTAIN: BLOCK 58 0130 02123 0 10 02237 JST NLCR 0131 02124 0 02 02162 LDA ONE 0132 02125 0 10 02230 JST ASRO 0133 02126 0 10 00000 CALL DP$R ERROR!? 0134 02127 000000 DEC 0 UNIT 0135 02130 004704 DEC 2500 LOGICAL BLOCK NUMBER 0136 02131 0 002650 DAC RBUF 0137 02132 000000 HLT ERROR 0138 02133 0 10 02165 JST PSTR 0139 02134 0 002650 DAC RBUF 0140 02135 0 10 02237 JST NLCR 0141 * READ BLOCK 5500 => ERROR, STOP, BLOCK OUT OF RANGE (A='1002) 0142 02136 0 02 02163 LDA TWO 0143 02137 0 10 02230 JST ASRO 0144 02140 0 10 00000 CALL DP$R ERROR!? 0145 02141 000000 DEC 0 UNIT 0146 02142 012574 DEC 5500 LOGICAL BLOCK NUMBER 0147 02143 0 002650 DAC RBUF 0148 02144 000000 HLT ERROR * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 5 0149 02145 0 10 02165 JST PSTR 0150 02146 0 002650 DAC RBUF 0151 02147 0 10 02237 JST NLCR 0152 * READ FROM UNIT 1 => ERROR, STOP, UNIT NOT OPERABLE (A='42002) 0153 02150 0 02 02164 LDA THR 0154 02151 0 10 02230 JST ASRO 0155 02152 0 10 00000 CALL DP$R ERROR!? 0156 02153 000001 DEC 1 UNIT 0157 02154 003500 OCT 3500 LOGICAL BLOCK NUMBER 0158 02155 0 002650 DAC RBUF 0159 02156 000000 HLT ERROR 0160 02157 0 10 02165 JST PSTR 0161 02160 0 002650 DAC RBUF 0162 02161 000000 HLT STOP 0163 02162 120261 ONE BCI 1, 1 0164 02163 120262 TWO BCI 1, 2 0165 02164 120263 THR BCI 1, 3 0166 * 0167 * PRINT STRING (NULL TERMINATED) 0168 02165 0 000000 PSTR DAC ** 0169 02166 -0 02 02165 LDA* PSTR POINTER TO STRING 0170 02167 0 04 02203 STA PTR 0171 02170 -0 02 02203 N LDA* PTR GET 2 CHARS 0172 02171 101040 SNZ 0173 02172 0 01 02201 JMP END STRING END 0174 02173 141340 ICA PRINT BYTE 1 0175 02174 0 10 02230 JST ASRO 0176 02175 141340 ICA PRINT BYTE 2 0177 02176 0 10 02230 JST ASRO 0178 02177 0 12 02203 IRS PTR 0179 02200 0 01 02170 JMP N 0180 02201 0 12 02165 END IRS PSTR RETURN 0181 02202 -0 01 02165 JMP* PSTR 0182 02203 000000 PTR OCT 0 0183 * 0184 02204 0 000000 POKT DAC ** 0185 02205 0 04 02226 STA SA * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 6 0186 02206 0400 60 LRL 16 0187 02207 0 02 03651 LDA =-6 0188 02210 0 04 02227 STA TEL 0189 02211 0 02 03650 LDA ='240 0190 02212 0 10 02230 JST ASRO 0191 02213 140040 CRA 0192 02214 0410 77 LLL 1 0193 02215 0 01 02217 JMP CONV 0194 02216 0410 75 OKT LLL 3 0195 02217 0 06 03653 CONV ADD ='260 0196 02220 0 10 02230 JST ASRO 0197 02221 140040 CRA 0198 02222 0 12 02227 IRS TEL 0199 02223 0 01 02216 JMP OKT 0200 02224 0 02 02226 LDA SA 0201 02225 -0 01 02204 JMP* POKT 0202 02226 000000 SA OCT 0 0203 02227 000000 TEL OCT 0 0204 * 0205 02230 0 000000 ASRO DAC ** 0206 02231 34 0104 SKS '104 0207 02232 0 01 02231 JMP *-1 0208 02233 14 0104 OCP '104 0209 02234 74 0004 OTA 4 0210 02235 0 01 02234 JMP *-1 0211 02236 -0 01 02230 JMP* ASRO 0212 * 0213 02237 0 000000 NLCR DAC ** 0214 02240 0 02 03647 LDA ='106612 0215 02241 141340 ICA 0216 02242 0 10 02230 JST ASRO 0217 02243 141340 ICA 0218 02244 0 10 02230 JST ASRO 0219 02245 -0 01 02237 JMP* NLCR 0220 * 0221 02246 000000 CNT OCT 0 0222 02247 130260 NULL BCI 1,00 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 7 0223 * 0224 * WRITE BUFFER 0225 02250 130662 WBUF BCI 6,1234567890 02251 131664 02252 132666 02253 133670 02254 134660 02255 120240 0226 02256 141314 BCI 3,BLOCK 02257 147703 02260 145640 0227 02261 120240 BLK BCI 1, 0228 02262 000000 BSZ 246 02263 000000 02264 000000 02265 000000 02266 000000 02267 000000 02270 000000 02271 000000 02272 000000 02273 000000 02274 000000 02275 000000 02276 000000 02277 000000 02300 000000 02301 000000 02302 000000 02303 000000 02304 000000 02305 000000 02306 000000 02307 000000 02310 000000 02311 000000 02312 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 8 02313 000000 02314 000000 02315 000000 02316 000000 02317 000000 02320 000000 02321 000000 02322 000000 02323 000000 02324 000000 02325 000000 02326 000000 02327 000000 02330 000000 02331 000000 02332 000000 02333 000000 02334 000000 02335 000000 02336 000000 02337 000000 02340 000000 02341 000000 02342 000000 02343 000000 02344 000000 02345 000000 02346 000000 02347 000000 02350 000000 02351 000000 02352 000000 02353 000000 02354 000000 02355 000000 02356 000000 02357 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 9 02360 000000 02361 000000 02362 000000 02363 000000 02364 000000 02365 000000 02366 000000 02367 000000 02370 000000 02371 000000 02372 000000 02373 000000 02374 000000 02375 000000 02376 000000 02377 000000 02400 000000 02401 000000 02402 000000 02403 000000 02404 000000 02405 000000 02406 000000 02407 000000 02410 000000 02411 000000 02412 000000 02413 000000 02414 000000 02415 000000 02416 000000 02417 000000 02420 000000 02421 000000 02422 000000 02423 000000 02424 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 10 02425 000000 02426 000000 02427 000000 02430 000000 02431 000000 02432 000000 02433 000000 02434 000000 02435 000000 02436 000000 02437 000000 02440 000000 02441 000000 02442 000000 02443 000000 02444 000000 02445 000000 02446 000000 02447 000000 02450 000000 02451 000000 02452 000000 02453 000000 02454 000000 02455 000000 02456 000000 02457 000000 02460 000000 02461 000000 02462 000000 02463 000000 02464 000000 02465 000000 02466 000000 02467 000000 02470 000000 02471 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 11 02472 000000 02473 000000 02474 000000 02475 000000 02476 000000 02477 000000 02500 000000 02501 000000 02502 000000 02503 000000 02504 000000 02505 000000 02506 000000 02507 000000 02510 000000 02511 000000 02512 000000 02513 000000 02514 000000 02515 000000 02516 000000 02517 000000 02520 000000 02521 000000 02522 000000 02523 000000 02524 000000 02525 000000 02526 000000 02527 000000 02530 000000 02531 000000 02532 000000 02533 000000 02534 000000 02535 000000 02536 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 12 02537 000000 02540 000000 02541 000000 02542 000000 02543 000000 02544 000000 02545 000000 02546 000000 02547 000000 02550 000000 02551 000000 02552 000000 02553 000000 02554 000000 02555 000000 02556 000000 02557 000000 02560 000000 02561 000000 02562 000000 02563 000000 02564 000000 02565 000000 02566 000000 02567 000000 02570 000000 02571 000000 02572 000000 02573 000000 02574 000000 02575 000000 02576 000000 02577 000000 02600 000000 02601 000000 02602 000000 02603 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 13 02604 000000 02605 000000 02606 000000 02607 000000 02610 000000 02611 000000 02612 000000 02613 000000 02614 000000 02615 000000 02616 000000 02617 000000 02620 000000 02621 000000 02622 000000 02623 000000 02624 000000 02625 000000 02626 000000 02627 000000 02630 000000 02631 000000 02632 000000 02633 000000 02634 000000 02635 000000 02636 000000 02637 000000 02640 000000 02641 000000 02642 000000 02643 000000 02644 000000 02645 000000 02646 000000 02647 000000 0229 * * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 14 0230 * READ BUFFER 0231 02650 000000 RBUF BSZ 256 02651 000000 02652 000000 02653 000000 02654 000000 02655 000000 02656 000000 02657 000000 02660 000000 02661 000000 02662 000000 02663 000000 02664 000000 02665 000000 02666 000000 02667 000000 02670 000000 02671 000000 02672 000000 02673 000000 02674 000000 02675 000000 02676 000000 02677 000000 02700 000000 02701 000000 02702 000000 02703 000000 02704 000000 02705 000000 02706 000000 02707 000000 02710 000000 02711 000000 02712 000000 02713 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 15 02714 000000 02715 000000 02716 000000 02717 000000 02720 000000 02721 000000 02722 000000 02723 000000 02724 000000 02725 000000 02726 000000 02727 000000 02730 000000 02731 000000 02732 000000 02733 000000 02734 000000 02735 000000 02736 000000 02737 000000 02740 000000 02741 000000 02742 000000 02743 000000 02744 000000 02745 000000 02746 000000 02747 000000 02750 000000 02751 000000 02752 000000 02753 000000 02754 000000 02755 000000 02756 000000 02757 000000 02760 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 16 02761 000000 02762 000000 02763 000000 02764 000000 02765 000000 02766 000000 02767 000000 02770 000000 02771 000000 02772 000000 02773 000000 02774 000000 02775 000000 02776 000000 02777 000000 03000 000000 03001 000000 03002 000000 03003 000000 03004 000000 03005 000000 03006 000000 03007 000000 03010 000000 03011 000000 03012 000000 03013 000000 03014 000000 03015 000000 03016 000000 03017 000000 03020 000000 03021 000000 03022 000000 03023 000000 03024 000000 03025 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 17 03026 000000 03027 000000 03030 000000 03031 000000 03032 000000 03033 000000 03034 000000 03035 000000 03036 000000 03037 000000 03040 000000 03041 000000 03042 000000 03043 000000 03044 000000 03045 000000 03046 000000 03047 000000 03050 000000 03051 000000 03052 000000 03053 000000 03054 000000 03055 000000 03056 000000 03057 000000 03060 000000 03061 000000 03062 000000 03063 000000 03064 000000 03065 000000 03066 000000 03067 000000 03070 000000 03071 000000 03072 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 18 03073 000000 03074 000000 03075 000000 03076 000000 03077 000000 03100 000000 03101 000000 03102 000000 03103 000000 03104 000000 03105 000000 03106 000000 03107 000000 03110 000000 03111 000000 03112 000000 03113 000000 03114 000000 03115 000000 03116 000000 03117 000000 03120 000000 03121 000000 03122 000000 03123 000000 03124 000000 03125 000000 03126 000000 03127 000000 03130 000000 03131 000000 03132 000000 03133 000000 03134 000000 03135 000000 03136 000000 03137 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 19 03140 000000 03141 000000 03142 000000 03143 000000 03144 000000 03145 000000 03146 000000 03147 000000 03150 000000 03151 000000 03152 000000 03153 000000 03154 000000 03155 000000 03156 000000 03157 000000 03160 000000 03161 000000 03162 000000 03163 000000 03164 000000 03165 000000 03166 000000 03167 000000 03170 000000 03171 000000 03172 000000 03173 000000 03174 000000 03175 000000 03176 000000 03177 000000 03200 000000 03201 000000 03202 000000 03203 000000 03204 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 20 03205 000000 03206 000000 03207 000000 03210 000000 03211 000000 03212 000000 03213 000000 03214 000000 03215 000000 03216 000000 03217 000000 03220 000000 03221 000000 03222 000000 03223 000000 03224 000000 03225 000000 03226 000000 03227 000000 03230 000000 03231 000000 03232 000000 03233 000000 03234 000000 03235 000000 03236 000000 03237 000000 03240 000000 03241 000000 03242 000000 03243 000000 03244 000000 03245 000000 03246 000000 03247 000000 0232 * 0233 * LAST * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 21 0234 03250 146301 LBUF BCI 5,LAST BLOCK 03251 151724 03252 120302 03253 146317 03254 141713 0235 03255 000000 BSZ 250 03256 000000 03257 000000 03260 000000 03261 000000 03262 000000 03263 000000 03264 000000 03265 000000 03266 000000 03267 000000 03270 000000 03271 000000 03272 000000 03273 000000 03274 000000 03275 000000 03276 000000 03277 000000 03300 000000 03301 000000 03302 000000 03303 000000 03304 000000 03305 000000 03306 000000 03307 000000 03310 000000 03311 000000 03312 000000 03313 000000 03314 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 22 03315 000000 03316 000000 03317 000000 03320 000000 03321 000000 03322 000000 03323 000000 03324 000000 03325 000000 03326 000000 03327 000000 03330 000000 03331 000000 03332 000000 03333 000000 03334 000000 03335 000000 03336 000000 03337 000000 03340 000000 03341 000000 03342 000000 03343 000000 03344 000000 03345 000000 03346 000000 03347 000000 03350 000000 03351 000000 03352 000000 03353 000000 03354 000000 03355 000000 03356 000000 03357 000000 03360 000000 03361 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 23 03362 000000 03363 000000 03364 000000 03365 000000 03366 000000 03367 000000 03370 000000 03371 000000 03372 000000 03373 000000 03374 000000 03375 000000 03376 000000 03377 000000 03400 000000 03401 000000 03402 000000 03403 000000 03404 000000 03405 000000 03406 000000 03407 000000 03410 000000 03411 000000 03412 000000 03413 000000 03414 000000 03415 000000 03416 000000 03417 000000 03420 000000 03421 000000 03422 000000 03423 000000 03424 000000 03425 000000 03426 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 24 03427 000000 03430 000000 03431 000000 03432 000000 03433 000000 03434 000000 03435 000000 03436 000000 03437 000000 03440 000000 03441 000000 03442 000000 03443 000000 03444 000000 03445 000000 03446 000000 03447 000000 03450 000000 03451 000000 03452 000000 03453 000000 03454 000000 03455 000000 03456 000000 03457 000000 03460 000000 03461 000000 03462 000000 03463 000000 03464 000000 03465 000000 03466 000000 03467 000000 03470 000000 03471 000000 03472 000000 03473 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 25 03474 000000 03475 000000 03476 000000 03477 000000 03500 000000 03501 000000 03502 000000 03503 000000 03504 000000 03505 000000 03506 000000 03507 000000 03510 000000 03511 000000 03512 000000 03513 000000 03514 000000 03515 000000 03516 000000 03517 000000 03520 000000 03521 000000 03522 000000 03523 000000 03524 000000 03525 000000 03526 000000 03527 000000 03530 000000 03531 000000 03532 000000 03533 000000 03534 000000 03535 000000 03536 000000 03537 000000 03540 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 26 03541 000000 03542 000000 03543 000000 03544 000000 03545 000000 03546 000000 03547 000000 03550 000000 03551 000000 03552 000000 03553 000000 03554 000000 03555 000000 03556 000000 03557 000000 03560 000000 03561 000000 03562 000000 03563 000000 03564 000000 03565 000000 03566 000000 03567 000000 03570 000000 03571 000000 03572 000000 03573 000000 03574 000000 03575 000000 03576 000000 03577 000000 03600 000000 03601 000000 03602 000000 03603 000000 03604 000000 03605 000000 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 27 03606 000000 03607 000000 03610 000000 03611 000000 03612 000000 03613 000000 03614 000000 03615 000000 03616 000000 03617 000000 03620 000000 03621 000000 03622 000000 03623 000000 03624 000000 03625 000000 03626 000000 03627 000000 03630 000000 03631 000000 03632 000000 03633 000000 03634 000000 03635 000000 03636 000000 03637 000000 03640 000000 03641 000000 03642 000000 03643 000000 03644 000000 03645 000000 03646 000000 0236 03647 106612 END 03650 000240 03651 177772 03652 000004 * PROGRAM TO TEST THE DP-4651 MOVING HEAD DISK DRIVER PAGE 28 03653 000260 03654 000400 03655 000272 03656 177634 NO ERRORS IN ABOVE ASSEMBLY. DAP-16 REV. E