Digital PDFs

AH-F845B-MC

1983

166 pages

Original

7.4MB

view download

OCR Version

6.9MB

view download

Document:	CZRLNB0 RL11,RLV11,RL01,RL02 RL01-02 DRIVE TST 3 1983 bw
Order Number:	AH-F845B-MC
Revision:	000
Pages:	166
Original Filename:	CZRLNB0__RL11,RLV11,RL01,RL02__RL01-02_DRIVE_TST_3__AH-F845B-MC__1983_bw.pdf

OCR Text

Micro

Fiche

Scan

Name of device(s)

tested:

RL11,RLV11,RLO1,RLO2

Test description:
RL0O1/02

DRIVE

MAINDEC Number

TST

Package

Identifier

(after

SEP

1977):

CZRLNBO

Fiche

Document Part Number:

AH-F845B-MC

Fiche preparation date

unknown,

using copyright year:

1983

Image

resolution:

1-bit black&white,
COPYRIGHT

(C)

79,83

compressed for minimal

by dlilgliltlall

file

size

IDENTIFICATION

PRODUCT

CODE
:

PRODUCT

NAME
:

CZRLNBO RLO1/02 DRIVE

F843B-MC

DATE CREATED:

S-JAN-79

REVISED:

21-JAN-83

MAINTAINER:

DIAGNOSTIC ENGINEERING

AJTHORS ;

DEKNIS,

TEST

CAMPBELL

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE

TICE
MENT

WITHOUT

AND SHOULD NOT BE CONSTRUED AS A COMMITMENY B8Y DIGITAL EQUIPCORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPON-

SIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS MANUAL
.
THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED
1O
THE
PUR
CHASER
UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM AND CAN
BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE)
ONLY
FOR
LBJSEDIé?TI?\UCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED IN WRITINC
Y

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE
8?G¥$l§IABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED 8Y
L.

Cl
PAGE
2

GENERAL

o Pt pa
MR

STOR

;\)N

Ll
ol o]

.
.

OV BN LN
e
W
e
N
n

CONTENTS

INFORMATION

PROGRAM

:J‘.b;.ur-w;\)row»—r-

TABLE

ABSTRACT

STRUCTURE OF PROGRAM
DIAGNOSTIC INFORMATION
DIAGNOSTIC RUN TIME
SYSTEM REQUIREMENTS

HARDWARE REQUIREMENTS

SOF TWARE REQUIREMENTS

RELATED DOCUMENTS

RLO1702 DISK

USER’'S MANUAL

(EK-RLO1-UG-002)

OIAGNOSTIC MHIERARCHY PREREQUISITES
THE RLO1/02
PROGRAMS
:

SUBSYSTEM SHOULD HAVE

CVRLABO
CZRLGBO
CZRLHBO
CZRLIBO
1.5

SUCCESSFULLY

RUN

THE

FOLLOWING

RLV11 RLO1 DISKLESS TEST (RLV11 ONLY)
RL11/RLV11 RLO1/02 CONTROLLER TEST (PART 1)
RL11/RLV11 RLO1/G2 CONTROLLER TEST (PART 2)
RLO1702 DRIVE TEST (PART 1)

ASSUMPTTONS

THE

HARDWARE OTiiCR

PROPERL Y,

THAN THE RLO1,02

SUBSYSTEM IS

FALSt ERRORS MAY BE REPORTED IF

NOT FUNCTION PROPERLY.

2.0

STANDARDS

SUBSYSTEM USER'S GUIDE

XXDP+ /SUPERVIS L

1.4

AND

OPERATINo INSTRUCTIONS

ASSUMED

THE PROCESSOR,

WORK

ETC.,

SEQ 0005

ol
PAGE

HOW

.1. 1

THE FIVE

TO RUN

THIS

DIAULNOSTIC

STEPS OF

EXECUTION

THIS DIAGNOSTIC PROGRAM SHOULC BE LOADED AND STARTED
USING
NORMAL
XXDP+
PROCEDURES.
START
THE
EXECUTION
OF THE XXDP+ MONITOR BY

USING THE

MESSAGE
1

APPROPRIATE BOOTSTRAP PROGRAM.

IODENTIFYING

g;%?gg.

ITSELF

AN EXAMPLE OF

AND REQUESTING

THE MONITOR WILL PRINT
THAT

THE

CURRENT

THIS MESSAGE IS GIVEN BELOW FOR

DATE

THE

XXDP+«

CHMOKAO XXDP+« DK MONITOR NNK
BOOTED VIA UNIT O
ENTER DATE (DD-MMM-YY):
AFTER

THE

ggKEgHE

DATE HAS BEEN ACCEPTED BY

MOMITOR
50 HZ
LSI ?

THE
THE
WHEN

DEFAULTS
PROGRAM.
THIS

IS PRINTED.

THE MONITOR

THE

RESTART

ADDRESS

THEN THE FOLLOWING TWO QUESTIONS ARE

? N
N
ARE BOTH “NO”.
TYPE "R“ AND
DO NOT TYPE THE EXTENSION.

DIAGNOSTIC

STARTED

THE

THE PROGRAM NAME

FOLLOWING

STEPS

WILL

T0O

RUN

OCCUR:

s00800044s

« STEP 1

=«

Y PYY
YTy Y TS

THE DIAGNOSTIC WILL ISSUE THE PROMPY

"DR>",

FROM THIS POINT

UNTIL

THE
TIME
WHEN YOU RESTART XXDP+, YOU WILL BE TALKING TO THE DIAGNOSTIC, NOT XXDP+.
MWE WILL REFER TO THE PRESENCE OF THIS PROMPT AS

BEING IN DIAGNOSTIC COMMAND MODE,

AS OPPOSED TO XXDP+ COMMAND MODE.

AT THIS POINT YOU WILL ENTER A "START” COMMAND.
THIS
IS
NOT
THE
SAME AS THE XXDP+ “START” COMMAND, WHICH YOU ALREADY ISSUED IN RESPONSE TO THE XXDP+« DOT PROMPT.
THIS “START"
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”,

HOWEVER,

THING | IKE

1IN ORDER TO USE THE PROGRAM,
THIS:

STA/PASS: 1/FLAGS : HOE

ALL YOU NEED TO SAY

IS SOME-

3€G 0006

PAGE

THINGS

TO NOTE

HERE:

ONLY
AT

THE

THE FIRST

THE

“DR>"

"PASS”

SIRE.

THREE

LEVEL

CHARACTERS OF

NEED

TO BE

THIS OR ANY COMMAND

TYPED.

SWITCH SPECIFIES HOW MANY

PASSES

YOU

A PASS CONSISTS OF RUNNING THE FULL DIAGNOSTIC

AGAINST ALL UNITS BEING TESTED (THIS WILL BE EXPLAINFD
SHORTLY).
ONE PAR3S IS SFECIFIED IN THE ABOVE EXAMPLE.

THE

“FLAGS” SWITCH MAY

FLAGS,

BUT

SPECIFY

THE MAIN USEFUL

ANY

ONES ARE:

PNT
LOE
HOE

PRINT NUMBER Of
LOOP ON EPROR

IER

INHIBIT ERROR PRINTOUTY

HALT

THE HOE FLAG

NUMBER

TEST BEING EXECUTED

ON ERKL

SPECIFIED

THE

ABOVE EXAMPLE

COMMAND,

THE

DIAGNOSTIC

(MWE'LL

SEE WHY SHORTLY),

(YT
EY ]

& STEP 2 »
PP

WHEN

BACK

YOU HAVE

TYPING

WITH

TYPED

THE

IN A

QUESTION

THE NUMBER OF

A WORD OF

WARNING HERE:

TYYY

“START”

VYY)

WILL

COME

“& UNITS?” TO WHICH YOU SHOULD RESPOND BY

DEVICES

YOU WISH

TEST,

THE NUMBER OF UNITS DEPENDS ON THE

TARGET

DEVICE
OF
THE
DIAGNOSTIC.
FOR EXAMPLE, IF THE DIAGNOSTIC IS DIRECTED AT A DISK DRIVE, THEN THE
NUMBER
OF
UNITS
WOWLD
BE
THE

NUMBER
OF
DRIVES TO BE TESTED.
WHEREAS IF THE DIAGNOSTIC WAS OIRECTED AT THE DISK CONTROLLER, HEN THE NUMBER OF
UNITS
WOWD
BE
THE
NUMBER
OF CONTROLLERS.
THE TARGET DEVICE OF A DIAGNOSTIC CAN
ALWAYS BE DETERMINED BY INSPECTING THE “HEADER” STATEMENT NEAR
THE

BEGINNINC OF
STATEMENT

THE SOURCE CODE.

SHOULD BE THE DEVICE

LI I

ONE OF THE OPERANDS OF
TYPE OF

THIS

"HEADER"

THE DIAGNOSTIC.

YR Y YY)

« STEP 3 «

PPy

WHEN YOU HAVE TYPED IN THE NUMBER OF UNITS TO BE TESTED, THE
DIAGNOSTIC WILL ASK YOU THE "HARDWARE QUESTIONS”,
THE ANSWERS TO THESE
QUESTIONS ARE USED
TO
BUILD
TABLES
IN
CORE,
CALLED
“HARDWARE
$é;¢gBES".
ONF JARDWARE P-TABLE WILL BE BUILT FOR EACH UNIT 7O BE
THERE ARE SEVERAL HARDWARE QUESTIONS AND THE ENTIRE
POSED N TIMES, WHERE N IS THE NUMBER OF UNITS.

SERIES WILL

SEG 0007

L1
PAGE

THIS
REPRESENTS
A
NEW
PHILOSOPHY
IN
ODIAGNOSTIC
ENGINEERING.
DIAGNQOSTICS IN THE FUTURE WILL NOT BE WRITTEN TC AUTOSIZE OR ASSUME
STANDARD ADDRESSES:
INSTEAD, ~ €Y WILL ASK THE
OPERATOR
FOR
ALL
THE

INFORMATION

THEY

NEED

Tt ST

THE DEVICE.

YYYVYYVYYYS

s STEP 4 »
YYYYYYYYY

AFTER YOU HAVE ANSWERED ALL THE HARDWARE QUESTIONS
(SEC
2.5)
FOR
ALL
THE
UNITS,
YOU
WILL BE ASKED “CHANGE SW?" IF YOU WANT TO BE
ASKED Ti¥ SOFTWARE QUESTIONS THAT DETERMINE THE
BEMAVIOR
OF
THIS
PROGRAM,

TYPE

"v”,

TIF

YOU

WANT

TAKE

ALL

THE

DEFAULTS

THESE

GUESTIONS, TYPE “N”.
IF
YOU
TYPE
“vy*
YOU
WILL
BE
ASKED
THE
SOFTWARE
QUESTIONS (SEC 2.6), AND THE ANSWERS WILL BE PUT INTO THE
SOF TWARE P-TABLE IN THE PROGRAM.
THE SERIES OF QUESTIONS
WILL
BE
ASKED

JUST

ONCE,

REGARDLESS

THE

NUMBER OF

UNITS

TO BE

TESTED,.

YT
YT Y YV YN

¢ STEP 5 »
YVYYYYYY
VY

AFTER YOU HAVE ANSWERED THE SOFTWARE QUESTIONS, THE DIAGNOSTIC WILL
BEGIN
TO EXECUTE THE HARDWARE TEST CODE.
THERE ARE SEVERAL THINGS
THAT

CAN HAPPEN NEXT,

COUNTERED

COMMAND.

DEPENDING ON WHETHER

A HARDWARE

ERROR

EN-

AND ALSO ON WHAT SWITCH VALUES YOU SELECTED ON THE START

CONSIDER

THE POSSIBILITIES:

IF NO ERROR IS ENCOUNTERED, THEN THE
ODIAGNOSTIC
WILL
SIMPLY EXECUTE THE DESIRED NUMBER OF PASSES AND RETURN
TO COMMAND MODE (PROMPT DR>)

IF AN ERROR IS ENCOUNTERED, THEN ONE OF
THREE
?A:EENS.
DEPENDING ON THE SETTINGS OF THE HOE
L
.

THINGS
AND LOE

HOE SET:
THE ERROR WILL BE REPORTED
ON
THE
CONSOLE
AND THE DIAGNOSTIC WILL RETURN TO COMMAND MODE.
LOE

SET:

THE DIAGNOSTIC WILL LOOP

ENDLESSLY

BLOCK OF CODE THAT DETECTED THE ERROR.

THE

NEITHER HOE NOR !'.OE SET:
THE ERROR WILL
BE
REPORTED
ON
THE CONSOLE AND NORMAL EXECUTION WILL RESUME AS IF
NO ERROR HAD OCCURRED.

SEG 0008

\Jl
PAGE

SAMPLE RUN

.1 .2

THROUGH

LET'S SEE HOW ALL THTS WORK3 IN A REAL SITUATION,
RECALL
THAT
WME
ENTERED
THE
COMMAND “STA/PASS:1/FLAGS:HOE”.
THIS WOULD BE A VERY
TYCICAL WAY TO RUN THE DIAGNOSTIC.
1IF NO ERRORS
ARE
ENCOUNTERED,
;E‘EISEEEM!;LE
REQUESTED PASS WILL BE EXECUTED AND THE PROMPT WILL BE

IF AN ERROR IS ENCOUNTERED,

PROMPT

gg‘I‘?L

WILL

THERE

REISSUED

THE ERROR
(BECAUSE

ARE FOUR DIFFERENT WAYS

WILL

THE HOE

FLAG

YOU CAN GET

REPORTED
IS

THE

SET).

AND

THE

PROGRAM

THIS

GOING

ISSUE ANOTHER “START" COMMAND (THUS GOING THRU ALL
STEPS 1, 2, 3, 4, AND 5 AGAIN)

ISSUE A “RESTART” COMMAND (SAME AS START
COMMAND
CEPT THAT THE HARDWARE QUESTIONS ARE NOT ASKED)

EX-

ISSUE A “CONTINUE"” COMMAND (EXECUTION WILL
RESUME
AT
THE
OBEGINNING
OF
THE PARTICULAR HARDWARE TEST (MOST
OJAGNOSTICS CONSIST OF A NUMBER OF THESE) THAT IT
WAS
IN WHEN THE ERROR HALT OCCURRED.
NO QUESTIONS ASKED.

15508 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
THE

MOST

TYPICAL

THING

TO DO HERE

DIFFERENT FLAG SETTINGS.

PROBABLY

ISSUE

THE PnuCEED,

YOU WOUWLD WANT

TO SAY:

BUT WITH

PRO/FLAGS: IER:LOE:HOE =0

FOLLOWING:

THL

TURN ON THE

TURN ON

WILL

TURN OFF

THIS

RESUME EXECUTION AT

THE DIAGNOSTIC WILL
REPORTED THE ERROR,

STUDY

THE ERROR OR

IER (INHIBIT ERROR PRINTOUT) FLAG

THE LOE

FLAG

THE HOE FLAG

INSTRUCTION AFTER ERROR REPORT

NOW LOOP ON THE BLOCK
BUT NO ERROR PRINTOUY
SCOPE IT OR WHATEVER.

OF CODE THAT
WILL OCCUR.

DETECTED AND
THUS YOU CAN

G GGy

<1
PAGE

WHEN

OUT

YOU VE

LET'S SAY
RUNNING

SEEN ENOUGH,

THE LOOP AND PUT

START

RESTART

CONTINUE

YOU MAY

YOU BACK

HIT

CONTROL/C.

THIS

WILL

DIAGNOSTIC.

YOU

INTO COMMAND MODE.

YOU'VE REPAIRED THE DEFECT FOUND ABOVE AND WANT

THE

TAKE

YVOU WOULD

TYPE

TO FINISH

CON/FLAGS
:HOE : IER=0:LOE=0
THIS WILL RESTORE THE FLAGS TO THEIR ORIGINAL VALUES AND RESUME
ECUTION
AT THE BEGINNING OF THE HARDWARE TEST YOU WERE IN.
IF
ERROR DOES NOT RECUR, THE EXECUTION WILL FLOW RIGHT ON THRU T0O
NEXT ERROR OR TO END OF PASS.

TWO

AT END OF PASS
CHOICES:

YOU WANT

START

RESTART

TO RUN THE DIAGNOSTIC

YOU WOULD CHOOSE ONE, DEPENDING ON WHETHER
HARDWARE QUESTIONS AGAIN.

AGAIN,

YOU WANTED

EXTHE
THE

YOU

MHAVE

ANSWER

THE

SEQ 0010

L1
PAGE

THE

FULL

(O OPERATOR,

OUT

FROM

THE

ABOVE

DIALCGUE

MIGHT

LOOK

D=DIAGNOSTIC):

.R CZRLNB
DRS LOADED

RUN-TIME SERVICES REV,

D APR-79

CZRLN-8 O
CZRLN TESTS SEEK AND ROTATIONAL

TYPE

= RLOL

BR LEVEL (0) 5 ?
CHANGE SW (L)

2?2

(L)

?
? N

USE ALL CYL (L)Y N ?
USE ALL SECT (L) N ?
D0 MANUAL INTERVENTION TEST (L) N ?
LOW SEEK LIMIT (L) N ?
UPPER SEEK LIMIT (L) N ?
USE ONLY ONE SURF (L) N ?
INPUT ERROR LIMIT (D) 20 ?
DATA CMP ERR LMT (D) 1t 02?

CZRLN HRD ERR 00003
ERR HLT

000000

DRIVE (0) 0 ? 1

000000

(L)

UNIT 1
RLI1 (L) Y ?
BLUS ADORESS (0) 174400
VECTOR (0) 160 ?
DRIVE

OO0

174400 ?

VECTOR £0) 160 ?
DRIVE (0) 0 ?
DRIVE TYPE = RLO1
BR LEVEL (0) S ?

BUS ADDRESS (0)

00000000

UNIT 0O
RLI1 (L)

? 2

O0O0OUVUO0OODO

(D)

OO0OO0OLVULVO0O

# UNITS

& READ DATA

TIMING & WRITE

UNIT IS RLO1l, RLO2
DR>STA/PASS:1/FLAGS
:HOE

O00O0O00O0O

DIAG.

COO0O0C0Oo

WHOM
ENTERED:

TST 003 SUB 002 PC:004130

DR>PRO/FLAGS: IER:LOE :HOE=0

0.0

(N=RLO2)

THIS

SEQ 0011

SEQ 001/

0400040008008 00000000054400400400004000000s0hanias

THIS POINT

THE DIAGNOSTIC

LOOPING

THE

ERROR WITHOUT PRINTING ANYTHING.
YOU CAN SCOPE
THE ERROR UNTIL YOU HAVE LOCATED IT, THEN tC OUT
0804848404462 46808408488688804588820484440844284004484%0

DR>CON/FLAGS :HOE : IER:LOE=0

0,0

CHANGE

0.0

SW (LY

EéRLN EOP

? N

DR>RESTART/PASS:1

0.0

CHANGE SW (L)

0.0

? N

2.2
CHAIN MODE OPERATION CONSISTS OF THE SEQUENTIAL EXECUTION
OF
PRO
GRAMS
WITHOUT OPERATOR INTERVENTION.
ONLY PROGRAMS THAT HAVE BEEN
MODIFIED

ARE

TO RUN

IN CHAIN MODE

CAN BE

IDENTIFIED IN THE DIRECTORY BY

TO RUN CHAIN MODE,

THE

XXDP+

CHAINED.

CHAINABLE

A BIC EXTENSION.

MONITOR USES

AN ASCII FILE

PROGRAMS

(KNOWN AS A

CHAIN FILE) LISTING THE PROGRAMS TO BE RUN AND THE NUMBER OF PASSES
EACH PROGRAM SHOULD RUN.
THIS FILE MUST BE ON THE SYSTEM DEVICE.

A CHAIN FILE MAY BE GENERATED BY USE
OF
THE
XTECO
TEXT
EDITOR.
THIS
FILE
MUST
HAVE A CCC EXTENSION.
THE CHAIN FILE MAY CONTAIN
ANY OF THE COMMANDS SUPPORTED B8Y THE XXDP+ MONITOR,
THE
COMMANDS
égUN¥2§EDASCII FILE ARE EXECUTED IN THE ORDER IN WHICH THEY ARE EN-

TO EXECUTE A CHAIN FILE THE USER TYPES:

C FILNAM <CR> OR
C FILNAM/QV
<CR>
IN THE FIRST CASE THE PASS COUNT SPECIFIED IN
THE
CHAIN
FILE
IS
USED BY THE XXDP+ MONITOR TO DETERMINE THE NUMBER OF PASSES YO EXECUTE EACH PROGRAM.
IN THE SECOND CASE THE
PROGRAM
COUNT
IS
NOT
USED
AND
EACH PROGRAM IS EXECUTED ONLY ONCE.
THE /QV SWITCH PRO
VIDES A SINGLE EXECUTION MODE OF OPERATION OF QUICK VERIFY,

PAGE

WHEN PROGRAMS

SHOUWD

TAKEN FROM

LAST

ARE

SET

THE

COMMAND

RUN

IN CHAIN MODE,

000000.

OTHER

THAN

CHAIN FILE

AND

THE

THe

XXDP+.

SOFTWARE

SWITCH

MONITOR PRINTS EACH COMMAND

THEN EXECUTES

THE

COMMAND.

WHEN

ANOTHER C COMMAND HAS BEEN EXECUTED

THE

XXDP+ MONITOR TSRMINATES CHAIN MODE AND TYPES A PROMPT (.).
IT
IS
READY TO ACCEPT ANOTHER COMMAND FROM THE CONSOLE.
IF THE LAST COM
MAND IS ANOTHER C COMMAND, THE CHAIN MODE
MWILL
CONTINUE
AND
THE

CHAIN FI1
E SPECIFIED BY THIS NEW C COMMAND WILL BE USED.
IF THE USER WISHCS TO TERMINATE CHAIN MODE BEFORE ITS NORMAL TERMINATION
HE
MAY
DO SO BY TYPING A CONTROL/C.
HOWEVER, THE MONITOR

WILL NOT ABORT THE CHAIN MODE UNTIL

FROM

THE

PROGRAM CURRENTLY

RUNNING.

2. 3

DETAILS OF COMMANDS AND SYNTAX

2. 3. 1

TABLE OF COMMAND VALIDITY

THERE ARE FOUR
FERENT SUBSETS

HOW

RECEIVES

WAYS OF ENTERING DIAGNOSTIC
OF THE DIAG COMMAND SET ARE

ENTERED

OPERATOR ENTERED

COMMANDS

START
PRINT

DISPLAY
FLAGS

ZFLAGS
EXIT

DIAGNOSTIC HAS FINISHEO

ITS REQUESTED PASSES

ALL

START

RESTART
PRINT
DISPLAY

FLAGS

ZFLAGS
EXIT

OPERATOR INTERRUPTED THE

CONTROL

COMMANO MODE,
AND
DIFAVAILABLE WITH EACH:

LEGAL

‘'RUN DIAG'

PROGRAM

START
PRINT

DISPLAY
FLAGS
ZFLAGS

EXIT

SEQ 0013

B
PAGE

ERRCR

WITH

Y€

WAS

ENCOUNTERED

START

HOE

FLAG

RESTAR?T

SET

St!?

CONT INUE

PROCEED
PRINT

DISPLAY
FLAGS
ZFLAGS

EXIT
.<

COMMAND

SYNTAX

0880200080080 0480000888000800800808808000°0000000000000000080000%00000

STA(RT/TESTS: TEST-LIST/PASS:PASS
-CNT/FLAGS :FLAG-LIST/ENP:EQOP - INCR
08808832 002088040080080088008000008000000020000000000800000000000080000

THE

DIAGNOSTIC

SPECIFIED.

MAY

8°

ISSUED

IN CORE

THE

IS EXECUTED

MESSAGE

IN ACCORDANCE WITH THE

“@ UNITS?2”

WHEN DTAGNOSTIC

IS PRINTED.

COMMANC MODE

MAC

SWITCMES

THE START COMMAND

BEEN ENTERED

VIA

ONE

OF THE FOLLOWING:
A) OPERATOR TYPED "RUN DIAGNOSTIC” 8) DIAGNOSTIC
FINISHED EXECUTYNG C) ERROR WAS ENCOUNTERED WITH HMOE
FLAG
SET
D)

OPERATOR
ENTERtD
CONTROL/C.
AFTER
THE
OPERATOR RESPONDS TO "o
INITS?2”, THE HARDWARE DIALOGUE IS INITIATED.
WHEN IT IS COMPLETED,
THE
QUESTIONS
“CHANGE
SW?” IS ISSUED, AND THE ANSWERS, IF GIVEN,
BECOME THE NEW DEFAULTS.
THEREFORE IT IS NECESSARY TO
RELOAD
THE

PROGRAM

THE

SWITCH

ORDER

TO RETURN

ARGUMENTS

ARE

THE

LOAD

DEFAULTS.

AS FOLLONWS:

‘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 COLOMS.
THE
NUMBERS
RANGE
FROM

THE LARGEST

TEST

iwUMBER

THE DIAGNOSTIC.

THEY MAY

SPECIFIED IN ANY ORDER.
TESTS WILL BE EXECUTED IN NUMERICAL
ORDER
2E$2R2L55$FS(T)§
THE ORDER OF SPECIFICATION.
THE DEFAU T IS TO EXEU

'PASS-CNT” IS A DECIMAL NUMBER
PASSES.
A PASS IS DEFINED AS

(ALL

SELECTED

NON ENDING

THE FORM

WHERE

«FLAG>

TESTS) AGAINST

TEST

HAS ONE

<FLAG=1>,
OF

THE

OESIRED
THE FULL

ALL UNITS SUBMITTED.

EXECUTION.

<FLAG>,

INDICATING
THE
THE EXECUTION OF

“FLAG-LIST”

<FLAG=0>,

FOLLOWING

VALUES:

THE

SEQUENCE

SEPARATED

NUMBER
OF
DIAGNOSTIC

DEFAWT

ELEMENTS

COLONS,

¢’

HOE

HALT

ON ERROR,

ERROR

CAUSING

COMMAND

MODE

TO BE

ENTERED

PAGE

WHEN

IS ENCOUNTERED

LOE LOOP ON ERROR,

CAUSING

THE DIAGNOSTIC

WITHIN
THE SMALLEST DEFINED BLOCK OF
TEST, OR TEST) CONTAINING THE ERROR

IER

INMIBIT ERROR REPORTING

IBE

INMIBIT BASIC ERROR REPORTS

IXE

INWHIBIT EXTENDED ERROR REPORTS

PRI

OIRECT

PNT

B0E

BELL

ALL

MESSAGFS

NUMBER OF

LINE

10 LOUP

CODING

CONTINUOUSL
Y

(SEGMENT,

SuD

PRINTER

TEST BEING EXECUTED

ON ERROR

UAM RUN IN UNATTENDED MODE,

BYPASSING MANUAL

ISR

INHIBIT

STATISTICAL

REPORTS

I0U

INHIBIT

DROPPING OF

UNITS By DIAGNOSTIC

ADR

EXECUTE

AUTODROP

LOOP

TEST

INTERVENTICN

TESTS

CODE

EVL EVALUATE
THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THMOSE
EQUATED
TO
O
ARL
CLEARED.
A FLAG NOT SPECIFIED IS CLEARED.
IF THE FLAGS SWITCH IS

NOT

“E0P

GIVEN ALL FLAGS ARE CLEARED.

INCR”

IS A DECIMAL NUMBER

INDICATING HOM OFTEN

END

PASSES)

DEFAULT

IS AT

DESIRED

THAT

THE

THE END OF EVERY PASS.

PASS

MESSAGE

(IN

TERMS

PRINTED.

OF
THE

8000404080 8004080008000000004880000000R00080040040000080480000044400

RES(TART )/TEST:TEST-LIST/PASS:PASS-CNT/FLAGS:rLAG-LIST/EOP
: EOP - INCR/

UNITS:UNIT-LISY
080004880808 48840080888004840208804800800000080040008480080400800040000400

THE DIAGNOSTIC IN CORE IS EXECUTED IN ACCORDANCE WITH THE
SWITCHES
SPECIFIED.
HOWEVER,
NEW
“P-TABLES* ARE NOT BUILT,
INSTEAD, THE
ONFS IN CORE ARE USED.

THE QUESTION “CHANGE SW?” IS ASKED AND THE ANSWERS GIVEN BECOME THE
NEW
DEFALLTS.,
THE COMMANC MAY BE ISSUED WHEN COMAND MODE HAS BE:N
Eg:fi:g{_) CVIA
R)
DOIAGNOSTIC
IS
FINISHED
B8)
MALT
ON
ERROR
()
/7C.

PAnLE

THE

<WITCH

ARGUMENTS

ARE

"UNIT-LIST"

RANGING FROM

THE

IS A
1

START

SEQUENCE

THRU N (N

COMMAND

TABLE

IN CORE,

EXCLPT:

LOGICAL

NUMBER Of

ED) SPECIFYING WHICH UNITS ARE
ICAL
UNIT
NUMBER
DESIGNATES
ACCORDING

UNIT

NUMBERS

UNITS BEING

TO BE TESTED.
T4
POSITION

THML

ORDER

THE
OF

IN WHICH

TEST

LOGTHE

THEY

WERE
BUILT,
THE
UNITS SPECIFIED MUST NOT HAVE BEEN
DROPPED BY THE OPERATOR DROP COMMAND,
THE
UNIT-LIST
DEFAULTS
TO “ALL THAT MAVE NOT GEEN DROPPED BY OPERATOR COMMAND".
THE EFFECT OF THE UNIT-LIST LASTS UNTIL
THE
NEXT
"ALL") OR

START
(WHERE
IT
THE NEXT RESTART,

ALL UNSPECIFIED FLAG SETTINGS

AUTOMATICALLY

RESET

ARE UNCHANGED.

0884844028808 848008088400002008080082800204000

CON( TINUE )/PASS: <PASS -CNT/FLAGS: <FLAG- _IST>»
04520450008 8088402050888880048080200040000200008

COMMAND MODE MUST HAVE BEEN ENTERED OUE

CONTROL /C,

TO A MALT

THE TEST THAT WAS BEING EXECUTED WHEN THE
PLACE.
SOF TWARE DIALOGUE MAY OPTIONALLY
PARAMETERS MAY NOT BE CHANGED.

THE

€RROR

THE EFFECT OF THE COMMAND IS TO GO 7O THE BEGINNING OF

SWITCH ARGUMENTS ARE

THE

START

HALT
OR
CONTROL/C
TOOK
BE RE-EXECUTED.
HARDWARE

COMMAND EXCEPT:

DEFAULT FOR PASS-CNT IS THE UNSATISFIED PASS-CNT
THE PREVIOUS START OR RESTART

UNSPECIFIED FLAG SETTINGS ARE UNCHANGED

FROM

SE8444600040048540000088042

PRO(CEED)/FLAGS: <FLAG-LIST>
S88R54883404058000048458404

COMMAND MODE MUST HAVE BEEN ENTERED VIA A MALT ON ERROR.

FECT

THE

COMMAND

X[ETESESOR CALL.
THE

(2 XX

ExIT
[ XN

TO BEGIN EXECUTION AT

THE

NEITHER HARDWARE NOR SOFTWARE

SWITCH ARGUMENTS

ARE

THE

SAME

THE

UNSPECIFIED FLAG SETTINGS

START

THE

EF-

LOCATION FOLLOWING

PARAMETERS

MAY

COMMAND EXCEPT:

ARE UNCHANGED

t e
PAGE

RETURN

TO XXDP.

PROMPT MOOL
.

0800060808000 040000000»

DRO(P)/UNITS:UNIT-LIST
6800040498008 08000804000

THE

UNITS

SPECIFIED

ARE

DROPPED FROM

TESTING UNTIL

BACK
OR UNTIL A START COMMAND IS GIVEN,
BY A PROCEED.

THEY

ARE

ADDED

A DROP CANNOT BE FOLLOWED

THERE IS ALSO A "DROP~ MACRO
INTERNAL
TO
THE
DIAGNOSTIC,
WMICH
GIVES
TME
FACILITY
OF
AUTO DROPPING.
THE DURATION OF A PROGRAM
OROP, HOWEVER, IS ONLY UNTIL THE NEXT START OR RESTART,

2240848800820 8000000s

ADD/UNITS:UNIT-LIST
2448408850404 48000840

THE UNITS SPECIFIED ARE ADDED BACK (THEY MUST HAVE BEEN
PREVIOUSLY
OROPPED
B8Y
THE DROP COMMAND) TO THE TEST SEQUENCE.
AN ADD CANNOT
BE FOLLOWED BY A PROCEED.

ssssnse

PRI(NT)
sesssen

ALL

THE

STATISTICS

TABLES ACCUMULATED BY

ISR (INHIBIT

THE

DIAGNOSTIC

ARE

STATISTICAL REPORTING) FLAG IS CLEARED.

PRINTED.

S8824080808844080088040080¢

DIS(PLAY)/UNITS: <UNIT-LIST>
4840548804884 8844850460804000828

THE HARDWARE P-TABLES FOR ALL UNITS UNDER
THE

FORMAT

IN WHICH

THE OPERATOR

THEY

WERE ENTERED.

“DROP” COMMAND ARE

TEST

ANY

SO DESIGNATED,

[ T XYY
7]

FLA(GS)
S48804s

THE

CURRENT

SETTINGS

284044502

ZFLCAGS)
[ XYY
Y]

ALL FLAGS ARE

CLEARED.

ALL FLAGS

ARE PRINTED

UNITS

ARE

PRINTED.

THAT

WERE

OUT

DROPPED

3EQ 0017

b
PAGE

EXTENDED P

THE

FULL

TABLE

CAPABILITY

DIALOGUE

THE

HARDWARE

FOLLOWING DISCUSSION GF

WHAT

SOON

SPACE
ARE

THE

BETWEEN

FORMAT,

HARDWARE

UNITS?“

AND

THERE

REVEALED

B8Y

THE

INTERNALLY,

ANSWERED

(WITH

“N" P-TABLES.

PARAMETER

FORMAT.

DIALOGUE

HAPPENS

IS ALLOCATED FOR

SAME

THE

P-TABLE

QUESTION

CORE

ONE

ALL

TO-ONE

QUESTIONS

AND

THE

NUMBER

THE

N),

P-TABLES

CORRESPONDENCE

THE

SLOTS

IN THE

IN GIVING A STRING OF VALUES, COMMAS WITHOUT INTERVENING VALUES MAY
BE USED TO INDICATE A REPETITION OF THE LAST NAMED VALUE.
A

STRING

THE

VALUES MAY

VALUES

REPRESENT

SLATES

ARE

THE

ADDRESSES,

GIVEN

PURE

A RANGE

NUMERICAL

(6-10 FOR EXAMPLE),

DATA,

THIS

STRING 6,7.8,9,10 (AN INCREMENT
THE

SAMPLE

RANGE

TRANSLATES

THE

SAMPLE

1).

RANGE

TRAN-

THE

VALUES

STRING 6,8,10

(AN

INCREMENT OF ).
NOW LET
SET
OF
ARE

FIVE

US SEE HOW WE COULD USE THESE CAPABILITIES TC
CONSTRUCT
A
P-TABLES,
ASSUME THAT WE MHAVE 8 RL UNITS, AND THAT THERE
(S)

5 HARDWARE

FOLLOWING
TEM
5.
(ON

HARDWARE

QUESTIONS

PARAMETERS FOR EACH

IN THE

DIALOGUE).

THE DIALOGUE FOR

SLOTS

THE

THIS 8 RLOX DRIVE SYSTEM.

P-TABLE,

THIS

SvS-

HAS
TWO (2) RL11 TYPE CONTROLLERS ALL TO BE SET AT “BR LEVEL"“
THE FIRST 4 DRIVES ARE RLO1'S AND THE LAST 4 DRIVES ARE
RLO2'S
THE SECOND CONTROLLER):

UNITS

(D)

2?2

UNIT O

RL11

(L)

BUS ADDDRESS (0)
VECTOR

(0)

160

174400 ?

DRIVE (0) 0 ? 0-3
DRIVE TYPE = RLO1 (L)
BR LEVEL (0) S ?
UNIT 4
RL11 (L)

BUS ADDRESS (0) 174400 ? 175400
VECTOR (0) 160 ? 164
ORIVE (0) 0 2 0-3
DRIVE TYPE = RLOL (L) ¥ ? N
B8R LEVEL (0) S ?

2€Q 0018

{3
PAGE

THE

FIRST

USEL FOR

TIME

THE

THRU

THE

CONTROLLER

TROLLER (QUESTION #2),
43),
THE
DRIVE
TYPE

TABLE

TYPE

QUESTIONS

(QUESTION

THE

01),

ODEFAULT

CSR

VALUES

ADDRESS OF

THE CONTROLLFR VECTOR
ASSIGNMENT
(QUESTION #5), AND THE “BR LEVEL'

TYPE

ARE

CON

(QUESTION
(QUESTION

$6).
THE ACTUAL UNIT NUMBERS OF THE RLOL'S FOR QUESTION 04
SIGNED O THRU 3 FOR THE FIRST 4 P-TABLE SLOTS.
THE
ON

THE

WAS A5G-

SECOND TIME THRU THE P-TABLE QUESTIONS (FOR THE RLO2 ASSIGNMENT
THE
SECOND CONTROLLER), THE FIRST QUESTION DEFAULTED TO “RL11"
CONTROLLER.

THE

SECOND QUESTION WAS

ANSWERED

REFLECT

THE

CHANGE IN CSR ADDRESS FOR THE RLO2 CONTROLLER (175400).
THE SECOND
CONTROLLER'S VECTOR WAS ALSO CHANGED TO 164 IN
QUESTION
o3,
THE

R 02
TEST
UNIT NMBERS WERE ASSIGNED VALUES
AND THE DRIVE TYPt WAS SET FOR RLO2'S FOR THE

QUESTION

FROM

THE

05.

O TO 3 IN QUESTION
REMAINING 4 UNITS

THE LAST QUESTION WAS DEFAULTED USING THE

FIRST

44
IN

"BR LEVEL"

PASS.

2.5

THE FOLLOWING QUESTIONS WILL BE ASKED
ON
A
START
COMMAND,
VALUE LOCATED TO THE LEFT OF THE QUESTION MARK IS THE DEFAUL]
THAT WILL BE TAKEN ON A CARRIAGE RETURN RESPONSE.
RL11

(L)

ANSWER YES(Y) IF YOU HAVE
RLV11 CONTROLLER.

BUS ADDRESS

(0)

AN RL11

CONTROLLER,

NO(N)

174400?

ANSWER

WITH THE BUS ADDRESS OF

VECTOR

(0)

THE CONTROLLER.

160?

ANSWER WITH

THE

INTERRUPT

THE

DRIVE(S)

VECTOR OF

THE CONTROLLER

DRIVE (0) 02
ANSWER

DRIVE

WITH

TYPE

= RLO1

ANSWER NO

(N)

BR LEVFL

(0) S?

ANSWER

THE
VALUE

WITH

THE

(L)
DRIVE

CONNECTED

THE

CONTROLLER

THE

CONTROLLER.

?
IS

INTERRUPT

AN RLO2

PRIORITY

YOU HAVE

56Q 0019

PAGE

SOF TWARE PARAMETERS

2.6

THE

FOLLOWING QUESTIONS

CONTINUE.

HAVES.
WAY
IT

THEY

ARE

ASKED

ALLOW

REQUESTED

IN THE

START,

wAY

RESTART,

THE PROGRAM BC
-

ThE SOFTWARE PARAMETERS GIVE THE PROGRAM FLEXIBILITY IN THE
RUNS.
THE PARAMETERS CAN BE MODIFIED ON ~ START, RESTART,

OR CONTINUE BY

ANSWERING (Y)ES

CHANGE S.W.
A YES
WITH
MARK,

FLEXIBILITY

THE FOLLOWING QUESTION:

ANSWER WILL ASK THE FOLLOWING SOFTWARE
PARAMETER
QUESTIONS,
THE PRESENT DEFAULT VALUE PRINTED TO THE LEFT OF THE QUESTION
(THE LAST ANSWER GIVEN IS THE DEFAULT) THE DEFAWLT IS
TAKEN

ON A <«CR>,
CONTROL
START THE TEST.

Z (tZ) WILL DEFAULT ALL REMAINING QUESTIONS AND

USE ALL CYLINDERS (N)?
IF "YES”, THOSE TESTS THAT NORMALLY USE A SELECTED SET
INDERS WILL TEST EVERY CYLINDER ON THE CARTRIDGE.

CviL-

USE ALL SECTORS (N)?
IF

“YES*,

THOSE TESTS

THAT NORMALLY USE

TEST
A
GIVEN
OPERATION
(SUCH AS
VERIFY EVERY SECTOR HEADER.

EXECUTE MANUAL

SINGLE

SEEK DESTINATION)

SECTOR

WILL

READ

AND

INTERVENTION TESTS (N)?

IF »YES", SEEK TIMING, ROTATIONAL TIMING, AND WRITE LOCK ERROR
AND DATA PROTECTION TESTS ARE EXECUTED.
THE ONLY TEST THAT ACTUAL
LY REQUIRES MANUAL INTERVENTION IS THE WRITE
LOCK
TEST
AND
THAT
ng;

TgIle.lE.

SE;PASS AUTOMATICALLY

AFTER

WAITING

30 SECONDS FOR

WRITE

LOWER SEEK LIMIT

"YES”,

(N)?

THE NEXT PARAMETER IS REQUESTED.

ENTER VALUE (DECIMAL) (0)?
THIS LIMIT

IMPOSED ON ALL SEEK OPERATIONS

SUCH THAT

TESTING

IS
NOT OONE BELOW THAT LIMIT.
1IN ADDITION, SETTING THIS LIMIT (OR
THE UPPER LIMIT, SEE BELOW) CAUSES THE FORWORD AND
REVERSE
OSCIL-

LATING
SEEK
TESTS
TO PERFORM DIFFERENTLY (SEE
TESTS THAT REQUIRE ACCESS YO A SPECIFIC CYLINDER

II')'E SPECIFIED LIMIT WILL IGNORE
UPPER SEEK LIMIT

"YES",

TEST DESCRIPTION).
THAT
FALLS
BELOW

THE LIMIT (SEE WRITE/READ TEST PART

(N)?

AN UPPER CYLINDER

MANNER
AS
THE
(OWER SEEK LIMIT.,
FOLLOWING PARAMETER REQUEST,

LIMIT
A

"YES*

IMPLSED

RESPONSE

WILL

THE

CAUSE

SAME

THE

SEQ 00c0

ENTER VALUE

(DECIMAL)

PAGE

TESTED

1IN

(255)?

USE ONLY ONE SURFACE (N)?
IF

' YES~”,

THE NEXT PARAMETER IS REQUESTED.

SPECIFY SURFACE (O OR 1) (DECIMAL) (0)?
THE

WHICHEVER SURFACE

ENTIRE

PROGRAM,

IS SPECIFIED IS THE ONLY
ANY

TEST

THAT

SURFACE

IS DESIGNED

TEST

THE

OTHER

SURFACE IS AUTOMATICALLY BYPASSED.
THE PROGRAM DOES NOT PRINT
INDICATION THAT A TEST IS BYPASSED Iis THIS CASE.

ANY

SPECIFY ERROR LIMIT (DECIMAL) (20)7?
THIS PARAMETER SPECIFIES THE MAXIMUM NUMBER OF ERRORS ALLOWED.
LIMIT IS ON A PER DRIVE BASIS IN A SINGLE PASS.
IF THE ERROR
LIMIT IS EXCEEDED, TrE DRIVE IS OROPPED FROM FURTHUR TESTING.
THIS

DATA COMPARE ERROR LIMIT (DECIMAL) (20)?
THAT

THIS PARAMETER SPECIFIES

WILL

LISTED FOR

THE NUMBER

A GIVEN COMPARE

DATA

OPERATION.

COMPARE
AFTER

THE

ERRORS

LIMIT

IS REACHED, THE DATA ERRORS ARE NOT PRINTED BUT THE COMPARE CONTINUES
UNTIL
THE
END OF THE DATA FIELD.
A TOTAL IS REPORTED AT THE
END OF THE COMPARE.
3.0

ERROR

ALL

ERRORS ARE

INFORMATION

PRINTED

VIA

CONSOLE

DEVICE.

ERROR
NUMBER, TYPE AND PROGRAM LOCATION.
BEFORE AND AT ERROR WITH RELEVENT DATA,

3. 1

THE

ERRORS

ERROR

INCLUDES

INCLUDE REGISTERS

ERROR REPORTING
THE OPERATION MESSAGE (LINE 4) IS GENERATED
IN
A
DYNAMIC
MANNER
BASED
ON
THE SUBSYSTEM FUNCTION BEING EXECUTED AT THE TIME OF THE
ERROR AND THE STATE OF THE FLAGS IN THE LOCATION TAGGED
"OPFLAGS”.
THE POSSIBLE OPERATION MESSAGES ARE GIVEN BELOM.

SEEK - FROM (CYL NUM) DIFF (CYL DIFF) SGN (O OR 1) MO (O OR 1)
WHERE THE VALUES ARE GIVEN IN OCTAL.
THMIS MESSAGE IS THE RESUWLT OF
A SEEK OPERATION THAT WAS VERIFIED 8Y A READ HEADER
AND
THE
HEAD
POGSITION
AFTER
A
SEEK IS IN ERROR.
(THE ACTUAL HEAD POSITION IN
THIS ERROR SITUATION IS GIVEN IN THE RESULT LINE, LINE 5.)
READ DATA
IS A READ DATA OPERATION WHERE SOME FORM OF
ERROR
WAS
DETECTED
IN
THE
ACTUAL READ OPERATION,
THIS ERROR COULD BE
HARDWARE DETECTED SUCH AS DATA CRC, HEADER CRC, HEADER
NOT
FOUND,
ETC.,
OR A SOFTWARE DETECTED ERROR SUCH AS DRIVE READY RESET AFTER
A READ DATA COMPLETED.

READ DATA

BAD DATA

WITH DATA

COMPARE

AN ERROR

THAT

WAS

PAGE

DETECTED

IN THE BUFFER AFTER

A READ

DATA OPERATION.

WHEN

THIS

OPERATION

REPORTED

ODICATES
THE
ACTUAL READ DATA OPERATION COMPLETED WITH NO DETECTLD
ERRORS BUT THE DATA WAS WRONG.
RPEAD HEADER

HEADERS

READ HEADER FOR 40 HMEADERS

WITH HEADER COMPARE

READ HEADER FOR

- HAVE THE SAME GENERAL MEANING AS

THE

READ DATA AND READ DATA WITH DATA COMPARE.
MESSAGES HAVING THE OPERATION OF RCAD HEADER OR READ HEADER FOR 40 HEADERS ARE THE RESULT

OF ERRORS DETECTED IN THE ACTUAL OPERATION WHILE

FOR

HEADERS

OPERATION BUT

WITH HEADER

WRITE DATA

LD DRV

REPORT

INOICATES

THE

READ

NO ERROR

THE

HEADER
ACTUAL

THE HEADER DATA ITSELF WAS IN ERROR.
-

RESET

ALL BASIC OPERATIONS.
HARDWARE OR SOFTWARE.
ASON FOR THE REPORT,

THE

COMPARE

UNLD DRV

WHEN

THE

GET STATUS

AS BEFORE,
THE RESULT

DRIVE

GET STATUS WITH RESET

ARE

THE ERROR DETECTION CAN BE EIVHER
LINE (LINE 5) WILL DEFINE THE RE-

ARE OPERATION MESSAGES THAT WILL APPEAR IN
LOAD AND UNLOAD

SEQUENCE

IS BEING

TESTED.

ANOTHER GROUP OF OPERATION QUALIFIERS WILL BE REPORTED FOR OPERATIONS
THAT
FAIL
1IN
SPECIFIC
TESTS.
THESE
TESTS
ARE
THE
WRITE/READ TEST PART 2, OVERWRITE TEST, AND THE
ADJACENT
CYLINDER
INTERFERENCE TEST.

OPERATION

QUALIFIER

READ DATA WITH DATA
READ DATA
WRITE DATA
READ HEADER

COMPARE

FOL O TO CC SEEK
FOL 255 TO CC SEEK

FOL WRITE (NO SEEK)
ADJ. CYL WRITTEN AFTER FUWD

ADJ.

CYL WRITTEN AFTER REV SK

SK FWD,
SK REV,

WRT-SK REV,
WRT-SK FWD,

OVERWRTY
OVERWRT

THE ABOVE OPERATIONS CAN 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
OP-

ERATIONS BEING DONE.

THE QUALIFIERS “FOL O TO CC SEEK” AND “FOL 255 TO CC SEEK” INDICATE
THAT
THE SEQUENCE OF OPERATIONS INCLUDED A SEEK OF A GIVEN
DIRECTION TO THE CYLINOER WHERE THE TEST IS BEING PERFORMED.
THE

“FOL

WRITE

(NO SEEK)”

QUALIFIER MEANS

THAT

THE

OPERATION

:2‘5‘0 OONE AFTER A WRITE WITH NO HEAD MOVEMENT BETWEEN THE WRITE AND
THE QUALIFIER "ADJ CYL WRITTEN AFTER
FWD
WRITTEN
AFTER
REV
SK" WILL BE REPORTED ONLY

SK”
AND
“"ADJ
CYL
IN THE ADJACENT CvL-

5EQ 0022

7
4

PAGE

INDER INTERFERENCE TEST.
OCCURS
ON
THE
CYLINDER

HEADS

WRT

WERE

MOVED

WHEN

THE

THESE

QUALIFIERS DEFINE

WRITE

WRITE
WRITE

3. 1 .2

THESE QUALIFITRS ARE USFD WHEN THE
ERROR
UNDER
TEST AND DEFINE THE DIRECTION THE

ADJACENT

CYLINDER

WAS

WRITTEN,

THE QUALIFIERS "SK FWD, WRT-SK
REV,
OVERWRT”
SK
FWD,
OVERWRT" WILL BE REPORTED ONLY IN THE

ITIAL

AND

THE

DIRECTION OF

AND
“SK
OVERWRITE

HEAD MOTION BEFORE

REV,
TEST.

THE

IN-

REPORTED
WITH
COMMAND BECAUSE

THE
THE

THE OVERWRITE.

THE QUALIFIER "ON BAD SEC FILES” WILL
OATA
COMMAND IF THE PROGRAM ABORTS
WOWD BE ON THE BAD SECTOR FILES.

BE
THAT

SPECIFIC RESWT 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 RESWW.T

MESSAGE

MAY

REPORT

ERROR
DETECTED
DOURING THE OPERATION AS WELL AS THE ERRORS SEEN AT
;HE E:gEgF THE OPERATION.
ONLY THE FIRST ERROR SEEN IS REPORTED IN
LL

THE GENERAL

FORMAT

RESWT:(VAR 1)
WHERE VARIABLE

FOR

THE RESULT LINE

IS:

IS (VAR 2) SB (VAR 3) (OPTIONAL
1 CAN BE ONE OF THE FOLLOWING:

CONT ERR
DRv ERR

NON-EXSTNT MEM
HOR CRC
DATA CRC
HOR NOT FND
DATA LATE
HDR NOT FND/HDR CRC/0OPI
ORV RDY
SELECTED HEAD
VOL CHK
COVER OPEN
BRUSH HME
WRT LCK

QUALIFIER)

(CONTROLLER ERROR)
(DRIVE ERROR)

(NON-EXISTANT MEMORY)
(HEADER CRC ERROR)
(HEADER NOT FOUND)

(ALL 3 BITS SET)
(DRIVE READY)
(VOLUME

CHECK)

(BRUSH HOME)
(WRITE LOCK)

HOS OUTY
ORV SEL ERR
ORV STATE
SPIN TIMEOUT

(HEADER QUT)
(DRIVE SELECT ERROR)
(DRIVE STATE)
(SPINOLE TIMEOUT SPD ERROR)

CUR HEAD ERR

(CURRENT IN HEAD ERROR)

WRT GAT ERR
SEEK TIMEOUT
WRT

DAT

ERR

(WRITE GATE ERROR)
(SKTO ERROR)
(WRITE

DATA ERROR)

5£Q 0023

¢4

PAGE

INCOMPLETE

HDR/DAT

HDR NOT

(0PI

ERR

(HDR

FND/DAT

ERROR)
CRC

BIT

LATE

DATA

CRC

ERROR

11 OF CS REGISTER)

(HOR NOT

FOUND OR

DATA LATE

ERROR BIT 12 OF CS REGISTER)
(CYLINDER WHEN REPORTING A
SEEK ERROR)

Crt

VARIABLE 2 WILL BE A VALUE THAT DEFINES WHAT
THE
RESULT
ACTUALLY
IS.
THIS CAN BE A 1 OR O TO INDICATE A SET OF RESULT CONDITIONS, A
NUMBER O TO 7 TO INDICATE THE ORIVE STATE, OR A
NUMBER
O
TO
377

(OCTAL)

TO IDENTIFY A CYLINDER NUMBER.

VARIABLE 3 DEFINES THAT THE VALUE GIVEN IS VARIABLE
2
SHOUWLD
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 O IN STATE 2
HEADS OUT

IS O SB

IN STATE

DRV ROY
IS 0 SB 1 IN DATA XFER
SELECTED HEAD IS 1 SB O IN CYCLE P
CRV RDY
IS 0 SB 1 IN STATE S
ORV RODY
IS 1 S8 0 IN SEEK W/0 MOTION
DRV RDY
IS O SB 1 IN 10MS
DRV RDY
IS O SB 1 IN S00MS
DRV RDY
IS 0 SB 1 IN 5SSECONDS
THESE RESULTS,
EXPLANATORY.

WHEN

SEEN WITH THE OPERATION MESSAGE,

OTHER RESULT MESSAGES

“INTERRUPT

WILL

B8E

SELF

THAT CAN BE PART OF AN ERROR REPORT ARE:

TOO 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 ANO THEREFORE NOT
COMPLETING THE READ HEADER IN 1MS.
"FAIL

THIS

RELOAD

HEADS

AFTER

ERR

CLEAR"

IS REPORTED WHEN AN ERROR CAUSES HEADS

ERROR IS CLEARED THE HEADS DO NOT RELOAD.
*UNKN DRV

STATE-NO RDY,

NO ERR,

TO UNLOAD AND AFTER

HDS OUT”

ESI§T£§JSEPORTED WHEN THE PROGRAM CANNOT DETERMINE
Us.

THE

THE DRIVE

STATE

5EQ 0024

WRITE

THIS

PAGE

THE

BAD

ABORTED’

IS REPORTED WHEN

THE

PROGRAM ABORTS

WRITE

TO PROTECT

SECTOR FILES.

COULD NOT RETRIEVE DRIVE STATUSTM"
THIS

IS REPORTED

THE GET

STATUS COMMAND DOES NOT

COMPLETE

S..

CESSFULLY WHEN THE STATUS IS REQUIRED TO REPORT AN ERROR.
“OPI

SET-NO DRIVE RESPONSE*“

THIS

IS REPORTEC

OUT

(OPI

TO CHECK

TIMED

SETS) WHEN THAT COMMAND IS BEING USED IN THE EARLY

TESTS

THE ODRIVE

THE RESULT

WHEN

THE

GET

STATUS COMMAND

INTERFACE.

“NO INTERRUPT ON CMND COMPLETE"
THIS

IS REPORTED WHEN

THE

COMMAND

SUCCESSFULLY

COMPLETES

BUT

THE

CONTROLLER HAS NOT GENERATED AN INTERRUPT,
“ERR DID NOT

CLEAR"

THIS IS REPORTED WHEN THE RESET COMMAND DOES
NOT
CLEAR
TROLLER ERRORS.
THIS IS A CONTROLER RELATED PROBLEM BUT
ED IF SEEN IN THE DRIVE TEST PROGRAMS,

"ORV ERR

THE
CONIS REPORT-

I3 NOT CLEAREC

THIS IS REPORTFD WHEN THE GET
ALL DRIVE ERROKS.

STATUS

W/RESET COMMAND DOES NOT

CLEAR

SENSES AN ERROR BUT

ERROR

"UNEXPECTED ERR"
THIS

IS REPORTED

BITS ARE

WHEN

THE

CONTROLLER

SET.

“BAD SEC FILE FMT ERR"
THIS IS REPORTED IF THE CONTENTS OF THE FILES DO NO
CCRRESPOND
TO
}2% %XPECTED FORMAT.
(REFER TO DEC STANDARD 144 FOR FORMAT SPECIF
-

SEQ 0025

Ne
PAGE

.1, 3

OTHER MESSAGES

OTHER

INFORMATION IS REPORTED UNDER VARIOUS

ARE
:

‘BAD SEC FILES NOT
THIS

MESSAGE

STRC.

CIRCUMSTANCES.

THESE

ALL SEC ASSUMED GOOD.
"

I5 PRINTED WHEN A PARTICULAR

TEST

REQUIRES

THE

BAD

SECTOR
FILES
BUT
THEY HAVE NOT BEEN STORED.
THIS SITUATION WILL
OCCUR IF THIS TEST IS STARTED QUT OF THE NORMAL PROGRAM SEQUENCE OR
IF THE BAD SECTOR FILES COULD NCT BE READ.
“ERROR LIMIT EXCEEDED-UNIT DROPPED"
THIS
FIED

IS REPORTED (WITH THE UNIT NUMBER)
NUMBER OF ERRORS (DEFAULT 20) HAVE

MOST

ERROR REPORTS

PROG MAME
ERR NUM
TEST NUM
SUBTEST NUM
ROUTINE TRACE SEQ (IN SEQ CALLED)
(ADDRESS)
(ADDRESS)

(3)

TEST DESCRIPTION

OPERATION:
RESULT:
ADDRESS OF UNIT UNDER TEST
RLCS
RLOA
RLBA
RLMP
cyL
OP INIT
OP DONE
DRIVE STATUS
WORD NUM IS (XXXXXX) SB (YYYYYY)
TOTAL COMPARE ERRS: (2ZZ) OF (128)

ONLY EXCEPTION TO

ERR PC

(ADDRESS)

(NOT
DETECTED
BY
LINES 5 THROUGH 10.
LINE

THE FOLLOWING FORMAT,

(1)
(2)

(4)
(5)
(6)
(7)
(8)
(9)
(10)
(11)
(12)
THE

HAVE

WHEN MORE THAN
THE
SPECIOCCURED IN ANY SINGLE PASS.

THE ABOVE FORMAT

READ

ERROR).

IS PURE DATA COMPARE

ERRORS

THEN THE FORMAT DOES NOT INCLUDE

IS THE ERROR HEADER AND IS PROVIDED BY

THE SUPERVISOR.

PROGRAM
IS
IDENTIFIED BY NAME WITH THE NUMBER OF
PRESENTLY BEING EXECUTED.

TEST

AND

THE

SUBTEST

THE SUBTEST NUMBER IS UNIQUE IN THIS PROGRAM IN THAT
IT
DOES
NOT
REFER
TO
A
PHYSICAL
SUBTEST WITHIN A GIVEN TEST.,
RATHER IT REFLECTS THE NUMBER OF TIMES A SUBTEST HAS
BEEN
EXECUTED
WITHIN
A
1EST,
CONSEQUENTLY,
ON
A TEST THAT TESTS AN INCREMENTAL TYPE OF

OPERATION (SUCH A INCREMENTAL SEEKS, READ
ALL
HEADERS
FROM
BOTh
SURFACES,
ETC.)
THE
SUBTEST
WILL BE DESCRIPTIVE OF WHERE IN THE
TEST

THE ERROR OCCURRED.

5EG 0026

(59
o7

PAGE

THE ERROR
PORT
WAS

RORS

ARE

CIENT

TRACE

LINE

ATED

P.C.
IS THE PHYSICAL MEMORY LOCATION WHERE THE ERROR
INITIATED.
SINCE MANY FUNCTIONS ARE SUBROUTINED, AND

REPORTED FROM SUBROUTINES,

JOENTIFY

THE ROUTINE

SEQUENCE

FROM

PORTION OF

ROUTINE

THE

THE LOCATION OF

IS PROVIDED.

WITHIN

TME REPORT

(MMICH

TRACE

THE

MAY

TEST

SEQUENCE.

(AS OPPOSED

IS OMITTED.

ERROR P.C.

THE ERROR CALL

CALLED

NOT

SUFI

AND

THE

ROUTINE

INITI-

THE ERROR CALL

TO WITHIN A ROUTINE),

THE CALL

RE
tR

TMIS

INITIATED FROM

ANOTHER ROUTINE,

WHICH MAY

CALLED BY ANOTHER ROUTINE, ETC.
SEVERAL LEVELS DEEP)
THE
ROUTINE
TPACE
SEQUENCE
PROVIDES A TRAJL TO THE ACTUAL LOCATION WITHIN THE
TEST THAY CALLED THE FIRSYT ROUTINE.
THE FIRST ENTRr LISTED IS
THE
LOCATION WHERE THE FIRST ROUTINE WAS CALLED,
LINE 3 IS THE TEST DESCRIPTION AND IS ROUGHLY
OF THE TESY BEING PERFORMED.
LINE 4

FORMED.

IODENTICAL

IODENTIFIES THE ACTUAL HARDWARE FUNCTION THAT

ADDITIONAL

INFORMATION

THIS

THE NAME

BEING

PER-

LINE IS DESCRIPTIVE OF

SPECIFIC USE OF THE FUNCTICN.
FOR EXAMPLE, THE OPERATION LINE WILL
?gsg A‘;g:g HEADERS FOR 40 HEADERS" WHEN ALL HEADERS ARE Bt ING READ
K.

LINE S IDENTIFIES THE ERROR THAT HAS BEEN DETECTED.
THE CONTENT Of
LINE
S
IDENTIFIES WHAT WAS BENG TESTED (SUCH AS ORIVE READY, CON
TROLLER ERROR, DRIVE STATE, ETC.), WHAT IT IS AND
WHAT
IT
SHOWD

?S.ERRB%NE

S MAY BE REPEATED

IF MORE

THAN ONE

TESTED

ITEM

IS FOUND

IN ADDITION LINE S5 WILL REPORT ANY HARDWARE DETECTED ERRORS SUCH AS
OPERATION INCOMPLETE, MEADER CRC, ETC.
IN THIS CASE THE FIRST LINE

PRINTED

AS RESWT

HNF/DIT,
LOWING

WILL

AND HCRC/DCRC.

TRUTH

TABLE:

DETERMINED BY

HNF/DLY

DCRC/HCRC

1
0
1
0
1

1
1
0
1
0

LIN
6 IDENTIFIES
THISERADDRESS
IS

THE

THREE ERROR

BITS

0PI,

THE LINE WILL BE DETERMINED AS IN THE FOLOPI

1
1
1
0
0

ME SSAGE

HOR NOT FND/HOR CRC/0PI ERROR
HOR CRC ERROR
HOR NCY FND ERROR
DATA CRC ERROR
DATA LATE ERROR

THE PHYSICAL ADDRESS
BY
UNIBUS
ADDRESS

OF
OF

THE
THE

UNIT

UNDER

CONTROLLER

LINE 7 NAMES THE CONTROLLER REGISTERS (AND CYLINDER AND HEAD
THESE ARE APPLICABLE IN THE REPORT) TO BE REPORTED.

LINE 8 PROVIDES THE CONTENTES OF CONTROLLER REGISTEHS WHEN
ERATION WAS INITIATED.

TEST.

AND DRIVE

THE

WHERE

OP-

2EQ D027

PAGE

LINE 9 PROVIDES THE CONTEN"> OF THE CONTROLLER REGISTERS
WHEN
THt
ERROR
OEING
REPORTED
WAS DETECTED.
FREQUENTLY THE REGISTER CON
TENTS OF OP INIT AND OP DONE WILL BE DIFFERENT.
OP INIT MAY
INDI
CATE
A SEEK WAS BEING PERFORMED BUT OP OONE MAY INDICATE THE ERROR
WAS

DETECTED BY

CUTED

A READ MEADER.

AND DID NOT

WAS DONE

THE HEADS

PROPERLY
WERE

THE

REASON

THMAT

POSITION HEADS AND WHEN
THE

SEEK

THE

10 IS THF DRIVE STATUS.
THIS LINE IS
ONLY
REPORTED
REGISTER DOES NOT (ONTAIN THE ACTUAL DRIVE STATUS.

LINE

AND LINE

BAD DATA

12 ARE REPORTED

OPERATION,

THE ERROR

WAS

EITHER DATA OR HEADERS.

IS REPORTED FOR

ALL

EXC

WRONG CYLINDEF..

LINE
RLMP

COMPARE

WAS

READ HEADER

DETECTED

1IN ADDITION,

READ ERRORS.

THE

GOOD AND

ERROR HALTS

ERROR HALTS ARE
WITH /FLAG:HOE.

SUPPORTED PER DESCRIBED
IN
THERE ARE NO OTHER HALTS.

PERFORMANCE

THE

SECTION

AND PROGRESS REPORTS

PERFORMANCE REPORTS

THIS PROGRAM WILL NOT GIVE

ANY PERFORMANCE REPORTS.

PROGRESS REPORTS

THE

RL11/RLV11

CONTROL

THE SUBSYSTEM,

RLCS

81T
817
BIT

CONTROLLER HAS

THE FOLLOWING FOUR(4)

CONTROL AND STATUS REGISTER (XXXXX0)

15 - COMPOSITE ERROR
14 - DRIVE ERROR
13 - NON EXISTENT MEMORY ERROR

BIT 12 - HEADER NOT FOUND (WITH BIT 10 SET)
DATA LATE (WITH BIT 10 CLEAR)

HEADER CRC (WITH BIT 10 SET)
DATA CRC {WITH BIT 10 CLEAR)

REGISTERS

FOR

€0 0028

PAGE

NONDUWN-O

BIT 10
OPERATION INCOMPLETE
BIT
9/8 - DRIVE SELECT (0 3)
CONTROLLER READY
7
BIT
BIT
6
INTERRUPT ENABLE
BIT
5 - EXTENDED BUS ADDRESS (BI7 17)
BIT
&4 - EXTENDED BUS ADDRESS (BIT 16)
BIT 3-1 FUNCTION CODE
- NOP (POP-11) MAINT (LSI 11)
WRITE CHECK
- GET DRIVE STATUS
- SEEK

GIT

RLBA

READ HEADER
WRITE DATA
READ DATA
READ WITHOUT HEADER COMPARE

DRIVE RERDY

BUS ADDRESS REGISTER

(XXXXxX2)

B8ITS 15 1 BUS ADDRESS OF DATA TRANSFER
BIT O SHOWD BE O
RLOA

DISK

ADDRESS REGISTER

(XXXXX4)

BIT 15-7 - CYLINDER ADDRESS FOR TRANSFER
BIT 6 - SURFACE FOR TRANSFER
81T 5-0 - SECTOR FOR TRANSFER (1-40.)
FOR

SEEK

BIT
BIT
B8IT
BIT
817
BIT
8iT

15-7 - DIFFERENCE TO NEW CYLINDER
6-5 - MUST BE ZERO (0)
4 - SURFACE (0=UPPER, 1-LOWER)
3 - MUST BE ZERO (0)
2 - SEEK OIRECTION( 1=IN / O=0UT )
1 - MUST BE ZERO (0)
O - MUST BE ONE (1)

FOR

GET

FUNCTION

STATUS FUNCTION

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

BIT 15-4 - IGNORED SHOUWLD BE ZERG (0)
BIT 3
DRIVE RESET
BIT 2 - MUST BE ZERO (0)
BIT 1 - MUST BE ONE (1)
BIT O - MUST BE ONE (1)

%G Oue

PAGE

RLMP

MU TIPURPOSE REGISTER

FOR READ/WRITE FUNCTION

BIT

WORD COUNT (TWO'S COMPLIMENT)

FOR READ HEADER FUNCTION
BIT

15-0

HAS DORIVE

BIT

DISK HEADER OF SECTOR (FIRST READ)
ZERO WORD (SECOND READ)
HEADER CRC (THIRD READ)

STATUS

WRITE DATA ERROR

CURRENT MEAD ERROR (CHE)

WRITE LOCK STATUS (W)
SEEK TIME OUT (SKTO)
SPIN ERROR (SPE)
WRITE GATE ERROR (WGE)

VOLUME CHECK (VC)
DRIVE SELECT ERROR (DSE)
ORIVE TYPE IS RLO2 IF SET
SURFACE (O=UPPPER, 1sLOMER)
COVER OPEN

6.0

2-0

-STATE BITS

NONDUWN
O

BIT

- LOAD STATE
SPIN UP
BRUSH CYCLE
- LOAD HEADS
SEEK - TRACK COUNTING
- SEEK - LINEAR MODE
- UNLOAD HEADS
- SPIN DOWN

TEST SUMMARIE
TEST

SEEK

TIMING

(XX
T Y Y]

(P-CLOCK IS REQUIRED
POSITION HEADS AT

TO PERFORM THIS TEST.)

CYLINDER O.

")
PAGE

D0 64 SEEKS FROM O TO 1 AND 1 TO C, MEASURING
THE
SEEK
TIME
FOR
EACH
SEEK,
AVERAGE THE SEEK TIMES (FORWARD AND REVERSF
INDEPENDENTLY) AND REPORT,
REPEAT

ABOVE

SEEKING BETWEEN

255 FOR RLOL AND 255
REPEAT

ABOVE

FOR RLO1
REPEAT

CYLINDER

TO 256 AND 256

127

128

AND

254

TO 511 FOR RLOZ2.

SEEKINC ST TWEEN CYLINDER

127

AND

128

10 256

AND CrLiNDER C TC 256 AND 256 TO 511 FOR RLO2.

ABOVE

SEEKING BETweEN CYLINDER

AND

255

FOR

RLOL1

AND

TO S11 FOR RLOZ2.
THE

SEEX

TIMES WILL

MEASURED

RECEIVED.

TEST

THE

SHOWN

REV

INDICATES WHERE

BELOW.

THE

MAX TIME

X
X

X
X
X

X
X

TIME WILL

TIME

INTERRUPT

OUTER

X
X

2 BASIC READ DATA

SEEK COMMAND UNTIL

MIDDLE

X
X

MID CYL FWD
MID CYL REV
MAX C¥_ FWD
CYL

REPORTED

START

INNER

1 CYL FWD
1 CYL REV

MAX

FROM

X
X

BE REPORTED.

TEST

(XY
YY
Y}

POSITION HEADS

DO READ DATA,

ERROR,

READ

MAX

HEAD 1.
SECTOR

CYLINDER.

CHECK FOR ANY ERRORS
THROUGH

AND

UNTIL

REPORY.

NO ERROR ON READ.

REPORT ALL ERRORS BUT DO NOT INCREMENT ERROR COUNT.
IF
NONE
CAN BE READ, SUCCESSFULLY, REPORY THAT FACTORY BAD SECTOR FILE
gm gg READ, INCREMENT ERROR COUNT AND PROCEED WITH READ OF
ON SECTOR WITH NO CRC ERROR,

ARE
NOT
SIA(%ATHAT

VERIFY DATA FORMAT

(WORD O AND

O, WORD 2 AND 3 ARE O, LOCATE FIRST WORD OF ALL ONE'S
WORD TO WORD 127 ARE ALL
ONE’'S.)
STORE
BAD
SECTOR

READ DATA,

HEAD ONE,

SECTOR 20.

CHECK

FOR

ANY

ERRORS

AND

REPORT,
IF ERROR, READ SECTOR 21 THROUGH 39 UNTIL NO ERROR ON
READ.
REPORT ALL ERRORS BUT DO NOT INCREMENT ERROR COUNT,
IF

NONE

FILES

CAN BE READ SUCCESSFULLY,
CANNOT

READ,

ON SeCTOR 4ITH NO CRC

SECTOR DATA.

INCREMENT

ERROR,

REPCRT

THAT

ERROR COUNT

SOF TWARE BAD
AND EXIT

VERIFY DATA AS ABOVE.

SECTOR

TEST.

STORE

BAD

PRRSIVE/ Y

(4
PAGE

NOTE :

TEST

SURFACE

WRITE/READ DATA

TEST

SELECTED

(PART

THIS

TEST

WILL

BYPASSED.

CHECK

FOR

ANY

ERROR,

sttt
e

POSITION MEADS AT CYLINDER O
WRITE

PATTERN

READ HEAD O,
REPEAT

CHECK

FOR

SECTOR O,

OTHER DATA

SECTOR 0.
TRACK

NOT,

THAT

NOTE:

ON HEAD

IF CYLINGER O,

DATA,

TEST

SECTOR O.

CHECK

FOR

PATTERNS

TRACK

REPEAT

CRC

DATA.

THROUGH 8).

TEST

BAD,

IS GOOD AND DO ABOVE

LIMITS

COMPARE

SECTOR O IS LISTED IN BAD SECTOR

ABOVE

IT IS LISTED AS

CYLINDER

ERROR.

ARE

CYLINDER

LOCATE

FIRST

TRACK

SECTOR

DONE

TESTS.

1IGNORED,

TESTING

CYLINDER
O.
HOWEVER, CHOOSING A SINGLE SURFACE WILL
LIMIT TESTING TG THAT SURFACE.

ROTATIONAL

TIMING

TEST

sebbbs

(P CLOCK

IS REQUIRED TO PERFORM THIS

TEST.)

POSITION HEADS TO CYLINDER O.

00 WRITE DATA TO CYLINDER O,
INTERRUPT
.

HEAD

00 WRITE DATA TO CYLINDER O,

HEAD O,

OCCURS,

SECTOR

SECTOR O.

WAIT

START

TIMING.

SPINDLE

REPEAT
TIME.

TEST 54 TIMES.
REPORT THE AVERAGE «S SPINDLE
THE T.TME REPORTED IS IN 100‘S OR MICROSECONDS.

ROTATION

TEST S WRITE/READ

TEST

RESW.T

FOR

INTERRUPT

s008s0

TIMING.

WHEN

ROTATIGH TITME.

STOP

(PART 2)

CC_IS CURRENT CYLINODER SELECTED FROM SET.
LET SELECTED CYLINDER SET BE AS DEFINED IN PARAGRAPH 4.3,
SEEK FORWARD TO CC.
WRITE PATTERNS 1
THROUGH
TIMES ON HEAD O.
READ/COMPARE ALL DATA,
SEEK REVERSE TO

"“LOLIMIT”.

SEEK FORWARD TO CC.

SEEX FORWARD

"MILIMIT~,

SEEK REVERSE

KEPEATED

READ/COMPARE

ALL
DATA,
SEEXK
FORWARD
TO ~MILIMIT”.
SEEK REVERSE 1O CC.
READ/COMPARE ALL DATA.
REWRITE
DATA
PATTERNS
1
THROUGH
8
REPEATED S TIMES ON HEAD O.
READ COMPARE ALL DATA,

ALL

DATA,

SEEK

REVERSE

“LOLIMIT”.

TO CC.
SEEK

READ/COMPARE
FORWARD

TO CC.

SEQ 0032

PACE

READ/COMPARE

ALL

DATA,

REPEAT

ABOVE

TEST

FOR

REPEAT

ABOVE

TESTS

HEAD

FOR

ALL

1.
CYLINDERS

SELECTED

CYLINDER

SET,

SET

NOTE

IF ANY OF THE SECTORS IN THE
SELECTED
CYLINDER
ARE LISTED AS BAD, THAT SECTOR WILL BE BYPASSED.

NOTE

TF THE “USE ALL
“y*,
THE
TEST

CYLINDERS” PARAMETER
MWILL
INCLUDE
ALL

1S SPECIFIED
CYLINDERS
IH

AS
THE

SELECTED PARAMETER SET,
NOTE

IN THE
FIRST
PASS
OF
THE
PROGRAM
THIS
TEST
IS
EXECUTED
ON
ONLY
6
OF
THE CYLINOERS LISTED IN THE
CYLINDER SET.
THOSE USED WILL BE EVERY 8TH
ENTRY
IN
THE

TABLE.

ENTRIES IN THE
NOTE 4:

TEST

6 WRITE

THE

SECOND AND

SUBSEQUENT

PASSES

SELECTED CYLINDER SET ARE USED.

ALL

TESTING WILL BE DONE BETWEEN UPPER AND
LOWER
LIMITS,
CYLINDERS IN THE CYLINDER SET BEYOND THESE LIMITS WILL
NOT BE TESTED.
CHOOSING A SINGLE SURFACE
WILL
LIMIT
TESTING TO THAT SURFACE.
LOCK

ERROR

AND DATA PROTECTION

TEST

sessss

D0 WRITE DATA PATTERN O AT

SECTOR O.

READ DATA AMD VERIFY,

ASK OPERATOR TO WRITE LOCK DRIVE.
DO GET
STATUS
LOOP
WRITE LOCK IS SET.
IF NOT SET IN 30 SECONDS, ABORT THE

UNTIL
TEST.

WHEN WRITE LOCK IS SET, DO WRITE DATA PATTERN 1 AT
SECTOR
O.
REPORT
FAILURE
IF
DRIVE
ERROR DOES NOT SET OR IF ANY OTHER
ERROR SETS.
CLEAR ERROR AND READ DATA
AT
SECTOR
O.
CHECK
THAT DATA HAS NOT BEEN DISTURBED.
REQUEST

OPERATOR

TO RESET WRITE

NOTE :

THIS TEST IS EXECUTED ONLY IF
THE
PROGRAM
OPERATION
MODE
2
IS
SELECTED,
MANUAL INTERVENTION TESTING IS

%IEE:EIgE LOCK IS RESET.

REQUESTED,
TEST

ADJACENT

LOCK.

GET

STATUS

IF NOT RESET IN 30 SECONDOS,

LOOP

REPEAT

AND IS RUN IN FIRST PASS ONLY.

CYLINDER

INTERFERENCE

TEST

AT
Y Y]

CC IS CURRENT CYLINDER SELECTED FROM SET
LET SELECTED CYLINDER SET BE AS DEFINED IN PARAGRAPH 4.3,
DATA PATTERN IS 15555S.
SEEK FORWARD TO CYLINDER CC.
SECTORS.
READ/COMPARE DATA.

MWRITE PATTERN ON

TRACK

ALL

5EQ 0033

PAGE

SEEX FORWARD

'HILIMIT”,

PATTERN.
SEEK
WRITE PATTERN.

ADJACENT

AFTER

HEADS

SEEK

REVERSE

C(CC-1.

WRITE

FORWARD
TO
“MILIMIT".
SEEK REVERSE
(THIS HAS BRACKETED ORIGINAL WRITE WITH

CYLINOERS.

CAME

10 CC.
WRITES

NOTE ADJACENT CYLINDERS WERE WRITTEN

ON CYLINDER

REVERSE

OIRECTION

WHICH

OPPOSITE OF CENTER CYLINDER.)
SEEK REVERSE TO
DATA
FROM
ALL

ATTRIBUTED

“LOLIMIT“.
SECTORS.

TO ADJACENT

SEEK FORWARD TO

PATTERN,

WRITE
TO CC.

CYLINDER

"WILIMIT“.

SEEK

REVERSE

PATTERN.

CC+1,

READ/COMPARE

MOTE

NOTE 2:

ABOVE

“LOLIMIT”,

DATA

IN ALL

CC.

SEEK

“LOLIMIT",

SEEK FORWARD TO

SEEK

"MILIMIT»,

SECTORS.

ANY

THE

TEST

WILL

IN THE

DATA
CC-1,

FORWARD

SEEK REVERSE

ERRORS

“USE ALL CYLINDERS” PARAMETER IS

THE

(READ

IF ANY SECTOR ON A SELECTEDO CYLINDER
THAT SECTOR WILL BE BYPASSED.

WRITE

FORWARD

TO ADJACENT CYLINDER INTERFERENCE.

TESTS ON HEAD

MAX CYL)
NOTE

INTERFERENCE.

SEEK REVERSE
TO

SEEK REVERSE

WRITE PATTERN.

COMPARE) ARE ATTRIBUTED
REPEAT

SEEK FORWARD 7O CC.
READ/COMPARE
ANY
ERRORS
(READ OR COMPARE) ARE

INCLUDE

ALL

CYLINDERS

LISTED

BAD,

SPECIFIED
(EXCEPT

O AND

SELECTED PARAMETER SET.

IN THE
FIRST
PASS
OF
THE
PROGRAM
THIS
TEST
IS
EXECUTED
ON
ONLY
3
OF
THE CYLINDERS LISTED IN THE
CYLINDER
SET,.
THOSE
USED
MWILL
BE
THE
FIRST,
TWENTYFIRST,

AND FORTYFIRST ENTRIES

IN THE

TABLE.

SECOND AND SUBSEQUENT PASSES EVERY FOURTH CYLINDER SET
ENTRY WILL BE TESTED.
NOTE 4:

TESTING WILL BE DONE BETWEEN UPPER AND

LOWER

LIMITS.

CYLINDERS IN THE CYLINDER SET BEYOND THESE LIMITS MWILL
NOT BE TESTED.
CHOOSING A SINGLE SURFACE
WILL
LIMIY
TESTING

TEST 8 OVERWRITE
(X T

THAT

SURFACE.

TEST

CC IS CURRENT CYLINDER SELECTED FROM SET
SELECTED CYLINDER SET DEFINED IN PARAGRAPH 4.3,

PATTERN A
PATTERN 8

=
=

125252
000000

SEEK FORMARD TO CC.

HEAD O.

WRITE DATA OF PATTERN A IN

READ/COMPARE DATA.

SEEK FORWARD TO "HILIMIT”,
8.
SEEK
REVERSE
TO

REARD/COMPARE DATA,

ALL

SEEK REVERSE TQ CC.
WRITE
"LOLIMIT~,
SEEK
FORWARD

SECTORS,
PATTERN
TO
CC,

5¢Q 0.7%

J3
PAGE

SEEX FORWARD

PATTERN

SEEK FORWARD
“HILIMIT"

ANY

CC.

(READ

TESTS

ON HEAD

SEEK

FAILURES

"HILIMIT",

READ/COMPARE

SEEK REVERSE
DATA,

WRITE

REVERSE

70 CC.

SEEK

PATTERN

710

READ/COMPARE

COMPARE)

ARE

CC.

REVERSE

SEEK

DATA

“LOLIMIT-,

FORWARD

DATA,

ATTRIBUTED

WRITE

OVERWRITE

PROBLEM.

REPEAT

ABOVE

NOTE

IF ANY SECTOR ON A SELECTED CYLINDER
THAT SECTOR WILL BE BYPASSED.

IS LISTED

NOTE

IF THE “USE ALL
“v*,
THE
TEST

IS
SPECIFIED
CYLINDERS
1IN

CYLINDERS” PARAMETER
WILL
INCLUDE
ALL

AS BAD,

AS
THE

SELECTED PARAMETER SET.
NOTE

NOTE 4:

IN THE
FIRST
PASS
OF
Ti&€
PROGRAM
THIS
TEST
IS
EXECUTED
ON
ONLY
3
OF
THE CYLINOERS LISTED IN THE
CYLINDER
SET.
THOSE
USED
WILL
BE
THE
FIRST,
TWENTYFIRST,
AND FORTYFIRST ENTRIES IN THE TABLE.
ON
SECOND AND SUBSEQUENT PASSES EVERY FOURTH CYLINDER SETY
ENTRY WILL BE TESTED.
TESTING WILL BE DONE BETWEEN UPPER AND

LOWER

LIMITS,

CYLINDERS IN THE CYLINDER SET BEYOND THESE LIMITS WILL

NOT BE

TESTED.

TESTING TO

THAT

CHOOSING A SINGLE SURFACE
SURFACE.

WILL

LIMIT

SEG 0035

<3
SVC.MLB SOURCE F1LE
TABLE OF CONTENTC
3

166

S6-

58/

v04.00

DATA

GLOBAL

MESSAGES

CLEANUP CODE SECTION
GLOBAL SUBROUTINES

)
1
1
1
1
1
1
1
1

14:40:57

SECTION

2
1

1213
14 151617181920-

JUAN 83

GLOBAL DATA SECTION
ERROR MESSAGES
INITIALIZATION SECTION

MACRO OEF INITIONS

GLOBAL

1
1

8
9-

MACRO

AUTO DROP SECTION

oTEST 1
4+SEEK TIMING
+TEST 2
++BASIC READ DATA (BAD SECTOR FILE)
«JEST 3
++WRITE/READ DATA (PART 1)
+TEST 4
+sROTATIONAL TIMING
s+TEST S
+sWRITE/READ DATA (PART 2)
+TEST 6
««WRITE LOCK ERROR AND DATA PROTECTION
«TEST 7
«sADJACENT CYLINDER INTERFERENCE
sTEST 8
ssOVERWRITE
PARAMETER CODING

5EG 0035

N
0t
o pos [ —

VMd W [ OWVW®

T UL W,

SVC.MLB SOURCE

000000

FILE MACPG vO4.00 20 JAN-83

000001

002000
002000

000001
000001
000001

000000
000000

14:40:57 PAGE 2

PART2=a}

.ENRBLE ABS
.ENABLE AMA
. =2000
JMCALL
SVC

svC
SVCTSTs=1
SVCSUB=1
SVCBGL
=1
SVCINS=0
SVCTAG=0

5€Q 0037

N
LU
WrO
O VB~

NN
WWWWNNND

gmmmmmmnwnwp.—.—-».-u
NBUWNFOOBNOCNBUWNNHOO®

whre

SVC.MLB

SOURCE

FILE

MACRO v04.00 20 UAN-83

14:40:57 PAGE

5€Q 0038

.SBTTL

MACRO DEF INITIONS

.MACRO

WAITUS
MOV
JSR

ARG
ARG, XDELAY
PC.TIME

sMACRO MICRO SEC WAIT
s SAVE ARGUMENT

WAITMS
MOV
JSR

ARG
ARG, YDELAY
PC.XTIME

sMACRO MILLI-SEC WAILT
: SAVE ARGUMENT
:CALL TIMING ROUTINE

.ENDM
.MACRO

.ENDM

.MACRO

.ENDM

.MACRO

TIMING ROUTIN:

ABORTWAIT
MOV
XDELAY, TEMPO
MOV
YDELAY, TEMP

;MACRO CLEAR UNELAPSED

CLR
CLR

XDELAY
YOELAY

;ABORT
;ABORT

GETTIM
MOV
CLR

ARG
86CLKCTR,
ARG

S0CLKCSR

STCLK
CLR
CLR

a8eCLKCSB
84CLKCTR

MOV

.ENDM

:CALL

023 ,34CLKCSR

TIME

s SAVE MICRO-SEC RUN TIME
sSAVE MILLI SEC RUN TIME
MICRO-SEC
MILLI-SEC

WAIT
WAIT

+MACRO GET ELAPSED TIME
;STORE CLOCK COUNTER CONTENTS
;EVENT FINISHED, STOP CLOCK
{MACRO START

P-CLOCK

sCLEAR CLOCK COUNT SFET BUFFER
:CLEAR CLOCK COUNTER
; INITIALIZE CLOCK FOR COUNT UP MOOE,
+/710 KHZ RATE,

AND

START

CLOCK

SVC.MLB

SOURCE

FILE

MACRO

v04.00 20 JUAN 83

14:40:57 PAGE

5€£Q 0037

DEF INITIONS
BN
-

NLIST

5 002000

POINTER BGNSW,BGNSF T,8GNOU

102
060
000000
030000

“w e

036620
036774
014102
014120
037400
000000
000000
000000
002000
014136
000000
000000
000000
003
003
000000
000000
000000
002216
000000
000000
000000
000000
015616
000000
002122
104035
000000
014156
015470
015132
014072
000000
000000
000000

. WORD
.WORD
. WORD

.WORD
.WORD
.WORD
. WORD
. WORD
.WORD
EMT
.WORD
LWORD
.WORD

.WORD
.WORD
.WORD
.WORD

ENDMOD

.WORD

DESCRIPT

-4

000

CZRLN,8,0,30000,0
.ASCII sC/
.ASCII 72/
.ASCII /R/
.ASCII /sL/
.ASCII /N/
O
.BYTE
.BYTE
O
.BYTE
O
rB/
.ASCII
/0/
.ASCII
.WORD
O
.WORD
30000
.WORD
L $HARD
.WORD
L$SOFT
. WORD
.WORD
. WORD
. WORD
.WORD
.WORD
.WORD
. WORD
$DISPATCH
.WORD
.WORD
.WORD
$REVISION
.BYTE
$EDIT
.BYTE
. WORD
.WORD
w

103
132
122
114
116
000
000

MDHEDR

rnX
PEE

BGNMOD

HEADER

$OVTYP

002000

8 002000
002000
002001
002002
002003
002004
002005
002006
002007
002010
002011
002012
002014
002016
002020
002022
002024
002026
002030
002032
002034
002036
002040
002042
002044
002046
002050
002051
002052
002054
002056
002060
002062
002064
002066
002070
002072
002074
002076
002100
002102
002104
002106
002110
002112
002114
002116
002120
9 002122
10 002122

o
C

6
7

CND,MD,ME

OCIroOo00OroooNnNoOOroooo e

MACRO

L$DESC
E$LOAD
O
LS$INIT
L$CLEAN

L$AUTO
L$PROT
©
O
O

SVC.M
B SOURCE FILE

MACRO

DEF INITIONS

002122
002125
002130
002133

002136

0v2141
002144
002147
002152
002155
002160

002163

002166
002171
002174
002177
002202
002205
002210
002213
11 002216
002216
002221
002224
002227

MACRO VO4.00 20 JAN 83

103
114
124
124
123
113
040
124

111
101
124
111
040
104
122

105

040
101
104
101

122
061
114
000

132

122

116

040

040
105
046

105
123
105

122
101
117
114

111
116
101
040
111
040
122
104
101
000

114
054
060

14:40:57 PAGEF

LASCIZ

/CZRLN TESTS Sktw & ROTATIONAL

.EVEN
DEVTYP
.ASC1Z

<RLO1,RLO2>

TIMING AND WRITE

4 REAL DATA/

123

117
124

116
040

115
107
116
127
124
046
105
040
124

060
122
062

/RLOL ,RLO2/

.EVEN

12
13
14
15
16

s1COPYRIGHT (C) 1979,1983
s THIS SOF TWARE IS FURNISHED UNDER LICENSE FOR USE ONLY
tON A SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH
sTHE INCLUSION OF THE ABOVE COPYRIGMT NOTICE. THIS
sSOFTWARE, OR ANY COPIES THEREOF, MAY NOT BE PROVIDED

18
19

s1OR OTHERWISE MADE AVAILABLE

TO ANY OTHER PERSON EXCEPTY

sFOR USE ON SUCH SYSTEM, AND TO ONE WHO AGREES TO THESE
sLICENSE TERMS. TITLE TO OWNERSHIP OF THE SOF TWARE SHALL

20
2l
22
23
24

sAT ALL

TIMES REMAIN IN DEC.

sTHE INFORMATION IN THIS DOCUMENT 15 SUBJECT TO CHANGE
sMITHOUT NOTICE AND SHALL NOT BE CONSTRUED AS A COMMITMEN"

;BY OIGITAL EQUIPMENT CORPORATION.

27
28
29
30

;DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY
sOF ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED 8v DEC.

31
32
33
34 002230
35
36 002230

.SBTTL

GLOBAL DATA SECTION

BGNMOD

GLBEQAT

EQUALS

: BIT DIFINITIONS
100000
040000

BIT15++ 100000
BIT14== 4C000

/4
SVC.M
B8 SOURCE F Lt MACRO
GLOBAL DATA SECTION
020000
010000
004000
002000
001000
000400
000200
000100
000040
000020
000010
000004
000002
000001
001000
000400
000200
000100
000040
000020
000010
000004
000002
€00001

v0O4.00 20 .JAN A3

14:40:57 PAGE

BIT13e- 20000
BIT12e- 10000
BITll=- 4000
BIT10=- 2000
BIT09+= 1000

BITO8== 400
BITO7=»

200
81106-- 100
BIT0S=- 40
BITO4en 20
BITO3=~ 10
8IT02e- 4
8IT01-- 2
8ITOQ== 1
3

BIT9s=s
B8I18==
BIT7==
BIT6==
BITS=-

BIT4es

BIT3e=
BIT2=»
BIT1=»
BITQ=e

81709
81708
817107
BIT06
BITOS
8IT04
817103
8IT102
8I701
BIT0O

; EVENT FLAG OCFINITIONS
H
EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION
000040
000037
000036
000035
000034

EF .START==
EF .RESTART=»
EF .CONTINUVE==
EF .NEW==
EF .PWR==

32.
31.
30,
29.
28.

s PRIORITY LEVEL DEFINITIONS
000340
000300
000240
000200
000140
~00100
000040

PRIO7=»
PRIO6==
PRIOS=»
PRIO4
=«
PRIO3==
PRIO2««
PRIOL=»
PRIOO=»

340
500
240
200
140
100

sOPERATOR FLAG BITS
000004
900010
000020
000040
000100
000200
00C400
001000

EVl ==

LOT ==

ADR
= «

IDYa=

ISRes

=
UAM»
BOE=>

PNT
=

10
20
40
100
200

400
1000

i
H
H
1
:

START COMMAND WAS

RESTART

ISSUED

COMMAND WAS

ISSUED

CONTINUE COMMAND WAS ISSUED

A NEW PASS HAS BEEN STARTED
A POWER FAIL/POWER-UP OCCURRED

SVC.MLB SOURCE FI_E MACRO vO4.00 20 JAN 83
GL OBAL DATA SECTION
002000
00400C
010000

020000
040C00
100000

14:40:57 PAGE

=
IBE

LOE-HOE ==

CSR
VECT

PRIOR
TYPDR

DRSB
CNT
i

MISWI

LOLIM
HILIM

HEAD
ERLIM

OCLIM
000001

000010
010000
020000
0400N0
100900
000102
000104
000106
000110
000112
000114
000116
000100

007777
000002
000001
000010
000020
000040
000100
000200
00040¢C
001000
002000
004000
010000

]

ALLCYL
ALLSEC
DRSELT
HOAL IGN
HEADLM
HICYL
LOCYL
MITEST

4000

10000
20000

40000

100000
OFFSETS FOR MARDWARE P
=0
-2
=4

=12

OFFSET FOR SOFTWARE
-0
2
-4

-6
=10
=12

NOOP
3

OPERATION FLAGS

RDHERD
WIDATA
RDDATR
RONOHR

s7777
HORCHP
=817T01
DATACMP *8IT00
cYLup
=BIT02
ULOAD
=8I703
INOUTS
=B1IT04
OUTINS
=BIT05

COMPOP

FOLWRT
REVSKS
FWOSKS
REVSKO
FWOSKO

B8ADADD
SEEKOP

TADLE

1BUS ADDRESS
sVECTOR ADDRESS
tPRIORITY
sORIVE TYPE
sORIVE SELECT B8I7
1 CONTROLLER TYPE

TABLE

s SOF TWARE
sCYLINDER
tCYLINDER
s SELECTED

PARAMETERS SWITCHES
LOWER LIMIT
HIGM LIMIT
HEAD FOR RUNNING TESTS

tERROR LIMIT
sDATA COMPARE ERROR | IMIT

BIT ASSIGNMENT FOR SOF TWARE P-TABLE SWITCHES
=8IT00
+USE ALL CYL INDERS
*81701
sUSE ALL. SECTORS
=8IT02
+EXECUTE DRIVE SELECT TEST
=8IT03
$EXECUTE HEAD ALIGNMENT TEST
=8IT12
sHEAD LIMIT SPECIFIED FLAG
=8IT13
+HI LIMIT SPECIFIED FLAG
=BIT14
sLO LIMIT SPECIFIED
=BIT1S
$EXECUTE MANUAL INTERVENTION TESTS
SUBSYSTEM FUNCTIONS
=102
=104
*106
=110
=112
=114
=116
=100

CKDATA
GTSTAT
SEEK

3EG 0042

2000

IXE--

IERe«=~

=BIT06
=BITO7
81708

=81709

=BIT10
=8IT11

8IT12

iMRITE CHECK
sGET STATUS

; SEEK
tREAD HEADER
sWRITE DATA
sREAD DATA

sREAD DATA,

IGNORE MHEADERS

sNO ' OPERATION

+COMPOSITE OPERATION FLAGS
;HEADER COMPARE OPERATION
:DATA COMPARE OPERATION
1CYCLE UP OPERATION
1UNLOAD OPERATION
s IN-QUT SEEK OPERATION
1OUT-IN SEEK OPERATION
+FOLLOWING WRITE OPERATION
tREV SEEK SEQ (ADJ INTERFERENCE)
1FWD SEEK SEQ (ADJ INTERFERENCE)
sREV SEEK SEQ (OVERWRITE)
1FWD SEEK SEQ (OVERWRITE)
sBAD DISK ADDRESS

1 SEEK OPERATION

b
SVC.MLB SOURCE FILE MACRO v0O4.90 20 JUAN 83
GLOBAL DATA SECTION
88
a9

91
92

020000
040000
100000
003760

14:40:57 PACGE

RORWOP

RELOWT

HDR40
S
MQUAL

4 4

5EG 0043

“BIT13
*8IT14

1READ OR WRITE OPERATION
1RELOAD WALY

8IT115

140 HEADER OPERATION

*OUTINS! INOUTS!FOLWART!REVSKS
! FWOSKS!R_VSKFOIFWOSKOD

1MESSAGE QUALTF TIER BITS

9%
94

%5
9%
97
98
99

100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115

116

117
118
119
120
121
122
123
124
125
120
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142

143

144

000001
000002
000004
000010

]

TOSLOW

NOIRPT
CONMHNG
NOCLR

ERROR FLAGS FROM SUBROUTINES
=BIT00
;OPERATION TOOK TOO LONG
81701
INO INTERRUPT FROM OPERATION

B8I702

sCONTROLLER HUNG

*BIT03

;BAD CONTROLLER CLEAR

RLCS
RLBA
RLDA
RLMP

=0
=2

1ZONTROL AND STATUS REGISTER
$1BUS ADDRESS REGISTER

tMALTI-PURPOSE REGISTER

RLCSR
ANYERR

1DISK ADDRESS REGISTER

DEFINITIONS

CONTROL

STATUS REGISTER

*0
=100000

1CONTROL AND STATUS REGISTER
sANY ERROR BIT

=20000
=10000
=10000

iNON-EXISTENT MEMORY ERROR
tDATA LATE ERROR
sHEADER NOY FOUND ERROR

020000
010000
010000
004000
004000
002000
001400
000200
000100
000060
000001

DRVERR
NXMERR
OLTERR
HNFERR
CCKERR
H-RCERR
OPIERR
DSMSK
CRDYMSK
INTEBL
BAMSK
DRDYMSK

000077
000100

SAMSK
HSMSK

000001
000004
000020

MBSETO
DIRBITY
HOSEL

;

000003
000010

GETSTAT
DRSET

017777
160000

WCMSK
WCRNG

000077
000100

HOSEC
HOHSEL

000007
000010

STAMSK
BHSTAT

]

=40000

=4000
=4000

=2000
=1400
=200
=100
=60
=1

1ORIVE ERROR BIT

sDATA CHECK ERROR
sHEADER CHECK ERROR

sOPERATION INCOMPLETE ERROR
sORIVF SELECT MASK
;CONTROLLER READY MASK
s INTERRUPT ENABLE MASK
;1BUS ADDRESS UPPER MASK
;ORIVE READY MASK

DISK ADDRESS FOR SEEX

1MUST BE SET,

=20

tHEAD SELECT BIT

+DIRECTION BIT

BIT O

]

=3
=10

- DISK ADDRESS FOR GET

1GET STATUS SETWP
;ORIVE RESET MASK

=100

tHEAD SELECT MASK
-

MP FOR GET STATUS

»7

; STATE MASK

=10

1BRUSH HOME STATUS

STATUS

CLKCSR

CLKCSB
CLKCTR

1HEADS NUT STATUS
;COVER OPEN STATUS

=40

*100

tHEAL SELECT

=400

STATUS

sORIVE SELECT ERROR STATYS
sVOLUME CHECK STATUS

+1000
=2000

sWRITE GATE ERROR STATUS

=4000

=100000

1SPIN ERROR STATUS
$SEEK TIMEQUT ERROR STATUS
sWRITE LOCK STATUS
sHEAD CURRENT ERROR STATUS
tWRITE DATA ERROR STATUS

P-CLOCK REGISTERS
=172540
=172542
=172544

$CLOCK CONTROL AND STATUS REGISTER
;CLOCK COUNT SET BUFFER
sCLOCK COUNTER

=10000
=20000

=40000

ENDMOD

.SBYTL

GLOBAL DATA SECTION

8GNMOD

GLBOAT
TABLE OF OPERATION MESSAGES

CLRBYT:

NXTHL
:

GBNO:
CAMSK;
DIRMSK:
HOCYL
:

.WORD

Be
Ou
B
WA
O
B
WP

O
O
O
O
O
O
O

.WORD
.WORD
.MORD
.WORD
.MORD
.WORD
.WORD

T.DRIVE: .WORD

JJJ:
HLMTW:

sFILLER
tMESSAGE FOR WRITE CHECK
H
GET STATUS

O
MWRCHK
MGTSTA
MSEEK
MREADHM
MWRITE
MREAD
MMWRSEY
MDATCP
MHORCP
MCYLUP
MULOAD
MINOUT
MOUTIN
MFOLWRT
MREVSK
MFUWOSK
MRESKO
MFUSKO
MBADAD
g‘OHDR

.WORD
.MORD
.WORD
.WORD
.WORD
LWORD
.WORD
LWORD
.WORD
.WORD
LWORD
LWORD
LMORD
.HORD
MORD
.WORD
.MORD
.WORD
.WORD
.WORD
WORD

OPMSGS::

172540
172542
172544

=20

5€Q 0044

157

158
159
160
161
162 002230
163
164
165
166
167
168 002230
169
170
171
172 002230
173 002232
174 002234
175 002236
176 002240
177 002242
178 002244
179 002246
180 002250
181 002252
182 002254
183 002256
184 002260
185 002262
186 002264
187 002266
188 002270
002272
002274
002276
002300
002302
002304
002306
002310
002312
002314
002316
02320
002322

HSSTAT

OSESTAT
VCSTAT
WGESTAT
SPDSTAT
STOSTAT
WLSTAT
HCESTAT
WDESTAT

150
151
152
153
154
155
156

HOSTAT
COSTAT

149

14:40:57 PAGE

147

148

000020
000040
000100
000400
001000
002000
004000
010000
020000
040000
106000

UAN 83

145
145

vO4.00 20

SVC.MLB SOURCE FILE MACRO
GLOBAL DATA SECTION

SEEK
READ HEADER
WRITE DAYA
READ DATA
WITH RESEY
WITH DATA COMPARE
WITH HEADER COMPARE
LOAD HEADS
UNLOAD HEADS
IN-OUT SEQ
OUT-IN SEQ
FOLLOWING WRITE
REV SEEK
FWD SEEK
REV SEEK
FWD SEEK

BAD DISK ADD FOR WRITE

40 HEADER OPERATION

SVC.MLB SOURCE FILE MACRO v04.00 20 JAN 83
GLOBAL DATA SECTION
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223

224
225
226
227

002324

002326

002330
002332
00234
002336
002340
002342
002344
002346
002350
002352
002354
002356
002360
002362

000000
010455

002364
002366
002370
002372
002374
002376
002400
002402
002404
002406

005072
005074
005134
005174
005234
005242
005302
005304
05344
005346

228
229
230
231
232
233
234
235 002410
236 002412
237 002414
238 002416
239 002420
240 002422
241 002424
242 002426
243 002430
244 002432
245
246
247 002434
248 002436
249 002440

250
251
252
253
254
255
256
257
258

010333
010444
010662
010634
010617

002442
002444
002446
002450

002452
002454
002456
002460

14:40:57 PAGE

]

RESTBL:

010607

010714
000000
010572
010554
000000
010540
010505
010523

000000

&ATTBL:

éUBSTK:

TABLE

.WORD
.WORD
.MORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.MORD
.WORD

RESUL.T

MCERR
MDRERR
MNEERR
MFLERR
MHDERR
MOPERR
MNDRST
O
MWDERR
MHCERR
O
MSTERR
MSPERR
MWGERR
O
MDSERR

S€EGQ 0045

NAME

ADDRESSES

1+CONTROLLER ERROR

1DRIVE ERROR
tNON-EXISTANT MEMORY ERROR

stHEADER NOT FOUND-DATA LATE

1HEADER OR DPATA ERROR
1OPERATION INCOMPLETE
1NO DRIVE STATUS AVAILABLE

;WRITE DATA ERROR
{HEAD C'JRRENT ERROR
: SEEK TIMEOQUT ERROR
+ SPINDLE ERROR
tWRITE GATE ERROR
:DRIVE SELECT ERROR

PATTERN TABLE

.WORD
.WORD
.WMORD
.MORD
.WORD
.WORD
.WORD
.WORD
.WORD
LHORD

PAT1
PAT2
PAT3
PAT4
PATS
PAT6
PAT?7
PATS8
PAT9
PATLO

SUBROUTINE CALLING STACK
.WORD
O
tSTACK
O
LWORD
.WORD
O
.MORD
O
.MORDO
O
O
.WORD
O
.WMORD

.WORD

.MORD
.HORD

.MORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WMORD
.WORD
.WORD
.WORD

IS 12 WORDS LONG

O
O
©

;RLO1 TABLE OF C YLINDERS
T2578L: LHMORD
2

000011
000014
000021
000026
000033
000042
000051
000200
000377

MESSAGE

6
9,
12.

17,
22.
27.
34.
41.
128.
255,

s TRBLE OF DIFFERENCES

SVC.MLB

SOURCE FILE

GLOBAL DATA SECTION
259
260 002462
261 002464
262 002466
263 002470
264 002472
265 002474
266 002476
267 002500
268 002502
269 002504
270 002506
271
272
273
274 002510
275 002550
276

MACRO v04.00 20 JUAN 83

000004
000014
000022
000030
000042
000054
000066
000104
000122
000400
000777

14:40:57 PAGE

1RLO2 TABLE OF
125782:
.WORD

. WORD
. WORD
.WORD
.WORD
.WORD
. WORD
. WORD
.WORD
.WORD
.WORD

TABLE

SEGC 0044

CYLINDERS
4

12.
18.

24.
34,
44.
54,

68.
82.
256
.
511.
TO BE USED

T33718L:
187

.BLKW
.BLKW

16.
16,

cvLTBL:

.BYTE
.BYTE
.BYTE
.BYTE

TO BUILD

AND STORE

THE

CYLINDERS

277

278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305

306

307
308

309

310
311
312
313
314
319

002610
002611
002612
002613
002614

002615

002616
002617
002620
002621
002622
002623
002624
002625
002626
002627
002630
002631
002632
002633
002634
002635
002636
002637
002640
002641
002642
002643
002644
002645
002646
002647
002650
002651
002652
002653
002654
002655

002
016
024
033
041
046
055
064
072
101
110

115
124
133

141
146
154
161
170
177
206
213

222
230
235
244
252
261
270
275
303
312

317
326
334
343
252

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

14,

20.
27.
33.
38.

45,

52.
58.
65.
72.
77.
84,
91.
97,
102.
108,

113.
120,
127.
134,
139.
146,
152.
157.

170.

177.
184,
189.
195.
202,
207.
214,
220,
227,
234.

s TABLE

DEFAWLT

CrL INDERS

SVC.M
B SOURCE FILE MACRO v04.00 20 JAN B3
GLOBAL DATA SECTION
316 002656

.BYTE

241,

375

.BYTE

253,

367

319 002661
320 002662
321 002664
322 002666
323 002670
324 002672
325 002674
326 002676
327 002700
328 002702
329 002704
330 002706
331 002710
332 002712
333 002714
334 002716
335 002720
336 002722
337 002724
338 002726
339 002730
340 002732
341 002734
342 002736
343 002740
344 002742
345 002744
346 002746
347 002750
348 002752
349 002754
350 002756
351 002760
352 002762
353 002764
354 002766
355 002770
356 002772

000
000401
000406
000415
000423
000432
000445
000454
000463
000471
000500
000507
000514
000523
000532
000540
000545
000553
000560
000567
000576
000605
000612
000621
000627
000634
000643
000651
000660
000667
000674
000702
000711
000716
000725
000733
000742
000751

357
358
359
360
361
332§

364

365
366
367
368
369
370
371

002774
002776
003000
003002
003004
003006
003010
003012
003014
003016
003020
003022
003024

372 003026

361

317 002657

318 002660

14:40:57 PAGE 4

.BYTE

.BYTE
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.MORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
LHORD
.WORD
.MORD
.WORD
.WORD
.WORD
.WORD
.WORD

247,

O
257,
262.
269.
275,
282.
293,

300.
307,
313,
320.
327,
332,
339,
346.
352,
357,
363.
368.
375,
382.
389.
394,
401.
407.
412.
419.
425.
432,
439,
444,
450,
457,
462,
469.
475,
482,
489,
496.
5C2.
508.
508.
O
O

000760
000766
000774
000774
000000
000000

SSINDX:

.WORD
.WORD
LWORD
.WORD
.WORD
.WORD

000000
000000
000000
000000
000000
000000
000000

OPFLAG:
OONE :
HADONE:
ERHEAD:
MORECE:
ERRSWI:
BSFLAG:

OPERATIONAL FLAGS

WRTSWI:

.WORD

000000

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

O
O
O
O
O
O
O
©

1SUBROUTINE STACK INDEX POINTER

sOPERATION FLAGS
sOPERATION COMPLETE FLAG
1HEAD ALIGNMENT DONE FLAG
1ADORESS OF ERROR HEADER
tMORE THAN 1 COMPARE ERROR
1ERROR RETURN SWITCM
+BAD SECTOR FLAGS
tWRITE

SWITCH

373 003030
374
375 003032
376 003034
377 003036
378
379 003040
380 003042
381 003044
382 003046
383 003050
384 003052
385 003054
386 003056
387 003056
388 003060

389
390
391
392
393
394
395
396
397
398
3199

400
401
402
403
404
405

406

407
408
409

410

a11
a12

413
a1a

415

416
418

419
420
421
422

423
424
42s
426
427
428
429
430

v04.00 20 JAN-83

14:40:57 PAGE

000000

TBLSTR:

.WORD

000000
000000
000000

RLBAS:
RLVEC:
RLDRvV:

.WORD
.WORD
.WORD

L.CS:

. WORD
.WORD
. WORD
.WORD
.WORD
. WORD
. WORD

L.BA:
L.DA:

L.MP:
T.CS:
T.BA:
T
T

.WORD
. WORD
. WORD

003062
003064

T.STAT:

.WORD

003066
003070
003072

RESPARM:

. WORD
. WORD
. WORD
. WORD
.WORD

003100
003102
003104
003106
003110
003112
003114
003116
003120
00X122
003124
003126
003130
003132
003134
003136
003140
003142

DRVCNT
DIFAUG:
OLDCYL:
NEWC
YL ¢
CURCYL:

.WORD
. WORD
. WORD
. WORD
. WORD
.WORD
. WOROD
. WORD
. WORD
. WORD
. WORD
. WORD
.WORD

003144
003146
003150
003152
003154
003156
003160
003162
003164
003166
003170
003172

OF IN:
OF INU:
OFMID:
OFMIDU:
OFOUT:
OFQUTU:
ORIN:

003074
003076

DESOIF:

DESSGN:
DESHD:
DESSEC:
TEMPO:
TEMPL:
TEMP2:
TEMP3:
TEMP4:
TEMPS:
TEMPG6
:
TEMP7:
TEMPS:
H

ORINU:

ORMID:
ORMIDU:
OROUT;
OROUTUY:

OOOOOOOOOOOO%OOOOOOOOOOOOOOOOOO OCO0000 O OO0 O00O000O0 000 ©

SVC.MLB SOURCE FILE MACRO
GLOBAL DATA SECTION

EQ 0048
1 TABLE

STORAGE

sRL11 HASE ADDRESS
sRL11 VECTOR ADDRESS
1ORIVE NUMBER UNDER TEST

1CONTROLLER REGISTER STORAGE
:BEFORE OPERATION
1+CONTROLLER REGISTER STORAGE
:

AFTER

OPERATION

+HEADER WORD STORAGE

:DRIVE STATE STORAGE
1PARAM BLOCK

FOR REASON REPORT

;:DRIVE COUNT FOR DRIVES UNDER TEST
1tOIFFERENCE AUGMENT FOR SEEK
10LD CYLINDER
sNEW CYLINDER
1CURRENT CYLINDER
;DESIRED DIFFERENCE
;OESIRED SIGN
1DESIRED HEAD
+DESIRED SECTOR
s TEMPORARY STORAGE
: TEMPORARY STARAGE
;s TEMPORARY STORAGE
s TEMPORARY STORAGE
: TEMPORARY STORAGE
;s TEMPORARY STORAGE

;s TEMPORARY STORAGE

: TEMPORARY STORAGE
s TEMPORARY STORAGE

;ONE CYL&:%E: FORWARD INNER

zONE CYLINDER FORWARD MIDDLE
UPPER

:ONE CYLINDER FORWARD OUTER
UPPER

tONE CYLINDER REVERSE INNER
UPPER

sONE CYLINDER REVERSE MIDOLE
UPPER

sONE CYLINDER REVERSE QUTER
:

UPPER

43}
a3’
433
a3a
a3s
436
a37
438
439
440

v04.00 20 JUAN-83

14:40:57 PAGE

003174
003176
003200
003202
003204
003206
003210
003212
003214
003216
a4y 003220
442 003222

HRIN:
HRINU:
HROUT:
HROUTU:
AFMID:
AFMIDUY:
ARMID:
ARMIDU:

. WORD
.WORD
. WORD
,WORD
.WORD
.WORD
.WORD
.WORD

003224
003226
003230
003232
003234

EXOCYL:
EXHCYL:
EXACYL:
EXROT:
ERRVEC:

.WORD
.WORD
.WORD
.WORD
.WORD

450
451
452 003236
453 003240
454 003242
455 003244
456 003444
457 003446
458 003450
459 003451
460 003452
461 007454
462 003456
463 003460
464 003462
465 003464
466 003466
467 003470
468 003472
469 003474
470 003476

471
472
473
474 003500
a75

476
477
478
479
480
481
482
483
484
485
486
487
488

150.

tEXPECTED TIME ONE CYLINDER

250.

sEXPECTED TIME 256 CYLINDER
+EXPECTED ROTATION TIME
tERROR VECTOR

550.
1000.

MISCELLANEOUS COUNTERS

PASCNT: .WORD

0
COUNT:
.WORD
0
ERRPCINT: .WORD O
ERRCNT: .BLKW
64.

PASNUM:
PSETNM:

,WORD
_WORD

PWRFLG:
XDELAY:
YDELAY:

.WORD
.WORD
.WORD

LOCERR:
NOERCT:
TRPFLG:

000000
000000

000000

MININC:
TEMP:
TIM.US:
TAG:
MAJINC:

CLKFLG:
CLKADR:

.BYTE
.BYTE
.WORD

.WORD
. WORD
.WORD
. WORD
.WORD

.WORD
.WORD

SEQ 00A3

3128 CYLINDER FORWARD INNER
UPPER
:
1126 Cvt INDER FORWARD OUTER

OO0O00O0O0O0O0OO0OO0O0O00

443
444
445
446
447
449

HF IN:
.WORD
HFINU:
WORD
HMFOUT:
|, WORD
HFOUTY: . WORD

[eJeJeoXoXeoXoXoXoRoleNolol

SVC.MLB SOURCE FILE MACRO
GLOBAL DATA SECTION

UPPER

1128 CYLINDER REVERSE INNER
UPPER

lA28 CYLINDFR REVERSE OQUTER
UPPER

3256 CYLINDER FORWARD
UPPER

3256 CYLINDER REVERSE
3

UPPER

+EXPECTED

TIME

1PASS COUNTER

128 CYLINDER

(LOCAL

TO A

;sHARDWARE

TRAP OCCURANCE

;POMER FAILURE OCCURANCE

1FLAG INDICATING PRESENCE OF A P CLOCK
+POINTER TO DIAGNOSTIC MONITOR CLOCK TABLE

BAD SECTOR TABLES AND POINTERS

BSFVAL: .WORD

1BAD SECTORS FILES VALID FLAG

003502
003676

FBSFIL:

.BLKW

.BLKMW

76
76

1FACTORY BAD SECTOR FILE

004072
004472

IBUFF:
OBUFF:

. BLKW
,BLKW

200
200

s INPUT BUFFER
tOUTPUT BUFFER

PATL:
PAT2:

.WORD
. WORD

+PATTERN

005072
005074
005076
005100
005102
005104
005106

SBSFIL:

000000

177772
177777
177777
052525
052525
052525

. WORD
.WORD
.WORD
.WORD
.WORD

TEST)

sA COUNTER (LOCAL TO A TEST)
;ERROR POINTER
;ERROR COUNTER FOR PROGRAM
1PASS NUMBER FOR PROGRAM
;COUNTER FOR PARAMETER SET NUMBER IN JSE
s LOCAL ERROR COUNTER
;INMIBIT ERROR COUNTING FLAG

177772
177777
177777
052525
052525
052525

:SOFTWARE BAD

3ECTOR FILE

(ALL ZEROS)

| 4
SVC.MLB SOURCE FILE MACRO
GLOBAL DATA SECTION
489
490
491
492
493
494
495

005110
005112
005114
005116
005120

005122
005124
496 005126
497 005130
498 005132
499

500
501
502
503
S04
505
506

S07
508
509
510
511
S1e2
513
S14
515
516
S17
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544

005134
005136
005140
005142
005144
005146
005150
005152
005154
005156
005160
005162
005164
005166
005170
005172

V04.00 20

UAN 83

14:40:57

1777717
177777
052525
052525
177777
052525
177252
177252
172765
172765
000003
000000
000000
177777

PATS:

PAGE

000000
000000

177777
177777
000000
1777717
000000
177777
000000
177777

. WORD
. WORD
. WORD
.WORD
.WORD
. WORD
. WORD
.WORD
. WORD
. WORD

177777
177777
052525
052525
177777
052525
177252
177252

.WORD
.WORD

000003
000000
000000

.WORD
. WORD
. WORD
. WORD
. WORD
.WORD
. WORD
.WORD

177717
177777

.WORD

. WORD
.WORD
. WORD
. WORD
. WORD

172765
172765

177777
177777
1727777

000000
000000
177777

177777

000000

177777

000000
177777
000000
1772777

005174
005176
005200
005202
005204
005206
005210
005212
005214
005216
005220
005222
005224
005226
005230
005232

025252
052525
052525

PAT4

125252
125252
125252
052525
052525
125252
125252
052525
125252
052525
125252
052525
125252

. WORD
. WORD
. WORD
. WORD
. WORD
.WORD
.WORD
. WORD
. WORD
. WORD
-WORD
. WORD
. WORD
.%ORD
.WORD
.WORD

025252
052525
052525
125252
125252
125252
052523
052525
125252
125252
052525
125252
052525
125252
052525
125252

005234
005236
005240

155555
133333
066666

PATS:

. WORD
. WORD
. WORD

155555
133333
066666

005242
005244
005246
00525¢C
005252
005254
005256
545 005260

121105
150442
064221
132110
055044
026442
013211
105504

PAT6:

.WORD
.WORD
. WORD
.WORD
. WORD
. WORD
. WORD
.WORD

121105
150442
064221
132110
055044
026442
013211
105504

[14)
SVC.MLB SOURCE FILE MACRO v04.00 20 JUAN 83
GLOBAL DATA SECTION
S46
547
548
549
550
551
552
553
554
555
556
557

558
559
560
561
562
563
564
565
566
567

568
569

570
571
572
573

005262
005264
005266
005270
005272
005274

042642

021321

110550

1¢

3EG 0051

. WORD
. WORD
.WORD
. WORD
. WORD
.WORD
. WORD
. WORD

042642

021321
110550
044264
022132
011055
104426
042213

005300

044264
022132
011055
104426
042213

005302

177777

PAT?:

. WORD

1771

005304

045513

PATS:

.WORD

045513

005276

005306

005310
005312
005314
005316
005320
005322
005324
005326
005330
005332
005334
005336
005340
005342

574 005344
575
576 005346
577
578 0053590

122645
151322
064551
132264
055132
0264355
113226

045513
122645
151322
064551

132264
055132
026455
113226

122645
151322
064551
132264
055132
026455
113226
045513
122645
151322
064551
132264
055132
026455
113226

PAT9:

. WORD

125252

155555

PAT10:

.WORD

155555

ENOMOD

005350

005350
005354
305365
005375
X05406
005420
005432
005451
005467
005503
005517
005526
005537
005550
605 005560

.WORD
.WOPD
.WORD
.WORD
. WORD
.WORD
. WORD
. WORD
.WORD
.WORD
. WORD
. WORD
.WORD
.WORD
. WORD

125252

579
580

581
585
586
587
588
589
590
591
592
593
594
595
596
S97
598
599
600
601
602
603

14:-40:57 PAGE

123
122
122

127
127
107

127
127

106
127
117
122
125
114
106

113
104
104
122
122
105
111
111
117
111
120
105
116
104
117

040
040
040
124
124
124
124

124
122
124
105
123

114
040
114

.SBTTL

GLOBAL MESSAGES

BGNMOD

GLBTXT

MSEEK:
MREAD:
MREADH:
MWRCHK;
MWURITE:
MGTSTA:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCI2
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

MDATCP:
MHORCP :

MAOHOR
:
MWRSET
MOPER:
MRSLT:
MULOAD:
MCYLUP:
MOUTIN:

/SK 7/
/RD DATA

/
/RD HOR /
/WRT CHCK/
/WRT DATA /

/GET STAT /
/WITH DATA CMP /
/HITH HOR CMP /
/FOR 40 HORS/
/WITH RESET /
/0PER: /
/RESULT:
/UNLD DRV/
/L0 DRV /
/FOL

SK/

SVC MLB SOURCE FILE
GLOBAL MESSAGES
606 005577
607 005620
608 005640
60VI 005671
610 005722
611 005756
612 006012
613 006033
614 006063
615 006110
616 006131
617 006142
618 006147
619 006166
620 006226
621 006233
622 006240
623 006245
624 006252
625 006265
626 006300
627 006306
628 006326
629 006344
630 006377
631 006413
632 006433
633 006454
634 006471
632 006477
653 006515
654 006535
655 006555
656 006575
637 006613
658 006633
659 006636
660 006651
661 006664
662 006676
663 006712
664 006733
665 006756

666
667
668
669
670
671
672
673
674
675
676
677
678
679

006777
007031
007053
007063
007075
007117
007143
007153
007161
007170
007176
007207
007221
007233

MACRO

106
106
101
101
123
123

117
103
102
124
102

104
116
104
122
122
12¢
122

117
117
127

ill
116
116
103
105
126
125
040

117
111
i1
111
111
111
123
106
122
123
102
127
123
127
127
101
117
123
123
050
101
111
115
117
115
061
061
115

v04.00 20 JAN 83

117
117
104
104
113
113
116
101
101
117
125
122
117
122
114
114
114
114
120
120

117

116

117
117
116
122
117
116
124
125
116
116
116
116
116

113
127
105
113
123
122
120
122
122

104
126
113
120

111
120
116
111
125
101
040
040
111

114
114
112
112
040
040
040

116
104
040
123
126
040
126
103
102
104

115

040
040
122

124
040
040
124
122
114
120
105
124
103

103
103

116
i03
000
104
126
040
103
124
111
124
124
112
105
040
111
116
120
116
104
124
130
103
103
104

14:40:57

PAGE 4

MINOUT:
.RSCIZ
MFOLUWRT
: .ASCIZ
MREVSK:
.ASCIZ
MFWDSK
: .ASCIZ
MFUWSKO: .ASCIZ
MRESKO: ASCIZ

MBADAD:
MBADSF
:
MFMTER:
MTMBS:
B8ASADD:
DRVNAM:
DRVNAV;
NOPWR:
CSNAM:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
BANAM:
.ASCIZ
DANAM:
.ASCIZ
MPNAM
.ASCIZ
LABL:
.ASCIZ
LAB2:
.ASCIZ
MWORD:
.ASCIZ
MTOSLOM: .ASCIZ
MORRES: .ASCIZ
MNOINT: .ASCIZ
MCONMNG: .ASCIZ
MNOCLR: .ASCIZ
VCNRST: .ASCIZ
UNXERR: .ASCIZ
TSTLAB: .ASCIZ
P2TO3E
: .ASCIZ
P2TO4E
: .ASCIZ
P2TOSE: .ASCIZ
P2TO6E: .ASCIZ
P2TO7E: .ASCIZ
P2TO8E: .ASCIZ
P2TO9E: .ASCI2
P2T10E: .ASCIZ
P2T11E: .ASCIZ
P2T12€: .ASCIZ
P2T13E: .ASCIZ
P2T14€E:; .ASCI1Z
P2T1SE: .ASCIZ
P2T16E: .ASCI2Z
P2T17E: .ASCIZ
P2T18E: .ASCIZ
P2T19E: .ASCIZ
SKTMES: .ASCIZ
SRTMES: .ASCIZ
VALDES: .ASCIZ
MAPROX; .ASCIZ
LABIN:
.ASCIZ
LABMID: .ASCI2
LABOUT: .ASCIZ
LABEXP: .ASCIZ
LABOCF
: .ASCIZ
LABOCR: .ASC1Z
LA3HCF .ASCIZ

5€G 0052

/FOL

255

TO CC

SK/

/BAD

SEC

FILE FMT

/FOL WRT (NO SK)/
/ADJ CYL WRTTIN AFT REV SK/
7ADJ CYL WRTTN AFT FUWD SiC/
/5K FUWD,WRT - SK REV,OVERWRT/
/SK REV,WRT
SK FWL,OVERWRT/
/0N BAD SEC FILES/
/CAN'T GET BAD SEC FILES/
/70 MANY BAD SEC
/8US ADD=/
/DRV=/
/NO DRV FOR TST/

ERR/
/

/DRV DID NOT REC‘'R FROM PWR FAIL/
/RLCS/
/RLBA/
/RLDA/
/RLMP/
/0P INIT = /
/0P DONE = /
/WORD /
ZINTRPT TOO LATE/
/NO DRV RSPNSE/
/NO INTRPT ON CMND COMPLETE/

/CNTLR HUNG /
Z/ERR OID NOT CLR/

/VOL CHK NOT RSET/
/UNXPCTED ERR/
/ TEST/
/0UT GRD BAND /
ZINC SK FUWD HO O/
/INC SK REV HD O/
/INC SK FWD HO 1/
/INN GRD BAND /
/INC SK REV HD 1/
/5K/
/FWD 0SC SK/
/REV _0SC SK/
/5K TIMING/
/BSC RD DATA/

EWRT/RD DATA (P1)&
/SPINDLE ROT

TIMING/

EWRT/RD DATA (P2)E

/WRT LCK ERR AND DATA PROT/
/ADJ CYL INTERFNCE/
/0VERWRT/
/SK TIMES /
/SPINOLE ROT TIME /

/CIN 100'S OF U-SEC)/

/APPROX

/INNER/

/MIDDLE/
/OQUTER/
/MAX TIME/
/71 CYL FuWD/
/1 CYL REV/
/MID CYL FWD/

680 007747
681 007263
682 007277
684 007313
702 007347
~03 007366
~08 007872
=05 007402
706 007415
707 007432
708 007440
09 007445
710 007451
11 007456
712 007463
13 007471
714 007504
715 007527
716 007540
717 007614
718 007635
719 007673
720 007750
721 010036
722 010131
723 010217
724

725
726
727
728
729
730
731

732

733
734
743
744
745
746
747
748
749
750
751
752
753%
754

755
756
757
758
759
60

010322
010333
010345
010355
010366
010402
010414
010443
010455
010472
010505
010523
010540
010554
010572
010607
010617
010634
010662
010707
010714
010737

011004
C11043
011055
011112
761 011117

762

MACRO vO4.00 20 JUAN-83

115
115
115

110
122
117
117
125
123
104
123
110
123
103
106
040
122
104
102
124
104
i04
124
122
124
122

104
103
110
104
110
104
110
104
104
104
123
127
123
110
127
117
110
110
116
103
103
125
106
127
040
040
207

111
101
101
104
105
116

116
116
105
111
107
104
105
131
122
102
117
122
101

117

122
122
105
105
105
105

122

117

104
101
104
101
104
122
122
122
120
122
113
105
122
120
104
104

117

131
101
116
101
122

117
105

377

104

130
130
123
123

040
040

104
124
106
116

040

103
114
117
131
125
126
104
124
111
111

123
123
123
123

126
116
122
124
122
124
122
126
126
126
111
124
040
101

124
122
122
122
116
114
116
113
111

124
126
122

377

14:40:57 PAGE

LABHCR:
LABACF:
LABACR:
HOMOVF
:
OPR12:
OPR1A:
OPR18:
UNDTST:
OPROOA:
DIFWD:
SGNMD
:
HOWO:
SECWO:

CvLuWD:

FRMD:

BYPSNM:
SEQMES
:
STAMES:
BSNSTR:
TCERR:

NOCTLR:
NOTROY:
NOTSTL:

NTST1A:

NOTSTA:
NTST4A:

MORDY:
MCERR:

MHCRC
:

MOCRC:

MHNF
;

MOLT:

M¥FCRC:

MORERR:
MDSERR:
MORVST:

MSPERR:
MIGERR:
MSTERR:
MMCERR:
MUDERR:
MOPERR:
MHDERR:
MFLERR
MNEERR:

MCYLOC:

MNDRST:
MUNDEF
:
MRLFAL
:

MWURTAB:
MEXERS:
MERRS;
BELL:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCI2
LASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ
.ASCI1Z
.ASCIZ
.ASC1Z
.ASCIZ
.ASCIZ

o
-

SVC.MB SOURCE FILE
GLOBAL MESSAGES

/MID CrL REv/
/MAX
/MAX

CYL
CYL

FWD/
REV/

/HDS FAILED
/RESET
/ON 7/

WRT

/0N DRV

TO Mv
(Cr

/UNDER TEST/
/SET WRY LCK
/DIFF /
/S5GN /
/D 7/

7SEC

IN 10

TRYS/

/CYL /7
/FROM /
/7 BYPASSED /
/ROUTINE TRACE

/0RV STAT/

SEQ:/

/BAD SEC FILES NOT STRD. ALL SEC ASSUMED OK ./
/7TOTAL CMP ERRS: /
/ORIVE DROPPED - NO CONTROLLER~/
/DRIVE DROPPED - DID NOT RESPOND WITH “READY
"/
/TEST 1 CANNOT BE PERFORMED...P-CLOCK IS NOT AVAILABLE~/
/RESOLUTION OF A P-CLOCK IS REQUIRED YO MEASURE SEEN TIME/<1S5:<1.»
/TEST 4 CANNQT BE PERFORMED...P CLOCK IS NOT AVAILABLE/
/RESOLUTION OF A P CLOCK IS REQUIRED TO MEASURE ROTATIONAL TIMING/c¢15»<1,

RESWT NAME
S
/DRV RODY /
.ASCIZ
/CONT ERR /
-ASCIZ

.ASCIZ
.ASCI1Z
.ASCIZ
ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASC1Z
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCI2

.ASCIZ
LASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/HDR CRC/

/DATA CRC/

/HDR NOY FNO/
/DATA LATE/

EHOR NOT FND/HDR CRC/OPIE
/0ORV ERR

/DRYV SEL ERR /
/0RV STATE 7/
/SPIN TIMEQUTY /
/WRT GAT ERR /
/SK TIMEQUT /
/HEAD CUR ERR /
/WRT DAY ERR /
/70PR-INC/

EHOR/DAT ERR £
EHOR NOT FND/DAT LATE &
/NON-EXISTENT MEMORY /

/CYL 7/
/CAN'T GET DRV STAT/
/UNKN DRV STATE -NO RDY,NO ERR,HDS OUT/
/FAIL TO RELD MOS AFTER ERR CLR/
/WRT ABRTD/
/7 OVR ERR LIMIT - UNIT DRPPD /
/ ERR/

<207><377><377>

SvC.MB8 SOURCE FILE
GLOBAL MESSAGES
63
704
76S
766
67
~68
769

STATES:
sSTr 5:
CiL1S:
CSoOMS:
cCyLup:
CAFDT:
CSSEC:

.ASCIZ
.ASCIZ
.ASCIZ2
.ASCIZ
_ASCIZ
(ASCIZ
.ASCI1z

011134
011141

040
040

111

116
106
101
101
101
124
060
103
124

RESES:
RESE6:
STATE2:

045
045
045
045
045

FMTOP1:
FMTOP2:
FMTOPS:
FMTL:
FMT1.1:
FMT2:
FMTS:
FMTA
FMTS:
FMT6:
FMT7:
FMT8:
FMT9:
FMT11:
FMT12:
FMT13:
FMT14:
FMT1S:
FMT16:
FMT17:
FMT18:
FMT19:
FMT20:
FMT21:
FMT22:
FMT23:
FMT24:
FMT25:
FMT26:
FMY27:
FMT28:

061
065
103
104
065

011243

045

784 011314
785 011335
786 011342

045
045

783 011272

787 011351

788 011354

789 011357

790 011370
791 011410
011452
011522
011552
011561

796 011567

808
809
810
81!
812

RESWLT CONDITIONS

RESE3:
RESFa:

011176
01120
011215
011224
011275

797
798
799
800
801
802
803
804
805
806
807

040
102

123
123
1283

01157%
011641
011673
011727
011740
011762
012014
012051
012101
012124
012160

012174
012201
012211
012235
012254

814 012265

04s
045
045
045
045
045
045
045
045
045
045
045
045
045
P

045
045
045
045
045
045
045
045

045

04s

124
124

123

060

131

101
040
116
116
116
124
116

124

116
116
116
116
116
116
116
124

124

116
116
116
116

123
116
124
124
124
116
124
116
116
116
116
116

123

045
045
045
045
045
045
Cas
045
045
045
045
045
061
045
045
045
045
045
045
045
045
045
045
045

RESWY SETTINGS

123
123

117
124

111
040C

771 011156
772 011166

792
793
794
795

14:40:57 PAGE

011123
011127

70 011146

776
777
778
779
780
781
782

MACRO vO4.00 20 JUAN 83

ENDMOD

.ASCI1Z
_ASCIZ2

.ASCIZ
.ASCIZ
.ASCIZ2

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ARSCI1Z
.ASCIZ
.ASCIZ
.ASCIZ
LASCIZ
.ASCIZ
.ASC1Z
.ASCIZ

.ASCIZ
.ASCIZ
(ASCIZ
_ASCIZ2
.ASCIZ
.ASCIZ
.ASCIZ2
.ASCIZ
_ASCIZ
.ASCIZ
L_ASCIZ
.ASCIZ2

_ASCIZ

_ASCI2
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/718 7
/7 58 7

/7 IN
7/
/7 OF 7/
/STATE

/STATE
/STATE

2/
3/
S/

/15T 3 MS/

.,
/7S00MS
/CYC WP/
/DATA XFR/
/S SEC/
/78NS ToNS Te14068Ss8
T80 18N/
/7uNsT8018S18TH0 18N/
/78NS Te018S
18 Te TN/
/8T4Y/
/8NSTST/
/9%/
79N/
78NN
TR TEN/
/uNs Te06%S
198 T801 /
/78NS 18 TESASTESASTRSAS TESASTHS 2N T /
/798NS T806%S 240685250685
240685 38038524801 #N/
/79N 180645 2506% 52406852906
/
74NBT/
/41401 /

/974037
/78NSS1194Te038S 1818034514 Te016S16T01 /
/79Nu Te T80 365 19 TH068S 18 T806 /
/74uNSS 1 194 TeD38S 1 8 TH06%S 196 T06/
/79N S5406 /
/95108
TENES 1 18068N/

/79N8S 158 TS558 THSAS THSSH TEN/
/78 THSA%068S
48064 S4SD6%S4SDESN/
/78 T8S246D6%S
1 48D68SASDEEN/
/7679512406485
1 48068N/
/78NsS1198T803sS14T801S
1 TH02/
T8 T80198N/
/6T
/79NST
/
/798NuD2%
T/
/78NSS 18 TeDA% Te TuD 38N/
/78NS T80 36 ToD 38N/
/NS TETSY /

MACRO v04.00 20

JUAN 83

14:40:57 PAGE

.SBTTL

012266

BGNMOD
H

O®

ERROR MESSAGES
TO RESULT

MESSAGF

ERR2

R3 POINTS

TO RESULT

NAME

:
:

ERR3

R3 POINTS TO RESULT NAME
PESULT: (R$) IS O S8 1

ERR4

R3 POINTS

:
:
:

ERRS

ERR6

w:
8
@
.

@
@
we
s

ERR9

TO RESULT

CONDITJONS

(R3) IS O SB 1 (R4)

RESULT ROUTINE DETERMINES WHMICH ERROR(S) ARE SET AND

REPORTS

ALL

RESW.T:

“ERROR"

S8 O

NEWCYL CONTAINS EXPECTED CYLINDER
HOWRDY CONTAINS BAD CYLINDER
RESULT:

®
we

025646
026054

R3 POINTS TO RESULT NAME

R4 POINTS

HEAD POSITIONING ERROR REPORT

ERR10

025060
000001

10 RESULT NAME

ERRS

004737
012721
010321
004737
004737
012601

IS 1 S8 0

DRIVE STATE ERROR REPORT
R3 CONTAINS EXPECTED STATE
T.STAT CONTAINS BAD STATE
RESW.T: DRIVE STATE IS (T.STAT) SB (R3)

170742

(R3)

ERR?

005277
010146

001002

RESULT:

(R3)

RESULT:

003451

RESULT:

R4 POINTS TO RESULT CONOITIONS
RESWT: (R3) IS 1 5B O (Ra)

105737

20 0098

R3 POINTS

012266
012266
012272
012274
012300
012302
012306
012312
012314
012320
012324

GLBERR
ERR1

N D W)

SVC.M
B SOURCE FILE
ERROR MESSAGES

BGNMSG

ERR1

1%:

BNE
INC
MOV

CYLINDER IS (HDWRD1) S8 (NEWCYL)

UTILITY RESULT REPORT
R3 POINTS TO RESULT NAME
R4 POINTS TO VALUE 1
R5 POINTS TO VALUE 2
RESWLT: (R3-NAME) IS (R4-VALUE

COMPARE ERROR REPORT
R3 CONTAINS THE BAD WORD NUMBER
R4 POINTS TO BAD WORD
RS POINTS TO GOOD WORD
RESULT: WORD (R3) IS (R4) SB (RS)

7S78

NOERCT

JSR

PC,RPTOP

JSR
JSR
MOV

PC,RPTRES
PC,RPTREM
(SP)+,R1

MOV
MOV

1) SB (R5 VALUE 2)

s TEST

IF ERROR COUNTING

INHIBITED

13
SERRPOINT
R1, -(SP)

$YES - SKIP
;ELSE BUMP ERROR COUNT
1STORE R1

21,(R1).
R3,(R1).

;SET PARAM NUMBER
+ INSERT MESSAGE ADDRESS POINTER

:REPORT OPERATION
1REPORT RESULTS
1REPORT REMAINDER
{RESTORE R1

SvC.M.8 SQURCE FILE
ERRCR MESSAGES

58 012326
59 012332
012332
012332
60
61
62
63
64

65
66
67
68
69
70

71
72
73

012334
012334
012340
012342
012346
012352
012354
012360
012362
012366
012372
012374
012400
012400
012400

74
75 012402

76 012402

77 012406
78 012410
79 012414

80
81
82
83
84
85
86
87

012420
012422
012424
012430
012434
012440

012442
012446
012446
012446

88
89 012450
90 012450
91 012454
92 012456
93 012462
94 012466
95 012470
96 012474
97 012476
98 012500
99 012504
100 012510
101 012512
102 012516
012516
012516
103
104 012520
108 012520
106 012524

MACRO vO4.00 PO JUAN 83 14:40:57 PAGF

004737

016230

104423
005277
010146
004737
ol2721
010321
012721
005021
004737
004737
012601
004737

170702

000001

025646
C26054

016230

010411
004737
004737
012601
004737

170634

BGNMSG

025060
000003
000001
025646
026054

016230

170566

ENDMSG
L10002:

BGNMSG

025060

000001

025646
026054
016230

104423
005277
010146

ENOMSG

170516

ENDMSG
L10003:
BGNMSG

SEQ 0.5

JSR

PC,.CXERLM

TRAP

C#MSG

ERR2
INC
MOV
JSR
MOV
MOV
MOV

SERRPOINT

R1,

(SP)

PC.RPTOP

#3,(R1).

91,(R1).
(R1).

CLR
JSR
JSR

PC.RPTRES
PC,RPTREM

JSR

PC.CKERLM

TRAP

CMSG

MOV

L10001:

104423
005277
010146
004737
012721
010321
012721
005021

BGNMSG

025060
000003

104423
005277
010146
004737
012721
010321
005021
012721
004737
004737
012601
004737

ENDMSG
L 10000:

ERR3
INC
MOV
JSR
MOV
MOV
CLR
MOV
JSR
JSR
MOV
JSR
TRAP

ERR4
INC
MOV
JSR
MOV
MOV
MOV
CLR
MOV
JSR
JSR
MOV
JSR
TRAP

ERRS
INC

MOV

(S5P).,R1

SERRPOINT
R1,-(SP)
PC.RPTOP
#3,(R1).
R3,(R1J.

(R1)»

PC,RPTRES

PC.RPTREM
(SP)+ ,R1
PC,CKERLM

1GO CHECr

ERROR COUNT EXCEFDED

sOUMP ERROR COUNT
1STORE R}

sREPORT OPERATION

$1SET PARAM NUMBER
1 INSERT NAME ADD POINTER
1SET IS VALUE
1SET SB VALUE
sREPORT RESWTS
sREPORT REMAINDER

tRESTORE R1

1GO0 CHECK IF ERROR COUNT EXCEEDED

iBUMP ERROR COUNT
sSTORE R1
;REPORT OPERATION
sSET PARAM NUMBER
;sINSERT NAME ADD POINTER
1SET IS VALULL
;SET S8 VALUE
iREPORYT RESWLTS
sREPORT REMAINDER
sRESTORE R1

sGO CHECK IF ERROR COUNT EXCEECED

CIMSG
SERRPOINT
Ry, -(SP)
PC.RPTOP

*4,(R1).
R3,(R1).
#1,(R1).
(R1).

R4, (R1)
PC.RPTRES
PC.RPTREM

(SP).,R1

PC.CKERLM

;BUMP ERROR COUNT

sSTORE R1

sREPORT OPERATION
$SET PARAM NUMBER
s INSERT NAME ADD POINTER
1SET IS VALWUE
$sSET SB VALWE
1 INSERT ADD OF CONDITION POINTER
+REPORT RESWTS
sREPORY REMAINDER

sRESTORE R1

1GO CHECK IF ERROR COUNT EXCEEDED

C#MSG
SERRPOINT

R1,

(SP)

1BUMP ERROR COUNT
1STORE R1

SvC.M.8 SOURCE FILE MACRO v04.00 20O JAN 83
ERROR MESSACES

107
108
109
110
111
112
113
114
113
116
117
118
119
120
121
122

123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142

143

144

145
146

147

148
149
150
151
152

153
154
155
156
157
158
159
160

012526
012532
01253¢€
012540
012542
012546
012550
012554
012560
012562
012566
012566
012566
012570
012570
012574
012576
012602
012604
012606
012610
012612
012616
012622
012630
012634
012640
012644
012650
012652
012660
012664
012670
012674
012706
012714
012716
012722
012724
012730
012734
012740
012742
012746
012752
012756
012762
012764
012770
o12772
012776
013000
013004
013006
013012
013012

004737
012721
010321
005021
012721
010411
004737
004737
012602
004737

JSR

025060
000004

MOV
MOV

CLR

000001

MOV
MOV

025646
026054
016230

ENOMSG

L 10004
:

104423

105737

001002
005277
010146
010346
010446
010546
004737
012721
012761
005037
013703
042703
022703
001434
012762
012703
053703
010362

032762
001003
012703
000413
016203
010337
113703
000402
113703
042703
013704
042704
050403
032703
001442
032703
001026
032703
001020
012704
612746

14:40:57 PAGE

BGNMSG

003451

170440

025060
000003
000001
003130

17¢:

000002

003050

177761
000004

000003
000004
003036
000000

001000

9¢:

000006
003130
003131

10%:

003057
177442
003050
001777

14:

13s;

28:

002000
010000
004000
0 0607
O11l11e

100s:

PC,.RPTOP
04 ,(R1).

R3,(R1).
(R1).

¢1,(R1).

R4, (R1)

JSR
JSR
MOV

PC,RPTRES
PC,RPTREM

JSR

PC,CKERLM

TRAP

C$MSG

ERRG

75718

BNE
INC
MOV
MOV
MOV
MOV
JSR
MOV
MOV
CLR
MOV
8IC
cHe
8EQ
MOV
MOV
BIS
MoV
WAITUS

817

000200

5 2

(SP)+,R1

NOERCT
174
SERRPOINT

R1,-(SP)
R3,-(SP)

R5,-(5P)

°C,RPTOP
#3,(R1),
€1,2(R1)

EMP3

7.CS,R3

1REPORT OPERATION
sSET PARAM NUMBER
1 INSERT NAME ADD POINTER
1SET IS VALUE

1SET SB VALUE
1 INSERT ADD OF

CONDITION POINTER

tREPORT RESILTS
1REPORT REMAINDER
1RESTORE R}

160 CHECK

IF ERROR COUNT EXCFEDED

s TEST IF ERROR COUNTING INMIBITED
1YES - SKIP

1ELSE BUMP ERROR ZOUNT

;STORE R1
iSTORE R3
1STORE R4
sSTORE RS
sREPORT OPERATION
$sSET PARAM NUMBER
s INSERT IS VALUE
sCLEAR FOR STATUS STORAGE
sGET T1.CS
;AND CLEAR ALL BUT FUNCTION
sCHECK IF IT WAS GET STATUS

#177761,.R3
4 .R3
sYES - STATUS IS IN T MP, SKIP
18
OGE;STAT.RLDA(RZ) sELSE DO GEY STATUS
4 ,R3
RLORV,R3
R3,RLCSCR2)
€10,
tHAIT FOR CONTROLLER READY

#CROYMSEK ,RLCSIR2)

s TEST IF READY

BNE
MOV
BR
MoV
MOV
MOVe

108

$1YES

28
RLMP(R2),R3
RS, TEMPS
IggPSOI.RB

s IN MESSAGE WORD AND SKIP
1STORE STATUS FOR REPORT

81S

T.MP+1,R3
2177442 ,R3
7.CS.R4
#1777 ,R4
R4 ,R3

1GET ERROR BITS FROM MP REG
1CLEAR UNUSED BITS
1GET ERROR BITS FROM CS REG
1CLEAR UNUSED BITS
1MALE ONE WORD OF POSSIBLE ERRORS

MNFERR RS
107¢
OMCRCERR ,R3

sTEST IF HOR NOT FOUND ERROR
tYES - SKIP
1 TEST IF HOR CRC ERR

B8R
MOVe
81c
MOV
BIC

B1T
BEQ
817
BNE
817
BNE
MOV

PRINTB
MOV

81IT9,R3

SOPIERR,R3
115¢

105¢

SKIP

sELSE SET NO DRIVE STATUS BIT

1GET ERROR BITS IN PROPER POSITION

s TEST IF OPI SETY
tNO - SKIP

1YES

SKIP

#MOPERR , R4
$tSET OPI ALONE MESSAGE
OFMT28,0MRSLT
R4, OMERRS ;REPORT ERROR
MMERRS, -(SP)

SVC.MLB SOURCE FILE
ERROR MESSAGES

161
162

163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193

013016
013020
013024
013030
013034
013036
013040
013044
013046
0130S2
013054

013060

013062
013066
013070
013074
013076
013102
013104
013110
013112
013116
013120
013124
013126
(13132
013134
013136
013140
013142
013144
013146
013150
013152
013156
013162
013164
013170
013174
013176
013176
013202
013206
013212
013216
013220
013222
194 013226
195 013234
196 013236
197 013244
198 N13246
1y v13252
200 013256

201 013262
202 013266
203 013272

s
MACRO vO4.00 20-UAN 83

010446
012746
012746
012746
010600
104414
062706
000430
012704
000757
032703
001003
012704
000751
012774
000746
032703
001403
012704
000740
032703
001403

012704

000732
012705
005004
030503
1005
005724
000241
006005
001372
000405
016411
004737
000766
004737
005737
001414
013746
012746
012746
012746
010600
104414
062706
032737
001453
032737
0C1047
005037
012701
012703
012705
012704
021514

14:40:57 PAGE

MOV
MOV
MOV
MOV
MOV
TRAP

000004

ADD

000012
010345

105¢%:

004000

107¢:

010366

B8R
MOV
B8R
817
BNE

MOV

010414

109¢:

004000

115¢:

010355
010000

118%:

010402

100000

120%:
3s:
a8

MOV

BR
81T
BEQ
MOV
B8R
BIT
BEQ
MOV
B8R
MOV
CLR
BIY
8NE

R4, -(SP)
MRSLT, -(SP)
OFMT28, -(SP)
04, -(sSP)

SP,RO
CsPNTB

012,5P
1208
OMHCRC
R4

100¢
OHCRCERR,R3
109¢
OMHNF R4
1008
OMHF
CRC , R4
100¢
®OCKERR,R3
1188
OMOCRC ,R4

100¢
#OLTERR,RZ
1208
1004
#BIT15,RS

64:

TST

026054
003130

7s:

BR
JSR
TST
8EQ

PRINTS
MOV

003130
007527
011740
000003

MOV
MOV
MOV
MOV

TRAP

000010
004000

003050

002000

003050

003020
000200
000001
004472
004072

JSR

15¢:

18$:

817

sHOR CRC MESSAGE
sTEST

IF HCRC WITH HOR NOT FND

s YES - SKIP
sMESSAGE HEADER NOT FOUND
tgquAND HCRC MESSAGE
H

s TEST

iNO

IF DATA CHECK

SKIP

SET,

NOT OPI

;sSET MESSAGE DATA CHECK
1 SKIP
s+TEST IF DATA LATE ERROR
iNO - SKIP
1SET MESSAGE DATA LATE
1 SKIP
;SET BIT POINTER FOR TESY
;CLEAR R4 FOR TABLE COUNT
IF BIT IS SET

:YES - SKIP TO REPORT
;ELSE BUMP TABLE POINTER
;CLEAR CARRY

ROR

002324
025646

s SKIP

s TEST

CcLC

BNE
B8R
MOV

SEQ 0058

sSHIFT BIT POINTER TO NEXT BITY

sLOOP IF NOT O
+ELSE REPORT REMAINLER
;s INSERT NAME ADDRESS
1REPORT RESWLTS
1GET NEXT BIT

TEMP3
154

iNO - SKIP

RESTBL(R4),(R1)
PC.RPTRES
PC,RPTREM

tREPORT REMAINDER
s TEST IF ANY NEW STATUS

FNHTL7 ,0STAMES, TEMP3

TEMP3, -(SP)

OSTAMES, -(SP)
OFMT17, -(SP)

SP,RO

C$PNTB
€10,5P

oosxenn. T.CS
25
SOPIERR,T.CS
254
MORECE
9128. ,R1
0i,R3
S0BUFF ,RS
QIBUFF
R4

(R5),(R4)

s TEST IF DATA CHECK ERROR

tNO -

SKIP

tTEST IF OPI SET
tYES - SKIP
;CLEAR COMPARE ERROR COUNT
;SET COMPARE LENGTH
1SET WORD COUNT
$SET GOOD WORD POINTER
sSET TEST WORD POINTER
s CHECK WORD

svC.m8 SOURCE FILE MACRO vO4.00 20 JUAN 83
ERROR MESSAGES

204
205
206
207

208
209
210
211
212
213
214
215
216

217

218
219
220
22l
222

223
224
225
226
227
228
229
230
231
232
233
234
235
236

013274
013276
013304
013306
013306
013310

013314
013316
013322
013324
013330
013334
013340
013342
013344
013350
013354
013356
013360
013362
013364
013370
013372
013376
013376
013400
013404
013410
013414
013420
013424
013426
013430
013434
013436
013440
013442
013444
013450
013450
013450
013452
013452
013456
013460
013464
013470
013474
013500
013502
013506
013512
013514
013520

013520
013520

001427

023727
003021

011546
012746
011446
012746
010346
012746
012746
012746
010600
104414
062706
0052%7

022524
005203
005301
001343
005737

001421
012701

017146
012746
013746
012746
012746
012746
010600
104414
062706

012605

012604
012603
012601
004737

003020

104423

:130]

000012

011127
011123
006309
011673
000007

000020
003020

003020

20%:
19¢:

25¢:

000200
011141
003020
007614
012235
000005
000014

016230

167564

27s:

ENDMSG
L10005:

B8GNMSG

025060
000003
010472
003064
025646
026054
016230

ENDMSG
L10006:

S5 4

193

cHe
8GT

MORECE
, 010,
208

MY
MO\
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
INC

(RS), -(SP)
#RESEAR, -(SP)
(R4), (SP)
ORESES, -(SP)
R3,-(SP)
OMUWORD,
- (SP)
OFMT1S5, -(SP)
e7,-(SP)
SP,RO
CSPNTB
#20,SP
MORECE
(RS)+,(RA).
R3
R1
18¢
MORECE
274
#128. ,R1

PRINTB

104423
005277
010146
004737
012721
012721
013721
010311
004737
004737
012601
004737

14:40:57 PAGE

cHP
INC
DEC
BNE
1ST

8EQ
MOV
PRINTB
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

2.0}

16000
1 TEST

s YES

SKIP

COMPARE

SwIP

LIMIT

WREACHED

&FMT1S,oMWORD,R3,0RESES,(R4),MRESES,(RS)

18P ERROR COUNTER

18UMP POINTERS
18UMP COUNTER
tDEC LENGTH COUNT
;LOOP IF NOT DONE
sTEST

ANY

COMPARE ERRORS

iNO - SKIP
1SET COMPARE LENGTH

#FMT27,0TCERR,MORECE,#RESE6,R1
R1,-(SP)
#RESEG, -(SP)
MORECE, -(SP)
®TCERR, -(SP)
oFMT27,-(SP)
#5,-(SP)
SP,RO
CIPNTB
#14,SP

(SP)+,RS

MOV
MOV
MOV
JSR

(SP)s R4
(S5P)+ ,R3
(SP)+,R1
PC,CKERLM

TRAP

C#MSG

ERR?

5EQ 0U59

sRESTORE RS, 4,

sGO CHECK

IF ERROR COUNT EXCEEDED

INC
MOV
JSR
MoV
MOV
MOV
MOV
JSR
JSR
MOV
JSR

SERRPOINT
sBUMP ERROR COUNT
R1,-(SP)
1STORE R1
PC.RPTOP
{REPORT OPERATION
#3,(R1).
tSET PARAM NUMBER
OMORVST,(R1)
1 INSERT NAME ADD POINTER
T.STAT,(R1).
s INSERT IS VALUE
R3,(R1) ;INSERT SB VALUE
PC ., RPTRES
1REPORT RESWLTS
PC,.RPTREM
sREPORT REMAINDER
tRESTORE R1
{(SP)+,R1
PC,CKERLM
1GO CHECK IF ERROR COUNT EXCEEDED

TRAP

C$MSG

SvC.M.8 SOURCE FILE
ERROR MESSAGES

237
2%8 013522
239 013522
240 013526
241 013530
242 013532
243 013536
244 013542
245 013546
246 013552
247 013556
248 013560
249 013562
250 013564
251 013566
252 013570
253 013574
254 013600
255 013694
256 013606
257 013610
258 013614

013614

259
260
261
262
263
264
265
266
267
268
269
270

013614

013616
013616
013622
013624
013630
013634
013636
013640
013642
013646

013652
271 013654
272 013660
013660
013660
273 013662

274
275
276
277
278
279

013662
013664
013670
013672
013676
013702
013702
013704
013710
013714
013720
013724
013730
013734
013736
013740

MACRO

005277
010146
010346
004737

012721
012721
013711

012703
000241
006011
005303
001374
005721
013711
004737
004737
012603

012601
004737

v04.00 20

167514

025060
GO0003
010707
003056
000007

005046

153716
012746
013746
012746
012746
012746
010600
104414
062706

BGNMSG

PAGE

ERRS
INC

MOV
MOV

JSR

003106
025646
026054

016230

167420

MOV
MOV
MOV
MOV

CLC

BGNMSG

S8ERRPOINT

R1,-(SP)
R3, -(SP)
PC.RPTOP

@3,(R1).

HOWRD1, (R1)
07,R3

(R1)

JSR
JSR
MOV

PC,.RPTRES
PC.RPTREM

3
(R1).
NEWCYL,(R1)

JSR

(SP)+,R3
(SP)+,R1
PC,CKERLM

TRAP

C#MSG

MOV

ENDMSG
L10007:

DEC
BNE
TST
MOV

025060
000003

ERR9
INC
MOV
JSR
MOV
MOV

SERRPOINT
R1, -(SP)

PC.RPTOP
#3,(R1)»
R3,(R1).
R4, (R1).

025646
026054

MOV
MOV
JSR
JSR

016230

JSR

PC.CKERLM

TRAP

C$MSG

104423

010146
005737
001051
005277
004737

14-40:57

ROR

104423
005277
010146
004737
012721
010321
010421
010521
004737
004737
012601
004737

UAN 83

MOov

ENGMSG
L10010:

BGNMSG
003020

167344

025060

003037
006142
003032
006131
011370
000005

000014

ERR1O
MOV
157
BNE
INC
JSR

PRINTB

CLR
BISB
MOV

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

R5,(R1).

PC.RPTRES
PC,RPTREM

(SP)+,R1

R1,-(5P)

MORECE
3
SERRPOINT

1BUMP ERROR COUNT
1STORE R1
{STORE R3

+REPORT OPERATION
15ET PARAM NUMBER
s INSERT NAME ADD POINTER
1GET HEADER WORD
$5ET SHIFT COUNT
1ALIGN CHAR FOR PRINTING
i+
AS IS VALUE

1BUMP PARAM POINTER
1 INSERT SB VALUE
$REPORT RESWLTS
1REPORT REMAINDER
sRESTORE R3
tRESTORE R1
$GO CHECK IF ERROR COUNT EXCEEDED

1BUMP ERROR COUNT
;STORE R1

sREPORT OPERATION

1SET PARAM NUMBER

1 INSERT NAME ADD POINTER

+SET IS VALUE
1SET SB VALUE

sREPORT RESW.TS
sREPORT REMAINDER
sRESTORE R1
:GO CHECK IF ERROR COUNT EXCEEDED

;STORE R1
;TEST IF 2ND BAD LINE
sYES - SKIP
1BUMP ERROR COUNT
;REPORT OPERATION

PC .RPTOP
OFMTS, #BASADD ,RLBAS, #DRVNAM, <B ,RLDRV+1>

-(SP)

RLDRV+1,(SP)

QDRVNAM, -(SP)

RLBAS, -(5P)
#8ASADD, -(SP)
OFMTS, -(SP)
95, -(SP)

SP,RO
CIPNTB

#14,5P

;REPORT

SvC.MLB SOURCE FILE
ERROR MESSAGES

280 013744
013744
013746

013752
013754
013760
013762
013766
013772
013776
014002
014004
014006
281 014012
282 014014
014014
014016
014022
014024

283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306

014030
014032
014036
014042
014046
014050
014052
014056
014062
014064
014070
014070
014070
314072

014072
014072
014074
014076
014100

MACRO V04,00 20 JAN 83

14:40:57 PAGE
PRINTB

011546
012746
011446
012746
010346
C12746
012746
012746
012746
010600
104414
062706
000421

011546
012746
011446
012746
010346
012746
012746
012746
010600
104414
062706
005237
012601
004737

104423

MOV
MOV
MOV

011127

011123

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

006300
005526
011641
000010
000022

3s:
Ol1127

011123
006300

016230

PRINTB
MOV
MOV
MOV
MOV
MOV

MOV
MOV

011673
000007

000020
003020

B8R

MOV
MOV
TRAP
4% :

ENDMSG
L10011:
ENOMOD

ADD
INC

MOV

JSh
TRAP

5-6

J5
SEQ 0061

oOFMT14,
OMWORD,R3, 0RESES,(R4)
0MRS
,0RESEL,(RS
LT,
)

(R5), -(SP)

ORESEA4, -(SP)
(R4),-(SP)
ORESES, -(SP)
OMWORD, -(SP)
OMMRSLT, -(SP)
oFMT14, -(SP)

SP,.RO
CSPNTB

922,5P
a4
#FMT1S, OMWORD,R3,9RESE3,(R4),4RESES,(RS)

(R3), -(SP)

ORESES, -(SP)

(R4),-(SP)

ORESES, -(SP)
R3,-(SP)
OMIORD, -(SP)
OFMT15, -(SP)

47,-(SP)
SP,RO
C$PNTB

€20, 5P

MORECE
(SP)+,R1

PC,CKERLM

: INC COMPARE ERROR COUNT
;RESTORE R1
;GO CHECK

IF ERROR COUNT EXCEEDED

C$MSG

:LOARD PROTECTION TABLE

000000

BGNFROT

177777

000010

ENDPROY

. WORD

. WORD
.WORD

0
-1

DRSB

;OFFSET OF CSR IN P-TABLE

sNOT A MASS-BUS DRIVE
:OFFSET OF DRIVE IN P-TABLE

.EVEN
014100
01410C
014100
014102
014104
014106
014110
014112
014114
014116
014116
014116

307
308
309 014116

;REPORT DATA

BGNMOD
000006

174400
000160
000240
000001
000000
000001

BGNHW

ENOHW
L10013:
ENDMOD

BGNMOD

HPTCODE
. WORD
. WORD
.WORD
. WORD
. WORD
.WORD
. WORC

SPTCODE

L10013-L$Hu/2
174400
160
240
1
0
1

;CSR BASE ADDRESS DEFAULT
t VECTOR DEFAULT
sPRIORITY DEFALLT
s TYPE OF DRIVE

sORIVE NUMBER DEFAULT
tRL11 CONTROLLER

LN
335

336

000000
000377
000000
000024
000012

000010
026340
030276
031014
031230
032062
033172
034210
035424

BGNSW
MISWIW:

LOLIMW:

HILIMW:
HEADW:

ERLIMW:
DCLIMW:
ENDSW
L10014;
ENDMOD

. WORD
. WORD

.WORD
.WORD
.WORD
.WORD
.WORD

510014-L‘SH/2

ENDMOD

. WORD
.WORD
.WORD
. WORD

SEQ 0062

;817

1BIT

1:4]
1817
10IT
;81T
;BIT
:8IT

12
13
14
1S

USE ALL CYLINDERS
USE ALL SECTORS
EXECUTE DRIVE SELECT

TEST
EXECUTE MEAD ALIGNMENT

HFAD SELECT SUPPLIED FLAG
HILIMIT SPECIFIED FLAG
LO LIMIT SPECIFIED FLAG
D0 MANUAL INTERVENTION

255.
20.
10.

BGNMOD
0SPCODE
DISPATCH
8
.WORD
T1
.WORD
12
. WORD

.WORD
. WORD

000006
000000

14:40:57 PAGE

[ I B

310 014116
014116
311 014120
312
313
314
315
316
317
318
319 014122
320 014124
321 014126
322 014130
323 014132
324 014134
014134
325 014134
326
327 014134
332 014134
014134
014136
014140
014142
014144
014146
014150
014152
014154
334 014156

MACRO v04.00 20 JUAN 83

SvC.Mm.B SOURCE FILE
ERROR MESSAGES

T3
74
75
16

77
18

;ERROR LIMIT
;COMPARE ERROR LIMIT

SVC.MLB SOURCE FILE MACRO
INTTIAL IZATION SECTION

v04.00 20

JAN-83

1
2
3 014156
g 014156
6
7

014156

8 0l4162
014162
014166
014170
9 014174

10
11
12
13
14

014174
014176
014202
014202
014206
014210
014210
014212
014212
014214
014214
014216

005037

012700
104462
010037

103002
005237
012700
10444)

FOR PRESENCE

18:

000340

104433
104450

003006

012700
104447

000034

24 014260

103034

103005
013737
000137
012700
104447

002012
014660

014120
2%:

003454

4s:

000040

014312
014320
014326
014334
014342

40 014344
41 014350
42 014352

013737
005037
012700
012701
005020
005301
001375
012737
012737
012737
032737
001002
005037
000432

CLKFLG

A P-CLOCK

002012
003444
003244
000100

003100

003242
177777
177777
040000

003242
003446
003014
014120

RSTRT:

1$:

LAB:

014122

S$:
RESTART
:

5EQ 0063

1CLEAR

CLOCK

FLAG

sP-CLOCK?

1BRANCH

NO P CLOCK

8CC
1¢
INC
CLKFLG
s INDICATE PRESENCE OF A P CLOCK
SETPRI
0340
$SET PRIORITY TO 7 TO INWIBIT ALL INTERRUPTS
MOV
0340,R0
TRAP
C$SPRI
BRESET
tFOR LSI-11 CPU'S
TRAP
CS$RESET
MANUAL
sCHECK IF MANUAL INTERVENTION ALLOWED
TRAP
CS$MANI
BCOMPLETE
2¢
sYES - SKIP
8Cs
28
BIC
OMITEST!DRSEL
T !HOALIGN,MISWIM ;CLEAR ALL MANUAL
CLR
SSINDX
READEF
@EF .PWR
MOV
OEF .PUR,RO
TRAP
CSREFG
BNCOMPLETE
4
8cC
44
MOV
LSUNIT ,PURFLG
JMP
PWCON
READEF &OEF .START
MOV
OEF .START
RO

8ccC
H

014262
014270
014274
014300
014304
014306
014310

CLR

TRAP
CSREF
BNCOMPLETE

35
36
37
38
39

INITCODE

CLoCk
P,CLKADR
MOV
9'P,RO
TRAP
CsCLCK
MOV
RO, CLKADR
BNCOMPLETE
1

003474

005037

28
29
30
31
32
33
34

BGNMOD
BGNINIY

003476

17 014224
18 014230
014230
014234
19 014236
014236
20 014240
21 014246
22 014252
014252
014256
23 014260

INITIALIZATION SECTICN

000120

100014

.SBTTL

;CHECK

003474

103403
042737

14:40:57 PAGE

)

ON START

RESTART

INTERVENTION FLAGS

;CLEAR SUBROUTINE STACK
sPOWER FAILURE
sNO,

GO CHECK NEW PASS

sSET POWER FAIL FLAG
+GO SERVICE POMER FAIL
sCHECK IF START
;NO

SKIP

INITIALIZE TO START AT FIRSY DRIVE,

PASS COUNT, AND ERROR COUNT.
MOV
CLR
MOV
MOV
CLR
DEC
BNE
MOV
MOV
MOV
BIT
BNE
CLR
8R

INDEX

CLEAR

INTERNAL

LSUNIT,DRVCNT
:SET UP UNIT COUNT
PASNUM
sCLEAR PASS NUMBER
#ERRCNT
RO
64, ,R1
:GET A COUNT
(RO).
;CLEAR AN ERROR COUNTER STORAGE AREA
R1
1s
sLOOP TILL ALL CLEARED
OERRCNT
-2 ,ERRPOINT ;INIT ERROR POINTER
0-1,PSETNM
1SET PARAM SELECT TO INITIAL VALUE
#-1,HADONE
tPRESET HEAD ALIGN DONE FLAG
ALOCYL ,MISWIW
s TEST IF LO LIMIT SET
5%
tYES - SKIP
LOLIMW
SETOON

;ELSE

CLEAR LO LIMIY

M
SvC.MLB SOURCE FILE MACRO v04.00 20 JAN 83
INITIALIZATION SECTION
43 014352

014352

014356

014360
014360
45 014362
46 014362
014362
014366
47 014370
014370
44

48
49 014372

51
52
S3
54

55
56
57

58
59
60
61
62
63

65
66
67
68
69
70
71
72
73

75
76
77
78
79

80
81
82
83
84
85
86
87

014372
014376
014400
014400
014402
014402
014406
014410
014414
014422
014430
014436
014442
014446
014454
014460
014464
014464
014466
014470
014470
014472
014476
014500
014504
014506
014510
0145312
014514
014520
014522
014530
014532
014540
014546
014554
014562
014570

012700

104447

READEF

00003?

MOV

104447

000036

:
000035

005737
001013
005237
012737
013737
012737

003100

005337
062737
013700
012702

003100
000002
003446
003032

003444
003242
002012
177777

003446

NXTPAS:

003242
003100
003446

PASNEW:

SETDON:

003242

104442
010001

103406

005737
001741
005337

000736

012122
012122
005721
012137
012122
022737

003454
7%:
002302
000001

002302

014576
014604

012737
012737
012737
012737
012737
012737
012737
000425

000776
000777
001000
177600
177600
177600
177000

002312
002306
002314
002316
002320
002322
002310

014606
014614
014622

012737
012737
012737

000377
000400
077600

002306
002314
002316

001426

O0€EF .RESTART
RO

TRAP

CSREFG

Q@EF .CONTINUE
,RO

jCHECK

RESTARTY

iNO

SKIP

s TEST

COMTINUE

PWCON

BCS

PUWCON

READEF
MOV

OEF _NEW
QEF NEW,RO

ON CONTINUE PICK UP UNIT LAST UNDER

TRAP
CSREFG
BCOMPLETE
BCS
PASNEW
187
BNE
INC
MOV
MOV
MOV

INC

TEST

STARTING NEW PASS

DRVCNT
;s TEST IF ALL UNITS CHECKED
SETOON
;NO - SKIP
PASNUM
sELSE BUMP PASS COUNT
OERRCNT
-2 . ERRPOINT ;INIT ERROR POINTER
LSUNIT,DRVCNT
;GET ALL DRIVES
0-1,PSETNM
sSET PARAM SELECT TO INITIAL

PSETNM

TST
8EQ
DEC

PWRFLG
NXTPAS
PWRFLG

MOV
MOV
18T
MOV
MOV
cMP

(R1)+,(R2)+
(R1)+,(R2)+
(R1).
(R1)+,T DRIVE
(R1)+,(R2)+
¢1,7.DRIVE

B8R

;CHECK

PASNEW

DEC
DRVCNT
ADD
02 .ERRPOINT
MOV
PSETNM, RO
MOV
ORLBAS ,R2
GPHARD
RO,R1
TRAP
CSGPHRD
MOV
RO,R1
BCOMPLETE
74
;NO

NXTPAS

B8EQ

658

MOV
MOV
MOV

9255,
. HLMTW
09256, ,GBND
877600, CAMSK

MOV
MOV
MOV
MOV
MOV
MOV
~OV
8R

65%:

RSTRT

@EF .CONTINUE

B8CS

003454

5EQ 0064

oOFF .RESTART

BCOMPLETE

103403

005237

READEF

MOV

103533

012700
104447

TRAP
CSREFG
BCOMPLETE
8CS
RSTRT
CONTINUE:

103743
012700

14:40:57 PAGE

#5106, NXTHL
0511,
. HLMTW
#512. ,GBND
2177600, CAMSK
©177600,0IRMSK
0177600, HDCYL
0177000,CLRBYT
PWCON

tNEXT SET OF PARAMETERS

;O0WN COUNT DRIVE TOTAL
;UPDATE THE ERROR POINTER
;SET UP TO GET PARAMETERS

1SKIP IF GOOD PARAM
:RECENT POWER FAILURE

;ACCOUNT FOR DRIVE
sSTORE PARAMETERS CSR
:
VECTOR
;BUMP PAST PRIORITY

SvC.MLB SOURCE FILE MACRO vO4.00 20 JAN 83
INITIALIZATION SECTION
88 014630
89 014636
30 014644
91 014652
92
93 014660
94 014666
95 014670
96 014676
014676
014702
014706
014712
Cl4716
014720
97 014724
014724

014730
98 014732
109
110
111 014736
112 014742
113
114 014744
115 014750
116 014754
117 014760
118 014764
119 014772
120
121 014774
122 015006
123 015010
124 015012
015012
015016
015022
015026
015030
015032
125 015036
015036
015040
015044
015050
015054
015060
015064
015070
015072
015074
126 015100
015100
015104
015110
015112

012737
012737
012737
012737

077600
077600
000376
177400

002320
002322
002312
002310

032737
001003
013737

020000

014120

002306

014124

012746
012746
013746
012746

000340
016150
003034
000003

104437
062706

012700
104441
013702

013705
052705
010562
012701
032762
001056

003036
000200
000000
000170
000001

:CHECK

000006

003037
006142
003032
006131
011370
000005

104417
062706

000014

012746
012746

011354
000001

SEQ 0065

O?ICYL.HISHIH

SETVEC

MOV
MOV
MOV
MOV

TRAP
ADD
SETPRI
MOV
TRAP
MOV

1
HLMTW,
HIL IMW
RLVEC, #INTHLR, #340
sSET P VECTOR
4340, -(SP)
QINTHLR, -(SP)
RLVEC, -(SP)
3, -(SP)
C4SVEC
@10,sP
40
$SET PRIORITY
#0,R0

C$SPRI

RLBAS,R2
IF POWER FATLURE WAIT

1SET RL11
IS NEEDED

BASE

ADDRESS POINTER

TST

PWRFLG
8s

MOV

RLDRV,RS
1DRIVE SELECT
&CRD /MSK ,RS
:SET CRDY
R5,RLCS(R2)
s SELECT DRIVE
120.,R1
s INITIALIZE WAIT COUNT
QDROYMSK ,RLCS(R2)
sDRIVE UP YET?
8¢
:YES START TEST

MOV
MOV

8IT
BNE

sNEEDED??2?
iNO, SKIP

MOV
MOV

210.
R1
9%
OFMT24
, ONOPUR
ONOPWR, -(SP)
OFMT24, -(SP)

TRAP
ADD
PRINTF

SP,RO
CSPNTF
6.5P
.gg;?.OBASRDD.RLBAS.ODRVNfiH.<B.RLDRV¢1:

DEC
BNE

006166
012174
000002

8IT
BNE

81S

077600,DIRMSK
277600,HOCYL
0254
. NXTHL
6177400,CLRBYT

BEQ

000000¢

MOV
MOV
MOV
MOV

WAITMS

005301
001365

010600
104417

1$:

003032

PAGE

MOV

000000

003454

005046
153716
012746
013746
012746
012746
012746
010600

PWCON:

C00010

005737
001472

012746
012746
012746
010600
104417
062706

14:40:57

PRINTF

MOV
MOV

CLR
8Ise

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
PRINTF
MOV
MOV
MOV
TRAP

RLORV+1,(SP)

QDRVNAM, -(SP)

RLBAS, -(SP)
#BASADD, -(SP)
OFMTS, -(SP)
435, -(5P)
SP,RO

CSPNTF

214,5P
AFMT3
9FMT3, -(SP)

01, -(SP)
SP,.RO
CSPNTF

sWAIT A SECOND
:SIXTY GONE B8Y
iNO

SVC.MLB SOURCE FILE MACRO v04.00 20 UAN 83
INTTIALIZATION SECTION
015114
127 015120
015120
015124
128 015126
015126
129 015130
130
131 015130
015130
015130
igg 015132

062706

000004

013700
104451

003446

104444

104411

14:40:%7 PAGE

8s:

ENDINIY
L10015ENDMOD

ADD
000y
MOV
TRAF
DOCLN
TRAP

24, 5P
PSE TNM
PSE TNM, RO
C$000V

" ap

C$INIT

CSDCLN

;DROP DRI ¢F

SVC.M.B SOURCE FILE MACRO VO4.00 00 JAN-83
INTTIALIZATION SECTION

14:40:5 PAGE

1
i

LSBTTL

1 THE

:IF

1
11 015132
12 015132

005037

003452

015136
C15142
015146
015152
015156
015160

012746
012746
013746
012746
104437
062706

000340
Cl6142
003234
000003

015164
015170
015174
015200
015202
015202
015206
015212
015216
015220
015222
20 015226
015226
015230
015234
015240
015244
015250
015254
015260
015262
015264
21
22 015270
015270
015274
015300
015302
23 015304

013702
005762
005737
001447

003032
000000
003452

012746
012746
012746
010600
104417
062706

007635
012174
000002

13 015136

14
15
16
17
18
19

AUTO DROP

1CODE

24 015310
015310
015314

25 015316

26 015320
27 015324
28 015330

005046
153716
012746
013746
012746
012746
012746
010600
104417
062706

BGNAUTO

THE

CLR

SETVEC

MOV
MOV
MOV
MC ¢
TRAP
~00

MOV
TST
ST
8EQ
PRINTF
MOV
MOV
MOV
MOV
TRAP
RDD
PRINTF
CLR
s1sae
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

PRINTF
MOV
MOV
MOV
TRAP
ADD

000004

003036
000200
000000

CHECKS

1¢:

THE

€D O

INVOKED BY

OPERATOR.

THE

DRIVE

TO DETERMINE

THE

DRIVE

_THE DRIVE IS NOT READY
IS ACCESSED.,

000014

003446

SET

WHICH

003037
006142
003032
006131
011370
000005

013700
104451
000460
013705
052705
010562

SECTION

sORIVE

000006

011354
000001

AND

sAFTER

000010

012746
012746
010600
104417
06270¢

AUTO DROP SECTION

s "ADR” FLAG

Cé,

€EXT

TRPFLG

IS DROPPED FROM THE

SUPERVISOR

IS READY

TeE

READY

THE

TO RECEIVE

COMMAND.

TEST CYCLE AND THE NEXT

HARDWARE

TESTS ARE

sCLEAR

TRAP FLAG

sSET UP TRAP VECTOR

PERFORMED

10 DETECT

$/NON EXISTENT CONTROLLER
RLBAS,R2
sGET RL11 BASE ADDRE-S
RLCS(R2)
sACCESS DRIVE CONTROLLER ADDRESS
TRPFLG
;DID TRAP OCCUR?
18
1BRANCH TO CHECK DRIVE IF TRAP DID NOT OCCUR
oFMT24,0NOCTLR
;ELSE, PRINT MSG., “DRIVE DROPPED
NO CONTROLLER"
NUCTLR, -(SP)
#FMT24, -(5P)
02, -(SP)
SP,RO
CSPNTF
6, SP
@FMTS, #BASADD ,RLBAS, @DRVNAM, <B,RLDRV .1 .
-(SP)
RLORV+1,(SP)
SDRVNAM, -(SP)
RLBAS, (SP)
#BASRDD, -(SP)
OFMTS, -(SP)
e5,-(SP)
SP,RO
CIPNTF
014,5P
{PRINT DRIVE INFORMATION
o0FMT3

#FMT3, -(5P)
01, -(SP)
SP,RO
COPNTF
o4 ,5pP

Doov
MOV
TRAP

PSETNM
PSETNM,RO
C+000U

sD0 DROP UNIT ON DRIVE

MOV
8IS
MOV

RLORV,R5
OCRDYMSK RS
R5,RLCS(R2)

+ELSE, GET DRIVE NUMBER
1SET CONTROLLER READY
1LOAD IN THE DRIVE NUMBER

WHENEVER

INITIALIZATION

ACCESSED.

ERRVEC,0TRPHAN,
0340
4340, -(SP)
#TRPHAN, -(SP)
ERRVEC,
- (SP?
03, -(SP)
CSSVEC
#10,SP

DIAGNOSTIC

IS EXECUTED AFTER

18RANCH TG EXIT

SvC.M
B SOURCE FILE

AUTO DROP

SECTION

29 015334
30 015342
5 015344
015344
015350
015354
015360
015362
015364
32
33 015370
015370
015372
015376
015402
015406
015412
015416
015422
015424
015426
015432
015432
015436
015442
015444
015446
36 015452
015452
015456
37 015460

015460

015464
38 015466
015466
015466
39

MACRO v04.00 20 JAN 83

032762
001046
012746
012746
012746
010600
104417
062706

005046
153716
012746
013746
012746
012746
012746
010600
104417
062706
012746
012746
010600
104417
062706
013700

104451

013700
104436
104461

000001

14:40:57 PAGE

000000

-4
BNE

PRINTF

007673

MOV

012174
000002

MOV

MOV
MOV
MOV
TRAP
RDD
PRINTF

011354

MOV
MOV
MOV
TRAP

000004

ADD

003446

003234

s/WITH
READY'
”
OFMTS, 6BASADD,RLBA
0DRVNAM, <B ,RLDRV
S,
+1 »

MOV

000001

ENDAUTO
L.10016:

#ORDYMSK ,RLCS(R2)
1[5 DRIVE READY?
21
$BRANCH TO PERFORM TESTS 1If
#FMT24, 0NOTROY
$PRINT MSG, “ORIVE OROPPED

PRINTF

CLR
8ISB

000014

€0 004648

MOV

MOV
TRAP
ADD

003037
06142
003032
006131
011370
000005

ONOTRDY, -(SP)
oFMT24, -(SP)
@2, (SP)

MOV

000006

ooov
MOV
TRAP

SP,RO
CSPNTF
06,5P

(SP)
RLDRV+1,(SP)
PORVNAM,
- (SP)

RLBAS, -(5P)

#B8ASADD, -(SP)

05, -(SP)
SP,RO

CSPNTF

#14,5P

#FMT3
#FMT3, -(SP)

SP.RO
CIPNTF

o4 ,5P
PSETNM
PSETNM,RO

€000V
ERRVEC

CLRVEC
MOV

ERRVEC,RO

TRAP

C$AUTO

TRAP

sPRINT DRIVE INFORMATION

C4$CVEC

;00 DROP UNIT ON DRIVE
sRELEASE

ERROR

VECTOR

DRIVE 1S REARDY
DID NOT RESPOND

SVC.M.B

SOURCE

DROP
I UNED e

AUTO

15
16

17
18
19
20

21
22

FILE

SECTION

MACRC vO4.00 20 JAN 8%

015470
015470
015470
015470
015474
015500
0155Ca
015510
015512

015516
015516
015522
015524
015532
015534
015542
015350
015552
015564
015564
015570
015572
015576
015600
015604
015604
015610
015612
015612

015614
015614
015614

24
25 015616
26 015616
27 015620
015620
015620
28
29 01%622
30

012746
012746
013746

012746
104437
062706

012700
104441
032762
001407
053762
032762
001005

14:40:57 PAGE

CLEANUP CODE

B8GNMOD
BGNCLN

CUNCODE
SETVEC

MOV

MOV
MOV
MOV
TRAP
ADO

016142

003234
000003

000010

MUV
TRAP

000200

000000

003036

000000
000000

003034

013700
104436

003234

3%:
Sé:

003454
003454

7¢:

000249

104453

81T
8EQ
8IS
:34
BNE
WAITMS
CLRVEC
MOV
TRAP
TST
BEQ
OEC

CLRVEC

MOV

TRAP

ERESET

104433

104412

SECTION

ERRVEC, @TRPHAN, 0340
€340, -(SP)
OTRPHAN, -(5P)

ERRVEC,

e3, -(SP)

(SP)

Cs$SVEC

®10,5P

SETPRI *”?

000007

013700
104436
005737
001402
005337

.S8TTL

000340

Ee,

ENOCLN
L10017:

®7,R0

C3SPRI
#CRDYMSK ,RLCS(R2)

ENOMOD

$sTEST

IF CONTROLLER READY

tNO LOOP UNTIL READY

3
RLVEC
RLVEC,RO

sWAIT 300 MS
tRELEASE VEC

PWRFLG
7
PWRF LG

tPWR FAIL
iNO

RLORV ,RLCS(R2)
;SET DRIVE NUMBER
SORDYMSK ,RLCS(R2)
s TEST IF DRIVE BUSY
Ss
sNO - SKIP

CsCvEC

SET

ERRVEC
ERPVEC,RO

CsCVvEC

TRAP

CSRESET

TRAP

CSCLEAN

TRAP

csou

BGNDU
ENODU
1.10020:

1SET PRIORITY TOQ 7

s TAKE

CARE

LSI-11

e
-

N
e

OQO®GPUIE
WM re

SVC.M
B8 SOURCE FILE MACRO v04.00 20 JAN 83
GLOBAL SUBROUTINES

13
14
15
16
17

22
23
24
25
26
27
28
29
30

015622

015622
015630
015634
015642
015646
015646
015650
015650
015652
015652
015656
015660
015664
015666
015672
015674
015700
015702
015706
015710
015712
015720
015720
015724
015726
015732
015734
015740
015742
015746
015750
015754
015756
015764

015766
015774
016000

016006
016012
016016
016022
016022
31 016024
016024
32 016026
33 016034

016034
016040

016042
016046

012737
005237
013737
005437

000160
003466
003456
003456

002116

14:40:57 PAGE

.SBTTL

GLOBAL

8GNMOD

GLBSUB

TIME:

MOV

INC
MOV
NEG

003462

SUBROUTINES

0160,L$0LY

TIM.US
XDELAY ,MININC
XDELAY

104407

READBUS
TRAP
C$RDBUY

103420

B8CS

MOV

e1.,(PC)e

012727
000000
013727
000000
005367
001375
0C5367
001367
005237
002761
000422
012737

18:

000001

DELAY

sWAIT

.WORD
DEC
BNE
DEC
BNE
INC
BLY

177756
003456

000065

sBRANCH -

MOV

177772

002116

23:

3s:

sGET OUTER DELAY LOOP
1US-WALIT ROUTINE INDICATOR
$sSAVE ORIGINAL US WAILT
sGET NEGATIVE OF FACTOR
BUS?
1@

BCOMPLETE 2%

.WORD

002116

5EQ 0070

B8R

MOV

DELAY

IF YES

LSOLY,(PC)»

O
-6(PC)
.-4
-22(PLC)
.-20
XDELAY
1

65 ,L3DLY
1.

$WAIT FACTOR EXPIRED?

:BRANCH - IF NO
sGET TIME
1GET OUTER DELAY LOOP
sWAIT WITH RESPECT

TO FONZ BUS

012727
000000
013727
000000
005367
001375
005367
001367
005237
002761
063737

003462

003122

a%:

ADD
RTS

MININC, TEMPO
PC

;GET TIME EXPIRED
;sRETURN

012737
005037
013737
006337
006337
005437

000160
003466
003460
003460
003460
003460

002116

XTIME:

MOV

#160,L$0LY

:GET OUTER DELAY LOOP
iMS. WAIT INDICATOR
s SAVE ORIGINAL WAIT MS
iMULTIPLY BY FACTOR 4

000207

000001

MOV
LMORD
MOV

002116

177772
177756
003456

003472

012727
000000
013727
000000

000150
000020
002116

CLR

MOV

O
-6(PC)

Y3
-22(PC)
.-20
XDELAY
3

TIM. US

YDELAY ,MAJINC

ASL
ASL

YDELAY
YDELAY

TRAP

CSROBU

DELAY
MOV
LMORD
MOV
LWORD

20
020,(PC)»
O
L$OLY,(PC).
O

YDELAY
NEG
READBUS

104407

103023
012737

.MORD
DEC
BNE
DEC
8NE
INC
8LY

#1.,(PC)
O
LeDLY,(PC).

002116

23:

14
BNCOMPLETE
8CC
14
0150,Le0LY
MOV

1WAIT FACTOR EXPIRED?

sBRANCH

IF NO

1Q - BUS?
;BRANCH

IF NO

+GET QUTER DELAY LOOP
sWAIT WITH RESPLCT

TO FONZ BUS

SVC.M.
B SOURCE FILE
GLOBAL SUBROUTINES

34
35
36
37

016050
016054
016056
016062
016064
016070
016072
016074
016074
016100
016102

38
39

40
41
42
43

016106
016110
016114
016116
016122
016124
016130
016132
016140

MACRO v04.00 20 JAN 83

005367
001375
005367
001367
005237
002761
000417
012727
000000
013727
000000
005367
001375
005367
001367
005237
002761
063737
000207

14:40:57 PAGE

177772

DEC

B8NE

177756
003460

1$:

000010

002116

177772
177756
003460

003472

003464

3s:

10
010,(PC)e.
O
L$DLY, (PC).
C
-6(PC)
.-4
-22(PC)
. -20
YDELAY
13

ADD
RTS

: TRAP HANDLER

016146

2
S3 016150

TRPHAN:

003452

ENDSRV
L10021:

000002

016150

016150
016154
016160
016164
016170
016176
016202

016226

1 BRANCH

3¢

sGET

sWALT

TIME

sWAIT FACTOR EXPIRED?

sBRANCH - IF NO
sGET EXPIRED TIME
s RETURN

MAJINC, TEMP
PC

INDICATES OCCURRENCE OF

TRAP,

TRPFLG

RTI

s INTERRUPT HANDLER,

67 016226
016226
68

INC

sWAIT FACTOR EXPIRED

BGNSRV

35
57
58
59
60
61
62
63
64
65

6(PC)

.-4

DELAY
MOV
.WORD
MOV
.WORD
DEC
BNE
DEC
BNE
INC
BLT

B8R

47
48
a9 016142

005237

EG 0071

-22(PC)
.-20
YOELAY
28

BGNSRvV

50
51 016146
016146

OEC
BNE
INC
BLT

45 016142

(5¢,

ABORTS WAIT TIMER AND STORES RL11 REGISTERS.

INTHLR:
012237
012237
012237
011237
012737
013702

000002

003050
003052
003054
003056
177777
003032

003012

MOV
MOV
MOV
MOV

(R2).,7.CS
(R2)+,T.BA
(R2)+,7.DA
(R2),7.MP

MOV

RLBAS ,R2

ABORTWAIT

ENDSRV
L10022:

RTI

1STORE RL REGISTERS

sSET DONE FLAG
sRESTORE R2

OO
UVB W

SVvC.M.B SOURCE FILE
GL OBAL SUBROUTINES

13
14

14:40:57 PAGE

5€Q 0072

ERROR LIMIT CHECKING ROUTINE
DROPS DRIVE IF ERROR LIMIT EXCEFDED
016230
016236
016240
016240
016242
016242
016244
016244
016250

016254

MACRO vO4.00 20 JAN 83

016260
016264
016266
016270
016274
016274
016276
016302
016306
016312
016316
016322
016326
016330
016332
016336
016336
016342
016346
016350
016352
016356
016356
016362
016364
016364
016366

15
16
17
18 016370
016376
20 016404
21 016412
22 016420
23
24
25 016422
016424
27 016430
28 016436
29 016440
30 Cl16444

027737

002453

165006

014130

CKERLM:

INLOOP

TRAP

104420

005046
153716
012746
013746
012746
012746
012746
010600
104417
062706

PRINTF

011055
014130
012201
000003

MOV

CSINLP

PRINTF

000014

011354
000001

013700
104451

003446

104444

000207

1s:

003050
003052
003054
003056

016370

003012

#10,5P

OFMTS,0BASADD,RLBAS,
#DRVNAM, <B ,RLDRV+1>

MOV
TRAP
ADD
PRINTF

SP,RO
CIPNTF
014,5P
#FMT3

MOV
TRAP

SP,RO
CSPNTF

RTS

RLBAS, -(SP)
#BASADD, -(SP)
#NTS, -(SP)

oFMT3, -(SP)

o4, SP
PSETNM
PSETNM,
RO
C+DODV
CS0CLN
PC

:DROP DRIVE
1GO TO CLEAN UP

MOV
MOV

RLBA(R2),7T.BA
RLDA(R2),7.DA

;GET BUS ADDRESS REG
;GET DISK ADDRESS

RTS

tRETURN

MOV

WAITIN:
000000

CSPNTF

READ AND STORE ALL RL11 REGISTERS
3
REARDRL
: MOV
RLCSR(R2),7.CS
GET CS REG

000002
000200

SP,RO

-(SP)
RLORV+1,(SP)
SORVNAM,
- (SP)

ADD
DODU
MOV
TRAP
DOCLN
TRAP

SKIP

HFMT2S5, -(SP)

CLR
a1se
MOV
MOV
MOV
MOV

MOV

000004

016237
016237
016237
016237
000207

#3,-(SP)

ADD

MMEXERS, -(SP)

MOV
TRAP

$YES

&FMT25,ERLIMW, OMEXERS
ERLIMM, -(SP)

MOV

003037
Q06142
003032
006131
011370
000005

MOV

000010

012746
012746
010600
104417
062706

011646
005066
032762
001420
004737
005737

SERRPOINT ,ERL IMW
;1 TEST IF ERROR LIMIT EXCEEDED
14
tNO - SKIP
1CHECIK IF IN ERROR LOOP

BCOMPLETE
BCS
1

103451
012746
013746
012746
012746
010600
104417
062706

cHP
BLY

RLMP(R2),T.MP

;GET MATI-PURPOSE REG

WAIT FOR CONTROLLER TIMEOUT TO FORCE INTERRUPT ROUTINE
MOV
(SP), -(SP)
1tMAKE ROOM FOR ERROR POINTER

CLR
BIT

2({SP)
1CLEAR FOR POINTER
OCRDOYMSK ,RLCSR(R2)
1 TEST IF CONTROLLER READY

TST

DONE

BEQ
JSR

44
PC.READRL

tNO - SKIP TO WAIT
+READ ALL RL REGS
1 TEST

INTERRUPT

OCCURRED

SVC.M.B SOURCE FILE
GLOBAL SUBROUTINES
31
32
33
34
35
36
37
38
39

016450
016452

016460
016466
016470
016476
016500
016512
016520
40 016522

41 016526
42 016534

43 016536
44 016542
45 016544
46 016550
47 016556
48
49

S0
51
52
S3
54
55
56
S7
58
59
60
61
62
63

MACRO vO4.00 20 JUAN 83

001435
012766
032737
001403
012766
000207

032762
001006
004737
012766
000760
005737
001343
004737
012766
000747

006306
002000

000002

006326

000002

000200

000000

016370
006377

000002

003050

016370
006344

000002

016576
016602
016610

013746
012737
000412
013746
012737
000404
013746
005037
010346
013703
005723
016663
162763
010337
010046
010146
012737
032737
001460
032762
001405

003132
000013

003132

003132
000003

003132

3~ 77

Ss:

SEQ 0073

s1NO

GO SET NO INTERRUPT ERR FLAG

81T
BEQ

Q0PIERR,T.CS
2

1 TEST
tNO -

IF OPI
SKIP

MOV

MOV
RTS

MMTOSLOW,2(SP)

;ELSE

SET

TOO

WAITMS

OMDRRES,2(SP)
PC
@3

TST

DONE

1 SK
1ELSE CHECK

OMNOINT , 2(SP)

$ELSE

BNE
JSR
MOV

B8R
TSTINT:

BEQ

BIT
BNE
JSR
ggv

003010
003451
003020

L+ VI
@273,
0'. 10‘.»
Y
L

24:

3%:

003012

005037
105037
005037
000207

012701
004737
017426

18:

016560
016564
016570
016574

016612
016616
016624
016626
016632
64 016636
65 016640
66 016644
67 016646
68 016654
69 016662
70 016666
71 016670
72 016672
73 016700
74 016706
75 01€710
76 0167i6
17 016720
78 016732
79 016736
80 016742
81 016744
8° 016752
8, 016754
84 016762
85 016764
86
87

14:40:57 PAGE

RTS

1WAIT

FOR NO DRIVE

300 MS FOR

RESPONSE

TIMEOUT

OCRDYMSK ,RLCS(R2)
sTEST IF READY NOW SET
3
s YES - SKIP
PC ,READRL
sREAD RL REGS
g?CONHNG.?(SP)
ng}PHESSAGE FOR CONTROLLER HUNG
1
PC.READRL

OPERATION AND TEST
CLR
OPFLAG

CLRB
CLR

$SET MESSAGE
1RETURN

SLOW ERROR POINTER

SET

NOERCT
MORECE

INTERRUPT

s YES - SKIP TO SET
sREAD RL REGS
SET

$1GO TO RETURN

OCCURRED

TOO SLOwW

INTERRUPT

FLAG

INITIALIZE ROUTINE
sCLEAR OPERATION FLAGS

sRESET INHIBIT ERROR COUNTING
sRESET MORE COMPARE ERRORS

GET STATUS AND GET STATUS WITH RESET ROUTINE

003132
003132

GSTATR: MOV

TEMPA, -(SP)

1STORE TEMPA

B8R
GSTATC: MOV

GSTATG
TEMPA, -(SP)

1STORE TEMPA

MOV

TEMPA, -(SP)

1STORE TEMPA

SSINDX,R3

$GET SUBROUTINE INDEX

MOV

GSTAT:

MOV
BR

CLR
GSTATG: MOV

MOV

003006
000004
000004
003006

002410
002410

000002
000010

003022
003132

040000

000000

000062
016626

787

TEMP4
RS, -(SP)
(R3)»

;SET FOR NO RESET
1SET FOR SAVE L.
$tSTORE R3

AND T.

REGS

1BUMP IT FOR NEXT ENTRY

4(SP),SUBSTK(R3)

MoV
MOV
MOV
MOV
817
BEQ

RS, SSINDX
RO, -(SP)
R1,-(SP)
82 ,ERRSWI
SORSET, TEMPA
11¢

8EQ

494

1NQ - SK{P

MOV

g%fl

450. ,R1

PC.GSTAT

sINITIALIZE WAIT COUNT

QORDYMSK , T.CS
St
MHOSTAT, T.MP

s TEST IF DRIVE READY
1YES - GO DO CLEAR
sELSE TEST IF HEADS 0UT

OSPDSTAT!HCESTAT!WDESTAT,
T . MP ;TEST IF ODRIVE HAS ERROR

BITY

508

SGETSTAT, TEMPA
GSTATG

sSET FOR RESET

MOV

sSU8

49¢

@GETSTAT!DRSET, TEMPS

WAITMS

000001

003050

000020

003056

BIT
BNE
BIT

144000

003056

8IT

BNE

4, SUBSTK(RI)

;INSERT THIS CALL

tADJUST IT TO CALLING LOCATION
1STORE IT BACK
1STORE RO
1STORE R1
1SET FOR NO ERROR RETURN
sTEST IF DRIVE RESET
1IN0 - SKIP

SORVERR,RLCS(R2) ;TEST IF DRIVE ERROR SET
o3

S1i¢

sMAIT FOR 300 MS FOR DRIVE

TO SETTLE

1GET DRIVE STATUS

1YES - BYPASS RELOAD WAIT FLAG SETTING
: THAT

CAUSED HEADS

1UNLOAD

SvC.MLB SOHOURCE FILE
GLOBAL SUBROUTINES

88 016772
89 016774
30 017002
91 017004
92 017012
93 017014
94 017426
95 017030
96 017032
97 017036
017036
017040
017042
017044
98 017046
99 017050
100 017054
101 017056
102 017062
103 017066
104 017070
105 017072

017074
107 017102
108 017104
109 017112

110
111
112
113
114
115
116
117
118
119
120
121
122

123
124
125
126

127

128
129

017112
017116
017124
017132
017140
017146
017154
017166
017172
017174
017202
017210
017216
017220
017226
017230
017234
017242
017244
017256
017260
017262

131
132 017266
133 017270
134 017274
017274
017276
017300
017302
135 017304
136 017306

MACRO

001444
052737
000440
032737
001034

v04.00 20-JAN-83

040000

003010

040000

003050

14:40:57 PAGE

BEQ
8IS

S51$:

012703

104456
023421
000000
012266
000565
005737
001013
012701
012703
014346
005301
001375
012737
000403
013737

005037
013737

042737

052737
013762
013762

005737
001504
013737
042737
032737
001503
032737
001427
012701
032762
001021
005301
001365
004737
017426
012703

010737

003132

11¢:

000004
003050

8s:

000003

003044

003132

003044

003012
003036
002000
000104
003044
003040

5%:
6%:

003040
003040
003040

003056
177770
000010

003064
003064
003044

040000

003010

001130

000001

016626

12%:

QDRVERR, T.CS
St
@1

10001
O
ERR1
143
TEMP4
St

MOV
MOV
MOV

DEC
BNE
MOV
BR
MOV

CLR

04 ,R1
oL.MP+2,R3
-(R3), -(SP)

R1
84
SGETSTAT,L.DA
68
TEMP4,L.DA

OONE

RLDRV,L.CS

MOV
WAITUS
TS7
BEQ

L.CS,RLCSR(R2)
o1
DONE
14

MOV
8IC
BIT
BEQ
BIT

SEQ 0074

tNO

tELSE

SKIP
SET

WAIT FLAG

sSKIP TO CLEAR
s TEST IF DRIVE ERROR NOW
.YES - SKIP TO CLEAR
sWAIT

FOR DRIVE

TO GET

ERROR,

1DEC WAIT COUNTER
1 IF NOT DONE, LOOP
tMESSAGE FOR UNDEFINED STATE

RDv,

CSERMRD

MOV

e8IT10,L.CS
OGTSTAT,L.CS
L.DA,RLOA(RZ)

T.MP,T.STAT

sEXIT
;TEST IF SAVE REGISTERS
stNO SKIP
$1SET SAVE COUNT

;SET ADDRESS OF FIRST SAVE
sPUT REG ON STACK
10EC COUNT
sLOOP UNTIL ALL SAVED
1SET FOR GET STATUS
s SKIP
s INSERT PRESET FOR STATUS

sCLEAR INTERRUPT FLAG
1SET UP TO GET STATUS
sCLEAR FOR DRIVE 4 - 7 SPEC'D
1LOAD RL REGS
;LOAD CS REG
sHAIT

100 US FOR INTERRUPT

sCHECK IF INTERRUPT OCCURRED
s1NO - SKIP
1STORE MP REGISTER

@rC<STAMSK>,T.STAT ;CLEAR ALL BUT STATE
SORSET,L.DA
sTEST IF RESET WAS SPECIFIED

34
ORELOWT, OPFLAG

12¢

tNC - SKIP TC EXIT

ITESY é:;gELOAD WAIT FLAG SET

MOV
817
BNE
WAITMS
OEC
BNE

4600. ,R1
lSET HAIT COUNT FOR 60 SECONDS
SDROYMSK ,RLCS(R2) ;TEST IF DRIVE NOW READY
12¢
1YES - SKIP
@1
1CALL wWAIT
R1
1DEC COUNT
13¢
sLOOP IF NOT O

MOV
ERRHRD
TRAP
.WORD
.MORD
.WORD

#MRLFAL ,R3
10003.,,ERR1
CSERMRD
10003
O
ERR1

WAITUS

#10.

g%R

011004

.WORD
.WORD
.WORD
8R
TST
BNE

B8EQ

13s:

S
ORELOWT
, OPFLAG

R1
504
OMUNDEF ,R3
10001.,,ERR1

BIC
8IS
MOV

003012

DEC
BNE
MOV
ERRHRD
TRAP

104456
023423

000000
012266
000446

-4
BNF

WAITMS

005301

001342

B8R

10 2

B8R

PC.GSTAT

144

tGET DRIVE STATUS
1ERROR RETURN
$1SEYT RESULT MESSAGE POINTER

1GO TO EXIT
;WAIT FOR 1MS

OR HEADS Of

O
SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES

137 017320
138 017324
139 017326
140 017334
141 017336
142 017344
143 017346
144 017352
145 017354
146 017362
147 017364
017364
017366
017370

017372
148 017374
149 017376
150 017402
151 017404
152 017410
153 017412

017412
017414
017416
017420
154 017422
155 017426
156 017432
157 017434
158 017440
159 017444
160 017446
161 017450
162 017452
163 017460

165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185

017462
017464
017466

017472
017476
017500
017504
017506
017512

017514
017522
017524
017530
017532
017536
017540
017546
017554
017560

MACRO V0O4.00 20 JUAN-83

004737
017426
032737
001434
032737
001403
012703
000417
032737
001405

14:40:57 PAGE

016626
003050

001000

003056

006433
040000

003050

7%:

012570
000412
012703
000403
004737
012603

005301
001375

162737
012601
012600
012603
012637
005737
001403
063716
000207
017616
000207

012737
000402

005037
010346
013703
005723
016663
162763
010337
010046

sGET DRIVE STATUS

BIT
BEQ
BIT
8EQ
MOV

HANYERR, T,CS
L1
OVCSTAT,
T .MP
78
QVCNRST ,R3

s TEST IF ANY ERRQR
tNO - SKIP
tCHECK IF VOLUME CHECK RESET

#ORVERR, T.CS
98

sCHECK

B8R

8IT
BEQ

.WORD
.WORD
.WORD

006454

9¢:

016422

1¢:

2s:

104456

023422
000000
012266
005037
005737
001007
012703
012701
012623

PC,GSTAT

ERRMRD
TRAP

104456
023424
000000

003022
003132

14
3s:

20%:
000002

B8R

MOV

003006

22%:

TEMPA

003124

XSEEK
;
XSEEK]
:

003006
000002
000004
003006

002410
002410

- SKIP

DRIVE ERROR

sEXIT
sSET REASON POINTER

sEXIT

iWAIT FOR INTERRUPT
1STORE REASON POINTER FOR RETURN

228

tNO

MOV
MOV

4 ,R1
(SP)+,(R3).

1SET REGISTER COUNT
sRESTORE REG

#L.CS,.R3

DEC

MOV

(SP).,.RO

BNE
SUB
MOV

agg

XSEEKT:

tNO

BNE

T1ST
8EQ

003124

SKIP

$s0ET REASON POINTER
sEXIT

sCLEAR FOR ERROR RETURN

003022

177777

OUNXERR,R3

1 YES

10002
O
ERR1
ERRSWI

MOV

99¢

10004
O
ERR6

TST

.WORD
.WMORD
.WORD
CLR

003132

000000

10004.,,.ERR6
CSERHRD

24
PC,WAITIN
(SP)+,R3
10002.,,.ERR1
CSERHRD

MOV

003022

BR
JSR
MOV
ERRHRD
TRAP

MOV

003040

SEG@ 007S

gSR
$

100000

10-3

MOV

RTS

204
42, SSINDX
(SP)+.R1
(SP)«,R3

(SP)e,TEMP4

ERRSWI
994

ngSHI.(SP)

8(SP),(SP)

SEEK ROUTINE
MOV
&-1,TEMPL
8R
XSEEK]
CLR
TEMPL
MOV
R3, -(SP)

MOV

SSINDX,R3

1 TEST

IF REGISTERS WERE

SKIP

:SET POINTER TO RESTORE
sDEC COUNT

sLOOP UNTIL ALL ARE RESTORED
1REMOVE ENTRY FROM SUBROUT STACK
sRESTORE R1

sRESTORE RO
sRESTORE R3

sRESTORE TEMP4

s TEST IF ERROR RETURN
tYES - SKIP
sADD IN ERROR RETURN

3SET ERROR RETURN ADDRESS

$SET SPECIAL TIMING SEEK FLAG
sCLEAR SPECIAL SEEK FOR TIMING FLAG
s+STORE R3

1GET SUBROQUTINE INDEX

TST
MOV

(R3).
sBUMP IT FOR NEXT E'
2(SP),SUBSTK(R3) ;INSERT THIS CALL

MOV
MOV

R3,SSINDX
RO, -(SP)

SuB

94 ,SUBSTK(R3)

5AVED

sADJUST IT TO CALLING LOCATION

1STORE IT BACK

SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES
186
187
188
189
190

191
192
193
194
195

196
197

198
199
200
201
202

203
204
205
206
207
208
209

210
211
212
213
214

215
216
217

218
219
220
221

017562
017564
017566
017574
017600
017604
017606
017614
017622
017624
017632
017640
017646
017654
017656
017664
017672
017700
017702
017706
017710
017714
017722
017726
017732
017736
017740
017746
017750
017752
017756
017762
017766
017770
017776
020000

222
223
224 020006

225 020014

226
227
228
229
230
231

232
233
234

235
236
237
238
239
240
241
242

020016
020024
020024
020030
020034
020040
020044
020046
020052
020056
020060
020062
020064
020070
020072
020076
020102

MACRO

010146
010546

012737
005037

004737
020236
013737
023737
003427
163737
013737
013737
022737
001424

vO4.00 20 JUAN 83

000002
003102

003104
002306

002306
003106
002306
000001

003106
003102
003106

012737
000451
005737
100007
005437
013737
005037

000001

100005

012737
005405
000402
005037

010537
005737
001416
023737
001007
012737

022737

001003
063737

012705
012715
053715
042725
005025
013715
012700

006315
005300
001375
005737
001402
052715
005737
001402

003022

003110
003106

000001

013705
163705

MOV
MOV

MOV
CLR

022704

162737

012737

14:40:57 PAGE

003106
003106
003106
003106
003110
003106
000001

002302

003102

003112

003112
000007

17%:
18¢:

21s:

003114
000004
003116

SUB
BPL

NEG

144%:

000001

CLR

MOV

13%:

003114

B8R
TSY
B8PL

NEG
MOV

003114

000001

003040
000106
003036
002000

MOV

I} :l' \‘l

6$:

002306

3MHCYL JHLMTUW

cMpP

003102

003106

cMP
BLE
SUB

BEQ
SuUB

3s:

003114
003112
003102

PC,.GETPOS

MOV
MOV

003106
003114
003112

23%:

R1, (SP)
RS, (SP)
92 ,ERRSWI
DIFAUG

JSR
65$

MOV

002302

10 4

8R
CLR
MOV

TST
BEG
cHP
BNE
MOV

CHP
BNE

ADD

MOV
MOV

BIS
BIC
CLR
MOV
MOV
ASL

DEC
BNE
TST
BEQ
81S
TST
BEQ

CURCYL,OLDCYL
$

HLMTW,NEWCYL
NEWCYL ,DIFAUG
HLMTW, NEWC YL
©1,T.0RIVE

56Q 0076

:STORE RFG
:SET FOR NO ERROR RETURN
sCLEAR DIFFERENCE AUGMENT

PAST

GUARD BAND)

(FOR SEFKING

$1GEY PRESENT POSITION
+MOVE
$TEST

CURRENT TO OLD CYLINDER
IF NEW IS GREATER THAN 255

sNO - SKIP
+ELSE SUBTRACT 255.
sSTORE DIFFERE“CE AS AUGMENT
;SET NEWCYL AS 255.

68
01 ,NEWCYL
01 ,DESSGN
¢1,0ESDIF

184
NEWCYL
64
NEWCYL
NEWCYL ,DIFAUG
NEWCYL
CURCYL ,RS
NEWCYL ,RS
134
91 ,DESSGN
R5

14¢
DESSGN
R5,0ESOIF
DIFAUG
18%
NEWCYL ,HLMTW
174
01,0ESSGN
€1,7.D0RIVE

s TEST IF NEWCYL HAS NEGATIVE VALUE
sNO - SKIP
+ELSE MAKE IT POSITIVE
;AND STORE IT AS AUGMENT
sAND

SET NEWCYL

TO O

;:COMPUTE DIFFERENCE AND NEW CYLINDER
:SUB NEWCYL FROM CURCYL

s IF OIFF IS POSITIVE - SKIP(REV SEEK)
;ELSE SET SIGN FOR FORWARD
sMAKE DIFFERENCE POSITIVE

; SKIP
1SET SIGN FOR REVERSE
;STORE DIFFERENCE
1IS THERE A DIFFERENCE AUGMENT
iNO - SKIP
sCHECK IF NEW CYL IS 255.
;NO - SKIP
sELSE FORCE SIGN FOR FORWARD
: (CINNER GUARD BAND)

18¢
OIFAUG,DESDIF
o.CS,RS

ASEEK, (RS)
RLDRV,(RS)

MITLI0,(RS).
(RS)+«
DESDIF,(RS)
€7.R0

(RS)

RO
21ls
DESSGN

234
@0IRBIT,(RS)
DESHD
25%

tGET L REG ADDRESS
$SET FOR SEEK
s INSERT DRIVE NUMBER
:CLEAR IF DRIVE 4 - 7 SPeC'D
;CLEAR BUS ADDRESS
sLOAD DIFFERENCE
1SET TO SHIFT DIFFERENCE
sLOOP UNTIL ALIGNED
s TEST SIGN
sSKIP IF O

1ELSE INSERT SIGN
;TEST IF HEAD O
1YES - SKIP

1,
SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES

243
244
2as
246
247
248
249
250
251
252
253
254
255
256
257
258

259
260
261
262
263

264
265
266
267
268
269
270

020104
020110
020114
020120
020122
020126
020132
020134
020140
020144
020150
020162
020166
020170
020174
020176
020176
020200
020202
020204
020206
020212
020214
020220
020222
020222
020224
020226
020230
020232
020236
020244
020246
020250
020252
020254
020260
020262
020266
020270
020274

271
272
273
274
275
276
333
335
336
337 020276
338 020300

339
340
341
342
343
344
345
346
347
348

020304

020306

020314
020322
020326
020330
020332
020340
020344
020346

MACRO

052715
052725
004737
020236
005037

005737

001041
014562
014562
014562
005737
001012
004737
012603

104456
023425
000000
012266
005037
000411
005737
100006
104456
023426
000000
012570
005037
162737
012605
012601
012600
012603
005737
001403
063716
000207
017616
000207

010346
013703
005723
016663
162763

010337
010346
010446
012737
004737
020604
012704

v04.00 20 JAN 83

000020
000001
020642

14:40:57

25%-

PAGE

8IS
BIS
JSR
654

CLR
151
B8NE

003012
003124
000004
000002
000000

30$:

003012
016422

MOV
MOV
MOV
WAITUS
TST

003022
000002

003006

65¢:

. WORD
. WORD
CLR
suB

BPL
ERRHRD
TRAP
. WORD

MOV

MOV
MOV
MOV

TS7

BEQ

99%

000000

POSHOS:

003006

000002
000004
003006

002410
002410

00C002
022704

003022

000012

ADD
RTS
MOV
RTS

SEQ 0077

SET

sELSE

HEAD BIT

; INSERT MARKER BIY
sCHECK TF DRIVE READY

DONE
TEMPL
654
-(RS),RLDA(R 2)
-(RS),RLBA(RR2)
-(R5),RLCS(R 2)

sCLEAR INTERRUPT FLAG

OONE
324

; TEST

(SP)+,R3

;GET RESULT MESSAGE POINTER

;CHECK IF SPECIAL SEEK FLAG SET
sYES - SKIP
DO NOT
;LOAD RL REGISTERS

START SEEK

210,

10005., ,ERR1

32%:

003022

PC.RDYCHK

ERRHRD

. WORD
.WORD
. WORD
CLR
B8R
TST

003022

aMBSETO,(RS).

PC.MAITIN

TRAP

003050

OHDSE
, (RS5)
L

BNE
JSR
MOV

003022

10 S

CS$ERMHRD
10005
0
ERR1
ERRSWI
654
T.CS
654
10006.
, ,ERR6
CS$ERHRD
10006
0
ERR6
ERRSWI
42, SSINDX

(SP)+,R5
(SP)+,R1
(SP)+.RO
(SP)+,R3
ERRSWI

99¢
SRRSHI.(SP)
C

a(sP),(SP)

s YES

INTERRUPT DONE

SKIP

;GO WAIT FOR INTERRUPT

+CLEAR FOR ERROR RETURN
;s TEST IF ANY ERROR
iNO - SKIP

1CLEAR FOR ERROR RETURN
1REMOVE ENTRY FROM SUBROUT STACK
;:RESTORE REGISTERS

;TEST

;YES

ERROR RETURN

SKIP

;ADD IN ERROR RETURN
sSET ERROR RETURN ADDRESS

POSITION HEADS ROUTINE, POSITIONS HEADS USING 1 CYLINDER
TO CYLINDER SPECIFIED IN RS BY THE CALLING ROUTINE
MOV
R3,-(SP)
§ SAVE REGS
MOV
SSINOX,R3
:GET SUBROUTINE INDEX
157
(R3,.
sBUMP IT FOR NEXT ENTRY
MOV
2(SP),SUBSTK(R3) ;INSERT THIS CALL
94 ,SUBSTK(R3)
suB
sADJUST IT TO CALLING LOCATION
MOV
R3, SSINDX
+STORE IT BACK
MOV
R3,-(SP)
MOV
R4, -(SP)
MOV
%2 ,ERRSWI
;SET FOR NO ERROR RETURN

JSR

PH65$
MOV

PC,GETPOS

;GET CURRENT POSITION

#10. ,R4

;SET RETRY COUNT

SEEKS

SvC.MLB SOURCE FILE
GLOBAL SUBROUTINES
349 020352
020352
350 020354
020354
351 020356
020356
352 020360
353 020364
354 020366
355 020374
356 020376

357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372

373
374
375
376
377
378
379

380
381
382
383
384
385
386
387
388

389

391
392
393
394

020402
020404

020412
020416
020420
020422
020426
020430
020434
020440
020442
020446
020452
020454
020460
020462
020462
020464
020466
020470
020472
020476
020500
020504
020506
020514
020516
020522

020524
020530
020532
020540
020542
020544
020546
020552
020552
020554
020556
020560
020562
020566
020570
020576
020600
020602

MACRO

v04.00 20

JUAN 83

BGNSEG

104404

1¢:

104420

103012
004737

020602

023737
001017
004737
000414
013737
023705
001471
003003
005237
000402
005337
004737
020602
012701
004737
020602
005737
100007
104456
023430
000000
012570
005037
000441
004737
020602
023737
001003
012704
000714
005737
001017
023737
003366
005304
001333
012703

14:40:57 PAGE

005037
000405
023737
002747
000760

TRAP
INLOOP
TRAP

C$BSEG

8ccC

JSR
60%
CMP
BNE
JSR

003110

003106

021202
003110
003110

003104

S5s:

003106
003106
017524

7%:

8s:

005670
022420

003050

022704

10¢:
003106

000012

14¢:

003114

15¢:

003110

MOV
cHP
BEQ
8GT
INC

BR
OEC
JSR
604

CS$INLP

003106

164%:
007313

003110

003106

17¢:

20s:

;CHECK IF IN ERROR LOOP
St

PC,GETPOS
CURCYL ,NEWCYL
8%
PC, ONSWAP
8%
CURCYL ,0LDCYL
CURCYL ,RS
60%
74
NEWCYL
84
NEWCYL
PC, XSEEK
23000. ,R1

PC,RDYMAIT

ERRHRD

10008.,,ERR6

T.CS

sNO - SKIP
sCLSE GET PNSITION

;CHECK IF AT INTENDED POSITION

;NO

- SKIP

;SWAP OLDCYL AND NEWCYL
s SKIP
:+IN NOT LOOPING, STORE CURCYL AS OLDCrL
;CHECK IF HDS AT FINAL POSITION
sYES

TO EXIT

sIF CURCYL > FINAL POSITION - SKIP
xgkis BUMP NEWCYL (MOVE HDS IN)
;sDEC NEWCYL (MOVE HDS OUT)
;00 SEek
;SET WAIT COUNT 300 MS
sWAIT FOR DRIVE READY

; TEST IF ANY ERROR

10¢

;NO

TRAP
.WORD
.WORD
.WORD
CLR

C¢ERHRD
10008
O
ERR6
ERRSWI

;sCLEAR FOR ERROR ERROR RETURN

JSR
604
cHP
BNE

PC,GETPOS

sGET POSITION

CURCYL ,NEWCYL
15%

+CHECK IF ARRIVED AT DESIRED PLACE
;NO - SKIP
;ELSE INIT RETRY COUNT
;GO DO NEXT SEEK
:TEST IF GOING IN
s YES - SKIP
sCHECK IF HEADS DID NOT MO ~ 1IN
s YES - SKIP
;DEC RETRY COUNT
;00 ANOTHER SEEK IF NOT O

MOV

BR
TST
BNE
CMP
8GT
DEC
BNE

60%

410. .R4

14
DESSGN
173

CURCYL ,NEMWCYL

MOV
ERRHRD
TRAP

14¢
R4
84
4HOMOVF ,R3
10009., ,ERRL
CS$ERHRD

.WORD
.WORD
CLR
BR
CMP
BLT
BR

O
ERR1
ERRSWI
60¢
CURCYL ,NEWCYL
14$
16%

.WORD

003022

SEQ 0078

JSR
604
TST

B8PL

003022

003110

MOV

104456
023431
000000
012266

10-6

BNCOMPLETE
022704

SKIP

;ELSE SET RESUWLT MESSAGE POINTER

10009

;CLEAR FOR ERROR ERROR RETURN
;HDS
;:YES

SHOULD MOVE
- SKIP

OUT,

;:ELSE GO DEC AND RETRY

CHK

THEY

DID

SVC.M.
3 SOURCE FILE
GLOBAL SUBROUT INES
395 020602
396 020602
020602
020602
397 020604
398 020612
399 020614
400 020€16
401 020620
402 020624
403 020626
404 020632
405 0206 34
406 020640

407
409

41C
411
412
413
414
415
416
417

418

419
420
421

422

423
424
425
426
427

428
429

430

431

a3z
433
a3
435
436
437
438
439
440
441
442

020642
020644
020650
020652
020660
020666
020672
020674
020676
020700
020706
020712
020716
020720
020726
020730
020742
020744
020746
020752
020756
020756
020760
020762
020764
020766
020772
020776
021000
021006
021010
021022
021024
021026
021034
021036
021036
021040
21042
021044

MACRO vO4.00 2C UAN 83

14:40:5" PAGE

604
:
ENDSEG

104405
162787

100004:

000002

012604
012600

012603
005737
001403
063716
000207
017616
000207

010346
013703
005723

016663

162763
010337
010046

010146
010446
012737
012701
004737
021052
032737
©01053

005301
0013562
012703
012704

003006

PHESS:

003022
003022
994
.

000000

104456
023433
000000
012570

02,5SINDX
)+ R4
(SP

(SP).,R0
(SP). ,RS
ERRSKI
994

ADD
RTS

ERRSMI,(SP)
PC

RTS

MOV

8(SP),(sSP)

sREMOVE ENTRY FROM SUBROUT
sRESTORE REGISTERS
sTEST

LTACY

ERROR RETURN

1YES - SKIP
sADD IN ERROR RETURN

$SET ERROR RETURN ADORESS

DRIVE KEADY TEST ROUTINE. CHMECKS DRIVE IS READY, IF NOT,
S00MS FOR READY TO SET,
ROYCHK: MOV
R3, -(5P)
$STORE REGS
MOV
SSINDX ,R3
$GET SUBROUTINE INDEX
TS7
(R3).
18UMP 1T FOR NEXT ENTRY
MOV
2(SP),SUBSTK(R3) ; INSERT THIS CALL
04 ,SUBSTK(R3)
SUB
1ADJJUST IT TO CALLING LOCATION
R3,SSINDX
MOV
sSTORE IT BACK
MOV
RO, -(SP)
R1,-(SP)
MOV
R4, -(SP)
MOV
#2,ERRSHI
MOV
15€T FOR NO ERROR RETURN
#5000, ,R1
MOV
$SET WAIT COUNT
16
JSR
PC,GSTAT
sGET DRIVE STATUS

003006
000002

003006

002410

000002
011610
016626

003022

000001

003050

8IT
BNE

WAITUS

DEC
BNE

010322
011207

MOV
MOV

ERRHRD
TRAP

. WORD

000062
016626
000001

2%:

003050

005301

001362
032737
001406

COESEG

104456
023432

000000
012520
012701
004737
021052
032737
001007

TRAP

SUB
MOV
MOV
MOV
1ST
BEQ

100000

003050

3%:

QORDYMSK,
7. CS
5%
ol

OMDRDY ,R3

R4
#CSCOMS
10010.,.ERRS
CSERHRD
30010

1 TEST IF DRIVE READY
sYES - EXIY
sDEC WAIT COUNT
1L00P IF NOT O
sSET RESWLT MESSAGE POINTER
$SET CONDITION MESSAGE POINTER

. WORD
. WORD
MOV
JSR

PC,GSTAT

BIT

SOROYMSK, T.CS

81t

R1
24
SANYERR, T.CS

sDEC WAIT COUNTER
sLOOP UNTIL TIME DONE

10011..,.ERR6
CS4ERHRD
10011

1REPORT

BNE
WAITMS
DEC
BNE
BEQ
ERRHRD
TRAP

. WORD
. WORD
. WORD

ERRS
#50. ,R1

0
ERRG

$1SET MAIT COUNT FOR S5 SECONDS
sGET ORIVE STATUS

s TEST IF DRIVE READY
1YES - SKIP
1WAIT FOR
s TEST

tNO

100MS

ANYERR SET

SKIP

ALL

ERRORS

WAIT

SVC.M
8 SOURCE FILE MACRO vO4.00 20 UAN 83
GL OBAL SUBROUTINES

446

447
448

449

450
451
a52
453
454
455

456

021064
021066
021070
021072
021074
021100
021102
021106
021110
021114

005337
005037
162737
012604
012601
012600
012603
005737
001403
063716
000207
017616
000207

003244
003022
000002

003006

4t9
460
461
462

021116
021122
021130
021132
463 021140

464
465
46¢€
467
468
469
470
471
472
473
474
475

021142
021150
021152
021156
021160
021166
021172
021174
021200

476
477
478 021202

479 021204
480 021210

481

021216
482 021222
483 021224

484
486
487
488
489 021226
490 021232
491 021234

021234
0z1240
021244
021250
021252
021254
492 021260
021260
021262

005037
032737
001403
013737
000207

032737
001011
005737
001006
012737
062716
000207
017616
000207
010046
013700
013737
010037
012600
000207

ERRCNT

Su8

82, SSINDX

99 :

003116
010000

014120

014126

003116

014120

003116
000001
000002

003500

012746
012746
012746
010600
104417
062706

007540
Cl1554
000002

tREDUCE ERROR COUNT FOR DUAL
;CLEAR FNOR ERROR RE TURN

sREMOVE ENTRY FROM 5SBROUT

(SP). R4
(SP). R1

sRESTORE

REGS

ERRSWI

1 TEST

ERROR RETURN

gésp).(sp)

1SET ERROR RETURN ADDRESS

(SP,+,RO
(SP). A3

99
ESRSHI.(SP)

s YES
;ADD

STACK

SK1P
IN ERROR RETURN

TST

DESHD

s TEST

MOV

®1,0ESHD

;ELSE SET FOR MEAD ONE

BNE

ADD

02.(SP)

RTS

RIS

MOV

(SP),.(SP)

IF HEAD ONE USED

sYES - TAKE ABORT EXIT

1BUMP PAST ABORT RETURN
sRETURN

sGET ABORTY DESTINATION

SWAP OLD CYLINDER AND NEW CYLINDER ROUTINE.
3
ONSWAP: MOV
RO, -(SP)
1STORE RO
MOV
oLDCYL RO
sMOVE OLD TO RO
MOV
NEWC YL ,OLOCYL
1MOVE NEW TO OLD

MOV

MOV
RTS

KBSVD:

RO, ,NEWCYL

(SP)+,RO
PC

;PUT OLD IN NEW
tRESTORE RO

BAD SECTOR FILES VALID CHECKX ROUTINE.

CHECKS IF BAD SECTOR

FILES HAVE BEEN READ AND STORED. IF NOT, REPORT AND FORCE
FILES TO LOOK LIKE ALL SECTORS OK.
157
BSFVAL
;TEST IF BAD SECTORS STORED

BNE

MOV
MOV
MOV
MOV
TRAP

#BSNSTR, -(SP)
OFMT9, -(SP)
e2,-(SP)
SP,RO
COPNTF

PRINTF

#FMT9,#BSNSTR

tYES - EXIT
sREPORT

ADD
06, S5P
PRINTF o0FMTS, 0BASADD,RLBAS,
#DRYNAM, <B ,RLDRV.1>

003037

FPRRIR’,

SWAP HEAD ROUTINE. CHANGES SELECTED MEAD TO HEAD 1
UNLESS MEAD O SPECIFICAILY SELECTED BY SOF TWARE PARAMETER.
S WAPHD; BIT
OHEADLM, MISWIW
;TEST IF HEAD SPECIFIED
BNE
23
;YES - TAKE ABORT EXIT

003116

003104

:?g

ERRSWI

CHOOSE HEAD ROUTINE. PICKS HEAD O UNLESS SPECIFIC HEAD IS
SELECTED BY SOFTWARE PARAMETER,
c HOSHOD: CLR
OESHO
sCLEAR TO HEAD O
BIT
OHEADLM MISWIW
TEST IF HEAD SPECIFIED
8EQ
14
iNO - SKIP
:?g
:EAOU.DESHD
s INSERT SPECIFIED HEAD
1

2 $:
3s:

003104
003106
003106

MOV
MOV

8EQ
8?2

00302.2

010000

CLR

1S7

003022

005737
001051

005046
153716

0€eC

MOV
MOV

457

458

10 8

Yo
o ae

443 021046
444 021052
445 021056

14:40:57 PAGE

CLR

BIS8

-(SP)

RLORV.1,(SP)

021266
021272
021276
0213C2
021306
021312
021314
021316
493 021322
021322
021326
021332

021334

021336
021342
495 021350
496 021356
454

497
499

500 021360
501 021366
502 021370
503 021374
021376
505 021402
021404
507 021412
508 021420
509 021424
510 02142€
511 021430
512 021432

514
515
516
517
518
519
520
521
522
523
524
S25
526
527
528
529
530
531
532
S33
524
535
536
537

021440
021444
021446
021452
021456
021460
021462
021464
021470
021472
021476

021502
021506
021512
021516
021520
021522
021526
021532
021536
021550
021554
021556
021564
021566

01274¢€

013746
012746
012746
012746
010600

104417
062706

006142
003032
006131
011370

MOV
MOV
MOV
MOV

000005

MOV

000014

012746
012746
010600
104417
062706
012737
012737
000207

011354

177777
177777

003502
003676

012737
000402
005037
010346
013703
005723
016663
162763
010337
010046
010146
010446
012737
005737
001007
012703
012701
014346
005301
001375
004737
021740
005037
012701
013711
042711
052721
005021
005021
014162
014162
014162

000001

003132

005737

001460
032737
001035
012703

14:40:57 PAGE

000001

000004

003132
003006
000002
000004
003006

000002
003132

Ss:
:

XRDHOC
:

020642

2%:

003012

003040
003036
002000
000110

000004
000002
000000

34:

003012
000001
010322

Ss:

oFMTS, (SP)
05,-(SP)
SP,RO

CSPNTF
014,5P
ofFMT3
OFMT3, -(SP)
21, -(SP)
SP,RQO
CIPNTF
%4,5P
@-1.58SFIL
0-1,FBSFIL
PC

+FORCE FILES TO NO ENTRIES

MOV

R1,-(SP)

rOV

02 .ERRSWI

XROHOG
TEMPA
R3,-(SP)
SSINDX,.R3

TEMPA

sSET FOR NO ERROR RETURN

sTEST

IF REGISTERS TO BE

SAVED

BNE
MOV
MOV
MOV
DEC
BNE
JSR
654
CLR
MOV
MOV
8IC
8IS
CLR
CLR
MOV
MOV
MOV
WAITUS

21
M.MP.2,R3
#4,R1
-(R35,-(SP)
R1
1$
PC.ROYCHK
OONE
&.CS,RL
RLORV,(R1)
#BIT10,(R1)
ORDHEAD,
(R1 )+
(R1).
(R1).
-(R1),RLDA(R2)
-(R1),RLBA(R2)
-(R1),RLCSR(R2)
410.

sCLEAR INTERRUPT FLAG
:1GET ADORESS OF LOAD REGS
sLOAD DRIVE NUMBER
sCLEAR FOR DRIVE 4 - 7 SPEC'D
1 INSERT COMMAND
1CLEAR BA
1CLEAR DA
sLOAD RL11 REGS

BEQ
BIT
BNE

144
#DRDYMSK, T.CS
10¢

1NO

157

003050

O®DRVNAM, -(SP)
RLBAS, -(SP)
#BASADD, -(SP)

MOV
SU8
MOV

157

1¢:

5€Q GUA1

1SET FLAG TO 8YPASS REG STORAGE
;G0 NO IT
$1SET FLAG TO SAVE T. AMD L. REGS
sSTORE REGISTERS
sGET SUBROUTINE INDEX
(R3).
;1BUMP 1T FOR NEXT ENTRY
2(SP),SUBSTK(R3) ;INSERT THIS CALL
4 ,SUBSTK(RS)
tADJUST IT TO CALLING LOCATTON
R3,SSINDX
$STORE IT BACK

TST

003022

10 9

READ HEADERS ROUTINE.
MOV
01, TEMPA

BR
XRDHD:
CLR
XRDHOG: MOV
MOV

002410
0C2410

003050
0000604

MOV
TRAP
ADD
PRINTF
MOV
MOV
MOV
TRAP
ADD
MOV
MOV
RTS

——

SVC.M.8 SOURCE FILE MACRO vO4.00 20 UAN 83
GLOBAL SUBROUTINES

MOV

DONE

OMORDY R}

iNO - SKIP
1SET PCINTER FOR REGS
$SET COUNT
1 SAVE REGISTER

sDEC COUNT

;LOOP UNTIL ALL ARE SAVED

;1CHECK DRIVE READY

tWAIT IMS FOR INTERRUPT
t1TEST IN INTERRUPT FLAG SET
SKIP

1 TEST IF DRIVE READY
1 YES

SKIP

$1SET NO READY MESSAGE

SvC.ML8 SOURCE FILE
GLOBAL SUBROUTINES
533 021572
539 021576
021576
021600
021602
021604
540 021606
S41 021612
S42 021616
543 021620
544 021626
545 021630
546 021634
S47 021636
548 021640
549 021642
550 021646
021646
021650
021652
021654
551 021656
552 021660
553 021664
554 021666
021666
021670
021672
021674
555 021676
356 021700
557 021704
558 021710
559 021714
560 021716
021722
562 021724
021724
-

02.726

563
565
566
567
568
569
570
571
S72
573
574
575
576
577
578

021730
021732
021734
021740
021744
021746
021752
021756
021760
021762
0c1764
021772
021774
021776
022000
022002
022006
022010

MACRO vO4.00 20 JAN-83

012704

14:40:57 PAGE

011224

MOV

ERRHRD

104456
023441

000000
012520
012701
004737
021734

032737
001403
005037
000411

TRAP

. WORD
.WORD
. WORD

000062
016626
000001

MOV
4%

003050

003022

005301

001364
012704

11¢:

011235

104456
023436
000000

JSR
604
8I71
BEQ
CLR
B8R
DEC
BNE
MOV
ERRMRO
TRAP

104456
023440
000000
012570
000416
012701
0le221
016221
000411
004737
012603

003050

10¢:

012703
012701
012623
005301
001375
162737

012604
012601
012600
012603

005737
001403
063716

@CAFDT
R4

10017., ,ERRS
CSERHRD

003060
000006

12%:

016422

144

003022
003132

608:
65%;

003040
204

ERRS

000002

003022
003022

003006

QDRDYMSK, 1.CS
118
ERRSWI
10¢

;TEST IF ORIVE HAS COME READTY
s}NO - SKIP

R1
4

0CSSEC,R4
10014.,.ERRS
CS$ERMHRD
10014

PC.WAITIN

(SP)«,R3
10015., ,ERR1
CSERHRD
50015
ERR1L

ERRSWI
TEMP4

ées
M .CS,.RY
44
. R1

(SP)+,(R3)

R1
204
#2,SSINDX
MOV
MOV
MOV

TST
BEQ
ADD

7F
¢ ke

$5ET WAIT CPUNT FOR S SECONDS
sGET STATUS

RLMP(R2).(R1) *
654

2z%:

AFTER DATA

050. ,R1
PC,GSTAT

0
ERR6
6038
#HOWRD2 ,R1
RLMP(R2),(R1) [

MOV

JCONDITION O

16017
0

CSERHRD
10016

104456
0234357
000000
012266
005037
005737
001007

0
ERRS
608
T.CS
124
10016., .ERRG

012520

000426
005737
100005

(SP)+,R4
(SP)+,R1
(SP)+,R0
(SP)+,R3
ERRSWI

994

ERRSWI,(S5P)

1CLEAR ERROR SWITCH
;1 SKIP

sDEC WAIT COUNT
;LOOP UNTIL TIME DONE
1SET CONDITION AFTER S SECONDS

tEXIT

;CHECK FOR ANY ERRORS

tNO - SKIP
sREPORT ALL ERRORS

1GET POINTER
tSTORE LAST

TWO HEADCR WORDS

sEXIT

sWAIT FOR INTERRUPT

1GET RESWLTS
$REPORT

;CLEAR FOR ERROR cRROR RETURN
s TEST IF REGISVERS WERE SAVED
1NO - SKIP
$1SET POINTER TO RESTORE REGS
:SET COUNT
tRESTORE REGISTER

sDEC COUNT

;LOOP UNTIL ALL ARE RESTGRED
tREMOVE ENTRY FROM SUBROUT

1RESTORE RCGS

s TEST IF ERROR RETURN

tYES
1ADD

SKIP

IN ERROR RETURN

STACK

SVC.MLB SOURCE FILE MACRO VO04.00 20 JUAN 83
GLOBAL SUBROUTINES
579 022n14

580 022016
581 022022

582
584
585
586
587
588
589
590
591
592
593
L94
595
596
397
598
599
600
601
602
603
604
605
606
607
608
609
610
611

612
613
614
615
616
617
618
619
620
621
622
623

624
625
626
627
628

000207
017615
000207

14:40:57 PAGE

994§
;

000000

RYS
MOV
RTS

VERIFY

022024
022026
022032
022034
022042
022050
022054
022056
022060
022062
022064
022072
022100
022104
022110
022114
022116
022120
022122
022126
022132
022134
022136
022140
022144
022146
022146
022150
022152
022154
022156
022162
022164
022170
022174
022200
022202
022206
022212
022214
022216
022220
022220
022222
022224
022226
022230
022234
022236
022240
022242

010346
013703
005723
016663

162763
010337

010046
010146
010446

010546
012737
052737
C05037
012704
012705
005003
011415
011401
042701
012700
006201
005300
001375
020137
001407
104456
023442
000000
013662
005037
000456
012701
042715
005737
001402
052715
005065
021524
001410
005744

VERHOR:

003006
000002

003006

000002

003020
004072
003122

000177
000007

002410
002410

003106

000050
000100
003116
000100
000002

104456
023442

000000
013662

005037
005724
005203
005724
001410

003022
8%:

COMPARES 40 HFADERS FOR CONTENT

RO, (SP)
R1,-(SP)
R4, -(SP)
Ry, -(SP)
02 ,ERRSWI

MOV

0IBUFF R4

94 ,SUBSTK(R3)
R3,SSINDX

OHORCMP .OPFLAG
MORECE

$ADJUST IT TO CALI ING LOCATIWN
$STORE IT BACK

1SET FOR NO ERRNR RETURN
;SET HEADER COMPARE FLAG

+CLEAR MORE ERRORS FLAG

$SET POINTER TO HEADERS

MOV
CLR
MOV
MOV
8IC

OTEMPO RS
$SET POINTER TO WORK AREA
R3
1CLEAR FOR WORD COUNTER
(R4),(RS)
sMOVE HOR WORD TO WORK AREA
{R4),R1
1PUT WORD IN REG 1
#177,R1 ;CLEAR ALL BUT CYLINDER

ASR
DEC
BNE
cHe
BEQ
ERRHRD

R1
RO
3¢
R1,NEWCYL
44
10018.,,ERR10

LHORD

MOV

gkfl

5%:
6%:

ERROK RETURN ADDRESS

MOV
MOV
MOV
MOV
MOV

.MORD

4%
;

MEADERS ROQUTINE,

1SET

R3, -(SP)
1 STORE REGS
SSINDX,R3
sGET SUBROUTINE INDEX
(R3).
tBUMP IT FOR NEXT ENTRY
2(SP),SUBSTK(R3) ;INSERT THIS CALL

TRAP
.WORD

003022

PC
8(sP),(SP)
{9

LEQ NuBY

MOV
MOV
TST
MOV

8IS
CLR

3s:

SEQUENCE.

SUB
MOV

003022
003010

#7,.RO

CSERHRD
10018

ERR10

$SET SHIFT COUNT

s SHIFT
sDEC
1LOOP
;CHECK IF CYLINDER PART GOOD
$1YES - SKIP
;REPORT ERROR

Eg?SHI

$CLEAR FOR ERROR ERROR RETURN

MOV
8IC
157
BEQ
8IS
CLR
cre

940. ,R1
OHDHSEL , (R5)
DESHD
54
OHOMSEL , (RS)
2(R5)
(RS),(R4).

$SET HEADER COUNT
sCLEAR MEAD SELECT AND O BIT
$ARE WE USING HD 0?
1YES - SKIP
1INSERT WFAD BIT
sCLEAR 2ND WORD OF WORK AREA
1 TEST FIRST WORD OK

157
ERRHRD
TRAP

-(R4)
10018.,,ERR10
CS$ERHRD

tELSE SET POINTER FOR ERROR
;REPORT

BEGQ

8¢

s YES - SKIP

.WORD
.WORD
,MORD
CLR

10018
O
ERR1O
ERRSWI

1CLEAR FOR ERROR RETURN

INC

1BUMP WORD COUNTER

TST

TST
BEQ

(R4).

(R4).
12¢

sRESET POINTER

s TEST 2ND WORD 1S 0O
$YES - SKIP

AND

SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES

629 022244
630 022246
022246
022250
022252
022254
631 022256
632 022262
633 022264
634 022266
635 022270
636 022272
637 022274
638 022300
639 022304
640 022306
641 022312
642 022314
643 022316
644 022320
645 022326
646 022330
647 022332
648 022334
649 022336
650 022340
651 022344
652 022346
653 022352
654 022354
655 022360
656
658
659 022362
660 022366
661 022370
662 022374
663 022376
022402
665 022406
022410
667 022412
668 022414
669 022416
670
671
672
673 022420
674 022422
675 022426
676 022430
€1 022436
678 022444
679 022450
680 022452
581 022454
682 022456

MACRO v04.00 20

JUAN 83

14:40:57 PAGE

022544
104456
023442
000000
013662
005037
024524
005724
005203
005215

011500
042700
022700
001002
042715
005203
005301
001335
162737
012605
012604
012601
012600
012603

005737
001403
063716
000207

cHP
ERRHRD
TRAP
.WORD
.WORD
.WORD
CLR

003022
12¢:

177700
000050
000077

000002

15%:
003006

010346
013703
005723
016663
162763
010337
010046
010146
010446
012737

TST
INC
INC
MOV
8IC

99¢.

MOV

RTS

003056

POSHSB
: MOV
POSHDO: MOV

ROYWAIT:

003006

000002
000004
003006

000002

002410
002410

003022

-(R5),(R4).,

OHDSEC, (RS)

(SF)+,R3

5EQ 0084
$tADJUST
tREPORT

POINTERS FOR REPORT

1CLEAR FOR FRROR RETURN
tRESET POINTERS

1BUMP PAST ECC WORD
:BUMP WORD COUNTER
1BUMP SECTOR OF EXPECTED HEADER
tMOVE EXPECTED HOR TO RO
;CLEAR ALL BUT SECTOR

s TEST IF AT SECTOR 40
+NO - SKIP

1CLEAR SECTOR T0O O

;1BUMP MOR WORD COUNTER
sDEC HEADER COUNT
tLOOP IF NOT YET DONE
$REMOVE ENTRY FROM SUBROUT
$RESTORE REGISTERS

ERRSWI
993
ngSHI.(SP)

;TEST IF ERROR RETURN
s YES - SKIP
sADD IN ERROR RETURN

8(SP),(SP)

:SET ERROR RETURN ADDRESS

STACK

POSITION HEAD BIY FROM HMEADER OR MULTIPURPOSE REGISTER

POSHWL
:

1¢:

10018
0
ERR10
ERRSWI

R3
Rl
64
82, SSINDX
(SP)+,RS
(SP)+,R4
(SP)+,R1

003056

177677

CSERHRD

INC
DEC
BNE
SuB
MOV
MOV
MOV

8IC

’

(R5).,-(R4)
10018,,,ERR10

oy
BNE

ST
BEQ
S?g

003022

(R4).
R3
(RS)
(R5),R0
o+CHOSEC,RO
040, ,RO
15¢

MOV

003022

017616
000207

013705
000402
013705
010146
042705
012701
006205
005301
001375
012601
000207

65¢%:

cMe

(J {

MOV

B8R

HOWRD1,RS

POSHDO

1 SKIP

8IC
MOV

T.MP RS ;START FOR POSITION MO BIT IN MP
R1,-(SP)
3STORE R1
StCHSSTAT RS
tCLEAR ALL BUT HEAD SEL BIT
#6,R1
sSET SHIFT COUNT

RTS

sRESTORE R1
sRETURN

ASR
DEC
BNE
MOV

RS
Rl
18
(SP)e RL
PC

1SHIFT FOR RIGHT JUSTIFY

WAIT FOR READY ROUTINE.

DURATION OF WAIT PASSED

FROM THE CALLING ROUTINE

MOV
TST

MOV
suU8

MOV
MOV
MOV
MOV
MOV

IN R1.

MOV
R3, -(SP)
1STORE R3
SSINOX,R3
;GET SUBROUTINE INDEX
(R3).
1BUMP IT FOR NEXT ENTRY
2(SP),SUBSTK(R3) ;INSERT THIS CALL

#4 ,SUBSTK(R3S)

R3,SSINDX

IT BACK

1SET

FOR NO ERROR RETURN

TO THE ROUTINE

1ADJUST IT TO CALLING LOCATION

$Si7RE

R1,-(SP)
92 ,ERRSWI

TO LSB.

sSTART FOR POSITION HC BIT IN WD

-7
SVC.MLB SO'RCE FILE
GLOBAL SUBROUTINES

022530
022532

022534
693 022536
022542
695 022546
696 022550
697 022556
698 022560
699 022572
700 022574
701 022576
702 022602
022602
022604
022606
022610
703 022612
704 022614
705 022622
706 022624

707
708
709
710
711
712
713

714
715
716
717
718

719

720

022624
022626
022630
022632
022634
022640
022644
022652
022654
022656
022660
022662
022666
022670
022674
022676
022702

721
722
723
724 022704

725 022706
726 022712
727 022714

004737
022640
032737
001061
005301

000001

14:40:57 PAGE

0165626

003050

001406

000761
012703

104456
023444
000000
012402
012701
004737
022640

032737
001016

005301
001362
012704

104456
023445
000000
012520
000410
032737
001406
104456
023446
000000
012570
005337
005037
162737
012604
012601
012600
012603
005737
001403
063716
000207
017616
020207

010346
013703
005723
016663

78:

010322

000001

003050

SORDYMSK,T.CS

sCHECK TIF READY
tYES - SKIP

WrITUS

B8R

MOV

S¢
+MORDY,R3
10020,, ,ERR3

1SET NAME MESSAGE PTR
+REPORT READY ERROR

ERR3
950, ,R1
PC,GSTAT

$SET WAIT COUNT FOR 5 SCCONDS
sGET DRIVE STATUS

QDROYMSK, T.CS

s TEST IF DRIVE READY

sWAIT

ERRHRD

JSR
10¢
BIT
BNE

WAITMS

DEC

BNE
MOV
ERRMRD
TRAP

011235

100000

003050

8s%:

. WORD
. WORD
. WORD
BR
BIT
BEQ
ERRHRD
TRAP
. WORD

003244
003022
000002

003006

11¢:
104:
9¢:

003022

00000<

99¢
:

ETPOS:

003006
000002

. WORD
. WORD
DEC
CLR
SUB
MOV
MOV
MOV
MOV
ST

8EQ

003022

002410

SEG NUAS
1GET DRIVE

MOV

6$:

PC,GSTAT

. WORD
. WORD

000062
016626

JSR
10$
8IT
BNE
DEC
BEQ

TRAP
. WORD

Cee
o o

683 022464
684 022470
685 022472
686 022500
687 022502
688 022504
689 022506
690 022520
691 022522
692 022526
022526

MACRO vO4.00 20 JAN 83

94
R1

7¢

CSERHRD
10020
0

R1
64

#CSSEC,R4
10021., ,ERRS
CSERMRD
10021

0
ERRS
114
#ANYERR, T7.CS
10¢
10022.
, .ERRG

CS$ERHRD
10022

0
ERR6

ERRCNT

ERRSW1
42, 5SINOX
(SP)+ R4

(5P)+ ,R1
(SP)+,RO
(SP)+,R3
ERRSWI
994

ADO
RTS

RTS

MOV

ERRSWI,(SP)
8(SP),(SP)

STATUS

tDEC WAIT COUNT
1SKIP IF O

$YES

SKIP

100 MS

sDEC WAIT COUNT

;LOOP UNTIL TIME DONE
$SET CONDITION AFTER 5 SECDS

sEXIT

sTEST IF ANY ERROR SET

iNO - SKIP

;1REPORT ALL ERRORS

1DEC FOR DOUBLE ERROR REPORT
sCLEAR FOR ERROR ERROR RETURN
$REMOVE ENTRY FROM SUBROUT STACK

sRESTORE REGISTERS

1RESTORE R3
s TEST IF ERROR RETURN
1YES

SKIP

1ADD IN ERROR RETURN

1SET ERROR RETURN ADDRESS

GET POSITION ROUTINE. READS A HEADER FROM CURRENT CYLINDER
(WHERE IT IS PRESENTLY POSITIONED) AND STORES CYLINDER
NUMBER IN CURCYL.
«STORE REGISTERS
MOV
MOV
SSINOX,R3
1GET SUBROUTINE INDEX
TST
(R3),
$18UMP IT FOR NEXT ENTRY
MOV
2(SP),SUBSTK(R3) ;INSERT THIS CALL

SVC.MLB SOURCE FILE MACRO v04.00 20 JAN 83
GLOBAL SUBROUTINES
728 022722
729

730

731
732

733
734
735

736
737
738

739

740
741
742
743
744
745
746

747
748
749
750
751
753
754
755
756
757
758
759
760
761
762
763
764
765
766

767

768

769

022730
022734
022736
022740
022744
022746
022752
022756
022760
022762
022764
022770
022774
023002
023004
023006
023010
023014
023016
023022
023024
023030

162763
010337
010046
010546
004737
0221774
013703
012705
006203
005305
001375
042703
010337

162737
012605

012600
012603
005757

001403

063715
000207

017616
000207

000004
003006

177000
003110
000002

654

012737
004737
023122
023737
001406

000002
022704
003106

DEC
BNE
8IC

MOV

su8
MOV

BEQ

VERPOS:

003006
000002

MOV
MOV
ASR

MOV
MOV
TS7

000000

023062
023070
023074
023078
023104
023106
023106
023110
023112
023114
023116
023122
023122
023130
023132
023136
023140
023144
023146
Oc 3152

005737
001403
063716
000207
017616
000207

003006

003022

003006

162737
012603

a%;:

003022

010337

770
771
772
773
774
7715
176
777
778
780
781
782 023154

SuU8

MOV

MOV
MOV
JSR
65¢

003056
000007

010346
013703
005723
016663

104456
023446
G00000
013522
005037

002410

021370

023032
023034
023040
023042
023050
023056

162763

14:40:57 PAGE

002410
002410

ADO
RTS
MOV
RTS

L7
SEQ 0086

04 ,SUBSTK(R3)
R3,SSINDX
RO, (SP)
RS, -(SP)

tADJUST IT 10 CALLING LOCATION
1STORE I7 BACK

PC. XROMD

;00 READ HEADFR

HDWRD1 ,R3

1GET HEADER WORD

7.R5
:g

1SET SHIFT COUNT
$SHIFT TO RIGHT JUSTIFY

R3,CURCYL
#2,SSINDX
(SP)+,RS

(SP)+,RO
(SP)+ ,R3
ERRSWI

994
ESRSHI.(SP)

géSP).(SP)

1STORE AS CURRENT CYLINDER
sREMOVE ENTRY FROM SUBROUT STACK
tRESTORE REGISTERS

1TEST IF ERROR RETURN
s YES - SKIP
1ADD IN ERROR RETURN

1SET ERROR RETURN ADDRESS

MOV

SuUB

R3, SSINDX

#4 ,SUBSTK(R3)

;ADJUST IT TO CALLING LOCATION

003022

MOV
ggg

02 . ERRSWI
PC.GETPOS

1SET FOR NO ERROR RETURN
1GET POSITION

003110

cHe
BEQ
ERRHRD

NEWCYL.CURCYL
1$
10022.,.ERRS

;CHECK IF CURRENT CYL IS NEW CYL
:YES - SKIP

WORD
'WORD
CLR

;CLEAR FOR ERROR ERROR RETURN

SuB
MOV
ST

02,SSINDX
(SP)+,R3
ERRSWI

;REMOVE ENTRY FROM SUBROUT STACK
{RESTORE R3
s TEST IF ERROR RETURN

sgg

ggnsur.(sp)

;ADD IN ERROR RETURN

003022
003006

003022

B8EQ

003022

000000

VERIFY POSITION ROUTINE. READS A HEADER (USING GETPOS) AND
CHECKS HEADS ARE POSITIONED AT NEW CY! INDER (CURCYL = NEWCYL).
MOV
RS, -(SP)
1STORE R3
MOV
SSINDX,R3
sGET SUBROUTINE INDEX
TST
(R3).
:BUMP IT FOR NEXT ENTRY
MOV
2(SP),SUBSTK(R3) ; INSERT THIS CALL

TRAP
JWORD

00udu02

994
:

MOV
RTS

1STORE

CSERHRD
10022

994

8(SP),(SP)
PC

1YES - SKIP

1SET ERROR RETURN ADDRESS

?EA?BG#% HEADERS ROUTINE.
010346

]

RDALHD:

HOV

IT BACK

R3, -(SP)

40 HEADERS ARE READ AND STORED

:STORE REGISTERS

SVC.MLB SOURCE FILE MACRO v04.00 20 UAN 83 14:40:57 PAGE

GL OBAL

10 15

SUBROUTINES

783 023156
734 023162
785 023164
786 023172
787 023200
788 023204
789 023206
790 023210
791 023212
792 023220
793 023224
794 023232
795 023236
796 023242
797 023246
798 023254
799 023262
800 023270
801 023274
802 023300
803 023304
804 023306
805 023314
806 023322
807 023330
808 023336
809 023340
810 023344
811 023346
812 023354
813 023360
814 023366
815 023370
816 023372
817 023374
818 023400
819 023404
820 023406
023406
023410
023412
023414
821 023416
822 023422
823 023424
824 023430
825 023432
023432
023434
023436
023440
826 023442
827 023446
828 023450
829 023452
830 023454
831 023456

013703
005723
016663
162763

010337

010046
010146
010446
012737
012701
052737
012703
013704
062704
012737
053737
042737
005037
005037
005737
001403

052737
013762
013762
032762
001003
04737
023462
013762
012700
032762
001016
005300
001372
004737
004737
012603
104456
023451
000000
012266
005037
000417
005737
100007
104456
023452
000000
012570
005037
000405
011423
011423
0l1423
005301

003006
000002
000004
003006

000002
000050

MOV

1ST

002410
002410

MOV

SUB

MOV
MOV
MOV
MOV
MOV
MOV

003022

100000
004072
003032
000006
000010
003036
002000
003042
003044
003116

003010

000020
003044
003042
000200

003044
000004
000002
000000

8IS
MOV

MOV
ADD
MOV

003040
003040
003040

BIS
BIC
CLR
CLR
157

34:

020642

003040
077777
000200

00000C

6%:

000000

74:

016370
016422

BEQ
8IS

MOV
MOV

BIT
BNE
JSR
65%
MOV
MOV
BIT
BNE
DEC
8NE
JSR
JSR
MOV
ERRHRD
TRAP

003022

003050

8s¢:

003022

12%:

. WORD
. WORD
. WORD
CLR
B8R
TST

8pPL
ERRHRD
TRAP
. WORD
. WORD
. WORD
CLR
8R
MOV

MOV
MOV

DEC

J7
56Q 0087

1GET SUBROUTINE INDEX
(R3)+
1BUMP IT FOR NEXT ENTRY
2(SP),SUBSTK(R3) ;INSERT THMIS CALL
SSINDX,R3

04 ,SUBSTK(R3)
R3,SSINDX
RO, -(SP)

$ADJUST IT TO CALLING LOCATION
1STORE IT BACK

R1,-(SP)

R4, -(SP)
#2,ERRSWI
040, ,R1
OHORA0, OPFLAG
4IBUFF ,R3
RLBAS R4
ORLMP R4
¢10,L.CS
RLDRV,L.CS

#8IT10,L.CS
L.BA
L.OA
DESHO
3¢

#MHOSEL
L .DA

1SET FOR NO ERROR RETURN
1SET HEADER COUNT
:1SET 40 HOR OP FLAG
$SET POINTER TO STORE HDRS
sGET BASE ADDRESS
tMAKE IT POINT TO MP REG
sLOAD FOR READ HEADER, NO INTERRUPT
s INSERT DRIVE NUMBER
sCLEAR FOR DRIVE 4 - 7 SPEC'D
1CLEAR BA
+CLEAR DA
s TEST IF HEAD O
s YES - SKIP
sELSE INSERT HEAD O
;LOAD RLDA REG

L.DA,RLDA(R2)
L.BA,RLBA(R2)
1LOAD RLBA
OCRDYMSK ,RLCS(R2)
s TEST IF CONTROLLER READY
68
PC.ROYCHK

s YES - SKIP
sELSE CHECK READY

L.CS.RLCS(R2)

sLOAD RLCS REG

#77777,R0

sSET COUNT FOR WAIT

OCROYMSK ,RLCS(R2)

84
RO
74
PC.READRL
PC,MAITIN

(SP)+,R3
10025., ,ERRL
CSERHRD
10025

;CHECK THAT OPERATION COMPLETED

sYES - SKIP
+DEC COUNT
1SKIP IF NOT YET O
sELSE GET ALL REGISTERS
1ELSE WAIT FOR TIMEOUT

3GET RESULT MESSAGE POINTER

ERR1
gg?SHI
T.CS
12¢
10026., ,ERR6
CSERHRD
10026

sCLEAR FOR ERROR RETURN

s TEST FOR ANY ERRORS
tNO - SKIP

ERRG6
EgRSHI
$

(R4),(R3).
(R4),(R3).
(R4),(R3).
R1

1CLEAR FOR ERROR RETURN

1 STORE HEADER WORDS
1DEC HEADER COUNT

SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES
832
833
834
835
836
837
838
839
840
841
842
843
844
845
847
848
849
850
851
852

853
854
855
856

857
858
859
860

861

862
863
864
865
866
867

023460
023462
023470
023472
023474
023476
023500
023504
023506
023512
023514
023520

AR89

001332
162737
012604
012601
012600
012603
005737
001403
063716
000207
017616
000207

000002

003006

14:40:57 PAGE

65%:

TST
B8EQ

003022

000000

99¢
.

023522
023524
023526
023530
023534
023536
023540
023544
023546
023550
023554
023556
023562
023564

023622
023626
023630
023632
023634
023640
023644
023646
023650
023652
023654
023656
023660

010346

010446

ADD
R1S
MOV
RTS

MOV
MOV

004472

MOV

MOV
ASL

002364

MOV
MOV
BEQ
cHp
BEQ
cHe
BEQ
cMP

177777
000010

000020
3%

000015
004472
004472

000017

BLY

1ST
MOV
MOV

MOV
MOV

5¢:
6%:

8s:

004472
000160

10s$:

02,SSINDX

(SP)«,R4
(SP). ,R1
(SP)+,RO
(SP
)+ ,R3
ERRSWI

994
ERRSWI,(SP)
PC

a(sP),(sP)

5€EQ 0088

JREMOVE ENTRY FROM SUBROUT STACK

$RESTORE

REGISTERS

s TEST IF ERPOR RETURN
;i YES - SKIP

sADD IN ERROR RETURN

sSET ERROR RETURN ADDRESS

GENERATE DATA ROUTINE. PATTERN TO BE GENERATED IS GIVEN
%: 5gsrg0RD FOLLOWING THE CALL. 128 WORDS ARE GENERATED

DATGEN: MOV

010146

012701
012504
006304
016403
011321
001421
021327
001416
020427
001403
020427
002413
005723
012321
012321
012704
012703
000406
012703
000401
005723
012704
012321
005304
001375
012703
012704
012321
005304
001375
012604
012603
012601
000205

BNE
SuUB
MOV
MOV
MOV
MOV

003022

023570
023572
023574
023576
868 023600
869 023604
870 023610
871 023612
872 023616
873 023620

874
875
876
877
878
879
880
881
882
88x
88a
885
886
837
888

MACRO v04.00 20 JAN 83

1</

MOV

8R
TSV
MOV
MOV
DEC
BNE

MOV
MOV

MOV
DEC
BNE

MoV
MOV
MOV
RTS

R3, -(SP)
R4, -(SP)

00BUFF ,R1
(RS).,R4

R4
PATTBL(R4),R3

g?S).(Rl)O

St
R4, 08,
3
R4,016.
64
(R3).

(R3)+,(R1).
(R3)+,(R1)»

#13. .R4
QOBUFF ,R3

as
S0BUFF ,R3
74

(R3).

€15. R4
(R3)¢,(R1)R4
89
Q08UFF ,R3
9112, R4

(R3)+,(R1).

R4
104

(SP)+,R4
(SP)+ ,R3
(SP)«,R1

1STORE REGISTERS

sSET POINTER TO OBUFF
1GET DATA PATTERN SELECTOR
;ADJUST IT FOR INDEXING
sGET ADODRESS OF PATTERN
;1MOVE FIRST PATTERN WORD
sSKIP IF PATTERN IS O

sCHECK IF PATTERN IS ALL 1°'S
;1 YES

SKIP

sTEST IF PATTERN S
;YES - SKIP
1CHECK IF PATTERN 9 OR 10

iNO - SKIP

1BUMP SOURCE POINTER
sMOVE TWO MORE WORDS FORM SOURCE

:SET COUNT
sRESET POINTER
+ELSE SET OBUFF AS PATTERN SOURCE

1GO 10 FILL
18UMP SOURCE POINTER
:SET MOVE COUNT
sMOVE 15 WORDS INTO BUFFER

$SET SOURCE TO TOP OF OBUFF
:SET COUNT FOR REST OF BUFFER
$REPEAT PATTERN IN BUFFER
+RESTORE REGISTERS

;1RETURN

DATA COMPARE ROUTINE, COMPARES THE CONTENTS OF IBUFF AND OBUFF
.
ERROR REPORTING IS LIMITED 8Y SOFTWARE PARAMETER.

SVC.M
B8 SOURCE FILE
GLOBAL SUBROUTINES
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
206
907
308
909
910
911
912
913
914

915
916
917
918
919
920
921
922
923
924
925
926

927
928
929

930
931
932
933

023662
023664
023670
023672
023700
023706
023712
023714
023716
023720
023726
023732
023736
023742
023746
023752
023754
023756
023760
023762
023764
023772
023776
024000
024004
024004
024006
024012
024016
024022
024026
024032
024034
024036
024042
024050
024052
024054
024056
024060
024064
024066
024072
024074
024100
024102
024110
024112
024114
024114
024116
02412C
024122
024124
024130
024132
024134

MACRO vO4.00 20 UAN-83

010346
013703
005723
016663
162763
010337

010146
010446
010546
052737
005037
012705
012704
0127C3
012701

022425

001052
005203
005301
001373
042737
005737
001021
012701

010146
012746
013746
012746
012746
012746
010600
104414
062706
162737
012605

DATCOM:

003006
000002
003006

000001
003020
004472
004072

14:40:57 PAGE

TST

suUB

MOV
MOV
MOV

MOV

8IS
CLR

003010

S$:
7%:

003010

9s:

000200

007614
012235
00000S

104456
023463
000000
013662
005037
022425
000711
005237

cHP
BNE
INC
OEC
BNE
8BIC
TST
BNE

MOV
MOV

003006

15¢:

012604

012601
012603
005737
001403
063716
000207
017616
000207
023737
002011
024445

MOV
MOV
MOV
MOV

MOV
PRINTB
MOV
MOV
MOV
MOV
MOV

011141
003020

000014
000002

MOV

002410
002410

000200

000001
003022

MOV

TRAP
ADD
SUB
MOV

MOV

003022
003022

000000

003020

99
:
014132

10¢%:

MOV
MOV
ST
BEQ
ADD
RTS
MOV
RTS

CcHP
8GE
CHpP

ERRHRD
TRAP

. WORD
. WORD
. WORD

003022

003020

133

CLR
CMP
B8R
INC

L7
SEQ 0089

R3,

(5P)
3;STORE R3
SSINDY,R3
$GET SUBROUTINE STACK INDE~
(R3).
1BUMP INDEX TO NEXT ENTRY
2(SP),SUBSTK(R3) ;INSERT THIS CALL
¢4 ,SUBSTK(RS)
R3,SSINDX

R1,-(SP)

R4, -(SP)
RS, -(SP)
Q0ATACMP ,OPFLAG
MORECE
Q0BUFF ,RS
R4
4IBUFF
01,R3
4128, ,R1
(R4)+ ,(R5)»
10¢
R3
R1

$+ADJUST

TIT

TO CALLING LOCATION

;:STORE IT BACK
13TORE OTHEP REGISTERS

;SET DATA CCMPARE FLAG
;CLEAR MORE ERROR FLAG
$SET POINTERS TO DATA FOR COMPARE

sSET WORD COUNTER
;SET COMPARE COUNT
s COMPARE DATA
sERROR - SKIP TO REPORT
;BUMP WORD COUNT
;OEC COMPARE COUNT
3
sLOOP IF NOT O
QOATACMP ,OPFLAG ;CLEAR DATA COMPARE FLAG
ERRSWI
sTEST IF ANY COMPARE ERRORS
1S
sNO - SKIP
128.,R1
1SET REPORT VALUE
OFMT27,#TC
,MORECE , 0RESEE
ERR
,R1

ORESEG, -(SP)

MORECE, -(SP)

OTCERR, -(SP)
#HFMT27,-(SP)

SP,.RO
CEPNTB

014,SP
02, SSINDX

(SP)+,.R5

(SP)+ R4

(SP)+,R1
(SP)s+ ,R3

+REMOVE ENTRY FROM SUBROUT
;RESTORE REGS

STACK

ERRSWI
994
SRRSNI.(SP)
C
8(SP),(SP)

s TEST IF ERROR RETURN
$YES - SKIP
;ADD IN ERROR RETURN

MORECE ,OCLIMW
134

s TEST IF COMPARE ERRORS LIMIT EXCEEDED
1YES - SKIP
1SET PTRS BACK TO FRROR WORDS

10035.
, ,ERR10
C$ERHRD
10035

0
ERR10
ERRSWI
(R4)+,(R5).
7¢
MORECE

;SET ERROR RETURN ADDRESS

;REPORT ERROR

;CLEAR ERROR SWITCH
:BUMP PTRS PAST ERROR WORD‘
100 NEXT COMPARE
1BUMP ERROR COUNTER

SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES
934

024140

MACRO v04.00 20 JUAN-83

000706

14:40:57 PAGE
B8R

10
7

SEQ 0090
100 NEXT

COMPARE

OO NOWND
W -

SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES

MACRO

v04.00 20 JAN-83

14:40:57 PAGE

WRITE

024142
024150
024152
024156
024164
024172
024174
024200
024202
024210
024212
024220
024222
024226

024230
024236
024244
024c50
024252
024254
024256
024262
024264
024270
024274
024300
024304
024310
024312
024316
024320
024324
024330
024334
024336
024340
024342
024346
024350
024354
024360
024364
024370
024372

024376
024404

024406
024414
024420
024420
024422
024424
024426

53 024430

012737
000402
005037
012737
0c3737
0010046
005737
001403
052737
000403
012737
010346
013703
005723
016663

162763
010337
010046

010146
010446
004737
024650
012703
013713
053713
042713
032723
001403
012723
000402
012723
013713
012704
006313
005304
001375
005737
001402
052713
053723
012713
005737
001402
012713
032737
001414
042737
012703

104456
023460
000000
012266
005037

1772777

003124

002306

003124

003140
003110

XWRITT:
XWRITE:
XWRIT1:

003116

004000

003010

000114

003140

003006
000002
000004
003006

1%:
XREAD:
XREADG:

002410
002410

BNE
TST
8EQ
8I5
B8R

MOV
MOV

MOV
TST
MOV

S5%:

BIS
8IC
8IT
BEQ
MOV
B8R
MOV
MOV
MOV
ASL

7¢:

TS7
BEQ
8IS
BIS

3s:
4%

003116
000100
003120

177600
003124

DEC
BNE

MOV
TSTY

8EQ

004000

003010

173777

003010

MOV
CcMP

MOV

004472
003110
000007

011043

8R
CLR

JSR
654
MOV

004072

177777

MOV

SUB

003040
003140
003036
002000
000004

MOV

8%:

N7
SEQ 0091

AND READ DATA ROUTINE,

MOV
MOV
MOV
MOV

020642

1°

8IT
BEQ
8IC

MOV

ERRHRD
TRAP
. WORD
.WORD
. WORD
CLR

6-1,1EMP1
XWRIT1
TEMPL
OWTDATA, IEMP7

T?HTU.CURCYL

{SET SPECIAL WRITE FOR TIMING FLAG
sCLEAR SPECIAL WRITE FLAG
$15ET FOR WRTTE
s TEST

CYLINDER 255

1NO - SKIP

(BAD

SEC)

;s TEST IF HEAD 1 (BAD SECTOR FILES)
GeSHD
L8
;NO - SKIP
#BADADD, OPFLAG
$sSET BAD ADDRESS FLAG
XREADG
1 SKIP TO EXECUTE
ORDDATA, TEMP?
1SET FOR READ
R3, -(SP)
tSTORE R3
SSINDX,R3
$;SET SUBROUTINE INDEX
(R3).
;BUMP TO NEXT STACK ENTRY
2(SP),SUBSTK(R3) ;INSERT THIS CALL
94 ,SUBSTK(R3)
sADJUST TO POINT TO CALL
R3,SSINDX
sSTORE IT BACK
RO, -(SP)

R4,-(SP)
PC,ROYCHK

oL .CS.R3

TEMF7,(R3)
RLDRV, (R3)

o8IT10,(R3)
gng?.(RS)o

:fBUFF.(R3)0
Q0BUFF ,(R3).
CURCYL,(R3)
#7,Ra

(R3)

sSTORE OTHER REGISTERS

;CHECK IF DRIVE READY
:GET ADDRESS OF LOAD REGS
sSET _COMMAND
1 INSERT DRIVE NUMBER
sCLEAR FOR DRIVE 4 - 7 SPEC'D
sTEST IF WRITE DATA
$YES - SKIP
;ELSE SET BA FOR READ

;SET BA FOR WRITE
sGET CURRENT CYLINDER
sALIGN IT IN DA

R4
5S¢
DESHD
78
GHSM
, SK
(R3)

;sTEST IF HEAD O
;sYES - SKIP
$SET FOR HEAD 1
DESSEC,(R3)+
s INSERT DESIRED SECTOR
2177600, (R3)
s INSERT WORD COUNT
TEMP1
;CHECK IF SPECIAL WRITE FOR TIMING
84
;NO - SKIP
#177777,(R3)
tELSE SET FOR 1 WORD TRANSFER
OBADADD
, OPFLAG
;s TEST IF BAD ADDRESS FLAG SET
2%
tNO - SKIP
#+CBADADD, OPFLAG
sCLEAR ALL BUT THIS FLAG
MMWRTAB ,R3
:SET RESULT MESSAGE POINTER
10032., ,ERR1
CS$ERHRD
10032
0
ERR1
OPFLAG

;CLEAR ALL FLAGS

vi.MLB SOURCE FILt
GLOBAL SLUBROUTINES

5S4 024434
55 024436
S6 024442
S7 024446
58 024450
59 024454
60 024460
61 024464
62 024470
63 024502
64 024506
65 024510
66 024514
67 024516
024516
024520
024522
024524
€8 024526
69 024530
70 024536
71 024540
72 024544
73 024550
024550

024552

76
77

80
81
82

85
86

29
91
92

024554
024556
024560
024564
024570
024572
024600
024602
024604
024606
024612
024612
024614
024616
024620
024622
024626
024632
024634
024634
02463+,
024€ 40
024642
024644
024650
024656
C24660
024662
024664
024666
028672

MACRO

000503
005087
005787
001100
011362
014362
014362
014362

005757
001010
004737
012603
104456
03456
000000
012266
000a46
03:737
00:033
012703
012704
104456
023460
000000
012520
012701
004737
024644
032737
001012
005301
001367
012704
104456
023461
000000
012520
005037
005737
100006

104456
02357
000000
012570
005037

162737

012604
012601
012600
v12603
005737
001403

v04.00 20

JUAN B3

003012
003124

14:40:57 PAGt

2s:

000006
000004
000002
000000

108

003012

B8R
CLR
157

BNE
MOV
MOV
MOV
MOV
WAITUS
157
BNE

JSR

Olo422

MOV
ERRHRD
TRAP

000001

003050

14%:

010322

011224

. WORD
. WORD
. WORD
8r

817

BNE
MOV
MOV
ERRHRD
TRAP

000062

016626

000001

17¢:

. WORD
. WORD
. WORD
MOV
JSR
644

8I1
BNE
DEC
BNE

003050

011235

MOV
ERRHRD
TRAP
.WORD
. WORD

003022
003050

208:

. WOROD
CLR
15T

BPL
ERRHRD
TRAP

003022
000002

003022

003006

648
65¢%:

. WORD
. WORD
. WORD
CLR
SUB
MOV
MOV
MOV
MOV
757
BEQ

6414

DONE

TeEMP}
654
(R3),RLMP(R2)

-{R%),RLDA(R2)

38Q 2092

sCLEAR INTERRUPT F{ AG
sCHECK TF SPECIAL WRITE
1YES
DO NOT START
1LOAD RL REGS

F( AG HF17

WRITF

-(R3),RLBA(R2)

-(R3),RLCS(R2)

#3000.

OONE
144

PC,WAITIN

(SP). ,R3
10030., ,ERR1
CSERHRD
10030

0
ERR1
6414
QORDYMSK,
T, CS
208
#MDRDY ,R3
R4
OCAFDT

2,
, ,ERRS
1003
CSERMRD
10032

IWATT 300MS FOR INTERRUPT
sCHECK IF INTERRUPT
SKIP
1 YES
tWAIT

FOR

INTERRUPT

sGET RESWLT MESSAGE

sTEST IF DRIVE READY
s YES - SKIP

$sSET RESWT MESSAGE
sCONDITION AFTER DATA XFER

]

ERRS
450, ,R1

PC.GSTAT

QORDYMSK,
T, CS
204

174
,
oCSSECR4
10033., .ERRS
CSERHRD
10033

0
ERRS
ERRSWI
7.CS
659
10031., .ERRG

1SET WAIT COUNT FOR S SECDS
sGET DRIVE STATUS

+TEST IF DRIVE READY NOW

s YES
SKIP
sOEC WAIT COumTY
sLOOP IF NOT TIME DONE
:SET CONDITION S SECONDS

1CLEAR ERROR SWITCH
;CHECK IF ANY ERROR
SKIP
iNO

CSERMRD
10031

0
ERRG
ERRSWI

#2,SSINDX

tCLEAR ERROR SMWITCH
T STACK
sREMOVE ENTRY FROM SUBR(

1 TEST
1YES

(SP). R4
(SP)e ,R1
(SP)«, RO
(SP)+,R3
ERRSWI

tRESTORE REGISTERS

IF ERROR RETURN
SKIP

Cé#
SVC.M.8 SOURCE FILE MACRO vO4.00 20 UAN 83 14:40:57 PAGE
GL OBAL SUBROUTINES
95 024674
% 024700
97 024702
98 024706

063716
000207
017616
000207

003022

ACD

RTS

000000

MOV

RTS

100

101

102 024710

103 024712

104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133

024714
024716
024722
024726
024732
024734
024740
024744
024746
024752
024756
024760
024762
024764

024770
024772

024776
025002
025004
025006
025010
025012
025020
025022
025026
025030
025032
025034
025036
025042
025044
135 025050
136 025052
137 025056
138

010046
010146
010346

005037
012703
022713
001005
012703
022713
001431
013700
012701
006300
005301
001375
005737
001402
052700

053700
022300
001402
101005
000774
012737
000403
020327
003342
012603
012601
012600
005737
001003
062716
000207

éSCNK:
003024
003676

177777

003502

2%:

003106

177777

000007

003116
000100
003120

025104
025110
02511e

7¢:
8s:

000001

003676

003024

12%:
15¢:
208
:

003024

MOV

B8R
P
8GT
MOV
MOV
MOV
ADD
RTS

MOV

RTS
:

012746
012746
012746
010600
104414

8IS

BIS
cHe
BEQ

157

017616
000207

010446
005737
001433
012704

ASL

DEC
BNE
1S7
BEQ

BNE

000002

003006
000002

007504
011554
000002

PPTOP:

0 0093

ERRSWI,(SP)

tELSE

8(SP),(SP)

$ADJUST

ADD

IN ERROR RE TIRN

FOR ERROR RE TURN

BAD SECTOR CHECK ROUTINL, CHECKS IF SECTOR SPECIFIED IN CRCri,
DESHMD, AND DESSEC IS LISTCD AS BAD 'N THME BAD SECTOR FILES,
MOV
RO, (SP)
1STORE REGISTERS
MOV
R1,-(SP)
R3, (SP)
MOV
CLR
BSFLAG
1CLEAR FLAG
MOV
oFBSFIL ,R3
1GET POINTER TO FACTORY FILE
2-1,(R3)
cre
;CHECK TF ALL ONES
44
BNE
s1NO SKIP TO TEST
#SBSFIL,R3
MOV
;ELSE SET POINTER TO SOF TWARE FILE
®-1,(R3)
cHe
sCHECK IF ALL ONES
8EQ
208
s YES - EXIY
MOV
NEWCYL ,RO
1BUILD HEADER OF ADDRESS IN QUESTION
e7.R1
MOV
sPOSITION CYLINDER

140

141
142
143 025060
144 025062
145 05066
146 025070
147 025074
025074
025100

Ss:

11 2

RO
Ri

S8
DESHD
7

#BIT6,RO
DESSEC RO
(R3)¢,RO
124
15%
1]
#1,BSFLAG
204

R3,0FBSF
IL

24
(SP)+,R3

(SP)..R1
(SP)+,RG
BSFLAG

994
22,(5P)
PC

8(SP),(SP)

1CHECK IF HEAD O
$VES - SKIP
s INSERT HEAD 1
s INSERT SECTOR
sCHECK THIS WORD IN FILE
s YES

sEXIT

EXIT,ERROR

NO ERROR

$1SET ERROR FLAG
$GO 1O EXIT
tOONE BOTH FILES?

sNO GO DO SOF TWARE FILE

+ELSE RESTORE REGISTERS

;CHECK IF ERROR
s YES - SKIP
;ELSE BUMP ERROR RETURN

$sSET FOR ENROR RETURN

REPORT OPERATION ROUTINE.

PRINTS

SUBROUTINE

TRACE

SEQUENCE

OPERATION BEING PERFORMED PORTION OF ALL
ERROR MESSAGES.
R4, -(SP)
MOV
s TEST SUBROUTINE INDEX O
TST
SSINOX
B8EQ
1
$1SKIP IF ©
02,R4
MOV
$1SET INDEXER TO FIRST ENTRY
PRINTB

MOV
MOV
MOV
MOV

TRAP

#MT9, #SEQMES
#SEQHMES, -(SP)
02,-(SP)

SP,RO
CePNTB

1PRINT

"SUBROUTINE

CALL

SEQ

AND

SVC.M.8 SOURCE FILE
GLOBAL SUBROUTINES

148

149

150
151
152

025114
025120
025120
025124
025130
025134
025136
05140
025144
025150
025154
025156
025156
025162
025166
025172
025176
025200
025202
025206
025214
025220
025224

153
154
155
156
157 025230
158 025232
159 025240
160 025244
161 025246
162 025254
163 025260
164 025262
165 02527¢C
025270
025274
025300

166

167
168
169

170
171
172
173
174

178
176
177
178
179
180
181

025304
025310
025312
025314
025320
025324
025326
025334
025336
025342
025344
025352
025354
025360
025364
025370
025372
025374
025376
025400
025400
025404

MACRO vO04.00 20 JAN 83

062706

14:40:57 PAGE

3s:

016446

Cl12746

012746
010600
104414
062706
062704

020437
003761

012746
013746
012746
012746
010600
104414
062706
042737
013701
042701
022701
001003
052737
022701
001003
052737
022701
001003
052737
016146
012746
012746
012746
010600
104414
062706
020127
001007
032737
001403
012701
000436
032737
001424
013704
012701
032704
001003
005721
006204
000772

016146
012746

1¢:

006471
003016

C11357
000003
000010
030000
003040
177741
000006

003010

010000
000012

003010

020000
000014

003010

020000

003019

002230
005517
011335
000003

2s:

20%:
22%:

000010

003044

000016

007777

003010
000020
000001

002230
011351

003010

S$:

6%:

ADD
PRINTB
MOV
MOV
MOV
MOV
TRAP
ADD
ADD

cMP
BLE

PRINTB
MOV
MOV
MOV
MOV
MOV
TPAP
ADD

8IC
MOV
8IC
cre
BNE
a1s
cHP
BNE
815
cP
BNE
8IS
PRINTD
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
cP
BNE
a1y
BEQ
MOV
BR
8I7
B8EQ
MOV
MOV
817
BNE
1ST
ASR
B8R

6 ,5P
#FMT16,S5UBSTK(RA)
SUBSTK(R4), (5P

oFMY16,

02,

(SP)

CAIL ING

L OCATION

(SP)

SP RO
CSPNTB
#6,5P

02,.R4

1BUMP INOEX

R4, SSINDX
1CHECK IF ALL PRINTED
34
;LOOP IF NOT ALL PRINTED rv€f
QFMT4 ,ERHEAD,0TSTLAB
1tPRINT ERROR -EADER
#TSTLAB, -(SP)
ERHEAD, -(SP)
oFMT4, -(SP)
#3,-(SP)

SP.RO
CSPNTB

€10,5P

#SEEKOP !RORWOP , OPFLAG

L.CS.R1

177741 ,R1

#6,R1
24

s TEST

OSEEKOP ,OPFLAG
#12.R1

sCLEAR SK & RD OR WRT FLAG

sGET COMMAND EXECUTED

sSTRIP ALL BUT FUNCTION CODL

IF SEEK OPERATION
tNO - SKIP

208

ORORWOP ,OPFLAG
14 R

rrl

;ELSE SET SEEX FLAG
sTEST IF WRITE

iNO - SKIP

;SET RD OR WRY FLAG
s TEST IF READ

stNO - SKIP

SRORWOP ,OPFLAG
;SET RD OR WRT FLAG
OFMT1,MMOPER,OPMSGS(R1) PRINT OPERATION

OFMSGS(R1), -(SP)
#MOPER, -(SP)
#FMTL, -(SP)
SP,RO
CSePNTB

#10,5¢

R1,04
'Y
ADRSET,L.DA

tCHECK IF GET STATUS
iNO - SKIP
s TEST IF RESET INCLUDED

;16.“1

1SET TO PRINT WITH RESET

iNO

SKIP

oCOMPOP ,OPFLAG

;TEST IF ANY OTHER OPERATION

OPFLAG,R4

1SET UP TO DETERMINE WHICH ONE

#20,R1

#BIT00,R4
64
(R1)»

PRINTB

Ra
1]
OFMT2,0PMSGS(RY)

MOV

MFMT2, -(SP)

MOV

tPRINT

OPMSGS(R1), -(SP)

iNO

SKIP

sPRESET

THE POINTER

1CHECK THE BIT
s IF SET - SKIP
1BUMP POINTER

SVC.MLB SHURCE FILE
GL OBAL SUBROUTINES

182
183
184
18%

025410
025414
025416
025420
025424
025432
025434
025440
025440
025444
025450
025454
025456
025460
025464
025466

186
187
188 025474
189 025476
025476
025502
025506
025512
025516
025522
025526
025532
025536
025542
025546
025550
025552
190 025556
191 025564
192 025566
025566
025572
025576
025602
025606
025612
025616
025622
025626
025630
025632
193 025636
194 025642
195 025644
196

197
198
199 025646
200 025650

201 025652
202 025654
203 025660
204 025662

MACRO v04.00 20 JUAN 83

012746
010600
104414

062706
032737
001415

0127C1

000002

000006
100000

003010

000050

016146
C12746
012746
010600
104414
062706
0004 34
032737
001430

002230
011351
0090002

013746
012746
013746
012746
013746
012746
013746
012746
012746
012746
010600
104414
062706
032737
001424

003116
007445
003114
007440
003112
007432
003104
007463
011575

013746
012746
013746
012746
013746
012746
012746
012746
010600
104414
062706
004737
012604
000207

14:40:57 PAGE

#&s%:

000006
010000

003010

10%:

817
8EQ

MOV
PRINTB
MOV
MOV
MOV
MOV
TRAP
ADD

B8R
81T
BEQ

PRINTB

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

000011

000024
020000

003010

15%:

003066

06,5P

OHORA0
, OPFLAG

050,R1
0FMT2, OPMSGS(R1)

s TEST IF 40 HFADER OPERATION
SKIP
sNO
sCLSE PRINT I7

OPMSGS(R1), -(SP)
oFMT2, -(SP)
02,-(SP)

SP,RO
CIPNTB
6,SP
15¢

s SKIP

1S¢

sNO

OSEEKOP ,OPFLAG

TEST

SEEK

SKkIp

OFMTL13, 6FRMWO , OLOCYL , 00 IF WD ,DESDIF , 6SGNWD , DE SSGN, #HDWD , DE SHD

DESHD, -(SP)
oHOW0, -(SP)

#0IFWD,
-(
oLDCYL, -(SP
OFRMD, -(SP

#FMT1S, -(SP

#24,5P
SRORWOP ,OPFLAG

;TEST

sNO

SKIP

READ CR WRITE

OESSEC, -(SP)

@SECWD, -(S5P)

DESHD. -(SP)

17s:

RPTRES:

010146
010346

CsANTB

SET

SFMT22,0CYLWO,
, 8HDWD , DESHD CURCYL
, @SECWD , DESSEC

003120
007451
003116
007445
003110
007456
012124
000007
000020
026310

02,-(SP)

SP,RO

SP,.RO
CSPNTB

01044€
012701
012103

MOV
MOV
TRAP
ADO

11 4

[ &

TRAP
ADD
JSR

#20,5P
PC ,CLRPARM

RTS

MOV

REPORT

R4
(SP)+

;CLEAR PARAM TABLE

tRESTORE R4

REASON ROUTINE

PRINTS REASON PORTION FOR ALL ERROR REPORTS.
MOV
R1,-(SP)
1 STORE R1
MOV
R3,-(SP)
1STORE R3
MOV
R4, -(SP)
1STORE R4
MOV
ARESPARM,R1
;GET START OF PARAM
MOV
PRINTB

(R1)+,R3

sGET NUMBER OF PARAM

OFMTL.1,8MRSLT,(R1)

1PRINT NAME

SVC.MLB SOURCE FILE
GLOBAL SUBROUTINES

205
206
207
208
209
210
211
212
213

214

215

216
217

025662
025664
025670
025674
025700
025702
025704
025710
025714
025716
025722
025726
025730
025734
025736
025740
£25740
025742
025746
025750
025754
025756
025760
025764
025764
025766
025772
025774
026000
026002
026004
026010
026014
026016
026016
026020
026024
026030
026034
026036
026040
026044
026046
026050
026052

218
219
220
221
222
223
224
225 026054
026054
026056
026062
026066
026072
026076
026102
026106

MACRO v04.00 20 JAN 83

0Olll4e
012746
012746
012746
010600
104414
062706
023127
001453
012704
022127
001002
012704
005303
001442

012146
012746
010446
012746
010600
104414
062706
012146
012746
010446
012746
010600
104414
062706
162703
001413

012146
012746
012746
012746
010600
104414
062706
012604
012603
012601
000207

14:40:57 PAGF
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

005526
011342
000003
000010
010714

cHe
BEQ
MOV
cHP
8NE

011561
010707
011567

3s:

011123
000003

#10,5P

(R1),0MNDRST

s TEST

OFMT11,R4e
(R1)s,0MCYLOC
34

sPRISET FOR FORMAY 11
sCHECK IF REPORTING CYLINDER L OC
INO - SKIP

(R1)+,-(SP)
ORESE3, -(SP)

$YES

IF MESSAGE

IS NO DRV STATUS

SKIP REST OF

REPORT

sELSE CHANGE TO FORMAT
sDEC PARAM COUNT
sIF O - EXIT

REPORY

IS VALUE

;;REFPORT

SB VALUE

43, -(SP)
SP,RO
CIPNTB

#10,5P
R4, O0RESEA,(R1)+

(R1)e,-(SP)

#RESEAL,

-(SP)

93, -(SP)

SP.RO
CIPNTB

#10,SP

000010
000002

2,.R3

MoV
MOV
MOV
MOV
MOV
TRAP

011134
011335
000003

6%:

ADD

MOV
MOV
MOV

RTS

RPTREM:

006142
003032
006131
011370
000005

SP,RO
C$PNTB

R4, -(SP)

000003

003037

(R1), (SP)
OMARSLT, -(SP)
OFMT1.1,-(SP)
83, -(SP)

MOV

011127

000010

53 009

PRINTB

MOV
MOV
TRAP
ADD
PRINTB

000010

9FMT12,R4
R3
68
R4 ,O0RESE3,(R1)+

DEC
BEQG

MOV
MOV

[

005046
153716
012746
013746
012746
012746
012746
010600

MOV

64
OFMTL

sDEC PARAM COUNT

$1IF 6
EXIT
8RESES,(R1)+»
;REPOKTM CONDITION

(R1)s,-(SP)

ORESES, -(SP)
®#MTY,-(SP)

SP,RO
CsPNIB

€10,.5P

{(SP)+,Ra
(SP)+,R3
(SP)» ,R1
PC

tRESTORE REGS
1RETURN

REPORT PHYSICAL ADORESS OF DEVICE UNDER TEST
AND ALL REGISTER CONTENTS.
PRINTB
Ofggg.OBASADD.RLBRS.ODRVNAH.(B.RLDRV01>

CLR
8158
MOV
MOV

MOV
MOV
MOV
MOV

-C
RLORV+1,(SP)
ODRVNAM, -(SP)

RLBAS, -(SP)

#BASADD, -(SP)
OFMTS, -(SP)
a5, -(SP)

SP,RO

SVC.M.B8 SOURCE FILE
GLOBAL SUBROUTINES

226

026110
026112

7 026116

026116
026122
026126
026132
026136
026142
026146
026152
026156
026160
026162
228 026166
026166

02617C
026176
026202
026206
026212
026216
026222
026224
026226
229 026232
026232

026236
U26242
026246
026252
026256
026262
026266
026272
026276
026300
026302
230 026306
231

232
233
234
235
236
237
238
239

026310
026312
026316
026322
026324
026326
026330
240 026334
241 026336
242
243 C26340
244

MACRO v04.00 20-JAN-83

104414
062706

007445
007456
006245
006233
006240
006226
011410
000007

013746
013746
013746
013746
012746
012746
012746
010600
104414
062706

003046
003042
003044
003040
006252
011522
000006

013746
013746
013746
013746
013746
013746
012746
012746
012746
010600
104414
062706
000207

003116
003110
003056
003052
003054
003050
006265
011452
000010

000020

MOV
MOV
MOV
MOV
MOV
MOV

000016

€Te!
5EQ 0097

L.BR,-(SP)
L.DA,-(SP)
L.CS,-(SP)
OLABL, -(SP)
OFMT8, -(SP)
SP,RO

TRAP
ADD
PRINTB
MOV

CSPNTB
#16,5P
OFMT7,00LAB2,T.CS,.7T.DA,
T, BA, T MP,CURCYL ,DESHD
DESHO, -(SP)

ADD
RTS

922,5P
PC

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP

000022

003066
000005

11-6

TRAP
CSPNTB
ADD
014 ,5P
REPORT RL11 REGISTERS
PRINTB
oFMT6, 0CSNAM, 0DANAM , 0BANAM , OMPNAM, OC 1L WD, 0HDW)
MOV
oHOWD, (SP)
MOV
oCYLWD, -(SP)
MOV
OMPNAM, -(SP)
MOV
#BANAM, -(SP)
MOV
QDANAM,
- (SP )
MOV
#CSNAM, -(SP)
MOV
OFMT6, -(SP)
MOV
47, -(SP)
MOV
SP,RO
TRAP
CSPNTB
RDD
#20,SP
PRINTB
OFMT8,0LAB1,.L.CS,L.DA,L.BA,
L. MP
MOV
L.MP,-(SP)

000014

012746
012746
012746
012746
012746
012746
012746
012746
€10600
104414
062706

010546
012701
012705
005021
005305
001375
012701
012605
000207

14:40:57 PAGE

CURCYL, -(SP)
T7.MP,-(SP)
T.BA,-(SP)
T.DR, -(SP)
1.CS, -(SP)
#AB2, -(S5P)
FMT?, -(SP)
410, -(SP)
SP,RO
CIPNTE

CLEAR PARAMETER BLOCK FOR REPORTING
RS, -(SP)
$1STORE RS

CLRPARM; MOV
MOV

2s:

003066

sGET ADDRESS OF BLOCK

#5,R5
(R1).
RS
24

$SET COUNT
1CLEAR WORD
sDEC COUNT
sLOOP UNTIL O

MOV

(SP)+,R5

sRESTORE RS

MOV

RTS

ENDMOD

ORESPARM,R1

MOV
CLR
DEC
BNE

ORESPARM,R1

sRESET

POINTER

CZRLNBO RLO1/02 DRIVE
GLOBAL SUBROUTINES

TEST

3 MACRO vO4.00 20 JAN 83

1
2
3 026340

14:40:57 PAGE

le!
12

.TITLE

CZRLNBO RLO1/02 DRIVE

BGNMOD

HRDWTST

.SBTTL

«TEST

TEST

)
6
7

026340

026340
8 026340

10 026346
11 026352
12 026354
026354
026360
026364
026370
026372
026374

13
14 026400
026400

012737

006664

005737
001026

003474

012746
012746
012746
010600
104417
062706

007750
011554
000002

012746
012746
012746
010600

104417
062706
000137
004737

18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

030274
012700
012701
005020
005301
001375
005037
005037
004737
030274
012701
004737
030274
004737
030274
004737
012700
012701
012703
012704
012737
012737
012737

41
42
43
44

026440
026442
026446
026452
026454
026456
026460
026464
026470
026474
026476
026502
026506
026510
026514
026516
026522
026526
026532
026536
026542
026550
026556
026564
026572
026600
026604

4eSEEK

BGNTST

026404
026410
026414
026416
026420
15 026424
16 026430

17 026434

004737

053737
042737
004737
030274

003016

010036
011554
000002

3s:

016576
003144
000030

003236
003106
017524

005670
022420

023032
021116
003154
003156
003170

003172
000001
000200
000110
003036
002000
017514

003106
003240
003142
003142
003142

8%:

T1::

MOV

OP2T12E ,ERHEAD

;SET ERROR HEADER

TST
BNE
PRINTF
MOV
MOV
MOV
MOV
TRAP
ADD

CLKFLG
3
OFMT9,ONOTSTL
ONOTSTL, -(SP)
OFMT9, -(SP)
#2,-(SP)
SP,RO
CSPNTF
06,SP

;P-CLOCK?
sBRANCH TO PERFORM TEST
$ELSE, PRINT MSG. “TEST

PRINTF
MOV
MOV
MOV
MOV

#FMT9,aNTSTI1A
ONTSTLA, -(SP)
#FMTY, -(SP)
02, -(SP)
SP,.RO

;CHECK FOR PRESENCE OF

000006

000006
030274
016560

s TEST

TIMING

TRAP
ADD
JMP
JSR

JSR

654
MOV
MOV
LR
DEC
8NE
CLR
CLR
JSR
654
MOV
JSR
65
JSR
654
JSR
MOV
MOV
MOV
MOV
MOV
MOV
MOV
8IS
8I1C
JSR
654

A P-CLOCK,,.BYPASS

CS$PNTF
&6,SP

1/P-CLOCK

TEST

NOT

AVAILABLE

IF P-CLOCK IS PRESENT
1 CANNOT BE PERFORMED..

IS NOT AVAILABLE*

654
PC.TSTINT

sEXIT TEST
sINITIALIZE TEST

S0F IN,RO
024, R
(RO).
R1
44
PASCNT
NEMWCYL
PC . XSEEK

sGET ADDRESS OF 1ST TIME
sSET COUNT FOR CLEAR
iCLEAR TIMER STORAGE

43000, ,R1
PC,RDYWALT

1SET MWAIT FOR 300 MS
1WAIT FOR READY

£C.,VERPQOS

s VERIFY POSITION

PC,CHOSKHD
00F OUT RO
SOFOUTU,RL
S&0ROUT ,R3

GO CHOSE HEAD
sSET PTRS FOR 1 CYL FWD OQUTER TIMER

PC,.GSTATR

OOROUTU,
R4
&1 ,NEWCYL
0128, ,COUNT
ORDHEAD, TEMPS
RLORV, TEMPS
#BIT10, TEMPE
PC,XSEEKT

sCLEAR DRIVE

VALUE

1CLEAR PASS COUNTER
1POSITION HEADS AT O
;D0 SEEK

sSET NEWCYL TO CYL 1
1SET COUNTER FOR SEEK LOOP
;1BUILD READ HEADER COMMAND
100 SEEK BUILD BUT

DO NOT

STARTY

CZRULNBO RLO1702 DRIVE TEST 3 MACRO v04.00 20 JAN 83
«1EST 1
s eSEEK TIMING
45

026606
026614
4?7 026622
48 026624
49 026636
46

S50 026642
S1 026644
026650
53 026652
026652
026654
026656
026660
026662
026666
026672
026674
026674
026676
026700
026702
58 026704
026710
60 026714
61
62 026732
63
026740
65 026752
026762
67 026764
68 026772
69 026776
70 027000
71 027004
72 027006
73 027010
74 027012
027014
76 027016
17 027020
78 027024
79 027026
027032
81 027034
82 027040
83 027044
027050
85 027052
027054
87 027056
88 027060
89 027062
027064
91 027066
027070
93 027074

013762
013762
010046

003044
003040

005737
001011
004737
012603

003012

104456
002261
000000
012266
000137
005737

100006

000004
000000

MOV
MOV
MOV
WAITUS
TST

BNE
JSR

016422

MOV

ERRHRD
TRAP
- WORD

030274
0G3050

17%:

104456

002262

0C0000
012570
000137
005037

030274
003012

013762

003142

012600

013737
004737
030274
005737
001403
060510
005511
000402
060513
005514
005337
001403
004737
000662
162710
162713
012705
000241
006011
006010
000241
006014
006013
005305

001370

005237
022737

14:40:57 PAGE

003142
023032

144

.WORD
. WORD
JMP
TSY
8PL
ERRHRD
TRAP
.4ORD
. WORD
.WORD
JHP
CLR
STCLK

L.DA,RLDA(R2)
L.CS,RLCS(R2)

RO, (SP)
210.

OONE
178
PC.WAITIN

(SP)+,R3
1201., ,ERR]
CSERMRD

ERR1
654
T.CS
143
1202., ,ERR6
CS$ERMRD
1202
0
ERRE
658
OONE

MOV

TEMP8 ,RLCS(R2)

WAITUS

42000,
R5

003040

GETTIM
MOV
MOV
JSR
6548
TST

8EQ
ADD

15¢:
003240

16%:

021202

000470
000470
000006

184:

10¢:

ADC
B8R
ADD
ADC
DEC
BEQ
JSR
BR
SuUB
SUB
MOV
CcLC

003236

TEMPB,L.CS

REGISTERS

1STORE RO
tWAIT FOR

INTERRUPT

s TEST IF INTERRUPT
SKIP
s YES
1WAIT FOR IMTERRUPT
sGET MESSAGE POINTER

1CHECK IF ANY ERRORS

sNO

SKIP

1CLEAR INTERRUPT FLAG
1START P-CLOCK TO INITIATE MEASUREMENT
s/70F TIME INTERVAL

sLOAD RL11 CONTROL AND STATUS REGISTER
1770 INITIATE SEEK OPERATION
iWAIT FOR INTERRUPT
1GET ELAPSED TIME

tRESTORE RO

sSET IF ERROR TO REPORT

sVERIFY POSITION

DESSGN
154

1CHECK WHICH SEEK DIRECTION
+REVERSE - SKIP

(R1)
164

sADD IN OVERFLOW
i SKIP
sADD TO REVERSE TOTAL
$ADD IN OVERFLOW
sDEC SEEK COUNT
1SKIP IF O
$ELSE SWAP OLD AND NEW CYL

R5,(RO)

R3,(R3)

(R4)
COUNT

184
PC, ONSWAP
9%
#312.,(R0O)
@312, ,(R3)

06,RS

(R1)
(RO)

ROR

(R4)
(R3)

ROR
DEC
BNE
INC
cMP

tLOAD RL

PC,VERPOS

ROR
ROR

cLC

SEQ 0099

1201
0

000000

003114

003236
000001

1tADD TO FORWARD TOTAL

+REDO SEEK LOOP

sSUB CONSTANT FOR READ HEADER TIME

+1SET SHIFT COUNT TO DIVIDE BY 64
;:DIVIDE BOTH TOTALS BY 64

10¢

PASCNTY
#1,PASCNT

1BUMP PASS COUNT
s TEST

PASS

CZRLNBO RLO1/02 DRIVE
oTEST

95
96
97
98
99
100
101
102

103
104
105
106
107
108
109
110

111
112

113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142

seSEEK

027102
027104
027112
027120
027122
027130
027134
027136
027142
027146
027150
027154
027156
027162
027166
027172
027176
027204
027212
027214
027222
027226
027234
027236
027244
027250
027252
027256
027262
027264
027270
027272
027276
027302
027306
027312
027320
027324
027332
027334
027340
027344
027346
027352
027356
027360
027364
027366
027372
027376
027402
027406
027414
027422

143
144
145
146
147
148 027424
149 027432
150 027434

001051
012737
022737
001403
012737
004737
030274
012701
004737
030274
004737
030274
012700
012701
012703

012704
012737
022737
001403
012737
000137
022737
001033
013737
004737
030274
012701
004737
030274
004727
030274
012700
012701
012703
012704
013737
000137
022737
001040
005037
004737
030274
012701
004737
030274
004737
030274
012700
012701
012703
012704
012737
022737
001505
012737
000501
022737

TEST

3 MACRO v04.00 20 JUAN 83 14:40:57 PAGE

TIMING

000177
000001

003106
002302

000377
017524

003106

PC, XSEEK

;D0 SEEK

JSR
654
JSR
65%

PC,RDYWAIT

MOV

023032

MOV
MOV
MOV
MOV
MOV

003106
002302

000400
026550
000002

003106

002312
017524

003106

003236

cMP
BEQ

102$:
243%:

005670
022420
023032

003144
003146
003160
003162
002306
026550
000003

JSR
658

CHP
8EQ

005670

003150
003152
003164
003166
000200
000001

SKIP
$NO
tELSE SET TO POSITION HMDS
sORIVE = RLOL1?

MOV

022420

MOV

003236

28¢:

003106
017524

005670
023032

003200
003202
003210
003202
000125
000001

003106
002302

000252

003106

000004

003236

tYUP
tNO -

#3000.,R1

$SET WALIT COUNT FOR 300 MS

PC,VERPQOS

;VERIFY POSITION

Q0FMID,RO
90FMIDY,R1
QORMID,R3
#ORMIDU,R4

$SET PTRS FOR TIMING 1 CyL SK AT

102%
g%S6-.NEHCYL

s YUP

0128. ,NEMCYL
21,7.0RIVE

1WAIT

SET FOR A MID POS SEEK RLOZ2

FOR READY

$SET WAIT COUNT FOR 300 MS
sWAIT FOR READY

JSR

PC,VERPOS

1VERIFY POSITION

MOV

00F IN,.RO
00F INU,R1
#ORIN,R3
R4
SORINU,

:SET POINTERS

MOV
MOV
MOV
MOV
JHP
cMP
BNE
CLR
JSR
6514
MOV

MOV

cMP
BEQ
MOV
B8R
cHP

NXTHL ,NEWCYL
PC ., XSEEK

1SET UP TO TIME 1 CyL SEEK AT INNER
LIMIY
s

g%HTH.NEHCYL

;LOAD NEW CYLINDER

93 ,PASCNT

s TEST IF PASS 3
s1NO - SKIF

324
NEWCYL
PC . XSEEXK

127

$1SET NEWCYL TO 128
sRLOL1?

93000. ,R1
PC.ROYWALY

MOV
MOV

32¢:

#255. ,NEWC YL

@2 ,PASCNT
2834

JSR
654
JSR
6548
MOV
MOV

022420

10 127

1SET FOR RLOZ2
100 SEEK LOOP
sTEST IF PASS 2
iNO - SKIP

JMP
cMP
BNE
MOV
JSR
654
MOV
JSR
658
654

003106

56Q 0100

24
0127, NEWCYL
01,T.DRIVE
101¢

BNE

101%:

12 7

100 SEEK LOOP

$ELSE SET UP TO TIME 857170 CYL SEEK
AT OUTER LIMIT
1

€3000. ,R1
PC.RDYWAIT

$SET WALIT COUNT FOR 300 MS
sWAIT FOR DRIVE READY

PC.VERPOS

s VERIFY POSITION

O+HF OUT RO
#HFOUTU,R1
OHROUT ,R3
OHF OUTU , R4
085, ,NEWCYL
#1,7.0RIVE
39¢
4170, NEWCYL
39¢
04 ,PASCNT

s SET POINTERS

;LOAD NEWCYL FOR 85 CYL SEEK

sRLOL1?
s YUP

;NO

SET FOR RLO2

s TEST IF PASS 4

17 ¢35
CZRLNBO PLO1/02 DRIVE TEST 3 MACRO v04.00 20 JUAN 83
oTEST 1
soSEEK TIMING
151 027442
152 027444
153 027452
154 027460
155 027462
156 027470
157 027474
158 027476
159 027502
160 027506
161 027510

162
163
164
165
166
167
168
169

170
171
172
173
174
175
176

177
178
179
180
181
182
183
184
185

027514
027516
027522
027526
027532
027536
027544
027546
027554
027556
027562
027566
027570
027574
027600
027602
027606
027610
027614
027620
027624
027630
027636

027642
027642
027646
027652
027656
027662
027664
027666
186 027672
027672
027674
027700
027704
027710
027714
027720
027724
027726
027730
187 027734
027734
027740
027744

001041
012737
022737
001403
012737
004737
030274
012701
004737
030274
004737

023032

012701
012703
012704
013737

003174
003176
003204
003206
002306

003106

000005

003236

030274
012700

000434
022737
001032
005037

004737
030274
012701
004737
030274
004737
030274
012700
012701
012703
012704
013737
000137
012746
012746
012746
012746
010600
104417
062706

005046
153716
012746
013746
012746
012746
012746
010600
104417
062706
012746
012746
012746

000252
000001

00310¢

000525
017524

003106

BNE

MOV

002302
321%:

005670
022420

JSR
654
JSR
65%

MOV
MOV

MOV

MOV
MOV

364%:

005670
022420

000010

003037
006142
003032
006131
011370
000005
000014

007176
007170
007161

BR
cHP
BNE
CLR
JSR
654

MOV

JSR
65
JSR
658
MOV
MOV

023032

007117
007063
011342
000003

cMP
BEQG
MOV
JSR
654
MOV

003106
017524

003214
003215
003220
003222
002306
026550

14:40:57 PAGE

003106

39%:

404
:

MOV
MOV
MOV
JMP
PRINTF
MOV

MOV
MOV
MOV

MOV
TRAP
ADD
PRINTF

364

0170, ,NEWCYL
@1, T.DRIVE

tELSE

SK]IP

;RLO17?

SET

TIME

8BS CrL

03000, ,R1
PC,RDYWAIT

1SET WAIT COUNT FOR 300 MS
tWAIT FOR READY

PC.VERPQS

s VERIFY POSITION

o+¥F IN,RO
OHF INU,R1
OHRIN,R3
R4
OHRINU,

:SET POINTERS

05, ,PASCNT

1 TEST IF PASS S

NEWCYL

sELSE SET UP

HLMTW NEWCYL
394
408

$SET NEWCYL TO 255/511 FOR 85/170 CrL SEEK
100 TIMING LOOP
sNO

SKIP

TO TIME 256/512 CyL SEEK

93000, ,R1

1SET WAIT COUNT FOR 300 MS

PC,VERPOS

s VERIFY POSITION

OAFMID,RO
OAFMIDU,R1
#ARMID ,R3
QARMIDU,R4

;SET

PC.RDYWAIT

:%HTH.NEHCYL

OVER ALL

SURFACE

;WAIT FOR DRIVE READY

POINTERS

sSET NEWCYL

#FMT1.1,05KTMES, OVALDES

OVALDES, -(SP)
ASKTMES, -(SP)
#FMTL.
1, -(SP)

SP,RO
CSPNTF

010,SP
OFMTS, 0BASADD ,RLBAS, 9DRVNAM, <B ,RLDRV+1>

RLBAS, -(SP)

-(SP)

SORVNAM, -(SP)
#BASADD, -(SP)

05, -(SP)
SP,RO
CSPNTF

e14,5P
OFMT18, 6L ABIN, 4LABMID, 4LABOUT, 8L ABEXP
QLABEXP, -(SP)

oLABOUT, -(SP)
#LABMID, -(SP)

SEFK

iNO - SET FOR RLOZ2
: AT INNER LIMIT

PC, XSEEK

MOV

iNO

s YES

RLORV+1,(SP)

MOV
MOV
MOV
TRAP
ADD
PRINTF
MOV
MOV
MOV

5EQ 0101

321

0341, .NEWCYL
PC, XSEEK

CLR
8ISsS8
MOV

CZRULNBO RLO1/02 DRIVE TEST 3 MACRO v04.00 20 JAN 83
¢TEST 1
seSEEK TIMING
027750

027754
027760
027764
0271766
027770
188 027774
027774
030000
030004
030010
030014
030020
030024
030030
030032
030034
189 030040
030040
030044
030050
030054
030060
030064
030070
030074
030076
030100
190 030104

030104

030110
030114
030120
030124
030130
030134
030136
030140
191 030144
030144
030150
030154
030160
030164
030170
030174
030176
030200
192 030204
030204
030210
030214
030220
030224
030230
030232
030234

012746

012746
012746
010600
104417
062706

007153
011762
000005

000014

C13746
013746
013746
013746
012746
012746
012746
010600
104417
062706

003224
003154
003150
003144
007207
012014
000006

013746
013746
013746
013746
012746
012746
012746
010600
104417
062706

003224
003470
003164
003160
007221

013746
013746
013746

012746
012746
012746
010600

104417

000016

012014
000006

000016

003226
003200
003174
007233
012051
000005

062706

000014

013746
013746
013746
012746
012746
012746
010600
104417
062706

003226
003210
003204
007247
012051
000005

013746
013746
012746
012746
012746
010600
104417
062706

003230
003214
007263
012101
000004

000014

000012

14:40:57 PAGE

MOV
MOV
MOV
MOV
TRAP
ADD
PRINTF
MOV
MOV
MOV
MOV
MOV
MOV
MOV

MOV
TRAP
ADD
PRINTF
MOV
MOV
MOV
MOV
MOV
MOV

MOV
MOV
TRAP
ADD
PRINTF

MOV

MOV
MOV
MOV
MOV
MOV
TRAP
ADD
PRINTF
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
PRINTF
MOV

MOV

MOV
MOV
MOV
MOV
TRAP
ADD

| 8

12-4

P)
oFMTL18,

95, (SP)
SP,RO

(S P)

CSPNTF

014,SP
OFMT19, 4LABOCF , OF IN, OFMID, OF OUT ,EXOCYL

EXOCYL, -(SP)
OFQUT, -(SP)
OFMID, -(SP)
OFIN, -(SP)
#LABOCF
, -(SP)
OFMT19, -(SP)

SP,RO
CSPNTF

216,5P
OFMT19,4LABOCR, ORIN,ORMID,OROUT ,EXOCYL

EXOCYL,-(SP)
OROUT, -(SP)
ORMID, -(SP)
ORIN, -(SP)
QLABOCR, -(SP)
OFMT19, -(SP)

SP,.RO
CEPNTF
416,5P

OFMT20, #LABHCF , HF IN , HFOUT ,EXHC YL

EXHCYL, -(SP)

HFOUT, -(SP)
HFIN, -(SP)

®LABMCF
, -(SP)

FMT20, -(SP)

05, -(SP)
SP,RO
COPNTF
914,5P
OFMT20, HLABHCR,HRIN,HROUT
,EXHCYL
EXHCYL, -(SP)
HROUT, -(SP)
HRIN, -(SP)
OLABHCR, -(SP)
OFMT20, -(SP)

SP,RO
CSPNTF

014,SP
OFMT21,
MLABACF ,AFMID,EXACYL
EXACYL, -(SP)
AFMID, -(SP)

SLABACF, -(SP)
OFMT21, -(SP)

94, -(SP)
SP,RO
COPNTF

SEQ 0102

e
CZRLNBO RLOL1/702 DRIVE TEST 3 MACRO v04.00 20 JUAN 83
¢ sSEEK TIMING
¢TEST 1

193 030240
030240
030244
030250
030254
030260
030264
030206
030270
194 030274
195 030274
030274
036274

013746
013746
012746
012746
012746
010600
104417
062706

104401

003230
003220
007277
012101
000004
000012

65%:
ENDTST
L10023:

14:40:57

PRINTF
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

TRAP

PAGE

OFMT
0L ABACR,ARMID
21,
,E XAC r{

EXACYL,

(SP)

ARMID, -(SP)

OLABACR, -(SP)

OFMT21, (SP)
04, -(SP)
SP,RO

CIPNTF

#12,5P

CSETST

5€Q 0103

VWSO UVNDW

fre

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO v04.00 20-JAN 83
«TEST 2
¢+4BASIC READ DATA (BAD SECTOR FILE)
030276
030276
030276
030304
030310
030314
030316
030324
030332
030334
030340
030342
030342
030344
030346
030354
030360
030362
030366
030372
030374

030400

030402
030406
030414
030422
030430
030434
030440
030444
030450
030454
030462
030466
030470
030472
030474
030476
030500
030502
030504

030506
030510

030514
030516
030524

030526
030532
030534
030536
030542
030544
030546
030550
030554
030556

.SBTTL
8GNTST

012737
004737
004737
030764
012737
032737
001405
005737
001002

006676
01€560
016576

003016

000001
010000

003116
014120

013737
004737
030764

012701
004737
030764
004737
030764
005037
012737
012737
112737

105037
005037
013701
013700
012703
012737
004737
030640
005723
100516
005723
100514
005723
001112
005723
001110
021327
001004
012737
000403
005737
001076
012311
012705
006311
005305
001375
032713
001402
052711

es:

005670
022420

003120
003676
000020
000001
003450
003130
003134
003136
004072
000002
024212

BNE
EXIT
TRAP
. WORD

MOV

JSR
65$

CLRB
CLR

7%:

177777
000001
003130

000007

000400
000100

28
HEADW

2
TST
CSEXIT
L10024
-.
HLMTW, NEWCYL
PC, XSEEK

;00 SEEK

$SET FOR €=CTOR O
$:SET TEMP STORAGE FOR FACTORY BS FILE
;SET MAX SECTOR COUNT
;SET FOR NO ERROR COUNTING
;:CLEAR LOCAL ERROR COUNTER
:CLEAR ONES DETECTED FLAG
s INIT POINTERS

@16.,TEMP6
€1 ,NOERCT

LOCERR
TEMP3
TEMPS,R1

TEMP6,RO
#IBUFF ,R3
92 ,ERRSWI
PC,XREAD

(R3)

454

(R3).

TS7

(R3).

BNE
CMP
BNE

45%

10¢:

BR
757
BNE

DEC
BNE
BIT
BEQ
BIS

sPOSITION HEADS AT 255

DOESSEC
OFBSFIL
, TEMPS

45%

MOV
MOV
ASL

12::

s VERIFY POSITION

B8MI
TST

MOV

FILE)

PC,VERPOS

8%:

12%:

SECTOR

sSET WAIT COUNT FOR 300 MS
sWAIT FOR INTERRUPT

454

11¢:

(BAD

93000. ,R1
PC,RDYWAIT

BNE

003130

DATA

;SET TO HEAD 1
s TEST IF HWEAD SPEC'D
iNO - SKIP
s TEST IF HEAD O
sNO - SKIP
sELSE EXIT TEST

MOV
MOV
MOV
MOV
JSR
39¢
TST
BMI

003022

READ

#1,DESHD
QHEADLM MISWIW

MOV
MOV
MOVB

4%:

«sBASIC

s TEST

SEQ 0104

MOV

JSR
654
JSR
65%
CLR

003134
003136
003451

sSET ERROR HEADER
sINITIALIZE TEST
;CLEAR DRIVE

MOV

023032

6P2T13E ,ERHEAD
PC,TSTINT
PC,GSTATR

TST

003106

PAGE

MOV
JSR

BIT
8EQ

014126

002306
017524

sTEST

JSR
65$

104432

000446

14:40:57

(R3),0-1
10%
#1,TEMP3
113

TEMP3
454

(R3)+,(R1)

#7,R5

(R1)

RS
124

4BIT8,(R3)
15%
#B8176,(R1)

s INIT ERROR SWITCH
;D0 READ

; TEST IF WORD O NOT NEG

;YES, BAD FMT ERROR
1ELSE TEST WORD 1 NOT NEG
sYES - BAD FMT ERROR REPORT
;TEST WORD 2 IS O

iNO - SKIP TO FMT ERROR RPT
:TEST WORD 3 IS O
sNO - SKIP TO FMT ERROR RPT
;TEST IF NEXT WORD IS ALL

1°'S

- SKIP
;NO
;ELSE SET 1'S DETECTED FLAG
s SKIP
;sTEST IF ONES HAVE BEEN DETECTED

:YES - SKIP TO FHMT ERROR RPT
sSTORE CYLINDER WORD
sALIGN IT TO LOOK LIKE HEADER

s TEST

IF HEAD

tNO - SKIP
: INSERT HEAD BIT

CZRLNBO RLC1
o TEST 2

02 DRIVE TEST 3 MACRO vO4 .00 20 JUAN 83
seBASIC READ DATA (BAD SECTOR FILE)

55 030562
030566
57 030570
030574
030576
030602
030604
030612
030614
030622
0306 30
030636

030640
030644
030652
030652
030654
030654
030656
030664
030666
030672
030676
030676
030700
030702
030704
76 030706
77 030714
78 030716

79 030720
80 030726
81 030730
82 030734
030734
030736
030740
030742
83 030744
84 030746
85 030752
030752
030754
030756
030760
86 030762
87 030764
030772
89 031000

031004

91 031006
92 031012
93 c31012
031012

031012

042713
052321
020327
001345
005737
001461
022737
001464
012737
012737
012737
000676
005237

G12777

15¢

177400

004472
003130

003136

003502
000044
000024

003134
003136
003120

17177177

152262

408
:

104420

103667
023737
001015
012703
005237
104456
002425
000000
012266
022737
001423
000736
062737
000642
012703

104456
002427
0V0000
012266
000730
012737
012737
105737
001402
005237

104401

484

B8EQ

651

MOV

236.,.TEMPE

MOV

B8R

003120

003136

41s:

006033
003450

000004

003134
003120

006063

43%:

45%:

006110

484

003450

003022
003500

654

664%:
ENDTST
L10024:

020. ,0ESSEC

a8
43
OESSEC, TEMPE
434
#MBADSF ,R3
LOCERR
1301%.,,ERR1

.WORD
.MORD
.WORD
cre
BEQ
BR

1301
O
ERRL
0SBSF
IL, TEMPS
65¢
37%

RDD

CsINLP

#4 ,DESSEC

TRAP

CSERMRD

MOV
ERRHRD

.WMORD
.MORD
.WORD
8R
MOV
ERRMRD
.WORD
.HMORD
.WORD
8r
MOV
MOV

kG 010%

1CLEAR ALL BUT SECTOR
1 INSERT SECTOR NMUMBER
1CHECK TIF IBUFF EMPTY
iNO GET NEXT CYLINDER
sELSE TEST IF 1°'S DETECTED
1 10 MANY

sCHECK
s YES

ERRORS

REPORT

SOF TWARE BAD READ

SKIp

1ELSE CHANGE POINTERS

MAX

SECTOR

NUMBER

3
SECTOR NUMBER START
100 READ
;BUMP LOCAL ERROR COUNTER
MOV
1'S INTO FILE STORAGE
(CHECK IF IN ERROR LOOP

:YES

GO DO READ

1CHECK IF ALL SECTORS READ
sNO - SKIP
$1SET RESULT MESSAGE POINTER
1BUMP LOCAL ERROR COUNTER

CSERHRD

B8R

7578

003244

#SBSFIL
, TEMPS

BCOMPLE
8CS
cHe
BNE
MOV
INC
ERRHMRD

TRAP

000002

036.,TEMP6

LOCERR
e-1,8TEMPS

TRAP

003502

TEMPS

INC
MOV
INLOOP
TRAP

104456

002426
000000
012266
000735
012703

B8EG

MOV

29s
.

€177400,(R3)
(R3):,(R1).
R3,0IBLFF
. 256,
as

378:

8IC
8IS
che
BNE
1S7

000044

003450

14:40:57 PAGE

OMMFMTIER,
RS
1302., .ERR1

1302
O
ERR1
394
#MTMBS ,R3
1303.,,ERR1

s TEST IF SOF TWARE FILES CHECKED
sYES

EXIT

tELSE GO CHECK SOF TWARE FILES
1BUMP TO NEXT SECTOR
:1GO D0 READ
:SET RESULT MESSAGE POINTER

iGO CHECK FOR LOOP
$1SET RESULT MESSAGE PTR

CSERNRD

13C3
O
ERR]

40
#2 ,ERRSWI

01 ,85FVAL
LOCERR

BEQ
INC

663
ERRCNT

TRAP

CSETST

1GO0 CHECK FOk LOOP
1 INIT ERROR SWITCH
:+SET BAD SECTOR FILES VALID FLAG
1 TEST IF LOCAL ERRORS

iNO

SKIP

tELSE BUMP ERROR COUNT

O® LT DWW

CZRLNBO RLO1700 DRIVE TEST 3 MACRU vO4.00 20 JAN 83
¢oWRITE/READ DATA (PART 1)
eTEST 3
031014
031014
03i014
031022
031026
031032
031036
031040
031044
031050
031054
031060
031064
031066
031072
031076
031100
031104
031106
031112
031112

031112
031112
031114
031120
031122

031126
031130
031134
031136
031142
031144
031152
031152
031152
031154
031154
031156
33 031160
031166
35 031170
031174
37 031176
38 031202
39 031204
40 031210
41 031214
42 031216
43 031220
44 031224
45 031226
46 031226
031226
031226
a7

.SBTTL
BONTST
012737
004737
004737
004737
031226
004737
005037
005037
005037
004737
031226
012701
004737
031226
004737
031226
005037

006712
021226
016560
016576

003016

14:40:57 PAGE

sTEST

MOV
JSR
JSR
JSR

s1EST 8

oo WRITE/READ DATA

oP2T14F ,ERHEAD

PC.CxBSVD

PC,TISTINY
PC,GSTATR

130654

021116
003120
003106
03112C
017524

13064
:

005670
022420

JSR
CLR
CLR
CLR
JSR

1307%:

DESSEC
NEWC YL

1%.;

1SET ERROR MEADER
1GO CHECK IF BAD SECTOR FILES VAL ID
1 INITIALIZE TESY
1CLEAR DRIVF
1G0 CHOSt MEAD
'
SECTOR O
$
CYLINDER O

tCLEAR PATTERN SELECT
sFOSITION HEADS

JSR

#3000. ,R1
PC.RDYWAIT

1WAIT FOR READY

JSR

PC,VERPQS

sVERIFY POSITLION

CLR

13104

sCLEAR PATTERN SELECTOR

TRAP

c48SuB

13065
MOV

13065

031120

PC.CHOSHD

(PART

PC, XSEEK

730654

023032

7310

$SET WAIT COUNT FOR 300 MS

BGNSUB

104402
004537
000000
004737
031144
004737
031144
004737
031144
012737

023522

73108

024152
024212

023662
000002

003022

104403
104410
000050
022737
001403
005237
000746
004737
031226
005037

004737
031220

000720

005237
000771

104401

604
ENDSUB
L10026:

JSR
.WORD
JSR
6Cs
JSR
608

031120

sPATTERN

PC,XREAD

100 READ DATA

JSR
608
MOV

PC,DATCOM

s1COMPARE DATA

02 . ERRSMI

sINIT ERROR SWITCH

TRAP

CSESUB

TRAP

CSESCAPE

cre
BEQ
INC

031120
021142

104

118;

003106

13s:
730654
:

ENDTST
L10025:

1GENERATE DATA

ESCAPE
000010

RS,DATGEN

13.1:

JSR

130654

CLR
JSR
13¢
8R

PC,XWRITE

157

L10025-.

08, ,71310¢

104

73108
73078
PC.SWAPHD
13108

PC.BSCHK
73064

INC

B8R

NEWCYL
11

TRAP

CSETST

SELECT

s00 WRITE DATA

sEXIT

TEST

MORD

IF ERROR

1WAS DATA PAT

8 USED?

s YES - SKIP
sELSE BUMP TO NEXT PATTERN
100 TEST WITH NEW PATTERN
+GO SWAP TO HEAD 1 OR END TEST
1ABORT RETURN
1SET PATTERN SELECY TO O
sCHECK IF SECTOR BAD
1YES RETURN - SKIP TO 13
i1NO RETURN

- DO TEST

THIS SECTOR

1BUMP TO NEXT CYLINDER
sCHECK IF TMIS ONE BAD

O ®

~NT

NDW

CZRLNBO RLO1/702 DRIVE TEST 3 MACRO v04.00 20 JUAN 8%
s sRUTATIONAL TIMING
«TEST 4

11
12

LSBTTL
BGNTST

031230

031230
031230

031236
031242
031244
031244
031250
031254
031260
031262
031264

031270
031270
031274
031300
031304

031306
031310
031314
031314
031316
031320
031322
031324

14 031330

031334

16 031336
17 031342
18 031344
19 031350
20 031354
21 031362
22 03. 366
23 03.370
24 031374
25 031400
26 031402
27 031406
28 031410
29 031414
30 031420
31 031424
32 031426
33 031432
031436
35 031442

031446
37 031460
38 031464
39 031466
40 031472
41 031474
031474

012737

006733

005737
001026

003474

012746
012746
012746
010600
104417
062706

010131
011554
000002

012746
012746
012746
010600
104417
062706
104432
000542
005003
005004
004737
004737
032052
004537
000000
005037
004737
013737
004737
032052
012701
004737

032052
004737
032052
012701
012705
004737
032052
011562
014562
014562
014562
005737
001011
004737
012603

104456

003016

000006

14:40:57 PAGE

«TEST

s TEST 4

()
15

*oROTATIONAL

TIMING

Ta::

MOV
P2 115E,ERMEAD
1SET ERROR MEADER
;CHECK FOR PRESENCE OF A P CLOCK,
. BYPASS TEST IF NOT AVAILABLE
187
1P-CLOCK?
CLKFLG
BNE
3
sBRANCH TO OERFORM TEST IF P-CLOCK IS PRFSENT
PRINTF
OFMTY,ONOTSTA
$ELSE, PRINT MSG. “TEST 4 F,ANNOT BE PERFORMED.
.
ONQTSTA, -(SP)
MOV
OFMTI, -(SP)
MOV
02, (SP)
MOV
MOV
SP,RO
TRAP
CSPNTF
ADD
06,5P
PRINTF

010217
011554
000002

MOV
MOV
MOV
MOV

TRAP
ADD

000006

EXIT

TRAP

OFMTY,ONTSTAA

s/P CLOCK IS NOT AVAILABLE"”

ONTSTAA, -(SP)
OFMTY, -(SP)

92, -(SP)

SP,RO
CHPNTF
6, SP
1ST
C4EXIT
L10027-.
R3
R4

023522

. WORD
CLR
cLR
JSR
JSR
604
JSR

003120
021116
014122
017524

CLR
JSR
MOV
JSR

DESSEC

JSR
604
JSR
604
MOV
MOV

PC.ROYWAIT

43000, ,R1

$SET WAIT FOR 300 MS
sWALIT FOR READY

PC,VERPOS

sVERIFY POSITION

3s:

016560
016576

003106

608
MOV

005670
022420
023032

000100
003046
024142

St:

PC.TSTINT
PC.GSTATR

RS ,DATGEN
PC.CHOSHD

LOLIMJ, NEWC YL

PC, XSEEK

tCLEAR FOR TIMING STORAGE

s INITIALIZE TEST
sCLEAR DRIVE
1GENERATE DATA

sPATTERN O

+CLEAR TO SECTOR O
1G0 SELECT HEAD
$SET FOR CYLINDER
sDO SEEK

#64. ,R1 ;SET LOOP COUNTER
o .MP,R5
1SET A POINTER

PC . XWRITT

;00 FIRST WRITE

(R3),RLMP(R2)
-(R5),RLDA(R2)
-(R5),RLBA(R2)
-(R3),RLCS(R2)

tLOARD RL REGISTERS

003012

OONE

016422

PC,.WAITIN

s TEST IF INTERRUPTY
1YES - SKIP

000006
000004
000002
000000

#3000.

(SP)+,R3
1501.,,ERR]
C$ERHRD

$ELSE WAIT FOR TIMECUT
1GET MESSAGE POINTER

CZRLNBO RLO1/0” DRIVE
sTEST

031476

42
43

46
47
48
49

TEST

3 MATRO

¢sROTATIONAL

031500
031502
031504
031510
031514
031516
031516
031520
031522
031524
031526
031532
031536
031542

S0
S1 031560
52 031564
S3 031570
031574
35 031600
031612
57 031622
58 031626
59 031630
031634
61 031636
031636
031640
031642
031644
62 031646
63 031650
031654
65 031656
031656
031660
031662
031664
031666
67 031670
68 031672
69 031674
70 031676
71 031700
72 031704
73 031706
74 031710
75 031712
031714
77 031716
031716
031722
031726
031732
031736
031740

002735
000000
012266
000137
005737
100006
104456
002736
000000
012570
000137
012705
005037
011562
014562
014562
014562

005737

001010
004737
012603

v04.00 20 JAN 83

100005

104456
002740
000000
012570
000471
060003
005504
005301
001246
012701
000241
006004
006003
005301
001373
012746
012746
012746
012746
010600
104417

5€Q 0104

TIMING

032052
003050

032052
003046
003012

63:

000006
000004
000002
000000

.WORD
.WOROD
.WORD
JMP
TSt
8PL
ERRHRD
TRAP
. WORD
.WORD
.WORD
JP
MOV
CLR
STCLK

1501
O
ERR]
608
1.CS
a8
1502.,.ERR6
CIERMRD
1502
O
ERR6
604
oL .MP ,R5
DONE

MOV
MOV
MOV
MOV
WAITUS

(R5),RLMP(R2)
-(R5),RLDA(R2)
-(RS),RLBA(R2)
-(RS),RLCS(R2)
#3000.

GETTIM
157

003012

BNE
JSR
MOV
ERRHRD

016422

104456
002737

000000
012266
000501
005737

14:40:57 PAGE

TRAP
.WORD

003050

78:

88:

000006

108:

007117
007075
011342
000003

.WORD
.WORD
BR
187

B8PL

ERRHRD
TRAP
.WORD
.WORD
.WORD
B8R
ADD
ADC
0eC
BNE
MOV
CLC
ROR
ROR
OEC
BNE
PRINTF

MOV
MOV
MOV
MOV
MOV

TRAP

RO
DONE

74
PC,WAITIN
(SP). ,R3
1503.,.ERR]
CSERHRD
1503
O
ERR1
603
7.CS

1504.,,ERR6
CHERHRD
1504
O
ERR6
604
RO,R3
R4
R1
54
#6,R1
R4
R3
R1
104

s TEST

iNO

CIPNTF

FRRORS

$SET POINTER TO RL LOAD REGS
sCLEAR INTERRUPT INDICATOR

$START P CLOCK TO INITIATE MEASUREMENT

1/70F

TIME

INTERVAL

s1LOAD RL REGISTERS FOR 2ND WRITE

sWALIT FOR INTERRUPT
sGET ELAPSED TIME
s TEST IF INTERRUPT OCCURRED
s YES - SKIP
GO WAIT FOR INTERRUPT
;GET MESSAGE POINTER
sREPORTY

sTEST

aNY

ERROR

SkIP
iNO
sREPORT ERRORS

$1ADD IN TIME USED
1O0UBLE PRECISION
sDEC LOOP COUNTER
:LOOP UNTIL O
$SET OIVIDE COUNT
sCLEAR CARRY FOR DIVIDE
sOIVIDE SuM BY 100(8)
sDEC DIVIDE COUNT
sLOOP UNTIL DONE

OFMT1.1,0SRTMES, OVALDES

OVALDES, -(SP)
OSRTMES, -(SP)
OFMT1.1,-(SP)
e3,-(SP)
SP,RO

ANY

SKIP

[
CZRLNBO RLO1/02 DRIVE
oTEST

TEST

3 MACRO v04.00 20 JAN 83 14:40:57 PAGE

ssROTATIONAL

031742

062706

031746
031750
031754
031760
031764
031770
031774
032000
032002
032004
79 032010
032010
032014
032020
032024
032026
032032
032036
032042
032044
032046
80 032052
81 032060
032060
032060
82

005046

78 031746

153716

012746
013746
012746
012746
012746
010600

104417
062706

013746
012746
012746
010346
012746
012746
012746
010600
104417
062706
012737
104401

15 ?

TIMING

000010

003037
006142
003032
006131
011370
00000%

ADD
PRINTF

210,5P
oFMTS,@BASADD,RL BAY, SDRVNAM, «B ,RLDRV

CLR
BISB

-(SP)
RLDORV+1,(SP)

MOV
MOV

RLBAS, -(5P)
#B8ASADD, -(SP)

MOV

ODRVNAM, -(SP)

OFMTS, -(SP)

85, -(SP)

MOV
TRAP

SP,RO
CIPNTF

PRINTF
MOV

&FMT126,0RESE3,
R3, ORESES, aMAPROX , € XROT
EXROT, -(SP)
MMAPROX, -(SP)

011123

MOV
MOV

R3, -(SP)
ORESES, -(SP)

000016
000002

ADD
MOV

#16,5P
92 ,ERRSWI

TRAP

CSETST

ADOD

000014

003232
007143
011127

MOV
MOV

012211
000006

MOV
MOV
MOV

TRAP

003022

60%:
ENDTST
L10027;

14,5P

ORESEA, -(SP)
o MT26, -(SP)
6, -(5P)
SP,RO

COPNTF

sINITIALIZE ERROR SWITCM

CZRLNBO RLO1/02 DRIVE
e

3 MACRO VO4.00 20-JAN 83

¢+WRITE/READ

VRO NDW

1 TEST

TEST

DATA

(PART

012701
012737
013721
005337
001373
013737
013737
013737
062705
032737
001031
005737
001002
062705
022737
001404
020527
103013
000403
020527
103007

032262
032270
032276
032300
032304
032310
032312
032316
032324
032326
032334
032336
032342
032346
032354
032362
032370
032376
032404

016537
043737
001007
000137
023705
001773
010537
023737
103730
023737
101324
012703
013713
013763
013763
013763
013763
013763
010337

«TEST

BGNTST

012737
004737
004737
004737
033170
005037
012705
005737
001006
032737
001002
012705

006756
021226
016560
016576

003016

MOV

002510
000010
014122
002304
014124
014124
014124
000002
000001

1s:

002304

002514
002516
002520
014120

2s:

73100¢:

003444

000016
000001

3s:

000244

002610
002310

444

002304
002304

033170
014124

69¢:
4%
;
S

;CLEAR DRIVF

MOV

1
OALLCYL ,MISWIW
1¢
0-16.,R5

MOV

6T337T8L ,R1

15::

$1GO CHECLK IF BAD SECTOR FILES VALID
s INITIALIZE TEST
$CLEAR PASS 10 O
sSET
s TEST IF FIRST PASS

(QUICK

VERIFTY)

sNO - SKIP
;TEST IF USE ALL CYLINDERS
$YES - SKIP
$tELSE SET PEOPLE TO NEG 8

sGET ADDRESS OF WORK TABLE

MOV
MOV
DEC
BNE
MOV
MOV
MOV

LOLIMW,(R1).
1CLEAR LOCATIONS TO LO LIMITY
JJJ
10EC COUNT
2t
iLOOP UNTIL O
HILIMW,T33TBL
4 ;INSERT HILIMIT
HILIMJ, T33TBL+6 ;INTO APPROPRIATE LOCATIONS
HILIMY, T33TBL.10

TST

PASNUM

ADD
81T
BNE

€10,JuJ

iSET CLEAR COUNT

#2.R5
1BUMP RS BY 2
SALLCYL ,MISWIW
TEST IF USE ALL CYLINDERS

$YES

3s
€16,RS

iNO - SKIP
1ELSE BUMP CYLINDER PQINTER By 7

s TEST

- SKIP

IF FIRST PASS (QUICK VERIFY)

o1, T.DRIVE
448

sRLO1 OR RLO2?THAT
1ANS IS RLO1

694
RS,082.
44

s TEST PAST TABLE-YES EXIT

CYLTBL(RS),UJJ
S%REYY.JJJ

GET NEXT TABLE ENTRY
sCLEAR UPPER BYTE

731654

sEXIT TEST

4%
RS, JJJ

1YES - EXIT TESY
sUSE RS AS NEXT CYLINDER

MILIMW,.RS

002304
002304

014122

002304

014124

JJJ LOLIMK
731008
JJJHILIMM

000002
000004
000006
000010
000012

o787 ,R3
JJJ,(R3)
JJIJ,2(R3)
JJJ,4(R3)
JJJ,6(R3)
JJJ,10(R3)
JJJ, 12(RS)

002550
002304
002304
002304
002304
002304
002304
003030

(PART

PC,.GSTATR

22.016‘.

000122

DATA

;SET ERROR HEADER

PASCNT
0-2,RS
PASNUM

BNE
002302

SEQ 0110

OP2T16E ,ERHEAD

CLR

BNE
BIT
BNE

014120

s TEST

PC,CKBSVD
PC, TSTINT

MOV
ST

177760

«oWRITE/READ

JSR
JSR
JSR

731658

003236
177776
003444
000001

.SBTTL

032062
032062
032062
032070
032074
032100
032104
032106
032112
032116
032122
032124
032132
032134
032140
032140
032144
032152
032156
032162
032164
032172
032200
032206
032212
032220
032222
032226
032230
032234
032242
032244
032250
032252
032254
032260

14:40:57 PAGE

. 31004

R3,TBLSTR

1 TES PASY

THE

IS THE Q

TABLE

s TEST IF ALL CYLINDERS USED
1LHECK IF LOWER THAN LOLIMIT
1YES - SKIP
sCHECK IF HIGHER THAN HILIMIT
s YES

:1STORE

SKIP

TABLE

ADDRESS

)
CZRLNBO RLO1/02 DRIVE
+TEST

TEST

3 MACRO vO4.00 20 JUAN 83

«+WRITE/READ DATA

57 032410
58
S9 032414
60 032414

004737

032414
032416
032424
032430
032432
032440
032442
032444
032452
032460
032462
032466
032474
032502
032506
032512
032516
032522
032526
032532
032534
032540
032544
032546
032552
032556
032560
032564
032570
032572
032576
032600
032604
032606
032614
032622
032626
032630
032636
032640
032644
032646
032652
032660
032662
032670
032676
032704
032710
032712
032720
032722

104402
042737
005737
001414
023727
001404
002407
012737
052737
000405
005037
052737
012737
013703
012701
012703
005037
012137
004737
033076
012701
004737
033076
012337
004737
033076
012701
004737
033076
004737
033076
004737
032736
013737
042737
004537
000000
032737
001425
004737
033076
005237
022737
001347
042737
042737
052737
005037
000733
032737
001414
004737

(PART

14:40:57 PAGE

1€

S€Q 0.1:

021116

JSR

PC,CHOSHD

TRAP

cs85LUB

sGO CHOSE

HEAD

131018:

BGNSLB

032414

003760
003236

003010

003236

000003

000003
000020

003236
000040
000003
003030
002510
002550
003120
003106
017524

003236
003010

003010
003026

8IC

TST

BEQ
cMP
BEQ
BLT
MOV

10s$:

8IS

11%:

CLR
8IS
MOV

12%:

1Ss:

005670
022420
003106
017524

024710

16%:

003120
177770
023522

032626
032626

000001

003026

25%:

024152

003120

000060
000001
000100
003120

003010
003026
003010

000002

003026

29%:
31s:

,CLEAR ALL MESSAGE
s TEST IF PASS O
sYES - SK]IP
s TEST IF PASS 3
t1YES - SKIP

03 ,PASCNT
QINOUTS,OPFLAG

sELSE SET TO 3
;SET “ESSAGE QUAL

118

124

PASCNT
QOUTINS,OPFLAG
€3, WRTSWI
TBLSTR,R3
#T33T8L ,R1
#7187 ,R3

sCHECK IF LESS THAN 3,
s SKIP
1SET
;SET
$SET
sGET

YES CLEAR T0 O

PASS COUNT TO O
MESSAGE QUAL
READ AND WRITE SWITCH
STORED TABLE ADDRESS

DESSEC

sCLEAR TO SECTOR O

PC . XSEEK

100 SEEK

(R1)e¢ ,NEWCYL

QUALIFIERS

$1GET NEXT TABLE ENTRY

#3000. ,R1

31SET WAIT COUNT FOR 300 MS

JSR

(R3)+ ,NEWCYL
PC . XSEEK

sGET NEXT TABLE ENTRY
;100 SEEK

JSR

PC.ROYMAILIT

#3000. ,R}

tSET WALIY COUNT FOR 300 MS

PC,VERPOS

sVERIFY POSITION

PC.BSCHK

DESSEC,25¢

sCHECK FOR BAD SECTOR
1 "YES” RETURN
1SET DATA PATTERN = TO SECTOR NUMBER

gS.DATGEN

1GO GENERATE DATA

BITO,WRTSKI
298

1TEST IF WRITE THIS PASS
iNO - SKIP

604
JSR

023032

024212

CLR
MOV
JSR
608
MOV
JSR
603
MOV

608
MOV

005670
022420

003120
000050

MOV
MOV
MOV

OMQUALS,OPFLAG
PASCNT
11¢
PASCNT , 03

75.1:

604
JSR
324
MOV
81C
JSR
B8I7
BEQ
JSR
60¢
INC
cHP
BNE
8IC
8IC
8IS
CLR
B8R
a1t
BEQ
JSR

PC.RDOYWAIT

#177770,25%

$WAIT FOR READY

sWAIT FOR READY

tCLEAR ALL BUT LSD

PC.XWRITE

100 WRITE

DESSEC

sINC SECTOR

16¢

1NO - SKIP

#8170,WRTSWI

1CLEAR WRITE REQUIRED SWITCH

DESSEC
16¢
#BIT1,WRTSWI
33¢

1CLEAR TO SECTOR O
1 SKIP
1 TEST IF READ THIS PASS

#40, ,DESSEC

sTEST IF ALL SECTORS USED

@INOUTS!OUTINS,OPFLAG
SFOLWRT ,OPFLAG

PC.,XREAD

;CLEAR QUALIFIERS

;SET FOLLOWING WRITE QUALIFIER

1NO

SKIP

+ELSE DO READ

CZRLNBO RLO1/02 DRIVE
«TEST

112 032726
113 032730
114 032734
115 032736
116 032742
117 032750
118 032752
119 032756
120 032762
121 032766
122 032774
123 033002
124 033004
125 033012
126 033014
127 033022
128 033030
129 033032
130 033040
131 033042
132 033044

033052
033054
033062
033064
033072
033076

033076
004737
033076
005237
022737
001313
005037
005037
005237
042737
023727
001435
023727
001431
012737
023727
001415
023727
001411
000404
052737
000407
052737
000403
052737
000137
012737

033104

104403

033104
033104

140 033106
033106

033110

141 033112
142 033120

143
144
145
146
147
148
149

150
151
152
153

3 MACRO v04.00 20-UAN 83

¢+WRITE/READ

133
134
135
136
137
138
139

TEST

033126
033130
033136
033140
033144
033150
033152
033160
033164
033170
033170
033170
033170

DATA

(PART

003120

32%:

33s:

003120
003026
003236
003760
003236

003010
000003

003236

000006

000002

003236

003026
000001

003236

000005

002000

003010

37¢:

000020

003010

39%:

000040
032516
000002

003010

40%:
36%:
608

003022

023727
001004

012737
000410
005037
004737
032206
012737
062703
000137

104401

604
JOR
608
InC
cHP

BNE
CLR
CLR
INC

ENDSUB
L10031:

8IC
cMe
B8EQ
cMe
BEQ
MOV
cHP
BEQ
cHP
8EQ
B8R
8IS
B8R
8IS
1]
8IS
JP
MOV
TRAP

ESCAPE

104410

000060
012737

TRAP

000003
003236

003026
000003

002516

003030

003236
021142
002510
000006
032414

45%;

793030

16 ?

SEQ 0112

023662
003120
000050

14:40:57 PAGE

48%:

73165¢:
ENDTST
L10030:

. WORD
MOV
cP
B8NE
MOV
B8R
CLR
JSR

731004
MOV
ADD
JMP

TRAP

PC.DATCOM

DESSEC

040, ,DESSEC

16$
DESSEC
WRTSWI

PASCNT
OMQU
S, OPFLAG
AL
PASCNT,
03

608

PASCNT,
06

6014
MBIT1,WRTSKWI
PASCNT01
,
404
PASCNT,
85
404

39¢
#FWOSKO, OPFLAG
364
#INOUTS, OPFLAG
36
SOUTINS
, OPFLAG

15¢

#2,ERRSMI

CSESUB

sCOMPARE DATA

;8UMP SECTOR

1TEST

ALL

SECTORS USED

iNO - LOOP
1CLEAP DESIPED SECTOR
sCLEAR WRITE/READ SWITCH
1BUMP PASS COUNT
sCLEAR ALL QUALIFIERS
s TEST IS PASS
s YES - SKIP

s TEST IF PASS 6
s YES

SKIP

1SET READ REQUIRED BIT

s TEST IF PASS
s YES - SKIP

1 TEST IF PASS 4
1 YES - SKIP

1SKIP

1SET FWO QUALIFIER

1GO DO NEXT PASS
1SET QUALIFIER
$SKIP

;SET MESSAGE QUALIFIER
:G0 DO NEXT PASS
sINIT ERROR SWITCH

TST
CHESCAPE
L10030-.
#3,WRTSWI

1EXIT TEST IF ERROR

134

1GO START PASS 4
1CLEAR T0 PASS O
$GO SWAP TO HEAD 1 OR END TEST
s ARBORT RETURN
sSTORE START OF TABLE

1SET FOR READ AND WRITE REQ.

PASCNT03
1+TEST IF PASS 3
,
434
i1NO - SKIP
@T33TBL+6,TBLSTR ;STORE MID POINT
PASCNT

PC, SWAPHD
413378L, TBLSTR
#6,R3
T3101

CSETST

IN TABLE

CZRLNBO RLO1702 DRIVE
+TEST

3 MACRO v04.00 20-JUAN 83

LOCK

ERROR

1
2 033172
033172
3 033172

005737

003444

S 033200

005737

014120

000137

034206

033176

6 033204
7

033206

8 033212
9 033212
033212

001003

100402

10
11
12
13
14
15
16
18
19
20
21

033254
033256
033262
033266

034054
012701
004737
034054

033270
033274
033276
033304

26 033306

27 033312

28
29
30
31
32
33
34

033314
033320
033322
033326
033330
033334
033336

35
36
37
38
39

033336
033340
033344
033350
033354
033360
033364
033370
033374
033400
033402
033404
033410
033414
033426
033432
033434

40 033442
41 033444
033444

DATA

004737

004737
034054

006777
016560
016576

2$:

005046
153716
012746
013746
012746
012746
012746
012746
012746
010600
104417
062706
012701

023522

000020
000024

012746

011117

001037

020000

AND DATA PROTECTION

1S7T

MISWIW

s TEST IF RUN MANUAL

JMP

732654

sMI

sNU

sYES

sEXIT

16::

IF FIRST PASS

SKIP

INTERVENTION

TST

BGNSUB

003037
006142
003032
006131
007366
007415
011243
000007

016576

ERROR

76.1:

csBSUB
OP2T17€ ,ERHEAD
PC,TSTINT
PC,GSTATR

;SET ERROR HMEADER
s INITIALIZE TEST
;CLEAR DRIVE

DESHD
DESSEC
NEWCYL

$sSET TO HEAD O
tSET TO SECTOR O
sCLEAR TO CYLINDER O

&6000. ,R1
PC.RDYWAIT

;INITIALIZE WAIT COUNT
sWAIT FOR READY

PC.VERPQOS

s VERIFY POSITION

QWLSTAT, T . MP
7¢
RS,DATGEN

s TEST IF WRITE LOCK
;YES - SKIP
;GENERATE DATA
sPATTERN 7
sWRITE DATA

PC ., XSEEK

$100 SEEK

SET

JSR
PC.XWRITE
604
JSR
PC,XREAD
tREAD DATA
604
JSR
PC,DATCOM
1CHECK DATA
604
PRINTF #FMTOP1, #0PROO4 , 00PR1A,0BASADD,RLBAS,
8DRVNAM, <8, RLDRV+1>

024212

004737
034054
032737

«eWRITE OCK
;TEST 6

1 TEST

JSR

024152

SEQ 0113

PASNUM

JSR
608
BIT
BNE

003056

TST

JSR

023032

023662

604
MOV
JSR
604

013560
022420

004737
034054

003016

017524

020000

«TEST

TRAP
MOV
JSR
JSR
604
CLR
CLR
CLR

003116
003120
003106

032737
001116
004537
000007
004737
034054

14:40:57 PAGE

PROTECTION

BNE

104402
012737
004737
004737
034054
005037
005037
005037

22
23
24
25

AND

LSBTTL
BGNTST

033212
033214
033222
033226
033232
033234
033240
033244

17 033250

TEST

¢eWRITE

5%:
003056

CLR
818
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
MOV
WAITMS
JSR
608
BIT
BNE
PRINTF
MOV

-(SP)
RLDRV+1,(SP)
OORVNAM, -(SP)
RLBAS, -(SP)
#BASADD, -(S5P)
OOPR1A, -(SP)
#0PROOA
, -(SP)
#FMTIOPL, -(SP)
o7,-(SP)
SP,RO
CSPNTF

020,SP
€20.,R1
050.
PC.GSTATR

sINITIALIZE MWAIT COUNT
s CALL WAIT
tGET STATUS

OMLSTAT, T.MP

sCHECK

7
ofMT2,0BELL
#BELL, -(SP)

IF WRITE LOCK SET

s YES - SKIP
tRING BELL

;RCQUEST

SET

WRT LC

K9
CZRLNBO RLO1/02 DRIVE
¢TEST

43
44

46
47
48
49

033450
033454
033460
033462
033464
033470
033472
033474
033474
033476
033502
033506
033512
033516
033522
033526
033530
033532
033536
033536
033540
033542
033546
033550
033554
033560
033564
033570

50
51
52
53 033574
033576
55 033602
033606
57 033612
58 033616
59 033622
60 033626
61 033632
62 033644
63 033650
64 033652
05 033654
66 033656
67 033662
033664
033664
033666
033670
033672
69 033674
033674
033676
70 033700
71 033704
72 033706
73 033714
74 033716
75 033722

TEST

3 MACRO v04.00 20-JAN 83

#sWRITE

LOCK

012746
012746
010600
104417
062706
005301
001350

011351
000002

005046
153716
012746
012746
012746
012746
012746
010600
104417
062706

104432
000446
004537

ERROR

MOV
MOV
MOV
TRAP
F0D
DEC
BNE

PRINTF

003037

007366
007471
006777
012160
000005

000014

023522
003040
000112
003036
002000
004472

014562
014562
014562

177600
000454
003012
000006
000004
000002
000000

005737
001013
005301
001366
004737
012603

7%:

104:

003012

016422

104456
003245

00000¢C

CLR
81sB
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
EXIY
TRAP
. WORD
JSR
1
MOV
MOV
BIS
8IC
MOV
CLR
MOV
MOV
CLR
MOV
MOV
MOV
MOV
WAITUS
TSY
BNE
OEC
BNE
JSR
MOV
ERRHRD
TRAP
. WORD

. WORD

012266

104432
000164
004737
034054
032737
001006
012703

14:40:57 PAGE

016626

040000
010444

003050

17-1

5€Q 0114

DATA PROTECTION

000006

000001
012705
012715
053715
042725
012725

005025
012725
012701
005037
014562

AND

. WORD
EXIT
TRAP
. WORD
JSR
604
BIY
BNE
MOV
ERRHRD

oFMT2, -(SP)

SP,RO
CSPNTF
06 ,5P

R1
St

1DEC COUNT
1 OKIP IF NOT

O
0{?;%3.092T17E.OBYPSNH,OOPRIA.‘8.RLDPV»1>

sRPT BYPASSED

RLORV+1,(SP)

QOPR1A, -(SP)
4BYPSNM, -(SP)

OP2T17E, -(SP)
oFMT23, -(SP)

SP,RO
CS$PNTF

014,5pP

TST
CIEXIT
L10032-.

RS,DATGEN

oL .CS,R5
OWTDATA, (RS)
RLORV, (R5)

1GENERATE DATA
sPATTERN 1

OBIT10,(R3).
Q0BUFF ,(R5)«
{R3).

+GET ADDRESS OF L REGS
sLOAD WRITE COMMAND
s INSERT DRIVE NUMBER
sCLEAR FOR DRIVE 4 - 7 SPEC'D
sLOAD BUS ADDRESS
;CYL O, HD O, SECTOR O

2300. ,R1

$SET

9177600,(RS5)+
DONE
-(R5) ,RLMP(R2)
-(R5),RLDA(R2)
-(RS),RLBA(R2)
;gRS).RLCSCRE)

OONE

144
R1

104

+128 WORDS

WAIT COUNT FOR

30 MS

;CLEAR INTERRUPT FLAG
;LOAD RL REGS

s1CHECK IF INTERRUPT
;sYES - SKIP
;:DEC WAIT COUNT

;LOOP IF NOT O

PC.WATTIN

$WAIT FOR INTERRUPT

ERR1
suB
CSEXIT
1L10033-.
PC,GSTAT

1GET

QDRVERR, T.CS
15¢

1 TEST IF ANY ERROR SET
i YES - SKIP

1702., ,ERR3

;REPORT ERROR NOT

(SP)+,R3
1701.,.ERRL
CSERMRD
1701
0

AMORERR R3S

tGET RESULT MESSAGE

STATUS

1SET RESULT MESSAGE POINTER
SE1T

CZRLNBO RLO1/02 DRIVE
«TEST

TEST 3
*sWRITE LOCK

76
77
78
-

80
81
82
83
84
85
86

87
88
89
91
92
93
94
95

033722
033724
033726
033730
033732
033740
033742
033746
033746
033750
033752
033754
033756
033764
033772
034000
034002
034010
034012
034012
034014
034016
034020
034022
034024
034030
034032
034036
034040
034044
034046
034052
034054
034062
034062
034062
034064
034072
034072
034074
034100
034104
034110
034114
034120
034124
034130
034134
034136
034140
034144

100
101 034150
102 034162

103 034166
034170
105 034176
106 034200

104456
003246
000000
012402
032737
001006
012703

MACRO
ERROR

voO4 .00 20 JAN 83 14 :40:57
AND DATA PROTECTION

TRAP

002000

003056

15¢:

010523

TRAP

104456

003250
000000
012402
042737
042737
032737
001004
032737
001405
104456
003247
000000
012570
000414
004737
034054
004537
000007
004737
034054
004737
034054
012737
104403
012737
005046
153716
012746
013746
012746
012746
012746
012746
012746
010600
104417
062706
012701
004737
034064
032737
001403
005301

. WORD
. WORD
. WORD
BIT
BNE
MOV
ERRHRD

040000
002000
157400

003050
003056
003056

036000

003050

18¢:

16$:

016576

17%:

023522

024212
023662
000002

003022

000002

003022

60%:
ENDSUB
L10033:

JSR
60%
JSR
608
MOV

TRAP
732044
: MOV
PRINTF

CLR
81s8

003037
006142
003032
006131
007366
007347
011243
000007

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

000020
001274

164

016576

020000

. WORD
. WORD
. WORD
BIC
8IC
8IT
BNE
8IT
BEQ
ERRHRD
TRAP
. WORD
. WORD
. WORD
BR
JSR
604
JSR

003056

TRAP
ADD
MOV
WAITMS
JSR
732044
BIT
BEQ
DEC

PAGE

17-2

SEQ 0115

C$ERHRD
1702
0
ERR3

QWGESTAT,
T . MP

18¢

OMWGERR ,R3

1704,.,,ERR3
CS$ERHRD
1704

0
ERR3

s TEST

WGE

SET

s YES - SKIP
$SET MESSAGF FOR WGE NOT SET

QWGESTAT,
T MP
2157400,
T .MP

+CLEAR DRIVE ERROR BIT
sCLEAR WGE BIT
s TEST .r ANY OTHER ERRORS

€36000,7.CS

s TEST

#ORVERR, T.CS
164

s YES

- GO REPORT

ANY ERRORS

IN CS PEG

17¢
1703.,,ERR6
CS$ERMHRD
1703
0
ERR6
604

tNO - SKIP
+REPORT ERRORS

RS ,DATGEN
PC.XREAD

:GO GENERATE DATA
+PATTERN 7
;READ DATA

PC.DATCOM

s COMPARE

02,ERRSWI

s INIT ERROR SWITCH

PC.GSTATR

C$ESUB

02 ,ERRSUI]

sEXIT TEST
;+GET STATUS AND RESET ERROR

DATA

s INIT ERROR SWITCH

0€gggPl.OOPR12.00Pfllfl.OBASADD.RLBAS.OORVNAH,(B.RLDRV‘1>
RLORV+1,(SP)
QORVNAM, -(SP)
RLBAS, -(5P)
#BASADD, -(SP)
Q0PR1A, -(SP)
#0PR12, -(SP)

oFMTOPL, -(SP)
47,-(SP)

SP,RO
CSPNTF

€20,SP

#700. ,R1
o1

s INITIALIZE WAIT COUNT

PC.GSTATR

1GET STATUS

OWLSTAT,
T .MP
732654
R1

;CHECK IF WRITE LOCK RESET

1DEC WAIT COUNT

;REQ RESET WRT LCK

M9
CZRLNBO RLO1/02 DRIVE
¢ TEST

107 034202

108 034204

109 034206
110 034206
034206
034206
111

TEST

ssWRITE

3 MACROC

LOCK

ERROR

V04,00 20 JAN 83
AND

DATA

001362

000727

104401

14:40:57 PAGE

PROTECTION

132658
:
ENDTSTY
L10032:

BNE

164

TRAP

CS$ETST

B8R

13204

sLOOP

NOT

sELSE REPEAT MESSAGE

SEQ 01146

CZRLNBO RLO1/02 DRIVE
+TEST

TEST

saADJACENT

3 MACRO v04.00 20 JAN 83

CYLINDER

INTERFERENCE

2 034210
034210
3 034210

.SBTTL

BGNTST
012737

007031

016560
016576

034216

004737

S
6
7
8
9

034222
034226
034232
034234
034240

004737
004737
035422
005037
012705

10
11
12
13
14

034244
034250
034252
034260
034262

005737
001007
032737
001003
012705

16
17
18
19

034270
034274
034300
034306

012705
012701
012737
013721

21
22
23
24
25
26
27
gg

034316
034320
034324
034326
034334
034342
034350
034356

001373
004537
000011
013737
013737
013737
013737
062705

30
31
32
33
34

034362
034370
034372
034376
034400

36
37
38
39
40
:5

15 034266

20 034312

000402

005337

021226

003016

014120

177730

177770
002510
000010
014122

002304

002512
002514
002520
002526

032737
001034
005737
001403
062705

000001

014120

034406
034412
033420
034422
034426
034430

062705
022737
001404
020537
103013
000403

000044
000001

43 034432
2; 034436

020527
103007

000122

46
47
48
49
50
51
52
53
54
S5

016537
043737
001013
000137
005705
001002
062705
023705
001767
010537

002610
002310

35 034404

034440
034446

034454
034456
034462
034464
034466
034472
034476
034500

56 034504

000402

023737

1$:
9$:
2%:

023522
014124
014124
014124
014124
000002

T3300¢:

003444
000006

002302

3s:
6%:

000244

444 ;
002304
002304

033170

002304

69%:

4%:
S$:

000002
002306

7¢:

014122

TEST

MOV

003236
177776
003444

000001

14:40:57 PAGE

8$:

P
18

SEQ 0117

«sADJACENT

s TEST

OP2T18E ,ERHEAD

CYLINDFR

INTERFERENCE

;SET ERROR HEADER

JSR

PC,CKBSVD

:GO

JSR
JSR
733654
CLR
MOV

PC,TSTINT
PC,GSTATR

sINITIALIZE TESY
sCLEAR DRIVF

ST
BNE
BIT
BNE
MOV

PASCNT
4-2,RS
PASNUM
1
QALLCYL ,MISWIW
14
#-40. ,R5

;:CLEAR PASS 1D O
;SET RS
;TEST IF FIRST PASS (QUICK VERIFY)
:NO - SKIP
;TEST IF USE ALL CYLINDERS
sYES - SKIP
sELSE SET RS TO NEG 20

MOV
MOV
MOV
MOV

€-10,RS
©T3318L,R1
010,JJJ
LOLIMW,(R1).

tELSE SET FOR NEG 4
;GET ADDRESS OF WORK TABLE
$1SET CLEAR COUNT
s1CLEAR LOCATIONS TO LOLIMIT

B8R

DOEC

CHECK

BAD

17::
SECTOR

FILES

VALID

;s SKIP

JJJ

tDEC COUNT

BIT
BNE
1ST
BEQ
ADD

QALLCYL ,MISWIW
S¢
PASNUM
3
#6,R5

;TEST IF USE ALL CYLINDERS
;YES - SKIP
s TEST IF FIRST PASS (QUICK VERIFY)
;NO - SKIP
;ELSE BUMP CYLINDER POINTER BY 3

ADD
cMP
BEQ
cMP
BHIS
BR

#36. ,RS
41, T.DRIVE
444
RS,164.
44
69¢

;BUMP TO NEXT ENTRY

CMP
BHIS

RS, #82.
44

JSR
9,
MOV
MOV
MOV
MOV
ADD

BNE
RS,DATGEN

24
;LOOP UNTIL ©
:GO GENERATE DATA
;PATTERN 9
HILIMW, T33TBL+2 ;INSERT HILIMIT
HILIMW,T33TBL+4 ;INTO APPROPRIATE LOCATIONS
HILIMW,T33TBL+10
HILIMW,T33TBL
16
#2,RS

MOV

CYLTBL(RS),Jud

8IC

CLRBYT, JJJ

8NE
JMP
TST
BNE
ADD
cMP
BEQ
MOV

CcMP

8%
T3165¢
RS
7%
#2,RS
HLMTW,RS
43
RS, JJJ

JJJ,LOLTIMU

s SKIP

:TEST IF RS ©
iNO - SKIP
s TEST IF ALL CYLINDERS USED
s YES - EXIT TEST
;USE RS AS NEXT CYLINDER

;CHECK IF LOWER THAN LOLIMIT

B1oO
b}

CeRULNBO RL1702 DRIVE
oTEST

TEST

¢oADJACENT

034512

108721

034514

023737

59 034522
60 034524

101315
012703

61
62
63
64
€S
6

034530
034534
034542
034550
034556
034564

013713
013763
013763
013763
013763
162737

68
69
70
71

034600
034606
034614
034622

013763
062737
013763
013763

034640

67 034572

72 034630
73 034634

013763

010337
004737

3 MACRO vO4.00 20 UAN 8%

CYLINDER

002304

002550
002304
002304
002304
002304
002304
000001
002304
002304
000002
002304
002304
003030
021116

INTERFERENCE

034640
76 034642

104402
042737

003760

003010

003236

000004

80
81
82
83
84
85
86

034664
034666
034670
034676
034704
034706
034712

001404
002407
012737
052737
000405
005037
052737

88
89
90
91
92
93

034726
034732
034736
034742
034746
034752

012701
012703
005037
012137
004737
035330

002510
002550
003120
003106
017524

95
9%
97
98
99
100
101

034760
034764
034766
034772
034776
035000
035004

004737
035330
012337
004737
035330
012701
004737

022420

94 034754

102 035010
103 035012

104 035016
105 035020
106 035024

107 035026

108 035034

109 035036
110 035042
111 035044

JJJ,HILIMM

733008

1YES

sCHECK

ur (P
IF

BMI
MOV

733008
#TBT,R3

JTES

owIP

WIGMER

THAN MI| [*]°

MoV
JSR

JJJ,(R3)
JJJ,6(RS)
JJJ.10(RS)
JJJ.12(R3)
JJJ.16(R3)
01,JuJ
JJJ,2(R3)
JJJ,12(R3)
02,00y
JJJ,4(RS)
JJJ,14(R3)
RS, TBLSTR
PC,CHOSHD

TRAP
BIC

C4BSUB
OMQUALS,OPFLAG

;CLEAR ALL MESSAGE

BEQ
BLT
MOV
BIS
BR
CLR
BIS

104
118
84,PASCNT
OINOUTS,OPFLAG
124
PASCNT
®OUTINS,OPFLAG

iYES " SKIP
1CHECK IF LESS THAN 4,
{ELSE SET T0 4
;SET MESSAGE QUAL
1 SKIP
1SET PASS COUNT 10 0
;SET MESSAGE QUAL

MOV
MOV
CLR
MOV
JSR
604

@T33TBL.R1
eTBT,R3
DESSEC
(R1)¢,NEWCYL
PC,XSEEX

1CLEAR TQ SECTOR 0
(GET NEXT TABLE ENTRY
100 SEEK

JSR
604
MOV
JSR
604
MOV
JSR

PC,ROYWAIT

03000, ,R1

1SET WAIT COUNT FOR 300 MS

(R3)e NEWCYL
PC,XSEEX

;GET NEXT
100 SEEK

#3000..R1
PC,ROYWAIT

¢SET WAIT COUNT FOR
IMAIT FOR READY

PC,VERPOS

sVERIFY POSITION

PC,BSCH

PC,XWRITE

1CHECK FOR BAD SECTOR
1“YES" RETURN
;TEST IF WRITE THIS PASS
sNO - SKIP
100 WRITE

DESSEC

s INC SECTOR

MOV

MOV
ADD
MOV
MOV

1GO CHOSE HEAD

BGNSUB

005737
001414
023727

034720

)

133014:

77 034650
78 034654
79 034656

MOV
MOV
MOV
MOV
MOV
SUB

000006
000010
000012
000016
002304
000002
000012
002304
000004
000014

75 034640

034640

BLO

014124

14:40:5” PAGE

012737

012701

035330
004737
035330
004737
035134

003236

000004
000020

003236
0030:C

003236
000040

003010

000003

10s:
113:
128:

15¢:

005670

005670
022420

608
JSR

023032
(24710

000001

004737
035330
005237

024152
003129

MOV

HOY

003106
017524

032737

001425

003026

TST
BEQ
CMP

168:

003026

604
JSR
324

8I7

BEQ

JSR
608
INC

PASCNT
113
PASCNT,
04

03 WRTSWI

0BITO,WRTSWI

294

17.1:
1 TEST IF PASS 0
1YES - SKIP
sTEST IF PASS 4

1SET

IWAIT

READ

AND

QUAL
IF IERS

WRITE

SWITCH

FOR READY

TABLE ENTRY

300 MS

YES CLEAR

T0 O

CZRLNBO RLOL1/02 DRIVE

TEST

¢oADJACENT

035050
035056
035060
035066
035074
035102
035106
035110
035116
035120
035124
03512%
035132
035134
235140
035146
035150
035154
035160
035164
035172
035200
035202
035210
035212
035220
035222
035230

022737
001 360
042737
042737
052737
005037
00074
03273/
001414
04737
035330
004737
035330
005237
022737
001324
005037
005037
005237
042737
023727
001453
023727
001447
023727
001430
023727
001430

035240
035246
035250
035256
035260
035756
035272
035300
035302
035310
035312
035327
035326
035330
035336
035336
035334
035340
035340
035342
035344
035352
035360
€35362
035370
035372
035576
035402

023727
001411
023727
001405
052737
000137
052737
000772
052737
000403
052737
012737
000757

035232

155
156

157
158
159
iel

162
163
164

012737

8 MACRO \0a.0C 20 JAN 83

CYLINOER

INTERFERENCE

000050

00312¢C

000060
000001
000100
003120

003010
003026
703010

000002

003026

294
:
31:

02360

003120
003026
003236
003 /60
003236

003120

32¢:

33¢:
003010

003236

000010

003236

000003

003236

000007

000001
003236

003026

003236

000002

00004C

003010

000020

003010

378

000200

003010

39¢:

000400
000002

003010
003026

408
41,

000002

003022

608
ENDSUB
L10035:

034736

BIT
BEQ
JSR
60¢

000001

104403
104410
000060
012737
023727
001004
vl2737
000410
005037
004737
034356

BNE
81C
8IC
8IS
LR
BR

024212

003120
000050

14:40:57 PAGE

36¢:

JSR
60%
INC

cre
8NE
CLR
CLR
INC
8IC
cre
BEQ
P
BEQ
ce
8tEQ
cre
BEQ
MOV
ce
BEQ
cre
8EQ
81S
JP
a1s
B8R
81S
BR
8IS
MoV
BR
MOV
TRAP

ESCAPE
TRAP

000003
003236

003026

002520

003030

003236

021142

MOV
cHP
BNE
454

MOV
B8R

CLR
JSR

133008

ClO
18 /2

040 . ,DESSEC

s TEST If
ALl
SECTORS JSED
168
SKIP
1NO
#INQUTS!OQUTINS,OPFLAG ;CLEAR QUAL
IF TERS

68170, WRTSWI

sCLEAR WRITE REQUIRED SWITCH

OESSEC

;:CLEAR 10 SECYOR O

EFOLWR
,OPF LAG
T

16¢

sSET FOLLOWING WRITE

1 O IP

eBIT]1 ,WRTSWI
33¢

PC,XREAD

s TEST
iNO tELSE

PC,DATCCM

1 COMPARE DATA

DESSEC

#40. ,DESSEC

164
DESSEC

WRTSWI
PASCNT
OMQUA
S , OPFLAG
L
PASCNT,
04
604
PASC,NT
08,
604

IF READ
SKIP
DO READ

THIS PASS

1BUMP SECTOR

sTEST

sNO

AL
L SECTORS USED

- LOOP

s1CLEAR DESIRED SECTOR
sCLEAR WRITE/READ SWITCH
1BUMP PASS COUNT
1CLEAR ALL QUALIFIERS
s TEST IS PASS 4
sYES -

1 TEST

sYES

SKIP

IF PASS 8,

- SKIP

PASCNT,
@3

1 TEST

PASCNT
, 07
401

s TEST IfF PASS
sYES - SKIP

PASCNT
, 0}

tTEST IF PASS
1 YES - SKIP

394

08170, WRTSWI
37¢

PASCNT
, #2

QUALIFIER

PASS 3

1YES - SKIP

$1SET WRITE REQUIRED

:ggTINS.OPFLRG

sTEST IF PASS 2
i1 YES - SxIp
1SET MESSAGE QUALIFIER

OINO
, UTS
OPFLAG

1SET MESSAGE QUAL IFIER

37¢

36¢

GO DO NEXT PASS

:?EVSKS.O’FLAG

$SET MESSAGE QUALIFIER

FUDSK
, OPFLAG
S
;g{YI.HRTSHI

+SET MESSAGE QUALIFIER
1SET READ REQUIRED

92 ,ERRSWI

s INIT ERROR SWITCH

CSESUB
1ST

CHESCAPE

1EXIT TEST IF ERROR

L10034
-,

#3,WRTSWI
1SET FOR READ AND WRITE REQ.
PASCNT
, 04
1 TEST IF PASS 4
454
iINO - SKIP
OT33TBL+10,TBLSTR ;STORE MID POINT IN TABLE
484
PASCNT

PC . SWAPHD

1GO START PASS 4

sCLEAR TO PASS O
1GO SWAP TQ MEAD

1ABORT

RETURN

OR END

TES!

CZRLNBO RLO1/02 DRIVE
oTEST

TEST

¢eADJACENT

3 MACRO
CYLINDER

165 035404

012727

002510

167 035412
168 035416
169 035422
035422
035422
035422

062703
000137

000010
034640

104401

vO4.00 20-JUAN 87

14:40:57 PAGE

D10
18-8

3EQ 0120

INTERFERENCE

003030
a8s

733654
:

ENDTST
LI0034-

MOV

OT33TBL,TBLSTR

ADD

#10,R3

TRAP

CsETST

JMP

733018

15T0RE

LINRT

TABLE

CZRULNBO RLO1/02 DRIVE

TESYT

e eOVERWRITE

o TEST

035424
035424
035424
035432
035436
035442
035446
035450
035454
035460
035464
035466
035474
035476
035502
035504
035510
035514
035522
035526
035532
035534
035542
035550
035556
035562
035570
035572
035576
03560C
035604
035606
035612
035620
035622
035626
035630
035632
035636
035640
035646
035654
035656
035662
035664
035666
035672
035676
035700
035704
035712
035714
035722
035724
035730
035734

8 MACRO vO4 .00 20 UAN 8%

.SBTTL
BGNTST
012737
004737
004737
004737
036614
005037
012705
005737
001007
032737
001003
012705
000402
012705
012701
012737
013721
005337
001373
013737
013737
013737
062705
032737
001034
005737
€21003
062705
000402
062705
022737
001404
020527
103013
000403
020527
103007
016537
043737
001013
000137
005705
001002
062705
022705
001767
010537
023737
103721
023737

101315

012703
013713
013763

007053
021226
016560
016576

00301¢€

014120

177770

Cl4124
014124
014124
000002
000001

1s:

002304

002512
002516
002522
014120

2s:

000046

000006
000001

002302

3s:

64:

000244
000122

002610
002310

4a4as;

002304
002304

036614

44:

5¢:

000002
002306

74:

002304
002304

014122

002304

014124

002550
002304
002304

6694
:

000002

8s:

¢sOVERWRITE

s TEST

OP2T19E ,ERHEAD
PC,CKBSVD
PC,TSTINT

CLR
MOV

PASCNT
e-2,RS
PASNUM

BNE
BIT
BNE
MOV
R
MOV
MOV
MOV
MOV
DEC
BNE
MOV
MOV
MOV

134004
: ADD

003444

tELO

MOV
JSR
JSR
JSR

1ST

177730
002510
000010
014122
002304

oTEST

73465

003236
177776
003444
000001

14:40:57 PAGE

BIT
BNE
TST
BNE
ADD
8R
ADO
cre
8€Q
cHp
BNHIS
B8R
cHP
BMHIS
MOV
8IC
BNE
JHP
157
BNE
ADD

cHp
BEQ
MOV
cHp
8LO
CHP

B8HI
MOV
MOV
MOV

PC,GSTATR

1
QALLCYL MISWIW
1¢

€-40. ,RS
9
®-10,RS
OT33TBL . R1
€10, JJJ

LOLIMW,(R1).
JJJ
e
HILIMW, T33TBL«2

18::

;SET ERROR MEADER
1G0 CHECK IF BAD SECTOR FILES
s INITIALIZE TEST

VALID

sCLEAR DRIVF

tCLEAR PASS TO O
$1SET RS
s TEST IF FIRSY PASS

(QUICK

tNO - SKIP
TEST IF USE ALL CYLINDERS
sYES - SKIP

VERIFY)

1ELSE SET RS TO NEG 20
1SKIP
$SET FOR NEXT ENTRY
1GET ADDRESS OF WORK TABLE
1SET CLEAR COUNT

tCLEAR LOCATIONS TO LOLIMIT
sDEC COUNT
sLOOP UNTIL O
; INSERT WILIMIT

HILIMW,T33TBL«6 ;INTO APPROPRIATE LOCATIONS
HI.IMM,T33TBL.12
€2.RS
OALLCYL MISWIW
TEST IF USE ALL CYLINDERS
St
sYES - SKIP

PASNUM
3

#38. RS
63
6 RS
#1,7.DRIVE
4448
RS, 164,

1TEST IF FIRST PASS (QUICK VERIFY)
iNO - SKIP

$1ELSE BUMP CYLINDER POINTER BY
1 SKIP
;BUMP CYLINDER POINTER BY 3

6694
RS, 082,
LX)

CYLTBL(RS),JJuJ
g%ROYY.JJJ

T3465¢
RS
7
#2.R5

sEXIT TEST
1TEST IF RS O

44
RS, JJJ

tYES - EXIT TEST
1USE RS AS NEXT CYLINDER

iNO

SKIP

MLMTW, RS

s TEST IF ALL CYLINDERS USED

JJJLOLIMW

sTEST IF PAST LO LIMITY

134004

JJJ,HILIMUW
134008

&T87,R3

JJJ,(R3)
JJJ,2(R3)

1YES

- SKIP

1 YES

s TEST IF PAST MILIMIT
SKIP

CZRUNBO RLO1/02 DRIVE
+TEST

57
58
59
60
61
62
63
64

65
66
67
68
69
70
71
72
73
74
75
76

035742
035750
035756
035764
035772
035776
036002
036002
036002
036002
036004
036012
036015
036020
036026
036030
036032
036040
036046
036050
036054
036062

77 036070
78 036074
79 036100

80
81
82
83
84
85
86
87

036104
036110
036114
036116
036122
036126
036130
036134

90
91
92
93

036146
036152
036154
036160

88 036140
89 036142

036162

95 036166
96 036170

97
98
99
100

101
102
103
104
105
106
107
108
109
110
111

TEST

+¢0OVERWRITE

036174
036176
036204
036206

036212
036214
036222
036226
036230
036236
036240
036244
036246
036252
036260

013763
013763
013763
013763
010337
004737

3 MACRO vO4 .00 20 UAN 83

002304
002304
002304
002304
003030
021116

000004
000006
000010
000012

MOV
MOV
MOV
MOV
MOV

73401%:

10
14:40:57 PAGE

JJJ,4(R3)
JJJ,6(R3)
JJJ, 10(R3)
JJJ,12(R3)
R3,TBLSTR

JSR

PC,CHOSHD

TRAP

c48suB

2tQ 0122

+GO CHOSE HEAD

BGNSUB
104402
042737
005737
001414
023727
001404
002407
012737
052737
000405
005037
052737
012737
012701
012703
005037
012137
004737
036522
012701
004737
036522
012337
004737
036522
012701
004737
036522
004737
036522
004737
036336
005737
001407
022737
001403
005037
000403
012737
004537
000000
032737
001425
004737
036522
005237
022737
001340

003760
003236

003010

003236

000003

000003
000020
003236
000040
000003
002510
002550
003120
003106
017524

003236
003010
003010
003026

eIcC
187
8EQ
cHpe
8EQ
BLT
MOV

10s¢:

11%:
12%:

15%:

005670

022420

003106
017524
005670

023032
024710

16¢:

003236
003236

036226
000010
023522

036226

000001

003026

024152
003120
000050

MOV

CLR

MOV
JSR
60¢

003120

17¢:
18¢:
254

114

03 ,PASCNT
OINOUTS, OPFLAG
123
PASCNT

QQUTINS,OPFLAG

93,WRTSWI

#7337BL,R1
e787,R3

DESSEC
(R1)e+ ,NEWCYL

PC . XSEEK

1CLEAR ALL MESSAGE QUALIFIERS

s TEST

IF PASS O

s YES - SKIP
s TEST IF PASS 3
$YES

SKIP

sCHECK IF LESS THAN 3,
1ELSE SET TO0 3
$SET MESSAGE QUAL

3SET PASS COUNT TO O
1SET MESSAGE QUAL

$SET READ AND WRITE SWITCH

sGET NEXT TABLE ENTRY
1D0 SEEK

43000,
R}
PC,RDYMALT

$SET WAIT COUNT FOR 300 MS

PC . XSEEK

(R3)+ NEWCYL

iGET NEXT TABLE ENTRY
D0 SEEX

#3000. ,R1
PC.RDYWAIT

1WALIT FOR READY

JSR

PC.VERPOS

$VERIFY POSITION

JSR
32
157
BEQ
cHP
8EQ
CLR
BR
MOV
JSR

PC,BSCHK

604

1:24
BEQ
JSR
604
INC
CMP
BNE

PASCNT

178
#3,PASCNT
17¢

258
184

sWAIT FOR READY

1SET WAXT COUNT FOR 300 MS

sCHECK FOR BAD SECTOR

1t "YES” RETURN

1 TEST IF PASS O

1YES - SKIP

s TEST IF PASS 3

sYES - SKIP
1ELSE CLEAR DATA PATTERN SELECTOR

$1SET DATA PATTERN SELECTOR TO 8

28.,254
RS ,DATGEN
Y

1GO GENERATE DATA

294
PC.XWRITE

1INO - SKIP
100 WRITE

DESSEC

s INC SECTOR
tTEST IF ALL SECTORS USED

0B8ITO,WRTSWI

040. ,DESSEC

16¢

YES CLEAR TO O

s SKIP

MOV
JSR
608
MOV
JSR
608
MOV
JSR
6038

022420

000003

81s
B8R
CLR
8IS

OMQUAL
, OPFLAG
S
PASCNT
118
PASCNT,
03
10¢

78.1:

1 TEST IF WRITE THIS PASS

tNO

SKIP

CZRLNBO RLO1/02 DRIVE
«TEST

TEST 3
seOVERWRITE

112
113
114
115
116

117

036262
036270
036276
036304
036310
036312
036320
036322
036326
036330
036334
036336
036342
036350
036352
036356

118
119
120
121
122
123
124
125
126
127
128 036362
129 036366
130 036374
131 036402
132 036404
133 036412
134 036414
135 036422
136 036424
137 036432
138 036434
139 036442
140 036450
141 036452
142 036460
143 036464
144 036472
145 036474
146 036502
147 036504
148 036512
149 036520
150 036522
151 036530
036530
036530
152 036532
036532
036534
153 036536
154 036544
155 036552
156 036554
157 036562
158 036564
159 036570
036574
161 036576
162 036604
163 036610
164 036614

042737
042737
052737
005037
000724
032737
001414
004737
036522
004737
036522
005237
022737
001304
005037
005037

005237
042737
023727
001447
023727
001443
023727
001424
023727
001424
012737
023727
001405
052737
000137

052737
000772
052737
000403
052737
012737
000757
012737

MACRO

vo4 .00 20-UAN

000060
00000F
000100
003120

003010
003026
003010

000002

003026

024212

31%:

023662
003120
000050

003120

023727
001004
012737
000410
005037
004737
035556
012737
062703
000137

32¢:

33%:

003120
003026

003236
003760
003236

003010
000003

003236

000006

003236

000001

003236

000004

000002
003236

003026
000002

001000
036100
002000

003010
003010

000020

14:40:57 PAGE

(10O
19-/2

OINOUTS!OUTINS,OPFLAG ;CLEAR QUALIF IERS
08ITO,WRTSWI
1CLEAR WRITE REQUIRED SWITCH
OFOLWRT ,OPFLAG
SET FOI LOWING WRITE QUALIFIER
DESSEC
tCLEAR TO SECTOR O

8IT
BEQ
JgR
603

oBIT1,WRTSWI
334
PC,XREAD

B8R

16¢

1 SKIP

gg?

PC,DATCOM

; COMPARE

INC

DESSEC

18UMP SECTOR

CLR

DESSEC

$CLEAR CESIRED SECTOR

cHe
BNE

CLR
INC

B8IC

940, ,DESSEC
164

WRTSWI
PASCNT

MMQUALS,OPFLAG

$YES

PASCNT , #4
403

s TEST IF PASS 4
sYES - SKIP

ce
8EQ

MOV

PASCNT, 01
39

e81IT1,WRTSWI

37%:

8IS

OFWOSKO,OPFLAG

003010

39s:

BIS

®INOUTS,OPFLAG

000040
000001

003010
003026

408 :

81s

000002

003022

60¢:
ENDSUB
L10037:

003030

003236
021142

002510
000006
036002

BEQG

45%:

003030

488 :
T3465%:

;CLEAR ALL QUALIFIERS

604

PASCNT, 06

OREVSKO,OPFLAG

002516

1CLEAR WRITE/READ SWITCH
18UMP PASS COUNT

BEQ

BIS

003026
000003

s TEST IF ALL SECTORS USED
stNO - LOOP

s TEST IS PASS 3
1YES - SKIP

PASCNT, #2

000003
003236

DATA

PASCNT, 03
60¢

cHe
BEQ

414:

1 TEST IF READ TH1S PASS
tNO - SKIP
+ELSE DO READ

cHp
8EQ

cHpP

36%:

5EQ 012%

8IC
8IC
BIS
CLR

cHp

104403
104410
000060
012737

29¢:

JHP

37¢

154

364

B8R

MOV
BR

SBITO, WRTSKI
364

MOV

TRAP
ESCAPE
TRAP
.WORD
MOV
cHP
BNE
MOV

B8R

SOUTINS,OPFLAG

#2 ,ERRSKI

csESLB
TST
CS$ESCAPE

s TEST IF PASS 6
-

SKIP

s TEST IF PASS
$YES - SKIP

1SET WRITE REQUIRED BIT
s TESY IF PASS 2

sYES - SKIP

;SET REVERSE QUALIFIER

1GO0 D0 NEXT PASS

;SET FWD QUALIFIER

16O DO NEXT PASS

3;SET QUALIFIER

1 SKIP

;SEY MESSAGE QUALIFIER

1SET WRITE REQUIRED BIT
1GO DO NEXT PASS
s INIT ERROR SWITCH

tEXIT TEST

IF ERROR

L10036-.
43 ,WRTSWI
PASCNT , #3

1SET FOR READ AND WRITE REQ.
s TEST IF PASS 3
454
tNO - SKIP
4T33768L+6,TBLSTR ;STORE MID POINT IN TABLE

CLR

PASCNT

484

$GO START PASS 4

JSR
734004
MOV
ADD
JMP

PC, SWAPHD

$GO SWAP TO HEAD ONE OR ABORT TEST
s ABORT RETURN
;STORE START OF TABLE

#T337TBL,TBLSTR
06,R3
734014

+CLEAR

TO PASS O

CZRLNBO RLO1/02 DRIVE
¢TEST

165 036614
036614
036614
166 036616

TEST

ssOVERWRITE

104401

3 MACRO v04.00 20-JUAN 83

ENDTST
L10036:

ENDMOD

TRAP

14:40:57 PAGE

CS$ETST

H10
19-3

5E£Q 0124

CZRLNBO RLO1/02 DRIVE

W+

PARAMETER

TEST

3 MACRO v04.00 20 JAN 83

14:40:57 PAGE

110

5€Q 0125

CODING

036616
036616
036616
036620
036620
036622
036624
036626
036626
036630
036632
036634
036636
036636
036640
036642
036644
036646
036646
036650
036652
036654
036656
036660
036660
036662
036664
036666
036666
036670
036672
036674
036676

10
11 036700

036700
12
13 036700
036703
036706
036711
14 036714
036717
036722
15 036723
036726
036731
16 036734
036737
036742

036745
036750
036753
17 036756
036761

.SBTTL
8GNMOD
BGNHRD

000030

GPRTMML

005130
036764
000001

GPRMA

000031
036700
160000

177776

GPRMA

001031
036714

000776

GPRMD

004032
036756
003400
000007

GPRML

003130
036734
000001

GPRMD

002032
036723
000340
000000
000007

PARAME TER
HROPRM

CODING

.WORD L10040-L$HARD/2
CNTYPE,CNT,1,YES
.WMORD
T$CODE
.WORD
CNTYPE
LWORD
1

YES
CSRMSG,CSR,0,160000,177776,
.WORD
TS$CODE
.WORD
CSRMSG
TS$LOLIM
LMORD
THMILIM
LMORD
VECMSG,VECT,0,0,776,YES
. WORD
T$CODE
.WORD
VECMSG
. WORD
TSLOLIM
.WORD
TSHILIM
YES
DRMSG,DRS8,0,3400,0,7,
.WORD
T$CODE
.WORD
ORMSG
.WORD
3400
TSLOLIM
.WORD
TOWILIM
.WMORD

DRTYPE,TYPOR,
1, YES

.WORD
T$CODE
.WORD
DRTYPE
JMORD
1
BRMSG,PRIOR.0,340,0,7,YES

.WMORD
.MORD
.WORD
L.WMORD
LMORD

T$COOE
BRMSG
340
TSLOLIM

THHILIM

ENOHRD
L10040:

102
040
104

123
126
124

102
114
105
104
126
124
105
040
060
104
126

125
101
122
123
105
117

123
104
105

CSRMSG:

.ASCIZ

/BUS ADDRESS/

103
122

VECMSG:

.ASCIZ

/VECTOR/

122

040
126

BRMSG:

.ASCIZ

/BR LEVEL/

111
040
120
075
114
000
111
000

DRTYPE;

.ASCIZ

/DRIVE TYPE

DRMSG:

.ASCIZ

/ORIVE/

105
114
122
105
131

040

122
061
122
105

= RLOl/

CZRLNBO RLO1/02 DRIVE

PARAMETER

037000
037002
037002
037004
037006
33 037010
037010
037012
037014

40
41

43
44

3 MACRO v04.00 20-JAN 83

J10O

14:40:57 PAGE 20

CODING

18 036764
036767
19 036771
20
21
22 036772
23 036772
036772
24
26 036774
036774
036776

TEST

037016
037016
037020
037022
037024
037024
037026
037026
037030
037032
037034
037036
037040
037040
037042
037044
037046
037046
037050
037050
037052
037054
037056
037060
037062
037062
037064
037066
037070
037070
037072
037072
037074
037076
037100

122
061

114
000

061

CNTYPE

.ASCIZ

/RL11/

ENDMOD

.EVEN

000056

000130
037130
000001
000130
037144
000002
000130
037161
100000
000130
037215
040000

BGNMOD
T
3GNSF

SFTPRM

GPRML

CYL@,MISWI,1,YES

GPRML

MANG,MISMWI, 100000, YES

GPRML

LOLIMQ,MISWI,40000,
YES
.WORD
T$CODE
.WORD
LOLIMG
.WMORD
40000
XFERF
1%
WORD
T¢CODE
GPRMO
LIMVAL,LOLIM,D,255.,0,253.,YES
.WORD
T$CODE
.WORD
LIMVAL

001052
037234
000377
000000
000375

1¢:

002052
037234
000377
000000
000377

006044
003052
037305
000017
000000

.WORD
.WORD
.WORD

.WORD
.WORD
.WORD
GPRML
WORD
.WORD
.WORD
XFERF

006044

000130
037263
010000

.WORD
T$CODE
.WORD
CvLQ
.MORD
1
SECQ,MISWI,2,YES
.WORD
T$CODE
.WORD
SECQ
WORD
2

GPRML

006044

000130
037242
020000

.WORD L10041-L$SOFT/2

2%:

.WORD
GPRMD
.WORD
.WORD
LWORD
.WORD
.WORD
GPRML
WORD
.WORD
.WORD
XFERF
.WORD

GPRMD
.WORD
.WORD
.WORD
.WORD

T$COOE
MANQ
100000

255,
TSLOLIM
TEMILIM
HILIMQ,MISWI,20060,YES
T$COOE
HILIMG
20000
2%

T4CODE
LIMVAL ,HILIM,D,255.,0,255.,YES
T$COOE
LIMVAL
255.
TSLOLIM
TSHILIM
HEADQ.MISWI, 10000, YES
T$COOE
HEADQ
10000
3%
T$CODE

HEADV,HEAD,D,17,0,1,YES
T$CODE
HEADV
17
T$LOLIM

SEQ 0126

CZRLNBO RLO1/02 DRIVE

PARAME TER

TEST

3 MACRO vO4.00 20 JUAN 83

K10

14:40:57 PAGE

20-2

S€Q 0127

CODING

037102
037104
037104
037106
037110
037112
037114
a8 037116
037116
037120
037122
037124
037126
50 037130
46

000001

004052
037330
000377
000000
000377
005052
037352
000377
000001
000377

ENDSFT

037130

S1
53 037130
037133
037136
037141
037144
037147
037152
037155
037160
60 037161
037164
037167

037172

037175
037200
037203
037206
037211
037214
62 037215
037220
037223
037226
037231
63 037234
037237
037242

037245
037250
037253
037256

037261
65 037263
037266
037271

037274
037277
037302
66 037305
037310

1L10041:

125

040

114
131
125
040
114
105
104
115
125
040
124
126
124
116
105
114
040
105
114
111
126

125
125
105
123
113
111
124

125

040
114

117
040
122

127
124

. WORD
GPRMD

.WORD
.WORD
.WORD
.WORD
.WORD
GPRMD
.WORD
.WORD
. WORD
.WORD
.WORD

TOHILIM
ERLIMQ,ERLIM,D,377,0,377,7FS
T4CODE
ERL IMQ
377
TeLOLIM
TIHILIM

OCLIMQ,0CLIM,D,.377,1,377,YES
T4CODE

OCLIMG
377

TSLOLIM
TSHILIM

.EVEN

123
101

105
114

CvL@:

.ASCIZ

/USE ALL CyL/

114
123
101
040
103

105
114
123
124

SECQ:

.ASCIZ

/USE

117
101
101
111
105
105

040
116
114

MANQ :

.ASC12Z

/D0 MANUAL

117
123
113

127
105

LOLIMQ:

.ASCIZ

/LOW SEEK LIMIT/

114

LIMVAL:

.ASCIZ

/VALUE
/

120
040
105
114
111

HILIMQ:

.ASCIZ

/UPPER

105
116
040
105
125
000
101
123

HEADQ:

.ASCIZ

/USE

HEADV:

.ASCIZ

/WHAT

111
040
123

ill

124
101
105
120
122
105

040

115
123
117
131
116
123
106
110

040

103
ALL

SECT/

INTERVENTION

116
122
116
117
124
124

040

115

SEEK LIMIT/

ONLY

SURF

ONE

SURF/

(O OR

1)/

TEST/

CZRLNBO RLO1/02 DRIVE

PARAME TR

CODING

037313
037316
037321
037324
037327
68 037330
037333
037336
037341
037344
037347
70 037352
037355
037360
037363
037366
037371

72
73 037374
74
75 037374

76
77

037374
037376
037400

125
040
040
040
000
111

125
105
117
114
111
104
101
115
105

040

124

TEST

3 MACRO v04 .00 20 JUAN 83

122

050

117

o061

116

124
122
122
111

124
101
040
120
122
114
000

120
040
122
040

ERLIMQ:

.ASCIZ

/INPUT ERROR LIMIT/

OCLIMQG:

.ASCIZ

/DATA CMP ERR LMT/

115

000

124
103

040
122

115

LASTAD

000001

14:40:57 PAGE 20-3

106
060
122
051

ENDMOD

000000
000000

L10O

LSLAST::
.END

.EVEN

.EVEN
.MORD

.WORD

SEG 0128

CZRLNBO RLO1/02 DRIVE
SYMBOL TABLE
ADR

AFMID

000020 G
003214

AFMIDU
003216
ALLCYL= 000001

TEST

3 MACRO vO4.00 20-JAN 83

CLKCSR=

172540

M10

14:40:57 PAGE 20-4

CSMEM

= 000031

CLKCTR=

172544

C$MSG

000023

CLKFLG
CLNCOD

003474
015470 G

CS$OPEN= 000034
C$PNTB= 000014

5€Q 0129
EF.STA= 000040 G

FMI9

011554

ERLIM = 000010
ERLIMQ
037330

FRMWD
FWOSKO=

007463
00200C

ERHMEAD

003016

FOLWRT=

000100

ALLSEC=

000002

CLRBYT

002310

C$PNTF=

000017

ERLIMW

014130

FWOSKS=

000400

ANYERR=

100000
003220

CLRPAR
CNT
=

026310
000012

CS$PNTS=
C$PNTX=

000016
000015

ERRCNT
ERRPOI

003244
003”42

F$AU
=
F$AUTO=

000015
000020

003222
ASSEMB+= 000010
BADADD= 004000
BAMSK = 000060
BANAM
006233

CNTYPE
COMPOP=

036764
007777

C$GIO =
CS$RDBU=

000377
000007

ERRSWI
ERRVEC

003022
003234

F$8GN =
F$CLEAR=

000040
000007

cria@

037130

CioMS

011176

ERR9

013616 G

ARMID
ARMIDU

BASADD
BELL
BH5TAT=
BITO
=
BIT00 =

000002 G

CONHNG= 000004
CONTIN
014362
COSTAT= 000040
COUNT
003240
CRDYMS= 000200
CSNAM
006226
CSR
= 000000
CSRMSG
036700
CURCYL
003110

000010
000020
000040
000100
000200
000400
001000
000002
002000
004000
010000
020000
040000
100000
000004
000010
000020
000040
000100
000200
000400

CrLTBL
CYLUP =
CYLWO
C$AU
=
C$AUTC=
C$BRK =
C$6SEG=
c$8SUB=
C$CEFG=
C$CLCK=
CSCLEA=
CsCLOS=
CsCLP1=
CS$CVEC=
C$OCLN=
C4D0DU=
CS$ORPT=
CsDU
=
C$EDIT=
C$ERDF=
CS$ERHR=

006131
011117
000010
000001 G
000001 G

8IT01

BITO3
BITO4
BITOS
BIT06
8IT07
BIT08
8IT09
BIT1
B8IT10
BITi1
BIT12
RIT13
8IT14
BIT15
8IT2
BIT3
B8IT4
BITS
BIT6
BIT7
BIT8

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

80€E

= 000400 G

B8IT02

B8IT9

BRMSG
BSCHK
BSFLAG
BSFVAL
BSNSTR
BYPSNM
CAFDT
CAMSK
CCrLuP

= 000004 G

CHOSHD
CKBSVD
CKDATA=
CKERLM
CLKADR
CLKCSB=

G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G

001000 G

036723
024710
003024
003500
007540
007471
011224
002316
011215
021116
021226
000102
016230

003476

172542

CS$ERRO=

002610
000004
007456
000052
000061
000022
000004
000002
000045
000062
000012
000035
000006
000036
000044
000051
000024
000053
000003
000055
000056

000060

CS$ERSF= 000054
CS$ERSO=
C$ESCA=
CS$ESEG=
C4$ESUB=
CS$ETST=
CSEXIT=
CS$GETB=
CSGETW=
CSGMAN=
CSGPHR=
Cs$GPLO=
C$GPRI=
CS$INIT=

000057
000010
000005
000003
000001
000032
000026
000027
000043
000042
000030
000040
000011

C$INLP= 000020
C$MANI= 000050

CS$REFG=
CS$RESE=
CS$REVI=
CSRFLA=
CS$RPT =
C$SErG=
C$SPRI=
CS$SVEC=
C$TPRI=

CSSEC
C500MS
DANAM
DATACM=
DATCOM
DATGEN
DCKERR=
DCLIM =
OCLIMQ
OCLIMW
DESDIF
DESHD
DESSEC
DESSGN
DIAGMC=
DIFAUG
DIFWD
DIRBIT=
DIRMSK
DLTERR=
DONE

000047
000033
000003
000021
000025
000046
000041
000037
000013

011235
011207
006240
000001
023662
023522
004000
000012
037352
014132
003112
003116
003120
003114
000000
003102
007432
000004
002320
010000
003012

ODRDYMS= 000001

DRMSG

ORSB8
=
DRSELT=
DRSET =
ORTYYPE
DRVCNT
ORVERR=
DRVNAM
ORVNAY
DSESTA=
DSMSK =
OSPCOD
EF .CON=
EF .NEW=

036756

000010
000004
000010
036734
003100
040000
006142
006147
000400
001400
014134 G
000036 G
000035 G

EF .PWR= 000034 G
EF .RES= 000037 G

ERR1
ERR1O0
ERR2
ERR3
ERR4
ERR5
ERR6
ERR?
ERRS

EVL
*
EXACYL
EXHCYL
EXOCYL
EXROT
ESEND =
ESLOAD=
FBSFIL
FMTOP1
FMTOP2
FMTOPS
FMT1
FMT1.1
FMT11
FMT12
FMT1S
FMT14
FMT1S
FMT16
FMT17
FMT18
FMT19

012266
013662
012334
012402
012450
012520
012570
013452
013522

000004 G
003230
003226
003224
003232
002100
000035
003676
011243
011272
011314
011335
011342
011561
011567
011575
011641
011673
Ol1727
011740
011762
N12014

FMT2

011351

FMT?

011452

FMT20
FMT21
FMT22
FMT23
FMT24
FMT25
FMT26
FMT27
FMT28
FMT3
FMT4
FMTS
FMT6
FMT8

G
G
G
G
G
G
G
G
G

012051
012101
012124
012160
012174
012201
012211
012235
012254
011354
011357
011370
011410
011522

F$DU
=
FS$END =
F $HARD=
F$Hd
=
FS$INIT=
F$JMP =
F$MOD =
F$MSG =
F$PROT=

000016
000041
000004
000013
000006
000050
000000
000011
000021

F$PWR = 000017
F$RPT =
F$SEG =
F$SOFT=
F$SRV =
F$SUB =
F$SW
=
F$TEST=
GBND
GETPOS
GETSTA=
GLBDAT
GLBEQA
GLBERR
GLBSUB
GLBTXT
GSTAT
GSTATC
GSTATG
GSTATR
GTSTAT=
GS$CNTO=

GS$DELM=

000012
000003
000005
000010
000002
000014
000001
002314
022704
0000C3
002230
002230
012266
015622
005350
016626
016612
016636
016576
000104
000200
000372

G$DISP= 000003
GSEXCP=
GS$HILI=
G$LOLI~
G$NO
=
GS$OFFS=
G$OFSI=
G$PRMA=
G$PRMD=
G$PRML=
G$RADA=
G$RADB=
G$RADD=
G$RADL=

000400
000002
000001
000000
000400
000376
000001
000002
000000
000140
000000
000040
000120

G$RADO= 000020
G$XFER= 000004

G
G
G
G
G

CZRLNBO RLO1/02 DRIVE
S5YMBOL TABLF
G$YES =
HADONE

TEST

3 MACRO v04.00 20 JUAN 83

14:40:57 PAGE

N10O

20 S

5€Q 0130

000010
003014
HCESTA~ 040000
HCRCER= 004000
HDALIG= 000010
HOCYL
002322
HOHSEL= 000100
HOMOVF
007313
HORCMP= 000002
HDR40 = 100000

ISINIT=
I$MOD =

000041
000041

LSEXPL
L$EXP4

002046 G
002064 G

L10030
L10031

033170
033104

MQUALS~
MREAD

003760
005354

I$MSG =
I$PROT=
IsPTAB=
ISPWR =
ISRPT =
IS$SEG =
I$SETU=
I$SFT =

000041
000040
000041
000041
000041
000041
000041
000041

L$EXPS
L$HARD
LS$HIME
LS$HPCP
L$HPTP
L$HW
L$ICP
L$INIT

002066
036620
002120
002016
002022
014102
002104
014156

G
G
G
G
G
G
G
G

L10032
L10033
L10034
L10035
L10036
L10037
L10040
L10041

034206
034062
035422
035336
036F14
036530
036700
037130

MREAOH
MRESKO
MREVSK
MRLFAL
MRSLT
MSEEK
MSPERR
MSTERR

005765
005756
005640
011004
005526
005350
010505
010540

HDSEC
HOSEL

I$SRV
IsSUB

000041
000041

LSLADP
L$LAST

002026 G
037400 G

MAJINC
MANQ

003472
037161

MTMBS
MTOSLO

006110
006306

MOATCP

005432

MWPTAB

011043

MOSERR

010455

NOPWR

006166

MFLERR

010634

NOTST4

010131

=
=

000077
000020

=
=

HOWD
HOWRD1
HDWRD2
HDOWRD3
HEAD
=
HEADLM=
HEADQ
HEADV

007445
003056
003060
003062
000006
010000
037263
037305

I$TST =
JJJ
JSJMP =
LAB
LABACF
LABACR
LABEXP
LABHCF

000041
002304
000167
014334
007263
007277
007176
007233

HEADW

014126

LABHCR

007247

L$REV

002010 G

LIMVAL

037234

LSTIML

002014 G

= 040000 G

L.CS

003040

HF IN
HFINU
HFOUT
HFOUTU
HICYL =
HILIM =
HILIMQG

003174
003176
003200
003202
020000
000004
037242

HILIMW

014124

HLMTW
HNFERR=

LABIN
LABMID
LABOCF
LABOCR
LABOUT
LAB1
LAB2

L$LOAD
LSLUN
L$MREV
L$NAME
LS$PRIO
L$PROT
L$PRT
LSREPP

007153
007161
007207
007221
007170
006252
006265

L$SOFT
L$SPC
L$SPCP
LSSPTP
L$STA
L$SW
L$TEST

G
G
G
G
G
G
G

MAPROX
MBADAD
MBADSF
MBSETO=
MCERR
MCONHN
MCYLOC
MCYLUP

MOCRC
MDHEDR
MOLT
MDROY
MDRERR
MORRES
MORVST

HPTCOD

014100 G

LOLIMQ@

037215

L.mpP

003046

MFOLWR

005620

NTST4A

010217

HROPRM
HROWTS
HRIN
HRINU

036616 G
026340 G
003204
003206

LOLIMW
LOT
=
L$ACP
L$SAPT

014122
000010 G
002110 G
002036 G

L10000
L10001
L10002
L10003

012332
012400
012446
012516

MFWDSK
MFWSKO
MGTSTA
MHCERR

005671
005722
005420
010554

NXMERR=
NXTHL
NXTPAS
OBUFF

020000
002312
014402
004472

HROUTU
HSMSK =
HSSTAT=

003212
000100
000100

L$AUTO
L$CCP
LSCLEA

015132 G
002106 G
015470 G

L10005
L10006
L10007

013450
013520
013614

MHDERR
MHORCP
MHFCRC

010617
005451
010414

OFINU
OFMID
OFMIDU

003146
003150
003152

L$CO
L$DEPO
L$DESC
L$DESP
LSOEVP
LSOISP
L$OLY
L$OTP
L$GTYP
L$0V
L$OUT
L$DVTY
LS$ES
L$ENVI
LSETP

002032
002011
002122
002076
002060
014136
002116
002040
002034
015616
002072
002216
002052
002044
002102

HROUT

IBE
IBUFF
10V

003210

010000
004072
= 000040
IER
*» 020000
INITCO
014156
INOQUTS= 000020
INTEBL» 000100
INTHLR
016150
ISR
= 000100
IXE
= 004000
IsAU
= 000041
I$AUTO= 000041
ISCLN = 000041
IsDU
= 000041
ISHRD = 000041

G
G
G
G

G
G

L$AUT

000002

002070 G

G
G
G
G
G
G
G
G
G
G

G
G
G
G
G

L.OA

L10004

L10010
L10011
L10013
£10014
L10015
L10016
L10017
L10020
L10021
L10022
L10023
110024
L10025
L10026
L10027

003044

MFMTER

012566

013660
014070
014116
014134
015130
015466
015614
01562C
016146
016226
030274
031012
031226
031152
032060

MHCRC

MHNF
MININC
MINOUT
MISWI =
MISWIW
MITEST=
MNDRST
MNEERR
MNOCLR
MNOINT
MOPER
MOPERR
MORECE
MOUTIN
MPNAM

006063

010345

010366
003462
005577
000000
014120
100000
010714
010662
006413
006344
005517
010607
003C20
005560
006245

NOTRDY
NOTST1

005467
003106
000010
007635
003451
000002
000100

LOLIM

011112
011055

M40HDR
NEWCYL
NOCLR =
NOCTLR
NOERCT
NOIRPT=
NOOP
=

005537
010737
010572
010523
006300
005375
005406
005503

000020

LOE

MERRS
MEXERS

010355
002000 G
010402
010322
010444
006326
010472

MULOAD
MUNDEF
MWDERR
MWGERR
MWORD
MWRCHK
MWRITE
MWRSET

HOSTAT=

100000 G

002012 G
003042

007143
006012
006033
000001
010333
006377
010707
005550

LOCERR
LOCYL =

LSUNIT
L.BA

036774
002056
002020
002024
002030
014120
002114

G
G
G
G
G
G
G
G

002306
010000

HOE

003450
040000

002100
002074
002050
002000
002042
014072
002112
002062

NTST1A

OFIN

OFOUT
OFOUTU
OLOCYL
ONSWAP
OPFLAG
OPIERR=
OPMSGS
OPROO4
OPR1A
OPR1B
OPR12
ORIN
ORINU
ORMID
ORMIDU

007673
007750
010036

003144

003154
003156
003104
021202
003010
002000
002230
007415
007366
007372
007347
003160
003162
003164
0031r

B30 1
b]

CZRINBO RLUL1-02 DRIVE
SYMBOL

1ABLE

TEST

3 MACRO vO4.00 20 JAN B%

OROUT
003170
OROUTYU
003172
OL7INS*= 000040
0sAPTS+ 000000
0sAu
= 000000
Ot8GNR= 000000
O0$BGNS+ 000001
OsOu
= 000001
Q$ERRT. 00000
OSGNSK*
0001
OsPOIN= 000001
035ETu= 000000

P2TO%
P2T10E
P2T11E
P2112¢
P2T13E
P2T14E
P2T1S€E
P2T16E
P2T17
P2T18E
P2T19€
RDALHG

PASCNT
PASNEW

RDHEAD- 070110
RDNOHR= 000116

PART2 = 000001 G

RDDATA- 000114

003236
014410

PASNUM
PATTBL

003444
002364

PAT10

006633
006636
006651
006664
006676
006712
006733
006756
006777
007031
007053
023154

RDYCHK
ROYWAI

020642
022420

005346

RELOWT=

PAT2
PATS
PATA
PATS

005074
005134
005174
005234

PAT?

005302

PATY

005072

PATE

005304
005344

PH65¢
PNT
=
POSHDS
POSHDO
POSHSB

020604
001000 G
020276
022374
022370
022362

POSHW1

PRI
PRIOR
PRIOO
PRIOL
PRIOC2

*=
=
=
=
=

PRIO4
PRIOS
PRINZ%
PRIO?

=«
=
=
=

PRIO3

PSETNM

002000
000004
000000
000040
000100

G
G
G

000200
000240
000300
000340

G
G
G
G

040000

S$LSYM=

RESE3S
RESE4
RESES
RESE6

011123
011127
0Ol1134
Ol1l141

RESTAR
RESTBL
REVSKO=

000140 G

RPTREM

003446

SECQ

037400

000000

ERRORS DETECTED:

VERHDR

022024

VERPQOS

023032

002324
001000

TEMP1
TEMP2

003124
003126

TS§SRV=
T$4SUB=

010022
010037

WALITIN
WCHMSK =

016422
017777

TIME
TIM.US
TOSLOW=
TRPFLC
TRPHAN

015622
003466
000001
003452
016142

000200
000002
003032
000000
000000
000004

026054

VIRT JAI

VCNRST
006433
VCSTAT= 001000
VECMSG
036714
VECT
+ 00000¢

010000

WIDATA=

000112

TSTINT

016560

125782

002462

XREADG

024220

TSERRN=

003247

T307¢

031112

XWRITE

024152

006471
000006
000007
005052

SETOON

014436

TSLAST- 000001

SFTPRM
SGNWD

036772 G
007440

116 PAGES)

007117

010013
010015
010011
010012

006454

002302

T$FLAG= 000040

(

VALDES

T.0ORIV

= 000106

29696 WORDS

010040

WCANG =
WDESTA+=
WGESTA=
WLSTAT=
WRISWI

T$EXCP= 000000

067063

000010
007402

T$8SW = 010014
T$$TES» 010036
T.8A
003052
7.CS
003050
T1.0R
003054

007451

037144

T4$SEG=

WOAD =
UNDTST

003130
005132
003134
003136
003140
003142

SECWD

001

MEMCRr USED:

TEMPS
TEMP4
TEMPS
TEMP6
TEMP?
TEMPS

003464

TSTLAB
TYPDR =
TS$ARGLC=
T$CODE=

000

UNXERR

TSGMAN= 000000
TSHILI= 000377

TSLOLI= 000001
TSLSYM= 010000

T$LTNO=

000010

T.mP
T.STAT
Tl
v
125TBL
13
13.1
13068
T3065¢

735108

T73100¢

003056
003064
026340 G
030276 G
002434
031014 G
031112
031060
031226

031120

032206

751018
131658

032414
033170

732654
T33TBL

034206
002510

132048

13300

034064

034356

G
G

036002
= 000200 G

T$8S0F= 010041

006555
006575

ABS,

T480U = 010020

6
G

035424 ¢

003122

P2TOGE
D2T07€
.

18.1
UAM

TEMPO

TEMP

021142

025646
014270
000077
003502

SKTMES

T$TSTMe 177777
1871575 000GO1

014352

SEEKOP= 010000
SEQMES
007504

006613

734018
134658
T4
15
15.1
16
16,1
17
17.1

Teord «
T$$INI=
T$8MSG=
T$8PRO=

006477
006515

P2TOBE

T$TEST= 000010

0%4s4a0
03%27
0355%
036002
036614
0312%
032062
032414
033172
033212
034210
034640

003470
003030
002550
007614

P2TO3E
P2TO4E

(06535

000002
000000
177777
177777
010000
000001
177777
010042
000000

133014
133654
134008

TAG
TBLSTR
187
TCERR

014660

P2105€

177777
000000
000005

T$$HAR=

SWAPMD

RPTRES
RSTRT
SAMSK =
SB8SFIL
SEEX

TINEST.
TINSO =
TENS1 =
T$NS2 =
TSPTNU=
TOSAVLe
TSSEGLe
T4SEXO=
T$SUBN=
T$TAGL=
T$TAGN.
TS$TEMP«

010000

003066

RLORY
RLMP
=
RLVEC
RORWOP=
RPTOP

003454

SVCINS+ 000000
SvCSuB+= 000001

2£Q D181

010016
010017

PWCON

PWRFLG

SvCGBL= 000000

20 &

T$8AUT=
Te$CLE=

016370

REVSKS+=
RLBA
=
RLBAS
RLCS
=
RLCSR =
RLDA
=

004000
018116 G
007075
003006
007527
000007
011146
011156
011166
010000
0C2410
000001

000000
000001

RESPAR

PATS
PATY

SPOSTASPTCOD
SRTMES
SSINDX
STAMES
STAMSK=
STATE2
STATES
STATES
ST0STA=
SUBSTK
SvCBaGL =

SVCTAG=
SYCTST=

READRL

305242

14:40:57 FAGE

XDELAY
XROMD
XROMOC
XRDHOG
XREAD
XSEEX
XSEEXKT
XSEEX1
XTIME

XWRITT
AWRITL

160000
100000
002000
020000
003026

003456
021370
021360
021374
024212
017524
017514
017530
015766

024142

024156

X$ALWA= 000000
X$FALS= 000040
X$O0FFS=

000400

X$TRUE= 000020
YDELAY
003460

CZRLNBO RL01-02 DRIVE
SYM80L

TABLE

TEST

3 MACRO vO4.00 20 JUAN 83

14:40:57 PAGE

DYNAMIC MEMORY AVAILABLE FOR
70 PAGES
CTRINB.BIN. CZRUNB.LST/C[20,0)SVC34R
. MLB,[20,29]1C2RLNB . MAC

CZRLNBO RLO1/02 DRIVE
CROSS RFFERENCE TABLE
ADR

ALLCYL

4 S40
4-550
4-107¢

CsC Cx
CSCLEA

4-621¢
4 6160
4 7610

4-14490

AR RRRRERARRERRER
S

)

4-360

RS R

fg 9000000000 OLHLOOO

BIT3
BIT4
BITS
8ITe
3I1?
BIT8
81719
80€E
BRMSG
B8SCHK
BSFLAG
BSF VAL
BSNSTR
BYPSNM
CsAv
C$AUTO
C$BRX
C$BSEG
CsBsuB
CSCEFG

4-1180

8172

2-8

4-%60

BITO
81700
8I701
81702
817103
8IT04
817105
817106
81107
817108
81709
BIT1
8IT10
8IT11
8IT12
BIT13
BITia
8IT1S

4-4420

)

BANAM
BASADD
BELL
BHSTAT

4-.441¢0

B8ADADD
BAMSK

439¢
4400

[

ANYERR
ARMID
ARMIDU
ASSEMB

ObbDLLLLLLALLLIDIIILIMDMPLBDLDDIL

ALLSCC

360

4
4

AFMID
AFMIDU

TEST

(CREF

12-179
12-180
16-12
10-139
12-181
12-182
2-8
1112

S MsCRO v04.00 20 JAN 83
v04.00

)

14:40:57 PAGE

D11
51

5EQ 01132

12 192
16 25

18-12

10-440
12-193

10-704

11 48

18 30

19-26

11 227
5-279
17-41

6-125

7-20

10-11

10-492

11-225

12-186

16-97
4 360

16 105
4-54

18-107
4-76

18-140
11-176

19-105

19-113

19-148

19-117
10-799

19-138
11-29

12-42

17-51

4 364
4-360
4-360
4-360
4-360
2-360
4-360
4-36¢
4-360

16-109
4-85
4-86
4-58
4-59
4-60
4 61

11-30

11-119

4-55
4 56
4-57
4-79
4-80
4-81
4-82
4-83
4-84

16-126
10-112

4-75
4-77
4-78

18-119
10-231

18-152
10-525

4-87

4-88
4-89
4-90

5-178

13-54

13-52

5-142

20-150
14-40
11-105+
10-48S%
10-49)
17-44

16-91
11-125+
13-88

18-105
11-132

19-94

16-60

17-9

18-75

7-38

10-349

14 21

68
'8-23

19 64

15-78

17 99

F11

CZRLNBO RLO1-02 DRIVE TEST 3 MACRO vO4.00 20 JAN 8% 14:40:57 PAGE S- 2
CROSS REFEREMCE 1ABLE (CREF vO4.00 )

10-153
10-692
13-75

14-32
10-396
14-31
12-195
13-12

16-140

18-156

19-152

16-139
13-93
15-10

17-97
14-46
17-45

10-8
6 13

10-350

13-69

S 59

S-7%

5-87

5-160
11-189

5-193
11-192
6-125
12-12
15-78

5-207
11-204
6-126
12-14
15-79

4-779%8
4-199¢

10 13

18-170

19-165

5-102

5-117

5-222

5-236

S5-216

5-279
11-214

5-280
11-217

12-185

17-34

12-186
17-41

12-187
17-44

6-46

6-49

5-258

5-272

5 286

5-282
11-225

10-914
11-227

11 147
11-228

12-188
17 99

12-189

12-190

11-148
11-229
10-10
12-191

~ RS

17-110

15-65

~=O

19-151
16-153

10 442
10 929

s
b

18-155
15-81
17-69

10-431
10-825
15-61

3500
ava

10-388
10-820
15-45

10 334
11 7%

11-152

165

10-11
12-192

10 12

[

10-372
10-767
15-41

~N=O

10-263
10 706
13-85

o
o pua

10-258
10-702
13-82

17-71%

6-63
6-131

6-124

10-493
15-77

11-213
7-19

7-20

CSPNTS
CIPNTX
CsQI0
CSRDBU
CSREFG
CSRESE
CSREVI
CSRFLA
CSRPT
C$SEFG
C$SPRI
C3SVEC
CS$TPRI
C1OMS
CSO0MS
CSSEC
CAFDTY
CAMSK

10-147
10-630
12 57

e®O

CSPNTF

10 134
10-623
12-53

CSEXIY
CsGETB
CSGETW
C$GMAN
C1GPHR
C3GPLO
CSGPRI
CsINIY
CsINP
CSMANI
CSMEM
CsmMSG
CSOPEN
CsPNTB

10-97
10-611
11 86

8-27

CSESUB
CSETST

8-20

[

CSERRQ
CSERSF
C$ERSC
CS$ESCA
CS$ESEG

8 16
10 14
7-24

SN
Y

CsDu
CS$EDIT
CSERDF
CSERHR

7-37
6 128
6 127

00 QD >

CSDRPT

2 88
2 8e
S 8e
S 8@
2 8o
2-8¢
2 8o
2 8¢
°’-8@
2-80
10-562
11-82
17-86
2 8o
8¢
14
-80
-84
8e
-8¢
-8¢
-89
-80
-8¢
-88
-8
-84
-80
-80
2-8¢
2-80
2 86
2-80
2-80
11-185
2-80
10-492
15-9
LSV VE VL VE SV VI VR VR VYL VY ST VLV

CsCLOS
CsCLPl
CsCveC
C$0CIN
€000V

€Q 0134

10-701
11-72
6-87+

11-81

7-22

7-31

7-33

7-35

12 193

181

10-491

15-7

CZRUNBO RLO1/02 DRIVE TEST 3 MACRO v04.00 20-JAN 83
CROSS REFERENCE TABLE (CREF VO4.00 )
cCyoup
CHOSHO
CxBSvD

CxDATA

CKERLM
CLKADR
cuLxCss
CLKCSR
CLKCTR
CLKFLG
CLNCOD
CLRBYT
CLRPAR
CNTY
CNTYPE
cCoMPOP
CONMHNG
CONTIN
COSTAT
COUNT
CRDYMS
CSNAM
CSR
CSRMSG
CURCYL
crLa
CrLTBL
CrLup
CYLWD
DANAM
DATACH
DATCOM
DATGEN
DCKERR
CLIM
LCLIMQ

Dr_IMu
DESDIF
DESHD
DESSEC
DESSGN
DIAGMC
DIFAUG
DITwD
DIRBIT
O IRMSK
OLTERR
DONE

DROYMS
DRMSG
DRSB

7786

10-459¢
10-489¢
4-648

5-58

4-4700

4-1590
4-1584
4-1600
4-469¢

8-40

4-196¢

11-193
4-43¢

20-4

4-740
a-97¢

12-33

14 -4

_8‘

16 4

5 86

16-57
19-4

18 73

19-62

5-101

5-116

5-221

5-235

15-56+
15-56
15-S
18-47

19-41

8-10

10-27

10-38

10-807

10-813

10-358

10-359

10-377

10-383

10-391

17-94
17-26

18-123
17-46

19-121
17-90

18-22

19-103

6-10e

15 49
15-49
12-10

6-82e

6-91s

16- 39

20-4

12-39
S5-140
11-227
20-5
20-13¢
10 193

12-77e
6-11S

5EQ 0135

18-4

15-49«
12-65e
12-65

20-4
20-180
17-172

14:40:57 PAGE S- 3

15-19

12-60e
12-60e
12-60s
6-7s

11-233¢

F11

5-271

S 285

10-64

10-740¢

10-765

11 8

11 35

20-4

6-450

146¢

4-4530
4-116¢
4-6200
4-38¢

20-5

4-403¢

11-229
20-26

4-2780
4-778
4-711¢

4-6220
4-760
10-890¢
10-850¢
a-112¢
4-51¢0

20-48
S-323¢
4-4049

4-406¢

13-7«

4-407¢

16-107+
19-110

4-4050

2-8

4-4000
4-707¢
4-127¢
4-2000
4-1100
4-3660

15-37
4

119¢

20-7

4-420

20-53¢
16-38
11-192
11-227
10-899
14-28
14-22
5-170
20-48
20-70¢
10-926
10-203»
10-241
17-14»
11-43
16-115»
19-115»
10-202«
2-8
10-189«
11-189
10-240
6-80e
S-174
9-63¢
15-48»
6-118
20-17¢
5-293

7-27

20-5

20 5

10-210

10-354

18-46

19-40

192

11 227
10-910

16-113
15-16

17-32
16-95

5-194
20-48

20-48

10-217s
10-459«

10-226+
10-462+

10-233
10-469

11-189
10-471e

10-616

10-802

11-10

11-40

11-117

11-189

11-192

11-229

11-120
16-116
19-123»
10-213e

11-192
16-118¢
19-124
10-216+

13-21s
17-15e
19-126+
10-222+¢

13-65+
18-90+

13-71
18-111e

13-79«
18-112

14-9+
18-117+

15-18+
18-125+

16-76+
18-126

16-93
18-128¢

16 101+
19-79¢

16-102
19-109e

10-238

10-381

11-189

12-70

10-197+

10-208¢

10-218

10-226

10-30
15-57

10-43
17-56+
8-13

10-110e
17-62
10-81

10-117

10-247»

10-254

10-522+

10-533

11-55

11-63

12-49

12-59«

10-126

10-424

10-435

10-535

10-543

10-685

10-696

11 69

20-7

6-88+

7-29

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO ¥04.00 20 JAN 83
CROSS REFERENCE TABLE (CREF v04.00 )

DRSELT
ORSET
DRTYPE
DRVCNT
DRVERR
DRVNAM
DRVNAV
DSESTA
DSMSK
DSPCOD
ESEND
E$LOAD
EF .CON
EF .NEW
EF .PWR
EF .RES
EF.STA
ERMEAD
ERLIM
ERL IMG
ERL IMW
ERR]

ERR10
ERR2
ERR3
ERR4
ERRS

ERRG

ERR7
ERRS
ERR9
ERRCNT
ERRPOI

ERRSWI

ERRVEC
EvL
EXACYL
EXHC YL
ExXOCrL
EXROT

FS$AY
F $AUTO
F $BGN

FSCLEA

4
4

S60
1320

2u-8
4

3990

4 1080
4-617¢
4-6180
4-148¢8
4-115¢

10-57

20 160
6-28s
10-75
5-279

10-73

10-121

11-168

6-52
10-91
6-125

6 56+
10-145

6-59»
17 72

12-8+
20-46

14:40:57 PAGE

G11
-4

5€Q 2136

7-33

17-80
10-11

10-492

11-225

12-186

15-78

13-3s
20-46

14-3¢

15-3¢

16-3«

17-10s

18-3»

19-3.

10-153

10-258

10-388

10-562

10-820

11-52

10-630

10-929

7-20

17 34

17 99

11-67

12-53

13-75

13 82

5-327%
2-86
2-8¢

4-360
4-360

4 360
4-360
4-360
4-368¢0
4

S00

20-46
5-322¢
5-470
15-41
5-273¢
5-61¢0
S-750
5-89¢
5-1040
5-119¢
5-224¢
5-238¢
$-260¢

10-10
10-134
17-68
10-623

13 85

17-75

17-79

10-539
10-263

10-550
10-372

10-702
10-442

11-73
10-554

11-82
10-706

10-825

11-86

12-57

15-45

15-65

17 86

4-45S¢
4-454¢0

6-35
5-62¢

6-55
5-76+

10-4434
$-90+

10-707s
5-105s

13-91»
S5-122¢

5-225¢

5-239«

5-261e

5-277+

6-35¢

6-55s

6 60s

4-3700

10-154+
10-444s
10-682+
10-840
17-96»

10-167
10-450

10-169
10-45¢
10-714
10-920
18-154+

10-188+
10-512+
10-716
10-922
19-150¢

10-2%59
10-545s
10-745
10-930s

10-264»
10-563¢
10-747
11-83«

10-270
10-576
10-762«
+1-87e

10-272
10-578
10-768+
11-93

10-345+
10-596+
10-772
11-95

10-373

10-389+
10-624+
10-791s
13-87«

10 401
10 631s
10 821e
14-30s

4-162

4-168

4-578

4-589
5-290
8-29
14-21
17-9
19-64

4-814

5-2
5-307
9-45
14-32
17-45
19-152

S-47
5-309
9-53
14-46
17-69

5-61
5-325

5 75
S-327
11-243

S 89
S 334
12 3

20 2

10-6

10-403
10-650
10-826+
15 80«

4-449¢0

7-37

4-360

4-8460
4 4450
4-4440
4-4470

8-20

13-30+

12-193
12-191
12-189

2-860
2-860
2-860
5-104
6-3
12-7
16-2

18 75
20-19
2-8e

10-708«
10-911
17-98«
8-7

10-612+
10-774

7-38
4-9

8-5

5.224
6-132
13-2
16-60
18-155
20-23
8-23

4-34

5-238
7-11

13-12
16-139
18-156
20-73

5-260
8-4

13-93
16-140
18-170

5-273
8-5
14-2
16-153
19-2

5-287
8-25
14-21
17-2
19-64

5-298

9-3

14-31

17-9
19-151

19-165

10-349
15-2
17-97
19-166

15-10
17-110

15-81
18 2
3

F $HARD
F $HW

FSINIT
FsJMP

# $M0D

F $MSG

F$PROT
FSPWR
FSRPT

F$SEG
F$SOFT
F $SRvV
F$SuUB
F3su
FSTEST

FBSF IL
FMT1
FMT1.1
FMT11
FMT1D
FMT13
FMT14
FMT1S
FMT16
FMT17
FMT18
FMT19
FMT2
FMT20
FMT2Y
FMT22
FMT23

FMT24
FMT2S
FHT26
FMT27
FMT28
FMT3
FMT4
FMTS
FMTE

19-2
20-50

20-40

17-69

4-162

2-8¢@
18-170

4-4770
4-7850
4-786¢
4-795¢0
4.7966
4-7976
4-7980

4-799¢
4-800¢

5-258
8-4
12-195

5-272
8-23
13-2

5-286
8-27
13-2

19-2
20-73
20-43

19-64

1819-151

19 152

6-132

4-168
8-4

4-578
8-29

4-589
9-

11-243

5-2
12-3

5-287
19-166

5-298

5-307
20 19

S 309
20-22

5-73
5-272

5-75
5-273

5-87
5-286

-89

5-102

5-104

5-117

5-119

5 222

5-224

17-2

17 110

18 2

4-814

20-40

20-43

20-50

16-60

16-139

17-9

17-97

18-75

18-155

19-64

19-151

13-2

13-93

14-2

14-46

15-2

15-81

16-2

16 153

11-127

13-22

10-492

11-225

9-67

15-77

5-282

4-801¢

4-802¢
4-803¢
4-787¢
4-804¢
4-805¢
4-8060
4-807¢
4-808¢
4-809¢
4-8100
4-811¢
4-8120
4-788¢
4 7896
4-7900
4-7910

12-189
11-185
12-191
12-193
7-19

Nh)OLflgdla
e O oe

2-8
4-168

[V IV V-2V
¥ 3,V

162

~®

2-8

5¢Q 0137

=V
NR
O ®~

12-195
14-31
16-60
17-97

S 5

o
e

7-38

H1 |

14:40:5? PAGE

[JV.IT
¥. JO ¥ L,V

2 8o
28
2-8
5-87
5-334
12-3
14-2
16-2
17-9
18-156
20-2
2 8¢
2 8¢
2-86
2 8¢
2-86
5-325
20-73
2 8¢
S 236
2-80
2-8¢
2-8¢
2-8¢
2-8%
2-8¢
2-8¢
2-8¢

wen

FsDy

FSEND

TEST 3 MACRO vO4.00 20 JAN 83
(CREF v04.00 )
nNo®

CZRLNBO RLO1/02 DRIVE
CROSS REFERENCE 1ABLE

17-41

7-31

10-914
7-22

7-35

10-12

10-493

6-125

7-20

7-33

10 11

186

15-78

CZRULNBO RLO1/02 DRIVE
CROSS REFERENCE V1ABLE
FMT7

4-792¢

FMT8

4 793¢
4-794¢
4 7820
4 7830
4-7840
4-810
4-7120
4-85¢
4-83¢

FMT9
FMTOP1
FMTOP?

FMTOPS

FOLWRT

FRMWD

FWOSKO
FWOSKS
GSCNTO
GSDELM
S$DISP
GSEXCP
GSHILI
GSLOLI
GSNO
GSOFFS

G3OFSI
GSPRMA
GS$PRMD
GSPRML
GS$RADA
G3RADB
GS$RADD
GSRADL
GSRADO
GSXFER
GS$YES

GBND
GETPOS
GETSTA
GLBDAT
GLBEQA
GLBERR
GLBsuB
GLBTXT
GSTATY
GSTATC
GSTATG
GSTATR
GTSTAT
HADONE
HCESTA
HCRCER
HDALIG
HOCYL
HOHSEL
HOMOVF
HMDR4O
HDRCMP
HDSEC
HOSEL

2-80
2-80
2-80
2-84
2-8¢
2-8¢
2-8¢

2-8¢
20-42
2 88
20-42
2-829
2-8¢0
2-8#
2-89
2-84
2-80
2-8¢6
2-8¢
2-8#8
2-8¢
20-42

4-1980

10-191

4-131¢

4-1680

TEST 3 MACRO vO4.00 20-JAN B3
(CREF v04.00 )

11 229
11-228
10-491
17 34

17-99

11-147

12-12

12-14

4-91

16-106

18-116

19-114

4 91
4-91

16-132
18-151

19-143

9-12

9-17

9 33

20-4
20-44
20-4
20-44
20-5
20-7
20-4

20-5
20-46
20-5
20-46
20-6
20-9
20-8

20-6
20-48
20-6
20-48

20-38
20-4
20-5
20-37
20-4
20-44
6-78¢
10-346
5-135

14:40:57 PAGE

111

s 6

26Q 0138

15-7

15-9

20-7

20-8

20-9

20-26

20-27

20-33

20-36

20-38

20-39

20 41

20-7

20-8

20-9

20-26

20-27

20-33

20-36

20-38

20-39

20 &1

20-38

20-41
20-27

20-44
20-33

20-46
20-36

20-48
20-39

20-42

20-41
20-8
20-6
20-40
20-5
20-46
6-86+
10-352
10-57

20-44
20-26
20-7
20-43
20-6
20-48

20-46
20-27
20-9

20-48
20-33

20-36

20-39

20-42

20-7

20-8

20-9

20-26

20-27

20-33%

20-36

20-38

20-39

20 41

10-375
10-60

10-106

10-7240

10-763

10-79

10-131

10-137

10-422

10-433

10-541

10-683

10-694

11-75

17-70

10-61
12-17
10-113
6-37«
10-85
5-157
6-15
6-81+
10-615
10-387
10-793
10-597
10-637
10-243

10-64¢
13-5

14-6

15-14

16-6

17-12

17-37

17-88

17-102

18-6

11-189

20-26

9-37

4-346

S5-20

9-30
4-5890
10-62¢
10-59¢
10-58

10-56¢

4-650
4-3670
4-1540
4-1130
4-57¢
4-201¢

4-140¢
4-684¢0
4-900
4-759
4-1390
4-1280

5-164
6-89a
10-618
11-182

10-640
10 804

19-6

CZRLNBO RLO1/02 DRIVE
CROSS REFERENCE
HOWD
HOWRD 1

HOWRD2

HOWRD3
HEAD
HEADLM

HEADQ
HEADV
HEADW

HFIN
HF INU
HFOUT

HFOUTU

HICYL
HILIM
HILIMG

HILIMW

HLMTY
HNFERR

HOE

4
4

11-189
5 245

4-3880

10-556

20-44

20 44

20-42
20-44
5-3214

10-460

20-65¢0
20-660
10-462

10-467

13-8

4-4310
4-4320
4-4330

12-163
12-164
12-14}

12-190

4-4340

4-59¢
4-48¢
20-39

6-93
20-4}
20-649

19-24

19-

3-2200

41350

19-4

4-1110

4-360

5-298¢

2-80
2-86
2-80
2-840
20-30
2-80
2-80
4-589¢
5-3250

23-320

ISRPTY

I8SEG

IsSETU
ISSFT
I$SRv
IssuB

12-142

2-8¢
5-2360
2-8¢
2-8¢
2-80

2-8¢

c 860

19-2
2-8¢
20-230
2-8¢

2-80
16-139¢

SEQ 0139

)

20-44

4-389¢
4-490
4-580

20-2¢0
12-3¢0
4-4350
4-4360
4-4370
4-438¢
4-1230
4-1470

ISPROT
ItPTAB
I$PWR

v04.00

11-227
10-734

HROPRM
HRDWTS
HRIN
HRINU
HROUT
HROUTU
HSMSK
MSSTAT

I$MSG

3 MACRO VO4.00 20 JUAN 83 14:40:57 PAGE S-7

11 192
10 659

4-1450

I$AY
IsAUTO
ISCLN
IsOv
IS$HRD
ISINIT
I$M00

TES!T

(CREF

7090
3870

HOSTAT

HPTCOOD

1ABLE

13-10

12-190

12-144

20-41

g-ggt

16-21

16-22

16-23

16-42

16-47

18-24

18-25

18-26

18-27

18-58

19-22

6-77«

6-85¢

6-95

10-194

10-196

10-198

10-220

11-8

12-129

12-167

12-183

13-13

18-S3

4-9
5-2
S5-334

4-90
S5-2¢
5-3342

5-155

10-83

12-165
12-166
12-143

12-191

11-42
10-663

7-1160
8-5¢
8 250
20-11¢
6-40
4-7
4-814
5-327

11-243

7-380
8-23¢
8-27¢
6-1314
4-70
4-8140
5-3274

11-243¢

12-3

5-61¢0
S5-2600

12-3¢

S-47¢
5-¢384
5-290¢

5-59¢
S5-2580

5-734
S5-272¢

10-349¢

10-3960

12-7

13-2

9-51¢
13-2
17-2

9-53¢
14-2
17-9

9-674
14-21
17-9¢

4-34
5-287
6-3

19-166

S-750
5-273¢

4-340
5-2878
6-3¢

19-166¢

4-162
5-298
6-132

20-2

4-1620
5-298¢
6-1320

20-20

5-87¢
5-286¢

5-89¢

5-102¢

14-2

14-21

15-2

16-2

14-21¢
17-69

14-31
17-97

14-310
17-97¢

14-316
17-97¢

4-168
5-307
8-4

20-19

5-10406

4-1686¢
5-3070
8-4¢

20-190

4-578
5-309
8-29

20-22

4-5780
5-309¢
8-29¢

20-22&

4-589
5-325
9-3

20-73

5-1170

S5-119¢

S5-2220

S5 2242

16-60

17-2

17-9

18-2

15-2
18-2

16 2
18 75

16-60
18-75¢

16-60¢
18-155

16-139
18 155¢

19-64
20-50¢
9-450
12-7
16-139¢

CZRLNBO RLO1/02 DRIVE
C” )SS REFERENCE 1ABLE

ISR

IXE
JSUMF

Jud

L$ACP
L$APT
L SAUT

L$AUTO
LsCcP
L$CLEA

L$CO
L $DEPO
L$DESC
L $DESP
LS$DEVP
LS$DISP
L$OLY
LsDTP
L$DTYP
L$OV
L$OuUT
L$OVTY
LSEF
LSENVI
LSETP
LSEXP1
LSEXPA
LSEXPS
L $HARD
LSHIME
L$HPCP
LSHPTIP
L S

Ls$ICP
LSINIY
L $LADP
LS$LAST
L$LOAD
LSLUN
LSMREV

4-3606
4-479¢
4-360
4-360

6-39

4-790
4-1172
6-96
4-360
4-360

2-80

1940

18-18+
18-68
19-58
4-89

OOQOOOQOOOGQOOOO&OQQOO@OQO@OOOOOQG

IBE
IBUFF
10UV
IER
INITCO
INOQUTS
INTEBL
INTHLR

18 155¢
2 8¢
14-21
16-140
18-156

SLLLLLELLLLLDDLLLDLLLLDLLLLLLLLLDLDLLLE
[
[
S
]
[} 1} 1) [ t ) [} . t 1 1] ) )
[+ ]
cCOoN
L4
o
&
200
OGO OGOH
oG
OO
6O
¢
O

18797

TEST

(CREF

3 MACRO V04.00 20-JUAN 83
v04.00

)

’

14:40:57 PAGE S-8

1
SEQ 0140

19-2
12-7
14-32
16-153
18 170

19-64
12-7¢
14-46
16-1520
18-1706

19 640
12-195
14-46¢0
16-153¢
18-170¢

19-151
12-195¢
14-460
17-2
19-2

19-1514
12-195¢
15-2
17-20
19-2¢

19-151¢
13.2
15-24
17-9
19-64

13-20
15-10
17-45
19-152

5-202

10-599

10-794

10-902

11-32

13-29

13-57

4-91

16-68

16-104

16-134

18-83

18-114

16-19
18-46+
18-70
19-60

16-38»
18-47¢
18-71

16-39
18-55
19-18«

16-44¢
18-56
19-20+

9-12

9-16

9-17

9-24+

13-12
15-81
17-110
19-165

13-93
15-61¢
17-1100
19-165¢

13-930
15-81¢
17-1100
19-1654

18-147

19-72

19-112

19 145

16-45
18-58
19-40s

16-47
18-61
19-41+

16-50
18-62
19-49+

16-51
18-63
19-50

16-52
18-64
19-52

9-32+

9-33

9-37

13 93¢
16-2
18 2

14-2

14-20

14 2
18-2¢

16 -60
18-7%

16-53
18-65
19-55

16-54
18-66
19-56

16 -S%
18 67
19-57

9.57¢

16-17e
18-20»
18-69»
19-59

7-11¢0

8-50
4-100

5-332¢0

9-64+

B-25¢
4

114

20-3

$-299

6-40

20-75¢

20-36

5-2990

CZRLNBY RLO1/02 DRIVE
CROSS REF ERENCE TABLE
L SNAME
LSPRIC

L$PROT

8¢
.1

L$PRY
LSREFPF

LSREV
L$SOF
T
L$SPC
L$SPCP
L$SPTP
LS$STA
LSSW
LS$TEST
LSTIM
LSUNIT
L.BA
L.CS
L.DA
L.MP
L10000
L 10001
1 10002
L 10003
L10004
L10005
L 10006
L10007
L10010
L10011
L10013
L10014
L10015
L10016
L10017
L 10020
L 10021
L10022
L 10023
L10024
110025
L 10026
L10027
L10030
L10031
110032

110033
L10034
L10035
L10036
L10037
L 10040
L10041
LAB

LAB1

LAB2

TEST

(CREF

)

L 11
5-9

5£Q 014}

20-23¢0

5-310

5-3100

6-20
10-80C0e
10-111e
11-228
10-106e
10-102

6-28
10-806
10-112+
12-46
10-10810-515

S5-306¢
5-324¢

13-932

14-460

4-6240
4-6250

v04.00

14:40:57 PAGE

5 2900

20-23

16-140
16-139¢
17-45
17-69
18-156
18-155¢
19-152
19-151¢
20-3
20-23
6-380

3 MACRO v04.00 20 JUAN 83

15-81¢0
16-1530
17-1100
17-97¢
18-170#0
19-165#

20-114
20-500
11-228
11-229

6-56
11-228
10-113e
12-67¢
10-114
11-228

i?-};S

10-157

10-228

10-523

10-566

10-797+

10-798¢

10-121
15-29

10-801+
15-47

10-804¢

10-805

11-168

11-228

12-45

10 799

10-811

2¢

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO v04.00 20 JAN 83
CROSS REFERENCE TABLE (CREF Vv0O4.00 )
LABACF
LABACR
LABEXP
LABHCF
LABHCR

4 6810
4 6820
4-676&
4-679¢
4-6806

LABMID

4-6740

LABOCR
LABOUT
LIMVAL
LOCERR

4-6786
4 675
20-38
4-4534

12-189
12-187
20-41
13-25«

20-630
13-67»

LOE
LCOLIM

4-360
4-470

20-38

15-20

LABIN

LABOCF

LoCyL

4-6730

4-6770

4-600

LOLIMQ
LOLIM,
LO7

20-36
S5-3190
4-360

MANQ

20-33

MAOMDR
MAJINC
MAPROX

MBADAD

MBADSF

MBSETO

MCERR

MCONHN

MCYLOC
MCYLUP
MDATCP

MOCRC

MOHEDR

MOLTY

MDRDY
MORERR

4 192
4-4684

12-187

12-188

6-38

20-62¢0
6-40s
4-599¢
9-26+

20-600
1S5

4-61360

13-73

1260

4 204

4-6300

4-7540
4-182
4 180

4 7306

4-7326

4-7274
4-205

5-244
4 6040
4-597¢

5-176

10-429
4-7340

4-7434
5-160
10-10

MFMTER

4-6140

13-81

4-186

MHOERR
MHORCP
M¥FCRC

4-208
4-181
4-7334

4-7514
4-598¢0
5-168

4-7310

]

4-1

Him

MISWI

4-43:0

4-4686
20-39

20-27

20-33

20 33

9-40

11-208

10-537
17 74

10-691

11-71

20-26
20-42

20 27
20-42

4-6070

4-609¢
4-6100
4-5960
4-7480

MHINF

19-50

4-7526

4-188
4-19
4-174
4-213

4-729¢

19-19

5-229

MFWOSK
MFWSKO
MGTSTA
MHCERR

MHCRC

18-56

5-172

4-219
4-7600
4-7590

MFOLWR

18-19

4-7286

10-41

MOSERR
MERRS
MEXERS

4-207

16-45

10-244

10-35

MFLERR

13-89

4-6286

4-7440

4-6129

MDRRES

MORVST

G 0l42

12-192
12-193
12 187
12-190
12 191

4-6720

4-19)

ML11

14:40:57 PAGE S5-10

5-162

5-166

9-886

4-6060

20-26
20-39

9-20

20-26
20-42

20-33

20-36

20-39

10-362+
12-110+
14-43s

4-98¢0
4-718¢
4-459¢%
4 960
4-710
4-6190
4-7190
4-720¢
4-7220
4-7210
4-7238
4-1099
4-1970

6-5106
2-80
2-84
2-80
2 8¢
2-80
2-8%

11-227

6-93

10 460

10-467

5-159
5-205

5-208¢«

5-213

5-216

5 275

18-131

19-65

19-129

10-198+
10-480
12-145»
18-91+

10-201+
10-481«
12-148+
18-97»

5-280

11-204

17-78
5-280

5-282

11-51
5-252
10-364+«
12-113»
15-20»

10-194
10-377
12-117»
16-77»

10-196«
10-383
12-129+
16-83+

10-197
10-391
12-133+
17-16+

7-19
5-48

5-120

10-51«

13-24+»

6 90+
6-68

12 117

4-5910
4-745¢
4-7470

13-8

16 25

17-5

18 30

5 283+

10-52¢

10-598¢«

10 900+

10-914

10-926

10 933

10-205
10-609
12-152+

10-207+
10-765
12-155¢

10-208
11-112
12-167+¢

10-209s
12-25»
12-171s

10-211
12-38«
12-183»

10-220
12-95+
13-13»

10-354
12-98+
14 10+

19-26

13-84
10-32

4-6030

10-96

4-749¢%
4-746%0

5-207
4-594%

4-5950
4-6000

6-124
7-31
12-12

15-7
12-14
15-9

6-76»

(XY

5€Q 0143

11-205

18-76

10-133
5-160

S-11

)

16-121

16-61
4-592¢
4-593¢
4-6110
4-6080

N11
mmmmmmmm

€

14:40:57 PAGE

T OICIOOOYOOOYO
OO TIMMMMMM

4-605¢

v04.00

NOCTLR
NOERCT
NOIRPT
NOOP
NOPWR
NOTROY
NOTST1
NOTST4
NTST1A
NTST4A
NXMERR
NXTHL
NXTPAS
O$APTS
OsAU
0$BGNR
O0$BGNS
0sDU
OSERRT

4-756¢0
4-212
4-217
4-6260
4-173
4-177
4-179
4-758¢
4-402#

5-198s

3 MACRO V04.00 20 JAN 83

b b

NOCLR

4-6270
4-183

4-7500

Jo
o

MWDERR
MWGERR
MWORD
MWRCHK
MWRITE
MWRSET
MWRTAB
NEWCYL

189

10-46
11-165

MULOAD
MUNOEF

4 187
4 7570
4-602¢
4-175
4-216
4-215
4-6150

4-755¢
4-7530

MSPERR
MSTERR
MTMBS
MTOSLO

4-3690
4-185
4-623¢
4 910
4-178
4-176

6 15+
6-15

MSEEK

4 210
4-206
4-6310
4-6290
4 6010
4-209

(CREF

[+ RO QW N0 Fo X

MRE VSK
MRLF AL
MRSLT

S 3110
4 610

L bLLLLL o

MISWIW
MITEST
MNDRST
MNEERR
MNOCLR
MNOINT
MOPER
MOPERR
MORECE
MOUTIN
MPNAM
MQUALS
MREAD
MREADH
MRESKO

TEST

19-804+

19-86+

P PRI R

CZRLNBO RLO1/02 ORIVE
CROSS REFERENCE TABLF

S
CZRULNBO RLO1-/02 DRIVE TEST 3 MACRO vO4.00 20 JAN AT
CROSS REFERENCE TABLE (CREF v04.00 )
2
2
2
4

8e
8¢
8@
480¢

4 4190
4-4200
4

OFMIDy
OF QuUT
OoFoUTY
o OCYL

OROUT

OROUTY

OUTINS
P2T03E
P2T04E
P2105E
P2 T06E
P2T07€

P2T08E

P2T09%

P2T10€
P2T11E
P2T12€

PeT13E

P2T14€

P2T15E
P2T16E

P2T1T7E

P2T18E
P2T19%

PART1

PART2

PASCNT

W
PASNE

PASNM
PAT]

12 34
12-3S
10-193.

10 4780
11-161e

16 1346
19-75e
4

1140

4-1720
4 7060
4-702¢
4 7030
4-7040
4-425%0
4-4260
4-4270
4-4280

4 4290
4-4300

4-800

4-652°

10-50e

11-164.

16-136¢
19-112e
5-158

11-165

17-34
17-99
17-34

12-127
12-128
12-108
12-109
12-36
12-37
4-91

48
4 5¢
20 7S

4 50

S50

10 869
12 188

10 871

io 878

10-358+

10-479

10-480s

10-89
11 172
18- 76
19-114s
5-196
11-181

10-123
11-174
18-83e

10-597.
11-182
18-86¢
19 241

17-44

17 9

10 653
12 125

10 90}

17 %¢

10-793.
11 187
18-114.
19-143%

10 899«
11 190
18-116e
19-145s

10 910¢
16 -6}
18 1316

11-12e

16 -680
18 145

11 48
16 71
18 147¢

11 50

16 136

18 86

18- 114

18 145

19 75

19-112

19 147

12-188
12-188
12-79

19-129e

10 33
11-185

189

147

16 1040
18 ‘49

11 S3%e
16 106
18 (Sie

11
1%

15%e
leie

19 6%

12-189
12-189

1°-189

16-71

16-104

4-653%¢
4-6540

4-655¢0

4-6560

4-657¢
4 658«
4-0590
4-6600
4 6610
4-6629
4-6630

4-6644

4-6650

4-6662

4-6670
4-668¢
4-635

2 e
20-69

4-4520

16-122
18-136
19-130
6-50

4-4560
4 222

[PV
X7 Y, )

OPIERRA
OPMSGS
OPROO4
OPR12
OPR1A
OoPR18
ORIN
ORINU
ORTMMID
ORMIDU

12-19
12-126
12-106
12-107

s Pt gt pua

ONZWAP
DPFLAG

4 50
4.5
4-8
5-201

(VX _XT1,V}

O$GNSh
OsPOIN
Os$SETU
OBUFF
OF IN
OF INU
oFMID

14:40:5% PAGE

16-

17-10
18-3
19-3

17-«4

4-685
4-417

4-735

4-651

5-331

10-334

S5-328

6-99
10-485

10-27?7
10 583

20-29

20 56

10-846

20-25

20-35

20 47

20 52

12-24¢
16-124
18-138
19-132
6-540
6 29+

12-92e
16 127

12 115
16-142
18-158
19-139

12-131
16-146+
18-162+
19-154

12-150
18-8+
19-8e
19-158s

12-169
18 77
19-66

16-8s
18 79
19 68

16-62
18 82«
19 71e

16-64
18 85s
19 74

16 67
18 130ne

16-70s
18 132

19 134

12-93
16-129
18-143
19-136

6-S4

16-27

17-3

18-10

18 32

19 10

19-28

4-4820

18-141

4-773

10-752

19 9%

19.-98

20 61

16-120e

13-134
19 128+

POSHSB

POSHML

PRI

PRIOO

PRIOL
PR102
PRIC3
PRIO4

PRIOS
PRIOG
PRIO7

PRIOR

PSETNM

PWCON
PWRFLG
ROALHD

RDDATA

ROMEAD

RDONOHR
ROYCHK

ROYWAIL

READRL
RELOWT
RESE3
RESE4
RESES
PESE6

RESPAR

RESTAR
RESTBL
REVSKO
REVSKS
RLBA
RLBAS

RLCS
RLCSR
RLDA

RCv

¥
¥
¥
¥

4-360
10-660

10-337¢

4 5760

10-856
10-397¢
10-662¢

10-661¢
10-659¢
4-360
4-360
4 360
4 360
4-360
4 360
a-360
4 360
4-360
4-400

4-457¢

[

POSHDS

4-230

4 2220
10-247

Cl.

4.4830
4-5000
4 5170
4-5340
4-538¢
4-555¢
4 5570
4-5740

6-21

4-4610

PATS
PAT9
PATTIBL
PSS
PNT
POSHD"

2%1

223
224
-225
226
227
.228
-229

TEST 3 MACRO vO4.00 20 JAN 8% 14:40:57 PAGF
(CREF v04.00 )

PATE
PATTM

PATE

PATS

L X N

P Y10

Pufl
PaTS

CJRLNBO RLO1-02 DRIVE
CROSS REFERENCE 1ABLE

10-782¢
4-690
4-679
4-700

10-245
10-368

18-95

10-180
4
4

890
764¢

4-765¢

4-7680
4-769¢
4-3930

6-23

4-2040
4-840
4-820
4-101¢
4-3750

15-78

4-1000

10-252e

4-1060
4-1020
4-3770

798

6-61

6-127

7 24

6-111

8-17

8-19s

12-13%7

12-159

12 175

13-17

15-34»

15-53¢

17-59

10 13

12-40
10-411¢
10-673¢
18-101
10-29
10-89
5-207
5-207
11-217
5 216
11-202
6-420
5-187
4-91
4-91

10-19
$-279
17-34

5-138¢
10-807
10-18
S5-135e
5-137
11-28

11-24

10-520
12-29
19-84

12-121

14-15

15-24

16 81

16-87

17-20

9-64

10-11

10-492

10-795

11-225

17-60s

8-12e

8-13

10-38

10-75

10 126

15-33»
10-11

15-52¢

17-58¢

10-492

10-523

10-817

10-40

10-123
5-280
S 280

11-213
11-214

15-79
15-79

10-530+
6-98

10-806«
6-125

11-60e

6-116+

6-118
11-61s
10-531e
10-250e
6-125
12-186

10-914
11-234
19-141%

18-149
10-251s
6-62

17-99
S-140
10-811e
10-27
10-20
$-279
11-225

10-813
10-115e
10-114.
6 114
12-41

7-15

7-20

7-3%

12-46»

12-62¢

15-35s

7-29

8-10
15-54¢

10-529+

10-805

15-78

17-34

11-59s
7-3%
17-44

12-45e
8 12
17-50

7-16

7-20

7-28+

7-26

17-99

111

10-230

186

CZRUNRO RLO1/02 DRIVE
CROSS REFERENCE TABLE

RLMP

RLVEC

RGPWOP

RFIOP
RPTREM
RPTRES

ASTRT
SsLeM
SAMSK
SBSFIL
SECQ

SECWO
SEEK
SEEKOP
SEQMES
SETOON

SFTPRM
SGNWD
SHTHES
SPDSTA
SPTCOD
SRTMES
SSINDX

STAMES
STAMSK
STATE2
STATES
STATES
STOSTA
SUBS TK
SVCBGL
<
SvCGBL

4-103¢

14:40:57 PAGE

10-557

10 558

4.884

11-153

11-161

11-164

11-190

6-29¢
2.80

6-44
5.590

S5-730

5-870

5-1020
9.67¢

10-349

16 1530
4 122¢
& 47606
20-27
4-7100
4-668
4-87¢
4-7140
6-41
20 220
4 708¢
4 6698
4 1514
5-309¢
4-6700
4-3628
10-504
10-770¢
4-715¢
4-1430
4-7700
4-7710
4&4-7720
4-152¢
4-2350
12-?;7‘
-11e
2-8¢
4 8

17-97¢

17-1100¢

18-155¢

18-1700¢

19 1510

19 1650

20-118

20 S00

10-454s
20-540
11 192
10-229
11-153
11-147
6-53

109

13 63

158

11-187

S S2
5-56
5-55

7-380

5-61
5-224
5-290
5-327

8-4

12-3
20-75
2-80
4-8
4 8

6-96

S.64
5.70
5-69

8-23¢

8-16

s 78
5-84
S 83

8-270¢

S 92
5-99
5-98

9-51¢

S 107
S114
S-113

11 S8¢

5127
S-190
S-18A

5227
5255
5232

2EC 0146

10 21

3768

10 796

S-148

4 8
4 8
4-8
4-8
4-8
4-8
4-8
4-34

SVCINS

TEST 3 MACRO vO4.00 20 JAN 8%
(CREF vO4.00 )

1174

5 2220

326

i “le

17 S7e

S22
5254
S 353

523
5 269
5 568

52718
11 225
11 199¢

52360
349¢

S5 2580

195¢

S5 2720

1a%e

S 2860

S.3068

S 1240

& 1316

13 930

%10

14 ase

1T 818

i6-139¢

6-58¢0

11-189
12-185
10-85

15-77
6-17»
10-508+
10-783
5-193
10 120

10-65
10-571s¢
10-787+

10-69+
10-587
10-833s

10-162¢
10-591s
10-891

10-180
10-644+
10-895¢

10-184+
10-674
10-915¢

10-265+
10 678+
11-16

10-338
10 709¢
11-20e

10-342s
10-725
11-88¢

10-397«
10-729¢
11 144

10-412
10-741e
11 150

10 416¢
10-756

10-445.
10-760»+

10-67s
10-727+

10-68+
10-728¢

10-182+
10 758¢

10-183+
10-759¢

10-340+
10-785s

10-341¢
10-7864

10-414¢
10 893+¢

10-415s
10-89%4«¢

10 S06e
11-18¢

10-507¢
11 19

10 S39¢
11 148

10 590

10 676¢

4-7
4-8

4-8
4-8

+-8
4-8

4-8
4-8

4 8
4 8

4 8
4-8

4 8
4 8

48
4-8
4-8
4-8
4-168
5-61
5-224

4-8
4-8
4-8
4-8
4-168
5-75
5-224

4-8
4-8
4-8
4-8
4-168

4-8
4-8
4-8
4-8
4-589
S-75
5-238

4-8
4-8
4-8
4-10
4-589
5-89
5-260

4-8
4-8
4-8
4-10
5-2
5-89
5-260

4 8
4-8
4-8
4-10
5-2
5 104
S5-260

4-8
4 8
4 8
4-11
5-2
5-104
5-273

4.8
4-8
4 8
4-11
S 47
5-104
5-27%

4 8
4.8
48
4 11
S 47
5-119
5273

4 8
4 8
4 8
4-34
5 47

4 8
4 8
4 8
4 34
5-61
S 119
S 290

4-8
4-8
4 8

5-298
5-327
8-4
20-2
20-75

2-120
4
4

8
8

4-8
4-8
4-8

5-298
5-332
8-4
20-2
20-75¢0
4-8

4-8
4-8

4-8
4-8
4-8

5-75
5-238
5-298
5-332

8-5

20-2
4 8
4
4

8
8

4-8
4-8
4-8

5-299
5-332
8-5
20-3
4-8

4-8
4-8

4-8
4-8
4-8
4-8
4-8
4-8
4-8
4-589

5-89
5-238
5-299
6-3

4-8
4-8
4-8

4 8
4-8
4.8

20-3

5-299
6-3
8-25
20-3

5-309
6-3
8-25
20-22

S5-309
6-4
8-25
20-22

4-8

8-5

4-8
4-8

4 8
4-8

48
48
4-8

5-309
6-4
9-3
20-22
4

4-8
4-8

4.8
4-8
4-8

4
4
4

8
8
8

4 8
4 8
48

5 119
5-290
S 310
7 11

5-310
6-4
9-3
20-23

5-310
7-11
9-3
20-23

20 23

4-8

4 8

4-8

4
4

8
8

4 8
48

12 3

4
4

8
8

48
48
4 8

S 32?7
7-11
12 3
20 'S
4

4-8
4 8

pue

10-12
10-97
10-134
10-153
10-263

10-372

10-442
1C¢-491
10-492
10-493
10-550
10-396
)

10-153
10-263
10-372
10-431
10-442
10-492
10-12
10-97
10-147

10-492
10-493
10-550

10-11

19-13
10-134

10-147
10-258

10 350
10-388
10-431

10-491
10-492
10-493
10-539
10-554

[

)

]

[]

(]

GERI ) P\ =0 pot ot ot e

]

[]

Hro
O

ogquNgOuggag*gua

L X

[}

[]

N\) o

3 »

000~u0u°

~Nre e Q O

10-11
10-13

10-134
10 153
10-258
10-351
10-388

10-493
10-539
10-554

10-442
10-491
10-492

e DD DX

[CAVJV
JV RV P I 3

Y. X

Lt
o o

[

JUIVIVIVIV IV IV IV IC RV IV IE IV R B

FRERA
et R4 3 Rt

% ]

(VIVIV
IV IV IR R 3 3 J

>0dd

X
L X

>3 ®P

"&&&w&ggg
BB33a232088~

[ X7
1,3}
w0
[*X-1.Y)

VIRV IV IU JUIUTU R RV TV IV R0, R

OOOOOOONNNNNNMNOOOOOOOOMWMUUUU?WUUUM
[] 1] [] 1

1] + [
t []
e o gt ey

~NH NN

[]

284"

w
N

N NN

COOCOCRVVVNAVNVNARARNANNL
DL DD

s pos ps ps
NN
na
[+

NOOuNg

7-24
V- XXV-RV-RV.F.
Y. ENRNENEVES] SRRy, Y. X

%] ONN~NNCO

[] [] [} 4 ] [] [] 1]
[ 0 0l Lol g 0o peo gt b oy ()

OCOOVVIOVVOVEOEN

GG
= ) D~
X
WUWNN~N

[]

OOVOOVPRB®I~N~

UV e

[ [ 4 2 1] [] [] ] []
LN VY- ENTV AT Y7 )

O~NUWUWNN N

- L

Qe
= 1\ 2O (8 U8 (8 (ePP
Hre
O
UV

OCOOVOORBINNNNNNNANOOOCPOCRROR

~ e
~4 1)

L2
'
(] ] 1]
17] b (P
s P

OO OOV BNUNNNNNNIOOOROOOOORN

wnws Oud

h‘»fl w

OO OOOVRBANNNNSNNAROOCROROCOTVNVUVRNNNNNNALNDLD
DD
Gl Lt Qe =0 (N ~J QUM
DN pes o e
~NUHO NN
~NAUWFENO OWN NN
~Uns

9-37
[}

-280

-y

QODVOOVOOBIBI
N~

10-9

5-279

14:40:57 PAGE

)

(7NMSNN~
Y7 H#Nfl“fl““NthfiflflF*..P
SNV WO VW ~Unund
NN NV WD

Nmmmwnn;oaa »

[S XV V.20, IV V.

TEST 3 MACRO vO4.00 20 JUAN 8%
(CREF v04.00 )

)

6-8

COOOOBRENNNNNANNANARPRO
OO
[ B

e
e )
NNV
NUWNNNOG
VW=
O YWNNN
~Wn e

[V XV-XV.RV.2V. 7. J. ENENENENENEVENENY.
Y. ¥, ¥. Y. Y. ¥. Y.}

7-20

[ =0 0B
(1t 0 b ) =3 U8 U8 LS HTD
- O
NUNNNO
~NVuie=hN

~NwWNNNNO guum-

COOVVOVOVOVRBN~NI
NN

10-8
P

O ~

- [+ ) Gl et
e )

nw;w

NN
O O

7-22

OO VOOV OV®B®~NI~N~NN

~~uNON o

uuw»vqu&muwwnn

[

WOOVOOBBINNNNN
N~

CZRLNBO RiL0O1-02 DRIVE
CROSS REFERENCE TABLE

[
€0 0147

9-51

CZRLNBO RLC1/02 DRIVE
CROSS REFERENCE 1ABLE

10-562
10 611

10-630
10-702
10-767
10-820
10 914
10-929
11-52
11-73
11-86
11-147
11-148
11-152
11-165
11-185
11-189
11-189
11 192
11-192
11-204
11-213
11-214
11-217
11-225
11-227
11-227
11-228
11-229
11-229
12-12
12-14
12-57
12-185
12-186
12-187
12-188
12-188
12-189
12-190
12-190
12-191
12-192
12-193
13-12
13-82
13-85
15-7
15-9
15-41
15-45
15-65

15-77
15-78
15-79
15-79

TEST 3 MACRO v04.00 20-JAN 83
(CREF v04.00 )

10 562
10-611
10-630
10-702
10-767
10-820
10-914
10-929
11-52
11-73
11-86

11-147
11-148
11-152
11-165
11-185
11-189
11-189

11-192
11-192
11-204
11 213
11-214
11-217
11-225
11-227
11-227

11-228
11-229
11-229

12-12
12-14
12-57
12-185
12-186
12-187
12-188
12-188
12-189
12-190
12-190
12-191
12-192
12-193
13-12

13-82
13-85
15-7
15-9
15-41
15-45
15-65
15-77
15-78
15-79
15-79

10 562
10-623
10-630
10-702
10-767
10-825
10-914
10-929
11-67
11-7
11-86
11-147
11-152
11-165
11-181
11-185
11-189
11-189
11-192
11-192
11-204
11-213
11-214
11-217
11-225
11-227
11-227
11-228
11-229
11-229
12-12
12-53
12-57
12-185
12-186
12-187
12-188
12-188
12-189
12-190
12-191
12-191
12-192
12-193
13-69
13-82
13-93
15-7
15-9
15-41
15-61
15-65

15-77
15-78
15-79
15-81

10-562
10-623
10-630
10-702
10-767
10-825
10-914
10 929
11-67
11-73
11-86
11-147
11-152
11-165
11-181
11-185
11-189
11-189
11-192
11-192
11-204
11-213
11-214
11-217
11-225

11-227
11-227
11-228
11-229
11-229
12-12
12-53
12-57
12-185
12-186
12-187
12-188
12-188
12-189
12-190
12-191
12-191
12-192
12-193
13-69
13-82
13-93
15-7
15-9
15-41
15-61
15-65
15-77
15-78
15-79
15-81

10 562
10 623

10-692
10-702
10-767
10-825

10-914
10-929

11-67
11-82
11-86
11-148
11-152
11-165
11-181
11-165
11-189
11-189
11-192
11-204
11-213
11-214
11-217
11-225
11-225
11-227
11-228
11-228
11-229
11-229
12-14
12-53
12-185
12-186
12-186
12-187
12-188
12-188
12-189
12-190
12-191
12-191
12-192
12-193
13-70
13-82
14-21
15-7
15-9
15-41
15-61
15-77

15-78

15-78
15-79
16-60

14:40:57 PAGE

10 562
10-623
10-692
10-702
10-767
10-825
10-914
10-929
11-67
11-82
11-86
11-148
11-152
11-165
11-181
11-185
11-189
11-189
11-192
i1-204
11-213
11-214
11-217

11-225
11-22%
11-227
11-228
11-228

11-229
11-229
12-14
12-53
12-185
12-186
12-186
12-187
12-188

12-168

12-189

12-190

12-191
12-191
12-192
12-193
13-70
13-82
14-21
15-7
15-9
15-41
15-61
15-77
15-78
15-78
15-79
16-60

F 11)

10-562
10 623
10-692
10-706
10-767
10-825
10-914
10 929
11-67
11-82
11-147
11-148

11-152
11-165
11-181
11-185
11-189
11-189
11-192
11-204
11-213
11-214
11-217
11-225

11-225
11-227
11-228

11-228
11-229
12-12
12-14
12-53
12-185
12-186
12-186
12-187
12-188
12-189
12-189
12-190
12-191
12-192
12-192
12-193
13-75
13-82
14-31
15-7
15-9
15-41
15-61
15-77
15-78
15-78
15-79
16-139

SEQ 0143

10 562
10 623
10-692
10-706
10-767
10-825
10-914
10-929
11-67
11-82
11-147
11-148
11-152
11-165
11-181
11-185
11-189
11-189
11-192
11-204
11-213
11-214
11-217
11-225
11-225
11-227
11-228

11-228

11-229
12-12
12-14
12-53
12-185
12-186
12-186
12-187
12-188
12-189
12-189
12-190
12-191
12-192
12-192
12-193

13-75
13-82
14-31
13-7
15-9
15-41
15-61

15-77
15-78
15-78
15-79
16-139

10 611
10-623

10-692
10-706
10-820
10-825
10 214
11-52
11-67
11-82
11-147
11-148
11-152
11-165
11-181
11-185
11-189
11-189
11-192
11-204
11-213
11-214
11-217
11-225
11-225
11-227
11-228
11-228
11-229
12-12
12-14
12-53
12-185
12-186
12-186
12-187
12-188
12-189
12-189
12-190
12-191
12-192
12-193
12-193

13-75
13-85
14-32
15-7
15-9
15-45
15-61
15-77

15-78
15-78
15-79

16-140

10-611
10-623

10-692

10-706
10-820
10-825
10-914
11-52
11-67
11-82
11-147
11-148

11-152
11-165
11-161
11-185
11-189
11-189
11-192
11-204
11-213
11-214
11-217
11-225

11-225
11-227
11-228
11-228
11-229
12-12

12-14
12-53
12-185
12-186
12-186
12-187
12-188
12-189
12-189
12-190
12-191
12-192
12-193
12-193

13-75
13-85
14-32
15-7
15-9
15-45
15-61
15-77
15-78
15-78
15-79
16-140

10 611
10 630
10-692
10-706
10-820
10-914
10-914
11-52
11-73
11-82
11-147
11-148
11-152
11-165
11-161
11-185
11-189
11-192
11-192
11-204
11-213
11-214
11-217
11-225
11-227
11-227
11-228
11-229
11-229
12-12
12-14
12-57
12-185
12-186
12-187
12-187
12-1688
12-189
12-189
12-190
12-191
12-192
12-193
12-195
13-75
13-85
14-32
15-7
15-10
15-45
15-65
15-77

15-78
15-79
15-79

16-140

10 611

10-630
10-692
10-706
10-820
10-914
10-914
11-52
11-7%
11-82
11-147
11-148
11-152
11-165
11-181
11-18S
11-189

11-192
+1-192
11-204
11-213
11-214
11-217

11-225
11-227
11-227
11-228
11-229
11-229
12-12
12-14
12-57
12-185
12-186
12-187
12-187
12-188
12-189
12-189
12-190
12 191
12-192
12-193
12-195
13-75
13-85
14-32
15-7

15-10
15-45
15-65
1S5-77
15 78
1S5 19
15-¢9
16-140

10 611
10-630

10-702
10-706
10-820
10-914

10-914
11-52
11-73
11-86
11 147
11 148
11-152
11-165
11 181
11-189
11-189
11-192
11-192
11-204
11-213
11-214
11-217
11-225
11-227
11-227
11 228
11-229
11 229
12-12
12-14
12-57
12 185
12 186
12-187
12-187
12-188
12-189
12-190
12-190
12-191
12-192
12-193
13-12
13-75
13-85
14-46

1¢ 511
10-630
10-702
10-706
10-820
10 914
10-914
11-52
11-73
11 86
11 147
11-148
11-152
11 165
11-181
11-189
11 189
11-192
11192
11 204
11-213
11-214
11-217
11-225
11-227
11-227
11-228
11-229
11-229
12 12
12 14
12-57
12 185
12 186
12-187
12 187
12 188
12-189
12-190
12-190
12 9N
12-192
12-193
13 12
1375

13-85

159
15-10
15-45
15-65
15-77

15 9
15 10
15-45
15-65
15 77

15 79
15 79
16 153

15 78

15 79
16 153

SvCsuB

SVCTAG

20-39
20 a1
20-44
20-46
20-75
2-8¢
2-8¢
5-117
5-272
7-38

SVCTST
SWAPHD
T$$AUT
T$SCLE

TssDU
T$SHAR
TS$rmd
T$$INI
T1$8MSG

T$$PRO
T$$SEG
T$8SOF
T$$SRY
T$$5UB
T$8SM
T$S$TES

T $ARGC

10-396
14-4¢6
17-110
20-11
2-80
10 4670

7-110

8-5¢
8-25¢
20-3
5-299
6-40
S-47e¢
5-238¢
5-2900
10-349
20-23
9-450
14-210
5-310
12-70
17-20
4 8
4-80

5-193
S-207¢
5-2160
5-280
5-.2800

7-38

8-23
8-27
20-3¢
5-2990
6-131
5-59
5-258
10-349¢
20-23¢
9-51
14-31
5-310¢
12-195
17-45
4-8

4-80
5-193
5-207¢
5-216¢
5-280
5-280¢

20-33
20-38
20-39

20-42
20-44
20-48

20-75
14-21
5-59
5-117
5-286
8-23
10-396
15-81
18-155
20-11
12-7
16-147

S-73
5-272

14-2

19-159

5-75¢
5-2730

20-42
20-44
20-48
20-75

18-75

5-73
5-222
5-306
8-27

12-195
16-139
18-170
20-50
15-2

20-41
20-42
20-46
20-48

19-64

5-73
5-2%6
5-306
8-27
13-93

oo agooRURRYY

5-7%

5-236
5-324
8-27

16-139

13-93
16-153

16-2

17 2

18-170

20-9

N NN 0t s 3t ot gud ot Pt Bt Pt gt
OOOWNNNSNNNNNN

20-7
20-9
20-26
20-33
20-38
20-40

NN I A 1ot ot pud ot Dut put ot P P Pt
OOOOVWNSNNNNNSNNS

20-5

17-34
17-34
17-41
17-44
17-68
17-75
17-86
17-99
17-99
18-156
20-3
20-5
20-7
20-9
20-26
20-33
20-38
20-41
20-42
20-46
20-48

»
EIGERFER2E
(=]

18-155
19-152
20-5
20-7
20-8
20-23
20-33
20-38
20-39
20-42
20-44
20-48
20-75
16-60
5-59
5-222
5-286
8-23
12-195
15-81
18-155
20-50
13-2
18-163

17-34
17 34
17-41
17-44
17-68
17-75
17-86
17-99
17-99
18-156
20-3
20-5
20-7
20-9
20-26
20-33
20-38

17-99
17-99

17-34
17-34
17-41
17-44
17-45
17-75
17-79
17-99
17-99
18-156
19-165

LRV

20-6
20-8
20-11
20-27
20-37

17-45
17-69
17-79

17-34
17-41
17-44
17-45
17-75
17-79
17-99
17-99
18-156
19-165
20-5
20-7
20-9
20-26
20-33
20-38
20-40
20-42
20-44
20-48
20-75
17-9
5-59
5-222
5-306
8-23
12-195
16-139
18-155
20-50

17-69
17 79
17-97
17-99
18 75
19 1S2
20-5

17-34

[]

17 a4

17-34
17-34
17-41
17-44

a1
a4

17-34
17-34
17-41
17-44
17-45
17-69
17-79
17-99
17-99
18-155
19-152
20-S
20-7
20-8
20-23

[]

17
17

17-9
17-34
17-41
17-44
17-44
17-69
17-79
17-97
17-99
18-75
19-1S2
20-5
20-6
20-8
20-11
20-27
20-37
20-39
20-41
20-44
20-46
20 75
2-10¢
2-13¢
5-117
5-286
7-38
10-396
15-81
17-110
20-11
2-90
14-37

NN NN A 1 pmb 2 Pt Pt gt Pt (b b Pt
00000 OOWMN~N~NN~N~N~NN~

%G 0147

<9°
0

18-170

5-87
5-286

5-89¢

5-102

S 1040

S 117

1198

5 222

17 34
17 41

17-34
17 a1

17-68

17 68

17 a4
17-44
17-79

17 86
17

17.44
17-44
17

17-8¢

17-110
19-151
20 4
20 6
20-8
20 9
20-27
20-36
20-39
20-41
20-44
20-46
20-50

17-110
1% 151
20-4
20-6
20 8
20-9
20 27
20-36
20-39
20-41
20-44
20 46
20 SO

S 102
5.272
6 131
9 67
14-46
17 97
19-165

5-102
5.272
7 38
9-67
14 46
17-110
19 165

5 2249

S 236

10-396¢
9-67

16-139

17-9¢

17-69

17-97

18-75¢

18-155

19-640

19 151

13-12
18-2¢

13-93

14-2¢

14-32
19-2¢

14-46
19-152

15-2¢
19-165

15-10

15-81

16-2¢

4-8

4-80

4-8
5-160

5-193¢
5-207¢
5-279
5-280
5-282

18-156
4-8
5-160
5-193¢
5-207¢
5-279
5-280
5-282

18-170
4-8
5-160

5-207
5-207¢
5-279
5-280
5-282

4-8
VAN

GLle

14:40:57 PAGE S-17

TN ) ot gt s o Pt b ot Pt b st
OOOMNNNNNNNN~N

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO vO4.00 20-JAN 83
CROSS REFERENCE TABLE (CREF v04.,00 )

-160
-207
-216
-279
-280
-282

4-8
5-160

5-207
5-216
5-279
5-280
5-282

4-8
5-160¢
5-207

5-216
5-2719
5-280
5-282

5-1600
5-207
5-216
5-279¢
5-280¢
5-282

5-160¢
5-207
5-216
5-279¢
5-280¢
5-282

5-160¢
5-207
S 216
5-2790
5-280¢
5-2828

16-140
4

S 193
5-207
5.2168
S-279¢
5-280¢
5.2820

153

8¢

S 193
5.2070
5-2162
S 279¢
$-280¢
5-2820

CZRLNBO RLO1/02 ORIVE
CROSS REFERENCE TABLE
S 282e
6 125
7-20
7 31
7-33¢

10-11
10-491
i0-493
11-147

11-152e
11-181¢
11-189
11-192
11-204
11-214
11-225
11-227
11-228
11 229
12-12
12-185¢
12-187
12-188
12-189
12-1909
12-1910
12-193
15-9¢
15-78¢
15-79¢
17-340
17-44

T$CO0DE

TSERRAN

TsEXCP
TS$FLAG

TSGMAN

TsHILI

17-99
20-4
20-6
20-80
20-27
20-36
20-38
20-40
20-42
20-430
20-48
2-8¢
10-372¢
10-562¢
10-767¢
11-82¢
15-410
17-86¢
20-5
20-46

13-12
17-45
2-8e

20-5

TEST 3 MACRO v04.00 20-JAN 83
(CREF vO4.00 )

5-282¢
6-125¢
7-20
7 31
7-33¢

10-11
10-491¢
10-493
11-147
11-152¢
11-185
11-189

11-192
11-204
11-214
11-225
11-227
11-228
11-229

12-12#
12-186

12-187
12-188
12-189¢
12-190¢
12-192
12-193¢
15-77
15-78¢
15-79¢
17-34¢
17-44
17-99¢

5-282@

6-1250
7-20
7-31

7-35
10-11

10-491¢
10-493¢
11-147
11-152¢
11-185
11-189%¢
11-192
11-2040
11-214¢
11-225
11-227
11-228
11-229
12-12¢0
12-186
12-187
12-188¢
12-189¢
12-190¢
12-192
12-193¢
15-77

15-78¢
15-79¢

5-2820
6-125¢
7-20

7-310
7-35

10-11
10-492
10-914
11-147¢
11-165
11-1685
11-189¢
11-192
11-204¢
11-214¢
11-225
11-227¢
11-228¢
11-229
12-14
12-186
12-187
12-188¢
12-189¢
12-190¢
12-192
12-193¢
15-77
15-78¢
15-79¢
17-340
17-440
17-99¢
20-40
20-6¢
20-9
20-27¢
20-36¢
20-38¢
20-40
20-424
20-44
20-48¢
10-134
10-431
10-623
10-825
12-53
15-61

6-124
6-125¢0
7-20

7-310
7-35¢0

10-11¢
10-492
10-914
11-1472
11-165
11-185¢
11-189¢
11-192
11-204¢
11-214¢
11-225¢
11-227¢
11-2286
11-229¢
12-14
12-186
12-187¢
12-188¢
12-189¢
12-191
12-192
12-193¢

14:40:57 PAGE

6-124
6-125¢0
7-20

7-33
10-10
10-110
10-492
10-914

11-148
11-165
11-185¢
11-189¢
11-192¢
11-213
11-217
11-225¢
11-227¢
11-228¢
11-229¢
12-14
12-186
12-187¢
12-188¢
12-189¢
12-191

H1.°
S

6 124
6-126

7-200

7-33

10-10
10-11¢
10-492
10-914
11-148
11-165
11-189
i1-189¢
11-192¢
11-213
11-217
11-225¢
11-227¢
11-228&
11-229¢
12-140
12-186
12-187¢
12-188¢
12-189¢
12-191
12-192¢

15-7

S€Q 0150
6-124¢
6-126
7-200
7-33

10-10
10-11e
10-492
10-914
11-148
11-165¢
11-189
11-189¢
11-192¢

11-213
11-217
11-2250
11-227¢
11-2284
11-229¢
12-14¢
12-186¢
12-1870
12-1808¢
12-190
12-191
12-192¢
15-7
15-77¢

15-79
17-34

6-1240
6 1260
7-200
7 33

10-10
10-11¢
10-492
10-914
11-1480
11-1650
11-189
11-189¢
11-192¢
11-213
11-217
11-225¢
11-227¢
11-228¢
11-229¢
12-185
12-186¢

6-125
7-19

7-200

7-3%
10-10¢
10-12
10-492¢
10-9140
11-148¢
11-165¢
11-189
11-189¢
11-192¢

125

719
7-200
7-33

6 125
719
7 22
7

330

125

196

6-12%
7

190

7 22
7 3%
10-11
10-491
10-4920
10-9140¢
11-152
11-161
11-189
11-192
11-204
11 214
11-225
11 227
11-228

7-22@
7-330
10-11
10-491
10-492¢
10-9149¢
11-1%52
11 181e¢
11-189
11-192
11 204
11-214
11-225
11 227
11-228

12 12
12 185¢
12-187
12-188

12 12
12 1850
12-187
12 188

10-10#
10-12
10-492¢
10-914¢
11-152
11-181
11-189
11-189¢
11-192¢
11-213¢
11-217¢
11-227
11-228
11-229
11-229¢
12-185
12-186¢
12-168
12-189
12-190
12-191¢
12-193
15-9
15-78
15-79
17-34
17-44
17-99

10-10¢
10-12¢
10-422¢
10-9140
11-152
11-182
11-189
11-192
11-192¢
11-213¢
11-217¢
11-227
11-228
11-229

20-5¢
20-8
20-26
20-33¢
20-37¢
20-39¢
20-41
20-43

20-6
20-8¢
20 26¢

20 46

20 S5
20-8
20-26@
20-33¢
20-37¢
20-39¢
20-41¢
20-43
20-460

20-6
20 8
20-26¢

20-43
20-46

20-50
20-7¢0
20-26
20-33¢
20-537
20-39¢
20-41
20-43
20-46

20-40
20-410
20 43¢
20-469

20 40
20-410
20 438
20 469

10-153¢
10-539¢
10-692¢
11-52¢
13-75¢
17-68¢

10-258
10-550
10-702
11-67
13-82
17-75

10-258¢
10-5504
10-702¢
11-67¢
13-82¢
17-75¢0

10-263
10-554
10-706
11-73
13 85
17-79

10-263¢
10-5548
10 7068
11 73¢
13-85¢

17-79¢

20-38

20-38¢

20-41

20-410

20-44

2V 440

12-187¢
12-189

12-190
12-191
12-192¢
1S5-7¢
15-78
15-79
17-34
17-41@
17-99

11-213¢
11-217¢
11-227
11-227¢
11-229
11-229¢
12-185
12-186¢
12-188
12-189
12-1%0
12-191
12-192¢
15-7¢
15-78
15-79
17-34
17-410
17-99

11-229¢
12-.85

12 186¢
12-188
12-189
12-190
12-191¢
12-193
15-9
15-78
15-79
17-34
17-44
17-99

11-229

12-189
12-190
12-191¢
12-193
15-9
1S 78

1S 79¢
17-340
17 4a
17-99

11 229

12-189
12-190¢
12 1912
12-193
15 9¢
15 78

1S 79¢
17 340
17-44
17 99

15-45

17-340
17-449
17-99¢
20-4
20-6¢
20-9
20-27
20-36¢
20-38
20-40
20-42
20-44
20-48
10-97¢
10-388¢
10-611¢
10-820¢
11-86¢
15-450

20-5¢
20-464
13-12
17-45

20-6
20-48
13-12¢
17-45¢

20-68
20-48¢

13-12¢
17-450

15-10

18-156

15-10¢
18-156¢

15-10¢
18-1560

16-140
19-152

16-140¢
19-152¢

16 1402
19 1500

20 5S¢

20 6

20 66

20-38

20-384

20-41

20-41¢0

20 a4

20 44e¢

20-4
20-6¢
20-8¢0
20-27
20-36¢
20-38
20-40
20-42
20 43¢
20-48
10-97
10-388
10-611
10-820
11-86

20-5
20-7¢
20-26
20-33
20-37
20-39
20-41

20 36
20-37¢

20-36
20-370

10 372
10-S62
10-767
11 82
15 41
86

11
«

CZRULNBO RLO1/02 DRIVE
CRUSS REFERENCE TABLE

TSLAST
TsiLl

T$ISyM

TSLTNO

TENEST

TSNS1

20 73

20-48¢

20-5¢

20-6

20-64

20-46

20-468

20-48

20-48¢
5-73

5-87

6-131
17110

7 38
18 155

8-23
18-170

8-27
19-15

9-51
19-165

9-67
20-11

12-195
20-50

2.8

4-7

4-9

4-8140

S5-2

5-2

S-47

20-S
2.8

20-75¢

4-1620¢

8¢

168

S5-73

5-102
S-222
5-258
5-286
5-294¢
5-307¢
S5 325¢
6-131
7 38¢
8-27
9-51
10-396
12-195
14.21
15-81
16-153
17-110
18-170
19-165
20-11
20 37

19-165
20-11
20-40

5-309¢

5-325

4-70

20-2¢0

S-47¢

8 25¢

15-20

TIPTNU

S$-19

20-468
20-75¢

5-.2380

TENS2

14:480:57 PAGE

20-46
2-860

5-73

T4NSO

TEST 3 MACRO v04.00 20 JUAN 83
(CREF vOo4 00 )

20-40

14-21¢

2-80

5-102
5-222
5-258
5-286
5 298
5-309
5-327
6-131
8-4
8-27
9-51

10-396
12-195
14-21
15-81
16-153
17-110
18-170

20-19

5-59

5-258

8-27

15-81

20-43
14

5-59

4-168

5-73

5-102
5-222
5-258
5-286
5-298
5-309
5-327
6-131
8-4
8-27
9-51
10-396
12-195
14-21¢
15-81
16-153
17-110
18-170
19-165
20-11
20-43

4-340

5-327¢

20-22¢
S5-618

5-2608
9-45¢

16-2¢

4-°

€

.80

730

20-7

4-578

5-75

20-7e
5-102

4-578

S-75

20-9
5-117

5-23%6

38¢

5-258

4-34

S5-470

5-59

S-75¢

6-3¢0

6-132

5-73

5-75¢

5-272

5-2730

4-57860

5-87

4-589

5-59

5-87

S5 286
16-139

S 306
.6-15%

S 324
17 97

4-34¢
4-589¢

4-162

4-162
4 814

4
4

$.61
S 89
$-119
S 238
S 273
5-294
5-307
S-325
6-4
7 38
8-25

S 6l
5-898
S 119
S 2380
S 2736
S 294
S-3¢7
S 325
6-40
7 38
8-25¢

10-349
12-7
14-2
15-2
16-139
17-97
18-155
19-151
20-3
20 23

10 349e¢
12-7¢
14 -2¢
15-20
16-139¢
17-97¢
18-155¢
19 1510
20 30
20 23¢

5-59¢
5-87¢
S-117¢

162
814

8-40

8-29

5.298¢
12-3¢

5-307
19 166

5-87

5-89¢

5-102

5-1040

5-117

5-286

5-299¢

5-306

5-3100

S5-324

5 2240

S5 236

9-67

10-349¢

5-2¢

12-7¢

12-195

19-151

18-170

19-2¢

16-60¢

16-139

17-9¢

17-97

18-75¢

18-155

19-64¢

10-349

10-349¢

10-396

10-396¢

10-396
12-70

13-20

14-2¢

14.21

14-21

14-21¢

15-2¢

16-2¢0

16-60

Y $1AGL

1;-:0

17-9¢

18-2¢

18-75

18-75¢

19-2¢

19-64

19-64¢

TSTAGN

2-80

5-47

S-47

S-474

5-61

5-61¢

5-75

S-75¢

5-104
5-273
6-40
9-53
15-2

5-1040
5-273
7-11
9-53¢
15-2

5-119
5-273¢
7-11
12-7
15-20

5-119
5-290
7-110
12-7
16-2

5-119¢
5-290
8-5
12-70
16-2

5-224
5-290¢
8-5
13-2
16-2¢

S5-224
5-299
8-5¢
13-2
16-60

5-2244¢
5-299
8-25
13-2¢
16-60

5-238
5-299¢
8-25
14-2
16-604

5-238
5-310
8-250
14-2
17-2

18-75¢

19-2

8-50

19-165

10-349

18-75

9.45

5-287

10-396

18-2¢

18 75

S5-272

15 81

7-38

4-814

17-110

18-2¢

20 -440

7-110

4-5890

11-243¢
13-98
14-46
16-60
17-9
18-75
19-64

17-2¢

18-2

o0 44

19-166¢
20-19¢
20-73

9-67

2-8¢
2-80
10-349¢
2-80

18-2

20-410

5-1*/
S «36
2-272
5-290
5-306
5-324
6-3
7-11
8-23
9-3
9-67
12-3
13-93
14-46
16-600
17-9¢
18-75¢
19-64¢
20-2
20-22
20-73

TSSAVL
TSSEGL
TSSEKO
TSSUBN

17-9¢

20-41

S-117
5-236
5-272
5-290
5-306
5-324
6-3
7-11
8.2T
9-3
9-67
12-3
13-93
14-46
16-60
17-9
18-75
19-64
20-2
20-22
20-73

4-578

5-117
5-236
5.272
5-287¢
5-306
5-324
5-334¢
6-132¢
8-23
8-29¢

4-589

16-153

20-50

4-578

5-334

9-53¢

4-9

5-1040
5-22406
5-260¢
5-287
5-299¢
5-3100
5-334
6-132
8-5¢0
8-29
9-53¢
11-243
13-2¢
14-310
16-2¢
17-20
18-20
19-2¢
19-166
20-19
20-S508

9-51

5-222

14-46

5-104
5-224
5-260
5-287
5-299
5-310
5-334
6-132
8-5
8-29
9-53
11-243
13-2
14-31
16-2
17-2
18-2
19-2
19-166
20-19
20-50

20-73

14-31

5-104
5-224
5-260
5-287
5-299
5-310
5-334
6-132
8-5
8-29
9-53
11-243
13-2
14-31
16-2
17-2
18-2
19-2
19-166
20-19
20-50

4-1680

13-93

$-102¢
5-222¢
5-2588
S5-286¢
5-298¢
5-309¢
S5-327¢
6-1310¢
8-44
8-27¢
9-51¢
10-3964
12-195¢
14-31
15-81¢
16-153¢
17-110¢
18-170¢
19-165¢
20-11¢
20-50
4-162

G 0151

19-20

16-60

16-60¢

5-89
5-2380
5-310

5-89
5-260
5-3100

9-45

14-20
17-2
19-64

9-45

14-21

17-2¢
19 64

9.45¢

8 23

14-2@
20 238

14 46
20 %7

17 2¢

17 9

S 89
S 260

6-4
9-450

14-21
17 9
19 640

S 104
S 260¢

6-4
9 53

14-21¢
17-9
20 3

J1e

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO v04.00 20-JAN 83 14:40:57 PAGE S 20
CROSS REFERENCE 1ABLE (CREF vO4.00 )

TSTEST

TSTSTM

20-74
20-11¢
20 27¢
20-38
20-410
20-440
20 500
2-80
16-2
19-2¢
2-8¢
5-279
6-96
7-33

T$7ST75

10-8
10-372
10-630
11-147
11-228
12-193
15-10
17-34
18-156
2-80
4-3840

ot -t -

.DA
.ORIV

4-383¢

.STATY

125782
1257T8L
73
3.1

1306
713065
1307%
73104
73100

10-424
12-55
4-385¢
4-1930
4-386¢
17-82
4-391¢6

5-332
5-332

4 -2604
4-2470

5-332
14-210
14-12¢
14-7
14-200
14-11e
16 244

4-90

5-102¢
S 287e
S 332
5-332¢
7-38

11-243
15-10
17-97
19-165
20-5#
20-8
20-19
20-33
20-38
20-410
20-46
20-73
12-7
16-2
19-64
5-59
5-280
6-97
7-35

10-10
10-388

10-692

11-148
11-229
12-195
15-41
17-41
18-170
12-7¢
9-60+
5-131
10-435
15-43
9 61
6-72¢
5-148
17-104
5-230
12-7¢

20 23

4-162

5-117
5-294
5-33%2
5-332¢
7

38¢

11-243¢
15-10¢
17-97¢
19-165#
20-5¢

20-8
20-19¢

20-33
20-38¢
20-41¢0
20-46
20-73¢

12-7
16-2¢

20-75
5-73
5-282
6-124
7-36
10-11

20-23

20 230

5-117¢
5-294¢0
5-332
5-332¢
8-23
12-195
15-81
17-110
19-166
20-6
20-8
20-26
20 53
20-38¢
20-42
20-46

5-222
S 306
5-332
5-332¢0
8-230
12-195#

4-162¢

12-7¢
16-60
5-87
5-286
6-125
7-37
10-12

4-578

4 5780

814

18-156
20-4
20-60
20-9
20-260
20-36
20-39
20-429
20-48

13-20
17-2¢

14-2
17-9

14-2¢
18-2

14-21
18-20

15-2
18 75

5-160
6-12
6-128
8-9

5-216
6-22
7-19
8-21

5-222
6-43

5-236
6-46

11-189
12-185
13-85
15-78
17-75

5-193
6-13
6-131
8-16
10-134
10-493
10-914
11-192
12-1686
13-93
15-79
17-79

8-23
10-258
10-554
11-67

12-188
14-31
16-60
17 97

11-214
12-189
14-32
16-139
17-99

8-27
10-263
10-562
11-73
11-217
12-190
14-46
16-140
17-110

13.2
17-2

5-117
6-11
6-127
8-

5 59¢
5-2580
S 3240
5-332
5-334
9-51

14-31
16-153
18-170
20-4¢
20-7
20-9
20-27
20-36
20-39¢
20-44
20-48

13-2
17-2
-1 02
-8
-1 26
-38

8140

S 730
5-272¢
5 3258
5-332
6-131
9-67
14-32
17-4%
19-152
20-5
20-7
20-9¢
20-27
20-364
20-41
20-44
20-480

20-26
20-33¢
20-38¢
20-42
20-460

15-81e
17-110e¢
19-1664
20-6
20-8¢

5-7%
5-272
S5-325
5-332
5-3340
9-51¢0
14-310
16-153¢
18-170#
20-40
20-7
20-90
20-27
20-36¢
20-39¢
20-44
20-48¢

8-27
13-12
16-139
18-155
20-4
20-6
20-8¢
20-26
20-33¢0
20-39
20-42
20-460

10-97
10-492

5-2360
5-3070
5-332
5-332¢
8-29
13-93
16-140

7 20

10-13
10-442
10-767
11-181
12-53
13-75
15-65
17-68
19-152
15-2¢

10-14
10-491

16-2¢

17-2¢

18-2¢

5-194

5-196
10-543
17-80e

9-59¢
10-552
17-84

10-18+
10-685

10-33
10-696

10-91
10-823

10-139
11-69

9-62¢

10-199
10-21e

10-224
10-83

12-96
10-85

12-111
10-119

12-146
10-141

16-30
11-229

18-37
17-24

10-119«

10-120+

14-16

14-18

14-38

14-45¢

14-23¢
16-48

14-33
16-148

14-354

14 39s

10-396
10-702
11-152
12-12
13-12
15-45
17-44

19-64
13-20
10-19»
5-150
10-440
15-63
10-20s
6-74

10-431
10-706
11-165
12-14

13-69
15-61
17-45
19-151
14-2¢
11-229
10-535
17-72
11-229

10-820
11-185
12-37
13-82
15-77
17-69
19-165

13-20

14-2¢

14-42
14-13
14-36
14-19
16-46

5-236
5-307
5-3%2
5-332¢0
8-270
13-12¢
16-139¢
18-155¢
20-4
20-60
20-80
20-269¢
20-33¢
20-39
20-420
20-460

5-2220
5-306¢
5-332
5-332¢

5-102
5-287
5-332
5-332¢
6-1320
10-3960
14-460
17-69¢
19-152¢
20-50

20-3¢

4.9

~d P2

20 3

~ooun

TSTEMP

56€Q 0152

10-825

10-153

10-550

11-52
11-213

7-22

5 87

5.870

5-33%2

S .286

S -2860

5-3%2
6-1310
9-67¢
14 -32¢
17-45¢
19-151¢
20-%
20 7e¢
20-90
20-27¢
20-360
20-41

$-33%2
6-1%2
10-39¢
14-46
17-69
19 1S2
20-5
20-7¢
20-11
20-27¢
20-38
20-41

20-48¢

20 50

20-440
15-2
19 2
S 258

6-49
7-26
9-10

10-349

20-440
15 2@
19 2
S 272
6-63
7-3%1
9 30

10 350

10-611

10 623

12-191

11-82
11-225

11-86
11-227

192

15-7
16 153
18 75

15 9
17 9
18-15%

10-145
11 77

10-261
11 84

10-370
11-229

19-33
17-39

17 76

17-81e

1K1 ¢
CZRLNBO RLO1/02 DRIVE
CROSS REFERENCE TABLE
13101
1731658
7132048
132654

13300
733018
133654
T3378L

134008
734018
134654
T4
1S5
15.1
16
16.1
17
17.1
18
78.1
TAG
TBLSTR

187

TCERR

TEMP
TEMPO
TEMP]
TEMP2

TEMP3

TEMPA

TEMPS
TEMPE
TEMP?
TEMPS
TIM.US
TIME
TOSLOW
TRPFLG
TRPHAN
TSTINT
TSTLAB
TYPDR

UAM
ULOAD
UNDTST
UNXERR
VALDES
VCNRST
VCSTAT
VECMSG
VECT
VERMDR
VFERPOS

16 590
16-7
17-989
17-7

18-280
13-740
18-7
4-2740
18-160

19-25¢
19-630
19-7
5-332
5.332
16 -604
5-332
17-90
5-332
18-750
5-332
19-640

4-367¢
4-373¢
4-2750
4-7170
4-4650
4-408¢
4-409¢
4-4100
4-3110
a4-412¢

10-513

4-41%¢
4-4149
4-4150
4-4160
4-4660

S-139

4.950
4-4600
7-13

10-500

4-6340
4-410
4-360
4-780
4-705¢
4.6330
4-67160
4-6320
4-1490

20-6

4-390

10-586
10- 7550
19-92

TEST 3 MACRO vO4.00 20 JAN 83
(CREF v04.00 )

16-151
16-41
17-103
17-105
18-57
18-168
18-169¢
16-16
18-165
19-51
19-163
19-43
13-2¢
16-2¢

14:40:57 PAGE S-21

16-1520
17-108
17-109¢
18-59

18 49

16-21e
19-17
19-53

16-22¢
19-22¢
19-160

16 23
19-23»

16-74
19-24.

16-144
19-77

16-149
19-156

18-17
19-161

18-24s

18-25¢

16-1444
18-60

16-149«
18-89

18-72»
19-54

18-160e
19-78

18-165¢

19-61s

19-156+

19-161s

10-600
10-248

11-4.

11-6»

11-45

11-56

5-146
10-59

5-191
10-60+

5-193
10-62

13-26+

10-63»

13-43¢
10-73

15-45

13-59

10-108

13-63«
13-61
11-27
12-42+

13-68¢
13-64+

13-76
13-11

12-62

12-67

10-136

10-253

10-426

10-532

10-689

11-62

15-13

16-5

17-11

18-5

19-5

12-123

12-139

12-161

12-177

13-19

18 164

18-26e

18 27

18 258

10-155

10-166¢

10 500

10-502¢

12-48

12-64

15-36

15-55

17 61

14-17

15 26

16 89

17 22

18-103

19-1640

17-2¢
18-2¢
19-2¢

16-56+
16-49
5-216
9-40+
9-20e

10-176+
5-130s
10-56
10-564
13-22+
13-23s
11-7«
12-40«
9-T7s
9-60

7-12»

8-7
12-16
11-152
20-8

16-73
16-75
10-914

9-65+
9-652
10-178»
5-145¢

10-57+
13-27
13-28

11-14»
12-41s
9-25¢
10-116
7-17
9-494

10-99

9-49«

13-4

14-5

20 8

20-8

10-149
12-185
10-143
10-141
20-140
20-6

20-6

12-31

12 68

15-77

104

CZRLNBO RLO1/02 DRIVE
CROSS REFERENCE TABLE
WALITIN

WCMSK
WCPNG
WDECTA
WGESTA

WLSTAT

WRTSWI

WIDATA
X S$ALWA
X$FALS

X$OFFS
X$ TRUE
XDELAY

XRDHD
XRDHDC
XROHODG
AREAD
XREADG
XSEEK

XSEEK]
XSEEKT

XTIME

XWRIT1
XWRITE
XWRITY

TDELAY

10-25¢

4 1350
4-1360
SEE

2 1558
4-1500

4-1530
4-372¢
18-152¢

4-680
2 8¢
2-80¢
2-80
2-8¢

4-462¢

11-62+
10-502¢

10-5008
10-501

11-140
11-13
10-178¢
18-92
10-177
10-1760
6 121
11-5
11-60
11-40
4-4630
10-128+

TEST

3 MACRO vO4.00 20-JAN 83
(CREF VO4.00 )

10-151

14:40:57 PAGE

S5-22

2EQ 0154

10-256

10-560

10 818

11-65

12-51

15 39

15 59

17-66

16-72«
18-157
11-7

17-81
17-39
16-97
19-76¢
17-49

17-104
16-105+
19 105

16-109
19-113

16-119+
19-117

16-126¢
19-127+

16-141s
19-138s

18 A7e
19-148.

18-107
19-153+

18-115¢

18-119

18-12%

18-1400

20-37
20-37

20-40
20-40

20-43
20 43

$5-139s
12-48»
10-732

9-8
12-64»

15-36+

15-55¢

17-61»

9-18+

9-65

9-65¢

10-116+

10-136+

10-253¢

10-426¢

10-532+

10-689s

14-26

16-111

17-30

17-92

18-121

19-119

12-26
19-81

12-99
19-87

12-118

12-134

12-156

12-172

13-14

14-12

15-21

16-78

16-84

10-37

10-77

10-93

10-128

10-437

10-698

17-36

17-101

16-99

17-28

18-109

19-107

8-15e
10-698+

17-36+

9-26

9 27«
17-101e

9-28+

9-29e

9-34.

9-38e

9-65

9-65s

10-37+

10-77s

10 93e

18-85
17-76

17-24

10-503¢
13-31
11-15¢
10-365
18-98
10-179¢
12-43
8-15
11-7¢0
14-24
15-30
6-121+
10-437«

9-240

9-9s

9-13e

ENOMSG
ENDPRO
ENDPTA
ENDRPT
ENDSEG
T
ENDSE

%G 0155

6 44

6 47

6-50

6 64

7-11

4-34

4-168

4 589

S5-2

5-298

5-309

5-327

6-3

8-4

5-61

5-75

5-89

5-119

5-224

5.238

5-260

5.273

18 2

19-2

10-9

1%3-70

[

LV
o~
wagumu‘»
wn
o
O

o
n

200
B® -~
uun

RN NIVIONNDN

14:40:57 PAGE M-1

104

10-349

20-23

9-45

)
|
N

S5¢
-660

8¢
8¢
80
8o
.14
-80
8e
8¢
-8¢

470

9 65

[

150
192
23¢
31¢
39¢

TEST 3 MACRO vO4.00 20-JAN 83
(CREF v04.00 )

14-21
5-310

17-9

18-75

19-64

14-2
6-23

15-2
9-31

16-2
10-351

XOREPEERPRRPIRPEE®®P®EO
00000
OVOHLLOOLOOY

CLOCK
CLOSE
CLRVEC
COMMEN
DELAY
DESCRI
DEvVTYP
DISPAT
DISPLA
DOCLN
o]0 ]0]V]
OORPT
ENDAU
ENDAUT
ENDCLN
ENOCOM
ENODU
ENDHRD
ENDHW
ENCINI
ENDMOD

14¢

LSLVLV LS VRV VLSS E VTSRV E PR VE VR VT R E SR SR VLN ), VR, P,V ), V)

BGNMSG
BGNPRO
BGNPTA
BGNRPT
BGNSEG
BGNSET
T
BGNSF
BGNSRY
BGNSUB
BGNSW
BGNTSY
BNCOMP
BNERRD
BREAK
BRESET
CKLOOP

Pl gt gt Bt Pt Pt bt P

ABORTW

ecoMPL
BERROR
BGNAL
BGNAUT
BGNCULN
BGNOU
BGNHRD
BGNHW
BGNINI
BGNMOD

et (g

CZRLNBO RLO1/02 DRIVE
CROSS REFERENCE 1ABLE

2-84
2-86
2-8¢

8-16

8-20

9-17

9-33

9-37

7-24

7-36

10-13

4-162

4-578

4-814

5-287

5-307

5-325

5-334

6-132

8 29

5-73

5-87

5-102

5-117

5-222

5-236

5-258

5-272

5-286

10-14

10-396

11 243

19 1606

N1c
)

CZRLNBO RLO1/C2 DRIVE
CROSS REFERENCE TABLE

ENOSF'T

ENDSRV
ENDSUB
ENDSW
ENDTST
EQUALS
ERROF

ERRAHRD

1 568¢

1 5808
1 5960
16140
1-6240
1-6420
1-714¢

1 7180

TEST 3 MACRO V04.00 20-JAN 83 14:40:57 PAGE M-2
(CREF v04.00 )

2-8¢

2-8¢
2-8¢
2-80
2-8¢
2-80
2 8¢

2-8¢

10-554
11-73
17-79

10-5€2
11-82
17-86

ERRSF
ERRSOF
ERRTBL
ESCAPE
EXIT
FEQUAL
GETBYT
GETPRI
GETTIM
GETWOR
GMANIA
GMANID
GMANIL
GPHARD
GPRMA
GPRMD

1-726¢
1-7300
1-7340
1-7440
1-771¢
1-810¢
1-824¢
1-8340
3-210
1-829¢
1-879¢
1-8482
1-859¢
1-866¢
1-8744
1-903¢

2-84
2-8¢
2-8¢

2-80
2-89
2-8¢
2-8¢
2-89
12-65
2-8¢
2-8¢
2-84
2-8¢
2-8¢
2-80
2-82

IOSETU

1-9660

2-8¢

KT11
LASTAD
MSBYTE
M$CHEC
MSCNTO

1-9820
l-;470
1-0000
1-E180
1-E82¢

2-8¢
2-86
2-80
2-8¢
2-80

MSCOUN

20-26
20-42
1-D66¢

7-200
10 10¢
10-4928
11-152¢
11-189
11-213
11-227
11-229
12-186

ERROR

GPRML
HEADER
INLOOP

I0OSTAR

1-7226

1-93406
1-9540
1-962¢

1-9740

5-207
5-280
6-1240

12-188¢
12-191
15-9¢

f’

20 50

9.51
14 31
S 324
12-195
4-36

10-97

9-67
16-139

17-97

18-155

19-151

13-93

14 -46

15-81

16-153

10-153

10-258

10-134

10-147

5€Q 0156

17-110

18-170

19-165

10-388

10-702
13-82

10 706
13-85

10-263

10 372

20-41

20-44

20-46

20-48

20-39

20-42

4-8
15-10
20 5
20-33
20-46
5-160

4-80
15-10¢
20-50
20-330¢
20-460
5-1606

17-45
20-6
20-36
20-48
5-193

17-45¢
20-60
20-36¢
20-48¢
5-193

17-69
20-7
20-38

17-69¢
20-70
20-384¢

5-1936¢

5-207

7-310
10-11
10-914
11-181
11-192
11-214¢
11-227
11-229
12-187

7-33
10-11¢
10-914
11-181¢
11-192
11-217
11 2274
11-229¢
12-187

7-33
10-12
10-914
11-185
11-192
11-217
11-228
12-12
12-187

7-33
10-12¢
10-9140
11-185¢
11-192
11-217¢
11-228
12-126
12-187

7-33
10-491
11-147
11-189
11-192
11-225
11-228
12-14
12-187¢

7-330
10-491¢
11-1470
11-189
11-1926
11-225
11-228
12-140¢
12-188

7-35
10-492
11-148
11-189
11-204
11-225
11-228
12-185
12-188

7-35¢
10-492
11-148¢
11-189
11-204
11-225
11-2288
12-185
12-188

10-10
10-492
11-152
11-189
11-2044
11-225¢
11-229
12-1854
12-188

10-611
11-86

10-623
12-53

10-630
12-57

10-692
13-75

14-32
13-12

16-140
15-10

18-156
17-45

19-152
17-69

20-6
20-9

20-38

10-350

13-69

20-266
20-420
2-8¢

20-75
4-8
13-12
20-4
20-27
20-44
5-160

4-8
13-12¢
20-4¢0
20-27¢
20-440
5-160

7-22
10-11
10-493
11-165
11-189
11-213¢
11-227
11-229
12-186

7-224
10-11
10 493¢
11-165
11-189¢
11-214
11-227
11-229
12-186

7-31
10-11
10-914
11-165¢
11-192
11-214
11-227
11-229
12-186#

10-767
15-41

10-820
15-45

10-431

10-442

10 S39

10-S

20-8
20-39

20-8¢
20-39¢

20-9
20-41

20-99
20-412

10-825
15-61

10-929
15 65

11-52
17 68

11-6
17-7

2-8¢

2-8¢
2-8¢
2-8¢4

15-56

6-63
20-5
20-7

20-4
4-8
10-8

20-8

20-26

20-27

20-33

20-36

2-84

5-207¢
5-280
6-125

12-189
12-191
15-77

5-216
5-280
6-125

12-189
12-1910
15-77

5-216
5-280
6-125

12-189
12-192
15-77¢

5-216
5-280
6-125

12-189
12-192
15-78

5-216
5-280¢
6-1256

12-189
12-192
15-78

S-216%
5-282
6-126

12-189¢
12-192#¢
15 78

5-279
5-282
6-1266

12-190
12 193
15-78

5-279
5-282
7-19

12-190
12 193
15-7860

5-279
5-282
7-19¢

12-190
12-193
15-79

5-279
5-282
7-20

12-190
12-193¢
15-79

5-279¢
5-282
7-20

12-1904
15-7
15-79

5-280
5-282¢
7-20

12-191
15 79
15 79

5-207

5-280
6-124
7-20

10-10
10-492

11 152
11-189
11-213
11-227
11-229
12 186
12-188
12-191
15 9
15 79

4-9

S
[V

4-578

S PR

NONUANN-AR=OB®00

N
¥
Mol

LX-L JV VIV IV VR B

16-60
o

ec0
o

15-81
17-97
19-64
20-23

17 é69e

BLUBRE®DD

17 69

WAL LADLELEL

17 459

&»
~

O
N

VNNE

[VIV.
N
Y ¥

v3y
4

o
N
n [+ ]

17 45

20-715
5 59

17 44

4
4
4

8
8
Ao

4 8
A.8

738

S-7%

S 272
<-32%

8 29
1% %%
17 110

$-2720
S-32%

8 29¢
1% 9%
17 .110e

20 &0
20 -390

20 9

20 9o

5 222
8 2%

S 2%
8 27¢
17-110¢

S 258¢
8-29¢
18 155¢

10-258¢

10-263
10-554
10-706
11 738
13 &85

10 263¢
10 5540
10- 7060
11 7%e
13-8%¢

20 9
20 48

20 e
20 48

4 8
4-8
4 8
4 80
4 80

4 8
4.8
4 8
4 80
4 8o

4-11
S-61
5-117
5-260

4 110
S-61e
S 1172
S 2600

10-550¢
10 702e
11-67¢
i3 820
17 75¢

o po

20 7
20-46

.80

23:. o

eSS
0

4-589¢0
5-87¢
5-2240

20 440

17 44

co-1lle

17-97%¢

13-75¢
17-68¢

20-7

[]
1
]
[}
+
[}
1]

4-80

1375
17-68

20-6¢0
20 44

Bo0®

4-1¢€20

I X R
¥ ¥
1 1] 4
PR R®
L X ]

4-162

v,
°

5-2864
5-310¢
7-110
9-3¢
12-195¢
15-2¢
17-90
19-2¢
20-22¢

[]

S-750
5-2220
5-273¢
5-310
6-1310
8-27¢
12-7¢
14-460
17-20
18-170¢
20-11¢

5-75
5-222
$-273
5-309¢
6-131
8-27
12-7
14-46
17-2
18-170
20-11

4-168

&
[]

[ L XL
Ld

¥
¥

]

4-78
4-8
4-8
4-8¢
4-8¢0
4-86
4-168¢

10-153¢
10-539¢
10-692¢
11-52¢

20-6
20-44

VONYHD

15-10¢
17-69¢
17-69¢

10-153
10-539
10-692
11-52

19-152¢

[

15-10
17-45¢

16-139¢

19-152

13-120
15 100
15-10¢

5-1020
6-13c0

5-87¢
6-131¢0
15-81¢

18 156¢

13-12
13-12¢
13-12¢

20-360
20-480
5-730
5-3340
14 -46¢
20-73¢
10-1470
10-442¢
10-630#
10-929¢
12 57¢
15-65¢

18-156

16-140¢
19-152@
20-6
20-419

[

16-140
18-156¢
20-50
20-41

R B Gl (A R G RO OB 00 G0 OB OB OB

20-382

14-32¢
16-140¢
20-5
20-41

4-7

[ X

]

A
D

14-32
14 -32¢
20-5

15-45

20 70
20-38¢

¥ 3

10-611¢
10-820#
11-86¢
15-45¢

10-134
10-431
10-623
10-825
12-53
15-61

13-93¢
20-19¢
10-1340
10-431¢
10-623¢
10-825¢
12-53¢
15-61¢

S-590
5-2580
5 3240
8-27¢
12-195¢
17-97¢

an
4 A0

-2360

20-7
20-38

5-3240

-81460

20 60

20-36
20-48
5-59¢
5-3250
14-31¢
20-500
10-147
10-442
10-630
10-929
12-57
15 65

20-6

10-3960 11.243

A
8
-8

16 153
19-166

~UAAS

gufwo
LL°%
V1
¥}
4-8140

16-159¢
19-165¢

'3
Wrefyrers
[

4-5780

5-307¢
12-195¢
20-11¢

20-50
20-33¢
20-46¢

17 Al

17 41

10 396¢
16 139
19-165

(o)

BBbuwN
OIS

20-5
20-33
20-46

19-151¢

%Q 0157

307e
8-23%0
11-2430
16 1530
19 1664

[P -RNTVIV IV IVAV.D B

10-396¢
19-1654
10-97
10-388
10-611
10-820
11-86

4-1620
5-306¢0
11-243¢
19-166¢
10-97¢
10-388¢

PPN
O

20-4¢
20-27¢
20-44¢

15-81

L
L
L]

bbby~

0:0603:
LYY
-] o
~ N

RN
W
B

[

]
L X

LIV IV

£ ® Qo

ROR®

U?MN.O.N*

[
Y]

13
[

®oe

1]
+
e

~jr (N

16-153¢
18-155¢
20-3¢
2-80
2-86

14-46¢
18-1700
20-73¢

LR R

8%8
®

14-31
16-153
18-155
20-3
1-C380
1-035¢

UL
o e

£88e

OTTTY
TRT T . TOR S

: mnhguoo&a

VNN LALALLSE

2-80
2-80
2-8¢
2-8¢0

[]

5-1020
5-287¢
6-131¢
9-67¢

Ibu

MIGETS

9-670

19-151¢
2-8¢
10-372¢
10-562¢
10-767¢
11-820
15-410
17-860
2-86
2-80
2-80
20 38

4
9

14:40:57 PAGE

~ NON= W WO
N 0»

MIGENS

14-310
18-155¢
20-50¢@
2-8¢
20-260
20-420
2-8¢
5-286¢

1
1

)
e =t g gt
CO~NVNNOUVNNNELALAMLAEELY

LY)

MIGEN

5T g

MSEXIT

MSEXSE
MSEXTY

PRBBo

MIESCA
MS$ESCS
MSEXCP

flflflng oo

MSERR]

1-D740
S-2720
9-51¢
18-170¢
1-349¢
10-372
10-562
10-767
11 82
15-41
17-86
1-006¢
1-010¢
1-E01¢
20-38
20-48¢
1-D14e
1-D22¢
1-D18¢
1-D38¢

s
b e
LY R

MSENOE

1
1

9-514

0-42

[ LJUIVIVIVY
¥ ¥ P Y ¥

~S$DEFA

P »epe

M$DECR

O OBPONNNCLLD

MsDATA

15 790
17-440
1 8670

TEST 3 MACRO vO4.00 20 JUAN 8T
(CREF Vv04.00 )

285

CZRLNBO RLO1/02 DRIVE
CROSS REf ERENCE TABLE

20 4}

5-2999
63
8-23

10 396

14 21
16 139
18 75
20 2
S

19¢

20 41¢

S-306
6 38
8 2%

10-39%¢¢

14 210
16-139¢
18 °Se
20 2@
8

“%

[]

X J
L

]

)

s BOPBRORO

3%
~ gu.oo

0 [-d weee

- BB
e®

VUONSALAALEAEL

[]

7-330
7-360

ORI
BROE

Iwo

-2800
-282

7-200

-33¢0

wN
w

[

[}

)

--S»ooo
[« X=XX
e

4
4

[CLSRT
83'\)
~ NXL J]
(et
L X XX X
ik
X X

20 37e
20 40

-216
-222
-279
280

[
R
Yol

20 37

ek
X X X X X ]

n [P LYY, - 3Ree®

[ X

4 8o
OBNVVNDL »

E;g"°"’

17110
20 17

33 P~ 000

Xo 3

anabad

JOP..
Y.
W Y.

1. ¥
A

3. ¥

12 1950
17 97
20 11e@

195

NeabhabEad

BRI
[
X ]

LX X J

N » (T
L] ®L
o

Y
BNy AV.IV
IV ) XY ¥

17 97
2C 11

)

11 24%e
16 153¢
19 1660
20 7%
19-152¢

e
£2

ogw...

Y. XU RV VR ¥

I X X

L
8'-"-"-'
R EeE®
~NWwonNn
080
o
*e O
e

4-8
ANV
®
- o
*o0
e
L 4 °

10 3968
16-139¢
19 1650
20-50¢0

S5 25R%e
€ 3240
A7

L19000
Y- X- X X X X X t:-[CIVIVICIVIVIVIVIVIVIVIVY
W W % % W W

[

(o)

240

,Y)

[

NNV ALLAL

[VIVIVIVIVIVIVIT
Y W ¥ O W B SENTV VIR
¥ § R 3 )

[T 3”0...
LX)

50
45¢

RRNOS

[}
[} + + []
[ X L&

396¢
139
165

8 23

L.|
5 %24
8 7

XT AT L VRPN
Nmesn,;
O

5.2%¢@
S 3Ce

’)U"A-NBS
L]

® [-® 2- V. X

[}

VOVNUVNLLLLLAMAD
VBNV

)

(VY] ogo«ooo

10
16
19
20
17

N
8
uwm&mmwmgn
SUNRARESuA daRRRIm=COR e
1]

NNOGOOORCRRVMVMVARALRUVVNUANNG
LA LARE

[od -l

4-8

S 2220
5 306e¢
7 380

20-75¢

5-10490
S5-298¢
6-3¢
9-45¢

5 222
5 306

]

4-70
4 8
4 8
4-80
4 8¢
4-80
4-168¢

NNNNNNg 8
X
OCI8~JNr- ~ &3 L-2
J
NRVOYWOR~N

18-170¢
20 40¢
14 32¢

S5 117
S5 294¢
6 132¢
10 396
15-81e
19 151e¢
20-430
16-140¢

]

18 170
20-40
13 12¢

S5-287e
6-1310
9-674
14 46¢

14:40:57 #AGE

X
R 17 1Y

5-102¢

wi
[T
J
LJ

20-430
2-8e0

5 102
5.287
6 131
9-67

8770
14-46

ek L X X
O Pl
]
¢ o

14-31
18-155
20-37

S5-87¢
5-2860
5-3%40
9 510
14 31¢
18-155¢
20-37¢
2-8¢

S-87

Yoo

5-286
S 334
9 51

AR UVNIVVNUVVUVIVUVIVNVVNGALLDLY

[

LY L L

®
gN(A
n
Geo8332
O
o8

MIGNIN

20-43
1-Co2e

M3GNGB

“

MSGETT

VAV NANNTNLGDLLBLEDLHOOUVAVNLLLDL »

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO vO4.00 20 JAN 8%
CROSS REFERENCE 1ABLE (CRFF v04.00 )

'(;x Py
580 0154

95 2l

8 .29

329

1% 9%

8
8
B

6-8¢

CZRLNBO RLOY/02 DR Iyg TEST 3 MACRO v04.00 20-JAN 83 14:40:57 PAGE M S
(CREF v04.00 )
CROSS REFERENCE T1ABLE

10-10
10-11
10-12
10-140
10-134¢
10-153
10-258¢
10-349¢
10 388
10-431
10-442¢
10-492
10 492¢
10 S39
10-550¢
10 562¢
10 623
10-630¢
10-702
10-706¢
10 82¢

10-825¢

10-914¢
11-52
11-67¢
11-82
11-86¢
11-148
11 152
11-165
11-181
11-185¢
11 189
il 192
11-192¢
11-204¢
11-213¢
11-2140
11-217¢
11-2254
11-227
11 228
11 228¢
il 229
12-12
12-14
12 53¢
12-185
12-186
12 1860

10-153
10-258¢
10-350
10-388
10-4316¢
10 491
10 432
10-492¢
10-539¢
10-554
10 562¢

10-623
10-630¢
10-702
10-706¢
10-820
10-825¢

10-9148
11-52
11-67¢
11-82
11-664
11-148
11-152
11-165

11-18'¢
11-18,0
11-189
11-192
11-192¢
11-2046
11-213¢
11-2140
11-217¢
11-225¢
11-227
11-228
11-228¢
11-229
12-12
12-14
12-53¢
12-185
12 186
12 187

9. Sie

10-153
10-258¢
10 350¢
10-388
10 431¢
10-491

10-492
10-493
10-539¢
10-554
10-562¢

10-623
10-630¢
10-702
10-706¢
10 820¢
10 914

10-9140
11-52
11-67¢
11-82
11-86¢
11-148
11-152
11-165

11-181¢
11-185¢
11-189¢
11-192

11-192¢
11-204¢
11-213¢
11-214¢
11-217¢
11 225¢
11-227
11-228
11-2288
11 229
12-12
12 14
12 53¢
12-185
12 186
1¢ 187

10-539¢
10-554
10-562¢0
10 623
10-630¢
10-702¢
10 767
10-820¢
10 914
10-914¢
11-52
11 67¢
11-82¢
11-147
11-148
11 152

11 1650
11-181¢
11-189
11-189¢
11-192

11-192¢
11-204¢
11-213¢

11-214¢
11-225
11-225¢
11-227
11-228
11-2289
11-229¢
12-12
12-14¢
12 57

12 185
12
12

186
187

12- 140
12- 57

12 185
12 186
12 187

10-388¢
10-431¢
10-491
10-492
10-493
10-5390
10-554¢
10-611
10-623¢
10-692
10-702¢
10-767
10-820¢
10-914
10-929
11-52¢
11-73
11-82¢0
11-147
11-148
11-152¢
11-165¢
11-181¢
11-189
11-189¢
11-192
11-192¢

11-2040
11-214
11-217
11-223
11-225¢
11-2270
11-228
11-229
11 229¢
12-12
12-140
12-57
12 185
12 186
12187

10-153¢
10-263
10-372
10-388¢
10-442
10-491

10-492
1C-497
10-550
10-5540
10-611
10-623¢
10-692
10-702¢
10-767
10-820¢
10-914
10-929
11-52¢
11-73
11-82¢
11-147
11-1480
11-152@
11-165¢
11-185
11-189
11-189¢
11-192
11-192¢
11-213
11-214
11-217
11-225
il1-225¢
11-227¢
11-228
11-229
13 -229¢
12-120
12 14¢
12-57
12-185¢
12-186
12 187

10-153¢
10-263
10-372
10 385¢

10-442
10-491¢

10-492
10-493¢
10-550
10-554¢0
10-611
10-623¢
10-692
10-702¢
10-767¢
10-825
10-914
10-929
11-32¢
11-73
11-82¢
11-147
11-148¢
11-152¢
11-165¢
11-185
11-1%9
11-189¢
11-192
11-204
11-213
11-214
11-217
11.-22%
11-227
11-227¢
11-228
11-229
11-229¢
12-12¢0
12-140
12-578
12-185¢
12-1860
12 187

76
200

912
9 170
9 37

10 8e

10 10¢
10 110
10-120

10-97¢
10-147
10-153¢
10-265¢
10-372
10-388¢
10-442
10-491¢
10-492¢
10-4930
10-550
10-554¢
10-611

10-6230
10-692¢
10-706
10-767¢
10-825

10-914

10-929
11-52¢
11-73¢
11-86
11-147
11-148¢
11-152¢
11-165¢
11-185
11-189
11-189¢
11-192
11-204
11-213
11-214
11-217
11-225
11-227
11-227¢
11-228
11-229
11-229¢
12-12¢
12-53
12-57¢
12-1850
12 186¢
12 187

1¢ 9
10-10¢
10-110
10. 13
10-97¢
10-147¢
10-258

10-2630
10-372¢
10-396
10-442
10-491¢
10-492¢
10-4930
10-550
10-5540
10-611¢
10-630
10-692¢
10-706
10-767#
10-825
10-914
10-929¢
11-67

11-73¢
11-86

11-1470
11-148¢
11-152¢
11-181
11-185
11-189
11-189¢
11-192
11-204
11-213
11-214
11-217
11-225

11-227
11-227¢
11-228
11-229
11-229¢

12-12¢
1 53

12-57¢
12-185¢
12-1862
12 187

L-X-E-X
I ]

9.17
9-83
9-67¢
10-10@
10 11e
10-12¢
10-97¢
10-147

10- 10e¢
10- 11
10- 12
10- 97
10- 1340
10- 153¢
10- 263
10- 351¢
10- 3880
10- 4318
10- 491
10- 492
10- 493
10- 5398
10 554
10- S62¢
10- 6230
10- 692
i0 7020
10 767
10- 8200
10- 914
10- 9140
11 52
11 73
11 82e
11 147
11- 148
11- 1524
11 1654
11- 181¢
11- 189
11- 189¢
11- 192
11. 1920
11- 2040
11- 213¢
11- 217
11- 225
11- 2250
11- 2278
11- 228
11 280
11 2298
12- 12

A
A

NSN":

9-33
9-374
10-10
10-11
10-12
10-97
i0-1%40

1e
7

T¢

<00
12
17
-33¢
10-8
10 100
10-11¢0
10 12¢
10-97¢
10-147

[ 37 1ks

9 33
9-37
10-10
10-11
10-12
10-97
10-134¢

9-10¢
9-17

8 7e
A 20

VOOID

9-17
9-33
9-37

9-10
2 17

8-7
8-16

VH OB

8 279

8-7
8-16

P
o po oy

8-9¢

r-Xr-x-x
X

8-7

SEl HL%

cle
1é

- 300
37
10 9¢
10 11
10

11e

10 13
10 134
10-147¢
10-258
10-263¢
10-372¢
10-3960
10-4420
10-491¢
10-492¢
10-493¢
10-550¢
10-562
10-611@
10-630
10-692¢
10-706
10-767¢
10-825
10-914
10-929¢
11-67
11-73¢
11-86
11-147¢
11-148¢
11-165
11-i81
11-185
11-189
11-189¢
11-192
11-204

11-213
1i-214

11-217
11-225
11-227
11-227¢
11-228¢
11-229
11-229¢
12-12¢
12-53
12-57¢
12-185¢0
12-1860

12-1878

8 ]
) P )
? i2
9
9

10 10
10 11
10 11e
10 130
10 134
10 147¢
10 258
10 2630
10 5372¢@
10 431
10 -4420
10 4910

10- 4920
10 539
10 550
10 562
10- 6119
10- 630
10- 692¢
10- 706
10- 7670
10-825¢
10- 9144
10-929¢
11- 67
11-73¢
11- 86
11-147¢
11-152
11- 165
11-181
11-185
11- 139
11-189¢
11-192¢
11- 204
11-213
11- 214
11- 217¢
11- 225
11- 227
11- 2270
11- 2260
11- 229
11- 229¢
12- 14
12-53
12- S7e
12- 186
12- 186¢
12 1870

] 9
a %0
K} ie
9 S1e
9 L%4

10 10
10 il
10 1le
10 1%
10 134
10 147¢
10 258
1C onse
10 3720
10 433
10 4420
10- 492
10 4920
10- <39
16- 5500
10- 62
10 611¢
10 630
10-6920
10- 7068
10- 820
i0 825¢
10- 9140
10 N9
11-67
11-73¢
11-860
11 147
11-152
11-165
11-181
11-185¢
11-189
11-189%¢
11 -192¢
11 -204
11-213
n -2140
11-217¢
11-225
11-227
11- 2278
11- 2289
11- 229
11- 2298
12- 14
12- 53¢
12- 185
12- 186
12 186¢
12 187¢

8 90

8 27
9

ice

.
9
10
10
10
10

33
17
10
11
11¢@
14

1470

1%4

10 ¢S89
10 549
i0 3720
10 431
10 4420
10 49;
10 492¢
10-53%9
10 550¢
10 562
10 6110
10-5630¢
15-702
10-7068
10 820
10 825¢
10-914¢
10-929¢
11 67¢
11-82
11 26¢

11-152
11-165
11

181

11-185¢

11-189
11-189¢
11 192¢

11-204
11 213¢
11-2140
11-2179
11-225¢
11-227
11-227¢
11-228%
11-229
11-229¢
12-14
12 53¢
12-185
12-186
12 186%
2 187¢

1-898¢
1-890¢
5-236
7-38

MIGNTE

MIHAPT

MEHNAP
MSINCR

14-31
18-155

17-99
17-99¢
18-156¢
20-3¢
20-64
20-9
20-27¢
20-38
20-41¢
20-46

20-75
10-396#
14-210
5-59¢
5-258¢
8-230
14-464
18-1700
12-7¢
19-26
4-80
4-8¢
4-70

5-61
5-1020
5-2220
5-2608
5-298
6-3

17-340
17-410

i7-34

17-34¢
17-410
17-44¢
17-68¢
17-75¢
17-86
17-99
17-99¢
18-170¢
20-4
20-7
20-9¢
20-33
20-38¢
20-42
20-46
20-75¢

16-604¢
S-73¢
5-2729
8-270
15-81¢
19-151¢
13-2¢0

4-340
5-614
5-104
5-224
5-273
5-299
6-4

12 188
12-188¢

12-189¢
12-190
12-191
12-192
12-193
12-193¢
13-75
13-82¢
14-31
15-7¢
15-9¢
15-410
15-61¢
15-77
15-78

15-780
15-79¢
16-140

17-34
17-34¢
17-44
17-440
17-68¢
17-75¢0
17-86¢
17-99
17-99¢
19-64¢
20-4¢
20-7
20-1160
20-330
20-39
20-428
20-46¢
20-75¢

17-9¢
5-874
5-286¢
9-510

17-99

1734

15-7
15-9¢
15-410
15-61
15-65¢
15-77¢
15-78¢
15-79
16-139

17-99¢
18-1560
20-3
20-6
20-9
20-27
20-38
20-41
20-46
20-75
10-396
14-21
5-59
5-258
8-23
14-46
18-170
1219-2
4-8
4-8
4-7
5-59¢
5-89¢
S5-216¢
S5-2600
5-230@
S5-327¢

17-34
17-345
17-410
17-440
17-68
17-75¢
17-86

14-21

G 0166

VOO
e

MEGNSU
MSIGNTA

1 C13e

17-99¢
18-156
19-165¢
20-6
20-9
20-27
20-38
20-41
20-440
20-50#
2-86
2-8¢
2-8¢
5-236¢
7-380
14-310
18-155¢
2-8¢
18-2¢
2-8¢
2-8¢
2-80
S-47¢
5-89¢
5-207¢
$-260
5.2900
S 327

17-99

15-77¢
15-78¢
15-79
16-60

12-193¢
13-75
13-82¢

12 188
12 188¢
12-189¢
12-190
12 191
12-192
12-192¢
12-193¢
13-75
13-82¢
14 21e¢
13-7
15-9¢
15-41¢
15-61
15-65¢
15-78
15-78¢
15-79¢
16-139¢
17-34
17-34¢
17-44
17-440
17-68¢
17-75¢
17-86
-99

MIGNL
S

17-99
17-99¢
18-156
19-165
20-6
20-9
20-27
20-38
20-41
20-44
20-50

15-61
15-65¢

13-82¢
13-93¢
15-7
15-9¢
15-41¢
15-61
15-65¢
15-77¢
15 78¢
15-79
16-60¢

12 188
12 148¢
12 189¢
12 190
12-191
12-1910
12-1924

17-68
17-75
17-79¢

12-1910
12-192¢
12 193¢
15-70¢
13-82¢
13-93
15 7
15 9
15-41¢

12-188
12 188¢
12-189
12 190
12 191
12-191¢
12-1920
12-193¢
13-75

17-44

12-187¢
12-168¢0
12-189
12-190
12-191

M &

v
- X
-0~
o

17 9¢
17 340
17-41

12 187¢
12-188¢
12-189
12-190
12-190¢
12-191¢
12-192¢
12-193¢
13-70
13-82
13-85¢
15-7
15-9
15 41
15-45¢
15-65¢
15-77¢
15-780
15-79
15-81¢
17-34
17-340
17-41@
17-440
17-68
17-75
17-79¢

15-79¢

12-187¢
12-1880
12-189
12-190
12-190¢
12-191¢
12-192¢
12-1930
13-69¢
13-82
13-85¢
15-7
15-9
15-41
15-45¢
15-65
15-77¢
15-78
15-79
15-81
17-34
17-340
17-410
17-44
17-68
17-75
17-79¢

14:40:57 PAGL

[

12 187¢
12 188¢
12 189
12190
12-190¢
12-191¢
12-192¢
12-193
13-69
13-82
13-85¢
14 -460
15-9
15-41
15-45¢
15-65
15-77¢
15-78
15 79

3 MACRO vO4.00 20 JAN 8%
(CREF vO4 .00 )

TEST

1. 3w
wOLn?hu [+ -3-1-3-1-1-

CZRLNBQ RLO1/02 DRIVE
CROSS REFLRENCE TABLE

12-188
12-189
12 189¢
12-190¢
12-191
12-192
12-193

12-195¢
13-75¢
13-85
14-32
15-7¢
15-10
15-45
15-61¢
15-77
15-78
15-78¢
1,-79¢
16-1400
17-34
17-41
17-44
17-440
17-69
17-79
17 -86¢
17-99
17-1100
19-151¢
20-5S
20-7¢
20-23%¢
20-36
20-39¢
20-430
20-48

18-75¢
5-102¢
5-306¢0
9-670

16-139¢
19-165¢

16-153¢
20-11e
15-2¢

4-1680

4-589¢

14-20

S5-730
5-1042

5-2c44
5-2734
5-299¢
6-40

5-75
5-119
5-238
5-2790
5-309
6-80

12 188
12 189
12-189¢
12-190#
12-191
12 192
12-193
13-12
13-75¢
13-8%

14 32
15-7¢
15-10
15-45
15-61¢
15-77
15-78
15-79
15-79¢

16-1408
17-34
17-41
17-44

17-45
17 69
17-79
17-86¢
17-99
18-75
19-152
20-5
20-8
20-26
20-36
20-40
20-44
20-48
19-64
5-117
5-324
12 195
17-97
20-50

1¢ 168
12 189
12-189¢
12 190¢
12-191

12 192
12-193
13-12
13 75¢
13-85
14-32¢
15-7e¢
15-100
15-45
15-610
15-77
15-78
15-79
15-79¢
16-153
17 34
17-41
17-44
17-45
17-69¢
17-79
17-86@
17-99
18 75¢
19-152
20-5
20-8

20-26
20-360
20-400
c0-44
20-48

19-64¢
S5-117¢
5-324¢
12-195¢
17-97¢
20-50¢
16-2¢

5-20
5-75¢
5-119¢
5-238¢
S5-28ze
5 310
6

120

12 188
12-189

1c-188
12-189

14 -32¢

14 -46

12 189
12 1908
12 191¢
12-192
12-193
13-120
12-7%¢
13-650

15 9
15-100
15 45e¢
15-6%
15-77

15-78
15-79
15 79¢
16-1530
17 34
17-41
17 44
17-45¢

17-69¢
17-79¢
1797
17 99¢
18-155
19-152¢
20-54
20-8
20 26
20 37
20-41
20-44
20 48

12-189%e¢
12-190¢
12-191¢
12 192
12-193%
13-120
13-82
13 85S¢

15-9
15-41
15 45e
15-65
15-77

15 7¢
15-79
15-79¢
17-9
17 340
17-41
17 44
17-450
17-75
17 790
17-97¢
17-99¢
18-155¢
19-152¢
20-6
20 8¢
20 26¢

20-37¢

20 41
20 44
20 480

5-222
6-131
13-93
17-110

5-222&
6 1310
13-93¢0
17 1102

17-2

17 2#

S-47
S-87¢
5-119¢
S 238
5-28680
5 310
6-130

5-47
5-89
5-160¢
5-2589
5-290
5-3102
6 180

1
CZRLNBO RLO1,/02 DRIVE

TEST

3 MACRO vO4.00 20-JAN 8

CROSS REFERENCE 1ABLE (CREF v04.00 )
8 4
8-25¢
9-53¢
10-349

10 4930
10-914¢
11-1920
12-7¢
12-1920
13-93¢0
14-320

15-65¢

16-60¢
17-9

M$IOSE
“M$LDRO

M$MASK

MSMCHI

MSMCLO

MEMSK1
MSPOP

MSPRIN

17-99¢
-8-155¢
19 644
20-23¢
1-A00¢
1 C42e
6-49

8-40
8-250
10-8¢

10-349
10-539¢
10-929¢
11-2040
12-7¢
12-193¢
14-2
14 -460

15-77¢
16-60¢
17-9¢
17-1100
18-1560
19-151¢
20-23¢
2-8¢
2-80

11-217
12-185
12-192
17-34

1 a3l
5-61
S5 260
5-327

13-20
17-9¢
20-220
1 C72¢
5-207
5-2160

6-464
7-11e

8-5
8-27¢
10-100
10-349¢

10-550¢
11-520
11-213¢

12-70
12-195¢
14-2
15-2

15-780

16-600

17-90

18-2
18-170¢
19-152¢

6-49¢0

7-13¢

6-630
7-19¢

16-139¢
17-9¢
18-2
19-2
19-165¢

8-5¢
9-30
10-12¢
10-349¢
-2 5620
11-73¢
11-2176
12-140
13 2
14-2¢
15-2
15-810
16-1400
17-340
18-2
19-2
20-2

6-80
6 630
8-16¢

6-11
6-97
8-20

8-5
9-3
10-11¢
10-349¢
10-58+°
12-67¢
11-214¢
12-12¢
13-2
14-2

15-2
15-79¢

:57 PAGE M -7

6-960
7-200
8-5¢
9-100

10-13¢
10-3494
10-611¢0
11-82¢
11-2250
12-530
13-2
14-2¢
15-2¢
16-2
16-1530
17-410
18-2¢
19-2

20-2¢

6-97¢
7-220

8-70
9-30¢
10-140
10-3500
10-623¢
11-860
11-227¢
12-57¢
13-20
14-20

15-20
16-2

17-2
17-44¢
18-20
19-2¢
20-3

5EQ 0161

6-1240
7-240
B 9¢
9-45

10-97¢
10-3720
10-630#
11-1474
11-2280
12-1854
13-20
14-21
15-2¢0
16-2
17-2

17-450

18-2¢
19-2¢0
20-3

6-110
6-97¢
8-200

6-127
10-13

6-180
6-1270
10-13¢

4-162¢

4-578

4-5780

6-18

6-1260
7-330
8-200
9-45¢
10-147¢

6-1274
7-350
8-210
9-450

10-396¢
10-702¢
11-152¢
12-3
12-1879
13-12¢
14-21
15-90
16-20
17-26
17-69¢
18-75
19-64
20-3¢0

10-153¢
10-431¢
10-706¢
11-165¢
12-30
12-188¢
13-69¢
14-21¢
15-10#
16-20
17-20
17-75¢
18-75
19-64
20-22

6-220

6-43

7-240

6-1280

8-23¢
9.53%

825

8-2%

10 263¢
10-491¢
10-820¢
11-185¢
12-7
12-1900¢
13-82¢

10-349
10-492¢
10-825¢
11-189¢
12-7
12-1910
13 85S¢

15-450

15-610

7-350

10-258¢
10-4420
10-767¢

11-181¢
12-7
12-189¢

13-75¢0

14 -21¢
15-41¢
16-60
17 2¢
17-79¢
18-75¢
19-64
20-220

1210

7-37¢

9.53%

14 21e

7-11

7-380

9-53%¢

14-310

16-60
17-9
17-860
18-75¢
19 640
20-23

16-60
17 9
17 97¢
18-7%¢
19 640
20-23

6 46
7 37

6 460
7 370

2-8¢
2-80

1-877¢
1-881¢
5-87
5-286
5-334
9 51
14-310
18-155¢
20-50¢
1-8360
5-282

9-3

MEPYT

7-110

8-9
1-8710
1-40
1-824¢

7 31
10 492
11-181

MIPUSH

6-430

7-11

6-220

’

14:4

4-90

3-102¢
5-287¢
6-131¢

5-279

5-222
5-306
7-38

5-222¢
5-306¢
7-384

9-67¢
15-81

10-396
16-139
19-165

10-396¢
16-139¢
19-165¢

11-243
16-153
19-166

5-1600
6-124¢
7-330
10-493¢
11-185¢
11-225¢
12-186¢
12-1930
17-41¢

5-193¢
6-125¢

5-207
6-126
10-10
11-147
11-192
11-228
12-188

5-207¢
6-1260
10-100

19-151

11-181¢
11-217¢
12-185¢0
12-192¢
17-34¢
2-80
5-610
5-2600
5-327¢0
9-3¢
14-2
18-2
20-23
2-8¢
S 207

5-117e
5-2940
6-1320

4-79

5-75¢
5-273¢
6-3¢
9-45¢
14-21
18-75
5-160
5 207
5-279

7-35¢

10-914¢
11-189¢
11-227¢
12-187¢
15-7¢
17-440
4-340
5-89¢
5-290¢
6-40

17-99

11-147¢
11-192¢
11-2284
12-188¢
15-9¢
17-99¢

5-104
5-296

5-1040
5-298¢

15-9

4-168

7-11

4-168¢

7-11¢

15-2
19-2

10-349
15-2¢
19-2&

10-349

5-160
5-207
5-279

5-160
S5-207
5-279

5-1600
5-207¢
5-279¢

9-53¢

16-2
19-64

4-814

5-236
5-307
8-23
11-243¢0
16-153¢
19-1660

4-8140

5-2360
5-307#
8-23¢
12-195
17-97
20-11

5-59¢
5-258¢
5-324¢
8-27¢
13-93
17-110
20-19

5-73
5-272
5-325
8-29
13-93¢
17 1108
20-19¢

5-730
S 272¢
S 225e
8-29¢
14-33
18-155
20-50

5-216
7-19
10-11
11-148
11-204
11-229
12-189

5-216¢

5-279¢

5-280

5-2800

15-77

4-589

7-194

1-200

10-12¢
11-152¢
11-213¢
12-120
12 -190¢
15-78¢

10-491
11-165
11-214
12-14
12-191
15-79

10-4910
11-165¢
11-2140
12 14¢
12-191¢
15-79¢

4-589¢

5-2¢
5-2240
5-309¢
8-50
12-7
17-2

5-47
5-238
5-310
8-25

€s-472
5-23%8¢
5-310¢
8 25¢
13-2
17-9
20 22

5-193¢
S 216
5-280

5-207
S5 21¢€
S 280

16-2¢
19-64¢

12-3¢
16-60¢
20-2¢

5-193
5216
5-280

5-193
5-216
5-280

5-193
5-216
5 280

10 349¢

7-22@

10-11¢
11-148¢
11-204¢
11-229¢
12-189¢
15-770

5-119¢
5-299¢
8-49
12-3
16-60
20-2

5-119
5-299
8-4

7-22

20-3

5-193
5-216
S5 280

12-7¢
17-2¢
20-3¢

CZRLNBO RLO1/02 ORIVE TEST 3 MACRO v04.00 "V-JAN 83
CROSS REFERENCE TABLE (CREF VO4.00 )
$-280
6-96
6-125¢
7-20
7-33

10-10
10-120
10-4930
11-148

11-181
11-189
11-204
11-217
11-227
11-229
12-14

M3PUTL

12-186
12-188
12 190
12-192
15-9
15-78¢
17-34
17-44¢
1-C810
5-193
5-207¢
5-216¢

5-27/9¢
S$-280@8
5-282
6-960
6-125
7-13
7-20
7-31
7-33¢

8-7¢
10-11
10-491
10-492¢
10-914¢
11-148¢
11-165¢
11-185¢
11-189¢
11-192
11-204¢
11-214
11-225%
11-227
11-228
11-229
11-229¢
12-14¢
1¢-186

5-280
6-96
6-126
7-20

7-33

10-10
10-491
10-914
11-1484
11-181¢
11-189
11-204
11-217
11-227
11-229
12-14
12-186@¢
12-188
12-190
12-192
13-9
15 79
17-34
17-99
2-8¢
5-193
5-207¢
5-216¢
5-2794
5-280¢
5-282
6-960
6-125
7-13
7-20
7-31
7-330

8-7¢
10-11
10-491¢
10-492¢
10-914¢
11-148¢
11-165¢6
11-1850
11-189¢
11-192
11-2044
11-214
11-225
11-227
11-228
11-229
11-229¢
12-14¢
12-186

5-280
6-96
6-126
7-20

7-33

10-10
10-491
10-914
11-152
11-185
11-189¢
11-204¢
11-217
11 227
11-229
12-14
12-187
12-188¢
12-190
12-192¢
15-9¢
15-719
17-34
17-99
5-160
5-193¢
5-207¢
5-216¢
5-279¢
5-280¢0
5-282¢0
6-96¢
6-125¢
7-13¢
7-20
7-31
7-33¢

10-10
10-11¢
10-491¢

10-493
10-914¢
11-152
11-165¢
11-189
11-189¢
11-192¢
11-2040
11-214¢
11-225
11-227
11-228
11-229
11-229¢
12-185
12-186¢

5-280¢0
6 960
6-126¢
7-20
7-33
10-10

10-491
10-914
11-152
11-185
11-192
11-213
11-217¢
11-227
11-229
12-140
12-187
12-189
12-190¢
12-193
15-77
15-719

17-34¢
17-99

5-160
5-193¢
5-2070
5-216¢
S-279¢
5-280¢
5-282¢
6-96¢
6-125¢
7-13¢
7-20
7-351¢
7-330

10-10
10-11¢
10-4910
10-493
10-9140
11-152
11-165¢
11-189
11-189¢
11-192¢
11-204¢
11-214¢
11-225
11.227
11-228
11-229
11-229¢
12-185
12-1860

5-282
6 124
7-13
7-20
7-33

10-10¢
10-491¢
10-914
11-152
11-185
11-192
11-213
11-225
11-227
11-229
12-185
12-187
12-189
12-191

12-193
15-77
15-79
17-41

17-99
5-160
5-193¢0
5-207¢

S5-216¢
5-280
5-280¢
5-282¢
6-124
6-1250
7-130
7-200
7-31¢
7-35

10-10
10-11¢
10-492
10-493¢
11-147
11-152
11-181
11-189
11-189¢
11-192¢
11-213
11-214¢
11-225
11-227
11-228
11-229
12-12
12-185
12-1860

G195

14:40:57 PAGE M-8
5-282
6 124
7-13

7-200
7-33¢

10-11
10-492
10-914
11-152
11-1850
11-192
11-213
11-225
11-227¢
11-229
12-185
12-187
12-189
12-191
12-193
15-77
15-79
17-41
17-99
5-160
5-1930
5-207¢
5-216¢
5-280
5-2804
5-282¢
6-124
6-125¢
7-150
7-200
7-31e
7-35

10-10
10-11¢
10-492
10-493¢
11-147
11-152
11-181
11-189
11-189¢
11-192¢
11-213
11-2140
11-225
11-227
11-228
11-229
12-12
12-185
12-186#

5-282
6-124
7-13
7-22
7-35

10-11
10-492
10-914
11-152¢
11-189
11-192
11-213
11-225
11-228
11-229

12-185
12-187
12-189
12-191
12-193
15-77
15-79
17-41

17-99
5-160

5-207

5-207¢

SeQ 0162

S 282

1240

7-183
7-22
7-35

10-11
10-492
10-914¢

11-165
11-189
11-192
11-213¢
11-225
11-228
11-229
12-185
12-187
12-189
12-191
12-193
15-77¢

15-79
17-410

17-99
5-1600
5-207
3-207¢

5-279

5-280
5-280¢
3-2820
6-1240
6-1250

10-10¢
10-11¢
10-492
10-914
11-147
11-152¢
11-181
11-189
11-189¢
11-192¢
11-213
11-217
11-225¢
11-227¢
11-228
11-229
12-12
12-185¢
12-186¢

7-19
7-200
7-33
7-35¢

10-10¢
10-11¢
10-492
10-914
11-1470
11-132¢
11-181¢
11-189
11-189¢
11-192¢
11-213
11-217
11-225¢
11-227¢
11-228¢
11-229
12-12¢
12-1856
12-186¢

S 282
6 125

7 136
7 22¢
7-35¢

10-11
10-492
11 147
11-165
11-189
11-192
11-214
11-225%
11-228
11-229
12-185¢
12-187¢
12-189
12-191
12-193¢
15-78
15-79¢
17-44
17-99
5-160¢
5-207
5-216
5-279
5-280
5-282
5-282¢
€-1240
6-126
7-19
7-200
7-83

8-7
10-10¢
10-12
17-492
10-914
11-147¢
11-132¢
11-181¢
11-189
11-192
11-192¢
11-213¢
11-217
11-2250
11-227¢
11-228¢
11-229
12-12¢
12 185¢
12 187

5 282
6-125
7-19
7-31

8-7
10-11
10-492
11-147
11-165
11-189
11-192
11-214
11 225
11-228
11-229¢
12-186
12-188
12-189
12-191

15-7
15-78
17-34

17-44
17-99¢

5-160¢
5-207
5-216
5-279
5-280
5-282
5-2820
6-1240
6-126
7-19¢
7-200
7-33
8-7

10-10¢
10-12
10-492
10-914
11-147¢
11-152¢
11-181¢

11-189
11-192
11-192¢
11-213¢
11-217
11-225¢
11-227¢
11-2280
11-229¢
12-120
12-185¢
12-187

5-282
6 1725

5 282
6 125

S 2820
6 125

7-31

7 310
87
10-12
10-493
11 148

7.3%
8 70
10 12
10-493
11 148

11 189
11-204
11-2140
11-227
11-228
12-12
12-186
12-188
12-190
12-192
15-7e
15-78
17 34
17 44

11 189
11 204
11-217
11 227
11-228¢
12 120
12 186
12 188
12-190
12-192
15-9
15-78
17 34
17-44

5-193
5-207
5-216
S 2796
5-280
5-282
6-96
6-125

5 193
S- 07
S ¢ab
5-279¢
5-280¢
5-282
6 9%
6-125

719

7-19

8.7
10-11
10-492
11-147
11 165
11-189
11-192
11-214
11-225¢
11-228
12-12
12-186
12-168
12-189¢
12-191¢
15-7
15-78
17-34
17-44

8-7
10-11¢
10-492¢
11-1470
11-165¢
11-189
11-192¢
11-214
11-227
11-228
12-12
12-186
12-188
12-190
12-192
15-7
15-78

5-160¢
5-207
5-216
5-2719
5-280
5-282
6-96

5-160¢
5-207
5-216
5-279

17-34

17-44

6-125
6-1260
7-19¢

11-2130
11-217¢
11-225¢
11-227¢
11-228¢
11-229¢
12-14
12 186
12-187

19¢

11-1861

713
7-20
7-220
7-33¢

7-22
7-33

8-7
10-11
10-12¢
10-492¢
10-914
11-148
11-165
11-185
11-189
11-192
11-204

8-7¢0

18¢

713
7 20
7 .22¢
7 338

8-7¢

10-11
10-491
10-492¢
10-914¢
11-148
11-165
11-185
11-189¢

10-11
10 49]1
10 492¢
10 9140
11-148¢
11-165
11 1850
11-189%¢

11-204
11-214
11-217¢

11 204
11 214
11 217¢

11 192

11-213¢
11-217¢
11-225¢
11-227¢
11-2286
11 229¢
12-14
12-186
12 187

6-96
6 125

11-227
11 2270

11-2286
11 2298
12 14
12 186
12 187

11-192

11
11
11
11
12
12
12

227
227¢
2280
229e
142
186
18”

11-192¢
11-228¢
12-187¢
12-195¢
14-32
15-77
16-153
MITLAB

17-69¢
18-156
1-C29¢
5-272#
6-630
7-310

9-30#
10-350¢
10-6230

6-96¢

10-767
11-148¢0
11-2040
11-229¢
12-188¢
13-12¢
14-46
15-78
17-9
17-79
18-170
3-59¢
5-2800
6-97¢

10-8¢
10-372¢
10-630#

10-100
10-388¢
10-692¢

1775
18-156¢
2-80
5-279¢
7-33¢

7-35¢

10-263
10-492¢

10-820
11-152
11-213
12-12
12-189
13-69
14-46¢
15-78¢

17-9#

17-86

18-170¢
5-73¢

5-282¢
6-1240
7-360
10-11¢

10 396¢
10-702¢

7-19
7-36
8-21

S-73¢
5-216¢
5-282¢
6-22¢
6-1240
7-19¢
7-360
8-21¢

10-11
10-349
10-493
10-825
11-152¢
11-213¢
12-12¢
12-189¢
13-690
15-7
15-79
17-34
17-97

10-11¢
10-349¢
10-493¢
10-914
11-165
11-214
12-14

5-87¢
5-286¢
6-125¢
7-37¢
10-12¢
10-4310
10-7069

S5-102¢
6-8¢
6-126#
7-38¢
10-13¢
10-442¢
10-767¢

19-64

12-190

13-75
15-7¢
15-79¢
17-34¢
17-97¢
19-64¢

20-8
20-39

20 80
20 39¢

20 9
20 41

20 78
20 410

5-2¢
S 2240
S 309¢
8-5¢0
12-3¢
16 -600
20-2@

S 47
5-238
5-310
8 25
12 7
17-2
20-3

S-47¢
S5 238¢
5-3100
8-250
12 7¢
17-20
20-32

5-160

5 1600

7-11

19-2

5-102¢
5-236¢0
6-8¢0

6-460
6-126¢
7-2260

7-380
8-27¢

10-13¢
10-388
10-562
11-67
11-185
11-225%
12-185
12-192
13-93¢
15-10¢
16-604

10-539
10-9140
11-165¢
11-214¢
12-140
12-190¢
13-82
15-9
15-81
17-41
17-99
19-151
5-117¢

17-440
17-1100

6-11¢

10-825¢

10-9140

19-152¢
5-207¢
5-18¢
7-13¢
8-200
10-147¢
10-539¢0
10-92%¢

4-589¢

5-119%¢
5-299¢
8-40
10-349¢
16-2¢
19-640

5-104
5-298

6-127¢
8-70
10-14¢
10-4910
10-820¢

20-70
20 38¢

&g&m SNN

18-75¢

17 440
17 990

L VX AV IV QV.
1] . L]

10-349
15-2

17-99

1lc 1850
12-189%¢
12-1900
12-191¢
12 193
1S5 7e
15-77e
15 79
17 34
17 340
17-440
17-9%0

N ot gt

5-73
5-216
5-282
6-22
6-124

6-40
9-53¢
14-21¢0

12 168
12 189
12-190
12-191¢
12-192¢

(=X

5-59¢
5-207¢
5-280¢
6-18¢
6-97¢
7-130
7-35¢0
8-20¢
10-10¢

4-168

5-89¢
5-2900

5-89
5-290
6-4
9-53
14-21
18-75

6-630

4-340

]

5-75¢
5-273#
6-38
9-45¢
14-2¢
18 2¢
20-23¢

17-99¢
20-5¢0
20-33¢

12-190
12-191
12-1920
15-7
15-77
15-78¢
15-79¢
17-340
17-44
17-99

12 188
12-189
12-190
12-191¢
12-192¢
15-7
15-77¢
15-78¢0
15 79¢
17-340
17-44
17-99

12-189

20-46¢

20-6
20-36
20-48

12-193¢
15-9¢
15-78
15-79¢

12-188

6-63

17-34
17-410
17-99

12-188
12 189
12-190
12-191
12-192
12-193¢
15-77
15-78¢
15-79¢
17-34¢
17-44
17-99

6-80

4-7¢

12-187¢
12 1884
12-189¢
12-191
12-192

20-4¢
20-27¢
20-440

12-187¢0
12-188¢
12-189¢
12-191
12-192
12-193¢
15-9¢
15-78
15-79
17-34
17-410
17-99
17-99¢
20-5S
20-33
20-46

SEQ 0163

N
w
gN badgly

8-20
10-10
10-258
10-492

12-187¢
12-166#
12-189¢
12-190¢
12-192
12-193¢
15-9¢
15-78
15-79
17-34
17-41e
17 Ade
17-99¢

M-9

?OO\ANOOMMU‘
NG
e

I
1]

w NNNGU‘NN#
~ W
W
w

20-220
2-8¢0
2-8@
5-193¢
5-279¢
6-130
6-968
6-131¢
7-338
8-16¢
10-8¢
10-153
10-491¢
10-706
11-118
11-204
11-229
12-188
13-12
14-32¢
15-770
16-153¢

[]

13-2¢
17-9¢

6-8

NUNOBROY
o~

M$STAR
MeSvC

9 3¢

17-34
17-41
17-440
17-99¢
20 4
20-27
20-44

e p

MSSETS

12-193
15-9
15-78
15-7¢

u-—&»—&na

MSRBRO
MSRNRO

12 187¢
12-1880
12-189¢
12-190¢
12-192

N) ps e
OBV OVNNDS

MS$SRADIX

15-78
15-79
17-34
17-.41
17-440
17-99¢
1-D77¢
20-26
20-42

12-187¢
12-188¢
12-189¢
12-190¢
12-191¢
12-19%
15-9
15-78
15-79
17-34
17-41
17-440
17-99¢
2-80
20-260
20-42¢
2-80
2-8¢
2-8e
5-61¢
5-2600
5-327¢0

NNV

12-187¢
12-188¢
12-189¢
12-190¢
12-1910
12-193
15-9

14:40:57 PAGE

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO v04.00 20-JUAN 83
CROSS REFERENCE TABLE (CREF v04.00 )

15-7¢
15-77¢
15-78¢
15 79¢
17 340
17-44

5-117
5-258
6-127
7-24

15-7¢

15-77e
15 79
17-34
17 340

6 630
6-1268¢

8-9
9-30
10 97

8-9¢
9-300
10-134

11-86
11-1890
11-227¢
12-1868
12-1930
14 -31
15-61
16-140
17-68
18-155

11-147
11-192
11-228
12-187

12-195
14 310
15-65
16 1400
17-69
18-155¢

5-2368
6-460

5-258¢
6 49¢

8-27¢
10-263¢
10-562¢

9-10¢
10-3498
10-6114

10-431
10-630

7-19¢

7-220

8-23¢

10-258¢
10-5540
11-670

S5-272¢
6-12¢

6-63
6-128
731

8-7
9-10
10-14
10-396
10-611
11-73
11-185¢
11-225¢
12-185¢
12-192¢
14-21
15-41
16-139
17-45
18-75
19-165
5-216¢
6-220

10-550¢
11-526

12 193

5-272
6-12

6-11
6-49

8-21¢
10-153¢

12 168
12-189
12 1900
12-191¢

11-73e¢

31e

10-442
10-692

7 244

11 828

115

CZRLNBO RLO1/02 DRIVE TEST 3 MACRO vO04.00 20 JAN 83 14:40:57 PAGE M-10
1
CROSS REFERENCE TABLE (CREF V04 00 )

METSTL

7-330

8-16¢
10 8¢
10-134
10-263¢

M$WORD

12-191¢
13-82
14-46
15-61
16-60
17-44
17-79¢
18-156
1 Co4e
10-97
10-153
10-388
10-539
10 611
10-692
10-820
11-S2
11-86

10-539¢
10-611
10-692¢
10 820
11-52¢
11-86

17-86
20-9
20 39
20-48
1-8820
1-;62¢
1-:669
1-:710
1-:76¢

17-68
17-86
20-9¢
20-39¢
20-48¢
2-80
2-8¢
2-80
2-80
2-8¢

13-75%
15-41
17-45¢

MSXFER
MANUAL

MEMORY
OPEN
POINTE

10-4310
10-550
10-6230
10-767¢
11-52¢
11-147
11-192
11-228
12-185
12-192
13-82¢
14 -460
15-61¢0
16-60¢
17-440
17-86
18 156¢
2 8¢
10-97
10 153¢

10-388

13-75
15-41¢

15-41¢
17-410
18-1700
5-59
5-207
5-280
6-18
6-97
7-13
7-35

8 20
10-10
10-134¢
10-349
10-431¢
10-550¢
10-630
10-767¢
11-52¢
11-147¢
11-192¢
11-228¢
12-185¢
12-192¢
13-82¢
15-7
15-61¢
16-139
17-45
17-86¢
18-170
4-8

10-97

10-258
10-388
10-550
10-611
10-702
10-820
11-67
11-86
13-75¢
15 45
17-68
17-86
20-26
20-40
20-75
20-37
6-13
a-s

11-152¢
12-12¢
13-12¢
15-45¢
17-440
19-640
5-59¢
5-207¢
5-280¢
6-18¢
6-97¢
7-13¢
7-350

8 20
10-102
10-1340
10-349¢
10-442

10-550¢
10-630¢
10-820

11-67
11-148
11-204
11-229
12-186
12-193
13-85
15-7¢
15-65
16-1394
17-45¢
17-864
18-170¢
4-80

10-97¢
10-258
10-388¢
10-550
10-611¢
10-702
10-820¢
11-67
11-86¢
13-82
15-45
17-68
17-86¢
20-26¢6
20-400
20-75
20 370

11-165¢
12-140
13-69¢
15-61e@
17-45¢
19-151¢
5-73
5-216
5-282
6-22
6-124
7-19
7-36

8-21
10-11
10-147
10-350
10-4420¢
10-554
10-630¢
10-820¢
11-67¢
11-148¢
11-204¢
11-229¢
12-186¢

12-193¢
13-85¢
15-9
15-65¢
16-140
17-68
17-97
19-64

5-332
10-134
10-258
10-431
10-550
10-623
10-702
10-825
11-67
12-53
13-82
15-45
17-680

11 181¢
12-53¢
13-75¢
15-65¢
17-68¢
19-152¢
S5-730
5-216&
5-282¢

6-22¢
6-1240
7-19¢
7 360
8-21¢
10-11¢
10-147¢

10-350¢
10-442¢
10-554¢
10-692
10-820¢
11-070
11-152
11-213
12-12
12-187
12-195
13 85¢

15-9¢
15-650
16-140¢
17-68¢
17-97¢

19-640
5-332
10-134
10-258¢
10-431

10-5504
10-623
10-702¢
10-825

20-4
20-27
20-41

11-67¢
12-5%
13-82
15-450
17-694
20-44
20-27¢
20 41e

20-40

20-400

11-185¢
12 57
13-82¢
15-77¢
17-69¢
19-165¢
5-87
5 222
5-286
6-43
6-125
7 20
7 37

8-23
10-12
10-147¢

10-372
10-491
10-5544
10-692¢

10-825
11-73
11-152¢
11-213¢

12-12¢
12-1087¢
12-195¢
13-93
15-10

15-77
16-153
17-68¢
7-99

19-151
5-332
10-134

10-263
10-431
10-554
10-623
10-706
10-825

11-73
12-33
13-82¢

11-189¢
12-185¢
13-85¢
15-789
17-75¢

5-870
5.2224
5-286¢
6-430
6 125¢
7-200
7-37¢

8-23¢
10-12¢
10-153
10-372¢
10-491¢
10-562
10-692¢
10-825¢
11-73¢
11-165
11-214
12-14
12-188
13-12
13-93¢
13-10¢
15-77¢

16-153¢
17-69
17-99¢

19-151¢
5-332
10-134¢
10-263
10-431¢
10-554
10-623¢
10-706
10-825¢

15-61
17-75
20-5
20-33

11-73
12-53¢
13-85
15-61
17-75
20-5¢
20-33#

20-43

20-430

20-42

20-420

b Pn

11-148¢
11-2290
12-195¢

i Pt

11-147¢
11-22080
12 193¢
15-10¢
17-340
18-156¢
2 86
5-193¢
5-279¢
6-13¢6
6-960
6 131

11 86
11 2270
12 192¢
15-9¢
17 9¢
18 155¢
1-C21e

SEQ 0164

11-2040
12-187¢
14-210
15-81¢
17-860

11-2130
12-1680
14-310
16 -60¢0
17-97¢

5-102e
5-236¢
6-80
6-46¢
6-126¢

8-27¢

10-13¢
10-153¢
10-388

10-492¢

5-332
10-147
10-263¢
10-442
10-554¢
10-630
10-706#
10-929

11-73¢
12-57
13-85
15-61¢
17-75¢
20-60
20-364
20-43¢

11-22%¢
12 191¢
1S-7¢
16-153¢
18 750

S-117¢
5-2580

$5-160

5-1600

10 258¢
10-388¢
10 4930

10-562¢
10-702¢

11-217
12-53
12-189
13-69
14-21¢
15-41¢
15-78¢
17-9¢
17-75
17-110¢
19-152¢

11 2170
12-190¢
14 440
16 1400
17 1100

6 110
6-496
6-1270
7 240
B-/0
9-100
10-140

7-226
7-380

10-914
11-82
11-181

11 2140
12 18%¢
14-32¢
16 1390
17-99¢

10 6110

11-1810
11-217#
12-53¢
12-:189¢
13 69¢
14-31
15-41¢
15-79
17
17

34
75

18-75
19-165
S5-332
10-147
10-372
10-442
10-562
10-630
10-767
10-929
11-82
12-57
13-85¢
15-65
17-79
20-7
20-37
20-44

10 706
10-929
11-82¢

11-185
11-225
12-53¢
12-190
15-75
14-31¢
15-45
15-79¢
17-340
17-75¢

18-75¢
19-1€5¢
5-332
10-147¢
10-372
10-442¢
10-562
10-630¢
10-767
10-929¢
11-82
12-57¢
15 10¢
15-65
17 79
20 7¢
20-37¢
20 4490

$-272
6-12
6-63
6-128
7.3
8-9
9-30
10-97
10 2580
1G-396

S-272¢
6-120
6-630
6-12080
7-31e
8-99
9-30Ce
10-97¢
10-263
10-390

10 6110
10-706¢
10-9298
11-86
11 1850
11-225¢
12-57
12-190¢
13-75¢
14 32
15 4Se¢
15-81
17-41
17-79
18 155

10 623
10-706¢
10 9296
11 860
11-189
11-227
12-57e
12-191
13-75¢
14-32¢
15-45¢
15-81¢
17-410
17-79¢
18 1550

10-53%9

5-33%2

10 153
10-372
10-539
10-562
10-692
10-767
11-S2
11-82
13-12¢
15-41
15 65
17-79

20 8
20-38
20 46

10 S539¢

5-332¢

10-153
10 3720
10-539
10-562¢
10-692
10-7670
11 S2
11-82¢
13 75
1S 41
15 656
17 79e¢

20 8¢
20 380
20 460

CZRLNBO RLO1/02 DRIVE

CROSS REFERENCE
PRINTB

PRINTF

PRINTS
PRINTX
READBU
READEF

RFLAGS

SETPRI
SETVEC
SLASH
STARS
STCLK

SvC
WAITMS
WAITUS
XFER
XFERF
XFERT
3

<39

11 181
1 <790
10-491

15-7

1-=19¢
1-+590
1-+99¢

1->03¢
1->08¢

1 >130
1->18¢
1->24¢
1->38¢
3.260

1 »52¢
3-9¢
3 40
1 al2e
1-316¢
1

aco0e

1ABLE

TEST 3 MACRO vO4.00 20 JAN 83

(CREF v04.00

2-80
11-185
2-8¢
10-492
15-9
2-8¢
2-80
2-80
2-8¢
2-80
2-8¢
2-8&
2-8é&
2-80
12-60
2-68
6-12i
5-139
2-8¢
2-8¢
2-8¢0

5-160
11-189
6-124
10-493
15-77

)

5-193
11-192
6-125
12-12
15-78

S 207
11-204
6-126
12-14
15-79

9 30
6-22

J13

14:40:57 PAGE TMM 11

5@ 0165

5-216
11-213

5-279
11 214

5 280
11 217

12 185
17-24

12-186
17 41

12 187

6-46

6-49

10-93
10-426
17 69¢

10-128
10 532

719

7-20

5 282

10 914
11-227

11 147
11 228

17-44

12 188
17 99

12 189

12-190

10-437
10-689

10-698
11-62

17-36
12-48

12-64

7.22

11 225
7-3%

7-33

735

148

191

19 11
12-192

10-12
12-19%

15-36

15-5%

17-61

11 229
10-10

152

165

6-97
713

10-37
10-136
15 100
20-40

10-77
10-253
17-45¢
20-43

17-101