Digital PDFs

AC-E048B-MC

October 1978

92 pages

Original

12MB

Document:	CZRLDB0-RL01-Drive-Test-part-2
Order Number:	AC-E048B-MC
Revision:	0
Pages:	92
Original Filename:	http://bitsavers.org/pdf/dec/pdp11/xxdp/diag_listings/RL01/AC-E048B-MC_CZRLDB0-RL01-Drive-Test-part-2_Oct78.pdf

OCR Text

IDENTIFICATION

PRODUCT CODE:
PRODUCT NAME:
DATE CREATED:
MAINTAINER:
AUTHOR:

SEQ 0001

AC-E048B-MC
CZRLDBO RLOI DRIVE TEST PART 2
11-0CT-78
DIAGNOSTIC ENGINEERIIG
D. DEKNIS

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT £ORPORATION ASSUMES
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS
MANUAL.
THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM
IND CAN BE COPIED (WITH INCLUSION OF DIGITAL-S COPYRIGHT
NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT ASMAY OTHERWISE BE
PROVIDED IN WRITING BY DIGITAL.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR
THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS
NOT SUPPLIED BY DIGITAL.
COPYRIGHT (C) 1977, 1978, DIGITAL EQUIPMENT CORPORATION

.,{

... ~..•

Page 2

SEQ. 0002

TABLE OF CONTENTS
1.0

·"

1.1
1.2
1.3

1.4
,1.5
2 .. 0

2.1
2.1.1
2.1.2
2.2
2.3
2.3.1

2.3.2
2.4

2.5

2.6
3.0
4.0
5.0
6.0

GENERAL INFORMATION
PROGRAM ABSTRACT
SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS
DIAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTIONS
OPERATING INSTRUCTIONS
HOW TO RUN THIS DIAGNOSTIC
THE SIX STEPS OF EXECUTION
SAMPLE RUN-THROUGH
HOW TO CREATE A CHAINABLE FILE
DETAILS OF COMMANDS AND SYNTAX
TABLE OF COMMAHD VALIDITY
COMMAND SYNTAX
EXTENDED P-TABLE DIALOGUE
HARDWARE PARAMETERS
SOFTWARE PARAMETERS
ERROR INFORMATION
PERFORMANCE AND PROGRESS REPORTS
DEVICE INFORMATION TABLES
TEST SUMMARIES

-...

,"
9

Page 3

S.EQ 0003

1.0
GENERAL INFORMATION
1.1
PROGRAM ABSTRACT
1.1.1 STRUCTURE OF PROGRAM
THIS DIAGNOSTIC OCCUPIES 14.5K WORDS OF MEMORY AND IS COMPATIBLE WITH
BOTH XXDP AND ACT. IT CAN BE RUN STANDALONE UNDER XXDP AND CAN B§
CHAINED UNDER XXDP L ACT AID APT IN ACT MODE (SEE "CREATE fORE IMAGE
COMMAND BELOW FOK DETAILS OF CHAINING PROCEDURE). IT IS A SINGLE
PROGRAM FROM THE STANDPOINT OF THE DIAGNOSTIC USER
BUT WE HAVE
INCORPORATED INTO IT A CONTROL MODULE WHICH WILL LiTER BE RELEASED
INDEPENDENTLY AS A DIAGNOSTIC SUPERVISOR.
WHEN THIS DIAGNOSTIC IS STARTED AT ADDRESS 200 l CONTROL GOES FIRST TO
THE SUPERVISOR PORTION WflICH WILL ASK CERTAIN "HARD CORE" QUESTIONS
ABOUT THE ENVIRONMENT. faEN IT WILL ENTER COMMAND MODEL INDICATED BY
A PROMPT CHARACTER (OS B». AT COMMlIiID MODE TItE OPEdTOR MAY ENTER
ANY OF SEVERAL COMMANDS AS DESCRIBED BELOW.
THE SUPERVISOR CODING FOLLOWS IMMEDIATELY THE DIAGNOSTIC TEST CODING,
BUT
THE
SUPERVISOR
LISTING
HAS BEEN SUPPRESSED FOR GENERAL
DISTRIBUTION. A LIMITED DISTRIBUTION HAS BEEN MADE TO FIELD SERVICE
OF THE SUPERVISOR ASSEMBLY LISTING, AND IT MAY BE CONSULTED.IN EYENT
OF A SOFTWARE PROBLEM.
1.1.2 DIAGNOST~C INFORMATION
THIS PROGRAM TESTS AND EXERCISES RLGI. DISK
DRIVES
RLII/RLill
CONTROLLERS (4 DRIVES PER CONTROLLER). THE ENTIRE PROGRAM IS RUN ON
THE FIRST DRIVE BEFORE STARTING ON THE SECOND. THE PROGRAM STARTS BY
TESTING THE SIMPLEST FUNCTIONS FIRST USING THE LOGIC TESTED IN EARLIER
TESTS TO TEST MORE COMPLEX FUNCTIONS.
THIS PROGRAM FIRST TESTS THE RLOI INTERFACE AND. BASIC DRIVE LOGIC. IT
THEN BEGINS TESTING THE SEEK OPERATIONS USING SINGLE DIFFERENCES L
. PROCEEDING INTO SEEKS OF GREATER DIFFERENCES..
SEEK TIMING IS DONI';
AFTER THE SEEK LOGIC HAS BEEN TESTED.
DATA TRANSFERS ARE DONE AFTER ALL THE SEEK TESTS.
THE FIRST DATA
TRANSFER IS READING OF THE BAD SECTOR FILES WHICH ARE STORED AND USED
LATER TO PREVENT TESTING ON BAD· SECTORS.
FOLLOWING DATA READ AND
WRITE TESTINGL · THE PROGRAM TESTS FOR OVERWRITE PROBLEMS AND ADJACENT
-fYLINDER ~NTERrERENCE.
.
. SEEK TIMINGI.. ROTATIONAL TIMING,'UD WRITE LOCK DAU PROTECTION ARE
'DONE IF MANuAL INTERVENTION IS REQUESTED.
1~2 . SYSTEM REQUIREMENTS
1.2.1 HARDWARE REQUIREMENTS

...

Page 4

SEQ 0004

PDP-II/LSI-Il PROCESSOR WITH 16K OR MORE OF MEMORY
CONSOLR DEVICE (LA30~LA36,VT50,ETC.)
RLl1/RLVII COHTROLLEK(S)
1 - 8 RLOI DRIVES
1 - 8 RLOIK CARTRIDGES WITH BAD SECTOR FILE
KWIIP L KW1IL (OPTIONAL)
LINEPKINTER(OPTIONAL)
1.2.2 SOFTWARE REQUIREMENTS
CXRLDBO RLOI DRIVE TEST PART 2
(FORMERLY MD-II-DlRLD-A)
1.3
RELATED DOCUMF,NTS AND STANDARDS
RLOI USERS MANUAL (EK-RLOI-UG-PRE)
XXDP USERS MANUAL
1.4
DIAGNOSTIC HIERAPCY PREREQUISITES
THE RLOI SUBSYSTEM SHOULD HAVE SUCCESSFULLY RUN THE
FOLLOWING
PROGRAMS:
CZRLABO
RL11/RLVII RLOI CONTROLLER TEST (PART 1)
ClRLBBO
RLl1/RLVl1 RL01 CONTROLLER TEST (PART 2)
CVRLAIO
RLVl1 RL01 DISKLESS TEST (RLVl1 ONLY)
ClRLCBO
RLG! DRIVE TEST (PART 1)
1.5
ASSUMPTIONS
THE HARDWARE OTHER THAN THE RLOI SUBSYSTEM IS ASSUMED TO WORK
PROPERLY. FALSE F-RRORS MAY BE REPORTED IF THE PROCESSOR, ETC., DO NOT
FUNCTION PPOPF-RLY.
2.0
OPERATING INSTRUCTIONS
2.1
HOW TO RUN THIS DIAGNOSTIC
2.1.1
THE SIX STEPS OF EXECUTION
THIS DIAGNOSTIC SHOULD BE LOADED AND STARTED USING NORMAL XXDP
PROCEDURES.
THE START COMMAND SHOULD NOT SPECIFY AN ADDRESS, BECAUSE
TAE DIAGNOSTIC HAS THE PPOPER TRANSFER ADDRESS CODED INTO IT.
WHEN THIS DIAGNOSTIC IS STARTED, THE FOLLOWING STEPS WILL OCCUR:
**********
'" STEP 1 '"
**********

*
$

Page 5

A SHORT SERIES OF "HARDCORE QUESTIONS" WILL BE ASKED:
QUESTION
MEANING
L-CLK (Ll M 1
IS THERE AM L-CLOCK1
P-CLK (Ll N ?
ft
II
"
P-CLOCK?
50HZ (L) M ?
IS THE POWER 50 CYCLES (AS IN EUROPE)?
LSI ·~LJ M ?
IS MACHINE AN LSI?
LPT L N?
IS THERE A LINE PRINTER?
MEM K (D) 16 1
HOW MANY K OF MEMORY ARE THERE?
THE DEFAULTS (SHOWN AFTER EACH QUESTIOH' CAN BE SELECTED BY HITTING
CARRIAGE RETURN. IT IS POSSIBLE THAT HOT ALL OF THE QUESTIONS WILL BE
ASKED: FOR EXAMPLE( IF YOU SAY "YES" TO THE L-CLOCIC QUESTION, THE
P-CLOCK QUESTION WI L ROT BE ASKED.
IF NEITHER P OR L CLOCK ARE ANSWERED YES THE OPERATOR WILL BE ASKED TO
TYPE TWO CHARACTERS 4 SECONDS APART.

*"'***"'****
*****"'****

'" STEP 2 *

WHEN YOU HAVE ANSWERED ALL THE HARDCORE QUESTION Sf THE DIAGNOSTIC WILL
ISSUE THE PROMPT "DS-B)".
FROM THIS POINT. UN IL THE TIME WHEN YOU
RESTART XXDP, YOU WILL BE TALKING TO THE DIAGNOSTIC« NOT XXDP.
WE
WILL REFER TO THE PRESENCE OF THIS PROMPT AS B~ING IN DIAGNOSTIC
COMMAND MODE, AS OPPOSED TO XXDP COMMAND MODE.
n THIS POINT YOU WILL ENTER A "START" COMMAND. THIS IS NOT THE SAME
AS THE XXDP "STARf" COMMUDe: WHICH YOU ALREADY ISSUED IN RESPONSE TO
THE XXDP DOT PROMPT. THIS"~TART" COMMAND CAN TAKE A NUMBER OF
SWITCHES AND FLAGS (ALL OPTIONAL) AND THE DETAILS OF THESE ARE SET
FORTH IN "2.3 DETAILS OF COMMANDS AND SYNTAX". HOWEVERf IN ORDER TO
USE THE PROGRAM, ALL YOU NEED TO SAY IS SOMETHING LIKE HIS:
STI/PASS: llFLAGS :HDE
THINGS TO NOTE HERE:
1.
ONLY THE FIRSt THREE CHARACTERS OF THIS OR ANY COMMAND AT THE
"OS-B)" LEVEL NEED 1'0 BE TYPED.
2. THE "PASS" SWITCH SPECIFIES HOW MANY PASSES YOU DESIRE.
A
PASS CONSISTS OF RUNNING THE FULL DIAGNOSTIC lGAINST ALL
UNITS BEING TESTED (THIS WILL BE EXPLAINED SHORTLY).
ONE
PASS IS ~PECIFiED Ifi THE ABOVE EXAMPLE.
3.
THE "FLAGS" SWITCH MAY SPECIFY 11IY OF A NUMBER OF FL.tCS, BUr
THE raIN US£-FUl. ONES ARE..:
LOE
LOOP O~E ~RROR
HOE
HALT ON ERROR
IER
nHIBITERRflR PRINTOUT

SEQ, 0105

Page 6

SEQ 0006

THE
HOE FLAG IS. .
SPECIF.IED
IN . THE ABOVE EXAMPLE (WE'LL SEE WH'l
SHORTLY).
..
"''''''''''''''''*'''**
t****"'****

.'" STEP 3 "

WHEN YOU HAVE TYPED IN A "START" COMMAND£ THE DIAGNOSTIC WILL COME
BACK WITH THE QUESTION "' UNITS?" TO WHICH. YOU SHOULD RESPOND BY
lYPIN~ IN THE NUMBER OF DEVICES YOU WISH TO TEST.
A WORD OF WARNING HERE: . THE-'NU!ofBER 'OF UNITS DEPENDS ON THE. TARGET
DEVICE OF THE DIAGNOSTIC. FOR EXAMPLE f IF THE DIAGNOSTIC IS DIRECTED
AT I DISK DRIVE THEN THE NUMBER OF UN TS WOULD BE THE NUMBER OF
DRIVES TO' BE 'TESTED. WHEREAS IF THE DIAGNOSTIC WAS DIRECTED AT THE
DISK CONTROLLF.R£ THEN THE NUMBER OF UNITS WOULD BE THE NUMBER OF
CONTROLLERS.
THr: TARGET DEVICE OF A DUGNOSTIC CAN ALWAYS BE
DETERMINED. BY INSPECTING THE "HEADER" STATEMENT NEAR THE BEGINNING OF
THE SOIJRCE CODE.
ONE OF THE OPERANDS OF THIS "HEADER" STATEMENT
SHOIJLD BE THE DEVICE TYPE OF THE DIAGNOSTIC.

Page 7

**********
* STEP 4 *
**********
WHEN YOU HAVE TYPED IN THE NUMBER OF UNITS TO BE TESTED
THE
DIAGNOSTIC WILL ASK YOU THE "HARDWARE QUESTIONS". THE ANSlIliRS TO
THESE QUESTIONS ARE USED TO BUILD TABLES IN CORE, CALLED "HARDWARE
P-TIBLES".
ONE HARDWARE P-TABLE WILL BE BUILT FOR EACH UNIT TO BE
TESTED.
THERE ARE SEVERAL HARDWARE QUESTIONS AID THE ENTIRE SERIES WILL BE
POSED N TIMES, WHERE N IS THE NUMBER OF UNITS.
THIS REPRESENTS A NEill
PHILOSOPHY
IN
DIAGNOSTIC
ENGINEERING.
DIAGNOSTICS IN THE FUTURE WILL NOT BE WRITTEN TO AUTOSIZE OR ASSUME
STANDARD ADDRESSES: INSTEAD£ THEY WILL ASK THE OPERATOR FOR ALL THE
INFORMATION THEY NEED TO TEST THE DEVICE.
**********
**********
AFTER YOU HAVE ANSWERED ALL THE HARDWARE OUESTIONS ISEC 2.5) FOR ALL
THE UNITS YOU WILL BE ASKED "CHANGE SW?~ IF YOU 111 NT TO BE ASKED THE
SOFTWARE afiESTIONS THAT DETERMINE THE BEHAVIOR OF THIS PROGRAM l TYPE
"Y".
IF YOU WANT TO TAKE ALL THE DEFAULTS TO THESE QUESTION~, TYPE
"N". IF YOU TYPE ",.. 'OU WILL BE ASKED THE SOFTWARE QUESTIONS (SEC
2.6)
AND THE ANSWERS WILL BE PUT INTO THE SOFTWARE P-TABLE IN THE
PROG~AM. THE SERIES OF QUESTIONS WILL BE ASKED JUST ONCE, REGARDLESS
OF THE NUMBER OF UNITS TO BE TESTED.

* STEP 5 *

**1t*******
.. STEP 6 *
**********
AFtER YOU HAYE ANSWERED THE SOFTWARE QUESTIONS L THE DIAGNOSTIC WILL
BEGIN TO EXECUTE THE HARDWARE TEST CODE. THERE ARE SEVERAL THINGS
THAT CAN HAPPEN NEXT
DEPENDING ON WHETHER A HARDWARE ERROR IS
ENCOUNTERED AND ALS6 ON WHAT SWITCH VALUES YOU SELECTED ON THE START
COMMAND. CONSIDER THE POSSIBILITIES:
1. IF NO ERROR IS ENCOUNTERED L THEN THE DIAGNOSTIC WILL SIMPLY
EXECUTE THE DESIRED NUMMER OF PASSES AND RETURN TO COMMAND
MODE (PROMPT OS-B».

SEQ-Un

Page 8

SEQ. 0008

IF AN ERROR IS ENCOUNTERED 6 THEN ONE OF THREE THINGS HAPPENS,
DEPENDING ON THE SETTINGS F THE HOE AND LOE FLAGS.
HOE SET: THE ERROR WILL BE REPORTED ON THE CONSOLE AND
THE DIAGNOSTIC WILL RETURN TO COMMAND MODE.
LOE SET: THE DIAGNOSTIC WILL LOOP EILESSLY ON THE BLOCK
OF CODE THAT DETECTED THE ERROR.
NEITHER HOE HOR LOE SET: THE ERROR WILL BE REPORTED ON
, THE CONSOLE AND NORMAL EXECUTION WILL RESUME
AS IF NO ERROR HAD OCCURED.

2.1.2 SAMPLE RUN-THROUGH
LEToS SEE HOW ALL THIS WORKS IN A REAL SITUATION.
RECALL THAT WE
ENTERED THE COMMAND "STA/PASS:1/FLAGS:HOE".
THIS WOULD BE A VERY
TYPICAL WAY TO RUN THE DIAGNOSTIC. IF NO ERRORS ARE ENCOUNTERED t THE
SINGLE REQUESTED PASS WILL BE EXECUTED AND THE PROMPT W LL BE
REISSUED.
IF AN ERROR IS ENCOUNTERED L THE ERROR WILL BE REPORTED AND THE PROMPT
WILL BE REISSUED (BECAUS~ THE HOE FLAG IS SET). AT THIS POINT THERE
ARE FOUR DIFFERENT WAYS YOU CAN GET THE PROGRAM GOING AGAINS:
1. ISSUE ANOTHER "START" COMMAND (THUS GOIIIG THRU ALL OF STEPS
2, 3, 4, 5, AND 6 AGAIN)
2. ISSUE A "RESTART" COMMAND (SAME AS START COMMAND EXCEPT THAT
THE HARDWARE QUESTIONS ARE NOT ASKED)
3. ISSUE A "CONTINUE" COMMAND (EXECUTION WILL RESUME AT THE
BEGINNING OF THE PARTICULAR HARDWARE TEST (MOST DIAGNOSTICS
CONSIST OF A NUMBER OF THESEI THAT IT WAS IN WHEN THE ERROR
HALT OCCURED. NO QUESTIONS SKED.
4. ISSUE A "PROCEED" COMMAND:
EXECUTION WILL RESUME AT THE
INSTRUCTION FOLLOWING THE ERROR REPORT (THIS IS A SPECIAL
COMMAND AND CAN BE ISSUED ONLY AT A HALT ON ERROR).
THE MOST TYPICAL THING TO DO HERE IS TO ISSUE THE PROCEED, BUT WITH
DIFFERENT FLAG SETTINGS. PROBABLY YOU WOULD WANT TO SAY
PRO/FLAGS:IER:LOE:HOE=O

III

<II

lIiI

Page 9

SEQ. 0'0'

THIS WILL DO THE FOLLOWING:
1. TURN ON THE IER (INHIBIT ERROR PRINTOUT) FLAG
2. TURN ON THE LOE FLAG
3. TURN OFF THE HOE FLAG
4. RESUME EXECUTIOI AT INSTRUCTION AFTER ERROR REPORT
THE DIAGNOSTIC WILL NOW LOOP ON THE BLOCK OF CODE THAT DETECTED um
REPORTED THE ERROR L BUT NO ERROR PRINTOUT WILL OCCUR. THUS YOU CUI
STUDY THE ERROR OR S~OPE IT OR WHATEVER.
WHEN YOU·VE SEEN ENOUGH, YOU MAY HIT CONTROL/C. THIS WILL TAKE YOU
OUT OF THE LOOP AND PUT YOU BACK INTO COMMAND MODE. YOU NOW HAVE
THREE CHOICES:
1. SURT
2. RESTART
3. CONTINUE
LET"S SAY YOU·VE REPAIRED THE DEFECT FOUND ABOVE AND WANT TO FINISH
RUNNING THE DIAGNOSTIC. YOU WOULD TYPE
CON/FLAGS:HOE:IER=O:LOE=O
THIS WILL RESTORE THE FLAGS TO THEIR ORIGINAL VALUES AND RESUME
EXECUTION AT THE BEGINNING OF THE HARDWARE TEST YOU WERE IN. IF THE
ERROR DOES NOT RECUR, THE EXECUTION WILL FLOW RIGHT ON fHRU TO THE
HEXT ERROR OR TO END OF PASS.
IF AT END OF PASS YOU WANT TO RUH THE DIAGNOSTIC AGAIN, YOU HAVE TWO
CHOICES:
1. START
2. RESTART
YOU WOULD CHOOSE ONE, DEPENDING ON WHETHER YOU WANTED TO ANSWER THE
HARDWARE QUESTIONS AGAIN.

Pave 10

THE FULL PRINT-OUT FROM THE IBOIE DIALOGUE MIGHT LOOK LIIE THIS:

......

.R OZRnX
OZRKXX
L-CLK (I..) N ? Y
50HZ (I..) N ?
LSI
LPT ~Ll
I.. N
N??
MEM K 0 16?
OS-B)S A~plss:l/FLAGS:HOE
I UBITS (D) ? 2
UInT 1
CSR (0) ?
VECTOR (D) ?
BR LEVEL (0) ?
DRUE (0) ? 0
UIIlT 2
CSR (0) ?
VECTOR (O} ?
BR LEVEL (0) ?
ORnE (0)
CHANGE sa L)? N
DZRKXX HARD ERR 00004 TST 003 SUB 002 PC:004130
ERR HLT
OS-B>PRO/FLIGS:IER:LOE:HOE=O

WHOM
EIITERED:

o
o

0,0

D
D

o
o

0,0
0,0

D
0,0
0,0

D,O
0,0

0,0

0,0
0,0
0,0
0,0

0,0

x************************************************

AT THIS POINT THE DIAGNOSTIC IS LOOPING 01 THE
ERROR WITHOUT PRINTING ANYTHING. YOU CAN SCOPE
THE ERROR UNTIL YOU HAVE LOCATED II THEN AC OOT

********************************** ,*************

"c
OS-B)CON/FLAGS:HOE:IER:LOE=O
CRANGE SW (L) ? N
OZRKXX EOP 1
DS-B)RESTART/PASS:l
CRANGE SW (I..) ? N

0,0

D,O
o
D,O
0,0

111

411

Page 11

2.2
HOW TO CREATE A CHAIIABLE FILE
THE DIAGNOSTIC AS RECEIVED FROM RELEASE EIGINEERING CANNOT BE RUI TN
CHUM MODE. THA IS WHY IT BEARS tHE ExtEISmN .IBU" IIISTEAD OF "BlCft.
tHERE IS A WAY, HOWEVER, TO CREATE A CRAINABLE PROGRAM FROM WHAt
YOU·"E GOT.
IT CONSISTS OF RUNNING THE PROGRAM WITH THE SPECIAL COMMAND "CCI"
ISSUED WHERE YOU WOULD NORMALLY ISSUE A START COMMAND (TO THE PROMPT
DS-B). THIS COMMAND CAUSES THE DIAGNOStIC TO GO fHRU ALL THE
QUESTIONS AND ANSWERS AND THEN TO HALT6 JUST WHERE IT WOULD ORDIIARILY
BEGIN EXECUTION OF THE HARDWARE TEST C DE. AT THIS POINT YOU CAN DUMP
THE PROGR'M AS IT SITS IN CORE TO THE LOAD MEDIUM, WITH THE NEW
EXTENSION RBIC".
HERE IS A SAMPLE DIALOGUE TO ACCOMPLISH THIS:
.R UPD2
RESTART: XXXXII
*CLR
*LOAD DUG. BIN
XFER:200
CORE:0,60602
*SURT 200
L-CLK (Ll N ?
DS-B)CCI

# UNITS (D) ? 4

CHANGE SW (L) ? N
PTIB END: 60632
*************************************
*AT THIS POINT THE MACHINE HALTS AND*
*YOU MUST RESIARI AI ADnRES~ XXXXXX*
************* ** ** *****************
*HICORE 60632
CORE: 0 60632
*DUMP DK6: DIIG.BIC
THE RESULT OF DOING THIS IS THAT YOU CAN NOW BUILD AN XXDP CHAIN FILE
CONTAINING THE XXDP COMMAND
.R DUG.BIC
AND THE DIAGNOSTIC WILL EXECUTE WITHOUT MANUAL INTERVENTION, USING THE
ANSWERS THAT YOU GAVE IT WHEN YOU DID THE CCI COMMAND.

S_.OI1

Pave 12

I •• IOU

2.3
DETAILS OF COMM1NOS AND SYNTAX
2.3.1 TABLE OF COMMAND VALIDITY
THERE ARE FOUR WiYS OF EITERING DIICIOSTIC COMMIID MODEl AID DIFFERE.T
SUBSETS OF THE DIiG COHHA&O SET ARE AVAILABLE VITH EICHl
HOV ENTERED
LEG1L CDMMIROS
OPERATOR
ENTERED
-RUI
DIAGStiRT
1.
PIIIt
DISPLAY
FLAGS
Z'LIGS
DIAGNOSTIC HiS FINISHED ALL
START
2.
ITS REQUESTED PASSED
RESTART
PRIIT
-DISPLAY
FLIGS
ZFLAGS
OPERATDR
IITERRUPTED
THE
ST1RT
3.
DIAGNOSTIC WITH CTRL/C
RESTART
connUR
PUIif.
DISPLAY
FLAGS
ZFLAGS
AI ERROR VIS ENCOUNTERED
. START
4.
VITH THE HOE FLAG SET SET
RESURT
COIITINUE
PROCEED
pun
DISPLAY
FLAGS
ULAGS
2.3.2 COMMAND SYNTIX
******************************************************************
STAlRTl/TESTS:TEST-LISTtPASS:PASS-CIT/FL1GS;FLIG-LISTIEOP:EOP-IICR
***~**&~*************** *************~***************~************

THE DIAGNOSTIC IN CORE IS EXECUTED IN ACCORDANCE WITH THE SWITCHES
SPECIFIED.
THE MESSAGE "' Ulns?" IS PRHlTED. THE START COMaUD MU
BE ISSUED WHEN DIAGNOSTIC COMMAND MODE BAS BEEN ENTERED VIA DIE OF THE
FOLLOWING: A) OPERATOR TYPED "RUM DIAGNOSTIC" B) DIAGNOSTIC FIII5HEB
EXECUTING C) ERROR WAS ENCOUNTERED WITH HOE FLAG SET B) OPERATOR
ENTERED CONtROL/C.
.

.,
@

iii

Page 13

AFTER THE OPERATOR RESPONDS TO "i 01ITS1"£ THE HARDWARE DIILOGUE IS
INITIATED.
WHEN IT IS COMPLETED
TH~
QUESTIOHS "CHIMGE SW?" IS
ISSUED, AND THE ANSWERS, IF GIVEN L BicOHE THE NEV DEFAULTS. THEREFORE
IT IS NECESSARY TO RELOAD THE PKOGRAM IN ORDER TO RETURt TO THE LOAD
DEFAULTS.
THE SWITCH ARGUMENTS IRE AS FOLLOWS:
"TEST-LIST" IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR RANGES OF
DECIMAL NUMBERS (1-5:8-10 ETC.) THAT SPECIFY tHE TESTS TO BE EXECUTED.
THE NUMBERS ARE SEPARATED BY COLONS. THE NUMBERS RANGE FROM 1 TO THE
LARGEST TEST NUMBER IN 1HE DIAGHOSTIC. THEY MAY BE SPECIFIED IN ANY
ORDER. TESTS WILL BE EXECUTED IN NUMBERICAL ORDER REGARDLESS OF THE
ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE ALL TESTS.
"PASS-CNT" IS A DECIMAL NUMBER INDICATING THE DESIRED NUMBER OF
PASSES.
A PASS
IS DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC
(ALL SELECTED TESTS) AGAINST ALL UNITS SUMBltTED.
THE DEFAULT IS
tlON-ENDING EXECUTION •• B "FLAG-LIST" IS A SEQUENCE OF ELEMENTS OF THE
FORM <FLAG>L <FLAG=l>, OR <FLAG=O>, SEPARATED BY COLONS, WHERE <FLAG>
HAS ONE OF rHE FOLLOWING VALUES:
HALT ON ERROR,. CAUSING COMMAND MODE TO BE ENTERED WHEN AN
HOE
ERROR IS ENCOuNTERED
LOOP ON ERROR L CAUSING THE DIAGNOSTIC TO LOOP CONTINUOUSLY
LOE
WItHIN THE ~MALLEST DEFINED BLOCK OF CODING (SEGMENT,
SUBTEST, OR TEST} CONTAINING THE ERROR
INHIBIT ERROR REPORTING
IER
INHIBIT BASIC ERROR REPORTS
IBE
INHIBIT EXTENDED ERROR REPORTS
IXE
PRI
DIRECT ALL MESSAGES TO A LINE PRINTER
PRINT NUMBER OF TES BEING EXECUTED
PNT
BELL ON ERROR
BOE
RUN IN UNATTENDED MODEL BYPASSING MANUAL INTERVENTION TESTS
UAM
INHIBIT STATISTICAL RE~ORTS
ISR
INHIBIT DROPPING OF UNITS BY DIAGNOSTIC
IDU

SEQ-Iftl

Page 14

I . @II"
THOSE EQUATED TO 0 ARE
TBE FLAGS NAMED OR EQUATED TO 1 ARE SET
CLEARED. A FLAG lOT SPECIFIED IS CLEARED: IF THE FLAGS SWITCH IS lOT
GIVEN ALL FLAGS ARE CLEARED.
"EOP-IBCRn IS .1 DECIMAL BUMBER IBDICArIIG HOW OFTEI (II fERMS OF
PASSES) IT IS DESIRED THAT THE EID OF PASS MESSAGE BE PRIITED. THE
DEFAULT IS AT THE EID OF EVERY PASS.

***********************************************************************************

RESITARTl/TEST:TEST-LIST/PASS:PASS-CIT/FLAGS:FLAG-LTSTIEOP:EOP-TICR/UIITS:UIIT-LIST
***************************************************************~*******************

THE DIAGNOSTIC IN CORE IS EXECUTED IN ACCORDAICE WITH THE SWITCHES
SPECIFIED. HOWEVER, HEW P-TABLES ARE NOT BUILT. INSTEAD, THE ONES II
CORE ARE USED.
tHE QUESTION "CHUGE SV?n IS ASKED, UD THE USERS IF GUEI BECOME THE
NEW DEFAULTS.
THE COMMAND MAY BE ISSUED WHEN COMAND MODE HAS BEEI
EITERED VIA A) DIAGNOSTIC IS FIIISHED B) HALT 01 ERROR C) COITaOL/C.
THE SWITCH ARGUMEITS IRE AS II THE START COMMAID EXCEPT:
1. "UNIT-LIST" IS I SEQUEMCE OF LOGICAL UBn BUMBERS RUGUG
FROM 1 THRU N (I = lUMBER OF UBITS BEING TESTED) SPECIFYING
WHICH UIITS ARE TO BE TESTED.
THE LOGICAL OIIT lUMBER
DESIGNATES THE POSITION OF THE P-TABLE II COREL ACCDRDIIG TO
THE ORDER IN WHICH THEY WERE BUILT. THE UIITS ~PECIFIED MUST
NOT HIVE BEER DROPPED BY THE OPERATOR DROP COMMIID. THE
UNIT-LISt DEFAULTS TO "ALL THAT HAJE lOT BEEI DROPPED BY
OPERATOR COMMUD u •
THE EFFECT OF THE UJII'l'-LIST LASTS UNTIL
THE NEXT START (WHERE IT IS IUTOMATICALLY RESET TO "ILL") OR
THE NEXT RESTART.
.
2. ALL UNSPECIFIED FLAG SETTINGS ARE UNCHANGED.

*******************************************

CONCTINUE'/PASS:<PASS-CIT/FLAGS:<FLIG-LISf>
*********~*********************************

COMMAND MODE MUST HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A
CORTROL/C. THE EFFECT OF THE COMMAND IS TO GO TO THE BEGIIRIMG OF THE
TEST THAT WAS BEING EXECUTED WHEN THE HALT OR CONTROL/C TOOK PLACE.
SOFTWARE DIALOGUE MAY OPTIOIALLY BE REEXECUTED. HARbWARE PARAMETERS
MAY NOT BE CHANGED.
THE SWITCH ARGUMENTS ARE AS IN THE START COMMAID EXCEPT:
1. DEFALT FOR PASS-CNT IS THE UNSATISFIED PASS-CNT FROM THE
PREVIOUS START OR RESTART
2. UNSPECIFIED FLAG SETTIRGS ARE UNCHANGED

'If.

...
01

Pag_ 15
***************************
PRocCEEDl/FLAGS:<FLIG-LiST)
***************************
COMMARD MODE MUST HAVE BEEI EITERED VIA A HALT OR ERROR.
tHE EFFECT
OF THE COMMARD IS TO BEGIN EXECUTION AT THE LOCATIOI FOLLOVIIG THE
ERROR CALL. NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED.
THE SWITCH IRGUMENTS ARE THE SAME AS THE StART COMMAID EXCEPt:
1. UNSPECIFIED FLAG SEtTIRGS ARE UNCHARGED
*************************************************************

CCI'TF.ST;~EST-LTST'PASS:PASS-CIT/FLAGS:FLIG-LIST/EOP:F.OP-IICR
*** ************** *****************************~******** ***

THE DIAGNOSTIC EXECUTES THRU ALL OPERATOR DIALOGUE AID HALTS AT THE
HARDWARE TEST CODE. NOW THE OPERATOR CAN DUMP THE CORE IMAGE TO THE
MEDIUM WITH A BIC EXTENSION.
THE BIC FILE MUST BE HANDLED DIFFERENTLY DEPENDIIG OR WHETHER IT IS
RUR MANUALLY OR IN CHAIN MODE. If RUI MANUALLY IT CAR BE IRYOKED
EITHER WITH A "START" (IN WHICH CISE IT WILL BEHAYE LIKE THE BII f!LE:
THE PRE-GENERATED ARSWERS TO OPERATOR QUESTIONS WILL BE IGIORED OR
WITH A "RESTART" (IN WHICH CASE THE PRE-GENERATED OPERATOR AIS ERS
WILL BE USED).
IF RUN IN CHAIN MODE, AUTOMATIC EXECUTION WILL COMMEICE IMMEDIATELY
FROM THE XXDP COMMA D "eR DIAG". THE COMMAND PROMPT "DS-B>" WILL NOT
BE ISSUED.
lNY SWITCHES SPECIFIED ON THE CCI COMMAND WILL CARRY OYER WHER THE BIC
FILE IS RUN IN CHIlI MODE (EXCEPT THAT UAM IS ALWAYS SET THERE) BUT
WILL NOT CARRY OYER WHEN IT IS RUK MANUALLY.
,
TO DO 1 ceI ON A FULL SIZED DIAGNOSTIC C14.5K WORDS} 1 MACH IKE SIZE
LARGER THIN 16K 15 REQUIRED. THE EXACT SIZE NEEDE6 DEPEIDS 'OK WHICH
UTILITY IS USED TO EXECUTE THE DIAGNOSTIC AT CCI TIME.
**********************
DROtPl/UIITS:UNIT-LIST
***i*~****************

THE UIITS SPECIfIED IRE DROPPED FROM TESTING UNTIL THEY ARE ADDED BACK
OR UNTIL A START COMMIND IS GIVEN. I DROP CIKROT BE FOLLOWED BY A
PROCEED.
THERE IS ALSO A "DROP" MACRO INTERNAL TO THE DIAGNOSTIC, WHICH GIVES
THE FACILITY OF AUTO-DROPPING.
THE DURATIOH OF A PROGRIM DROP,
HOWEVER, IS ONLY URTIL THE HEXT START OR RESTART.

.... 0015

Page 16

nt-OU6

*******************
lDn,UNITS:UITT-LTSf
*** ***************
THE UNITS SPECIFIED ARE IDDED BACK nHEY MUST HUE BEEI PREVIOUSLY
DROPPED BY THE DROP COMMAND) TO THE TEST SEQUENCE. AI ADD CAIIOT BE
FOLLOIfED BY A PROCEED.
*******
PRllItTl
*******
ALL STATISTICS TABLES ACCUMULATED BY THE DIIGIOSTIC ARE PRI~TED.
THE
ISR (INHIBIT STATISTICAL REPORTIIG) FLAG IS CLEARED.
***************************
DlsrpLAY}JUNTTS:<UIIT-LIST>
*********~*****************

THE HARDWARE P-TABLES FOR ALL UIITS UNDER TEST ARE-PRINTED OUT I I THE
FORMAT IN WHICH THEY WERE ENTERED. ANY UIITS THAT WERE DROPPED BY THE
OPERATOR "DROP" COKKAID ARE SO DESIGNATED.
*******
FLACCS}
***11***
THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED.
********
ZfLUGS)
********
ALL FLAGS ARE CLEARED.
2.4
EXTENDED P-TABLE DIALOGUE
THE FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REYEALED BY THE
FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY.
AS SOON AS THE QUESTIOI "I UNITS1" IS ANSWERED (WITH THE NUMBER H
SAY) SPACE IN CORE IS ALLOCATED FOR • P-TIBLES. iLL OF THE P-TABLE~
ARE OF THE SAME FORMAT
AND THERE IS A ONE-TO-OIE CORRESPOIDENCE
BETWEEN THE HARDWARE ~lR1METER QOESTIORS lND THE SLOTS IN THE P-TABLE
FORMAT.

..
iii

Page 11

ON THE FIRST TRIP fHRO THE QOESTIOIS, ALL or fHE SLOTS II ALL OF fBI
P-TABLES ARE FILL,SIF THE OPER fOR tYPES II LESS fHAI I KIPLICl
'ALUES IN RESPOIS!
A PARTICULAR QU!SfIOR~ THESE VALUES ARE PLACED
II THE P-TABLES (ORE VALOE COlIC lITO THE rROPER SLOT or EACH P-TIBLK
BEGIRRIIG VITH THE FIRST P-TABLE) UITIL THE SfRIR' or VILUES IS
EXHAUSTED. THE LAST VILUE THAt SLOT IR fBE REMAIIII' P-TABLES.
OR SUBSEQUENT TRIPS fBRU THE QUESTIORS THE SAME PROCESS IS CARRIED
OUT L EICEPT THAT THE EARLIEST P-T1BLE 'OT TO HA'E RECEI'ED AR EXPLICIT
VALuE II ANY OF ITS SLOtS lOW ASSUMES THE ROLE tHAt TABLE lUMBER DIE
PLAYED IN THE FIRst TRIP.
THE SERIES OF QUEST 1015 IS REISSUED URTIL AT LEAST DIE QOISTIOI HAS
RECEIVED N EXPLICIt 'ALOES FROM THE OPERAtOR.
IN GIYING A STRING OF YALOES L COMMAS WITHOUT IITERYEtIRG 'ALUES MAY BE
USED TO INDICATE A REPETITIOn OF THE LAST NAMED VALUE.
A STRING OF VALUES MAY BE GIVEN AS A RANGE (6-10 FOR EXAMPLEl- IF THE
YALUES REPRESENT PURE NUMERICAL DATI, THIS SAMPLE RAMGE TR BLIrES to
THE STRING 6 7 8 9 10 (AN INCREMENT OF 1).
IF THE 'ALUES ARE
ADDRESSES, T~E' §A'PLE RANGE TRANSLATES to THE STRING 6,8,10 (AN
INCREMENT OF 2).
NOW LET US SEE HOW WE COULD USE THESE CAPABILITIES TO CONSTRUCT I SET
OF P-TABLES.
ASSUME THAT WE HAVE 64 UIITS, AID THAT THERE ARE THREE
HARDWARE PARAMEtERS FOR EACH ITHREE SLOTS IN tHE P-TABLE
THREE
HARDWARE QUESTIONS II THE 01 LOGUE). LEt rHE DESIRED VILUE'FOR THE
FIRST PARAMETER BE THE lUMBER 75 FOR ALL 64 TABLES. LET THE DESIRED
VALUE
FOR
THE SECOND PARAMETER BE EQUAL TO THE UNIT NUMBER
(I L 2 L 3 L ••• L 64) EXCEPT FOR UNIT 50 L WHICH SOULD RECEIVE THE VALUE '49.
LET TH~ DE~IRED VALUE FOR THE THIKD PARAMETER BE THE 10MBER 16 FOR THE
FIRST 20 UNITS AND THE NUMBER 17 FOR THE LAST 44 UNITS.
THE FOLLOWING DIALOGUE WOULD ACCOMPLISH THIS GOAL:
# UNITS (D) ? 64
UNIT 1
(QUESTION 1> ? 15
(QUESTION 2> ? 1-20
(QUESTION 3> ? 16
UNIT 21
(QUESTION 1> ?
(QUESTION 2> ? 21-49,,51-64
(QUESTION 3> ? 77

SEQ' 0011

Page 18
SEQ' 0011

tHE FIRST TIME THE SERIES IS ASKED SLOt DIE RECEIVES A 15 II ALL 64
TABLES. SLOT TWO RECEIVES THE VAL6ES 1,2<3, ••• (.20 II TABLES 1 THRU 20
AID A COBSTAHT 20 IN TABLES 21 THRU 64.
S Of THREE RECEIVES A
CORSTAIT 16 IN ALL 64 TABLES.
THE SECOND TIME THRU THE SERIES TABLES 21 THRU tHE EID ARE GOIIS TO
BE AFFECTED {IOTE fHAT THIS ~IRCE OF I.FORMITIOI IS PRI.fiD OUt FOR
THE OPERATOR II THE FORM "UNIT XX" AT THE BEGIII IC 0' EACH SERIES).
QUESTIOI 1 IS RESPOIDED TO BY A <CR)L SO SLOT DIE STilS A COISfilT 15
IN TABLES 21 THRU 64 SINCE 10 NEW ~XLICIT YALUES ARE TYPED II. SLOT
TWO GETS THE VALUES 2{L22,23 L••• ,49 II fABLES 21 fHRU 49 f AID GETS I
49 IN SLOT 50, AID G~TS TH~ VALUES 51 L52 L 53' •• £L64 II ABLES 51THRU
64. SLOT THREE GETS THE VALUE 11 IN TIsLE5 21 TnKU 64.
THE DIALOGUE IS TERMINiTED WHEI THE SOFTWiRE RECOGIIZES THAT 64
EXPLICIT VALUES HAVE BEEN GIYEN FOR AT LEAST 01 QUESTIOI (lAMELY
QUESTION 2).
2.5 HARDWARE PARAMETERS
THE FOLLOWING QUESTIONS WILL BE ASKED 01 A START COMMARD.
THE VALUE
LOCATED TO THE LEFT OF THE QUESTIOI MARK IS THE DEFAULT VlLUE THiT
WILL BE TAKEN ON A CARRIAGE RETURN RESPOICE.
RLll (L) Y1
iNSWER YES(Yl IF YOU HAVE AN RLII CONTROLLER, NO(N) IF YOU HAVE AI
RLVll CONTRO LER.
BUS ADDRESS (O) 1744001
ANSWER WITH THE BUS ADDRESS OF THE CONTROLLER.
lECTOR (0) 3301
ANSWER WITH THE INTERRUPT VECTOR OF THE CONTROLLER.
BR LEVEL (0) 51
ANSWER WITH THE INTERRUPT PRIORITY OF THE CONTROLLER.
DRIVE (0) 01
ANSWER WITH THE DRIVE(S) CONNECTED TO THE CONTROLLER.
SOFTWARE PARAMETERS
THE FOLLOWING QUESTIONS ARE ASKED IF REQUESTED 01 A STARTL RESTART, OR
COITINUE. THEY ALLOW FLEXIBILITY IN THE WAY THE PROGRAM 8EHAVES. THE
SOFTWARE PARAMETERS GIVE THE PROGRAM FLEXIBILITY II THE WAY IT RUIS.
THE PARAMETERS CAN BE MODIFIED ON A START, RESTART, OR CONTINUE BY
ANSWERING (Y)ES TO THE FOLLOWING QUESTION:
2.6

Page 19
CHANGE S.W. ?
A YES ANSWER WILL ASK THE fOLLOWING SOFTWARE PARAMETER QUESTIONS, WITH
THE PRESENT DEFAULT VALUE PRINTED TO THE LEFT OF THE QUESTION MARK.
(THE LAST ANSWER GIVEN IS THE DEFAULT) THE DEFAULT IS TAKEN ON A <CR>.
CONTROL Z (AZ) WILL DEFAULT ALL REMAINING QUESTIONS AND START THE
TEST.
USE ALL CYLINDERS (N)?
IF "YES"f THOSE TESTS THAT NORMALLY USE A SELECTED SET OF CYLINDERS
WILL TES EVERY CYLINDER ON THE CARTRIDGE.
USE ALL SECTORS (N)?
IF "YES" THOSE TESTS THAT NORMALLY USE A SINGLE SECTOR TO TEST A
GIVEN O~ERATION (SUCH AS SEEK DESTINATION) WILL READ AND VERIFY EVERY
SECTOR HEADER.
EXECUTE MANUAL INTERVENTION TESTS (N)?
IF "YES", SEEK TIMING L ROTATIONAL TIMING, AND WRITE LOCK ERROR AND
DATA PROTECTION TESTS ARE EXECUTED.
THE ONLY TEST THAT ACTUALLY
REQUIRES MANUAL INTERVENTION IS THE WRITE LOCK TEST AND THAT TEST WILL
BYPASS AUTOHATICALLY AFTER WAITING 30 SECONDS FOR WRITE LOCK TO BE
SET.
LOWER SEEK LIMIT (N)?
IF "YES", TH~ NEXT PARAMETER IS REQUESTED.
ENTER VALUE (DECI~AL) (D)?
THIS LIMIT IS IMPOSED ON ALL SEEK OPERATIONS SUCH THAT TESTING IS NOT
DONE BELOW THAT LIMIT. IN ADDITION SETTING THIS LIMIT (OR THE UPPER
LIMIT, SEE BELOW) C~USES THE FORWOR6 AND REVERSE OSCILLATING SEEK
TESTS TO PERFORM DIFFERENTLY (SEE TEST DESCRIPTION). TESTS THAT
REQUIRE ACCESS TO A SPECIFIC CYLINDER THAT FALLS BELOW THE SPECIFIED
LIMIT WILL IG~ORE THE LIMIT (SEE WRITE/READ TEST PART 1).
UPPER SEEK LIMIT (N)?
IF "YES" AN UPPER CYLINDER LIMIT IS IMPOSED IN THE SAME MANNER AS THE
LOWER SE~K LIMIT. A "YES" RESPONSE WILL CAUSE THE FOLLOWING PARAMETER
REQUEST.
ENTER VALUE (DECIMAL) (255)?
USE ONLY ONE SURFACE (N)?
IF "YES", THE NEXT PARAMETER IS REQUESTED.
SPECIFY SURFACE (0 OR 1) (DECIM~L) (O)?

SEQ 0019

Paq8 20

SEQ- 0028

WHICHEYER SURFACE IS SPECIFIED IS THE ORLY SURFACE TESTED II THE
ENTIRE PROGRAM.
AIY TEST THAT IS DESIStED TO TEST THE OTHER SURFACE
IS AUTOMATICALLY BYPASSED. THE PROGRAM DOES lOT PRIRT AIY IIDICATIOI
THAT A TEST IS BYPASSED II THIS CASE.
SPECIFY ERROR LIMIT (DECIMAL) (20)1
THIS PARAMETER SPECIFIES THE MAXIMUM lUMBER Of ERRORS ALLOWED.
THIS
LIMIT IS ON A PER DRIYE BASIS II A SlaGLE PASS. IF THE ERROR LIMIT IS
EXCEEDED, THE DRIVE IS DROPPED FROM FURTHUR TISTIIG.
DATA COMPARE ERROR LIMIT (DECIMAL) (20)1
THIS PARAMETER SPECIFIES THE NUMBER OF DITI COMPARE ERRORS TBAT WILL
BE LISTED FOR A GIVEN COMPARE OPERATION. AFTER TBE LIMIT IS RB1CHED£
THE DATA ERRORS ARE NOT PRIITED BUT THE COMPARE COITIHOES OITIL TH~
END OF THE DATI FIELD. 1 TOTAL IS REPORTED AT THE ERD OF THI COMPARE.
DROP DRIVE IF NO RESPOISE (1)1
IF THIS PARAMETER IS SPECIFIED AS YES, THE PROGRAM WILL CHECK IF THE
DRIVE IS READY OR IF IT WILL RESPO 0 TO A GET STATOS BErORE TESTING
STARTS ON THAT DRIVE. IF IT IS NOT REIDY AID WILL BOT RESPOID TO 1
GET STATUS THE DRIVE IS DROPPED AND A MESSAGE IS PRIITED.
3.0 ERROR INFORMATION
ALL ERRORS ARE PRINTED 'IA CONSOLE DEVICE. THE ERROR INCLODES ERROR
NUMBER, TYPE AND PROGRAM LOCATION. ERRORS IICLUDE REGIStERS BEFORE
AND AT ERROR WITH RELEVENT DITA.
3.1 ERROR REPORTING
tHE OPERATION MESSAGE (LINE 4) IS GEIERATED II A DYIAMIC MARIER BASED
ON THE SUBSYSTEM rUICTIO. BEING EXECUTED AT THE TIME OF THE ERROR AID
THE STATE OF THE FLAGS IN THE LOCATION TAGGED "OPPLASS". THE POSSIBLE
OPERATION MESSAGES ARE GIVEN BELOW.
SEEK - FROM (CiL NUM) DIrr (CiL DIFF) SGI (0 OR 1) DD (0 OR 1) WHERE
THE VALUES ARE GIVEN IN OCTAL. THIS MESSAGE IS THE RESULT OF A SEEK
OPERATION THAT WAS VERIFIED BY A READ HEADER AID tHE HEAD POSITION
AFTER A SEEK IS IN ERROR. (THE ACTUAL HEAD POSITION IN THIS ERROR
SITUATION IS GIVEN II THE RESULT LIIE, LIIE 5.)
READ DATA - IS A READ DATA OPERATION WHERE SOME FORM OF ERROR WAS
DETECTED IN THE ACTUAL READ OPERATIOI. THIS ERROR COULD BE HARDWARE
DETECTED SUCH AS DATA CRC, HEADER CRC HEADER NOT FOUND
ETC. L OR A
SOFTWARE DETECTED ERROR SUCH AS DRf'E READY RESET AFfER A READ DITA
COMPLETED.
READ DATI WITH DATA COMPARE - IS AI ERROR THAT WAS DETECTED AS BiD
DATI IN THE BUFFER AFTER

•

Page 21
A READ DATA OPERATION. WHEN THIS OPERATION IS REPORTED IT INDICAfES
THE ACTUAL READ DATA OPERATION COMPLETED WITH NO DETECTED ERRORS B~T
THE DATA WAS WRONG.
READ HEADER - READ HEADER FOR 40 HEADERS - READ HEADER FOR 40 HEADERS
WITH HEADER COMPARE - HAVE THE SAME GENERAL MEANING AS THE READ DATA
AND READ DATA WITH DATA COMPARE. MESSAGES HAVING THE OPERATION OF
READ HEADER OR READ HEADER FOR 40 HEADERS ARE THE RESULT OF ERRORS
DETECTED IN THE ACTUAL OPERATION WHILE THE READ HEADER FOR 40 HEADERS
WITH HEADER COMPARE INDICATES NO ERROR IN THE ACTUAL OPERATION BUT THE
HEADER DATA ITSELF WAS IN ERROR.
WRITE DATA - RESET - GET STATUS - GET STATUS WITH RESET
ARE ALL
BASIC OPERATIONS.
AS BEFORE
THE ERROR DETECTION CAN BE EITHER
HARDWARE OR SOFTWARE. THE RESU(T LINE (LINE 5) ~ILL DEFINE THE REASON
FOR THE REPORT.
LD DRV - UNLD DRV - ARE OPERATION MESSAGES THAT WILL APPEAR IN THE
REPORT WHEN THE DRIVE LOAD AND UNLOAD SEQUENCE IS BEING TESTED.
ANOTHER GROUP OF OPERATION QUALIFIERS WILL BE REPORTED FOR OPERATIONS
THAT FAIL IN SPECIFIC TESTS. THESE TESTS ARE THE WRITE/READ TEST PART
2, OVERWRITE TEST, AND THE ADJACENT CYLINDER INTERFERENCE TEST.
QUALIFIER
OPERATION
READ DATA WITH DATA COMPARE
READ DATA
WRITE DATA.
READ HEADER

fOL 0 TO CC SEEK
FOL 255 TO CC SEEK
FOL WRITE (NO SEEK)
ADJ. CYL WRITTEN AFTER FWD SK
ADJ. CYL WRITTEN AFTER REV SK
SK FWD, WRT-SK REV, OVERWRT
SK REV, WRi-SK FWD, OVERWRT
THE ABOVE OPERATIONS CA~ BE REPORTED WITH ANY OF THE QUALIFIERS.
THE
QUALIFIERS IN THESE TESTS ARE AN ATTEMPT TO MAKE THE REPORT MORE
MEANINGFUL BY PROVIDING INFORMATION ABOUT THE SEQUENCE OF OPERATIONS
BEING DONE.
THE QUALIfIERS "fOL 0 TO CC SEEK" AND "FOL 255 TO CC SEEK" INDICATE
THAT THE SEQUENCE OF OPERATIONS INCLUDED A SEEK OF A GIVEN DIRECTION
TO THE CYLINDER WHERE THE TEST IS BEING
PERFORMED.
THE "FOL WRITE (NO SEEK)" QUALIFIER MEANS THAT THE OPERATION WAS DONE
AFTER A WRITE WITH NO HEAD MOVEMENT BETWEEN THE WRITE AND READ.
THE QUALIFIER "ADJ CIL WRITTEN AFTER FWD SKU AND "ADJ CIL WRITTEN
AFTER REV SK" WILL BE REPORTED ONLY IN THE ADJACENT CYLINDER
INTF.RFERF.NCE TEST. THESE QUALIFIERS ARE USED WREN THE ERROR OCCURS ON
THE CYLINDER UNDER TEST AND DEFINE THE DIRECTION THE HEADS WERE MOVED
WHEN THE ADJACENT CYLINDER WAS WRITTEN.

SEQ 0021

Page 22

SEQ. 0022

THE QUALIFIERS "SI FWD, WRT-SK REV~ OVERNRT" IND "SI REV, WRT-SI FWD,
OVERNRT"
WILL BE R~PORTED ONLy IN THE OVERWRITE TEST.
THES~
QUALIFIERS DEFINE THE DIRECTION OF HEAD MOTIOH BEFORE THE INITIAL
WRITE AND THE OVERWRITE.
THE QUALIFIER "ON BAD SEC FILES" WILL BE REPORTED WUH THE WRIfE DAU
COMMAND IF THE PROGRAM ABORTS THAT COMMAND BECAUSE THE WRITE WOULD BE
ON THE BAD SECTOR FILES.
3.1.2 SPECIFIC RESULT MESSAGES
THE RESULT MESSAGE (LINE 5) IS GENERATED DYNAMICALLY BASED ON THE
EXPECTED RESULT OF THE OPERATION BEING TESTED. SINCE OPERATIONS ARE
MONITORED DURING EXECUTION THE RESULT MESSAGE MAY REPORT AN ERROR
DETECTED DURING THE OPERATION AS WELL AS THE ERRORS SEEN AT THE END OF
THE OPERATION. ONLY THE FIRST ERROR SEEN IS REPORTED IN ALL CASES.
THE GENERAL FORMAT FOR THE RESULT LINE IS RESULT:(VAR 1) IS (VAR 2) SB (VAR 3) (OPTIONAL QUALIFIER)
WHERE VARIABLE 1 CAN BE ONE OF THE FOLLOWING:
CONT ERR
ICONTROLLER ERROR)
DRV ERR
DRIVE ERROR
NON-EXSTNT MEt<!
NOH-EXISTAN~ MEMORY)
HEADER CRe ERROR}
HDR CRC
DATA CRC
HDR NOT FHD
(SEADER NOT FOUND)
DATA LATE
HDR NOT FRD/HOR CRC/OPI
~ALL 3 BITS SET)
DRY ROY
DRIVE READY)
SELECTED HEAD
VOL CHK
(VOLUME CHECK)
COVER OPEN
BRUSH HME
~BRUCH HOME~
IIIRf LCK
WRITE LOCK
HDS OUT
HEADER ODT~
DRV SEL ERR
DRIVE SELE TERROR)
DRV STATE
DRIVE STATE)
SPIN TIMEOUT
SPINDLE TIMEOUT SPD ERROR)
WRT GAT ERR
WRITE GATE ERROR)
SEEK TIMEOUT
SK'l'O ERROR}
CUR HEAD ERR
CURRENT IN HEAD ERROR)
IIIRT OAT ERR
WRITE DATA ERROR)
OP INCOMPLETE
OPI ERROR~
HDR/DAT ERR
HEADER CR OR DAU CRC ERROR
BIT 11 OF CS REGISTERl
HDR NOT FHD/DAT LATE
(HEADER NOT FOUND OR 0 TA LATE
ERROR BIT 12 OF es REGISTER~
CYL
(CYLINDER WHEN REPORTING A 5 EK ERROR)

Page 23

VARIABLE 2 WILL BE A VALUE THAT DEFINES WHAT THE RESULT ACTUALLY IS.
THIS CAN BE A 1 OR 0 TO INDICATE A SET OF RESULT CONDITIONS 6 A NUMBER
o TO 7 TO INDICATE THE DRIVE STATE, OR A NUMBER 0 TO 377 (CTAL) TO
IDENTIFY A CYLINDER NUMBER.
VARIABLE 3 DEFINES THAT THE VALUE GIVEN IS VARIABLE 2 SHOULD BE.
THE OPTIONAL QUALIFIER IS PROVIDED WHEN IT IS USEFUL TO KNOW WHEN THE
ERROR WAS DETECTED IN THE OPERATION BEING PERFORMED. THIS QUALIFIER
IS USED TO REPORT RESULTS SUCH AS:
BRUSH HME IS 1 SB 0 IN STATE 2
HEADS OUT IS 0 S8 1 IN STATE 3
DRV RDY
IS 0 S8 1 IN DATA XFER
SELECTED HEAD IS 1 SB 0 IN CYCLE UP
DRV ROY
IS 0 SB 1 IN STATE 5
DRV RDY
IS 1 SB 0 IN SEEK WID MOTION
DRV ROY
IS 0 SB 1 IN 10MS
DRV RDY
IS 0 SB 1 IN 500MS
DRV ROY
IS 0 SB 1 IN 5SECONDS
THESE RESULTS, WHEN SEEN WITH THE OPERATION MESSAGE, WILL BE SELF
EXPLANATORY.
OTHER RESULT MESSAGES THAT CAN BE PART OF AN ERROR REPORT ARE:
"INTERRUPT TO LATE" WHICH INDICATES THAT THE OPERATION BEING PERFORMED
DID NOT COMPLETE IN THE EXPECTED AMOUNT OF TIME. THIS RESULT CAN BE
CAUSED BY THE DRIVE LOOSING READY BEFORE STARTING A READ HEADER AND
THEREFORE NOT COMPLETING THE READ HEADER IN 1MS.
"FAIL TO RELOAD HEADS AFTER ERR CLEAR" IS REPORTED WHEN IN ERROR
CAUSES HEADS TO UNLOAD AND AFTER THE ERROR IS CLEARED THE HEADS DO NOT
RELOAD.
"UNKN DRV STATE-NO RDY l NO ERR f HDS OUT" IS REPORTED WHEN THE PROGRAM
CANNOT DETERMINE THE DNIVE STI E OR STATUS.
"WRITE ABORTED" IS REPORTED WHEN THE PROGRAM ABORTS A WRITE TO PROTECT
THE BAD SECTOR FILES.
"COULD NOT RETRIEVE DRIVE STATUS" IS REPORTED IF THE GET STATUS
COMMAND DOES NOT COMPLETE SUCCESSFULLY WHEN THE STATUS IS REQUIRED TO
REPORT AN ERROR.
HOPI SET-NO DRIVE RESPONSE" IS REPORTED AS THE RESULT WHEN THE GET
STATUS COMMAND IS TIMED OUT (OPI SETS) WHEN THAT COMMAND IS BEING USED
IN THE EAPLY TESTS TO CHECK THE DRIVE INTERFACE.
"NO INTERRUPT ON CMND COMPLETE" IS REPORTED WHEN THE
CO~MAND
SUCCESSFULLY COMPLETES BUT THE CONTROLLER HAS NOT GENERATED AN
INTERRUPT.

SEQ 0023

Page 24

SEQ. UN

"ERR DID NOT CLEAR" IS REPORTED WHE. THE RESET CONMAID DOES lOT CLEAR
TRE CO.TROLLER ERRORS.
THIS IS A COltROLER RELAtED PROBLEM BOT IS
REPORTED IF SEEN IN TRE DRI'E tEST PROGRAMS.
"DRY ERR IS lOT CLEARED" IS REPORTED VHEI THE GET SUTOS V/RESET
COMMAND DOES NOT CLEAR ALL DRI'E ERRORS.
"OBEXPECTED ERR" IS REPORTED NHEI THE COITROLLER SEISES AI ERROR BUT
NO ERROR BITS ARE SET.
"BAD SEC FILE FMf ERR" IS REPORTED IF THE COlfElfS OF THE FILES DO 10
CORRESPOND TO THE EXPECTED FORMAT. (REF R TO DEC STANDARD 144 FOR
FORMAT SPECIFICS.)
3.1.3 OTHER MESSAGES
OTHER INFORMATION IS REPORTED UIDER 'ARIOOS CIRCOM~TA.CES. THESE ARE:
"BAD SEC FILES NOT STRD. ALL SEC ASSUMED GOOD." THIS MESSAGE IS
PRINTED WHEN A PARTICULAR TEST REQUIRES THE BAD SECTOR FILES BUT THEY
HAYE NOT BEEN STORED. THIS SITUATIOI WILL OCCUR IF THIS TEST IS
STARTED OUT OF THE BORMAL PROGRAM SEQUEICE OR IF THE BAD SECTOR FILES
COULD lOT BE READ.
"ERROR LIMIT EXCEEDED-O~IT DROPPED" IS REPORTED (NItH THE OIIT 10MBER)
WHEN MORE TRAN THE
SPECIFIED NUMBER OF ERRORS (DEFAULT 20) HAVE OCCURED IN ANY SINGLE
PASS.
MOST ERROR REPORTS HAVE THE FOLLOWIIG FORMAT.
(1)
PROG NAME
ERR RUM
TEST NUM
SUBrEST NUM
ERR PC
(2)
ROUTINE TRACE SEQ (IN SEQ CALLED)
(ADDRESS)
(ADDRESS)
UDDRESS)
TEST DESCRIPTION
OPERATION:
RESULT:
ADDRESS OF UMIT UIDER TEST
RLBA
RLMP
RLCS
RLDA
cn
HD
OP INIt
OP DONE
DRIVE STATUS
NORD NUM IS (XXXXXX) S8 {YYfllY}
TOTAL COMPARE ERRS: (ZZZ) OF (128)
THE ONLY EXCEPTION TO THE ABOVE FORMAT .IS PURE DATA COMPARE ERRORS
(NOT DETECTED BY READ ERROR). THEN THE FORMAT DOES BOT INCLUDE LINES
5 THROUGH 10.

It
12S

Page 25
SIca ,0025

LINE 1 IS THE ERROR HEADER AND IS PROVIDED BY THE SUPERVISOR.
THE
PROGRAM IS IDENTIFIED BY NAME WITH THE NUMBER OF TEST AND SUBTEST
PRESENTLY BEING EXECUTED.
THE SUBTES! NUMBER IS UNIQUE IN THIS PROGRAM IN THAT IT DOES
NOT REFER TO I PHYSICAL SUBTEST WItHIN A GIVEN TEST.
RATHER IT
REFLECTS THE NUMBER OF TIMES A SUB TEST HAS BEEN EXECUTED WITHIN A
TEST. CONSEQUENTLY ON A TEST THAT TESTS AN INCREMENTAL TYPE OF
OPERATION (SUCH A' INCREMENTAL SEEKS
READ ALL HEADERS FROM BOTH
SURFACES t ETC.) THE SUBtES! WILL BE DESfRIPTIYE OF WHERE IN THE TEST
THE ERRO~ OCCURRED.
THE ERROR P.C. IS THE PHYSICAL MEMORY LOCATION WHERE THE ERROR REPORT
WAS INITIATED.
SINCE MANY FUNCTIONS ARE SUBROUTINED, AND ERRORS ARE
REPORTED FROM SUBROUTINES
THE ERROR P.C.
IS HOT SUFFICIENT TO
IDENTIFY THE LOCATION OF fHE ERROR CALL AND THE ROUTINE TRACE SEQUENCE
IS PROVIDED.
LINE 2 IS THE ROUTINE TRACE SEQUENCE. IF THE ERROR CALL IS INITIATED
FROM WITHIN THE TEST (AS OPPOSED TO WITHIN A ROUTINE), THIS PORTION OF
THE REPORT IS OMITTED. IF THE CALL IS INITIATED FROM A ROUTINE (WHICH
MAY BE CALLED BY ANOTHER ROUTINE£ WHICH MAY BE CALLED BY ANOTHER
ROUTINE
ETC.
SEVERAL LEVELS DEE~) THE ROUTINE TRACE SEQUENCE
PROVIDES A TRAIL TO THE ACTUAL LOCATION WITHIN THE TEST THAT CALLED
THE FIRST ROUTINE. THE FIRST ENTRY LISTED IS THE LOCATION WHERE THE
FIRST ROUTINE WAS CALLED.
LINE 3 IS THE TEST DESCRIPTION AND IS ROUGHLY IDENTICAL TO THE NAME OF
THE TEST BEING PERFORMED.
LINE 4 IDENTIFIES THE ACTUAL HARDWARE FUNCTION THAT IS
BEING
PERFORMED.
ADDITIONAL INFORMATION ON THIS LINE IS DESCRIPTIVE OF
SPECIFIC USE OF THE FUNCTION. FOR EXAMPLE THE OPERATION LINE WILL
READ "READ HEADERS FOR 40 HEADERS" WHEA ALL HEADERS ARE BEING READ
FROM A TRACK.
LINE 5 IDENTIFIES THE ERROR THAT HAS BEEN DETECTED.
THE CONTENT OF
LINE 5 IDENTIFIES WHAT WAS BENG TESTED (SUCH AS DRIVE READY
CONTROLLER ERROR, DRIVE STATE, ETC.>£ WHAT IT IS AND WHAT IT SHOUL6
BE.
LINE 5 MAY BE REPEATED IF MOR~ THAN ONE TESTED ITEM IS FOUND IN
ERROR.
IN ADDITION LINE 5 WILL REPORT ANY HARDWARE DETECTED ERRORS SUCH AS
OPERATION INCOMPLETE, HEADER CRC~ ETC. IN THIS CASE THE FIRST LINE
PRINTED AS RESULT WILL BE DETERMIMEu BY THE THREE ERROR BITS OPI L
HMP/DLT/. AND HCRC/DCRC.
THE LINE WILL BE DETERMINED AS IN TH~
FOLLOWING TRUTH TABLE:
HNF IOU
DCRC/HCRC
OPI
MESSAGE
HDR NOT FND/HDR CRC/OPI ERROR
1
1
1
HDR CRC ERROR
1
o
1
HDR NOT FND ERROR
DATA CRC ERROR
A
~
OAT A LATE ERROR
1
o
o

Page 26

SEQ-C026

THIS
LIIE 6 IDEITIFIES THE PHYSICAL ADDRESS OF THE UIITUIDER TEST.
ADDRESS IS BY UIIBUS ADDRESS OF THE COITROLLER AID DRIYE lUMBER.
LIIE 7 lAMES THE CO.TROLLER RECISTERS (AID CYLIIDER AID HEAD WHERE
THESE ARE APPLICABLE II THE REPORT) TO BE REPORTED.
LIIE 8 PROVIDES THE COITERTES OF COITROLLER REGISTERS WHER THE
OPERATIOR WIS IIITIATED.
LIIE 9 PROVIDES THE CORTEITS OF THE COlT ROLLER REGISTERS WBEI THE
ERROR BEIIG REPORTED WAS DETECTED. FR QUEITLY THE REGISTER CO TEITS
OF OP lIlT AID OP DORE WILL BE DIFFEREIT. OP lilT MAY IRDICATE A SEEK
WAS BEIIG PERFORMED BUT OP ODIE MAY IIDICATE THE ERROR WAS DETECTED BI
A READ HEADER. THE REASOI IS THAT A SEEK WAS EXECUTED ARD DID 10.
PROPERLY POSITIOR HEADS AID WBEI THE READ HEADER WAS ODIE THE HEADS
WERE 01 THE WROIC CYLIIDER.
LIIE 10 IS THE DRIVE STATUS. THIS LIIE IS OILY REPORTED IF THE RLKP
REGISTER DOES lOT CORTAII THE ACTUAL DRI'E STATUS._
LINE 11 AID LINE 12 ARE REPORTED IF THE ERROR WAS DETECTED AS A
COMPARE OPERATIOl EITHER DATA OR HEADERS. II ADDITIOR, GOOD AID BAD
DATA IS REPORTED F6R ALL READ ERRORS.
3.2 ERROR HALTS
ERROR HALTS ARE SUPPORTED PER DESCRIBED II THE PREVIOUS
/FLAG:HOE. THERE ARE 10 OTHER HALTS.

SECTIOI

WITH

REGISTERS

FOR

4.0 PERFORMAICE UD PROGRESS REPORTS
4.1 PERFORMANCE REPORTS
TBIS PROGRAM WILL NOT GIVE ANY PERFORMAICE REPORTS.
4.2 PROGRESS REPORTS
TRIS PROGRAM WILL NOT GIVE ANY PROGRESS REPORTS.
5.0 DEVICE INFORMATION TABLES
THE RLII/RLVll CO.TROLLER HAS THE FOLLOWIIG FOUR(4)
COITROL OF THE SUBSYSTEM.
RLCS - CONTROL AID STATUS REGISTER (XXXXXO)
BIT 15 - COMPOSITE ERROR
BIT 14 - DRIVE ERROR
BIT 13 - 101 EXISTAIT MEMORY ERROR

Page 27

SEQ 002'1
AIT 12 - HEADER NOT FOUND (WITH BIT 10 SET)
- DATA LATE (WITH BIT 10 CLEAR)
BIT 11 - HEIDER CRC (WITH BIT 10 SET)
DATA CRC (WITH BIT 10 CLEAR)
PIT 10 - OPERATION INCOMPLETE
BIT 9/8 - DRIVE SELECT (O-3)
BIT 7 - CONTROLLER READY
BIT 0 - INTERRUPT ENABLE
BIT 5 - EXTENDED BUS ADDRESS (BIT 17)
BIT 4 - EXTENDED BUS ADDRESS (BIT 16)
BIT 3-1 - fUNCTION CODE
o - NOP (PDP-II) MAINT (LSI-II)
1 - \IIR ITE CHECK
2 - GET DRIVE STATUS
3 - SEEK
4 - READ HR.'DER
S - WRITE DATA
6 - READ DATA
7 - READ WITHOUT HEADER COMPARE
PIT 0 - DRIVE READY
ALRA - RUS ADDRESS REGISTER (XXXXX2)
BITS 15-1 ~US ADDRESS OF DATA TRANSFER
BIT 0 SHOULD BE 0
RLD~ - DISK ADDRESS REGISTER (XXXXX4)

FOR READ/JRITE FUNCTIONS
BIT 15 - MUST 8E ZERO(D)
gIT 14-7 - CYLINDER ADDRESS fOR TRANSFER
SIT 6 - SURFACE FOR TRANSFER
3IT 5-0 - SF-CTOR FOR TRANSFE~ (0-47)
FOP SEEK FUNCTION
BIT 15 - MJST ~E ZERO{O)
BIT 14-7 - DIFfEPENCE TO NEW CYLINDER
HIT 6-5 - ~UST 3E ZERO(D)
PIT 4 - SUPFACE
BIT 1 - MUST BE ZERO
BIT 1 - SEEK DIRECTION( 1 - IN I D - OUT
BIT 1 - MUST BE ZERO
RIT C - ~UST 8E eNE(l)
FOR GET STATUS FUNCTION

Page 2B

IEt·eUI

BIT 15-4 - IGNORED SHOULD BE ZERO
BIT 3 - DRIYE RESET
BIT 2 - MUST BE ZERO
BIT 1 - MUST BE DUE
BIT O. - MUST BE DIE
RLMP - MULTIPURPOSE REGISTER

---------------------------FOR READ/VRITE FUICTIOI

BIT 15 - 0 - WORD COU.T(TVO·S COMPLIMENT)
FOR READ HEIDER FUNCTION
BIT 15-0 - DISK HEADER OF SECTOR (FIRST READ)
- ZERO VORD (SECOND READ)
- HEADER CRC (THIRD READ)
FOR GET STATUS FUNCTION
HAS DRIVE SUTUS
BIT 15 - WRITE DATI ERROR
BIt 14 - CURRENT HEAD ERROR(CHE)
BIT 13 - WRITE LOCK STATUS(WL)
BIT 12 - SEEK TIME OUT(SKTO)
BIT 11 - SPIN ERROR(SPE)
BIT 10 - WRITE GATE ERROR(WGE)
BIT 9 - VOLUME CHECK{VC)
BIT B - DRIYE SELECT ERROR(DSE)
BIT 7 - RESERYED(O)
BIT 6 - SURFACE
BIT 5 - COVER OPEN
BIT 4 - HEADS HOME
BIt 3 - BRUSHES HOME
BIT 2-0 -STATE BITS
o - LOID STUE
1 - SPIN UP
2 - BRUSH CYCLE
3 - LOID HEADS
4 - SEEK - TRACK COUNTING
5 - SEEK - LINEAR MODE
6 - UBLOID HEADS
7 - SPIN DOVN
6.0 TEST SUMMARIES
TEST 1 DIFFERENCE OF 1 SEEK TEST (PART 1)
DO READ HEADER, WAIT FOR INTERRUPT.

STORE WORD 1 OF HEADER.

Page 29

DO SEEK WITH DIFFERENCE OF 1£ HEAD O. IF CYLINDER OF STORED
HEADER WORD IS NOT 255 THEN ~IGN BIT I, ELSE SIGN BIT O. WAIT
FOR INTERRUPT.
DO GET STATUS, WAIT FOR INTERRUPT. CHECK STATE IS 4. IF NOT:
DRIVE CO~MAND SHIFT REGISTER BAD
DIFFEREHCE REGISTER DROPPED BIT
STATE ROM FAILED
WAIT APPROX 5 MS. DO GET STITUS, WAIT FOR INTERRUPT.
CHECK
STATE IS 5. IF NOT:
DIFFERENCE REGISTER NOT COUNTING
COUNT PULSE NOT GENERATED (COUNT LOGIC)
SEEK ROM FAILED
FAILURE IN DC SERVO
NO TACH FEEDBACK
WAIT APPROX 5 MS LONGER. TEST DRIVE READY. IF SET:
FAILURE IN READY LATCH OR INTEGRATOR
WAIT APPROX 5 MS LONGER. TEST READY. IF RESET:
FAILURE IN INTEGRATOR
UNEXPECTED GUARD BAND DETECTED
DO SEEK WITH DIFFERENCE 1, OPPOSITE SIGN, HEAD O. REPEAT ALL
TESTS AS ABOVE.
REPEAT TEST USING HEAD 1.
NOTE:
THIS TEST IS PERFORMED AT THE CYLINDER POSITION FOUND
IN THE DRIVE WHEN THE TEST EXECUTES. CHOOSING A
SINGLE SURFACE WILL LIMIT TESTING TO THAT SURFACE.
TEST 2

DIFFERENCE OF 1 SEEK TEST (PART 2)
DO READ HEADER, WAIT FOR INTERRUPT. STORE WORD 1 OF HEADER.
DO SEEK WITH DIFFERENCE OF 1~ HEAD O. IF CYLINDER OF STORED
HEADER WORD IS NOT 255 THEN ~IGN BIT 1, ELSE SIGN BIT O. WAIT
FOR INTERRUPT, WAIT FOR DRIVE READY.
DO READ HEADER WAIT FOR INTERRUPT. COMPARE CYLINDER OF THIS
HEADER WITH ~YLINDER OF STORED HEADER FOR DIFFERENCE OF ONE.
IF NOT:
COUNT LOGIC BAD
INTERGRATOR FAILED
CHECK THAT HEADS MOVED FORWARD OR REVERSE AS EXPECTED.
IF

SEQ 0029

Page 30

TEST 3

TEST 4

NOT:
SEEK ROM rULED
REPEAT
DO SEEK WITH DIFFEREICE OF 1, OPPOSITE SIGN, HEAD O.
ALL TESTS AS ABOVE.
REPEAT TEST USIDG HEAD 1.
NOTE:
THIS TEST IS PERFORMED AT THE CYLINDER POSITIOI FOUSD
II THE DRIVE WHEI THE TEST EXECUTES. CHOOSING A
SI.GLE SURFACE WILL LIMIT TESTING TO THAT SURFACE.
OUTER GUARD BAND DETECTION TEST
DO READ HEADERL WAIT FOR INTERRUPT. CHECK IF AT CYLINDER O.
IF NOT, SEEK KEYERSE 1 CYLINDER AT A TIME UNTIL CYLIIDER 0 IS
REACHED. IF ANY REVERSE SEEK FAILS TO MOVE THE HEADS IN 10
TRIES:
DETECTION OF GUARD BAlD PREMATURE.
WHEN AT CYLINDER OL DO SEEK DIFFEREICE OF 1£ SIGN 0L HEAD O.
WAIT FOR INTERRU~T, WAIT FOR READY.
KEADY SHuULD SET IN
20MS)T)15MS. IF NOT:
FAILED TO DETECT GUARD BAlD
DO READ HEADER. WAIT FOR INTERRUPT. CHECK FOR CYLINDER O.
IF NOT
FAILED TO SEEK BACK TO ZERO
DO SEEK WITH DIFFERENCE OF 1 SIGN 0 HEAD 1. DO SAME TESTS
AS ABOVE WITH REGARD TO R!ADY is fINE AND CYLINDER FOUND IN
HEADER.
NOTE:
CHOOSING A SINGLE SURfACE WILL LIMIT THE TESTING TO
THAT SURF ACE.
INCREMENTAL FORWARD SEEK HEAD 0 TEST
POSITION HEADS AT CYLINDER "LOLIMIT" USING
SEEKS
IiITH
DIFFERENCE OF ONE, HEAD O.
DO SEEK WITH DIFFERENCE OF 1
SIGN 1, HEAD O.
WAIT FOR
INTERRUPT, WAIT FOR DRIVE REA6y. CHECK READY IS SET IN 15 MS.
IF NOT:
POSITIONING PROBLEM AT A SPECIFIC CYLINDER
MECHANICAL OBSTRUCTIOfi
DO READ HEADERL WAIT FOR INTERRUPT. CHECK THAT THIS CYLINDER
IS OLD CYLIIDEK + 1. IF lOT:

$Egon.

Page 31

TEST 5

DIFFERENCE REGISTER OR COUNT LOGIC FAILURE
TRACK CROSSING DETECTION FAILURE
REPEAT SEEKS AND READS UNTIL CYLINDER READ IS "HILIMIT".
NOTE 1: IF THE "USE ALL SECTORS" PARAMETER IS SPECIFIED AS
"V"~
THE TEST WILL READ AND TEST ALL 40 HEADERS
(CAKTRIDGE VERIFY).
NOTE 2: TESTING WILL BE DONE BETWEEN OPPER AND LOWER CYLINDER
LIMITS.
CHOOSING A SINGLE SURFACE WILL LIMIT TESTING
TO THAT SURFACE.
THIS TEST WILL BE BYPASSED IF
SURFACE 1 IS CHOSEN.
INCREMENTAL REVERSE SEEK HEAD 0 TEST
POSITION HEADS AT CYLINDER "HILIMIT" USING
SEEKS
WITH
DIFFeRENCE OF I, HEAD O.
DO SEEK WITH DIFFERENCE OF 1
SIGN 0
HEAD O.
WAIT FOR
INTERRUPT, WAIT FOR DRIVE REA6y. CHECK' READY SET IN 15 MS:
POSITIONING PROBLEM AT A SPECIFIC CYLINDER
DO READ HEADER~ WAIT FOR INTERRUPT. CHECK THAT THIS CYLINDER
IS OLD CYLINDEK - 1. IF NOT:
DIFFERENCE REGISTER OR COUNT LOGIC FAILURE
TRACK CROSSING DETECTION FAILURE
REPEAT SEEK AND CHECKS UNTIL CYLINDER IS "LOLIMIT".
NOTF.:

TEST 6

IF THE "USE ALL SECTORS" PARAMETER IS SPECIFIED AS
"Y"L THE TEST WILL READ AND TEST ALL 40 HEADERS
(CAKTRIDGE VERIFY).
Non::
TESTING WILL BE DONE BETWEEN UPPER AND LOWER CYLINDER
LIMITS.
CHOOSING A SINGLE SURFACE WILL LIMIT TESTING
TO THAT SURFACE.
THIS TEST WILL BE BYPASSED IF
SURFAC~ 1 IS CHOSEN.
INCREMENTAL FORWARD SEEK HEAD 1 TEST
POSITION HEADS AT CYLINDER "HILIMIT" USING
SEEKS
WITH
DIFFERENCE OF ONE, HEAD O.
DO SEEK WITH DIFFERENCE OF 1
SIGN 1, HEAD 1.
WAIT FOR
INTERRUPT, WAIT FOR DRIVE REA6v. CHECK READY IS SET IN 15 MS.
IF NOT:
POSITIONING PROBLEM AT A SPECIFIC CYLINDER
DO READ HEADER~ WAIT FOR INTERRUPT. CHECK THAT THIS CYLINDER
IS OLD CYLINDEK + 1. IF NOT:

SEQ 0031

Page 32

rEST 7

TEST 8

DIFFEREBCE REGISTER OR COOITLOGIC FAILOR!
TRACK CROSSING DEfECfIOI FAILORE
REPEAT SEEKS AID READS UNTIL CYLINDER READ IS -HILIMIf".
10TEl: IF THE nUSE ALL SECTORS" PARAMETER IS SPECIFIED AS
Y"L THE TEST iILL READ AID TEST ALL 40 HEADERS
(CAKTRIDGE VERIFY).·
.
NOTE 2: TESTI.' WILL BE DOBE BETWEEN OPPER AID LOiER CYLIIDER
LIMITS.
CHOOSING A SIIGLE SURFACE WILL LIMIT TESfIIG
TO THAT SURFACE.
THIS TEST WILL BE BYPASSED IF
SURFACE 0 IS CHOSEN.
INNER GUARD BAND DETECTION TEST
POSITION HEADS AT CYLINDER 255 USING SEEK WITH DIFFERENCE OF
1, HEAD O.
WHEN AT CYLINDER 255, DO SEEK WITH DIFFEREHCE OF If SIGN 1L
HEAD O.
iAIT FOR IITERRUPT L WAIT FOR DRIVE READY. READy
SHOULD SET II 20MS>T>15MS. IF NOT:
FAILED TO DETECT GUlRD BARD
DO READ HEADER. WAIT FOR INTERRUPTe CHECK FOR CYLINDER 255.
IF Nor:
FAILED to SEEK BACK TO CYLINDER 255
DO SEEK WITH DIFFERENCE OF 1, SIGN 1, HEAD 1. DO SIME rEStS
AS ABOVE.
NOTE:
CHOOSING A SINGLE SURFACE WILL LIMIT THE tESTING to
THAT SURFACE.
INCREMENTAL REVERSE SEEK HEAD 1 TEST
POSITION HEADS AT CYLINDER "HILINI!" USING
SEEKS
WITH
DIFFERENCE OF 1, HEAD O.
DO SEEK WITH DIFFERENCE OF 1
SIGN 0, HEAD 1.
WAIT FOR
INTERRUPt, WAIT FOR DRIVE REA6v. CHECK READY SEt II 15 MS:
POSITIONING PROBLEM At A SPECIFIC CYLINDER
DO READ HEADER£ WAIT FOR INTERRUPT. CHECK THAT THIS CYLINDER
IS OLD CYLINDE~ - 1. IF lOT:
DIFFERENCE REGISTER OR COUNT LOGIC FAILURE
TRACK CROSSING DETECTION FAILURE
REPEAT SEEK AND CHECKS UNTIL CYLIIDER IS "LOLIMIT".

1M-un

Page 33

TEST 9

NOTE 1: IF PROGRAM MODE 2 IS USED AND THE "USR ALL SECTORS"
PARAMETER IS SPECIFIED AS "V", THE TEST WILL READ AND
TEST ALL 40 HEADERS (CARTRIDGE VERIFY).
NOTE 2: TESTING WILL BE DONE BETWEEN UPPER AND LOWER CYLINDER
LI~ITS.
CHOOSING A SINGLE SURFACE WILL LIMIT TESTING
TO THAT SURFACE.
THIS TEST WILL BE BYPASSED IF
SURFACE 0 IS CROSEN.
SEEK TESTS
POSITION HEADS AT CYLINDER "LOLIMITfl USING
SEEKS
WITH
DIFFERENCE VF 1, HElD O.
DO READ HEADER, RECORD POSITION. DO SEEK WITH DIFFERENCE OF 2
(~AX
DISTANCE AT 3 IPS)
SIGN 1 HEAD O. DO READ HEADER,
CHECK NEW CYLINDER IS OLD CfLINDER +'DISTANCE. IF NOT:
TRACK CROSSING DETECTION FAILURE
DIFFERENCE COUNTER FAILURE
COUNT PULSE GENERATION FAILURE
VELOCITY Rn~ FAILURE
REPF.AT ABOVE UNTIL OLD CYLINDER + DISTANCE) 255. POSITION AT
255.

DQ READ HEADRR, RECORD POSITION. DO SEEK WITH DIFFERENCE OF 2
(~AX
DISTANCE AT 3 IPS)
SIGN 0 HEAD O. DO READ HEADER
CHECK NEW CYLINDER IS OLD CfLINOER -'DISTANCE. IF NOT:
'
TRACK CROSSING DETECTION FAILURE
REPEAT UNTIL OLD CYLINDER - DISTANCE < O. REPEAT ALL OF THE
AROVE USIN~ HEAD 1.
R,PEAT H.L Of lHf.: ABOVE TESTS USING THE FOLLOWING DJSTANCES~
b
9
12 17 22 27, 34 41 128 256. THESE DISTANCES ARE
S~ECIfIED 6ECA6sE fHEY REP~ESE'T THf MAXIMUM DISTANCE FOR EACH
VELOCITY LEVEL USED IN THE DRIVE.
NOT~:
TESTING WILL 8E DONE BETWEEN UPPER AND LOWER CYLINDER
LIMITS.
CHOOSING A SINGLE SURFACE WILL LIMIT TESTING
'1'11 -THAT SURF ACE.
TEST 10 FPRWARD OSCIL~ATING SEEK TEST
POSITION HEADS AT CYLINDER O.
DO OSCILLATING SEEf{ USING HEAD 0 (SEEK FROM 0 TO 1 TO Of. 0 TO
2 TO OL 0 TO 3 TO O£ ••••• 0 TO 2~S TO 0). AFTER EA~H SEEK
R~AD HEAuER AND VERIFY ~DSITION.
REPEAT TEST USI~G HEAD 1.

SEQ 0033

Page 34
SfQ

NOTE:

IF EITHER CYLINDER LIMIT IS SPECIFIED THE TESt WILL
SEEK· BETW£EN UPPER AND LOWER LIMITS fOR EACH SURFACE.
CHOOSUIG A SUlGL E SURF ACE WILL LIMIT tESTIIG TO THAT
SURFACE.
NOTE THAT LOOPING ON TEST THEN PROVIDES A
FIXED DISTANCE SEEK LOOP.
TEST 11 REVERSE OSClLLATING SEEK TEST
POSITION HEADS AT CYLnm'ER255 ..
DO OSCILLATING SEEK USIIG
HEAD O. ,(SEEK FROM 255 TO 254 TO 255 255 TO 253 TO
255 L • • • • 255 TO 0 TO. 255.) AFTER EACH SE~K fiElD ~EADER AID
VERIFY POSITION.
REP.EAT TEST USIN.G HEAD 1. '
NOTE:
IF EITHER CYLINDER LIMIT. IS SPECIFIED,£: THE TEST WILL
SEEK BETWEEN UPPER AND LOWER LIMITS ~oR EACH SURFACE.
CHOOSING A SINGLE SURFACE WILL LIKIT TESTIIG TO THAT
SUR~ACE.
NOtE tHAT LOOPING ON ~EST THEN PROVIDES A
FIXED DISTANCE SEEK LOOP.
TEST 12 SEEK TIMING
POSITION HEADS AT CYLINDER O.
DO 64 SEEKS FROM 0 TO 1 AND 1 TO 0 MEASURING THE SEEK TIME
FOR EACH SEEK.
AVERAGE THE SEEi TIMES (FORWARD UD REVERSE
INDEPENDENTLY) AND REPORT.
REPEAT ABOVE SEEKING BETWEEN CYLINDER 127 TO 128 AND 254· TO
255.

REPEATABOV& SEEKING BETWEEN CYLINDER 0 TO 127 AND 128 TO 256.
REPEAT ABOVE SEEKING BETWEEN CYLINDER 0 AND 255.
THE SEEK TIMES WILL BE REPORTED AS SHOWN BELOW.
THE TIME
MEASURED·· IS FROM SURT OF SEEK COMMAND UNTIL INTERRUPT IS
RECEIVED.
UNER
MIDDLE
OUTER
EXPECTED
1 CYL FWD
X
X
X
X
1 .CYL REV
X
X
X
X
128 CYL FWD
X
X
X
128 CYL REV
X
X
X
256 CYL FWD
x
X
256 CVL REV
X
X
THE X INDICATES WHERE TIME WILL BE REPORTED.
NOTE:
THE ABOVE REPORT WILL BE P.RINTED
THE FIRST PASS FOR
EACH DRIV_E UNDER TEST IF MANU L UlTERVEN'l'ION TESTS
WERE RUN. THE EXPECTED TIMES ARE FOR USER COMPARISON

0:.H

Page 35

SEQ 0035
ONLY.
ERROR.

THE

PROGRAM

WILL

NOT REPORT DEVIATION AS AN

TEST 13 RASIC READ DATA TEST
POSITION HEADS AT CYLINDER 255.
DO READ DATA HEAD 1. CHECK FOR ANY ERRORS AND REPORT.
IF
~RROP
READ' SECTOR 1 THROUGH 19 UNTIL NO ERROR ON READ.
REPORT ALL ERRORS BUT DO NOT INCREMENT ERROR COUNT.
IF NONE
CAN BE READ SUCCESSFULLY, REPORT THAT FACTORY BAD SECTOR FILE
CANNOT BE RfAD, INCREMENT ERROR COUNT AND PROCEED WITH READ OF
SECTeR 20.
ON SECTOR WITH NO CRe ERROR, VERIFY DATA FORMAT (WORD 0 AND 1
lRE NOT 0 WORD 2 AND 3 ARE 0 LOCATE FIRST WORD OF ALL ONE'S
AND T~AT W6RD TO WORD 127 ARE ILL ONE'S.) STORE BAD SECTOR
DATA.
READ DATA, HEAD ONE, SECTOR 20.
CHECK FOR ANY ERRORS AND
REPORT. IF ERROR, READ SECTOR 21 THROUGH 39 UNTIL NO ERROH ON
READ. REPORT ALL ERRORS BUT DO NOT INCRE~ENT ERROR COUNT. IF
NONE CAN BE REID SUCCESSFULLY L REPORT THAT SOFTWARE BAD SECTOR
FILES CANNUT BE READ, INCREMENT ERROR COUNT AND EXIT TEST.
ON SECTOR WITH NO CPC ERPOR, VERIFY DATA AS ABOVE. STORE BAD
SECTOR DATA.
NOTE:
If SURFACE 0 IS SELECTED THIS TEST WILL BE BYPASSED.
TEST 14 WRITE/READ DATA TEST (PIRT 1)
POSITION HEADS AT CYLINDER 0
WRITE PATTEHN 1 ON HEAD 0, SECTOR O. CHECK fOR ANY ERROR.
READ HEAD 0, SECTOR O. CHECK FOR CRC ERROR. COMPARE DATA.
REPEAT FOR OTHER DATA PATTERNS (2 THROUGH 8).
CHECK If CYLINDER OL TRACK 1£ SECTOR 0 IS LISTED IN BAD SECTOR
DITI.
IF NOT L REPEAT ABuVE TEST AT CYLINDER 0, TRACK 1,
SECTOR O. IF IT IS LISTED AS BAO L LOCATE FIRST SECTOR 0,
TRACK 1 THAT IS GOOD AND DO ABOVE rESTS.
NOTF:
CYLINDER LIMITS ARE IGNQRED~ TESTING IS DONE AT
CYLINDER O.
HOWEVER, CHOOSING A SINGLE SURFACE WILL
LIMIT TESTING TO THAT SURFACE.
TEST 15 SPINDLE TIMING TEST
POSITION HEADS TO CYLINDER O.

PIII9G 36

iU.IT FOR
DO WRITE DATA TO CYLIIDER 0, BEAD 0, SECTOR O.
INTERRUPT.
DO WRIT! DATI TO CILIBDER OL lEAD OL SECTOR O. STIRT TINIIG.
WHEN
IITERRUPT OCCORS, .~TOP TlnIIG.
RESULT IS SPIIDL!
ROTATION TIME.
REPEAT TEST 64 TIMES. REPORT TIE AIERIGE IS SPIIDLE ROTITIOI
tIME. THE TIME REPORTED IS IN 100·S DR MICROSECONDS.
THIS TEST IILL BE RUN OILY II THE FIRST PASS AID OILY
IOTE:
IF MANUAL IITIRIEITI08 TESTS WERE RUI.
TEST 16 WRITE/READ TEST (PART 2)
CC IS CURREIT CYLINDER SELECTED FROM SET.
LET SELECTED CYLINDER SET BE AS DEFINED II PARAGRAPH 4.3.

SEEK FORWARD TO CC. WRITE PATTBRIS 1 THRliUGH e REPEATED 5
TIMES ON HEAD O. READ/COMPARE ALL DATA.
SEEK REVERSE TO "LOLI"IT". SEEK FORWARD TO CC.
READ,COMPARE
ALL DATA.
SEEK FORWIRD TO HHILINIT". SEEK RE'ERS TO CC.
READ/COMPARE ALL DATA. REWRITE DATA PATTERIS 1 THROUGH 8
REPEATED 5 TIMES 01 HEAD O. REID COMPARE ALL DATA.
SEEK FORWARD TO "BILIMIT". SEEK REVERSE TO Ct.
READ/COMPARE
ALL DATA.
SEEX REVERSE TO "LOLIMIT". SEEK FORWARD TO CC.
READ/COMPARE ALL D1TA.
REPEAT ABOVE TEST FOR HElD 1.
REFEAT lBOVE TESTS FOR ALL CYLINDERS IN SELECTED CYLIBDER SEf.
MOTE1: IF AIY OF THE SECTORS II THE SELECTED CYLIIDER SET
ARE LISTED AS BAD, TH1T SECTOR UILL BE BYPASSED.
NOTE 2: IF THE "USE ALL CYLIII1DERSH PlIU.METER IS SPECIFIED AS
"JII L
THE TEST WILL INCLUDE ILL CYLIJlDBRS II THE
SEL~CTED PARAMETER SET.
NOTE 3: IN THE FIRST PASS OF THE PROGRIM THIS TEST IS
EXECUTED DB OILY 6 OF THE CYLIIDERS tISTED II THE
CILIIDER SET. THOSE USED WILL BE EVERY 8TH EITRY 1M
THE TABLE.
ON THE SECOND AID SOBSEQUElf PASSES ILL
ENTRIES IN THE SELECTED CYLINDER SET IRE USED.
NOTE 4: TESTIIG WILL BE DOlE BETWEEN UPPER AID LOUER ·LIMITS.
CYLIIDERS II THE CYLINDER SET BEYOND fHESE LIMITS WILL
NOT BE TESTED. CHooSIIG A SINGLE SURFACE WILL LIMIT
TESTIIG TO THAT SURFACE.
TEST 11 WRITE LOCK ERROR AND DATA PROTECTION fEST

SEQ. tUi

Page 37

DO WRITE DATA PATTERN 0 AT SECTOR O. READ DATA AND VERIFY.
ASK OPERATOR TO WRITE LOCK DRIVE. DO GET STATUS LOOP UNTIL
WRITE LCCK IS SET. IF NOT SET IN 30 SECONDS, ABORT THE TEST.
WHEN WRITE LOCK IS SEI£ DO WRITE DATA PATTERN 1 AT SECTOR O.
REPORT FAILURE IF DKIVE ERROR DOES NOT SET OR IF ANY OTHER
EPROR SETS. CLEAR ERROR AND READ DATA AT SECTOR O.
CHECK
TrAT DATA HAS NOT BEEN DISTURBED.
RSQUEST OPERATOR TO RESET WRITE LOCK.
DO GET STATUS LOOP
UNTIL WRITE LOCK IS RESET. IF NOT RESET IN 30 SECONDS, REPEAT
THE REQUEST.
NOTE:

THIS TEST IS EXECUTED ONLY IF THE PROGRAM OPERATION
~ODE
2 IS SELECTED, MANUAL INTERVENTION TESTING IS
REQUESTED, AND IS RUN IN FIRST PASS ONLY.
TEST 18 ADJACENT CVLINDER INTERFERENCE TEST
CC IS CURRENT CYLINDER SELECTED FROM SET
LET SELECTED CYLINDER SET BE AS DEFINED IN P~RAGRAPH 4.3.
DATA PATTERN IS 155555.
SEEK FORWARD TO CYLINDER CC. WRITE PATTERN ON TRACK 0, ALL
SECTORS. READ/COMPARE DATA.
SEEK FORWARD TO "HILI~IT".
SEEK REVERSE TO CC-l.
WRITE
P~TTEPN.
SEEK FORWARD TO "HILIMIT".
SEEK REVERSE TO CC.
WRIT~ PATTERN.
(THIS HAS BRACKETED ORIGINAL WRITE WITH WRITES
IN IDJACE~T CYLINDERS. NOTE ADJACENT CYLINDERS WERE WRITTEN
AFTEP HEADS CAKE ON CYLINDER IN REVERSE DIRECTION WHICH IS
OPPOSITE OF CENTER CYLINDER.)
SE~K REVERSE TO "LOLI~IT".
SEEK FORWARD TO CC.
READ/COMPARE
DATA FROM ALL SECTORS.
ANY ERRORS (READ OR COMPARE) ARE
ATTRIBUTED TO ADJACENT CYLINDER INTERFERENCE.
SEEK FORWARD TO "HILINIT".
SEEK REVERSE TO CC.
~RITE
DATA
PATTERN.
SEEK REVERSE TO "LOLI~IT". SEEK FORWARD TO CC-1
WRITE PlTTERN. SEEK REVERSE TO "LOLIMIT"( SEEK FORWARD T6
CC+l, WRITE PATTERN.
SEEK FORWARD TO "HI IMIT" SEEK REVERSE
TO CC. WE AD/COMPARE DATA IN ALL SECTORS. ANY EfiRORS (READ OR
COMPAPE) ARE ATTFIBUTED TO ADJACENT CYLINDER INTERFERENCE.
~EPEAT AROVE TESTS ON HEAD 1.
NflTE 1: IF ANV SECTOR ON A SELECTED CYLINDER IS LISTED BAD,
THAT SECTOR WILL BE BYPASSED.
NOT~ 7: If THE "USE ALL CYLINDERS" PARAMETER IS
SPECIfIED AS
"Y"( THE TEST WILL INCLUDE ALL CYLINDERS (EXCEPT 0 AND
255, IN THE SELECTED PARAMETER SET.

SEQ 0037

Page 38

Sill' 0031

NOTE 3:

II TBE FIRST PISS Dr TBE PHAIR HIS tlST IS
EXECUTEDR 01
II TIE
CLIO
SET. DaLYni
T E or S TRI;d II:Uas LISTED
I
FIRS
TIEITY'IRST~
TJrJRII
B,
'tiB.
SEC DID liD UBS QUB
1 SES
T YL
II SEt
EITRY WILL 8E TISTED.
NOTE 4: TESTIIC WILL ,E ODIE IETVEEI UPPEI II, LOWER LINItS.
CYLIIDERS II HE CYLI DER S T BIYDID lESE LINITS I LL
lOT BE TESTED. CHOOSIIG 1 SIIGLE SURI1CE • LL LINIT
TESTIIC TO THAT SURflCE.

liD

TEST 19 OVERWRITE TEST
CC IS CURREIT CILIRDER SELECTED FRDN SET
.
SELECTED CYLIIDER SET DEFIlED II PlRlGR1PH 4.3.
P1TTERI 1
125252
PATTERI B 000000
SEEK FORWARD TO CC. WRITE DITI Dr PAtTERI I II ALL SECTORS,
HEAD O. READ/CONPARE DATA.
SEEK FORWARD TO "HILINIT·, SEEK REfERSE TO CC. WRITE P1TTERI
B.
SEEK
REVERSE
TO
"LOLINIT", SEEI rOllARD TO CC,
READ/COMPARE DtTA.
SEEK FORWARD TO "HILIMITR L SEEK REVERSE TO CC.
WRITE DITA
·
PATTERR A.
READ/CoMPAR~
DATA.
SIEK REYERSE TO RLDLIMITR6
SEEK FORWARD TO CC.
WRITE P1TTER
I.
SEEI FoRIIRD T
"RILIMItR SEEK REVERSE TO CC. READ/COMPIRE D1Tl.
.
ANY FAILURES (REID OR COMP1RE) ARE ATTRIBUTED TO OVERWRITE
PROBLEM.
REPEAT ABOVE TESTS 01 HEAD 1.

=
=

10TE 1: IF AIY SECTOR 01 A SELECTED CILIIDER IS LISTED IS liD,
THAT SECTOR WILL BE BYP1SSED.
NOTE 2: IF THE HOSE ALL CILIIDERSR PARAMETER IS SPECIFIED AS
RY"L THE TEST WILL INCLUDE ALL CYLINDERS II fBE
SEL~CTED P1RAMETER SET.
10TE 3: IN THE FIRST PASS OF fHE PROGRAM THIS TEST IS
EXECUTED ON OILY 3 OF TBE ClLIIDERS LISTED 11 fHE
CYLIIDER SET.
TBOSE OSE¥ WI L BE
THE· FIRST
TWEITyrIRST
AID FORTyrIRS EI RIES IN THE flBLE. 06
SEColD IND §OBSEQ¥EIT PASSES EVERY FOURTH CYLIIDER SET
EITRY WILL BE TES ED.
NOTE 4: TESTIIC WILL BE DONE BETIEEN UPPER AID LOWER LIMITS.
CYLINDERS IN THE CYLIIDER SET BEYOID TBESE LIMITS WILL

'"
!"')
Q)

III

0..

.........
....

..J
..J

..J
....

:..

w
u
...:
r....
0..

:::>
trl

:.oJ

..J
t.:>

....;z:
trl

...:
t.:> •

.... u

trl...:

Or....
O~

::c:::>

Utll

Ii-<

o:r.

t.:JEo<

....
til 0

W....
Eo<

t.:>

co ....

....

.... tIl

ZIi-<

.MAJ~.
"ICYll 30A(I052) 22-NOV-78
CIRLOn.PI!
23-0CT-78 14:39

:HH;

Wi
2537

"TEST 3

'TEST 4

~m
2685

"TEST 5
"TEST 6
"TEST 7
"f EST ~
10
"TEST 111
"TEST 2
"TEST 13
*r EST 14
"TEST 15

16 :32
TABLE OF CONTENTS

::81~~~~~=g~ g~

::I=g~~=~=ti~ ~~~~~~~ ~~~~ U~:8

··INCRE"ENTAL FOR_ARD SEEK HEAD
"INNER GUARD BAND DETECTION
·"INCREMENTAL REVERSE SEEK HEAD
::~~~eA~5S0~CILLATING SEEK
"REVERSE OSCILLATING SEEK
**SEEK TIMING
"SASIC READ DATA SBAD SECTOR FILE)
::s~I~5l~E~¥M¥A~AT~~~RT 1)
"WRITE/READ D1TA (PART 2)
'TEST 16
"TEST 17
-·WRITE LOCK ERROR AND D1TA PROTECTION
::~~i~S~~tECY INDER INTERFERENCE
DIAGNOSTIC SUPERVISOR -- LOW CORE SET UP

2'137
2783

:tm

2832
2~J?

2951
3009

3325
3404
3549

=tm H

4076

ASSt:'I.'PLY ;F]I!TINES
MACYll 301(1052)
C7.ilLllR .PT!
25-0CT-78 13:12

007000

4
4
4
4
6
6
5
4

4
4

4
4
4
4
4

I!•
4
4

4
4

.ENABL
.=2000

002000
002 000
007000
002000
00;001
002002
002003
002004
00700S
002006
00;'007
002010
002011
002012
007014
OO~Olb

CO/020

002072
00~O24
OOlO::b
002030
002032
002034
0020j6
0020'0
00704?
002044
002046
0020"0

002051
002052

00205'1
00;' 05 0

0020"0
00~062

OOiOt:c1

002066
002070
002072
OO~O74
00207C

000001
000001
000001
000000
000000
BGN<~OD

103
132
122
114
104
000
000
000
102
060
000000
000300
037604
037730
013356
013372
040514
000000
000000
000000
000000
013410
000000
000000
000000
002
002
030000
030000
000000
000000
000000
002114
000000
002112

014564
11i~ } ggmg mm
000014
000000

~ ~l

16:32

002104

00210f

013456
014444

PAGE 1
~ f

002000

10
11
12
13
14
19
4

22-HDV-78

.~~IST

1
2

3
5

I ~~~~ s~~~J ~l

"OUTER GUARD BAND DETECTION

HEADER

m~~~,~E

SVC
SVCTST=1
SVCSUB=l
SVGBGL=l
SVCINS=O
SVCTAG=O
POINTER BGNSW,BGNSfT,BGNDU
MDHEDP

:~~~~iBfg/30000,30000,300,RLOl

• ASC II IZI
• ASCII IRI
• ASC II ILl
• Ase II /DI
.llYTE
0
0
• BYTE
.BYH
0
.ASCII IBI
.ASCII 10/
.WORD
0
.WORD
lOG
.WORD
L~HARD
~ SOFT
.WORD
.WORD
L HW
.WORD
L~SW
.WORD
LUST
.WORD
0
.J;ORD
a
.. WOi~l)

.WORD
.WORD
•• ORD
.~ORD

• 'OR;}

.BYTS

.OYTE

.WORD
• WORD
.WORD
.IIOPO
•• ORO
.WORe
•• URD
.WORD
• .,ORD
.WORD
.WURD
.wORD
.WORD
.WORD
.J/IIRO

L$DISPITCH
0

a
0

qRl::VISIO~

jo~glT
30000

0
0

L$DVTYP

t~op

L,ORST
0
~~ou

~pNIT

L GLEn

;

':('·n

MACYll 30A(1052)
ASSEMBLY ROUTINES
CZRLOS.PT1
25-0CT-78 13: 12

00211 0
002110
00211 0
00211 2

22-NOV-7S
ENDMOD

000000

000001
!~l smu 046122
002122
~~l
2~
h

030460

000

IRL01I

l~~~T~~~[US~2NA~~ t~~lt~O¥HE~~bJRI~~~ ~gfI§~'p~M~ioED

5E~gE~~~ ~~R~~:HTii[iE~6 ~~~E~~H~~Eo~H~H~G~~~iwr~ET~~~tL

002122
002122

53
54
55
~6
57
58

59
60

63
64
65
66
67
68
69
70
71
72

000000
000002
000004
000006
000010
000000
000002

888m
000010
000012

ggggg~
000004
000010
000020
010000
020000
040000
100000
000102

MACY11 30A(1052)
ASSEMrLY ROUTINES
CZRLDR.PT1
25-0CT-78 13:12
73

74
75
76
77
78
79
80

~;
P3

86
87

90
91
92
93
94

95
96
97
qg
99
100
101
102

88888l
000010

000020
000040
000100
000200
000400
001000
002000
004000
010000
020000
040000
100000
003760

000000
000002
000004
000006

114
!IS

000000
100000
840000

22-NOV-78

fOMPOP
HDRC~P
DATACHP
CYLUP
ULOID
INOUTS
OUT INS
FOLWRT
REVSKS
FWDSKS
RE VSKO
,WDSKO
BADADD
SEEKO?
RORWOP
RELOWT
HDR40
MQUALS

HZ
111

OFFSETS fOR HARD"ARE P-TAHE
;BUS ADG~F.SS
=0
;YECTOR ADDRESS
=2
;PRIORITV
PRIOR
=4
;DRIVE SELeCT PIT
DRSB
=6
;CONTROLLER TYPE
CNT
=10
OFfSET fOR SOFTWARE P-TABLI:'
00
;SCFTWARE PAHI~ETEPS SWITCHEr
hSWI
;CYLINDER LOWER LI~IT
LOLIM
=2
;CYLINDER HIGH LIMIT
HILIM
=4
;SELECTED HEAD FOR RUNNING TESTS
HElD
=6
;ERROR LIMIT
ERLI~
=10
IDATI C1MPARE ERROR LIMIT
DCLI~
=12
8IT ASSrGNMENT FOR SOFT.ARE P-TABLE SWITCHES
;USE ALL CYLINDERS
1LLCYL =B IT 00
;USE ALL SECTORS
ALLsf:C =81101
;EXECUTE DRIVE SELECT TEST
DRsELT =B ITO 2
;EXECUTE HEAD ALIGNMENT TEST
HDALIGN =BIT03
;AUTO SIZE fCP DRIVE-DROP If ~c RESrUNSF.
AUTOSZ =81T04
;HEAD LIMIT SPECIFIED FLAG
HEADLM =81T12
;HI LIMIT SPECIfIED fLAG
HICYL
=81113
;LO LIMIT SPECIFIED
LOCYL
=8 IT14
;EXECUTE MANUAL INTERVENTION TFSTS
MITEST =8 IT 15
SU8SYSTEM fUNCTIONS
;oRITS CHECK
hDATA =102

007777
000002

000116
000100

o~888g
gamo

004008
002000
001400
000200
000100
000060
000001

IAT ALL TIMES REMAIN IN DEC.
iTHE INFORMATION IN THIS DOCU~ENT IS SURJECT TO CHANGE
;WITHOUT NOTICE AND SHILL Nor AE CONSTRUED IS A COMMIr~ENT
;8Y DIGITAL EQUIPMENT CORPORATION.
IDEe ASSUMES NO RESPONSIBILITY FOR THE USE DR RELIARILITY
;OF ITS SOFTWARE ON EQUIP~ENT ~~rCH IS NOT SUPPLIED PY DEC.
GL Rr:Q AT

VECT

GrSTA!
SEEK
RDHEAD
WTDUA
RDDATA
RDNOHR
NOOP

000 001
000002
000004
000010

107
108

RGNM aD
EQUALS
tSR

000104
000106
000110
000112
000114

103
104
105
106

123
124
125
126
127
128

(RLOl)

lOR OTHER'IS! MADE AVAILABLE TO INY OTH~R PERSON EXCEPT

35
36
37
38

lH
he

SF'l 0042

ION • SINGLE COMPUTER SYSTEM AND MAY 8E COPIED ONLY WITH

119

PAGE 1-1

S¥~t§R~g~twi*~ }§7~6R~¥~~ED U~DER LICENSE FOR USE ONLY

30
31
32

42
43
44
45
46
47
4B
49
00

DEVR,:G
.WORD
.8LK~
DEVTYP
.ASCIZ

.EVEN

JZ
41

16:32

PAGE 1-2

SEQ 0043

=104
=106
=110
=112
=114
=116
=100

;GET STATUS
;SEEK
IREAD HEADER
; wRln: DATA
;READ DATA

2~~~4TION FLAGS

;CO~POSITE GPFPITICN FLIGS
;HEIDER COPPARti OPERATION

=BITOI

;mgg
=gn03

=BlT04
=8IT05
=BI106
=BIT07
=81T08
=BIT09
=81110
=~ITl1
=81T12
=8IT13
=8 IT 14

;~5A8p~~I~fo~GNORE HeADERS

mU,,;CWA~MHBhTIO'i

1UNLO~D OPERATION
;IN-on SEEK OPERATION
lOUT-IN SEEK OPERATION
;FOLLOWING WRITE OPERITIO~
;REV SE~K SEQ iADJ INTERHPENCF)
IFWD SEEK SEQ ADJ INTcRHKfNCt)
;prv SE~K SEQ OVERWPITEl
;F.O SEEK SEQ DVEII,RITE
;BAD DISK lOOP .5S
;SEF.K OPERATION
;RHD OR WRITE OPERATION

; R f:LDAD WI IT

~B3il~S![NOUTS!FoLWRT!RE&3~sV~~g~~s?:&ell~~pWDSKO

;'ESSAGE QUALIfIE? HITS
SRROR fLAGS FROM SUBROUTINES
;OPERATION TeaK TO LONG
foSLOW =BITOO
;NO INTERRUPT FROM OPERATION
NOHPT =81TOI
;CONTROLLER HUNG
CONH~G
=8IT02
NnCLP
;nAD CONTROLLER CLEAR
=A IT 0 3
;CONTROL AND STATUS REGISTER
RLCS
=0
RLBA
lAOS ADDRESS REGISTER
=2
;orSK ADDRESS PSGTSTER
RLDA
=4
;MULTI-PURPOS~ REGISTER
RLMP
=6
EGISTER BIT DEFT!ITIUNS - cn~TROL STATUS REGISTER
CONTRGL AND STATUS R5Gr~TEP
kLCSR
o
ANVERR
100000
ANY "AROH BIT
DRVf.RR
DRIVE f~RROP BIT
NON-EXISTANT ~E~nRY ~RROR
IlXMERR
D AH LATF. F-FPGP
DLTERR
10000
HEADER NOT FOUND ERROR
HNFERR
10000
DATA
C~FCK EPROR
DCKERR
4000
HEAD~N CHECK ERROR
IICRCERR 4000
OPERATICN I'CO~PL~TE SRPor
OP IERR
2000
DRIVE SELECT ~ASK
DSMSK
1400
CONTROLLEN READY ~ASK
CRDYMSK 200
INT~RRUPT ENAALE ~ASK
WHRt
8US ~DDRESS UPPER ~ASK
DRIVE READY MASK
b~mSK 1

18888

t8°

ASSEMBLY ROOTIIES
HACYl1 301(1052)
C1RLDB.PTl
25-0CT-79 13112 .

III

22-IOY-78
hMs!(

sUUs

!Iln

~SMS((

"!15K

~BS!TO

Ii
2;

0000

88~m

H
m

88~m
1T7 88° Itj~6
174
175

17~

' I'IU'
00

U
00 1
18~ 88
O

183
184

150
003
00 152

08°000
° 5002
005032
004744
804~65
08l

005~27

mo~t
00520
005173
005235

OOT"

~m!2 mn
iU
gg~tu
1~~ 8o3
h" m zl 8g~i~~
0 170
172

88~~0~ 018 U
002204 010051

~U g8gg~n8
~u
8U~zi
00

°IOO3!
014
000000

04
205
206
207

61
mm 007
ogH~~

il~l~

8~U~8

~gi

8gWa

md~ 88929g

IIlrd! tJi~2
~hhi
00

III~~i
227

80g ..~o
88

002260
002262
OO~~64
~6

j~S
30 08
31

80~d

000000
000000

nun
88 g88

8
8g~n6 00o 8
00
000

00 30~

88888g
III3 &8mg
mm gSg8n
39
40

'Dli,c¥

J~U .g

IGilIS,
i
MS
i8 RIG
,~i~l~lER
, " BIY PErI.IYIOI' J.iBli 8'1IIt"Tt,I'ER
U IUIlE MUK
n RUDER
:9~~2i~R BIY D&FIIIYIOaS - ilP
J
~D~I&
IlASE
=100
,
UBHSEL
R~GIST&R BIT DEFIIIITIOI' - If FOI GET STATUS
IIMSK "
lilt I II
III
:11
I. • ., !'I'i'
co I' "
CI
stAh s
vd,tlT:
cs
"1
GES AT "

hll

J'f0
,II I

IIIII ',liGoi'lnl. "''''

kRillt ' :1111
"
ilLS
HCES T =
IIDES AT =10

TSIRR¥~
SUTUS
K SU us
ERROR ST ATDS

,II
! Del STATOS
HE D C RREIII ERROR STATUS
JIIRI'I'! DAU IRROR SUTUS

UU=8B GLBDAT

ASSEMBLY ROUTINES
"'ACYU 301\1052)
25-DCT-78 13112
CZRLDB.PTI
185 00n 54
18~ 00 56 005 60
005 04
18
00216~

195
196
97
98
199

BIT DEFIRITIOHS,MUDISK

fett Iri~ AloVE~~ MASK

~EcrSTER

~ 200

RICISTER BIT DErIRITIOMS t8DR~SS ~OR GET STATUS
US'" "= 0
A SET
S !TU
.
D!
D Y R
MASK

nn~6

nun

SEQ 0044

g8S8n

PAC! 1-3

~~;ISTER BIT D&FIJITIO.S iE~18E tl@.I~i ~~~KD1Tl XFER

DrBr =l
M
I~ K ~ 9600

nnn

16132

TABLE OF OPERATIOI MESSAGES
6PMSGS: • ~ORD
°
IF ILLER
:~g~g
=~'~¥f
jMESSAGE FOR ~~JT~T~¥8~K
• WORD
MSEEI(
,
SEEK
.1I0RD
MREADH
;
READ HEADER
• WORD
MIIRITE
,
WRITE DAU

:=8~g
.IIORD

.1i0RD
.IIORD
.1I0RD
.WORD

22-1I0Y-78

=:~a~T

MDATCP
,
MHDRCP
,
MCYLUP
,
MULOAD
,
MINOUT,

16:32

:m
R~UT
IIITH DATA COMPARE

IIITH HEADER COMPARE
LOAD HEADS
UNLOAD HEADS
IN-OUT SEQ

PAGE 1-4

OUT-III SEQ
.WORD
MOOTII!
.IdORD
MFOLNRT
FOLLOIlIllG "'RITE
REV SEEK
.WORD
MREVSK
1"110 SEEK
.IIORD
MFliDSK
.IIORD
~i~
~u~
.IIORD
=n~18
.IIORD
MBADAD
BAD DISK ADD ~OR IIRlTE
40 HEADER OPERAT ON '
.1I0RD
M40HDR
TABLE OF RESULT NAME MESSAGE ADDRESSES
,CONTROLLER ERROR
MCERR
hSTBL: .WORD
,DRIVE ERROR
.IIORD
MDRERR
.IIORD
MNEERR
~n~~D~~Ii~~NJo~~~~~lTiRf~¥E
• WORD
MFLERR
,HEADER DR DATA ERROR
.IIORD
MHDERR
,OPERATION INCOMPLETE
.WORD
MOPERR
,NO DRIYE STATUS AVAILABLE
MHDRST
.IIORD
.IIORD
,WRITE DATA ERROR
.WORD
211DERR
,HEAD CURRENT ERROR
.WORD
MHCERR
.NORD
0
,SEEK TIMEOUT ERROR
.WORD
MSTERR
,SPINDLE ERROR
.IIORD
MSPERR
HWGERR
,WRITE GATE ERROR
.WORD
.1I0RD
0
,DRIVE SELECT ERROR
.IIORD
MDSERR
PATTERN TABLE
~ATTBL: .IIORD
.IIORD
PAT
.WORD
PAT
.IIORD
PAT4
PU5
.IIORD
.WORD
PAT6
.IIORD
PAT7
.WORD
PATU
PAT
.1I0RD
.1I0RD
PATlO

PATi

SUBROUTINE CALLING STACK
,STACK IS 12 WORDS LONG
0
.WORD
0
.WORD
0
0
.WORD
.1I0RD
.IIORD
0
.WORD
0
.1I0RD
a
.IIORD
0
.IIORD
0
T25TBL: .1I0RD
JtCB~~s~F2gIFFERENCES TO BE USED
.WORD
.WORD
9•
• 1I0RD
12.

~UBSTl( : .WORD

SE~

0045

MACY11 30A(1052 )
ASSEMBLV ROUTINES
CZRLDB.PT1
25-0CT-78 13:12

22-1I0V-78

m 88BU
244 00~320
24~ 88 U2 ~~nn
243

~45

r
m

~53

54
255
256
58
59

l
002332

000010

51
S8H
0023~4

881
016

r 81h
2gi

264
265

024

002355
00f56
00
j57
0
6~

8~(

0~4

80 2

OO~ 64
00 365

00~366

m 88 HZ

r
m mm
8g2r~
3n
h,

46
541

08;jh
002375

I~A

~6l
B

F765 002400
00240~

8Sm
m
279 002404

gg~m

~n
303

280

002405

244
252

2B4
285
286
287
2B8
2B9

00 410
002411
002412
002413
002414
002415
00f16

326
334
523

2iB
293
294
~95
96

00 422
002423
002424

m
~90

.WORD
• WORD
• WORD
• WORD
.WORD
.WORD
• \lORD

rF5

gg HZ

3~~

00~421

00
000000

16:32

PAGE 1-5

~~:

2 •
34 •

l~ ~:
AND 34 TO BUILD AND STORE THE

~~ft~D~~S8¥OU~~DU!~DTr~TT~~ TEST.

hnBL: .BLKW
CYLTBL: .BYTE
.BYTE
• BYTE
.BYTE
.BYTE
.BYTE
.BYTE
• BYTE
.BYTE
• BYTE
.BYTE
• BYTE
.BYTE
.BYTE
• BYTE
.BYTE
.BYTE
.BYTE
• BYTE
.BYTE
.BYTE

.B'fTE

• BYTE
.BYTE
.BYTE
.BYTE
.BYTE
• BYTE
.BYTE
• BYTE
.BYTE
.BYTE
.BYTE
.BYTE
• BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BVTE
SSINDX: .WORD

114.

i~i

mm 888

iTABLE OF DEFAULT CYLINDERS

20.

8•
45.
58.
65 •
72.
77.
84 •
91.
97.
102.

52.

loa.

d~:
m:
m:
m:
1

64 •
70.
177 •
1B4.
189.
195.
20,.
20 •

H3:
27 •
134.

m:
a
253.

ASSEMBLY ROUTINES
MACY11 30A( 1 052) 22-NOV-78 16:32 PAGE 1-6
25-flCT-78 13:12
CZRLDB.PTl
297
OPERATIONAL FLAGS
29B
6PFLAG: .WORD
a
299 002426 000000
DONE:
a
300 002430 000000
• WORD
HADONE: .WORD
a
3 01 002432 000000
ERHEAD: .WORD
a
302 002434 000000
MORECE: .WORD
a
303 002436 000000
ERRSWI: • ~ORD
a
304 002440 000000
BSFLAG: • WORD
a
305 002442 000000
WRTSWI: .WORD
0
306 002444 000000
TBLSTR: .WORD
0
307 002446 000000
308
R~BAS:
.WORD
0
309 002450 000000
RLVEC: .WORD
a
310 002452 000000
0
RLDRV: .WORD
311 002454 000000
L.CS:
.WORD
a
002456 000000
a
L.BA:
314 002460 000000
• WORD
L.DA:
.WORD
a
000000
315
L. MP:
0
000000
316
• WORD
T.CS:
.WORD
a
317 002466
gg
.WoRD
T.BA:
0
gg~m 000 00
T.DA:
.WORD
0
T.MP:
002474
•
\<lORD
HDWRDl:
0
002474
000000
3 1
HDWRD2: .WORD
a
002476 000000
HDWRD3: .<ORO
a
002500 000000
324
T.STAT: .WORD
325 002502 000000
326
RESPARM:
.WoRD
327 002504 000000
002506 000000
0
• dORD
.WoRD
0
80~510
.WORD
a
a 512
330
.1I0RD
a
331 002514 000000
33j
DRVCNT: .WORD
a
33
002516 000000
DIFADG:
0
000000
334
• WORD
a
OLDCYL: .WORD
335 88~m 000000
NEWCYL: • WORD
a
336 002524 000000
CURCYL: .WORD
a
337 002526 000000
DESDIF: .WORD
0
338 002530 000000
DESSGN: .WORD
a
339 002532 000000
DESHD: • WORD
a
340 002534 000000
DESSEC: .WORD
a
341 002536 000000
TEMPO: .WORD
0
342 002540 000000
TEMPi: .WORD
0
343 002542 000000
TEMP2: .WORD
0
344 002544 000000
TEMP3: .WORD
0
34~
002546 000000
TEMP4: .WORD
0
346 002550 000000
TEMP5: .WORD
a
347 002552 000000
TEMP6: • WORD
a
348 002554 000000
TEMP7: .WORD
a
349 002556 000000
.IIORD
TEMPB:
a
002560
000000
350
351
TIMER STOR AGE
352

Sf:Q 0046

,SUBROUTINE STACK INDEX POINTER

SEQ 0047
;OPERATIoN FLAGS

~~klgAIl~~N~~~~L5b~EF~t~G

;ADDRESS OF ERROR HEADER
;MORE THAN 1 COMPARE ERROR
;ERRoR RETURN SWITCH
,BAD SECTOR FLAGS
; WRITE SWITCH
;TABLE STORAGE

~~tll ~~~¥OAD~~~~~SS

;DRIVE NU~BER UNDER TEST
;CoNTROLLER REGISTER STORAGE
;BEFORE OPERATION
;CONTROLLER REGISTER STORAGE
;
AFTER OPERATION
;HEADER WORD STORAGE
,DRIVE STATE STORAGE
iPARAM BLOCK FOR REASON REPORT

888ggg

DRIVE COUNT FOR DRIVES UNO"R TEST
DIFFER!NCE AUGMENT FOR SEEK
OLD CYLINDER
NEW CYLINDER
CURRENT CYLINDER
DESIRED DIFFERENC~
DESIRED SIGN
DESIRED HEAD
DES IR ED SEC TOH
TEMPORARY STORAGE
TEMPORARY STAR AGe
TEMPORARY STORAGE
TEMPORARY STORAGE
TEMPORARY STORAGE
TEMPORARY STORAGE
TEMP8RARY STORAGE
TEMPORARY STORAGE
TEMPORARY STORAGE

ASSEMBLY ROUTlilES
MACYll. 30A(1052)
CZRLDB.PTI
25-0CT-78 13:12

22-BO'·10

16:32

PAGE 1-7

s~m:

Orlllil
Rrlii UI •

II!~59dO 888&nil"
36~

. H~S8 6:
ORpll
•
SIIIIul
oRlllgO:
SISSH: •

576
00 60Q

~8~

U 0088 6H
m

~I 11

! ~~~i!i 1111~i
III gall!1 gggggg
~B~ 88~g6~ 8Rgog2
389 0010~2 oooAoo
390 003064 oooaoo

Iii ~~Ii!~ 8gg81~
~3g

003074

000000

g8J~~~

8888~g

000200
m
40}
04066 000200
803466

406

:g~

004466
004470

000000
1p772

g84m bHH

MACY11 30A(1052)
ASSEMBLY ROUTINES
CZRLDB.PTl
25-0CT-1B 13 :12
409 004476 052525
410 004500 052525
411
°8m~ 05r 25
804506 1~
414 004510 A52525
415 004512 05~5~5
004514
7 7
252
418 0045~6 1 525
419 g8~~ ~ 177252

424
425

004530
004532
004534
004536

m gm~~

000003
000000
000000
177777
177777

EEOCIL: .WORD

t50

4:~~4
435
436

~~~~'!: :~8IB

T8,PL1, .W RD
PWRFLG: .W RD

kO~E~Ri :I!JI

SBSFlL:
fBSI'lL:
IBUFF:
OBUI'F:

.BLKII
• BLKW
• BLiI:1I
• BLKIi

200
200

PATt:
PAT2:

.1I0RD
.IIORD
.IiORD
.IIORD

ERRPOlNT: .WORD 0
ERRCNT: .BLKW
64.
PASKUM: .MORD
0
PSET.M: .UORD
0

22-KOV-7B

PAT3:

88m2
HHH
004560 000000
004562

U} gmn ~~~nl
440

004570

025252

PAT4:

3g~m
U4
1~5~5
445 004602 a

446
447

448

004604
004606
004610

2 2
052525
125252

45
45
454
455

0046r
0046 2
0046 4
0046 6

5~~m
12 252

459
460

004631

066666

463
464

004642
004644

064221

g8am A~5m
m
45i 004616 p~252

52525

m
458 88m o mm

PAT5 :

m 88~m mm

PAT6:

132110

IIEnlSE

,EXPECTED TIME ~IE CiLIIDER

;§§~Ec~§8 11"1 ~~2 Eytl=BI~

Jim:ETED ~D'Anoli TYKE

;ERROR VECTOR USED wAKN AUTO SIZI8G
,PASS COO.T~R (LOCAL TO A TEST)
'i COUlTER LOCAL TO A TEST)
;ERROR POU ER
,STORAGE FOR ERROR COUlTERS
;PASS NUMBER FOR PROGRAM
,COURTER FOR PARAMETER SET NUMBER II USE
;'tOCtL
IR BI IRROR
ERRORCOURTER
COURTING FLAG
, ARDWA E TRAP 8eCURlICE
;POWER FAILURE CCURAnCE

~'~~~~A~EBI~DS~~~~RRFIlkE
HIlPOT BOFFER

nnn
16:32

,OUTPUT BOFFER
;PATTERN 1 (ALL ZEROS)

PAGE 1-8
SEQ

004552

88m2 m~H
m
439

~8oo.·.

4
MISCELLABEOUS COOITERS

~888H
l~Z 88m2
004550 177777

431

hS6
CiL
I

uRal: owoBD
ERRVEC: .WORD

88m~ Hm~

hS6 CYL

Ifv~Ytl :~SRB

FORWARD INliER
FOHIIAAD OUTER
REnRSE IIIIIER
REVERSE OUTER
FORWARD

has CYL

Il=Ui:
tR=U&,

4~0

Hd!h

4B
4H

h2s CYL

h28 Ci
h2B CYL

H,OOTOI •

III! I

II!

~OIlE CYL~p

R FORWARD INBER
FORIUIID III DOLE
FORWARD OUTER
RE'II!RSE I1UIER
REVERSE MIDDLE

JOIIE CYL

HPI6:
HrOOTI

SEQ 0048

fQBE C~LI
;O_E CY
JOIIE ClL
~OIlE CYLI

.IIORD
.IIORD
.WORD
.1I0RD
.WORD
.WORD
.ilORD
.1I0RD
.liORD
.WORD
.WORD
.IIORD
.liORD
.WORD
.II/ORO
• WORD
.ilORD
.WORD
.WORO
.ilORO
.1I0RD
.IIORD
• ilORD
.WORD
• WORD
.IIORD
• ilORD
.WORD
.IIORD
.1I0RD
.ilORD
.IIORD
.liORD
.1I0RD
.WORD
.WORD
.1I0RD
.WORD
.WORD
• WORD
.WORD
.IiORD
.WORD
.WORD
.WORD
.WORD
• WORD
.WORD
.WORD
.IdORD
.1I0RD
.WORD

05f25
05 525
055r

U2~2~
A~n~~

1~1~5~

177 52

mu~

000003
000000

m~~~

177777

m888

1777p

HH~~
m~H

000000

825252

o~~~~~

12 2 2
1T~52
5 52

g5h~~

1T~52
5 52
o 2 25
125252
052525

A~m~

125252
p5555
33333
066666

064221
132110

0049

ASSEMBLY ROUT lIES
Macr1! 38A(1052)
elRLD8."l
25-OCt~18 131.2 .

r .

22-101-18

III
004676

111111

PAt1;
PATIII

004140
004142

nnn
1511555

PAT91
PATI01
ElDIIDD

004144

16:32

PAGE 1-9

SEQ 0050

III
.VORD

111111
5

.VDRD
• MORD

125252
155555

;1'1

!~d

ASSEMBLY RDUTIIES
MACYll 30A(1052)
CZRLDII.PTI
25-OCT-18 13112
042

22-IUY-18

16132

PAGE 1-10

SEQ 0051

SEQ 0052

tuum :Ugi~

LABACI' I
LUICR:
,HDMOV!'I
o R 2:
R A:
R I

.lSC Z
• ASC Z
.ASC. Z

.AScn

~e6:

:t2H~

oASCIZ

• AS~ Z

U :u~ ~
IIvBi :t~H~

U!iUi :tsS
~li~11
8sA~§il

'tcEd:

.ASC

RESUlT
• ASC Z lAMES
lORY RD I
.1SC Z lCONT EIR I
.ASC Z ZHDR CRC~

:t~g f

• AS
.Asgl~
.1SC Z
• SC Z
.ASCIZ
.AsciZ
.ASC
.ASC
.ASC

AH8 R ~NDI
fRAi
A A Li'1'E
rRDI
NO "O/HDR CRC/OPI'
lOR' ERR I
lOR' SEL ERR I
IDRY STATE I
ISPI. TIMKODT I
lVRT GAT ERR I
ZSIEl TIMEOUT I
IH
1D C R ERR I
LV T OA
RR,

Ri ITt
:ti~ ~ JIII~IIITi'O~RAT/LATE
.ASC

·U

000
000040

hSE3:
RESE4:

• ASClZ ICYL I
.AseIZ lCOULD ROT RETRIEVE DRI'~ STATUS,
.AsciZ
IUUlN DRY STATE-NO R¥Y~N ERR,HD OOT(
.ASC z IFAIL TO RELD HDS AF EN RR eLEA 1
.ASCI% IVRITE ABORTED 1
.ASCIZ I ERR LIMIT EXCEEDED - UNIT DROPPEDI
.ASCIZ I ERRORI
• ASCIZ <207)(377)<377>
RESULT SETTINGS
• ASCIZ lIS I
.ASCIZ I 58 I
RESULT CONDITIONS

MACYll 30A(1052) 22-NOV-7B 16:32 PAGE 1-12
ASSEMBLY ROUTINES
25-0CT-78 13 :12
CZRJ.OB.PTl
000 RESE5 : .ASCIZ ! IN !
675 0104f 044440 020116
676 0104
1
040 0~31 7 000040 RESE6: • ASCIZ
2 01 020105 STATE2 : .lSCIZ ~s¥ir' 2/
677 0104 6 052123 o
ISTATE 31
010436
O~O 05 STATE3: .lscn
05~T
ATE5: .lSCIZ
~/MS!
.lscn
8~ ~
8H~ SI
C OMS:
C
00145:
.Ascn
/500MSI
065 030060 05r 15
684 01° 471
CCYLUP: .ASCIZ lClcLE
103
685
040504 8~A5~1 8~ ~l~ CAFDT: • ASCll ID TA XI'E !
020065 042~ 3 042103 C5SEC: • ASClZ 75 SECDS!
n~
688
689 010532 047045 0~~045 04~045 FMTOP1: .ASCIZ I~N'T'NtTtT'06'S\T'01tNI
.ASCIZ
690
8~g
~u g~ ~~t FMTOpr
FMTOP : • Ascn I'N'+'OI,slt~,ol'NI
I\Nt to tSl1 \T HI
691
000 FMTl:
692 010624 052045 052045
• ASCIZ Inn,
045
022524 f'MT~.l: .ASCIZ lun TI
693
.ASCIZ /%TI
fMT :
052045
694
045 000116
695 010643
• ASCIZ
FMTr
.ASCIZ /u nUN,
696 01 0646 047045
05~045 FMT :
45
.ASCIZ ,\"'T%06\ I\T%Oll
FMT5:
045 05r
697 o 0657
o~ 516 82J 55~43 FIIT6:
.ASCIZ
045 o
698
699
045 056 022524 FMT7:
• Ascn ~:=~¥l~~t~~~~l~~~:a~~~~i~i~~jl~~:§~%OltNI
I'MT8:
045 022516
• Asen ~1"ii'06%S2%06\S2\06%S2\061
°a3i~~
045
• ASCIZ
052045 gi~Ug 80006! ~mi: .1SCIZ
ig~
FMT12 : • ASCIZ
052045
7445 00006
704 011064 04 045 05~445 030461 FMT13: .ASCIl :lC~~lf~fiJ~~t~~~~'~3ti~:~l91\Sl%T'011
705 011130 04 045 05 045 052045 FMT14: .ASCIZ
106 011162 047045 051445 030461 FMT15: .ASCIl I\N%S11%T%D3\Sltr~o~ts1\T\061
.ASCIZ ItN1S5%06{
011216 047845
~07
8Bl~~ ~m~l • Asell '/tSl0tj'N
08 011W
S~l\06%N~
FMTl8:
ol~ 0225~6 030523 FMTl9:
09 011 1
• ASCIZ I%N%Sl %T%S %T%S4% %S5%T\NI
045 0225 4 031123
710 011303
• ASCI Z I%TtS2%06tS4%06tS4%06\S4\06\N/
.ASCIZ "TtS~%D6%SI4t06%S4t06tNI
0
8Sr45
045
5 445 8H3~~ ~m~l .ASCIZ I%T%S 2%06%514\06\"'
011413
045 O~ 5~6 0305~3 FMT22 : • Ascn I%N%Sll%T%03\Sl%1%01%Sl%1%021
.ASCIZ /tUTUtOaNI
045
FMT~3:
p4
~~la g33h~ FMT
4: • ASCIZ lun~
045
15
a 047045
042045 022462 FMT~5: .ASCIZ I\N%O
%1(
047045 051445 022461 FMT 6: • ASCIZ I\N%Sl%1 D4%T%1%03%NI
H~
718 011524 047045 052045 042045 FMT27: .ASCIZ I%N%T%03%T%D3%NI
.ASCIZ /%NtT%nTI
045 022516 022524 FMT28:
719 011543
ENDMOO
720 011554
BGNMOO GLBERR
H~ 011554
ERRI
R3 POINTS TO RESULT MESSAGE
RESULT: (R3)
H~
729
ERR2
RJ POINTS TO RESULT NAME
730
RESULT: (R3) IS 1 SB 0
H~
ERR3
R3 POINTS TO RESULT NAME
133
RESULT: (R3) IS 0 SB 1
734
ERR4
R3 POINTS TO RESULT NAME
R4 POINTS TO RESULT CONDITIONS
1~~

mm 8

U~ 818m
glg~H

g
022568

818m
818m

8l8m

m 8Hm

°B
H~ 81mS o
8HU
gWZo

Hun

/iN'

mm:

up,

SEQ 0053

ASSEMBLY ROUTIRES
MAcYl1.30A(1052)
CEILDD.PT!
35-0CY-7. 13112

22-ROl-78

ERRS

BRR6

ERR'1

16:32

PAGE 1-13

SEQ 0054

ERRB

003067
1'11072

ERRc)

ERRIO

DGIIIMSG

If SY IF "ROR COUNYIIG INHIBITED

J
I

1$:

-B8~p ERROR COoNT

RX~Eltll~1

~~iaL~1 ADDRESS POINTER

Jil

Jlfi~8R REMAINDER
J!oS~HI~KRIF ERROR COoNT EXCEEDED

014634

171032

BGRMSG

8m~~

IIIC

MOY
MOY

140'1

22-NOV-78

16:32

PAGE 1-14

014634
8GIIMSG

EMT
ERR3
IIIC
MOV

n~gfTS

REM1IRDER

J~o CHE~KRIF ERROR COoNT EXCEEDED

C$MSG
;eUMP ERROR COUNT
;STORE Rl
'REPORI
OPERATION
;SET
P RAM
NUMBER
;IRSER NAME ADD POINTER

~~v

MOV
CLR
MOV
JSR
JSR
MOY
JSR

014634

SEQ 0055

n
;R

CLR
JSR
JSR
MOV
JSR

g~UU

170164

C$MSG

~~&

ill 111111 111111 000001

ASSEMBLY ROUTINES
MACYll 30A(1052)
CERLD8.P!1
25-0CT-1B 13:12

EMT
ERR2

S ntH~

~H
HI~~~~~ER
~~O ~3~~KRIF ERROR COUNT EXCEEDED

C$MSG
170116

8GIIMSG

ERR4
IIIC
MOY

i~¥~&EEHROR COUNT

;REPORI bPERATION
ET P RAM NUMBER
!¥.SER NAME ADD POINTER
;SET IS YAtU§
J¥I!ER¥ laDUoF CONDITIOI POINTER
,REPORT RESULTS
;R§PORT REMAINDER
s!oS~H~~KRIF ERROR COUNT EXCEEDED

~gV

8~UU

MOV
MOY

000001

~k'

JSR

JSR .

014634

170646

023244
000004
000001
014634

EIIDMSG
LI0003:

~~l
EMT

CSMSG

ASSEMBLV ROUTINES
MACY11.30A(1052)
CZRLDB.PTI
2S-0CT-78 13112

22-NOY-78

16132

\.10004: EMT

BGIIMSG
17$:

000002

PAGE 1-15

SEQ 0056

C$MSG

ERR6
TSTB
BNE
INC
MOV
MOV
MOV
MOV
JSR
MOV
MOY
CLR
MOY
BI~

~~~

000004

=~Y

B S

M V

IIlITUS

00011110
9$1

10$!

MOV
BR
MOY
HOV
MOVB
BR
MOYB

iiiU¥
en

100$1

BilE
NOJ
PRIIITB
MOJ
MOV
MOY
MOV
MOY
MOV
EMT
ADD
BR

ASSEMBLY ROUTINES
MACYll 30A(1052) 22-NOY-18 16:32 PAGE 1-16
CZRLDB.PTI
25-0CT-78 13:12
MHCRC,R4
;HDR CRC MESSAGE
14011'
105$:
886 012330 012704 007566
OR
DOS
887 012j34 00075j 004000
HCACERR,R3
;TEST IF HCRC WITH HDR NOT FHD
8Ir
107$1
888 01~ 36 03170
09S
HES - SKIP
.
BME
01~ 4~ 002~0
MH8F,R4
;MESSAGE HEADER NOT FOUND
MOil'
007607
BR
g2~CRC,R4
;UNF AND HCRC MESSAGE
109$:
14011'
007635
89
3~~ 81~7~~
BR
OOS
;SKIP
tDCKERR,R3
;TEST IF DATA CHEC~ SET, NOT OPI
115$:
BIT
004000
89
0t
360
032703
BEQ
118S
; NO - SKIP
895 0 364 001403
MDCRC,R4
;SET MESSAGE DATA CHECK
14011'
007576
BR
ODS
;SKIP
i~~
~~6 8'6~~3
#DLTERR,R3
;TEST IF DATA LATE ERROR
118$:
BIT
010000
BEQ
120S
;NO - SKIP
MDLT,R4
;SET MESSAGE DATA LATE
MOV
OH402 012704 007623
BR
90~
012406 000732
;SKIP
120$:
14011'
100000
A~I
15,R5
s~flAtI~4P~A~Tf~B[~Rc6ij~t
CLR
90 3 801~~t6~ 80A3~6~~
3$:
81T
;TEST IF BIT IS SET
6Ri,R3
ONE
;YES - SKIP TO REPORT
( 4)+
;ELSE BUMP TABLE POINTER
4$:
TST
;CLEAR CARRY
CLC
R5
;SHIFT BIT POINTER TO NEXT BIT
908 oI 4~6 006 O~
ROR
BHE
3~
;LOOP IF NOT 0
909 Ol 4~~ 00137~
BR
7
;ELSE REPORT REMAINDER
R STBL(R4),(R1) ;INSERT HAHE ADDRESS
6$:
MOV
002174
§l~
~i4 8~g:~~ 024032
PC,RPTRES
;REPORT RESULTS
JSR
BR
~l~ 81~l:~ 883~~6
4e
;GET NEXT BIT
7$:
JSR
24240
tE,~~TREM
$~~~¥RIFR~~¢In~5RSTATUS
~14 81~~~~ og~~~~
TST
02546
BEQ
155
;NO - SKIP
91~ 012456 801414
PRINTB #FMT17,'STAMES,TEMPJ
917 012468
'tEMP3 -( SP)
MOil'
9
MOil'
STAH~S'-(SP)
81~t~4 gl~7:g
HOY
FHT!'f~-(SP)
MOV
~'Rb S )
14011'
EMT
CS~NTB
ADD
000010
«10 SP
TEST IF DATA CHECK ERROR
BIT
004000 002466 15$:
~DchRR,T.CS
NO - SKIP
919 012516 001453
TEST IF OPI SET
n~
002000 002466
~3~IERR'T.CS
§9~i gl~~~g 85f6~~
BNE
YES - SKIP
M5ftECE
CLEAR COMPARE ERROR COUNT
CLR
22 0i2530 005037 002436
SET COMPARE LENGTH
14011'
Fh'RI
SET WORD COUNT
MOil'
999~5~
~~l6 81~ig~ 88m~
SET GOOD WORD POINTER
MOV
OfiUFF,R5
2
0 2544 01~705 004066
SET TEST WORD POINTER
MOil'
003466
CHF.CK WORD
~~~ °1~~5~ g~f~Y:
CliP
18S:
m~~~H
BEQ
GOOD - SKIP
9~8 812556 0014~i 002436 000012
CMP
M~hcE,#10.
TEST IF COMPARE LIMIT REACHED
BGT
20$
YES - SKIP
81~~~g 8a~621
PRINTR
FMTI5t#MWORD,R3 nRESE3,(R4),#RESE4,(R5)
MOil'
~IAl 813~i8 011546 010407
m~4f~~~P)
~g~,
R4),- SP)
~lt 81~~i~ 81fll~

t
f

883
82i 81
gll~~O gaOl~1

98§00~ ~l~l63 811l8~

!OOi

38~ ol~~~o 00?~5g~

§8~ gill2~ 883 ~4

1
81~~~g
19~ 81~~1~
81~~g~ Ab~~~~

.l gl~~~6 0~~7~~
8

i36

I
i

SfQ 0057

ASSEMBLY ROUTINES
MACV11.30A(1052)
eIRLDB.PT1
2S-0CT-1B 13.12

22-10'-78

PAGE 1-17

16:32

SEQ 0058

II! Ijill :!::::

~I III ''''''
II III Iiill iiiiii
III! !,!!!! ::::::

III"

25$:

1111

iIl~1I17 iiiiii

III I 1111
~I g~ ~~69 ii~ ~ m~u

~~, 8 ~88~ 104023

014634

92
81~22~ 005277 167650
96
013UrO 010146
~t~ 81~81~ gA~~~~

96
96

gB82~

BGIIISe

813056

004737

Ui dUn gO~Ul
O~4737

981

911

agRg~:
BGIIIISe;

nnn

i~j
9~

miH3~

013

T gUU

104023

oo~o~~

1 0

1~~

H~ 0 31

005046

002436

Am~~

88U~~
Ii 111l!! nun mm

t hUH

4
1 04

81m~

013~~26
01

062706

000014

0}J234
0 3236

011446
012746

010407
010403

~Pt gli ~3 m~u
2
11

002455

012746

Ih401

MOV
MOV

Rl'-lSP~
R3,PC,R TO

~ERRPOINT

I/iC

22-NOV-78

JSR

88:~n gm~~
85m~ 014634
SAO~4~

CSMSG

014634

104023

gS4H,
iI~o~ !11m
0101~160

EMT
ERRB

024240

US gW~~ 8H~~1 000003
O13M o0IO~
0 11

990
991

~il
~~&

JSR

3$:

02 032

'8 8tug~
167554
91
i
g~8~U
~ 7 01 86 004 37 023244
984

AR~
JSR

=RJ
Kiiv

81 s0A
~u gIU~~ 8
01~ 1 OOlS24
~77

CSMSG

IIOY

8ljHl 8~~~n

l!r

EIIT
ERR7

MOV
NOY
IIOV
MOV
CLC
ROR
DEC
811E
TST
MOV
JSR
JSR

suo h niHt ggo3~~

i~o
g~o
9~} 8
o o4i
97

;GO CHECK IF ERROR COUNT EXCEEDED

023244

MACYll 30A(1052)
ASSEMBLY ROUTINES
CZRLDB.PTl
25-0CT-78 13:12

;RESTORE RS, 4, 3, 1

27$1

=8~

fI8~8~:
BGIIIISG

PAGE 1-18

16:32

13~(R1)+
M YLOC f &R1>+

1t~~W'

~~1)

Ul~+

NEil YL~~R1)
PC,RPT S

PC~RPTRr

t'H

~~c~ K~RLM

EMT
ERR9

C$MSG

~~~

P~,-~sp~
,R TO

INC

IIOV
MOY
MOV
MOY
JSR
JSR
MOY
JSR

ENDMSG
LIOOlO:
Ellf
BGIIMSG ERRIO
MOV
TST

JSR
PRINTS
CLR
BISB
HOV
MOV
MOV
MOV
MOV
MOV
EMT
ADD
PRINTS
MOV
MOV

MOV
MOV

~ERRPOINT

n=lnl!

R4, Rt +
R5, R +
PC, p~ ES

p~~R~TnM

~ClhfRI.M

SEQ 0059
·SET PARAM NOMBER
'~NSERr NAIIE ADD POINTER
, ET HEADER WORD
;SET SHIFT COUNT
;ALIGN CHAR FOR PRINTING
,
AS IS VALUE
JBUMP PARAM POiNTER
;INSERT 58 VALUE
;REPORT RESULTS
;REPORT REMAINDER

m~~8n ~~

;GO CHECK IF ERROR COUNT F.XCEEDED

;BUIIP ERROR COUNT
; STORE Rt
;REPORT OPERATION

$~~~E~+RA~M~U~8fiRpOINTER

,SET IS VALUE
,SET 5B VALOE
;REPORT RESULTS
,REPORT REMAINDER
;RESTORE RI
;GO CHECK IF ERROR COUNT EXCEEDED

C$MSG

n~fiE~~p)

3S
~ERRPOINT

~~~g~EI~12ND BAD LINE
·YES - SKIP
$aUMP ERROR COUNT

#~~~~;~hASADD,RL~~~~~~~v2~~~~~!g~DRV+l> ;R~PORT ID

-pP~
R DR +1

(SP~

1"""1-1' ,
LBiS - S A
BASA6o ( P)
FMT5§- C
SP)

~'Rb Pl
Cf~NTB

4~SP t

FM 14 lMRSLT,#MWORD,R3,#RESE3,(R4),#RESE4,(R5)
R5~ P~

RE f4C~ P)
R4~
- S ~ P)
RE b,-(

ASSEMBLY ROUTINES
MACY11 301(1052)
CZRLDB.PTl
2S-0CT-78 13:12

I Illill IIIII!

I!" 111111
I ~ 8 ~70 8 ~~~f 000022

22-KO'-78

16132

PAGE 1-19

SEQ 0060

; REPORT 0 AT A

3$:

010407
010403

8gUn

'II II! ".",

JilC CVMPAR! ERROR COUNT
'G~S~RE~~RIF ERROR COUKT EXCEEDED

4$1

014634

U8~UI EIIT
ERDIIOD

C$MSG

.EYlUI
JCjR BASE ADDRESS DEFAULT
CTOR DEFAULT
DEFAULT
,DR IIRITY
E KUIIBER
DEVAULT
1RL
CONTROLLER

II I 1113111 111111

~ 18 t~

'~ f ~ilili

BCRIIOD SPTCODII:
BGIISII
.WORD
MISlIlIIl .IIORD

888888

1BIT 0 = USE ALL CYLINDERS
1BIT 1 = USE ALL SECTORS
'liT 2
EXECUTE DRIVE SELECT TEST
; T 3
EXECUTE HEAD ALIGNMEHT
I
4
DROP DRIlE IF NO RESPONSE
18
HEt¥ ~f KCT SUPPLIEf FLAG
4 : ~~ L~MITS~~~~~J~~DFFt~G
10 T 5
DO MANUAL INTERVENTION

I1lj====
JI
=

iii

~ gl~~~~ gggg~~

ASSEMBLY ROUTINES
MACY11 30&(1052)
CZRLDB.PTI
25-0CT-78 13112

180J~3 2 811~3°
88°8~~
01340~ 0080i2
1 ~40

013420

gl~4~8

0B~H

:~8~g

.WORD
.IIORD
.WORD
.IIORD
.ilORD
.IIORD
.1I0RD

~ dH~~

i
6
6

8tUi8
01344~

1053
1054

{~1

gum
m4~~

nun

~&h
1m 013470
m~

1060

1 6

(2)

013476
013502
013502
0}3506
0 3510
013510

SBm

012700
104041
104051

005037

~H6~8
10~00~

gbO~~l
m~
10~4 gm~~ 012700
l
S3 °135~6 104050
1b6~ 0 3530

(2)
1066

013530

H!RROR LIMIT
1COMPARE ERROR LIMIT

P
T8
no

111

Ti2
T 3

T 4
U5

KIIDMOD
BGHIIOD INITCODE
BGHIIIIT
SETPRI 1~40

013456
013456

O13t62

SEQ 0061

::8:8
p~
.ilORD
riB
.IIORD
T19

Op446

g 8dm

l ~
tO~2

PAGE 1-20

8i~Pi¥CHDSPCODE 19
.WORD
19
.WORD
11
.WORD
T2
.1I0RD
13
.WORD
T4
.IIORD
T5
.IIORD
16

i 8hU~
~

16:32

~U b~:

8~~ 81U8~

h1~4 oq~06
g134g~
01~410

22-HO'-78

255.

HE1DII: .WORD
ERLIMI:
.WORD
DCL
1111 .WORD

013406

LOLIMW: .WORD
HILIIIW: .IIORD

18~~

103043

000340

~g¥

~$~9dO

~RV

~~g~AT,PWRFLG
IEr.START

~A'UAL

100014
002424
000034

013372

002012

OO~072

000040

1$:

C$MANI
;CHECK IF MANUAL INTERVENTION ALLOWED
8COMPLETE
1$
;YES - SKIP
BCS
1S
BIC
#MITESTIDRSELTIHDALIGH,MISWIW ;CLF.AR ALL MANUAL
CLR
SSINDX
;CLEAR SUBROUTfN~N~f~~RNI~g~xFLAGS
READEF ~EF.PIIR
,POWER FAILURE
MOV
. EF. PI/R, RO
EMT
SREFG
;NO, GO CHECK NEW PASS
BNCQMPLETE 4$
BCC
4~

4$:

REIDEF
~g¥

$~aTs~R¥f~EF~~~EkL~~IL
;CHECK IF START

~E~E~llRT,RO
RESTART ;NO - SKIP
RESTART
ON START INITIALIZE TO START AT FIRST DRIVE, CLEAR INTERNAL

BNCOMPLET~

Bec

ASSEMBLY ROUTIHES
MACYl1 30A(1052)
CZRLDB.PTl
25-0CT-78 13:12
002516

22-ROY-7B

16:32

PAGE 1-21

SEQ 0062

PASS
MOY COU~J6Nt¥~D~~~~~ CO~~tT UP UNIT COUHT
RSTRT: CLR
plsMUM
;CLEAR PASS NUMBER
HOV
iu~Cn'RO
GE A COU
HOY
1$:
CLR
~rO)~
~cLIAR A
COUNTER STORAGE AREA
DEC
BilE
15
;LOOP TILL ALL CLEARED
MOV
#ERRCNT-2f.ERRPOIMT ;INIT ERROR POINTER
MOV
#-l,PSETHM
;SET P RAM SELECT TO INITIAL VALUE
MOV
I-I,HADONE
;PRESET HEAD ALIGN DONE FLAG
~HI~YL,MISWIW
;TEST IF HI LIMIT SET
BIT
BHE
~77 HILIMW
~~~~E-I~~+PHILIMIT
HOY
3$:
BIT
!LOC~L'MISWIW ;TEST IF LO LIMIT SET
BNE
tRLIMW
lIE~E-c~~I~ LO LIMIT
CLR
SETDO~
5S:
BR
ReSTART:
READEF ~EF.RESTART
ICHECK IF RESTART
MOV
EF.RESTART,RO
EMT
$REFG
BCOMPLETE
RSTRT
;NO - SKIP
BCS
RSTRT
CONTINUE:
REODEF iEF.CONTINUE
,TEST IF CONTI~UE
~~T
E~kE~gNT NUE,RO
BCOMPLETE
PWCON
BCS
PWCON
ON CONTINUE PICK UP UNIT LAST UNDER TEST
READEf ~EF.NEW
ICHECK IF STARTING NEW PASS
MOY
EF.NEW,RO
EMT
SREFG
BCOMPLETE
PASNEW
BCS
. PASNEW
NXTPAS:
TST
DRVCN!
;TEST IF ALL UNITS CHECKED
BHE
SETDON
; NO - SKIP
PASNEW: ~~~
l~~~g=T-2~ERRPOI~¥Ll~N¥~M~HkA~~Rg~u~6INTER
#!~fN~~~¥~HCNT ~~~T ~ihA~R~~~~CT TO INITIAL
SETDOM: INC
PSg UN
;NEXT SET OF PARAMETERS
DEC
DRVCNT
;DOIIN COUNT DRIVE TOTAL
ADD
#2,ERRPOINT
;UPOATE THE ERROR POINTER
MOY
PSETNM,RO
;SET UP TO GET PARAMETERS
MOY
#RLBAS,R2
GPHARD RO~Rl

ERloR

nun
gBH~

002516
00~062
00 660
o~

002660

OF 002516
003064

hdd
88~~~6

002660

:8t
~~~

~tk~RD

BCOMPLETE
1$
BCS
7$
TST
PIIRFL G
3~~
~~~~t~ ;NO

MACY11 30A(1052)
ASSEMBLY ROUTINES
CZRLDB.PTI
25-0CT-78 13:12
1111 013772 000736

lllj
gl~1i~ gl~l~~
1114 014000 005721
l~l~

tt17

sum

I!1 HUH

1
1

014002
014004

014032

014044

8HH~

013746
012746
104037
062706
012700

~~5B~

ll~~ 81~gi~ g~~~~1

PWCON:

002452
000003
000010
000000
002450

003062
000020

013372

003010
000340
014570

11!':2;3!'

1$:

012122

SIISI! !11931
1!
3~

22-NOY-78

. ~81
MOY

06270~

05 705

1139

014150

00107}

000004

000004
002000

000000

lll~ 014170
81;ii~ 010562
8i~~8~ 000000
888m

1143
1144

l~~

It4~

sum rA~6~g

014200
~14202

112' ~12j19
lj~

11.48

81l~l~

014220

032762
001452

~~~6gg

002652

ff~¥(iL~;~lsp )
~~VEC~-\SP)
g~v~/)
l0'SP
O,RO

,SET PRIORITY

~r5~~!R2

;SET RL BASE ADDRESS POINTER

~RRVEC~-(SP)

)

~~~

~rDRV R5

~~¥

BNE
MOV
BIS
~~S
WAlTMS

m
BIT
5$:

11:8(ii~~~!sP)

~i§v~~
~Lg§~~2)

SIS

888m
Ilj~ 8Il1~~ 8!2'~~ 000001 000000
000003

SEQ 0063

NXTPAS
R1!+,{R2)+
,STOR~ PARAMETERS CSR
R1 +,(R2)+;
VECTOR
R1 +
;BUMP PAST PRIORITY
R1 +,(R2)+
1
DRIVE
R~VEC,~INTH~R,#340
ISET UP VECTOR

~~¥
~g~
TST

1114
g121~2 001032
1135 014126 013705 002454
014132

BR
MOV
MOW
IS 'I'
MOV
SETVEC
HOV
MOV
MOV
MOV
EMT
ADD
SETPR I
MOY
EMT
MOV

PAGE 1-22

CHECK IF DOING AUTO SIZE AND DROP DRIVE IF NOT READY AND
ERROR SETS ON GET STATUS.
1ST
~ASNUM
.
;TEST IF PASS 0
~~~
~~OTOSZ'MISWIW ~~~ST ~~IbOING AUTO SIZE
;CHECK I~E3NIBUS i5DRESS IS THER~NgEfO~~I&E CHECK DRIVE READY
CLR
TRPFLG
"TRAP OCCURANCE
SErVEC ERRVECf~TRPHAN,~140
ISET TRAP VECTOR

Illl!1 iiilii mm
014110
014114 8gm~ mSA8
003070

1136

16:32

;SKIP IF GOOD PARAM
;RECENT POWER FAILURE
IACCOUNI FOR DRIVI

TRPFLG

;ACCESS BUS
/TRAP OCCUR??

nCRDY~SKlP5

;INSERT CONT READY

~g~~v~~~~~lCS(R25L~~RE~~ ~~Ig~I~~M¥~RpEADY

20$
"YeS - GO 00 Tf;ST
IGETSTAT,RLDA(R2S ;ELSE INSERT GET STATUS
4fiR5
ILOAD R5 WITH G~T STATUS FUNCT IDN
g,~c~§~~~j
lE5i~RC~OU~~OLLER R~ADY
14
IWAIT 4 MS

E~'~~

IF OPI SET
,NO - SKIP

~OPIERR,RlCS(R2)ITEST

~E~VEC

EnVEC

~~¥

~~~~~t,RO

PRINTF

l~~~'D~~U~TN3~~~~TIGATE FURTHER

#FMT24,#DR'VN.AV

ASSEMBLY ROUTINES
MACYll 30&(1052)
CZRLOB.PTl
25-0CT-79 13112 '

22-10'-78

16:32

PAGE 1-23

SEQ 0064

10$:

,DROP DRIVE

20$:

000000

9$:

ASSEMBLY ROUTINES
MICYll 30A(1052) 22-HOV-78 16:32 PAGE 1-24
CZRLDB.PTl
25-0CT-78 13112
BR
10$
1181 014440 000701
B$I
014442
EIDIIIIT
118
01 4442
LI0014:
o
EMf
CSIIIIT
104011
!RDMOD
8
014444
BGIMOD CLIICODE
BGNCLII
014444
SETVEC ERRVEC,~TRPHAM'#340
11~¥
MOV
340 - ,-PI SP)
, rRPh
MOV
4453 8H~U 8m~8
MOV
~RVECr( P)
MOV
~ fv~~
EMf
ADD
IIfo,sp
o°1446~ A62~U 000010
SETPR I 1/7
1 S Ef PRORITY TO 7
2
000007
MOV
~7§~21
EMf
°H~~O 000200 000000 2$:
t~RDYMSK,RLCS(R2)
,TEST IF CONTROLLER READY
U~
A3i 61
RiDRV RLCS( R2
1~~TLgRtv~N~b~B~~ADY
BIS
p;~
BIT
~DRDY~SK,RLCS R2S
irEsT IF DRIVE BUSY
197
BNE
00 00
98
;NO - SI( P
3$:
ilAITMS ~
1 99
,.IAIT 300 MS
MOV
8U~j~
oO 000003
, 3,¥~
EMT
0145 2 1 026
5$:
CLRVEC
iRELEASE VEC
0145U
1
MOV
0145
002452
37OO
EMf
C$CVE
PIIRFLG ;PiIIR f' AIL SET
1ST
003072
54O
~~~l
INO
G~8
~~RFLG
014550 00 3g~ 003072
83
7$:
CLRVEC ERRVEC
04 01 4554
MOY
o014560
4554 013700 002652
g~ng,RO
EMT
104036
EIIOCLN
1
L10015:
EMf
C$CLEAN
014562 104012
1
BGNOU
HOP
000240
ENDOU
o 1~g~
LI0016:
EMT
csou
014566 104055
ENDMOD
BGNMOD GLBSUB
TRPHAN: IIIC
TRPfLG
003070
0145
0145 4 88~aH
RTI

iUI

'Il

I S
1R

444i

8UU

n: U4

sum
8UiU mSg1
446

)

Jlllin 8lW

nuU n 8mgt 888888

gum 8~
°Ap

°r

1 31 g
1

Ugum
U

I 8~ 8P~~l
t H gum

P 1°

I1 g

°A
88il n

~fngfRO

SEQ 0065

ASSEMBLY ROUTIBES
MACYl1.30&(1052)
CZULDD.PT!
25-0CT-78 13:12

I .,
I

22-60V-78

16:32

PAGE 1-25

SEQ 0066

BGIISRV

014576

WAIT nM.ER AND STORES ALL RL 11 REGS

,STORE RL REGISTERS

I II I!!!!!!

IIIII! ,.",.

RTI

II !II!! !~~:!! ,..". """
!
IIII :I'il'ii
I
I,!. "",.
,I!ijlsl lilill
I i I II! :~: ,:
II II!nl Ilil!! :~:~ ~

EXCEEDED

111111

: II

8 II!!

1!15l}1

~I 8~;

~A~Zg~

iI i1 goil~l7l7: Ag~~6~
1 3

I ~2

016237

000000

002466

S8UH

81~8~~ 8b8~ij1

~~ir~
~i~
III! ~uni
8i~m gO~ni
01581

;GO TO CLEAN UP
1$ :

MACYll 30A(1052)
ASSEMBLY ROUTINES
CZRLDB.PT1
:lS-OCT-?8 13:12
016p7 000002
o01 5002
5010 016 37 000004
000006 002474

,DROP DRIVE

003064

88m~

000000

014774
002430

LEADRL'. READ AND STORE ALL RLll REGISTERS
K
HOV
RLCSR(R2),T.CS ;GET CS REG

22-ROY-78

16:32

PAGE 1-26

;GET BUS ADDRESS REG
RLBA~R3~'T.BA
RLDA
,T.DA
)GET DISK ADDRESS
RLMP R2 ,T.MP
;GET MULTI-PURPOSE REG
;RETURN
PC
WAIT FOR CONTROLLER TIMEOUT TO FORCE INTERRUPT ROUTINE
hnn: MOY
rp~ -(SP)
;MAKE ROOM FOR ERROR POINTER
5
• LEAR FOR POINTER
Ii~¥
iTEST IF CONTROLLER READY
BEQ
P~ READRL
~R~AD ~ELPR~OR~~~T
JSR
1ST
DO~E
;TEST IF INTERRUPT OCCURRED
I~
I~e
GO SET NO INT~~RUP~ ERR FLAG
~5~
IS:
TOSLOWf2~SP}
SE SET TO SLOW E OR OINTF.R
OPIERR, • S
;TEST IF opr SET
BIT
i~ DRRES,2(SP)
;NO - MESSAGE
SKIP
FOR NO DRIVE RESPONSE
;SET
~5~
RTS
C
;RETURN
WAnMS ~3
;WAIT 300 tiS FOR TIMEOUT
HOY
~,RO
EMT
1M
BIT
~ RDVMSK,RLCS(R2)
~TEST IF READY NOW SET
BNE
READRL
!~~iD-R~ ~kGS
JSR
MOV
!MfONHNG,2(SP} $SET MESSAGE FOR CONTROLLER HUNG
BR
;SKIP
TST
og HE
;ELSE CHECK IF INTERRUPT OCCURRED
3$:
SNE
~~
READRL
$~~~D-ReK~tG!O SET TO SLOW
JSR
5$:
MOV
~M~OINT'2(SP)
;ELSE SET NO INTERRUPT FLAG
SR
S
;GO TO RETURN

~RD~MSK'RLCSR(R~~

000002
I~~i
00200
002466
257 015064 oi 73
H~3 8i~fZ~ ~un~ 006032 000002 Hi

8 ~ d O~i~~g

!il IIIII!1

00601~

000003
000200

000000

mH~

000002

8ls 36 111111 002430
H gdH~ 8A~6H 000002
70
ogl~5150

1 g~
69

o 5156 ga~~~~

li 015160

~~ gnn~ nun
U 81~ °UU~ 8mu
83

88 U6

gt~ U 8gllr~
~2
Ot5037

!1mIi II! m
1

OO~550

00 003
002550
002550
002424

002550
002550

!
i! 3n~ ~6 881a ~~6i
802m gm~8
3t~
o
8
go
n ~g Ol2H~
54
62
5 66

088°04

000002

tsTIIIT: gr§RATIO~p~~RGTEST INITl~~l~iRR8~1~~fION FLAGS
CLRD
HOERCT
;RESET INHIBIT ERROR COUNTING
~~~
~gRECE
;RESET MORE COMPARE ERRORS

OOr2~

R~ o 5 f~

SEQ 0067

MOV
MOV
MOV
RTS

002440

~STATR: ~5~ STATU~M~~D_G~~ STATU~s~Ai~ ¥~~~l ROUTINE

HOY
OR
GSTATC: MOV
MOV
BR
GSTAT: HOV
eLR
GSTATG: MSY

~s~

MOV
SUB

MOV
MOV
MOV
MOV

iGETSfA~ID~SET'T~HP4
STATG

;SET FOR RESET
;STORE TEMP4
;SET FOR NO RESET
STORE TEMP4
SET FOR SAVE L. AND T. REGS
~~iNA~~~3
~~~R~uG~OUTIHE INDEX
~R3~+
BUMP IT FOR IIEXT ENTRV
~s
SUBSTK(Rl) 'INSERT THIS CALL
ft ~,SSINDX
,s ~STK(R3)
1DJUST IT TO CALLING LOCATIO~
STORE IT BACK
R '-1SPl
STORE RO
Rl - SP
STORE R1
#2:E RSWI
SET FOR NO ERROR RETURN

TEMP4 -PP~
8GETSh ,T MP4
T~~n;-( SP)
TEMP4

MACYll 30A(1052)
ASSEMBLY ROUTINES
25-0CT-7B 13:12
CZRLDB.PTl
000010 002550
040000 000000

~tiIY~ nun
!!lj sll,11

hil

1305

01P~0

015340

~t~hl

015360

03 737

gl~r8
I1~8~
08 a 5 ~6

b~~n

un sr !

l'
,
nun
l
III ~ iA ilUU

iI! ioJJ
111111

Ii ~ ~u~n

~ n~i

ji 88 ~m8 IIII!!
~ 41
545
546

'j'l

o01547
~l~~

gm~~
002466
002474
002474

040000
040000

002466

000003
002550

8~UH

134
1343

o ~54~
542
g 5~~0

11$:
8$:

002462
002462

00\476
01 737

000001
002430
002474

65~::

002456

8U:~:

~~ mu~ o

bUn~
J1l °r
81§m
340

51$:

010201

8mg~

883

002502

MACY11 30A(1052)
ASSEMBLY ROUTINES
CZRLDB.PTl
25-0CT-78 13112

4$:

55 2 8HBi m~i8 8m2~
IW o015600
015602 °H~H 040000 002426
001130
IUS
mm
1350 0156f hu~~ 000001 000000 13$:
001016
ar6
4
~~ g 012700 000001
p46
347

0156 2
015634

1357
1358

mg~6

104026

ml g°rgU4 ~nn~
638

01565~

012703

I~U oo dUn
0~~60~
815~~~ 84i!
lUI 01~6
r U1
1m
'l
Uldi
81
iU
0157~~
gm~~

1 60

1 6
136
1365

5660
01 5662
5662
015666

6
015704
015~06

sfm
:111 8i~~!8 ~a~~
°r8
41
o 57 ~ o01 70!
74
Bi~
~m
88m~

002466

14$:
3$:

016004

01 03
012701

002440
002550
002456
000004

gH81~

000002

015756
015760

012603

gl~m

AH1H
011554

015~F

005037
00573~

6010
o01 6012
8~~m
00~r5

BEQ
MOV
BIf
ONE
=AFMS
EMT
DEC
BNE
JSR

20$:
002424

ERRHRO
TRAP
.1I0RD
.WORD
OR
iiI nus
HOV
EMT
JSR

22$:

iitLDIIT,OPFLAG
gRVERR,T.CS

~Id~

r~lIDEI"'R3

8d~mERR1

ERR1

tiEs! ~~IPIiAIT FLAG
,¥KIP
f E T TOIF CLfAR
DR VB ERROR NOli

~lfT-Fglt&Ri~EC~~A~£T ERROR, ROY, OR HO

'¥~CN~tI~oi~U·l~~p
~M!SSAGE I"OR'URDEFINED STATE

i-r3),-t
i
~l'~B

;WAIT 100 us YOR INTERRUPT

L.,R1
MP+2 R3
SP)

ETSTAT,L.OA
T MP4,L.OA
DONE
RkOP6LLC~S
!Glshf 6L.CS
.01 RL A~R3~
L.CS~RLCS
( )
D HE
1$
T.MP,T.STAT

JtBtB ~~ ft~gs

,CRECK IF INTERRUPT OCCURRED
;NO - SKIP
;STORE MP REGISTER

PAGE 1-28

SEQ 0069

§CLEAR ALL BUT STATE
DRSET,L.DA
;TE T IF RESET WAS SPECIFIED
,0 - SKIP TO EXIT
ELDWT,OPFLAG ; EST IF RELOAD WAIT FLAG SET
~80. R1
;~~T-wi~~PCOUNT FOR 60 SECONDS
~RDY~SK'RLCS(R2S ~TEST IF DRIVE NOW READY
$
"lS-SKJP
S ALL IIAI
,RO
R
; DEC COUNT
1 S
;LOOP IF NOT 0
;GET DRIVE STATUS
PC,GSTA!
;ERROR RETURN
tMRLFAL,R3
;SET RESULT MESSAGE POINTER
0003· ERRl
IAC(STAMS~>'T.STAT

;

!l
l™

umoM

ERR1
14 8
~1 •

~ST6RO

OR
BIT

*hVERR,T.CS

~UHRD

;EXIT
11ES~
SAVE REGISTERS
,.0 II: P
,SET SUE COUIIT
;SET ADDRESS OF FIRST SAVE
1PUT REG ON STACK
;~EC coun
; ~OP OHTIL ALL SAVED
J~KipFOR GET STATUS
;IUSERT PRESET FOR STATUS
;CLEAR INTERRUPT FLAG
,SET UP TO GET STATUS
;CLEAR FOR DRIVE 4 - 7 SPEC'O

11~P4

OIT

TRAP
.1I0RO
.IIORD
BR
MOV
BR
JSR
MOV
ERRHRD
TRAP
.1I0RD
• ~ORD
CLR
1ST
ONE
MOV
MOV
MOV
DEC
BNE
SUB

SEQ 0068

AiVERR,RLCS(R2) 'i~ESTSUP ORnE ERROR SET
,V ~IT SKIP
FOR 300 KS FOR DRIVE TO SETTLE
,RO
TM
~ ,g. Ri
;SET IIAlT FOR 5 SEC
C,C§T T
,GET DRIVE STATOS
~DRDYMSK'T.CS
;TEST IF DRIYE READY
«~OSTAT T.MP
~If~E-T~g D?FCh~tgs OUT
1~'
YES - ovhss RELOAD IIAIT FLAG SETTING
'S DSTATIRCESTAT VDESTAT,T.MP ;TEST
DRIVE HAS ERROR
~3gtOA5AUSED HEADS TO

P ,GSTAT
fARYERR, T. CS
.iCSTAT,T.MP

~a~

7$:

I"""'
r "' ',""-,. "'" "'"

16:32

OIC
BIT

~h
BEQ

002466
002474

9$:
1$:
2$:

l~U
m moos OOW

1383
1384
1385
1386

12$:

006202
015026

015764
015766

o
138~

000012
015226
100000
001000
006161
040000

~5~

~~V

04443

1j68

1376
1377

015226
010246

PAC! 1-21

OR
OIT
SnTMS
MOY
EMT
DEC
BilE
MOV
n~~RD
.IIORD
.1I0RD
OR
1ST
BilE
MOV
HOV
HOV
DEC
ONE
MOY
BR
MOV
CLR
MOV
OIC
OIS
MOV
MOY
IIAiTUS
MOV
EMT
1'S1'

22-ROY-78

Op5~4

:Ul

~r
o T

002426

002550

RUTMS
MOV
EMT
MOV

ONE
OIT
ONE
OIT

000001

5588

UU 8m 81

un
~m

000001
000020
144000

16:32

BIT

000003

I U 81o ~~04 m~H mu~
8mg~
0155r
o 55 0

22-ROY-78

~~CNRST,R3

1~004·6f.ERR6
ERCO

hRg 4

14~ XERR,R3
,U

P~~IIAITIN
~+,R3
00 2'6~ERR1

Hmo
ERR1
ERRS III
TEMP4
22$

f~·~~'R3

r~)+,(R3)+

H;sSINDX

;GO TO EXIT
;WAIT FOR 1MS
;GET DRIVE STATUS
;TEST IF ANY ERROR
;NO - SKIP
;CHECK IF VOLUME CHECK RESET
;YES SKIP
;SET REASON POINTEF
;EXIT
;CHECK IF DRIVE ERROR
;NO - SKIP

;EXlT
;SET REASON POINTf.R
~~llt FOR INTERRUPT
;STORE REASON POINTER FOR RETURN

;CLEAR FOR ERROR RETURN
;TEST IF REGISTERS ~ERE SAVED
;NO - SKIP
,SET POINTER TO RESTORE
;SET REGISTER COUNT
;RESTORE REG
;DEC COUNT
;LOOP UNTIL ALL ARE RESTORED
;REMOVE ENTRY FROM SUB ROUT STAC~

MAeY11 301(1052)
ASSEMBLY ROUTINES
2S-0CT-79 13112
CZRLDB.PTl

22-1109-78

11110 Slur ill!!!
~~ ~37 8g~n8

i 1 111111 ~Il
nil sun 8n~ 9
o

002440
000000

99$:

139B

)8d
0

177177
002542
002424

002542

~8H
nl g811m
lb 111!ll mu: 8s~n8
iii 8111 l
it Ui d smn
81illi

lill

002440

021116

~in~~ gOi~l~ 88m~ 8mH

II!~J 8
II!

,iJ1S 88 d~ III~I
~40
41~ oo t~6 74

~1i
jl

016312

g~hU

nun
000001

~~SP),(5P)

~9:

Ro'-rl

lUi
000377
002532

i~~g~l:~~~~§~L

CMP
BLE
SUB
MOV
MoV
BR
TST
BPL
NEG
140'1
CLR
MOY
SUB
BPL
MoV
NEG
BR
CLR
HOV
TST
BEQ
CMP
BNE
MOV

!!iCYll 301(1052) 22-IIOV-78
ASSEMBLY ROUTINES
2S-0CT-78 13:12
CZRLOB.PTI
ADD
1444 016320 063737 002520 002530 17~:
18 :
MOY
002456
f45
MOV
4l~
06
0001
BIS
o8un~
7~5
BIC
4 9 mu~ 042~ 5 88~0~~
CLR
50 0163~6 005 25
MOV
0163 0
AS 002530
MOV
14~~ 016354 013
0~27 0 000007
ASL
2lS:
1453 016360
DEC
o0056~r0
BNE
001 5
m~
1ST
005731 002532
O1636~
456
BEQ
001402
457
BIS
TST
23$:
016400
p~s
SEQ
460
Sf404 00r0 2
BIS
25$:
BIS
o !40~
JSR
Ol~l

4lB
It

EUSWI,(SP)
PC-

002532

8g~~j~

002520
002524
000001

SP + RJ
1~~r~A
~~ ~fTEMP4

i~55. NEWCYL

EWCY(~D IF AUG

l255., EIICYL

NhcYL
~lWCYL

=~~g~l:' 0 If AUG

i~aHl::~~
U!DESSGN

~~~SGN

RSfDESDIf'
AUG

~~~CYL'#255.
1 $
jH,OESSGII

16:32

smn
gUm

gun mm ggml

llnii r!'

8~ n~ ggoSu
8 gm 88~n~ 881~l9
o 6434 OOW 5
000004
g 8 ~nJ 8hd~ 88888~

flU

1~~1

g Ul2

8164 6
16460

p7~
U64
44~56 Si
oo 64 4

1m
480

:m
1484

ull

rm
491

60~~B

88HAi
01260

0165~6
016~

01654~

o 655

nun

804443
23426
2056

002440
002466

00244~

012685

gHh3

g0573J
0~40

olg~560 g8o~a~

30$:

000012
002430
015026

5
8t~5~~
o 6~ 0 M9H 00000
81~m

104443

gl~m
o 6502
8m~8 ~om~
016514
80005

ln~
°16~42
44
4B7 o
aB

°A2700

002440
002440

32$:

002424

SEQ 0070
;RESTORE Rl

l~m:gU ~~MP4

;T£51 IF ERROR RETURN
;YES - SKIP
;AOD IN ERROR RETURN
iSET ERROR RETURN ADDRESS

gm~3

g 66 44
50
g ~ g~

PAGE 1-29

SEEK ROUTINE
iSET SPECIAL TIMING SEEK FLAG
hEEKTI ~RV
fhHMPl
XSEEK: CLR
~MP~
,CLEAR SPECIAL SEEK FOR TIMING FLAG
XSEEKl: MOV
R3 - SP~
iSTORE R3
SStN X, 3
,GET SUBROUTINE INDEX
MOV
TST
~R3~+
'B¥MP
~oR HEXT EIITRY
~s ~ SUBSTK~R3)
aSE
HJS CALL
~ ,5 fiSTK(R3
,OJUST IT 0 CALLING LOCATION
~8X
3,SSINDX
,STORE
IT
BACK
MOi
R!,- Sp
Moy
R - SP
'~TiR;OREG
RRoH HE
B
MaY
gitiu~S I
AR gIP~EaE.CE Ao~21NT (fOR SEEKING
CLR
i
PAST GUARD BAND&
PC,GETPOS
,GET PRESENT POSITI N
JSR

8g~~~17 002524
111111 0003
6 04
illl!!
8
F3! 002524
3$:
5U
o~
gi~ 9 6gg~~7 002524 002520
8 m~ 8A~~~1
6$:
016 40

In P

16:32

MOV
MOV
MOV
MOY
1ST
SEQ
ADD
RTS

65$:

1ST
SNE
HOV
MOY
MOV
WAITUS
MOV
EMT
1ST
BHE
JSR
HOV
ERRHRD
TRAP
.WORD
.WORD
CLR
BR
TST
BPL
ERRHRD
TRAP
.WORD
.WORD
CLR
SUB
MOV
MOV
MOV
MOV
1ST
SEQ
ADD
RTS

icE

~~~~¥ j~R=~=TI~OG~k~T~~LJn2~R255

iNO - SKIP
;ELSE SUBTRACT 255.
,STORE DIFFERENCE AS AUGMENT
iSET NEWCYL AS 255.
,SKIP
iTEST IF NEWCYL HAS NEGATIVE VALUE
!leSE ~fl~ IT POSITIVE
'AND ST9HZ IT AS AOGMENT
,AND SE NEUCYL TO 0
~~3=PMI~CDlF~~~~.g5R~~f NEW CYLINDER
'l[ DIFF
POSITI'f - SKIP(REV SEEK)
jE SE SiT S~GH FOp O¥YARO
MAKE D 'FE EIICE OSI VE
,sup
iSET SIGN FOR REVERSE
;STORE DIFFERENCE
,IS THERE A DIFFERENCE AUGMENT
;NO - SKIP
'CHECK IF NEW CYL IS 255.
iNa - SKIP
,ELSE FORCE SIGN FOR FORWARD
i(INNER GUARD BAllO)

PAGE 1-30

DlFAUG,DESDIF
IL.CS R5
SEEK~!R5~
LDRV
BITl6,(R )+
R5)+
DESDIF,(R5)

H~~O

RO
5HSGN
23
RBIT,(R5)
ESHD
25g
JH SEL (R5~
MBSET6~kR )+
C,RDYC

go l

~~~~1
65~

:~ ~~o. ~m~ ~~

SEQ 0071

iADD AllY AUGMENT TO DIFFERENCE
;GET L REG ADDRESS
;SET FOR SEEK
~~f~~~TI~R~Kiv~U~B~R7 SPEC"D
;CLEAR BUS ADDRESS
iLOAD DIFFERENCE
;SET TO SHIFT DIFFERENCE
;LOOP UNTIL ALIGNED
;TEST SIGN
;ELSE INSERT SIGN
iTEST IF HEAD 0
;YES - SKIP
iELSE SET HEAD BIT
iINSERT MARKER BIT
;CHECK IF DRIVE READY
;CLEAR INTERRUPT FLAG
iCHECK IF SPECIAL SEEK FLAG SET
$laXD-R~K~~~I~¥E~~T START SEEK

;SHP If' 0

-{ lRLDAtl
12t6 RO
D6NE
32$

P~~W!~~~N

10oA5·6~ERRl

TgERCO ,
1 005
ERRl
ERRSWI

¥;~s

6Sa 06. ERR6
10
H

iTEST IF INTERRUPT DONE
;YES - SKIP
;GO WAIT FOR INTERRUPT
;GET RESULT MESSAGE POINTER

iCLEAR FOR ERROR ERROR RETURN
}TEST IF ANY ERROR
;lIO -

SKIP

o ,

ERR6
ERRSWI

r~ssnlDX

,CLEAR FOR ERROR ERROR RETURN
;REMOVE ENTRY FROM SUB ROUT STAC~
;RESTORE REGISTER

~k wi R3
~~~SWI,(SP)

;YES - SKIP

SP f'R5
+,R1
SP +,RO

iRESTOR~ R3
iTEST IF ERROR RETURN
iADD IN ERROR RETURN

ASSEMBLY ROUTINES
MACYll 30A(1052)
ClRLDB.PTl
25-0CT-78 13112

glf~~~

8A~~A~

;

~OSHDS:

002424

mn!

002260
002260

8m~~

002440

000012

PAGE 1-31

POSITlON HEADS RoOTINE. POSITIONS HEADS USING 1 CYLIRDER SEEKS
TO tY INDER SPE~IFIED IN RS BY THE CALLING ROUTINE
~~tii~~~~3
;~HESH~~~UTIlIt: INDEX

:g;
~~i

=8J

MOY
~~~5$
MOV

JSR
OR
MOV
CMP

R~¥
INC

002524
7$:
8$:

g~m3

smn

OR
DEC
JSR

~8i

JSR

~g~

002466

~&&HRD

10$:
002524
14$:

k:S~P

TRAP
.IIORD
.IIORD
CLR
BR
JSR

m
BNE

;ADJUST IT TO CALLING LOCATION
;STORE IT BACK

'~~~~R~~I
, ET 0
1Il0.,R4

EMf
CSINLP
BNCOMPLET£
5$
OCC
55
J~R
PC,GETPOS

ONE

5$:

~iR~~; SUBSTK{R3)'~¥=~E~i ~R~sNfllLENTRY

t ,SU'STK(R3)
R ,SSfNDX

iUloop C$BSEG
~M~

002524

SEQ 0072

iSET ERROR RETURN ADDRESS

SUB
MOV

BCNSEG
1$ :

002522

002440
021116
002526
000012

16:32

99$1

000000

021116
002526
017454

22-HOY-78

;SET RETRY COUNT
,CHECK IF IN ERROR LOOP
;liO - SKIP

,ELSE GET POSITION

~URCYLIIIEIiCYL

I!tONSWAP

~&RCYL,OLDCYL

~URCYL,R5

72$
dllCYL
UWCYL
PC,XSEEK
'3000. Rl
PC,RDV'UT
TOCS

h~~~06fERR6

1~008
ERR6
ERRSWI
60$
PC,GETPOS

MOV
BR

,SET IIAIT COUNT 300 MS
,WAIT FOR DRIVE READY
,TEST IF ANY ERROR
)110 -

SKIP

;CLEAR FOR ERROR ERROR RETURN
;GET POSITION
;CHECK IF ARRIVED AT DESIRED PLACE
$~~SE ~~It RETRY COUNT
;GO DO MEXT SEEK

ASSEMBLY ROUTINES
MACYll 30A(1052) 22-NOY-78 16:32 PAGE 1-32
CZRLDB.PTl
25-0CT-78 13:12
,TEST IF GOING IN
15$:
1ST
1600 0170r 00513l 002532
D,SSGN
BNE
,YES - SKIP
0170 0 00101
160~
~U~CYLINEIICYL ;CHECK IF HEADS DID NOT MOVE IN
CMP
160
0170 2 023737 002526 002524
;YES - SKIP
BGT
14$
8g~166
DEC
16$:
R4
i~83
!g~cA~~t~IRC~~~k IF NOT 0
BNE
60~
OO~
,ELSE SET RESULT MESSAGE POINTER
MOV
,aDMOVF ,R3
01 103 007172
0
ERRHRD
0009'6~ERRl
TRAP
b~4443
.1I0RD
ERR1
.IIORD
7046
;CLEAR FOR ERROR ERROR RETURN
CLR
ERRSWI
002440
BR
CMP
~3~CYL,NEWCYL ;HDS SHOULD MOVE OUT, CHK TREY DID
002526 002524 17$:
BLT
14$
;YES - SKIP
IJl 017064 002750
;ELSE GO DEC AND RETRY
BR
16$
000761
~or
070
Ell SEC
10000$:
EMT
C~ESEG
,REMOVE ENTRY FROM SUS ROUT STACK
PH65S:
SUB
m~~~ 000002 002424
~SSINDX
;RESTORE REGISTERS
MOV
S
MOV
SP f,R4
+,R~
MOV
~& ~iR
1TEST IF ERROR RETURN
1ST
002440
i 0 o 7
BEQ
;YES - SKIP
99~ SIII,(SP)
ER
;ADD IN ERROR RETURN
ADD
002440
°8~716
RTS
PC
;SET ERROR RETURN ADDRESS
99$:
000000
~~SP),(SP)
~~~
i6 5
16~6
;
DRIVE READY TEST ROUTINE. CHECKS DElVE IS READY. IF NOT, WAIT
166 9B
500145 FOR READY TO SET.
~DYCHI(: MOV
R3
-~SP~
;STORE REGS
MOV
SSl" x, 3
;GET SUBROUTINE INDEX
002424
30 OfT~
1ST
~R ~+
;BUMP IT FOR NEXT ENTRY
MOV
~S
~
SUBSTK(R3)
IINSERT THIS CALL
7140 01666
00~~60
gggg~~
A
,5 6STK(RJ)
; DJUST IT TO CALLING LOCATION
SUB
00
60
1627~3
3pl~~
MOV
5,SSINDX
;STORE IT BACK
0024 ..
MOV
8i8~4~
MOV
R
~~
MOV
1638
;SET FOR NO ERROR RETURN
MOV
OOOOOa 002440
MOV
'~6ijO~~RI
f3
5~~t ~~I~EC~¥~tus
C,GST T
IS:
~iR
B T
000001 002466
~DRDYMSK,T .cs
~i~~T_Ikxy~IVE READY
o~
BNE
NAITUS
1 45 01
MOV
000001
0 2700
017 ~~
EMT
402'
DEC
mi8pllwN8~U~T
BNE
MOY
;SET RESULT MESSAGE POINTER
1648 017230 °P703 007543
iioRDY R3
MOV
C500M~, R4
;SET CONDITION MESSAGE POINTER
1649 017234 o 2104 010471

U~gl~

ogl~~d

IRm o

III! sum nUn
gum
fill o

J1l
8 roo
U II1Ili
gl3

8 I~Y2

nun

IJ~i h! U8Ao~U

U
un go H sUHi
un 81Hgl 818U6
3
8HH6
~t illll~
ai,
o~
lll~ sq h
8
l~U 8H ~ 8oB l

lilill

'-r1

U::

~1~~3

SEQ 0073

ASSEMBLY ROUTINES
MACYll 30A(1052)
CZRLDB.PTl
25-0CT-78 13:12

22-NoY-78

2$:

002466

002424

3$:

4S·

5$:

010000
002534

013372

888m 002534
000000

017456

1702
il8~

017474
017476

f~8Y

811~~S

gmg~

0 0207

88m1

:IllHJ 8h~d

01 0600

000006

002455
005633
002450
005622

062706

000014

Op550

8ii~U 81~H~
n48~9

017564
017566

8H~1~

881~m
~~8~

li~g

017632
017640
017642

lh~ Ql7 m
I) 1654
o 7656
017664

8A~p7

0050g~

01034~

8o~H3

017720

012703

BilE

BIT

tRO

ihvERR,T. CS

~gm06~ERR6

BEQ

RD
.1I0RD
.WORD
DEC
CLR
SUB
MOY
Moy
HOV
Moy
TST
BEQ
ADD
RTS
HOY
RTS

18011
ERR6
ERRcn
ERRSNI
2 L SSINDX
SI'1+,R4
SP +,Rl
SP +,RO
~k wi R3

~~~SWI,(SP)

~SSP),(SP)

'R,DUCE ERR~R COUNT FOR DUAL ERRORS
EAR FOR RROR RETURN
, MOVE ERr Y FROM SUB ROUT STACK
, STORE REGS
,TEST IF ERROR RETURN
;YES - SKIP
;ADD IN ERROR RETURN
;SET ERROR RETURN ADDRESS

I~:~~~~D

22-NoY-7B

16:32

=~~

~~SP),(SP)

$~h~~ ~fiTF~~oU¥ARE~~~N

; RETURN
)GET ABORT DESTINATION

PAGE 1-34

SEQ 0075

OLDCYL,RO
HOV
)MoVE OLD TO RO
;MoVE NEW TO OLD
HOV
NEWCYL~OLDCYL
HOV
;PUT OLD IN NEW
RO,NEIoIt:YL
;RESTORE
RO
HOV
~EI')+,RO
RTS
BAD SECTOR fILES VALID CHECK ROUTINE. CHECKS IF BAD SECTOR
;
FILES HAVE BEEN READ AND STORED. IF HOT, REPORT AND FORCE
FORCE FILES TO LOOK LIKE ALL SECTORS OK.
~KBSVD: §~I
~~FVAL
$~f~T_I~X¥~D SECTORS STORED
PRINTF jFMT9 L #BSNSTR
;REPORT
MOV
BSNSTR -(SP)
MOV
FMT9~-tsP)
MOV
2,-(~P)
MOV
P RO
EMT
CS~NTF
ADD
#6 SP
PRINTF #F~T5,#BASADD,RLBAS,#DRVNAM,<B,RLDRV+l)
CLR
-(SP)
BISB
RLORV+l,(sP~
~g~
~~~X~A~{S~S )
MOY
iBASA6D,-(Ap)
MOY
FMT5,-(SP)
MOV
5,-(~P)
MOV
P RO
EMT
Ci~NTF

~~~NTF
IF~f5P
HoV
FMT3,-(SP)

000001
002550
002424

002550

016663
162763 888m
002424
8Hm
8i8m
010146
1729 017700
1730 017702 010446
8P~H 8A~1H 88m6 002440
1m odh6
001007

m~
m~

RtW™

DRDYMSK,T.CS

003272
m~~~ 003076
5$:

7U~

Ho~
EMT
DEC

~g~

8A883f

8
.II!
ql~ 8Inn

i719

005046
153716
012746
013746
012746

8H~~~

,
003074

81~~~4 A6~~Al

OH534

RTS

3S:

002522

;SET WAIT COU.T FOR 5 SECO.DS
,GET DRIVE STATUS

RAI

2S:

80 2600
~~~~ 8g~~~~ 002522

7506
8o01 7~1t
i5~~
8H~U
017522

,Il

013700

SEQ 0074

)
~~~~~T~5AgyR~gJfaKREP~~~XM~¥~R.O UNLESS SPECIFIC HEAD IS
hOSHD: CLR
DESHD
'CLEAR TO HEAD 0
BIT
fHEADLH,MISWIII ;TEST IF HEAD SPECIFIED
~5~
A~ADW,DESHD
~~2SER¥KI~ECIFIED HEAD
RTS
PC
IS:
SWAP HEAD ROUTINE. CRANGES SELECTED HEAD TO HEAD 1
;
UNLESS HEAD 0 SPECIFICALL¥ SELECTED BY SOFT~ARE PARAMETER.
§WAPHD:
!~EADLM,MISIIIW ;Yf~T_I~A~~A2B~k'ClklfD
1ST
DESHO
,tEST IF READ ONE USE¥
BilE
2~
;YES - TAKE ABORT Ext

ASSEMBLY ROUTINES
MACYll 301(1052)
CZRLDB.PTI
25-0CT-79 13:12
1699

PAGE 1-33

ERRHRD
TRAP
• WORD
.1I0RD
MOV
JSR

tf~rMs

99$:

013372
002534

16:32

002466

hDHDe:
XRDHO:
XRDHOG:

MOV
MOV
EMT
ADD
MOV

~~X

READ
MOV
OR
CLR
MOV
MOV
1ST
MOV
SUB
MOY
MOV
MOV
MOV
MOV
1ST
BNE
HOV

1,-(sP)
P RO

CS~NTF

J4-i,SBSFIL
SP

C1,FBSFIL

;FORCE FILES TO NO ENTRIES

16:32
1$:
'2S:

PACE 1-35

SEQ 0076

MaY
MOV
DEC
BII~

~~i

MRV

=y~

BIS

3$:

CLR
CLR
MOY
MOY
MaY
=ftPUS

}IIAIT IMS rOR IITERRUPT

EMi

'i EST IIKIPIITERROPT FLAC SET
'I!ST r PRI'! READY

UQ
BIT

, 0 -

i 'litooJ ME
SACE
J iOI~IO.
AF'£R DATA XYER

ant

~RIHRO

TRAP
• liaRD
.1I0RO

4$:

MaY
~SR

'SET 1I11T COURT FOR 5 SECOROS
,CET S1 fOS

~iES! ~~I~RIYE

BKE

;k~¥PCg:DI~I~IMiF¥~RE5 SECONDS

BEQ
~kR
DEC

HAS COME READY

J~eEAR ERROR SIlITCH
'D~~P WlIi COUIIT

,alHRo
Jato
• liaRD
BR
TST
BPL
ERRHRD
TRAP

~EAleK FOR AB' ERRORS
,REPORT ALL ERRORS

HID - SKIP

:UBa&

12$:
14$:

MACYll 30A(1052)
ASSEMBLY ROUTINES
2S-0CT-78 13:12
CZ RI.OB • PTl
012603
17 0

8~8fU

II! Ii

A~Uf

:111 g g ot UU l 00 55

00~44g

t~H~
00}~8 8mg~
786 8 8 ~o 81
01
8~8

000002 002424
mH
m~ 020 !~ n~nl

liB7

178~

rm 80~8~H
r glm~

lrnu 88U unu
36

820246

063716
00n 07

ian o0~8~~~ gAd~
ld\
80~
0 60

020262

010346

2~6

i i IUd
o 831

8 ~
1818
1819
1820
1821

o
o 814g
44

0~O37~
03 4

tu 8~848~

03 6
g2g~0~

OO~10

001 06

g0444i

B1l

002524

PAGE 1-36

SEQ 0077

rm§o

-6

=8~

88~~~g

011415
l

un 8 1 ghdii!h
lRi~

88~~~

glro A83AH
mw
020354

16:32

MOV
,GET RESULTS
SP 1+,R3
ERRRRO
;REPORT
00 5'6~ERRl
;ca&D
i:~2RD
~aahI
;CLEAR FOR ERROR ERROR RETURN
60~:
TEMP4
65 :
TST
;TEST IF REGISTERS WERE SAVED
8NE
~~~T-pgf~~ER TO RESTORE REGS
MOY
L.CS,R3
MaY
,SET COUNT
4 Rl
S~)+I(R3)+
MOV
,RESTORE REGISTER
20$:
DEC
~f~~pCBa~IL
ALL ARE RESTORED
BHE
2a$
,REMOVE ENTRY FROM SUS ROUT STACK
SUB
22$:
f2~SSINDX
,RESTORE REGS
MOV
Sp rR4
MaY
MOV
SP +,R3
MOY
~& R3
1ST
;TEST IF ERROR RETURN
BEQ
;YES - SKIP
;ADO IN ERROR RETURN
ADD
~~~SWI'(SP)
RTS
,SET ERROR RETURN ADDRESS
MOV
99$:
i~SP)'(SP)
RTS
VERIFY HEADERS ROUTINE. COMPARES 40 HEADERS FOR CONTENT AND
;STORE REGS
SP
hRMDR: ~~~UENCEi3
MaY
SStH X,a3
;GET SUBROUTINE INDEX
~5i
~R~~+ SU8STK R3);~Y=~E~~ ~R~sNEI(LENTRY
SUB
K~,s&fisTK(R3~
;1DJUST ~T TO CALLING LOCATION
MOY
3,SSINDX
;STORE I BACK
MOV
RO'-iSP!

o0~0342
0346 8A~Zg~ gm~8
020352 o 5 03

8~8m

~~IIt FOR INTERRUPT

002424

~~4~ 88ggg~
0050~7
00243

22-IIOV-18

~~¥~R&Ol~~¥RTWO HEADER WORDS

002440
002440
000000

lsi 08
8~g~ro~ 8tii~~ OOOOO! gg~Ug

r T"j 881m•

BR
'lay
MOY
NOV
BR
JSR

3$:

MOY
MOY
815
CLR
MOV
HOV
CLR
MOV
MOY
BIC
MaY
ASR
DEC
BNE
eMP

~~~HRD

TRAP
• \liaRD
.WORD

D!:=
~~
R5,- SP

;SET FOR NO ERROR RETURN
12H6RCMP,OPFLAG
E RS I
;SET HEADER COMPARE FLAG
ORECE
II8UFF ,R4
jEMPO,R5

i~4!'~r5)
·C 6CYL,Rl

I,RO
RO
R ,NEWCYL
018. 6f ERRI0
Ta ERCO

~R21g

,CLEAR ~ORE ERRORS FLAG
;SET POINTER TO HEADERS
,SET POINTER TO WORK AREA
;CLEAR FOR WORD COUNTER
,MOVE HDR WORD TO WORK AREA
,PUT WORD IN RF.G 1
;CLEAR ALL BUT CYLINDER
;SET SHIFT COUNT

l8~rT

$LOOP
;CRECK IF CYLINDER PART GOOD
;YES - SKIP
;REPORT ERROR

ASSEMBLY ROUTINES
MACY11.30A(1052)
CIRLDR.PTl
2S-0CT-78 13:12
002440

lIun

22-NOV-78

4$:

16:32

PAGE 1-37

SEQ 0018

~kR
IIOV

'I~
BI3
2l~

888A8~

ERRHRD
TRAP

:181B

002440
8$:

l~~

BiT

i~~HRD
~mD

12$1

i:~RRD
CMP
TST
INC
INC

15$:

CMP
BilE
BIC
INC
DEC
BilE
SUB
MOY

002440

=¥~

~mgg
000011
000002

002424

65$:

IIOV
=8'
NOV

002440
002440

000000

99$:

TST
BEQ
ADD
RTS
NOV
RTS

002474

002414

22-IIOY-78
BIC

1$:

MOV
ASR
DEC
BNE
NOV
RTS

16:32

PAGE 1-38

II-CHSSTU,R5

lI6,Rt

P>.,Rl

SEQ 0079
,CLEAR ALL BUT HEAD SEL BIT
;SET SHIFT COUNT
,SHIFT FOR RIGHT JUSTIFY

ASSEMBLY ROUTIIIES
MACYlt. 30&(1052)
CZRLDB.PT1
25-0CT-78 13112

22-10'-18

PUll: 1-39

ii~~RD
CLR
SUB
MOY
MOY
MOY
MOY

002424

002440
002440
000000

16: 32

ID~

IC
IR
IR

FOR ~OUBLE ERROR REPORT

R FOR ERROR ERR R RETURN
ftVE
ENTRY FROM SOBROBT STACK
TORE REGISTERS

J'II;O,; ~fiROR RETURN
!IDD iNS~6&oR RETURN
,SET ERROR RETURN ADDRESS

U3
ADD

99$:

SEQ OOSO

RTS

~~X

002424

017642
4$1

002424

002440
002440
000000

65$:

99$:

002424

g88RR~

002424
000002

g8~Ug
002440

MACY1l 301(1052)
ASSEMBLY ROUTlaES
25-oCT-78 13%12
CIRLDB.PT1
004737 021116
o0~1~02
1 06
002524 002526

lili
31~
lill

1983

nun
UW~

nu!~ ~uon

104f3

inn~ll° ~nl~~3~0 nun
8Am~

r9n
~96

8111~l62 o 020

goo

rnu
208~

OO~

006
oo~
00
009
010

~815
01~
~81~

°1°346
o 3703

unu ~nHl

002440
000002
002440
002440
000000

002424

88g8g~ 88~m

002424

m
881i
ns 81U 000002 002440
02 422
b888~8 002426
mn~
821~46 i~UU 08U~8

°r

8 0046
33
o
012737

dllU d~~u gg8~U 88U~2

8g~m
8U 5Zg
~03 m~
Sg ~~~
001403
~dt 8m~16
000020 006 462
85~~g7
00 004

U~~ m~b 6!
88a9~
~~4 02W
"!
~m 8l8ln5~
oh

030

002456

835ZU

gO~U2

08 208
017130

88gm

0~2456

000000

H~g 8 !r~ 80mb 000000
~g~i 8021600
203
2035 021602 S81 l~

MOY

22-NOY-78
iSR

112, ERRS'" I

16:32

)SE1 FOR NO ERROR RETURN

PAGE 1-40

PC,GETPOS
KEIICYL,CURCYL

SEQ OOSl
IG ET POSITION

C~~
J~~~C! J~I~URRENT CYL IS REIi CYL
BEQ
ERRHRD Uoa2'6~ERRB
TRAP
TiE CD
.lIoRD
~ R~2
.!iloRD
,CLEAR FOR ERROR ERROR RETURN
CLR
ERRSIIII
1r
;REMOVE ENTRY FROM SUB ROUT STACK
6 $:
SUB
l2~SSl/IDX
MOY
;RESTORE R,
~R~wfR3
TST
;TEST IF E ROR RETURN
BEQ
$Iti~ iNS~~RoR RETURN
~&~S1H,(SP)
ADD
RTS
99$:
MOY
;SET ERROR RETURN ADDRESS
~~SP),(SP)
RTS
READ ALL HEADERS ROUTINE. 40 HEADERS ARE READ AND SToPED
;
IN IBUFY.
~DALRD: HOV
R3 -~spa
;SToRE REGISTERS
MOY
ss1.
x, 3
;GET SUBROUTINE INDEX
TST
~R3~+
·SUMP IT FOR NEXT ENTRY
MoV
1s,S fiSTK(R3
SU8ST~IR3)'iINSERT THIS CArL
SUB
,DJUST IT TO CA LING LOCATION
Moy
3,SSINDX
)STORE IT HACK
Moy
RO'-ISP!
MoV
R1,SP
MOV
,R4,- SP
;SET FOR NO ERROR RETURN
:O~
j~6: ~~ I
B~S
HDR~O,OPFLAG ~~~J ~~ARti~ g~U~lAG
POINTER TO STORE HDRS
=g~
lR~~~fi~3
IGE 8ASE ADDRESS
~~~~ti JfiRP~I~6 A~AakR~E~o INTERRUPT
A8V
Ir&Mr~~~
;INSERT DRIVE NUMBER
81S
LD~V L.CS
;CLEAR FOR DRIVE 4 - 7 SPRC"D
fBIT16,L.CS
8IC
CLR
• BA
;CLEAR 8A
CLR
~E~~D
!~~~~Rl~AHEAD 0
1ST
BEQ
3a
;YES - SKIP
BIS
DSEL(L.DA
;ELSE INSERT HEAD
HOV
3$:
l:g~'~Lg~1~21
~tgl REG
MoV
BIT
CRDtMSK, L~ (R2~
~TEST IF CONTROLLER READY
BME
P~,RDYCHK
$~f~E-C~Eek READY
i SR
6$:
MM
L7~~~~L~g(R2)
!~~~Dc~b~~ ~~~ IIAIT
MOV
7$:
JaRDYM§K'RLCS(R2~ fCHECK THAT OPERATION COMPLETED
DEC
R
Com p
8NE
7$
;SUP IF NOT YET 0

S 3

SSEi

)t8t8

ASSEMBLY ROOTINES

CZRLDB.PTI

MACY11·30A(1052)

22-IOY-78

25-0CT-78 13:12

16:32

PACE 1-41

;CLEAR FOR ERROR RETUR.

002440
002466

8S1

J~~S! ~R¥pARY ERRORS

12$:

;CLEAR FOR ERROR RETURM
;STORE HEADER WORDS

002440
MOV

1I0Y

000002

002424

65$:

002440
002440
99$:

000000

,DEC HEADER COUNT
fll~¥~~EEal~Is~~~~ SUBROUT STACK

SUB

1I0Y

NOV
NOV
NOV
TST
BEQ
ADD
RTS
NOV
RTS

;TEST IF ERROR RETURM
;YES - SKIP

,ADD 1. ERROR RETURN

;SET ERROR RETURM ADDRESS

GENERATE DATA ROUTINE. PATTERN TO BE GENERATED IS GIVER
~UHp~~RD FOLLOWING THE CALL. 12B WORDS ARE GENERATED
hTGEII: MOY
Rl'-ISPl
,STORE REGISTERS
MOil
R3,- SP
=0
;~~u ~P 1
ET PO
ER TO BUFF
MV
~R5)+"4
S~ET DA~2TpATTERR SELECTOR
A~i
plTTBL(R4),R3
!~~jUf~Dlis~O~FI~Y~'II~
MOV
(Rl) CRt)
;MOVE FIRST PUTERN 1I0RD
BEQ
5S'
•
;SKIP IF PATTERN IS 0
CMP
~R3)"-1
,CHECK IF PATTERN IS ALL 1'5
2R~
Rt"e.
$JE~T-I~K~trTERN 5
BEQ
3$
;YES
SKIP
~r¥
~4,'16.
;CHECK If PATTERN 9 OR 10
3S:
tST
l~3}+
JI8MP ~5U~CE POINTER
MOV
R3 ,(Rl)+
;MOVE TWO MORE WORDS FORM SOURCE
MOV
R3 +,(Rl)+

004066

002234

177777
000010
000020

ASSEMBLY ROUTIIiES
MACYll 301(1052)
CZRLDB.PTl
25-0CT-78 13112

22-NOV-7B

5$:

16:32

HOY
MOV
BR
MOV
BR
TST
MOV
MOY

R~~

10$:

{

DncoM:

OO~Oil
S8d
g

9$:

ROBU~F,R3

aBUFF,R3

a31.
15.,R4

~3)+,(R1)+

8NE

10$

Dge

SEQ 0083
;SET COUIIT
;RESET POINTER
;ELSE SET OBUPF AS PATTERN SOURCE
~g8M~os~bk~E POINTER
;SET MOVE COUNT
;MOVE 15 WORDS INTO BUFFER

112. ,H4

~3)+,(Rl)+

;RESTORE REGISTE~S
HOV
!SP~ .. ,R4
MOY
t SP j+,R3
MOV
R~P .,HI
RTS
; RETURN
DlTA COMPARE ROUTINE. COMPARES THE CONTENTS OF IBUFF AND onUFF,
ERROR REPORTING IS LIMITED BY SOFTWARE PARAMETER.
MOV
R3~-(SPI
;STORE R3
MOV
5S ROX,H3
;GET SUBROUTINE STACK INDEX
TST
(R ~+
;BUMP INDEX TO NEXT ENTRY
~gX
i~~s3fi~¥U~~~~R3);i~~fi~~rItH~~ ~1~~ING LOCATION
MOV
R3,SSINDX
;STORE IT BAC«
HOV
;STORE OTHER REGISTERS

=g~

7$:

Jl13 ... R4

SfaaUFF LR3

BIS
CLR
5$:

PAGE 1-42

MOV
MOV
MOV

~8~

002426

g8~3 t

000200

SEQ 0082

MOV
HOV
CMP

m
DEC

BNE
BIC
TST
BilE
MOV
PRINTS

=8~

MOY
MOV
MOY

=8:
EMT

ADD

Rl'-tsPl
~~I: ~~

anir eM ,OPFLAG ;SET DATA COMPARE FLAG
IORE~E 5

?R3F~~G4
1~R3

$~~fA~O~~¥~R~R¥gRD~~tGFOR COMPARE

;SET WORD COUNTER
1 B Rl
;SET COMPARE COUNT
R )+;CR5)+
SCOMPARE DATA
R~S
;~C~~RwijRgKgu~¥ REPORT
Rt
;DEC COMPARE COUNT
;LOOP IF NOT 0
DATACMP ,OPFLAG ;CLEAR DATA COMPARE FLAG
RRSMI
;TEST IF ANY COMPARE ERRORS
;NO - SKIP
128. R
'SET REPORT VALUE
FM!2~~ TCERR,MO~ECE,#RESE6,Rl

i5S

h ~
ftoR~c~':I~~I

ITCERR;- SP
FMT~7l- SP
~'-bSI')

CS~~T8
#14,SP

ASSEMBLY ROUTInES
MACYll 30A(1052) 22-10'-78
CZRLDB.PTl
25-0CT-78 13112
000002 002424 15$:
SUB

16:32

=8,

013404

99$1
10$:

+:Rl

U wiR3

Iiiud

I&&SVI,(SP)

'~SP ),(SP)

CMP

22~

ERHRRD

MIRECE,OCLIMV
! 14),-(R5)
~ 035. LL ERR10
IR;ioUK

!a8&g l
c~aR

002440

002436
177777

13$1

002542

~RI III

~R4 +,(R5)+
MaRECE
7$

CMP
Y:c
BR

002426
002556

og~~~~

002000
000004
003466
004066

~ACY11 30A(1052)
ASSEMBLY ROUTINES
25-0CT-78 13112
C:LRLDB.PT1

m o8!I~i~ 81m~ 88m~
tn 8 d~ I un

002534
000100

i~4 8 ~d ~gi~~1 ~m~~
oA 7i7 00254
~~
022606

001413

~mzz

~ni 8~wg 8Hn~ mH~
gnd~
8 !~~ grf~
o ~O~~ 002426

!I!!u; nun nun
!IIi

!l !

002426
002426

8$:

2$:

88m~

8HU~ 88888~

~~g

bUn~
o 6
8 ~9g gOlon
o~il
8 ~lo 104443

005670
002430
015026

2737

000001

10$:

~~U nun
JU !lIm 8ij~U
un 8~ ~u UdU
022742

o81~m
704

02 750

8 22770
22772

8g~m

002466

14$:

m~g
0000~2

0152 6
000001

16:32

MOV
MOV
1SL
DEC
BHE
TST
BEQ
BIS
BIS
MOV
1ST

~Il~

BIT
BEQ
BIC
MOV
ERRHRD
TRAP
.WORD
.WORD
CLR
BR
CLR
TST
BNE
MOV
MOY
MOV
MOV
WAlTUS
HOV
EMT
TST
BilE
JSR

~RXHRO

r271~

2~~1 ~mg o8~UU

,IRs!

22-IIDV-78

7$:

8g r~
~~~ gum 88888~
8

iTER

'Sf

4$:
5$:

~36

2201

li&~!:ptl~~!AIIWIiiloR VOROS

J§8MP IRROR ~
100 IIEXT COM~

=0:

80~456

un nun 8n~u

)SET ERROR RETURN ADDRESS
,TEST IF COMPARE ERRORS LIMI1. EXCEEDED
HilS - SKIP
,SET PTRS BACK TO ERROR WORDS
,REPORT ERIlOR

'-1 Pl

017130

8n~~0

)TEST IF ElROR RETURN

,'IES
DO -In SKI
ER OR RETURN

tVRITT: =~~TE AMi_rfEt~M~tTl ROUTfllf SPECIAL WRITE FOR TIMIIG FLAG
BR
XVR
CLR
TEMP
,CLEAR SPEC'tL WRITE FLAG
~aJ
f~~R.!~6iE~[7 j'IlTF~~ ~'t IDER 255 (BAD SEC)
¥~¥
~SHD
fJI HE1D 1 (610 SECTOR rILES)
B~~
liADlDD,OPFLAG ~1~i-Bi~I~DDRESS FLAG
B~
hEIDG
,SK P TO EXECUTE
MOV
#RDDATA TEMP7
FOR READ
MOY
R3t-(5P~
;S ORE R3
MaY
55 iDX'~3
,5 T SOBROOTIR! I.DEI
TST
jR +
,BUMP TO liEU STACK EIITR't
~9:
j!s31~¥R~i~~R3),I~~I~TT~H~~I~TL~0 CALL
MOY
,5S MDX
nTORE 11 BACK
MOV
HOV
Rl'- SP
;STORE OTHER REGISTERS
~~X
~C~R ~~ K
,CHECK IF DRIVE READY
655
'~M~~:r:31
~g~J ~82:i~g OF LOAD REGS
BBIICS
IRBLDITRY16t(R~3R )
,INSERT
DRIVE
HUMBER
,CLEAR FOR
DRIVE
4 - 7 SPEC'D
BIT
81T2, 3)+
;TEST iF WRITE DATA
!~~
!~BUFF'(R3)+
fl[§E-S~~I&A FOR READ
MOV
#~BUFF,(R3)+
;SET BA FOR WRITE
3$:

~~~I~~ 88~~~i ~=~I~~i
002534
004000
000114
002424

SEQ 0084

Ij~I:!:~X

n8f

002440
002440
000000
002436

PAGE 1-43

17$:
002466

TRAP
.WORD
.1i0RD
BR
BIT
BHE
MOV
MOV
ERRHRD
TRAP
.1i0RD
.1I0RD
MOY
JSR

RU
BHE
DEC

PAGE 1-44

SEQ 0085

h§)

JGET CURRENT CYLINDER
HLIGII IT IN DA

BiSRD
i~SMSK
~R~}
n~~ij6,?R ,.

,TEST IF HEAD 0
HES - SKIP
;SET FOR HEAD 1

CVR~lL,(R3)

EMP1
.B'77777

SIN§~~t e~i~R~Bu~fCTOR

J~nECK IF SPECIAL WRITE FOR TIMING
;NO - SKIP

3
!¥~~¥ jfTB~gRAAD~~~g tet~S~~¥
f$ADADD~6PFlAG ;NO
- snp
fACBADADD~OPFLAG

MWRTAB,R

g032·6~ERRl
ERCO

~ 032
RR1
OPFLAG
64~
DO E
T~MP1

-r

M! RLMPiRi~
: ~~ 1,RLD
:U~~ ~ ~~ J
~ JOOO.,RO
00 •
D 111U
HE
14$

8
13 o~+,R3
OO6€ERRl
rgERco
1 ole
PC~WAITIII

g~~
OYI1SK,T.CS
2aRDY,~3
CAFDT, 4

0032·6i:ERR5
miR~O

ERR~

J~~G!~h
!DRDYMSK,T.CS
0$
RI

~CLEAR ALL BUT THIS FLAG
;S T RESULT MESSAGE POINTER

;CLEAR ALL FLAGS
;CLEAR INTERRUPT FLAG
;CHECK IF SPECIAL WRITE FLAG SET
;YES - DO NOT START WRITE
;LOAD RL REGS
;WAIT 300MS FOR INTERRUPT
;CHECK IF INTERRUPT
;YES - SKIP
;WAIT FOR INTERRUPT
;GET RESULT MESSAGE

;TEST IF DRIVE READY
;YES - SKIP
;SET RESULT MESSAGE
,CONDITION AFTER DATA

XFER

;SET WAIT COUNT FOR 5 SECDS
;GET DRIVE STATUS
;TEST IF DRIVE READY NOW
;YES - SKIP
JOEC !lAIT COUNT

ASSEMBLY ROUTnES
MACYll 30A(1052)
CZRLDB.PTl
25-0CT-18 13112

22-110'-78

16: 32

PAGE 1-45

SEQ 0086

010522

ICLEAR BRROR SWITCH

,CHECK IF AIY ERROR

UO - SUP

'C~EAR ERROR SWI~CH
,n
MOVE ENTRY 'R M SOD ROUT STACK
,R STORE REGIST! S

002440
002440
000000

;TEST IF ERROR RETURI
~lf~E-Ag~ItN ERROR RETuRI
;ADJUST FOR ERROR RITUR.

99$:

BAD SECTOR CRECI ROOTINE& ¥HECKS IF SEiTOR SPECIFIED II CURCYL,
DESHD, AND DESSIC IS LISTE AS BAD IB HE BAD SECTOR fILES.
MOV
RO'-ISP
;S ORE REGIST! S
MOV
SP
~EX
Bsfi: ~P
;CLEAR FLAG
M09
IFBSFIL(R3
;SEf PO!NfER TO FACTORY FILE
CMP
-1, (R3,
)CHECK I' ALL MES
8HE
S
;110 SKI TO 'tEST
MaY
fSBSFIL(R3
;ELSE SET POliTER fO SOFTWARE FIL!
~~P
'(i1,(R3,
;~~~C~ UI~L OIlES
MO~
BEiCYL,RO
SOUILD HEADER OF ADDRESS I I QUESTION
MOV
ft7,R1
;POSITIOII CYLIIIDER

n,-

rn~n
y~~~~~

2$:

88~~~~

4$:
5$:

000001
003272

TST

75:

8$:

002442

12$:
15S:
20S:

MACY11 30A(1052)
ASSEMBLY ROUTINES
CZRLDB.PTl
25-OC1-78 13:12
228~

~28

snus 81~~8A

n~ oO~~ 62 8g10~1
32JO
32 4 88m~
~~n oo023236
0~7616
023242 o 0207

002442
000002
000000

~95

2;~

~298

,
;

~PTOP:

8m:g 001433
gA~~~~ 002424
02325~

012704

000002
007366

Illll!
m
, JI Il!l!!
8
m
81m b
Ilil 8SIU! °8B~:i
01~~46

o 31~

° A~746
60~
A6m6

°16~46

~7U

0g 0600

~qb~

o 3334
330

&6 704
~0431

8ma~

000006
002~60

008°06
00 002
002424

376

8l~~~6
81~m
¥ 600
o 11~~

~nl

0008~0

01 701
02rO O
~ 0 04 ~81
8~ 00
7

1$:

88~Ul
m8a~

SIr fUn!
hi hl~
'j T
i

jill go

3$:

460

D SHD
lAIT6 HO
6ESSE~~RO
SR3)+,KO

BR
MOV

G"¥

2~p
~5~

R~~#FBSFIL
~~P)+,R3

G'~

t~~
~1

BSFLAG

PAGE 1-46

16:32

MoV
MaY
rt'R~
~~ A~R
1ST
;CHECK IF ERROR
BNE
99$
;YES - SKIP
JELSE BOMP ERROR RETURN
ADO
n,(sp)
RTS
MaY
;SET FOR ERROR RETURN
~~SP),(SP)
R'I'S
REPORT OPERATION ROUTINE. PRINTS SUBROUTINE TRACE SEQUENCE AND
~k~g~T~~~s~~~~: PERFORMED PORTION OF ALL
MOV
~~tiiW)
;TEST SUBROUTINE INDEX 0
TST
BEQ
;SKIP IF 0
MOV
~~HN~NR~~~~o&~IW@ILENU~"
PRINTB
F~],9dSE~MES
MOV
SEQM
- SP)
MoV
FMT9§-~S )
MOV
2,-S P
P R
MOV
EMT
C~~NTB
ADD
SP
PRINTS
;PRINT CALLING LOCATION
F~T~6tSU~STK~R4)
MOV
UBS K R4 ~-( P)
MOV
MTl6v
(
)
MOV
s )
2'-b
MOV
P R
EMf
C~~~~B
ADD
ADD
i2,R4
;BUMP INDEX
CMP
4,SSINDX
;CHECK IF ALL PRINTED
BLE
3~
·LOoP IF NOT ALL PRINTED YET
PRIIITB
MT41ERHEADS#TstLAB
;PRINT ERROR HEADER
MaY
~~~iD~!(~~~
MOV
MaY
fFMTl §-( SP)
MoV
P)
MOV
EMT
Ci hTB
ADD
~ SE~KoPIRORWOP,OPFLAG
SP
BIC
~CLEAR SK & RD OR WRT FLAG
MoV
.CS R1
;GET COM AND EXECUTED
BIC
tg77141,Rl
;STRIP ALL BUT FUNCTION CoOE
CMP
,R
;TEST IF SEEK OPERATION
SHE
~
;NO - SKIP
BIS
EEKDP,OPFLAG ;ELSE SET SEEK FLAG
CliP
12,Rl
;TEST IF WRITE
BilE
2BRWOP,OPFLAG S~~T-R~K~& WRT FLAG
BIS
CMP
14,Rl
;TEST IF READ
BNE
BIS
~~5RWoP OPFhAG ~~~T-R~K~P WRT FLAG
PRINTS
FHT1§t~~PE
fOPM§GS(Rl) ;~RINT OPERATION
MOV
PMSG R ~ - SP)
MOV
ffMOPER,-( ~)

r"
I

002426

m3~~
2$:
82 t ~ 88~ ~~ 0014
0~0800 002426
20$:
0~270~
85m 020000 002426 22$:
W~

d! o~llm 8U~U mm

8IS
eMP

22-HOV-78

99$:

A~~

DIE

002534
000100
002536

SEQ 0087

ASSEMBLY RODTI_IS
NIC'I! 3'1(1052)
CZHLDB.PTl
25-0CT-78 13.12

22-IOY-18

16132

PACE 1-41

SEQ 0088

a8'
NOV
ENT

~2B

000010
000016
001777

U¥

002462
002426

~~@

4$:
5$:

6$1

mut
~888S3

002426

00n~2

~~@

Ny'
1=1

dJIlTil

a8,

8$:

AY¥

9$1

PRIIITil
NOY

8~~30~
002426

10$1

1I~1!
g~8833

BIT

C81
ENT

000050

000006
010000

BE~

NOY
NO'
NOY
EMT
ADD
BR

ni'TII
NO'
MOY
MO'
MDY
MO'

=8:
MOY
002426

ISSEMBLY ROUTInES
MACYll 301(1052)
CZRLDB.PTI
25-0CT-7S 13112

15$:

MOY
MOV
MOY
EMT
lDD
BIT

BEQ

22-nOY-78

16:32

PAGE 1-4B

SEQ 0089

PRIIITII
MO'
MO'

=8:
MOY

MO'
MOY
MOY
MOY
EMT
17$:

jgR

MOY
RT5
REPORT RElSON ROUTINE

~giNTS RE1S~HS~ORTION

MOY
MOY
MOY
MOV
PRINTB
MOY
MOV
MOY

002504
005157
010631
000003

=8¥
EMT

~'iibS

ADD
CliP
BEQ
MOY
HOY
DEC

.fMTI2,R4
R3

iR +c(S~1
RE I~L-(5P)
4 - S~l
.3;SP

010407
000003

MOY
MOV
MOY
MOV
MOV
EMT
ADD
PRINTS
MOY
MOV
MOY
MOY

88S8M

SUB

ADD

• OL5P

~u~

011056

8t2~U

FMTJ.~S-(SP)

,CS~NTB
flO SP
Rl',#MNDRST
S
f'MT11 R4

000010
010141

012146
OH746

FORSAhkEE:ROR REPORTS.
n~-lsp~
JSIORE R!
R4 - S !
'STORE R4
IRfS A&M,Rl
;GET START OF PARAM
Rl + RJ
GET HUMBER OF PARAM
FM~1=IL'MRSLT,(~I)
,PRINT NAME
Rl1 -(~Pl
MRSh -(SPI

010403
000003

n~~n 000010

3$:

~Rl)+,.MCYLOC

~~~NTB a~ltRESE3L(Rl)+

~g¥

SP~R
CS TB
lit SP

R4{tRESE4LlRll+

jR +(-(S~
RE E4L-(5 )
4'-'S~1
~3,- 5P

;REPORT 58 VALUE

cl~~ B

# ,M3

;DEC PARAM COUNT

lSSEMBLY ROUTINES
MACYl1 30A(1052)
CZRLD8.PTl
25-0CT-78 13112
~J~

0 ~ g~

IiI 8! 81111! i!i!!l
II iIl~ i!lll, "',.,
I ! .!l !111!! "',••
II!I8il~~jill 111!1!
iill!!
81 7ji ~fg~~!
t g i ~~ A2~9~~

;RETun

REPDRT PHYSICAL ADDRESS OF DEY ICE UIDER TEST
AND ALL REGISTER COUTElrs
~PTREM: PHlat8 #FMT5,.BASADD,RLSls"DRYMAM,<B,RLDRV+1>
CLR
-(SP)
BISB' RLDR'+l,(SP)
HOY
tDRYIAM -(SP)
MOV
RLBAS -tsPl
MOV
18ASi6Df-~)P)

;

=3~

~10) g2~~4~~ ~11~l4~ gg~~I2

96 80 ~44~
0 !~t~ 8°~~l~
44~6 0 746 OAOOlA

i 8~11~~ 88~~8~
0 4462

01 600

000022

2 B4

un 8Hm
2388

A~~ORT Rtit'~k
stERS
IJMT6'i~S.tM"DAIAM'#BARAMI'MP.AM"CYLYD'#HDWD

PRINTB

=8:

~ h 8~~m
23~~

2396

024524

2D~U6-!IS~
spI

MJ.AM~- S
B1N1M,DARAM,- SP

MOY
HOY
MOV
MOY
MOV
EMT

=3~

~~'tM!- ~~
7,-(§pi
P RO
l~hT~

MOY
MOY
MOY

.MP,- S
S
L.BA,L.Di,- SP

~~~

l~~ B

~~~HTB

=8~
=8~

LIL~~!:-f~
)
~~! §P)SP)

ADD
PRINTB
MOV
MOV
MOV
MOV

22-HOV-78

'2t~'ILtB1'L.cs'L'DA'L.BA'L.MP

~~6
SP
~Mt7,#LAB2,T.CS,T.DA,T.BA,T.MP,CORCYL,DESHD

ESHD -(SP)
CORCY({-(SP)
T.HP,- SP)
T.BA,- SP)

16:32

PAGF. 1-50

SEQ 0091

MOV
MOV
HOV
MOV
HOV
MOV
EMT
ADD
RTS
l
CLEAR PARAMETER BLOCK FOR REPORTING
GLRPARM:
MOV
R5 -(SP)
'STORE RS
MOV
fRESPARM,RI
;GE ADD~ESS OF BLOCK
2$:
~e~
~I'~
l!fEA&OS~~D

024506

~I!i g~nn

~~! §P'S
l~= B

3 8 ~~t~ 062706 000016

ASSEMBLY ROUTINES
MACYll 30£(1052)
CZRLDB.PT1
25-0CT-78 13:12

; RESTORE REGS

6$:

~l ~ lll~ ~ ~ i If A~
~ 8 t1~8 ~ ~~¥~

SEQ 0090

;REPBRT conDITIOM

llfl ~!}}j~ ~tl~il ~~~i!i

PAGE 1-49
0- un

000020

16:32

001413

I!I I Illi 111111 Iii!!!

22-MOY-78

m
HOV

002504

~¥I

ENDMOD

fRESPARM,Rl

~~P)+,R5

Sfti5pC32nL 0

;RESET POINTER
;RESTORE RS

lSS~M8LY ROUTI.IS
Kletll 3Ia(105!)
CIILD•• P11
2'-OCf-1. 14~S9

22-10'-18

1'132

PAG~

SEQ 0092

8gUU·
002544

JCET POSITIOR
;CHECK IF IN ERROR LOOP
lID - SUP
,CRECK IfDCU.R~IT z lEV
~LD lID REV
Jcfil.~EODi!rKAuGM!.T FOR OPPOSITE DIR

Jlfsj ,vlP

177717

Ji H1cK IFCcHlfiIITII¥02~~D
J&¥ il~K~~L, MAKE NEXT SEEK REY
JI~IT IF CURR!RT AT 0
JAI
CYtKI~ MAKE MEXT SEEK FMRD
,I D D F~ TO NEM CYL (+1 DR -1)

002544
7$:

002544

5E K

'lilY STATUS

,SET EXPECTED STATE
'CI§~~KI~ STATE COURT
~ORT STAT! ERROR

MO'

CMP

,I8HRD

JAG8
BlIII
10$:
12$1

IEXIT TEST
ISET EXPECTED STATE
~~~¥ ~tIJu~oURT FOR 5 MS

MO'
MOY
JSR
60S
CMP
BEQ

iIS STATE 51
lYES-SKIP

ASSEMBLY ROUTINES
MACYll 30A(1052) 22-NOY-78 16:32 PACE 2-1
CZRLDB.Pll
23-0CT-78 14139
*TEST 1
"*DIFFEREIICE OF 1 SEEK (PART 1)
DEC
IDEC IIUT COONT
BEQ
,SKIP IF 0
lflITUS
MOY
000001
14$:

000062
020650
000002

16$:
002440

60S:
EKDSUB
L10021:

002540
000001
017414

002540

T
U
ERRHRD

::3:8

EMT
ESCAPE
EMT
• 1I0RD
DEC
BEQ
BIT

JSR

ERDTST
LI0020:

fUSUB

CSESCAPE
LI0020- •
TEMPO
24$
_OITO,TEMPO

~~~SIiAPHD

a~$

Ti72S

EMT

C$ETST

U~~5S:

104001

,SET MAlT COUNT FOR 5 MS
iCO WAIT FOR DRIVE READY
;IHIT ERROR SWITCH

MOV
60S
MOV

JSR

BNE
23~:

IREPORT STATE ERROR

TRAP

iEXIT TEST IF ERROR
;DEC PASS COUNT
i SKIP IF O-DONE
TEST IF PASS=2
NO-SKIP
GO SWAP TO HEAD 1 OR END TEST
ABORT RETURN

SEQ

0093

ASSEMBLY ROUTINES
MACYll 30A(1052) 22-IOY-78
CZRLDB.Pll
23-0CT-78 14:39
*TKST 1
.SBTTL
BCIIYST

16:32 PAGE 2-2
**DTFFEREICE OF 1 SEU (PART 1)

*TEST 2
MOY

002434
002540

~~I
~n65$
JSR
MDY
MOY
MOY
MOV

002544

ENf

~8R

U~OOP

CSBSUB
PC,GETPOS

CSIIILP
BNCOMPLET!

EM¥

3$:
4$:
002544

!R4),(R3)

IIEG
MOY

TiMP2
lR4l,(R3l

MO~

«-1,TEMP2

;110 -

SKIP

if&,,)
E'P~L(R3)
T 1011'2
PC,XSEEK

JSR
60a

pC,GETPOS

;STORE POSITION

SUB
TST

~~~S~:1

IRS !,Ri

~~ij~Ta~~TP~~A~I~~w POINTER (FORWARD)
,CHECK I~ SIGN FORWARB
S~~¥-~~M fYEt~6EftU8 F R SEEK REVERSE
;SUBTRACT FROM OLD CfL
,CHEC~ IF RESULT IS DIFFERENCE OF 1
HES-SKIP
1ELSE REPORT ERROW

~=p

~~T

8S:

BNE
MOY
ADD
JSR

~8i

~~$
MOV

~5~
lOS:

T2.1I

;GET CURRERT POSIT 10m
;CHECK IF IU ERROR LOOP

= lEW
D ARD REW
'~k~J ¥~A~
SCHANGI 8J~F lU¥MEHl FOR OPPOSITE DIR
s~Hlc~ 'FE~3RI~R¥ fT w255
st~ MAiK~~L, ,IKE BEXT SEEK REV
,SKIP
,TEST IF ~URR!NT AT 0
Cy~K~, MAKE IEXT SEEK FWRD
S~8Ds~l~F TO NEW CYL (+1 OR -1)

7$:
9$ :

8C~
i:E

i~R

002544

SEQ 0094

SUB
CMP
BEQ
ERRHRD
TRAP

~~,onSWAP
,~55.,(R~)

fiHE~KSE{pCURRE.T

JI¥

laiITW~AA ~~2Gi FOR 15 "S

lOS
R4!,Rl

~5HRi

HERR8
TSERcuDE

ASSEMBLY ROUT[NES
MACYll 30A(1052) 22-NOV-78 16:32 PAGE 2-3
**DIFFEREHCE OF 1 SEEK (PART 2)
*T£ST 2
23-0CT-78 14:39
CZRLDB.Pll
.WORD
201
0252~8 g~gm
.WORD
ERR8
0252
025272
;[NIT ERROR SWITCH
#2,
ERRSWI
002440
000002
60
:
MOY
025~72 012737
EN SUB
g~~
Ll 023:
EMf
025300 104003
SUB
;EXIT TEST IF ERROR
ESCAPE
0~5302
EMT
004010
• WORD
Ea3~~~=
~m 00030
TEMPO
;DEC PASS COUNT
DEC
005337 002540
BEQ
30$
;EXIT IF DONE
o0~5306
5312 001410
TEST IF PASS 1 OR 3
BIT
032737 000001 002540
~BITO,TEMPO
~~~5
YES-SKIP
BNE
0$
52~ 8~H~~ 001003
JSR
PC,SWAPIID
GO SWAP TO HEAD 1 OR END TEST
017414
252B
ABORT RETURN
30$
n7
ij~~~
LOOP
BR
T187$
J~

~'U
JU 8 88

12r

¥n

~UI

un °r8n 14 °r8
25~3

104001

~O~:

T~ 65,:
nm2:

E'IT

C$ETST

SEQ 0095

ASSEM8LY ROUTIMES
M1CY11 301(ID52) 22-10'-78
CZRLDB.Pll
23-0CT-7iI 14139
"TIST 2

sunl

002434

017370
01657D

88888i

000000

T3::

MOY

BGIISOB
002524

SEQ 0096

~~I
fi97S:

nun

16132 PAGE 2-4
"*DnnUICI OF 1 11111[ (PART 2)

T1965$
JSR

S~I

U965$

PC,CHOSHD

~tPDSHDS

8$:

015226

8n~n
9$1

000012
000226
020650

!~~¥PWAIT

DUIT FOR 15 MS
,UAIT FOR fiElDY & REPORT IF lOT READY

12$:
PC,GETPOS
CURCYL

021116
002526

000002

J!it~6ERR8
~R~ DE
002440

l~§i

EN~SU8
LI0025:

JGET POSlTIDII
,CHECK IF HEADS STILL AT 0
;lf~ES~I~oRT CYLINDER ERROR

EMT
ESCAPE
EMT

1I2,ERRSIlI

,INIT ERROR SWITCH

,EXIT TEST IF ERROR

SUB
C$ESCAPE

ASSEMBLY ROUTINES
MlCYll 30l(1052) 22-1I0Y-78 16:32 PAGE 2-5
CZRLD8.Pll
23-0CT-78 14:39
"TEST 3
HOOTER GUARD BUD DETECTION
(3~
025534 000012
.WORD
LI0024-.
Sla 025536 004737 017414
JSR
PC,SIIAPHD
,GO SII1P TO HElD 1 OR END TEST
~i9 g~~g~~ 8~~;3g
~~$
T197$
lalg~TT~~~ORN
580 025546
17$·

~3t 08~2~5~5:~
(33

4 60 0 1
(104

T1965~:

fr8~~4: EMT

C$ETST

SEQ 0097

ASSEMBLY ROUTINES
M1CYll. 301(1052) 22-1109-78
CZRLDB.Pll
23-0CY-7B 14139
flUSf 3

16:32 PAGE 2-6
,
""OUTER GUARD BAllO DEUCTIOII

SEQ 0098

"TEST 4
002434
U:5GOSHD

8lUU

U~nlfiA~

2$:
BGUDB

021116

T206$1

EMT

5$
CURCYL.NEIICYL
~ .0ISIAP
C RCYL.REIICYL
IIEVCYL
PC.XSEEK
#150. Rl
PC.Rotll IT

f4.11
IGEf POSITIOn
ICHECK tF 1M ERROR LOOP
IRO - SIUP
ICHECK If POSITIOREo Af DISIRED LOC
110 - SIC P
sv P lEV AID OLD CYLIRDERS
IPL CE CURRllf lIfO IIV
IBU P FOR DIE CYLINDER SEEK
100 SEEK
ISEI 11IT TIME 15 MS
;IIA f FOR READY

PC.VERPOS

;GO VERIFY POStrOM

,ALLSEC.MISUIII

~~R

CSBSUB
PC.GETPOS

EMT

~iIIILP

nfoop

B~gOMPLE5S

002526
017454
002526
002524
016070

CMP

002524

BNE
~iR

002524

5$:
7$:

MOV
INC
J~R

~oi

JSR
60$
JSR
60$
BIT

021244
000002
021364
020262

013372

013376
000002

002524

11$:

002440

~~B~UB

PC.VERHoR

CMP
8LO
MOV

¥JklMII.REIiCYL
.2.EiRSUI

;&ft~E~O!F HILI"I! REACHED
JIVir E~ROR SUIrCH

ENT

C$ESUB

J3i
60$

ASSEMBLY ROUTINES
MACYll 301(1052) 22-NOV-78
CZRLDB.Pll
23-0CT-78 14:39
"TEST 4
2631 025756
2~J~

?3S

~~!RoALHo

16:32 PAGE 2-7
**INCREMENTAL FORWARD SEEK BEAD 0

0~5256

82~7~g

104001

llkl'

IflSf IF CHECK ALL SECfORS
;~g-if GALL HEADERS
;GO 'ERIFY HEADER

8I!Q

~SR

LI0027:

ICLEAR fO POSlfIDR HEADS fO LOLIMIf
"OnTIOIi HEADS

EMT

C$ETST

SEQ 0099

ASSEMBLY ROUTtllS
M1CYIl 301(1052) 22-IOY-78
CZRLOB.Pll
lJ-OCT-78 1413"
·TIST 4

III
6

I! I1111 l'IIIIl IIIII! .".,.

6~~

600~ 0~7n SHH4

~ is10

lsi' li!!ll !llll!
1111 IIi.! Illl!l "",.

T216$:

~ o~t~10

002524

~0~;:::4

~ST

~ESHD

MOl

Cth L¥MIII.R5
oEXIT
30-•

EMT
SR

PC,GETPOS

~~165$

italoop

5$:
7$:

~~,O.SUAP

~gi

60$

T2165$: EMT

ASSEMBLY ROUTINES
MACYll 301(1052) 22-NOY-78
C:tRLDB. Pll
23-0CT-78 14: 39
*TEST 5

268~

l~l

8~6l66

o~~t~g

5$
C RCYL,IIEIICYL

CaRCYL,.EWCYL
NEIICYL
PC,XSEEK

BIT

mm 104003

CSBSUB

MOY
DEC
iSR
60$
JSR

~~~RD~~lIT

EMT

T5.1:

IGET POSIrJOM
,CHECK IF 1M ERROR LOOP
,MO - SKIP
ICRECK IF POSITIONED AT DES LOC
~~eSE ~~l~ OLD AND NEW CYLINDERS
J~fi4PcORREHT INTO REW
,DEC FOR ONE CYLINDER REVERSE SEEK
,SEEK TO IT

~~fITN~~i k~~D~5 MS

PC,YERPOS

,VERIFY POSITION

IT!ST IF USE ALL SECTORS
'ELSE READ ALL THE RDRS
,VERIFY THE HEADERS

1 $LLSEC,OPFL1G
C,RDALHD
PC,VERHOR

~O~AMU,'EIICYL

#~,EiRSWI

I liD-SKIP

ICHEC~

IF REACHED LOLIMI!

!'~IT ~~~bR SNITCH

CSESUB

16:32 PAGE 2-9
**JNCREMENTAL REYllRSE SEEK READ 0

fr8~~~:
104001

JSEI ERROR HEADER
lIN TIILIZI!
;CLEAR
DRlYE TEST

PC,POSHDS

ii~

~S~
Jl 3 ~ IIII 111111 :~~~:; 002426
~3~
60$
67i ° 6 44 0 21 6
!~~ g !I~i f~~~~Z 013374 002524 11$: eMP
BLO
MOV
678 ° 6 56 012737 000002 002440 60~:
679 8 6 644
EN SUB
6 6
Ll 031:
p~

~~f
• 1I0RD

c~~

12~ 83il~3 8~211Z 021244

2~~6

'Pc2TrOsiEtERHEAD
Rt
..
PCLCHOSHD

EMT
~IIIILP
ellCOMPLIl~

002524

II} i~i il i i ii 3~3~~8
5

BCISUB

002526

gil

pP~',GS

BE~

1111 I

~II! ~ I~!~
fig 8UI~~

T5 ::

MOY
JSR
JSR

lill!! rU 65 $
2$:

SEQ 0100

;;II~R~NElfAL REVERSE SEEK HEAD a

*TEST 5

01402

~t!l 8 1111 11°iiilo

16:32 PAGK 2-8
**IICREMIITAL FOR_ARD SIEK RElD 0

C$ETST

SEQ 0101

ASSEMBLY ROUTIRES
MACYll 301(1052) 22-IOV-79
CZRLDB.Pll
23-0CT-78 14139
*rEST 5

16:32 PAGE 2-10
·-INCREMENTAL REVERSE SEIK HEAD 0

EMT

JSR

CSBSDB

III~OOP

PC,CETPOS

~=CO"PLEiIInp

T6.1:
;gftlciu"E'i EBiA~Ie~op
;110 - SKIP

~~~

~ RCYL,YEWeYL

MOY
JIIC

IIhcYL

CiRCYL,IEWCYL

J:O J i~:~'lTFA=Tg.IE~YL FWRD SEEK

JSR

PC,IS!EK

;00 SEEK

JSR

'~~~D~=lIT

NAIT COUIT 15 "5
;U T FOR READY
;VERIFY POSITIOI IS CORRECT

m
~u

60S

BIT

3gi
60$
CNP
BHI
MOV

ASSEMBLY ROUTIMES
MACYll 301(1052) 22-"OY-7B
CZRLDB.Pll
23-DCT-78 14:39
"TEST 6
L10033:
EMf
~~I 8~~~18 104003

~ll ~~I)f~ 104001

SEQ 0102

EMT

~ ,0IlSIIAP

PC,VERPOS
~ALLSEC,IHSIIIW

Pf,RDALHD
PC, VERHDR

JCHECK

I' AT DESIRED LOCATIOH

;~S!P
~L~PA.D REW CYLINDER
;s~ p

,SEI

;CHECK IF USE ALL SECTORS
,la-SUP
;ELSE READ ALL HEADERS
;VERIFY HEADERS

H}LIMII,IIEloiCYL
T 27S
# ,ERRSIrlI

16:32 PAGE 2-11
**INCREMENTAL FORWARD SEEK HEAD 1

CSESUB
CSETST

SEQ 0103

ASSEMBLY ROUTI.ES
MACYll 30A(1052) 22-109-78
C'l.RLOB.Pll
23-0CT-78 14139
"un 6
.SBTn

BGIUT

'f233$1

BGIISUH

.... IIIItIl GURD uilD. 0 I!TEi:TIOIl
,nST 7
'

"TEST 7

tP2T07E ERREAD
pc,tstt t
PC,GStA R

IIOV
JSR

002434

Ui
MOY
JSR

65S

f2365$

P~&~HOSHD

'~~po§ft8s

;SET ERROR HEADER
,INITIALIZE TEST
;CLEAR ORIn:

SEQ 0104

111 :

;CO CHOSE HEAD

tJall~?gRPRiI3~OR TO 255.
n.lI

Ellf

IIOY

002524

000000

PAGE 2-12
.... liICREIlElifAL FoRUIIO IIIElt READ 1

16132

~~5TI~OR

~~;

INNER GUARD BARD SEEK

7$1

9$:

11$1

PC,VERPOS
#2,ERRSIII

002440

C~ESUB

~iisCAPE

;GO YERIFY POSITION IS 255
,IMIT ERROR SIIITCH

;EXIT TEST IF ERROR

L 0034-.

PC,SYAPHD

T233$

15$:
12365$:

MACYll 301(1052) 22-1I0V-78
ASSEMBLY ROUTINES
"TEST 7
CZRLDB.Pll
23-0cr-78 14:39
EIiOrs!
2779 026612
LI00341
(3) 026612
(3)

026612

104001

Ellf

16:32 PAGE 2-13
**INNER GUARD BAND DETECTION
C$ETSr

SEQ 0105

ASSEMBLY ROUTINES
Mlevu 301(1052) 22-1I0Y-78
eZRLDB.PH
23-0CT-7S 14139
"TEST 7

T247$1

j~~

16:32 PAGE 2-14
*-INIlER GUARD BAllO DETEC'UOIi

¥2loop

~~~a~¥pOS

EMT
CiIMLP
:~gOMPLE~
CMP

3~~

MOV
DEC
i~R

MO§
~SR

J3i

6B9S
ET

3sS
60S
i~~

5$
C RCYL,NEWe'lL

~~,ONSWAP

7S
CORCYL,NEWCYL
NEWCYL
PC,XSEEK

;NAIT Fo6S~~A~OIT FOR 15 MS
,VERIFY POSITION
ITEST
ALL SECTORS
JK2AfiX lL HEADERS
,VERIFY HEADER

PC,RDhAlT

RALLSEC,MISilIW

ptRDALHD
PC,VERHDR

~3~

104003

827848 104001

T2465~: EMT
f~S~~6:
EMT

;CHECK IF AT LOLIMIT
;NO - LOOP
lIMIT ERROR SWITCH

HOV

g~~8~8
o~~o~o

,CHECK IF IN ERROR LOOP
SKIP
,CHECK IF POSITIONED AT DESIRED LOC
;NO - SKIP
'Ek¥~ SWAP OLD AND NEW CYLINDER
f~oy CUR TO NEW
~85Cs~f~CYL FOR 1 CYL REV SEEK
;110 -

PC,YERPOS

BLO

2L~~
2~~0

T8.1:

;GET CURRENT POSITIOn

#150. R1

CMP

ASSEMBLY ROUTINES
MACY11 301(1052) 22-HOY-78
CZRLDB.Pll
23-0CT-78 14:39
'"TEST 8

SEQ 0106

16:32 PAGE 2-15
**INCREMENTAL REVERSE SEEK HEAD 1
C$ESUB

C$ETST

SEQ 0101

ASSEMBLY ROUTINES

CZRLDB.PU

KACYit 301(1052)

23",OC'f-78 14139

22-10'-78

-un 9

~ III IIll! IIll I 111111 ••,.,. 1III11

16132

PACE l-16

*TEST 9

,nST 9

**SEEK TES'S

j~'llllkil,:'~B¥R

l I ! !:!~!! :~~!;:
8mu

151 ~

T257$1

013376

9$1

013316

002524

nuos

mn3

T258$!

002524

021116
002526

19.1:

;CRECK IF Ii ERROR LOOP
;liD-SUP
;CET CORRERT POSITION
JCHECI
READS AT DESIRED P051TIO.
JI~siElli~ CORREIT 'BD REN CYLIIDERS

002524
13$1

g38t~8

66
0 7270
027272

104010
000044
023737

013376

EMT
.WORD
CMP

002524

MACYl1 30A(1052) 22-1011-78
ASSEMBLY ROUTINES
23-0CT-78 14:39
"TEST 9
CZRLDB.Pll

IflSl

m08~

I'1munl I~Utinil Iuiu
85

°r~37
gz
~~

m s}UU 104001

eliscAPE
L 0040-.
HILIMW,MEWCYL

002524

15$:

12517$:

Hii~~':
LI0040:

IIEG
8R
CMP

~~$

T257~

~~~65$
BR

LOLl II,IENCYL
H~ :#255.
PC, SIfAPIlD
T256$

EMT

C$ETST

~=~
DNE

;VERIFY POSITION
;IIITIALIZE ERROR SWITCH
;EXIT TEST IF ERROR
'CHECK IF SEEK WAS TO HILIMIT

16:32 PAGE 2-17
**SEEK TESTS

8NE

013374
000377
017414

'SET TIIUT
COURT
FOR READY
)lU

3 01' ~o 0 4 37 021244
11~ g ~~; 8 1~~~ 000002 002440 ~al&OB
64 104003
LID041:
~ 8
~~~APE ~~ESUD
2
00 ~ 64
66
3
2 7

T9::

jJ~1~':lolt,g'oHf~Blli9TLoLIMIT

1 II I! IIl ! l!l l . ",. ." . ,
U~ ~ ~

SEQ 0108

**nlltK nsTS

SEQ 0109
;lID - SKIP
,ELSE SET RS TO REPEAT OIFF IN REVERSE
TEST IF LAST SEEK WAS TO LOLIMIT
~RECKGYFD~LfE'~Bl~S~IFF OSED
110 - SKIP
GO SWAP TO HEAD 1 OR ERD TEST
ABORT RETURN
REPEAT TEST HEAD 1

ASSEMBLY ROUfIRES
MACYll 301(1052) 22-10'-78 16:32 PAGE 2-18
23-0CT-78 14139"
*flS! 10
**VORWARO OSCILLAfIRG SEEK
*T!ST 10
·.FORWARDOSCILLArIWG SEEK
;TEST 10
.
".
002434

SEQ 0110

CXRLDD.Pll

lUlU

nun

mn3
mng

013312
013372

002524

2$:
5$:

T267$1

021116
002524

021116
002526

r266$1

BGIiBOI!

T1O.1I

,CHECK IF IN ERROR LOOP
,NO - SKIP
,GET POSITIOU
,CHECK IF HEAOS AT DESIRED LOC
,UO - SKIP
,SWAP OLD ADD NEW
JDO SEEK

002524

8m~~

18$:

suns

~5IIfM#AI iiXR~ 120 MS
PC,YERPDS

021244
002532

8~~~~3
013374
000002

DE~SGII

a~lcYL
,LOCfL,MUllln
t8 f IMw,IIEUCYL

013372
002524
002440

18$

#2,ERRSIII
EMT
ESCAPE
EMT

¥~~SUB
C$ESCAPE

,'ERIFY HEAD P05ITIOD
,fEST IF j2ST SEEK REV
~lfgE-S~! fo SEEK TO 0
'iHECK
LO LIMIT SPEC"D
~~~PLOU LIMIT FOR SEEK
;IIIT ERROR SWITCR

JEfSE

;EXIT TEST IF ERROR

ASSEMBLY RODTINES
MACYl1 30A(1052) 22-NO'-78 16:32 PAGE 2-19
CZRLDB.Pll
23-0CT-7B 14:39
*TEST 10
'"""FORIIARD OSCILLATIJIG SEEK
.liORD
LI0042-.
TEST IF UPPER LIMIT SPEC'D
020000
013372
BIT
!RICYL,MISIIIII
~~l~ gl~28~ gg~~~~
YES - SKIP
s
n~
Rg
BUMP RS
g
CMP
¥~&F56.
AbL_C~bICgE~~x¥o~~LIHDER
~~ R
o~ys 7 000400
3~~
PC,S~APHD
GO SWAP TO HEAD 1 OR END TEST
94
0 766 2 00 6~ 12 017414
20S:
ABORT RETURN
94
665S T266$
GO DO TESTS
12665$:
948 02 632
ENDTS!
949 02 632
LI0042:
(3) 027632
EMT
CSETST
(3) 027632 104001

~~~i

~t19 ~g~~iO~

! 94~ 82~638 0~i654
3j3

SEQ 0111

1858MBLY ROUTIIIS
CZRLDB.Pll

23-0CT-1II

MACYll 301(1052)

HUlJ

22-IOY-78

16:32

*TEST 11

B~liI~

PAGI 2-20

*TEST 11

I~Et

MOY
JSR
JSR
T2765$
JSR
MOY

T276$1
BGISDB

021116
002526

8m~3

mug

65$

!
n
Il

o 30
o 8130

104001

T11.1:

ICHECK IF IN ERROR LOOP
,110 - SKIP
;ELSE GET POSITION
,CHEC~ IF AT DESIRED CYL
INO - SKIP
J~hS§E~~AP OLD AND NEW CYL

18$!

040000 013372
8~81gl
0~r~9
~U~ 030
12 80
0
20$:
017414
~m 8i 8 AS

o 0 0

,CEt POSITIOR
,SET FOR NEXT SEEK

i '65$

ISEI MAlT FOR 120 MS
,IdA T FOR READY
,VERIFY POSITION
,CHECK IF JUST SEEK FWD
!lf~E-si~lPTO TO 255
;~~S! ~~I~ILIHIT SPEC'D
,SET TO UPPER LIMIT
IINIT ERROR SMITCH
EMT
ESCAPE
EMT

M1CY11 301(1052) 22-NOY-78
ASSEMBLY ROOTINES
·TEST 11
CZRLOB.Pll
23-0CT-78 14: 39

num or

ISII VAIT to 120 MS
,UA T FOR DRI'E READY

002524'

t~~h
L1004~:

hSl2 mm

JIIr;~~it& LIMIT

1,5$

T2765f
EIIOTS
LI004 :

T11::

;¥I~~ ?~TU~~E~5~iMIT SPEC'O
HID - SKIP
'ELSE SET UPPER LIMIT
,SEt R5 rOR FIRST SEEKS
JCHtCK I{ LO LIMIT SPEC'O

M Y
B T

ERROR'HEADER

IIMITIALIZE TEST
;CLEAR DRIVE
sGO CROSE HEAD

BIT
~E¥

5$1

SEQ 0112

SEEK
;;11'E!f~ OSCILL~Tt.G SEEK

**REURIIE OSCILLAUIG

B~¥RD
811E

R~E

CSESUB
TST
C$ESCAPE

;EXIT TEST IF ERROR

16:32 PACE 2-21
··REYERSE OSCILLATING SEEK
L~Og44-.

! 0 YL,MISIIIW
Rg$

JSR

~~~~~APHD

EMT

CSETST

U765 $ T275S

;TEST IF LOLIMIT SPEC'O
;YES - SKIP
IDfC CYLINDER COONT
;1 STI~L POSITIVE, DO SEEKS AGAIN
;GO SWl TO HEAD 1 OR END TEST

5tB3~T A~mRN

SEQ 0113

ASSEMBLY ROUTINES
MACY11 301(1052) 22-10'-18
CULOB.PH
23-0C'I'-19 14:39
*'I'I!ST 12
0

ii~nn

002434

16:32 PAGE 2-22
"SEEK nllus

SEQ 0114

*TEST 12
MOV

1ST

ailE
TST
BtU
JMP

~~~

H~5i

4$1

M II

g~
~~i

CLR

i~R

Hoi

JSR
65&

;VERIFY POSITION

~gs

002524
OO~656
00
560

BS:

88 ~~8 9$1
888883

JSR
MOll
MOll
MOV
MOll
MOV
MOV
MOV

m
JgR

'DO SEEK BUILD BUT DO MOT START
lLOAD RL REGISTERS
,STORE RO
,MAlT FOR INTERRUPT

~oi

MOV
MOV
~AFUS
EMT

17$:

1ST
BNE
JSR
MOV
ERRHRD
TRAP
.WORD
.WORD
JMP
1ST
BPL
ERRHRD

;CHECK IF ANY ERRORS
,NO - SKIP

MACYll 301(1052) 22-IIOY-78 16:32 PAGE 2-23
ASSEMBLY ROUTINES
*TEST 12
"*SEE! TIllING
CZRLDB.Pll
23-0CT-78 14:39
TRAP
104443
T~ERCODE
0304~6
.WORD
1 02
0304 0
.WORD
ERR6
2262
JMP
8~gtl~
~on
14$:
TEM~B,RLCS(R2)
000000
8~8~ ~
WAlTUS ~2000.
030442
MOV
003120
~OOO.,RO

8°b

jill
306~

3m o8~84U
0150
030 50

rr sr

030464

030476

~H6gq

SUU9
I~U 88m
mm m~~1
O~O452

mUg

EMT

GETTIM

~O4052

004737
00140

EMT

002560
021244

3074

030510

m
8EQ

002532

m~3°

005514

8U~H 88in~
I~n °i0524
000701
~gn

88m UH!~

}~n 030546
8UiU 88a~ti

r
~8~~

038550
03 552

15$:
017454

18$:

000470
000470
000006

lOS:

g83~H
6

gJg~~o

i~l~il 88mt

0610 8i4~~t
183 4 810604
q~~ m~~8
83m~ 831676
021244
f622
4
oOg47~7
16 6
063~ 012700 002566
W go m

16$:

002656

mm o°8 60}4~

~U 8 05~~

MOV
JSR

002456

J~ 8 m~ m~1~
0502
soo

MOV
MOV

05 4

830576

000177

016070

002654
002524

lsi 8~O636
064 g 81~PJ 88,~~~
o~ 137
04 gm83 002524
m 8~m2
030660
°8°~OO
0 02 002654 24$:
n8~ 030664 gOB?
022 7 o

ADO
ADC
8R
ADD
ADC
DEC

n~
BR

~HR

MOV
eLC
ROR
ROR
eLC
ROR
ROR
DEC
BNE
INC
CMP
BNE
MOV
JSR

JSR
65~
JS

65i
MO

MOV
MOV

MOV
MOV
JMP

eMP

8fii
R

liITU

CgGTIM

R ~R5

HM~8~E?
cs
PC,VE POS
DESSGN

15$

Rh~RO)

h~(R3}
~~U~T

18$

PC,DNSWAP

1~12.'~ROl
312., R3
6,R5

SEQ 0115

j£~i~RRlN~~~~g~IRFLAG

;WAIT FOR INTERRUPT
;GET TIME USED

j~~¥Tq~EE~BoR TO REPORT

;VERIFY POSITION
;CHECK WHICH SEE~ DIRECTION
,REVERSE - SKIP
;ADD TO PORMARO TOTAL
;ADO IN OVERFLOW
SI~~PTO REVERSE TOTAL
;ADD IN OVERFLOW
!g~CpSr~Ko COUNT
SELlE SWAP OLD AHD NEW CYL
;REDO SEEK LOOP
;SOB CONSTANT fOR READ HEADER TIME
;SET SHIFT COUNT TO DIVIDE BY 64
;DIVIDE BOTH TOTALS 8Y 64

n~l
~2~CNT

PASCNT

BJ7.
~NEWCYL
C,XS EK

;BDMP PASS COUNT
;nST IF PASS 1
~~eSE ~~~PTO POSITION HOS TO 127

;00 SEEK

~E~SgY,HT

~~~ITW~~A ~~2M~ FOR 300 MS

PC,VERPOS

;VERIFY POSITION
;SET FTRS FOR TIMING 1 CYL SK AT 127

rFMID6RO
OFIlIO ~Rl

8~=Ig6 ~4

128.,NbicVL
#LPASCIiT

;SET NEWCYL TO 128
100 SEEK LOOP
;TEST IF PASS 2

ASSEMBLY ROUTINES
MACYll 30A(1052) 22-10'·18
C'l.RLOB.Pll
23-0CT-78 14:39
'"un 12

SEQ 0116
lila - SUp·
lJPTIJ TIME 1 CYL

~i!

002524

'SEl
, . IMIT.

~I!
002524
002654

000004

002524
002654
002524

,VERIFY POSITION
,SET PDUTERS

~=~

,L01D JEll CYLIIDER
'¥Os¥IIJ ~igE 3
ilfsi
UP TO
, AT UTIR LIMIT

II
TIM~ 128 CYL SEEK
J:IITII '&I gRYII lR:D~OO MS

~ll!~ I

002524
002654

,YERIFY POSITION
,SET POUTERS

=01
Mr

32$1

021244

000005
002524
016070
05670
20650
021244

~J
MO'

021244

,LOAD REWCYL FOR 12A CYL SEEK

iN:

JUST n PASS 4

all
~a

)SEI WAIT COUIT FOR 300 MS
,VA T FOR READY
,JERIFY POSITIOR
,SET POIIITERS

v
=a
CNP

,SET JEWCYL TO 255 FDR 128 CYL SEEK

JSR

;

JI~¥iIlil:U£I~~TTIME 128 CYL SEEK

MOt
MOY
NOY
NOV

36$:

~¥~s~In"~A~go~

~l~

J~ESE ~IIPup TO TIME 256 CY~ SEEK

m
JSR

ASSEMBLY ROOTINES
MACYll 30A(1052) 22-IOV-78
C'l.RLDB.Pll
23-0CT-78 14:39
.onST 12

,VERIFY POSITION

PACE 2-25
*·SEEK TIIHIIG

16132

a~,
39S:
40$:

OYER ALL SORFACE

f~~ITII:~i E~~~l ~~=D~OO MS

~~~

002524

AT IICNER

)SET WAIT COURT FDR 300 MS
,IIAIT
FOR READY

MOY
MOV
MOV

211$1

SEE~

=81
a8'
JMP

C~JIITF
MOY
MOY
MOY

~2¥

ADD

PRIIIITI'

fi~~B

MOV
MOY
MOY
MOV

a8l
EMT

ADD
MOY
MOY
MOY
MOY
MOY
MOV
MOV
EMT

PRIIITI'

lFMID RO
lFMIDfiLRl
ARM R6K3

~~~.,NfC~YL

SEQ 0117
,SET POUTERS
,SET HEWCYL

U~MI!S~- SP~
IJMT~fl'!f~~MES"VALDES
S
FMTl.l(- SP
l'ii~SP I

CS~NTF
no
SP
"M~5"BASADD,RLBAS,#DRVRAM,<B,RLDRV+l>

-(SPI
RLDR'l+l,(SP)
tDRVIIAM(-(SP)
RLB1S -\SP)
BASA6D -(SP)
FMTS t - SP)
5,-(~P
P RO

CS~HU

~Mf18L#LABIN,#LABMID,.LABOUT"LABEXP

LABEX~ -lSPI
LABOUT~SP

~U~ID!( ~~

I'MT18~-(SP)
~'R~SP)

c~~dl'

~R¥NTF 1~~f~~,#LA80CF,OI'IN,OFMID,DFOOT,EXOCYL
hocYL,-(SP)

MOY
MOY
MOY

=8~
MOY

MOV
MOV
EMT
ADD
PRINTF

=8~

MOV
MOV
MOV
MOY
MOV
MOV

OI'OUT,-~SP)

OFMID,- SP)
OHN -( P~
LAB6CF, - SP)
FMT19 L - ( P)

~'iibSP)
CS~NTF
16LSP

FMT19,#LABOCR,ORIN,ORMID,ORDUT,EXDCYL
XOCYL,-(SP)
DROUT'-ISP)
DRMID,ORIN -( P~
LlB6CII,- SP)
FMT19~-( P)
~:R~S )

MACYU 301(1052) 22-IOY-78
ASSEMBLY ROOTIIES
CZRLDB.Pll
23-0CT-78 14139
'"TEST 12
3

IIII iiiiii !!!!!!
i
'II ! ! ~
i)I
I)I liI'l
~

fB3

j
(

"..

JP)

=01
EM

4 SP

all!:!!!"'··,·,··,······,·'"
I¥I !-i )
rl~!i II'

=~v
I

=
M,
M,
II

IfF

aII

II
Ell

Idl,II 1:;111''''''''''''''''
i'hi ~)
4,-

P~R

J8 IITF Illilf!!~JI'CR'ARIIID'ExAC'L

I!g 119ft 0!!!12

676

SEQ 0118

=11!'il!!~""""""";"""
JI¥fict=~V
'-13~)( )
I~=
,
~BJllfF

81!jP

I II IU

IJERTJ

a~1

111111

t 8

PAGE 2-26

"SEEK TIMIIG

PRIllfF

16132

lllhli

104001

ag,
MgV,
M
NOY
MOY

1~~~li~~('p~)

EIIT

CUTST

n~~u

ASSEIIBLY ROUTIIIES
IIACVII 301(1052) 22-IIOV-78 16:32 PAGE 2-21
CZRLDB.Pll
23-0CT-78 14139
*rEsr 13
*·BASIC READ DATA (BAD SECTOR FILE)
.SBTTL *TEST 13
**BASIC READ DATA (BAD SECTOR FILE)
BGIITST
iTEST 13
TU::
II0Y
JSR

~~Rt
liD
BI
BEQ
TST

BIlE

002524

2$:

.1I0RD
II0Y
JSR

a~i

JSR
65i

~~i
MOY

4$:

MOV
MOYB
CLRB
CLR
MOV
1I0V

U8~

002440

~SR

7$:
8$:
002546
10$:
11$1
12$:

'~J
Bill
TSf

BHE
CliP
8NE
II0Y
BR
'1ST

=G~
MOV
ASL

)POSITION HEADS AT 255

;00 SEEK

fafITII'~~ ~~¥I~R&~¥ 300 liS
;VERIFY POSITION
;SET FOR SECTOR 0
;SET TEIIP STORAGE FOR FACTORY BS FILE
;~~J P~l S~CIUR iO~33NT HG
fCLEAR Lo~lL ERROR CoDHJER
'CLEAR ONES DETECTED FLAG
,INIT POINTERS
,INIT ERROR SIlITCH

;00 READ

;TE~T I~DII~~¥ ~RR8~ NEG
~Ifst lEST lIoRD 1 NOT NEG
,VES - BAD FMT ERROR REPORT
,TEST WORD 2 IS 0
SKIP TO 'liT ERROR RPT
'N ES ! ~~,~ ~OI~M¥ ERROR RPT
fTRsT IF NExt VoRD IS ALL l"S
,NO - SICIP
,ELSE SET l"S DETECTED FLAG
f'll~ IF ORES HAVE BEEN DETECTED
'I'SRE ~~lrH~RRFC6 RROR RPT
IILIGH IT TO LOOK ~IKE HEADER

,,0 -

DE~

BEQ

,TEST IF HEAD 1
;110 - SKIP

SEQ 0119

ASSEMBLY ROUTINES
MlCYU 30£(1052) 22-IIOY-18 16:32 PAGE 2-28
"*BASIC READ DATA (BAD SECTOR FILE)
"fEST 13
23-0CT-78 14:39
CZRLDB.Pll
BIS
WISERTHEAD ¥IT
BIC
LE~R ALL-BU
SECTOR
15$:
fYH~6~Rlh)
R3 +_
).
BIS
;InSECKRT IFSE~TOR
BUFF NUMpEi
EM T
CliP
004066
+256.
~ 8~
;NO GET MEXT CYLINOE
SNE
T MP3
1ST
002546
;¥~S~A~iSiR~~R§'~ 2~~5~tEO
,CHECK F SOFTWARE BAD READ
~~~
000044 002554
)yES - SKIP
;ELSE
CHAIGE POINTERS
~~~
00 016 80~552 37$:
USFIL~ TEMP5
45
MOV
r.,TE
P6
g~t
~~~T8~ci3~B~gH~~~RT
C.,OESSEC
MOV
~u
SR
JGO READ
IIIC
L CERR
, UHP LOCAL iRHOR £OUNT¥R
MOV
#-1,@TERP5
m~~9 150216
j~R~CK I~'iH
t~o~ ORAGE
INLOOP
EMt
C$IIILP
,YES - GO DO READ
REgMPLET~
4$
3
,CHECK IF ALL SECTORS READ
002536 002554 41$1
~u~
D SSEC,TEMP6
MOV
~FIR3

mm
l~~n 8~~l!~
8iH 8~!~it
j'

'jll! 'I'l'

III II l81 ! II!l

g~ la 8~~l~~ 8
~~ g~ 1~ g~~ ~ gg

I Ii II II ! \ll

19H

81,hfib~

r' ' '

~ n~
I I 'i """

I I jl Illl!l
I I I ,I Illll!
II ~32!i ~O}
1

88iUl

002552

000004
005533

002536

~i 83 12 bgl24~
I ,i~ ,1g I"ii !I2~~i!, 005560

'I 8 8 I!""

IIII I, III

~,! !

nun

002662

C=~RD

BEQ
BR
ADD
BR
HOV
ERRHRD
TRAP
.WORD
.1I0RD
DR

43$:
45$:

ogj440
o 014

661 RR1
RRl
S8 FIL,TEHP5

tl~OESSEC
t3020
FRTER R3
MhRl

lmc
l"f
f
I ri:66~aRl

48$:

~~RD

.IIORD
.IIORD
BR
MOV
MOY
T5TB

65$:

¥*8

66fU,:
fr
EMT

liRo'

ii8~;Rf82kl IfiI8AG~o&~~I~ER

n~HRD
!~a&D

003076

:~liT_Ikxi~FTNARE FILES CHECKED

~5&~~ ~g ij~f~Ks~g~6~ARE FILES

!g~TD~E~ijt¥ MESSAGE POINTER

RRl
M 8S,R

40$

r,ERRSill
~~mVl\L
EUCIIT

;GO CHECK FOR LOOP
;SET RESULT MESS ACE PTR

1GO CHECK FOR LOOP

$~~ITBi~R~~c~~~T~rLES VALID FLAG

si~S! ~~I~OCAL ERRORS
;ELSE BUMP ERROR COUNT

CSETST

HACYll 30A(1052) 22-IIOY-78 16:32 PAGE 2-29
ASSEMBLY ROUTINES
-"WRITE/READ DATA (PART 1)
"'fEST 14
23-0C'l'-78 14139
CZRLOB.Pll
1)
""WRITE/READ DATA
.SOUL "TEST 14
3~77
BGMTST
HEST 14
83~410
T14: I
,SEt ERROR HEADER
MOV
002434
~P2T14E~ERHEAD
JSR
$~21~~fE~z~FT~~¥
SECTOR
FILES VALID
pg~~mN¥
JSR
PC,GSTATR
;CLEAR ORlVE
JSR
3~265S
;GO CHOSE HEAD
E~§~~gSHD
;
SECTOR 0
CLR
85 8~ 440
HEllen
J
CYLINDER 0
CLR
86
444
,CLEAR PATTERN SELECT
CLI1
03 45~
03 5~1
;POSITION
~~;~hEK
HEADS
1306$: JSR
0160 0
88
S
87
03r
~~36SS
;SET WAIT COUNT FOR 300 liS
005670
8~
~~~ggY,nT
}WAIT fOR READY
020650
~~g65$
8~~m
pc, VERPOS
,VERIFY POSITION
JSR
021244
65 $ 1310$
;CLEAR PATTERN SELECTOR
032514
nm~
g~ 5 6

(PART

nnn
iillr njn
IIi ill!ll Ihlll
2
1Sg m ~Ubi

iii hlill sh U
g~tl~2

g~ ~o~

ela

10400~

io 8g3~~o 021726
ii!33 oBs
o
022354
m~ ~ gg~ lZ 022414
032524

EIIT

~~~gnGEN

iJ3~

PC,XliIRITE
PC,XREAD
PC,DATCOM
#2,ERRSIifI

JSR
.WORO
SR

T310$ :

°3473~
B8~
03~5~O
3g~
022066
3304 03 5 2 80m
60a
03~54~
536
140
540 01 13
000002 002440
J070506 oo°H 546
~2B~UB
LI00S1:

''Ill r'
3iU

o~
o ~46
50

03 550

E"IT

104003

ESCAPE
EMT
.WORD
eMP

~O4010

000010 032514
3~n g~ m o~m~
001403
O~r62
032514
o
7
83~7g g8W
10$:
Og4 ~~ 011414
80~9 2 SmH
11S:
og~6ll
03 61~ 00 7 0

Iii Ill!!!~~6
hU 8
01

6 2

:rn gHm

ggij1~1

002524

¥~~SUB

CiESCAPE
L 0050-.
B.,T310$

dh~
PC,s APRO

JSR

mg~CHK

ttR65S

13$:

JSR

BEQ
INC

5~4

IIlC

T306~

NEIIIC L

11$

T306Sf
104001

r:m~

: EMT

SEQ 0120

CSETST

T14.1:

;GENERATE DATA
;PATTERN SELECT WORD
iDO liIRITE DATA
;00 READ DATA
;COMPAR E DATA

;INIT ERROR SWITCH
;EXIT TEST If ERROR
WAS DATA PAT BUSED?
YES - SKIP
ELSE BUMP TO NEXT PATTERN
DO TEST WITH NEW PATTERN
GO SWAP TO HEAD 1 OR END TEST
ABORT RETURN
SET PATTERN SELECT TO 0
CHECK IF SECTOR BAD
~5SR~f6H~N_-D5KJ~5tOThi~ SECTOR
BUMP TO NEXT CYLINDER
CHECK IF THIS ONE BAD

SEQ 0121

lSSEMBLY ROUTIHES
MACYI! lOA(1052} 22-ROV-78
CZRLDB.Pll
23-0CT-18 14:39
,oTEST 15
.. ~BfTSI.
HuIiT t

16:32 PAGE 2-30
**SPUDLE 'l'IMUG TEST

wTEST 15

SEQ 0122

"*SPiliDLS TIMJ.NG TEST
,TEST 15
' .

'lEI
ERROR HEADER
EST II' PASS 0

002434.

1151:

, 0 -

JII§'- £UPM,IUAL TESTS WERE RUR
)8th sdJ TEST

2$:
1$:
021726

nun

002524

5$:

,TEST IF IRTERRUPT
;YES -

SKIP

;ELSE WAIT FOR TIMEOUT
;GET MESSAGE POlITER

6$:

;SET POIRTER TO PL LOAD REGS

'Is:

MACYll 30A(1052} 22-110'1-18 16: 32 PAGE 2-31
ASSEMBLY ROUTINES
""SPINDLE TIMING TEST
23-0CT-78 14:39
"TEST 15
CZRLOB .Pll
CLR
DOllE
3370 033060 005037 002430
;CLEAR IHTERRU~T IN~~CA~OR
;LOAD RL REGIS ERS
R NO WRITE
MOY
3371 033064 011562
(R5~ RLHP1R2~
MOV
6
MOV
~m
gU~~~
R5
,RLCS
R2
MOV
01456
83rOO
;WAIT FOR INTERRUPT
wAlrus ~ 00 •
~ 104
OOO.,RO
MOV
005670
EMT
GETTIM R~IIITU
;GET TIME IIIAITED
EMT
~&~PM
og~~H 002430
;TEST IN INTERRUPT OCCURRED
TST
mr~
;YES - SKIP
BilE
337~
OO!qr 015026
;GO IIIAIT FOR INTERRUPT
JSR
;GET MESSAGE POINTER
MOV
8~26
iREPORT
ERRHRD 15030 66ERR1
TRAP
I§5~C E
g0444i
.lIORD
.WORD
ERR1
8R
,TEST IN ANY ERROR
7$:
TST
~?~s
002466
1880 4
~~~P[jR,KHRORS
~&~HRD ~~04'66ERR6
TRAP
~
1~6 ~04~~~
U~~C E
.1I0RD
.WORD
ERR6
o
6
BR
iADD IN TIME OSED
8$:
ADD
~8~R3
o 3 564
ADC
R4
!g~gB~ao~REg3~¥~~N
R1
DEC
~9 8g~jgt
; LOOP UNTI L 0
BNE
o
MOV
ig,R1
80~~60 000006
!~tIARIgIg~yC~g~TDIVIDE
CLC
10$:
R4
;DIVIDE SUM BY 100(S}
ROR
ROR
83i~r
88~ig
~l
;DEC DIVIDE COUNT
DEC
0~1 02 o001
5 701
BNE
03
lOS
,LOOP UNTIL DONE
PRIIITF IFMT1.1,#SRTMES, VALDES
MOV
VALDP'-fSP~
33§7
SRTM
s,- SP
MOV
888~i~
HOV
FMTl.1 S- SP
MOV
o 746
SP
3'-b
HOV
P R
EMT
n48~9
CtNTF
0621 6 000010
ADO
a SP
PRINT!'
FMfs,#BASADD,RLBAS,#DRVNAM,<B,RLDRV+l>
CLR
005046
-(SP~
BIS8
153716
002455
RLDR
+l (SP~
11 °11236
~~RVNAMf-~S
)
81~m °8~m
=8~
BAS - S ~
HOY
Ob 46 80562~
rASA6DC(
P)
MOV
FMT5
§SP)
HOV
o 005
m~~~ 8l~7U 0~g65
5'-~
P
R P)
Cih F
~4 03
8~h~82 062706 000014
ADO
• 4 SP
FMf26., IIRESE3, RJ, #RESE4, j/MAPROX, EX ROT
PRINTF
9
033276

8um

fHZgq
hdH
:Uf
3m
3
nj~ Uhj~

=! as l!UGll{R }

88818
OOOOO~

~~~W!!UH

IIII '~~I811gITlIs~~ gU~~q
3M oBo
opr
mm
III!
m
Ilg 8nm
d
d~~

ob 41

8n~~~

IIIi 01'8312~"~o
! mlu

rill

gli~U SMa!

Y64m

SEQ 0123

MICYll 301(1052) 22-IOY-78
ASSEMBLY ROUTIIIS
"TEST 15
CZRLDS.PH
23-oCT-n 14139

!I
ili!r
III
II II !.lUl

3U II U 104001

lInn

=8:
MOY

8u~n
SSgg~~

16132 PAGE 2-32
"*SPIIDL! TIMIIG TEST

002440

608:

f!0~~~1

SEQ 0124

IU~i6i!~tl~)

1£S!i~-( P

MOY
MOY
MOY
MOY
MOY
EMT
ADD
MOY

n;~Um

EMT

C$ETST

I~~: ~~mJ
,INITIALIZE ERROR SMITCH

lSSEMBLY ROUT II'S
MlC'l1 301(1052) 22-10'-78 16132 PAGE 2-33
C%RLDB.Pll
lJ-OCT-71 14139
*UST 16
··MRITE/RUD DAtA (PART 2)
**IRIt'E/READ DATA (PART 2)
.5ITTL ·TEST 16
IIGIIYSt'
,nst' Hi
Tl6: :
IP2T16§ ~RHEAD '~~T I!ROR HEADER
~O!
~8:~~'fa¥
Jf.I~ lEfz~FTR~¥ SECTOR FILES VALID
JSR
PC,GSTATR
JCtEA DRIVE

H~65$

MOY
TST
BIE
1$:

BU
MOY

NOV
MOV
liD'
DEC
BHE
MOVB
MOYD
Mon
T3100$: INC
BIT
2$:

¥n

3$ :

8$:

BilE
ADD
CMP
BHIS
MOVB
BIC

3=~
CMP
BEQ
MOV
CMP
BLO
CMP
BHI
MOV
MOVS
MOYB
MOYB

=m
Mon
MOY
JSR

p~fcn

IAShM
HLLCYL,MISIIIII
'-8.,RS
3 L,Rl
!ILiMlI'(Rl)+

!U n
~

f~kiA~5PASS TO 0
,TEST IF FIRST PASS (QUICK VERIFY)
,MO - SKIP
,TEST IF USE ALL CYLIRDERS
~If~E-S~~I&5 TO NEG B

~f~~~S~oB~TIIOPK TABLE
'8LUR LOCATIONS TO LO .LIMIT

JL~8pC33~h 0

H LIMW,TI3TBL+4 'INSERT HILIMIT
HILIHW,T lTBL+6 $INTO APPROPRIATE LOCATIONS
HILtMw,r 3TBL+I0
RS
;BUMP R5
~ALLCYL,MISMIW
;TEST IF USE ALL CYLINDERS
pisMUM
~¥~~T-I~KJ~RST PASS (QUICK VERIFY)
3~
'~e
SKIP
15~~~1.
STE~~ ¥~M~A~¥L~~~E~ POINTER BY 1
4$
;YES - GO TO EXIT
CYLTBL(RS),R3
,"GET NEXT TABLE ENTRY
1117400, Rl
L R UP
YTE
8~
~~Kf~ IF
I~S~~;RS
$~~~t I~SILL CYLINDERS USED
~s
HES - EXIT TEST
RR5~'{RL30LIM~
;USE R5 IFAS LOWER
NEXT CYLINDER
,CHECK
THAN LOLIMIT
T OOf '
;YES - SI<IP
R3 HI INW
;CHECK IF HIGHER THAN HILIMIT
T3~OO~
;YES - SKIP

Crl¥ 8

a:iI'~lT!R~!IR4
~
~

;~ri~E~¥D~ES~NO~p~~a~RI:¥~ETABLE
LOCATIONS FOR TEST SEEK SEQUENCE

i ~l hd

S~60~~O~~B~~A~DDRESS

P ~CHOSHD

T16.1:

SEQ 0125

ASSEMBLY ROUTINES
MACYll 301(1052) 22-IOY-78
CZRLDB.Pll
23-0CI-78 14139
*fEST 16
EMT
BIC
1ST

SEQ 0126

~~p

RfW
MOV

eLR
SIS
MOY
MOV

CLR

~2~B
60~

~2R

~liB

"'Iai

J R

nn~~6~3~$
o ,OATG II

'"8 -

Y2~

tBITO,VRTSUI
29$
PC,XURITE
OESSEC

P~!XREAD

~~esi ~~ICEAD

PC,DATCOM
OESSEC
40 .,DESSEC

,COMPARE DATA
;BUMP SECTOR
;TEST IF ALL SECTORS USED
,NO - LOOP

,TEST IF VRITE THIS PASS
SKIP
,0 WRITE
,INC SECTOR
4~"DESSEC
;TEST IF ALL SECTORS USED
6'OUTSlourINs,0~:fAG ~~l~AR QUALIFIERS
ITO VRTSilI
,CLEAR WRITE REQUIRED SUITCH
OLV~T,OPFLIG ,SET FOLLONING WRITE QUALIFIER
ESSEC
;CLEAR TO SECTOR 0
l3fTl,WRTSWI
;¥~I~ IF READ THIS PASS

m
¥2E

f6$

CMP

BilE

ASSEMBLY ROUTINES
MACYII 30£(1052) 22-NOV-78
CZRLDB .P11
2\l-OCT-78 14: 39
*TEST 16
CLR
3~1~ g~ll~~ ggO~8~1 ggO;~~~
33$:
CLR
INC
3515 034t66 0 5237 0 654
8IC
CMP
BEQ
CMP
BE,
MO
eM
BEQ
3523 034234 001415
CMP
BEQ
li~i 8~i~!i 8~3~iI 002654 000005
8R
35~7 034250 052737 002000 002426 37$:
BIS
BR
SIS
000020 002426 39$:
DR
BIS
JMP
0 ;17162gg
MOV

16:32

~ii~ gii~g~ glli~~ 88 l~~ 8g~a~~

II~~ ~j}~~~ ~~Il~l ;;;;;; ~;~;;;
lij~ gl~i~i~ gi~li~

~I~i 0

4 l~

104003
A04010

~~~7 ~Iil~~ 012737
8~l!!1 002340
g8~gg~ 002446
88~aaf

~5~8 03433~
~540

034342

00041~

543
544

034354
O~4~56

~33410

034370

3~~~

~~g

3547

gm~~

m~h

m~u

83~m

o~~1~7
7

gg1!~~

8~~m

104001

45$:

002446

~~fITII'~i ~R~~~ FOR 300 MS

BIT

'~~28YdiT

~o~

BEQ
JSR

! 8 1H

;GET IEXT TABLE EHTRY
,DO SUI

PC,YERPOS
PC,BSCHK

CMP
811E
BIC
BIC
8IS
CLR
8R

3 ~

(R4)+ ,.lIEIiCYL

.1I0RD
BIT
BEQ
JSR

8 8?~+J~ 8~~Z~~ ~:~:~: E!~~g~:
l3~~
~I 4

PC,lIhEK

PAGE 2-35

DATA (PART 2)
,CLEAR DESIRED SECTOR
,CLEAR ~RITE/READ SNITCH
;BUMP PASS COUll'!'
~MQUALScOPFLAG
;CLEAR ALL QUALIFIERS
6a~CNT'N3
J~~~T_I~K~~SS 3
PASCNT,#6
;TEST IF PASS 6
60~
;Y§S - SKIP
'~s~Af~irSWI
J~~§TR~#Dp~~~UIRED BIT
40S
HES - SKI P
PASCNT,~5
;TEST IF PASS 4
40$
;YES - SKIP
39$
,SilIP
#FWDSKO,OPFLAG ;SET FWD QUALIFIER
36S
;GO DO NEXT PASS
#IRoUTS,OPFLAG ;SET QUALIFIER
36S
,SKIP
OOTINS,OPFLAG ;SET MESSAGE QUALIFIER
5$
; GO DO NEXT PASS
2,ERRSWI
;INIT ERROR SWITCH
**~RITE/READ

DESSEC
VRTSVI
PASCNT

EMT
ESCAPE
EMT
.WORD
MOV
CMP
BNE
MOV
BR
CLR
JSR
73100$
MOV

;EXIT TEST If ERROR

~m5S: JMP

ENDTST
Li0053: EMT

C$ETST

SEQ 0127

22-101-18 16132• •••'ACI
2-36
ITI LOCI 1.IOft AnD DATA PROTECTIDn

'SSEMBLI RDOTIII$
MACll1 3IA(1052)
C:ZILIIlI.l'l1
23-DCT-71 14139
-Tll:1T 17

dlU~

Jill

III nnn

003062

, sUiU

¥II

013312
035362

m 3=~

BGIIlSUB
EMT
MOV
JSR
J8 R

002434

15a~ 0 4

IIIUI

I1I1

III!

~8R

022066

002474

022354
022414

~II II~Id I~

~alIlfF

88883&

000062
015176
020000

S11111

nnT-T~'IP

~ 265$

,SET ERROR READER
~~~119f.ERHEAD
,'~MITIAhIIE
LEA
WE TEST
C~ S;A i

5$:

002414

CL
BA.,SB
M
IIOV
MOV
MOV
MOV
MOV
MOV
MOY
EMT
ADD
MOV
WUTMS
MOY
EMT
JSR
60~

T17.11

II~ltl~i~I~le~18ER 0

021244

I
11
I!I

I'HsT ~JI&un MARUAL INTERVENTIon

~ R

SUUS

SEQ 0128

PROTECTIDIII

TEST IF FrUT PASS .T1711

~ASIIUM

~ I II!II~EK
I n~18t'~lr

InlU
020000
021726

;;rnTf7"OCKEIIfI~ftUD DATA

"'TEST 11

pC,VlIII'D.
,"LlUT,Tolip
RtoUGIIiI
PC,XIIRIU
PC,KREAD
PC,DATCOM

JlfITII'AI '~:D'OO MS
POSITION

IYIRIFY

ITI~T_Ii 'PIT! LOCK SET

UA"UDAh
I Dm

,VRIT!!
,READ DATA
,CHECK DATA

!F=!~Pl'#OPR004'iOPRlA'iBASADDIRLBAS'#DRV.AII'<B'RLDR'+1>

l'irUf!i~~)

,REQUEST SET IIR

Iii 16;;'S-!!I"
8~nh;! S~~

FMTDP1

7'-~SP
P R

IcrN

~:n

5Sf~RO

ptGSTATR
;!IIILSTAT,T.MP

;SET WAIT COUNT FOR 30 SECO.DS
,CALL VAIT
;GET STATUS
,CHECK IF WRITE LOCK SET

SEQ 0129

,RPT BYPASSED

,GENERATE DATA
~~~;TfgRR~SS OF L REGS
;LOAD IIRITE COMMAND
'~~SERT DRIVE HUMBER
SLO~aRBbRRAgG'~~s4 - 7 SPEC'D
;CYL OL HD 0, SECTOR 0
;128 VuRDS
;SET IIAIT COUNT FOR 30 MS
,CLEAR INTERRUPT FLAG
;LOAD RL REGS

;GET STATUS

ASSEMBLY ROUTI.IS
MACYll 30£(1052) 22-109-78
·US'!' 17
CZRLDB.Pll
23-DCT-78 14139

~¥'
BilE
IHIHRD
RAP

~~~g g~s8~~ 8J~~i~ 040000 002466
007665
002000
007144

002474

~ ~I II! ynUS mn!

IIII IIl !l
6

I
8
5

II ! I
I

Ill!ll

036000

16:32 PAGE 2-38
**WRITE LOCK ERROR AND DATA PROTECTIOI

15$1

18$:

ir:S
¥llpRD
ll3R
o.1I0R
BIC

KI¥

811E

BIT

002466
16$:

002440

~oa:

000002

002440

13204$1

i
j
111111111111
1.11 !II II
II!II/ 8881!1
!~J g~~j~~ ~A~6yg 000001

I NEiIIS! FOR NCE MDT SET

J~tElR DRIYE ERROR BIT
, ItRI~Gf.'I~TRER ERRORS
'¥ES - CD RIPORT
j EST
E RORS IN CS REG
,=~pjjR' GRORS

All

i~!CSTUR
RR6

!~I~Tsi~'3s AND RESET ERROR

R5,DATGEI!
PC,XREAD
PC,DATCOM
'2,ERRSIII

)GO ¥EIERfTE DATA
mIDEft:TA
)COMPARE DAU
)IUIT ERROR SUITCR

J8 R

~si

~~i
NO
EMf

~glIlTF

CL
8ISB
MOV
MOY
MOV
MOll
NOV
HOV

~8:

16$:

ITlfT IF WCE SET

60~

1111"

rgn t!f~M~P

DRiEIR T.CS

n'· ABY ERROR SET

r'IOOO,ToCS
7 3. 66 ERR6
H5~C E

7
JSR

LJ08g~:

1~:I=i3

EMT
ADD
MOV
WAITMS
MOV
EMT

iJ:j8!f~loPR12It6jIII,ilfBfD8~Ali~s'#DR'.AMI<B'RLDR'+1) )REQ RESET WRT L

fli!l!illr'
81IUD,-,
':l

~~!~s~s-fsJ)
O~R

CP~:fF

J~O
106 sp
.,R1

)SET WAIT FOR 30 SEC

!,~2

ASSEMBLY ROUTINES
MACY11 301(1052) 22-80Y-78 16:32 PACE 2-39
CZRLDB.Pll
23-0C1-78 14:39
'"TEST 17
**WRITE LOCK ERROR AND DAU PROTECTION
015176
JSR
PC,GSTATR
;GET STATUS
020000 002474
ij~04$ MWLSTAT,T.MP
)CHECK IF WRITE LOCK RESET
BEQ
T3265$
DEC
R1
;DEC WAIT COUNT
;LOOP IF NOT 0
~~E
m04$
;ELSE REPEAT MESSAGE
T3265~:

EHDrs

104001

L1005 :

EMT

0130

jlUoi,~U~0=Ei8.'~E~6I!lTER

~i~HRD

D
!CAi
.NO D

17$:

015176
021726
022414
022066
000002

t·i . ., ·.

fijii~~~;;~:S

; TEST

SEQ

CSETS!

SEQ 0131

ASSEMBLY ROUTINES
MlCYU 30A(1052) 22-1I0Y-78 16:32 PAGE 2-40
*TEST 18
·'ADJACENT CYLINDEN INTERFERENCE
CZRLDB.Pll
23-0CT-18 14:39
• SBnL *TEST 18
;;~~~Af~NT CYLINDER INTERFERENCF.

iii liT'
19~
8
III I illl 1!1111 UUi1
~I ~ j II 1IllIl
!l1111I IiI;iII!!! Ii 8 II81 r8~0~~ 9 :
I
JI~ i8 ~J ~ II III
rIll! isUnn~ nun 88~ d
II i Ilil
W
!;6~ 111!1
~ 6~ Ililll
'~8 ~u III Ii

BGIITsr

81~gij8
~n6

!!I!

5 04

000001
117754

002434

013372

7p4
01 3 4
021726

88~1~4

000001
003062
000003

013372

gg88~i

ilk1IIr'
71

0
0 5600

83~811glZ5 000317

1111 g~033~ 013314

1!1! !~8
~~4
n~~ ~11!:i
5~52 1 036~

A~~in 013376
~1~ U &02g32
11

~&~

TST
BHE
BIT
BHE
HOV
BR
MOV
1~:
MDV
MOV
MOY
2$:
DEC
BHE
JSR
9.
MOVB
MOYB
MOYD
MOVB
13300$: INC
BIT
BHE
1ST
BEQ
ADD
BR

~mij~

036472

MOV
JSR
JSR
JSR
13365$

54~::

1$:
8$:

~2~

BHIS

~2~B

BNE
JMP
1ST
BHE
INC
CMP

~a~

CMP
BLO
CMP
BHI
MOV
MOVB

Mova

08808,
000011

~OVB

B~2tm~BRHEAD

TI8::

~~~TC~~~~RI~E~~5RSECTOR FILES VUID

PC;TSTINT
PC,GSTATR

;INITIALIZE TEST
;CLEAR DRIVE

P~~CU~

$~kfA~5PASS TO 0

~AS'UM
HLLCYL,MISWIW
S;20.,R5

~T~1~tiL'
Rl
10 R3
OLiMW,(Rl)+
R3
~tDATGEN

SEQ 0132

;TEST IF fIRST PASS (QUICK VERIFY)
;NO - SKIP
;TEST IF USE ALL CYLINDERS
;YES - SKIP
;ELSE SET R5 TO NEG 20
;Sf!~ SET FOR NEG 4
~~ET ADDRESS OF WORK TABLE
;SET CLEAR COUNT
;CLEAR LOCATIONS TO LOLI~IT
~frigpcg~¥IL 0
;~~T¥f~~R4TE DATA

~Itl===t~~t3t!~ $I=¥5Rlp~~b~kIITF. LOCATIONS
HILIMw,T~~TBL·lO

~~LIMW,T

1RL. 6;BUMP R5
gALLCYL,MISWIW ;TEST IF USE ALL CYLINDf.RS
PiSNUM
~t~~T-I~KflRST PASS <QUICK VERIFY)
3j
;NO - SKIP
g ,RS
;ELSE BUMP CYLINDER POINTER BY 3
R5
!~~~~ TO NEXT ENTRY
,#~1.
SCHECK IF PAST TARLE
4$
'YES - SKIP TO EXIT
CI~TBL~R53'R3
;GET NEXT TABLE ENTRY
740,R
!~ki~RI~P~B~ gYTE
T 365$
) EXIT TEST
R5
;TEST IF R5 0
~;
;~eSE ~5~~ R~ AGAIN
t255.,R5
$TEST IF ALL CYLINDERS USED

K19.

R~,R3

~~~~ R5E~~TNI~¥TCYLINDeR

R3~HICIMW
Tt I¥~L R4

;CHECK IF HIGHER THAN HILI~lT
I!~' iDH~IGs OF SEEK TABLE

~j~~gLIMW

~3'ilR41

~b f~4)

~~~~C~ ~~I~OWER THAN LOLIMIT

liNSER! CC IN APPROPRIATE TABLE

MACYll 301(1052) 22-1I0Y-78 16:32 PAGE 2-41
ASSEMBLY ROUTINES
·'ADJACENT CYLINDER INTERFERENCE
"TEST 18
CULDB.Pll
23-0CT-78 14:39
MOVB
000017
~j' 11(R4)
;BUMP R3 TO CC+l
INC
;INSERT AS NEEDED
MOVB
R3 5~R41
MOVB
805
R~~~
(R
)
;SET R3 TO CC-l
SUB
MOVB
;INSERT AS NEEDED
,3~R4)
RJ,l (R4)
MOVB
704 bl0364 000013
MOV
R4,TBLSTR
;STDRE TARLE ADDRESS
JSR
PC, CHDSHD
;GO CI!OSE HcAD
oAm~
o
835
T18.1:
EMT
C$BSUB
BIC
#MQUALS,DPFLAG ;CLEAR ALL MESSAGE QUALIfiERS
5~ ~ a~m~ 003760 002426
TST
PASCHT
;TEST IF PASS 0
3728 035730 005137 002654
'YES - snr
)TEST IF PASS 4
~HCNT,#4
~~~
8H~H 002654 000004
BEQ
;YES - SKIP
035144
;CHECK IF LESS THAN 4, IF Y~S CLEAR TO 0
RLf
MOV
PASCHT
8ggg~a 88~m 10$:
BIS
~~OUTS,OPFLAG ~~~~E~~~~A~~ ~UAL
BR
;SHP
;SET PASS COUNT TO 0
CLR
PA~CNT
11$:
BIS
fOUTlNS,OPFLAG S~~t ~~i5A~~DQ2alTE SWITCH
MOV
12$:
MOV
~dn~R~
;GET STORED TABLE ADDRESS
;CLEAR TO SECTOR a
CLR
DESSEC
15S:
;GET NEXT TABLE ENTRY
MOV8
~~;H~~~WCYL
JSR
;00 SEEK
~g~
;SET WAIT COUNT FOP 300 MS
B~~2gY,nT
;WAIT FOR READY
gm~8
JSR
~g~B
;GET Nf:XT TABLE f:NTRY
524
~~;H€~~wm
;DO SEEK
JSR
o 6070
~g~
;SET ~AIT COUNT FOP 300 ~s
g~m8
B~~28Y,HT
;WAIT FOR READV
JSR
;VERIFV POSITION
PC,VERPOS
021244
~ °igo~t
PC,BSCHK
;CHECK FOR BAD SECTOR
16$:
68,
023074
i"YES It RETURN
;TESI IF WRITE THIS PASS
000001 002444
~BITO,WRTSWI
BEQ
,NO - SKIP
;00 WRITE
JSR
P~;XWRITE
022354
60~
IN
D~SSEC
• INC SECTOR
CliP
O.,DESSEC
STEST IF ALL SECTORS USED
002536
8~~H
BNE
BIC
1~~OUTSIOUTINS'O~~eAG
~~[kAR QUALIfIERS
0 o
Ogr'26
BIC
BITO WRTSWI
'CLEAR WRITE REQUIRED SWITCH
444
FOLW~T,OPFLAG ;SET FCLLOWING WRITE QUALIFIeR
00 426
BIS
oog~oA
ESSEC
;CLEAR
TO SECTOR 0
CLR
00
36
8j6 56
BR
o
l~¥Tl,wRTSWI
$¥~§~ IF READ THIS PASS
BIT
000002 002444 29S:

gl~m

un
111111 888
r 0008~~

8
1111 8

UJ ~~r8

8NH8

3~n 8°1~T

In mH2
Ililll °UiU
8ml~ 88UU
III I d!~ him mid
1M ijilll 111111
~ 60~~
°F
I nhn IIIlll
8
h8 un !!llil
!un IIUi smu

IiU ~ iJU b~1l
gm

811111

88888

mm:

In
,4

m
m
m

SEQ 0133

ASSEMBLY ROUTIR£S
CZRLDB. Pll

MACYII 304(1052)

23-0CT-78 14: 39

22-10'-78

*Tll:ST 19

16:32

EMT
E~~APE
.WORD
MOV
CMP
BilE

PASE 2-42

uADJACEIIT CYLUDER UTERI'EREIICl!:

CSESUB
TST

ff8~§4~~

HXIT TEST IF ERROR

.~§WRTSWI
4~ CHT,j4

MOV
JMP

,SET fOR READ AND WRITE REQ.
':~S! I~I~ASS 4
t~i3T8L+I0'TBLST~G~S§¥fITMJ~s~D!Rr 1M TABLE
PA~CIIT
'CLEAR '1'0 PASS
PC,SUlPHD
'co SWAP TO HE! 1 OR EMD TEST
,ABORT RETURN
#T33TBL,TBLSTR ,STORE START OF TABLE
13301$
'CO DO HEAD 1

EMT

CSETST

~~y
CLR

~~§OO$

ASSEMBLY ROUTINES
MACY11 301(1052) 22-NOV-78 16:32 PAGE 2-43
CZRLDB.Pll
23-0CT-78 14:39
"TEST 19
··OVERWRITE
··OVERHRITE
.SBTfL *TEST 19
BCIITST
,'I'ES'I' 19
119::
;SET ERROR HEADER
MOV
;CO CHECK IF BAD SEC'I'OR fILES VALID
JSR
,INITIALIZE TEST
JSR
JSR
,CLEAR DRIVE
~r.a65$ PASCHT
;CLEAR PASS TO 0
HOY
'A~'C~
j~~~TR~F FIRST PASS (QUICK VERIFY)
TST
BHE
1S
;NO - SKIP
BIT
iASLLCYL,MISWIW ;TEST IF USE ALL CYLINDERS
BHE
1
,YES - SKIP
MOY
~-20"R5
,ELSE SET R5 TO NEG 20
BR
~4 R5
$~~IPFOR NEXT ENTRY
HOV
MOV
T
T3BL,Rl
;CET A~DRESS OF WORK TABLE
1 301R
MOV
DLfMW,(Rl)+
f~fiA~ ~~~A~~g:~ TO LOLIMIT
MOY
2$:
R3
;DEC COUNT
DEC
SKE
2$
'~OOP UN'I'IL 0
MOVB
HILIMW,T3~TBL+~ , "SERT HILI"!!
MOVB
HILIMW,T~3TBL+l ' N'I'O APPROPR ATE LOCATIONS
HOYB
~~L MW,T TBL+ 2,BUMP R5
T3400$ : INC
#ALLCYL,MISWIW ;TEST IF USE ALL CYLINDERS
BIT
BNE
55
;YES - SKIP
PASMU'"
;TEST IF FIRST PASS (QUICK VERIFY)
1ST
BHE
,NO
- SKIP
n
9.,R5
,ELSE
BUMP CYLINDER POINTER BY 19
ADD
BR
6
;SKIP
# R5
;BUMP CYLINDER POINTER BY 3
~~~
R5:#41.
,TEST IF PAST VALID TABLE
45
;YES - SKIP
BKIS
CYLTBL(R5),R3
;GET NEXT TABLE EHTRY
MOVB
BIC
#177400,R3
'CLEAR UPPER BYTE
BKE
as
;SKIP IF NOT 0
JMP
13465$
;EXIT TEST
R5
;TEST IF R5 0
TST
BHE
~~
mSE ~~~~ RS AGAIN
INC
CMP
!25S.,R5
,TEST IF ALL CYLINDERS USED
75:
BEQ
R~ R3
;~~~ R5E~~TN~~~TCYLINDER
MOY
CPlP
R3~LOLIMW
JTEST IF PAST LO LIMIT
8S:
131005
nES - SKIP
BLO
CMP
R3 HALIHW
,TEST IF PAST HILIMIT
BKI
I~~gTfiL R4
~~~¥ AD~~~~S OF SEEK TABLE
MOV
MOVB
~3'1IR41
;INSERT
CC INFORAPPROPRIATE
TABLE
Rl,3 R4
, LOCATIONS
TEST SEEK SEQUENCE
MOVS
MOVB
Mova
~~:~
~l
MOVB
HOVS
~~=l ~~4J

SEQ 0134

SEQ

0115

,
(

ASSEMBLY ROUTffiES
NACYll 301(1052) 22-UOV-70
CZIlLDII.Pll
23-01:'1'-7$ 14139
'"fiST 19

16132

PACE 2-44

SEQ 0136

''''Onallllnil

~~:eR&I~~
EIIT

n~
~~~

Rf¥
IIOY

11$:

!P
~LR

12$1
15$:

=~¥
eLR

1O$!

l!tr

DIS

~~!Udl\iCYL

J~~&g"nT

III:

~~~UdfIiC!!L

JSR

~8i

16$:

13000. ,.Rl

JSR

PC,ROY.AIT

~h
~~9
Hi
DR

PC, BSCHK

33i
6°i

PC,VERPOS

JiP1SCIlT

~;6n~EII

JSR

o
~t~XWRITE

CMP
BIC
BIC
BIS

f~~~;5ESSEC
J~I~TSlfT~fL SECTORS USED
, ~~OUTSIOUr!N5'O~peAG ;~l~AR QUALIFIERS
'~lgfi~~~~~lAG S~~~A~o~E~&iN~ESgi¥~DQg~~t~~ER

.ilORO
BIT
BEG

~BITO,NRTS\iI

m
BNE

ESSEC

eLf!

ASSEMBLY ROUTINES
lIieY11 30A(1052) 22-HOV-78
*1&S1 19
23-0CT-78 14139
CZRLDB.Pll
DR
3929 037300 000724
OIT
3930 0~7302 032737 000002 002444 29$:
SEQ
001414
393! o
JSR
022414
31S:
393
03 f2 804737
022066

UII SU ~~3 o~UI~

mr
1848

ni~ 037 h nU3~ 8°~~U
0373

!Pl

2536
08
o 0050

002536

8h~53
g4i
9~ o ~ 64 gn~n 002 ~4 ggm~
002654 000006
~45 ~ ~1~~
o 101 ~nl!~ 002654 000001
dl ~U411
~~thl 00265'1 000004

Ui~

r Il !

005037

000002
002654

suJii ~nll~ mUS
gd ~ 7r
~tl ill!il

3~~
g~5

ohn7

~ 6~

I
3161 7~ ~
b8
lin ~ un g~~~U
8~~in
8
!I~~
Ii!!fU 11 UhU
~U8
:UI ~837m

1111 8~5 8
o

01 7~

002426

39$:

g8g8a~

g8U~~ 41:

000002

002440

40~:

60r

EN SUB

[,1 062:

CMP
BNE
CLR
CLR
INC
BIC

002340

CMP
BEQ
BIS
JMP
BIS
OR
BIS
DR
BIS
MOV
OR
MOV

EMT

gm~l

MOV

45$:

002446

~m5¥:

Er8~i1:
EIIDMO[)

PC,DATCOM

CESSEC
40 .,DESSEC

D~~SEC

n~CIIT'lI1
n~CIIT,1I4

CMP
MOV
DR
eLR

BilE

002446

m~u

Tl,IIRTSIH
3$
PC,XREAD

BEQ
CNP
SEQ
CliP

.!IIORD

OO~441
00
00

WRTSIII
PASCIIT
~~~g~~~~gPFLAG

EMT

gg~gg~

16i

CMP

ESCAPE

4010

104001

m
~g~

~B~

000020

;TEST IF WRITE THIS PASS

;R8 WR~'IP

,CLEAR '1'0 SECTOR 0

16:32 PAGE 2-45
*"OVERIiR IU

~~~

104003

o ~~~

,./

33$:

002·426

1 54

002444
000002
002426

32$:

;VERIFY POSITION

P4 SCIIT

11011
JSR

ptO

VUG

60~
PA CNT,1I6

igiT1fwRTSWI
3~SCN ,,2

fR~VSKO,OI'FL"'G

;TEST IF READ THIS PASS

n~SE 5~I~EAD

;COMPARE DATA
;BUMP SECTOR
;TEST IF ALL SECTORS USED
;liO - LOOP
;CLEAR DESIRED SECTOR
;CLEAR IIRITE6READ SWITCH
;BUMP PASS C UNT
:f~~~RI~L~A~~A~IFIERS

m~'l'-I~KHss 6
m~T-I~K~b 1

IYES - SKIP
;TEST II" PASS 4
; YES - SKIP

,SET WRITE REQUIRED BIT

;TEST IF PASS 2
;YES - SKIP

;SET REVERSE QUALIFIER

~~~TD~w~E~OArt~~ER
I~~DSKO' OPFLAG ;GO
DO NEXT PASS
UOUTS,OPf'LAG

JMTINS~OPFLAG
UTO,I! TSIH
#2,ERRSIIII

15ET QUALIfIER
,SIIIP
;SET MESSAGE QUALIFIER
;SET WRITE REQUIRED BIT

S~RI¥OE~~~~ ~e~¥CH

C~ESU8

T T
;EXIT TEST IF ERROR
CiESCAPE
L 0061-.
§WRTSWI
;SET FOR REID AND WRITE REQ.
~ CNT,#3
;TEST IF PASS 3
4 ~
/110 - SKIP
3TBL+6,rSLSTR &STORE Hlp POINT IN TABLE

8~
PA CNI

JMP

MOV

PC,SWAPHD
fJ33TBL,TBLSTR
401$

EMf

CSETST

~~~OO$

SEQ 0131

;SKIP

e SURT ASS a4

C EAR TO PASS

GO SWAP TO HEAD ONE OR ABORT TEST
ABORT R,TURN
STORE S ART OF TABLE
GO DO HEAD 1

(

SEQ 0138

MlCY11 301(1052) 22-HOY-78 16: 32 PAGE 3-1
ASSEMBLY ROUTINES
*TEST 19
"OVERWRITE
CZRLDB.PT2
22-NOY-78 15:51
.WORD
031742 000002
GPRML
MANQ,MISIrII,100000,YES
4S~~ 037144

Jtil gl~~!o
o 7 6~

snm
mUg
• jl nnu smu
tl
'1m g~8m
040000
040002
040004
04 00
04
01

CPRML

006044

037764
8Hm
037112

• WORD

100000

g08i~g
4°!I grIm
to 00
031158
4

:=8:8

8~p:l mB~

03 750
037752

1S:

·Il~I! UI~ 8 g18
4

2$:

:mg
XFERF

4~i o~88 ~ 003gS2

8"'r
~:U ~ 83Mi

8888gy
g~88~~ 8Un~
040048 oooo~~
0~0036

.II 84004
4004 8
.II

jj!
(4 )

0003
005052

8~8g~~

00009,
0003

040064

000130

0400~

0400
04005
048054
04 056

040064

8 8 g38~H

OOO~~O
03
006044,

:e5~~Q,M~S~A6:0000,YES
.lIORD
L~L~MQ
.WORD
4 0 0
XfERF
T CODE
.WORD
GPRMD
L MVA~,LOLIM,D,255.,0,253.,YES
.WORD
T COD
.1I0RD
L MVAL
.il/ORO
.1I0RD
riiLIM
.WDRD
T HILIM
H LIHQ,MISWI,20000,YES
GPRML
.1I0RD
.IIORD
AiH~8
.IrIORD
20000
XFERF
T CODE
.1I0RD
L MVAL,HILIM,D,255.,O,255.,VES
GPRHD
.IIORD
'l'¥CODE
L MVAL
'
• WORQ
255.
.WORD
.WORD
T~LOLIM
T HILIM
.IIORD
GPRML
H AOQfMISWI,10000,VES
.WORD
T~COD

020000
006044
002052

g~gT ggg3~~

~i~ODE

100800

3$:

.WORD
GPRMD
.WORD
.WORD
• WORD
• WORD
• WORD
GPRMD
,.WORD

:~m

~ t88

T
'
3~ CODE
H ADV t HEAD,D,17,0,1,VES
T~COD
H ADV
1·
•
T!LOLIM'
.
T HILIM
•
E LIHQ,ERLIM,D,377v O,377,YES
T~COOE

!7~rMQ

.WORD
LIM
TrO
.IIORD
T HILIM
'
o LIMQ,DCLIM,D,371,1,377,YES
GPRMP
.WORD
ODE
.WORD
~ ~IMQ
.
,
.WORD
.WORD
T~Lo~rM
.1I0RD
T HI 1M
~~~~8,MI~~~6~~,YES

838m
GPRHL.

SEQ 0139

ASSEMBLY RoorIIES
MACYIl, 301(1052) 22-MO'-78
c'ZRLDII.PTl
22-10'-711 15157
*un 19

_III 111111 !lS!l!

~OO:'O

ItIIDSFT

'L10064:

:~!ln

05S

~ ~

o4211~

4041
4042
4043

4045

4046

I
II

4048

116

040442

040

040514

in InlU
8ill~1

81i~~~

:=8~g
• EVEN
IU~E

SEca:

.iSCIZ

IUSE ALL SECTORSI

MUQI

• AseIZ

IEXECUTE MANUAL IRTERVENYION TESTSI

LOLIMQ: .ASClZ
LIMY1L: .lSCIZ

ILOIIER SEU LIMITI
IERrER VALUEI

H[LIMQl .lSCIZ

IUPPER SEEK LIMITI

HElba:

.1SCIZ

IUSE ONLY O"E SURrACRI

HEADY:

.ASCIZ

ISPECIFY SURFACE (0 OR 1)1

ERLIMQ: .ASCIZ
.ASCIZ

DCLIMQ: .1SCIZ

EIIDMOD

~lll

ISPECIFY ERROR LIMITI
IDROP DRIVE IF

RESPONSEI

IDATA COMPARE ERROR LIMITI

.EVEN

.=4051.4

ASSEMBLY RODTIIES
MACYll 30A(1052) 22-IOY-78
caILDI.PT2
22-.0V-78 15157
*tEST 19

191
l J

ALL CYLINDERSI

.ASCIZ

Il!lti IJIlll AUTOQ:

lUlU nun

16132 PAGE 3-2
**OYERIIRlTE

16:32 PAGE 3-3
**OVERVRITE

,AREA RESERVED AS PATCR AREA FOR DIAGNOSTIC
,.=40~14 lIAS S,LECTED AS "LlSTAD" TO PROHDE APT TO LSI-ll COMPATIBILITY.
tB~~w R9~Ni~ASoAD~H~UE§I~I1Cb~t~~Dl~¥.ACHIEYE A VALID MAILBOX ADDRESS
040514

040514

LASTlD
.EVEN
L$L1ST: :

SEQ

0141

22-109-79 16:32 PAGE 4
DIAGNOSTIC SUPERVISOR -- LOY CORE SET UP

SEQ .0142

:CBAa\ gIACIlOSTIC SUI'ER~U~~E-;:0~0~si~R~08E'I'pHrIlTER

i;lil
8
JIIO ~~X":+2

j~tjEK~¥"H!a~p~il!Ell~3ci"8~

ASSEMBLY ROUTINES
MACYII 301(1052) 22-NOV-78 16:32 PAGE 5
CZRLDB.SUP
23-0CT-78 09:53
SYMBOL TABLE
eOIlHNG= ~000004
ABOFLA 041040 G
ABOP1S 040756 G
CORTCL 061672 G
lBO.FH 043310
ArMID
00~6 2
lOA

tt~IDU

ggm~=
i615~0
C~DYMS= 8

o~og ~ G

ALLeYL: 800001
ALLDC
06A46~

t~~~i~~ ~808go
ARMIS

U~EHg" 88 818
t8lg~z= ~38m

Illli ~lru
8~~19f

BEN. SU:

gw~
40S!4

8
1°°
~ 8°gm g
TH " Og80~4 G
1
TO! = 00 ° 0 G
8 r04 = 00 ° 0 G
n~~~!= 8°~~

Ito

,,0666 1 G

11~8~ ~ g88~38 g

BIT07 = 000400 G

RII~8~ ~ ~8~08~ g

tl "000002 G
IIII~O
~"010
88~8°~8
BIT
00 g
G

BIt
= 0200~~ G
Bit ~ ~ 9388~0 g
G T "00000-1 G
B 1:3 "000010 G
R t~ ~ goooig g
BIT6
G

,,088Yoo

CURR.S
CURR.T
CYLQ
CYLTBL

040522 G
840524 G
40072

8~2~~g

08:35~

gyt~b = 8g glo
E U~ 85 8~~

I HZ

'tIUD~ Ig~ is
IAftDD

6
005 33
OOROOO

g~G~~f

04~450
00 636

APT. ER

CRLF
CSIIAH
CSR

••

g
t!kT= ~05853~~i2
C lDR = 88
C

C BRK =

000

gC BUFF=
G~fi5~ °88gg~2.
00030
g CEFG= 880046
C Et~g 0088At

E ~~fi~ m~~~

DODU: 000053
DItPT= 000024
DU = 000055
C EDIT= 008g02
C ERDF= go
,-' .' C ERHR= ao 03
C iRSF= 0g0001
C RSO= 0 0004
C SCA= 000010
e ESEG= 000005
03
Em~
C EXIr= OOOO~~
C
C
C

g
g8gg
g m~~ 88g8~~
~ ~H~~ g888~~

e INIT= OOOOtl
C IHLP= 0000 0
C KWOF= 0000 5

SF-Q 0143
C KWON= 000034
C LOOP: OOObOO

.~C CnF=
=~~~~ 88~~RI5l
00 7

C PUS= 0 00 6
C PNTX= 00U~5
ee POIN=
~
QID = 88
,
C RDBU= 000 0
C REFG='0~0050

E U~g 80m~

e REYI= 000002

E nJG~ 8888i~

E SY~~: g880~~
g 3~~~~ 88g&U
E
~ 0104
8g0&~76 '
C OMS

C SEC

0105 2

83gm
DAUCH=
m~=s

000~01

DATeOM 022 66
DATGEN 021 26
DCKERR= 004000
DCLIM = 000012
DCLIMQ 0404 00

g~~~~~ 8H30~

DESDIF

00~530

88 m
DESSGN 00 532
gm~e

grIG~g= g~86~8 G

DIAG.T 041046 G
DIFAUG 082520
DlFWD "I) 7314

8mn~ 8~n8~

g~~~RR= gAo~08
DPDVD
8764~6
G
DPHUL
703-14 G
'DRDYMS= 000001
DRMSG
037712,
DRSB
000006

000004
DRSET = gooolo
DRVCIIT
02516
wu~= ~4g0~g
DR¥IIAV 085g40
DSESU" 000400
, DSHS~ = 001400
DR~LT=

B~~lT~

81~~g~

DVC.FT

054042

D' AAG

054746

D AAJ

057536

81m 8~~m

8D HE
AAM

g~~~1~
~576q2

~F:~~=~ ~8gg1~ g

EF.PWR" 00~g34 G
EV.RES= 000 31 G
EFnSTA: 000~40 G

~fo~ ~ 888~8; g
~~8~

- EF~5

~~o~

8R888 3 g

ooooo~ G
g0888~ G

g
888Rf~ g
EFh
oooo!! G
EYOa

~~93

EF12
EFp

~~t~

EF16
EMT.TR

080010

000014 G
OgOOl5 G

g08g1~ g

ooooro G
041~44 G

~=g: ~~= g~hH -

EN~IRO

040~~6'G

EOP. IN

045500

~8p:~~ 8§~33~ G

~~~y~D = 88g3H
ad=~ 8m02
m~M~

ERRHAH

gg~m

053114

U51!:1I1t'l' RD1JHII1t$

CaRLDS.SOP

.. AaU ,3GU10lSll)

23-oet-7. 89153

22-110'-78

.'I'1I8QL fABLE

16:32

PACE 5-1

16:32

PAGE 5-2

MHCRC
MHDERR
MHORCP
RC
MINOUT
MIN. IN
MIN. us

007566
010051
005071

SF.Q

0144

•

=m 881m

005235
040572 G
040574 G

=mlw = 8Y~~9~
Hn~ST= 100000
=~MA

MNOCLR

818lH
006141

=8~~R

3~~~~~ G

MMOINT

006062

MOPERR
MORECE
MOUTIN
::mts=
HREAD
MREADH
MRESKO
NREVSK
MRLF AL

004752
004765
005426
005304
010246

MSG.AD
HSG.TV
MSPERR
MSTEPR
MTMBS
MTDSLO
MUL
HULOAD

040540 G
040514 G
007726
007761
005560
006013
010212 G
005163

MWGERR
MWORD
M~RCHK
MWRITE

007744
006005
005002
005016

~m~

~m~k

==~n~

010032
002436

835~14

oollg~

m~u

813~1~

8A&HJ

=~2~~~ 80m4
=~~t~~ 8~ll~~ G
~8~~~T =

883m

NDIRPT= 000002
NDOP = 000100

SEQ 0145
NOPWR
NO.CLK
HO.PLA
NO.LPT
NO. PTA
NR
NUMB IN
NOM. LA
NUH.NO
NUH.UN
MUNITS
NXMERR=
HXTFOR
HXTPAS
OBUfF
CTHSG
FIN
OFIHU
OFHID
OFMIDU
OFOUT
OFOUTU
OLDCYL
ONSWAP
OPFLAG
OPIERR=
OPMSGS
OPR004
OPRlA
OPR1R
OPRI2
ORIN
ORINU
ORMID
ORMIDU
OROUT
OROUTU

005673
045102
063772

mug

000000
054434

0~3ggt G

341164

8~m~
8642~2

o~~m
86HZ~

002564
002566

m5~g

002~i4

002522
017454
002426
002000

001250

88BH
002516
002600
002602
002604
002606

000000
gium~~
o AU = 000000

o BGNR= 000000
o BGNS= 000001
oo GNSW=
DU = 000001
000001

gggm
PA~gS=
~

POIN:

PAR.LA
PASCNT
PASNEli
PASNUM
PASS .. C
PATTRL

000000

86m~

013616
003062
040530 G
002234

004466
0047.42
0044~0a
0045
0045 0
004630

PATl

PATtD
PAT2
PAT3
PAT4
PATS

88lm

PATS
PAT9
88~m
PH655
017012
POSHOS 0\6570
POSH DO
POSHSB 8~m3
POSHlil 020612
PRINTC 061320
PRIHTF 064626
PR lOR = 000004
000000 G
PRIOO
PRI8~ =
G
PRI
PRIO = 000 ~o
PRI04 = 000 00 G
PRI05 =
PRI06 =
PRI07 = 000340 G
PRNTST 061210
PRO.CM 045460
PSETNM 003064
PUB. S
G
PUTCHR
PliCO"
PWRFLG
PWR.FA 011150 G
PWR. FL 040604 G
PI/R.MS 011216
PWR.SA
PWR.UP
P.CLK.
P2T01E

=
= 888148

mmg

8Hm

mm
m81~ mm
P2T04E

P2T05E

006270

006~12

~mn 88~3~~
P2TOBE

Hf9g~

P2Tt~E
P2U E
P2Tl E

2T14E

m4~~

06~31
8 06446

006511