Digital PDFs

AC-3136D-MC

March 1978

266 pages

Original

136MB

view download

OCR Version

182MB

view download

Document:	CZR6MD0 RK611-06 SUBSYSTEM VERIFICATION 1 AH-9138D-MC MAR 1978 bw
Order Number:	AC-3136D-MC
Revision:	000
Pages:	266
Original Filename:	CZR6MD0__RK611-06__SUBSYSTEM_VERIFICATION_1__AH-9138D-MC__MAR_1978_gray.pdf

OCR Text

RK611/06

&mawesTMTM"TM
—

S, i

—

FICHE1OF2

MADEINUSA

SUBSYSTEM VERIFICATION 1
CZR6MDO

AH-9138D-MC

copymiGHT=76.78

FICHE2OF2

MAR 1978

TOEOREM

MADEIN USA

BO1
EOFIC%RSK SEQ
DP$B8Q40280
CZREMD.P11

00010000
780223
CZR6MDO RKBE11/06 SS VERIF 1

10-JAN-78 11:48

PDP10 411
MACY11l 30AR(1052)

HDR1CZR6MDSEQ
10-JAN-78
12:16
PAGE 2

00010000

SEQ 000!

M NN NN MU MU N 8 b s s s s Bt Bt Bt e

.REM @

IDENTIF 1CATION
AC-9136D-MC

PRODUCT NAME:

CZREMDO RK611/06 SS VERIF 1

DATE:

FEB 1978

MQINTAINER:

DIAGNOSTIC GROUP

AUTHOR:

DAVE HOFFMAN

W LWL

WMNIN

PRODUCT CODE:

HE INFORMATION_IN THIS DOCUMENT IS SUBJECT
TO CHANGE

WITHOUT

NOTICE

LLELEL L L LEWWW

c"SpoEn%n. "Ofa1¥he ESUIPRER? cORPORATION
ASSLMES MO RESPONSIBILITY
ERRORS THAT MAY APPEAR IN THIS
D

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER

L?gENgg

ONLY

LICENSE

BE USED OR COPIED IN RCCORDANCE WITH THE TERMS OF SUCH

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE OR
gE&%flgE
LITY OF
ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY
I

1976,

780223

1978 BY DIGITAL EQUIPMENT CORPORATION

MACY1l 30A(1052)

10-JAN-78

COl

12:16

PAGE 3

58058886002

TREBLEIPNIOOCESES

EEEEQB?PT?QII/OS §2N glfxl

1.0

ABSTRACT

2.0

HARDWARE REQUIREMENTS

3.0

PRELIMINARY PROGRAM REQUIREMENTS

Y.
3'2

85'5'5"“ PROGRAM CONSIDERATIONS

:Za. é

CHAIN MODE

7§

TABLE OF CONTENTS

4:§'
:.3. é

AUTOMATIC MODE

4.3.3

APT ETRABLE DEFINITIONS

T/AP

i3
4.6

MEMORY PARITY CHECK

4.8

EXECUTION TIME

gé

4.7

BAD SECTORS

5.0

PROGRAM LORDING

6.2

SWITCH REGISTER OPTIONS USED

54
8s

6.0
6.1

7.0

OPERATOR ACTION

8.0

PROGRAM ACTION

82525

?EgT ;E&E?l&i

91
gg

9s
96
97
98
99

8.1
8.2

g.2.2.1
g.2.2.2
g8.2.2.3
g8.2.2.4
8.2.2.5

STARTING PROCEDURE
STARTING ADDRESSES

DESCRIPTION OF OPERATING PARAMETERS
s&sgnou o;
OPERATING PARAMETERS

LIST E§Ts
L)
CHANGE assts (c)
xnpgr PARAME tERS nng RUN TESTS,
CONTROL Z (tZ) FUNCTION

CONTROL C (#C) FUNCTION

(I)

mM&SmMKTflmTTTQMQ-TwTTQMflWC.MWN
m-vONF3amMvOW;b!=:SE=xoemgJ¢g&4[+dlW%SlmEBmlSl8mlRLFowraPmlE.(7]us>4LmBy>eE,aSbo4eSatuePfeooltdbSu4S&nsW£-fMprGp(eNnzX&%)omBdswengoEtu5-®=gW-&-—o]
aa

2- I- =

S2ay0g2gTbA.g>Ti2t>pDiT-pTuiC.pTuioT.2[T-[0T-NLoC.L6oT-w8LoOARouCR-nLO.r0ue-aTs-emuC-HRTO n-Rh.LTn-LR8e.LROs.De.LTL0.eNs-CD-5LDDDRoAVTcL.6OD-ADND-DD-8DD.eDD.DD5DD.DDD8EehEL5ohLD2ebb
d
d
c
n
n
r
s
y
.&izv.A.w&3eU.n.EW5PERE3W@IbWMpP3IheSMTgEZIeasxEIZNE82IS%ASTOenOEDWNS0N0GF-av~8L5—oU0tM5T8&=Ur-NyD&- &>
--4 W--WoX—_—&_zz——>=%]w-miWt-X0WW- —— -w-~nm -z~4
CZR6MDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
MACY11l
30A(1052)

10-JAN-78

12:16

DOl
PAGE 4

SEQ 0282
SEQ 0003

X0-

CZR6MDO RKB11-06 SS VERIF 1
10-JAN-78

11: 48

EOL

10-JAN-78

12:16

PAGE
S

SEQ 0283
SEQ 0004

THIS PROGRAM PERFORHS PFRT 1 ?F THE RKO6/RKO06-RKO7 SLBSYSTEH VERIFICATION
TESTS,
WHICH
% FUNCTIONAL SHAKEDOWN OF THE ENTIRE SUBS STEM

INCL
ubxnc LNIBUSNTERFRC$ AND ACCESS TO MAIN MEMORY.
-CASE

SITURTIONS

INVOLVING

THE TESTING
MECHANICAL

COSLLICAING KoolOBRRING
TMG oBHIE ofCENTionv Trking, 01 ION
WITHIN THE VARIOUS SUBSYSTEM TESTS,

LOOPS

AND

BEGINNNG OF

RATOR

_SPECIFICATION

EMPHARSIS IS GIVEN TO USEFUL

TEST PARAMETER VALUES.

TESTING, THE FOLLOWING OPTIONS MAY

SCOPE

AT THE

SPECIFIED

ARE

PROVIDED,

FOR

THE

S §os*we

NUMBE!

TEST( 3) TOT

;RRTIONS

Bl poeRe, Tigpres

NN NN
DD
DD
WD
O 00000
0W W

207

RABSTRACT

1.0

TUNUNU NN MUY N 0 5t 5t e s s s Bt Bt ot Pt s s Pt ot et Pt s ot s ot it s ot ot Pt ot s s s ot s Pt s Bt s Pt ot P

s Pt s Pt Pt Pt s P
un

CZR6MD. P11

MACY1l 30A(1052)

SS onngmn TRANSFERS

PHYSICK MEMORY

STKL thEEN
TIME
OPERATIONS
IN RDDIT ON,

VARIETY

STANDARD SWITCH REGISTER

OPTIONS

PROGRAM LOOPING, RUNNING, AND REPORTING MODES.

E RRORS WILL BE REPORTED RS THEY OCCUR.

NUMBER

AND DESCRIPTION,

THE REPORT WILL INCLUDE
A TEST
CURRENT AND PREVIOUS OPERATIONS, GOOD AND BRD

TEST DATA, AND APPLICABLE DEVICE REGISTER CONTENTS.

2.0

HARDWARE REQUIREMENTS

THE FOLLOWING HARDWARE IS REQUIRED TO RUN
VERIFICATION TESTS:

I:EP-IIIO"O(0S,10 MFG.

CONSO&
%LE
Hll-b
OR K
Ué-LOCK
RKO6

PART

THE

SUBSYSTEM

ONLY),20,34,35,40,45,50,70 OR POQ

CONTROLLER (RKB11)

1708
RKD&/ DRIVES

1T08 RKO&/O? DISK CARTRIDGES (FORMATTED IN 20 OR 22 SECTOR FORMAT)
NOTE

NEITHER_KW1l-L_

PROVIDED,

THE

OR _ P__

TIMING

CLOCK _ IS

TESTS IN SECTION

10-JAN-78

FOI

12:16

SEQ_ 0284
SEQ 000S

PAGE b

9.2 WILL BE BYPASSED, AND A MESSAGE WILL
INFORM THE OPERATOR.

3.0

PRELIMINARY PROGRAM REQUIREMENTS

BEFORE

RUNNING

SUBSYSTEH

VERIFICATION_ _ PROGRAM

THE

RKbll

SYSTEM

MACRO

CONTROLLER DIAGNOSTIC (CZReAR THRU DZRBE AND CZREK) AND RKOB

DRIVE DIAGNOSTIC (CZR6H THRU CZR6J) SHOULD FIRST BE RUN, TO
RESOLVE BRSIC, SOLID HARDWARE FAULTS.

4.0

GENERAL PROGRAM CONSIDERATIONS

4.1

SYSMAC

ggéinzgocnnn USES PORTIONS

4.2

THE

SYSMAC

DIAGNOSTIC

XXDP

SUBSYSTEM TESTS 1-21 MAY BE
THIS PROGRAM MAY BE LOADED UNDER XXDP.
RUN §EDEHRIN OR DUMP MODE, BUT DUAL-ACCESS TEST 22 MAY ONLY BE RUN IN
pumMP

4.2.1

CHARIN MODE

THIS PROGRAM

XXDP.

IS DESIGNE? T? BEGSEN IN THE
_THUS, INPUT DIAL
IS BYPRS

DEFAULT

MODE WHEN CHARINED
AND RKOE UNIBUS ADDRESS

AND INTERRUPT VEC?OR ARE DEFAULTEDTO _STANDARD VALUES.

PRESENT AND READY WILL

_ALL DRIVE

BE TESTED HITH THE EXCEPTION OF DRIVE O, IF THE

RKOB CONTARINS THE XXDP MEDIUM.

CAN

RUN

DUMP

MODE,

WITH

MWITHOUT

DEFAULT

MAY BE TESTED, 'BUT _IF IT CONTAINS THE XXDP
ST REPLACE THE "XXDP PACK WITH A FORMATTED

=20

UMMM

NNV

TVTV VY RN n
PU NN 0 0 ps et s s ot s e pe ()

SBBNEREZEREEBVRRES N=ODONC"NLEWNN—~0DW 8

CZREMDO RKE11/06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

MACY1l 30A(1052)

TESTING.

A MESSAGE WILL INFORM THE OPERATOR

CZR6MDO RKB11-06 SS “ERIF 1

CZR6MD.P11
261
262
263

10-JAN-78 11:48

MACY1l 30A(1052)

GOl

10-JAN-78

12:16

PAGE 7

SEQ 0285

SEQ 0006

;

egg

4.3

ACT/APT

66
ggg

THE PROGRAM IS COMPATIBLE WITH ACT/APT CONVENTIONS.
1-21 MAY BE RUN IN RUTOMATIC OR DUMP MODE.

SUBSYSTEM

TESTS

gse
70

a;é

73
275

276
277
278
ssg

281

ggg
284

55;
Sge

ggg
291

|
4.3.1

RAUTOMATIC MODE

PROGRAM PROV
APT/ACT OPERATION.
IN
THIS MODE
Pgsnnegf
&?E§FOR
SsrAUTOMATIC
9 VALUES,
AND ALL DRIVES un%cn
nné
PRESENT
AND nsnov nns TEST

4.3.2

DUMP MODE

IN DUMP MODE,

PARAMETERS MAY BE INPUT,

DEFQULTED

AND

SUBSYSTEM

4.3.3 APT ETABLE DEFINITIONS
THE FOLLOWING DEFINITIONS ARE VALID FOR SPECIFYING APT ENVIRONMENTAL
TABLE (ETABLE) ENTRIES,
SOFTWARE

_ENVIRQ

VIA THE APT UTILITY PROGRAMS :

gqa

ggg

2. snvxsgnnent MODE g

ggg

BIT & = 6

93
294

TESTS 1-21 OR DUAL-ACCESS DATA TEST 26 MAY BE RUN

=1i
ap
=0

300
301

BITS ==0|

ggg

BITS 4-0

dsrea

BRI
oo% MES

Ts ;3 RPT IF SCRIPT MODE

gUPPfliggoghflsgLE
QUTPUT
ALLOW CONSOLE OUTPUT
NOT

304

305

?r ENVIRONMENT MODE BIT 7 (SIZING BIT) IS SET TO1, THE SOFTWARE

307

SWITCH REGI

309

RUNNING

306

308

310
gié

. SWITCH 1

R PT noos

(SOFTWARE

SWITCH nscg TSR WIL
.

SWITCH REGISTER)

D, INSTEAD OF THE uhnounns CONSOLE
WHICH

ALL

BITS

IN grnnog§

IN APT SCRIPT MODE, HOWEVER, BIT 14 (LOOP ON TEST) MUST ALWAYS BE
ET TO O.

313

4.,

SWITCH 2

316

MEMORY TYPES 1-4 AND MAX MEMORY ADDRESSES

g{g

USED,

DEFINED IN SECTION 6.2 (SWITCH REGISTER OPTIONS) MAY BE USED WHEN

(USER SWITCH REGISTER)

NOT USED

MACY1l 30A(1052)

10-JAN-78

12:16

PAGE B

SEQ 0286
SEQ 0007

NOT USED

BUS PRIORITY 1

INTERRUPT VECTOR 2
NOT USED

BUS PRIORITY 2
NOT USED

USED WHEN ENVIRONMENT MODE BIT 7

10. BASE ADDRESS
USED WHEN ENVIRONMENT MODE BIT 7

DEFAULT = 210

DEFAULT

DEFAULT = 177440

6. INTERRUPT VECTOR 1
USED WHEN ENVIRONMENT MODE BIT 7

CZREMDO RKE11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

11. DEVICE MAP
USED WHEN ENVIRONMENT MODE BIT 7 = 1.
EACH BIT SET TO 1
0-7 WILL SELECT THE CORRESPONDING DRIVE TO BE TESTED.

BITS B-1S5

12.

4.4

ONLY

REMAINING ETRBLE ENTRIES ARE NOT USED.

DUAL-RCCESS

REATEch) BN

UTILIZE

R e G
ROVRPN

DUAL-RCCESS

TEST

eW R

o WA
N rifhs, TR I

MEMORY MANAGEMENT

mxs Pnocmn

FOR

§u||:

nonv mmcsnsm omxous KT11C,D RO

e Blep"'sm
I Rke
INSTALLED).

4.6

BITS

NOT USED.

THIS PROGRAM IS DESIGNED

4.5

PDPU/?D

NLY. m THESE TESTS Npk

IN flLL OTHER TESTS HEHORY HRNRGEHENT IS DISABLED.

MEMORY PARITY CHECK

IF THE MEMORY PARITY CHECK OPTION IS

TESTING

REPORTED,

DONE_

WITH

PARITY

AND TESTING IS ABORTED,

CHECK

AVAILABLE

ENRBLED.

ON_

THE

PARITY

UNLESS THE BYTE LABELED

SYSTEM,

ALL

MEMABT

WRAS

"ERRORS

ARE

CZREMDO RKE11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY1l 30A(1052)

10-JAN-78

101

12:16

PAGE 9

SEQ_ 0287
SEQ 0008

PREVIOUSLY LOADED WITH A NON-ZERO VALUE.

4.7

BRAD SECTORS

ACCORDING TO A CONTROL SWITCH OPTION (SEE_SECTION 8 2 4.2

)

THE

BAD

TO TESTING.

MASKED

OUT

SECTOR__FILE

ON EACH DRIVE TO BE TESTED I? TYPED
AT THE CONSOLE PRIOR

ALL DATA_ERRORS OCCURRING IN

éSFTEHEE) OCCUR

4.8

SECTORS

DESIGNATED

HE PROGRRH RRE

RS BAD (BY EITHER FACTORY OR

EXECUTION TIME

EXECUTION TIHE IS DEPENDENT UPON PARAMETERS INPUT BY THE OPERATOR
(SUCH_AS STALL TIME OR_ITERATION COUNT)
nno 70 A _LESSER oscnss UPON

THE PROCESS

HOWEVER, THE _"AVEnnce TIME REQUIRED 10 kun A

uxcx-vsnxrxcnrxou (FIRST'PASS) IS 14 MINUTES PER DRIVE.

A SUBSEQUENT

PASS WITH PARAMETERS DEFAULTED REQUIRES 21 MINUTES PER DRIVE.
NOTE: TIMES ARE APPROX. DOUBLED FOR RKD? TESTING.

S.0

PROGRAM LOADING

THE PROGRAM CAN BE LOADED FROM PAPER TAPE USING THE ABSOLUTE LOADER OR

FROM ANY MEDIA SUPPORTED BY
XXDP.

6.0

STARTING PROCEDURE

6.1

STARTING ADDRESSES

Lfrrrx LfLfrrrrrfrrrrrs

PUNU N 0= s s st et st s s s
mgmmm
NOINLEwW NN—-O0ONN LW

410

4ee

200 NOR
204 SELE

STARTING ADDRESS OF TESTS1-21 (PARAMETERS DEFAULTED)
AND INTERRUPT
OPERATING PARAMETERS,RK06/07 UNIBUS ADDR.

VECTOR FOR TESTS 1-21
220 DUAL-ACCESS DATA TEST 22 START ADDRESS

6.2

SWITCH REGISTER OPTIONS USED

THIS PROGRAM IS DESIGNED TO ALLOW THE USE OF THE HARDWARE SWITCH
SE OR THE SYSHRC SUPPORTED SOFTWARE SWITCH REGIS;ER

(IF HRRDNRRE S IS NOT PRESENTOR IS SET
TO

CASE

ARE SET

ALL

_ONES).

EITHER

HE FOLLOHING OPTIONS ARE IMPLEMENTED NHEN THE APPROPRIATE BITS

CZREMDO RKE11-06 SS VERIF 1

CZREMD.P11
429

10-JAN-78 11:48

MACY11 30“(1052)

JO1
10-JAN-78 12:16 PAGE 10
BIT

OPTION

SEQ_Q2es

-SEQ 0009

CZREMDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY11l 30A(1052)

KOl

10-JAN-78

431
432
433
434

12:16

PAGE 11

SEQ_Q289
SEQ 0010

435
436
437

1S
14
13

439

441
442
443

09
o8
07

:g?

REPORT ALL SOFT

438

Y40

Y4y
445
446
44?7

06
0sS
o4
03

HALT ON ERROR
LOOF ON TEST
INHIB%TDERROR REPORTS

REPOR

?CRIPTION ONLY, ON ERRORS

&HIB T ITERATIONS
L

RROR
Y
Tflgl. BETWEEN OPERATIONS
EXPLICIT
SEEK PéN TESTS 1-12

REPORT
E
R _TRANSFER IN TESTS 17,21
INHIBIT
%T S IN TgST el
INHIBIT WRIT %CK IN TEST 21
INHIBIT REQ
SOF TWARE COMPARES IN TEST 21

COH’&E ERRORS IN TESTS 17,21

452

4ES

FOR ADDITIONAL PROGRAM CONTROL

457

(CS), SECTION B.2.4.2.

456

SEE

458

DESCRIPTION

_OPTIONS

OF CONTROL SWITCH WORD

459

460

:gé

7.0

OPERATOR ACTION

463
464
:::g

1.
2.
3.

467

:93

T
IRED STARTING
ADDRESS (SEE SECTION 6.1)
$. LORD
SET su"?cag
EDESIRE
(SEE
SECTION b.2)
OR GIVE APPROPRIATE MONITOR START COMMAND.

468

471
472

473

LOAD PROGRAM INTO MEMORY (SEE SECTION 5.0)
LOAD A FORMATTED PACK ON EACH DRIVE TO BE TESTED.
BR NG DRIVE (S) TO ONLINE STATE, WRITE ENRBLED, AND LOCKED ON

S START

8.0

PROGRAM ACTION

:;g

8.1

DESCRIPTION OF OPERATING PARAMETERS

479

AFTER

481

FOLLOIvED BY:

474

480

484

48s

THE

FOLLOWS:

PROGRAM

STARTED,

*CZR&MD RKS'I*.I/RKOB-RKO?
LRS

YS HEH

TYPES

ITS

IDENTIFICATION,

THEN,

EITHER

THE

PARAMETER

SUBSYSTEM_ VERIFICATION:

X"
-XXXX

THE

PART RS1,*
TESTS

ol
gr iBY onbRartn
eIl
Ofi
¥ ETiuen
E SREgHET AR
Ng QSRE2ERg,
N.TERED
VARIOUS HERNS
ALL
RHETERS ARE TRERTED flS OCTQL NUMBERS,

LIST

488

MACY1l 30A(1052)

10-JAN-78

12:16

PAGE 12

SEQ D299

489

SHARED AMONG THE TESTS.

431

THE FOLLOWING IS THE LIST
OF OPERATING PARAMETERS,

MR51O DN BeE THOCECUSED
BV THE PHOCRAM-TCERS, AND THE

AT R

s00
501

(MHICH APPLY TO THE

5 LR0,0C PR PRBalBAlREn (SRS ol IPICAIERL
%2
T
B
LAST CYLINDER
RANGE OF CYLI

SS IN TESTS WHICH ARE DONE
. LC=0-632, DEFAULT=632

OVER

205

§?§

LAST_TRA f 5?2853?

§i§
i
§i2
£i3
521

o
©

RARGE SNCREMENT VR4YE-IN JEPAG, fulcH ARE DONE OVER A
CIGST SEETORBGRRESS In
JESTS MgoH GO0, 0980, 0D, 2
20-SECTOR FORMATTED CARTRIDGE. S0=0-23, DEFAULT=0
Rl IoN SRUOESS INCIESTR, MU ol Rl §
20-SECTOR FORMATTED CARTRIDGE. S1=0-23, DEFAULT=23

504

CYLINDER INCREMENT VALUE IN TESTS WHICH STEP THROUGH
CYLINDER

523

527

631
53

SSES, 1C=1-632, DEFAULT=1

| JESTS_MHICH ARE DONE OVER A RANGE

FIRST SECTOR ADDRESS IN TESTS WHICH ARE DONE

OVER

LAST SECTOR SOORESS IN TESTS

WHICH ARE DONE

OVER

SECTOR INCREMENT VALUE IN TESTS WHICH ARE DONE
RANGE OF SECTORS, 15=1-25, DEFAULT=1

OVER

534
535

DATA PATTERN SELECT WORD
(SEE
DETAILS) PT=0-177777, DEFAULT=

§37
538

CONTR
1TCH WORD (SEE SECTION 8.2.4.2
€$=0-000070, DEFAULT=

540

WORD COUNT (NO.

525
Egg

g4l

BENGE.1OR FORMATIED CARTRIDGE. saao-a§. DEFAULT=0

BANGE 1Ok FORMATIED CARTRIDGE. sa=o-e§, DEFAULT=25

WRITE

CHECK

SECTION

8.2.4.1
FOR

OF WORDS) USED IN DISK READ,

COMMANDS

FOR

DETAILS)
WRITE,

DATA TEST 20 , Wl=0-177%77,

CZROMDO_RKb11/08
S8 VERIF 1 .

LOl

CZR6MDO RKB11-06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

MACY1l 30A(1052)

10-JAN-78

MOl

12:16

PRAGE 13

SEQ Q291
SEQ 0012

DEFAULT=MAXIMUM BUFFER AVAILABLE, WC=0
RS 65,536 WORDS

INTERPRETED

BUYPER)“USED ON ALL DATA TRANSFERS IN TESTS 81, 2. MA

18T

O 0R° Oy
"HendR
Eelh A"“RVAYEAPE
DEFAULT = RDDRESS

IT STALL

T sum& commbs

8.2.1

(DELAY)

MAXIMUM NUMBER OF UNIT STALL TIMES USED IN TEST 12 ONLY

8.2

TIMES WITH WHICH TO STALL

SELECTION OF OPERATING PARAMETERS (ADDRESS 204 START)
DRIVE SELECTION

"Rl vEcHoR
OERRREeROTRBER ABOcH "Trell rhE-Akel; RECISTER ADBRESD
MODIFICATION
ngefess AND RKO®& PRIORITY antGPE

RkBe-f7 OET ABR C '772IQ

RKO6-07 PRIORITY =

NEW VALLE IERE)
NEWZ(IVPE
W=(TYPE NEW VALUE HERE

NEXT THE PROGRAM TYPES THE NUMBER(S) OF THE CURRENT DRIVES UNDER TEST

Ew BY A (%) ON THE NEXT LINE TO REQUEST NEW DRIVE NUMBERS.

FOR

PARAMETER INPUT MODE

omvstc)-o

(INPUT,

IF’ Mv GOES HERE)

<CR>

)

PARAT!
IHE_OPERAT rm:s THE NEW NUMBE
TP HE E°"“2§T: oS'r'dE
ERCHANGED
THEN
gRve
0"
Chy
e
Py
THESE onxvss
roa
V&%D
STAT av r%
L
&"Eggro;'m'eu;
uv
uuxcu u LL
'Ek
2 asflaem‘
onTv"Ee
THE OPERATOR
D, uuuL
cxe né I?
NM
LY’ rvps JUST <CR>.

THE onxvss WH

ISTED ARE AL

INITIAL ENTRY rnon
ruoéi
o
e
VsTEnRon:zcu
keAN
ON-LThE
né“e
"‘?rk ;o.
S
m.
THAN
c
a
unu
LORDED
DEFAULT ng rf'
FOR ADDRESS 200
S
mm
ENTRI ss
ON

TO THE DRIVE

SELECTION ROUTINE (VIR

<tC>

oescnxazo

sscnons

CZREMDO RK&11-/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

MACY1l 30A(1052)

10-JAN-78

8.2.2.5 AND B8.2.3.6)

NO1

12:16

PAGE 14

SEQ 0292
SEQ 00 13

THE PROGRAM FIRST TYPES:

TO TEST AL DRIVES TYPE "A"<CR>,

ELSE

(CHARACTER GOES HERE)

NEXT,

<CR>

THE 8RI$ES ARE LISTED AS SHOWN ABOVE.

(R)

TYPED,

ALL

= OVODNCNLWNN—-0O

mmg— e oY S Sy Sy Sy Sy

oo
oo o oo o oo

Sx?ségBLEng%%b BE LISTED, AND IF NOT, THE PREVIOUS SELECT!ON OF

bee

B8.2.2

TEST SELECTION

WHEN THE OPERATOR
F mu.v TYPES JUST <CR> IN
RESPONSE
REQUEST,
THE
PR
ENTERS
THE TEST INPUT ROUTINE.

smuc?xve LINES nae TYPED :

TO
THE
DRIVE
THE FOLLOWING

c
= LIST rs;rs

I= mu"'"'?Epasgftrsns AND RUN TESTS

THEN,

THE FOLLOWING REQUEST IS MADE

ENTER

umhcfsnGOES HERE)

THE OPERATOR TYPES THE DESIRED CHARACTER PLUS <CR>.

8.2.2.1

LIST TESTS,

ESL&%&SIS TYPED,
TE?T

THE PROGRAM TYPES THE CURRENT DESIRED TEST

LIST,

ITERRBIONS

177777

(L)

400

THE ITERQTION NUMBER IS THE NUMBE R OF TIMES THE TEST WILL_
BE
RUN ON
THI
s
T MUST a; BETWEEN O AND 177777.
IF
; *s ZERO,
THAT
ON

TEST ux
T TIME THROUGH
ESTS nse LISTED
*RDBSES TD}RRTIONS
CQEEBEIngnggcgzuksfléTtRnTION NUMBERS BEGINS
ggfi? THER%IST IS COHPLETED

THE PROGRAM RETURNS TO TYPE

TMENTER L,C,

RIF 1
CZREMDO _RKB11-06
S
C
MD.P11
10~ AN -78 11:48

MACY11l 30A(1052)

10-JAN-78

BO2

12:16

SEQ

PAGE 1S

6S1

8.2.2.2

CHANGE TESTS,

(C)

t (C) I TYPED THE PROGRAM THEN_ASKS:

_*"TO DEFRULT TESTS _TYPE D<CR>S

égrroa POS198%AL§ESn §sTYPE?AE"sennSEOUSNTIRLLYOPE"

NED
AL, FOLLOE
TEST

EXRI‘P '

ITERATIONS

0 # (INPUT, IF ANY, GOES HERE)

THE OPERHTOR THEN T

:EOn"éVINGTHE
NE IS TY
(%) ON T

UNCHANGE

S THE NEW _VALUE

ERR on

(EXCLRHRTION POINT) THE

PLUS <CR>,

OR JUST <CR> TO LEAVE

NUMBER

YPES

T ENTERED WILL BE

FOLLOWED

LOADED

BY <!>

INTO

THE

EfigafOQHeTgsLERnnRETfihhSR$"“¥N$NG TE“ENTERQFTE? 8& ITEEESIHRVE —
8.2.2.3

INPUT PARRAMETERS AND RUN TESTS,

IF (1) IS TY
R INE DESC

nrsns

(I)

THE

PARAMETER

LIST

FROM

ALTERATION

secrxou 5 3, IN WHICH OPERATING PARAMETERS MAY
PE?QED”?N
AND TESTING BEGUN

B8.2.2.4

CONTROL Z (tZ) FUNCTION

IF_THE OPERATOR WISHES TO EXIT AT ANY TIME

MODE,

AND

RND

RETURN

RETURN TO SELECT A NEW MODE (L,C, OR I), CONTROL Z (12) MAY BE TYPED.
8.2.2.5

CONTROL C (#C) FUNCTION

IF THE OPERATOR WISHES TO TERMINATE L,C, OR

MODE

REQUEST NEW DRIVES AND TESTS, CONTROL'C'(#C) MAY BE tvPED
8.2.3

PARAMETER LIST ALTERATION

THE PROGRAM NEXT TYPES THE FOLLOWING INSTRUCTIVE LINES:
T = TYPE LIST

2z XN KdIviouaL PaRaM.

8coss HERE)
b,
¥ unnhcfzk

THE OPERATOR TYPES THE DESIRED CHARACTER PLUS <CR>.

stg0014
aoe

CoREMB
P o L OBFANY5E1 lue

MACY11l 30A(1052)

coe

10-JAN-78

12:16

PAGE

NNNNNNNNNNYNNNNNY
U MU MU MU MU= b s s hs Pt Pt Pt ot s

LWN—-0OVONOCNLW~-0O

707

8.2.3.1

TYPE LIST,

IF (T)

IS TYPED,

FOLLOWS:

(T)

THE PROGRAM TYPES

THE

CURRENT

PARAMETER

LIST,

= XXXXXX
= XXXXXX

gsEN
THE

8.2.3.2

Fope8

IST IS COMPLETED,

OPEN LIST,

THE PROGRAM RETURNS TO TYPE "ENTER

T,0,S,

(0)

&R, T EL e (F >"'~‘°?““?u§"'2c2§"is TYPED, THE PROGRAH-SEGUENTIALLY

008,
SOIy
Pealon
oueo'av
(%) ON THE SAME LINE.ilFOR
EXAMPLE:1 ALETIAT, W1 D€
IC=3 # (INPUT,

TESV

IF ANY, GOES HERE)

RATOR THEN TYPES THE

Emr'x'"!“gnfP

&‘E

us ‘
A CR?ER

TUurRNS TO TYbE
“ENT

nn5 s&a«‘cg;mr:

0,5, OR R* ARGAIN.

THE LIST OF DEFAULT PARAMETERS BEGINS AT ADDRESS "PRDFLT“,
ALTERED IN CORE.

8.2.3.3
IF (S)

AND

SET INDIVIDUAL PARAMETER,
I¥ TYP%R,

WAITS

EgTER 7,0,S,

AND CAN

(S)

THE PROGRAM TYP;S TgE PROMPTER (>) ON THE NEXT_

THE

OPERATOR

THE

VALUE

LINE

OF ANY INDIVIDUAL

OR R

(ENTER PRARAMETER AND VALUE HERE)

THE OPERATOR TYPES THE PARAMETER AND ITS NEW VALUE FOLLOWED

RQSHPEEE

PROGRAM
600
12
1

GIVES

THE

PROMPTER

<CR>

(>) AGAIN AS IN THE FOLLOWING

MACY1l 30A(1052)

10-JAN-78

12:16

PRAGE 17

TO_TERMINATE INDIV&DUR% ;ETTIN? HODS

(t2), AND THE PROGRAM

8.2.3.4

RUN TESTS,

RETURNS TO

SEQ_029S
SEQ 0016

THE

OPERGTOR

TYPES

TYPE “ENTERT,0, S, OR

éF THE OPsngngfl
TYPES (R), EXECUTION OF TESTS BEGINS,
URRENT P
TERS

8.2.3.5

CONTROL

AGAIN

(R)

USING

ALL

THE

CONTROL Z (tZ) FUNCTION

uxsues TO EXIT AT ANY TIME
FROM
T
R MODE
(Ruu“f,,?f‘
TESTS
nuo
RETU
T0
ssn.sgg
NEW
nbos
!T
s
OR R),
CONTROL2 (12) nhv TYPED.
8.2.3.6

CONTROL C (tC) FUNCTION

MODE,

ursrcs TO Tsmxmrs T,

STOP

TEST

IF THE opsnmon
EXECUTION
(R MODENtucsg
C (1C)1 ONMAY( SEE
éeTYPE
AND’B8.2.1).
THE PROGRAM
WILL
xvs
nzwnn T0 neouesr
ecr
cTioN
(ON
AN
c):
oL
0,380

nrrsn c

agn

CZREMDO RKE11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11: 48

nnc mv DATA mm ER

ONTROL

B8.2.4

SPECIAL PARAMETER SPECIFICATIONS

8.2.4.1

PT-DATA PATTERN SELECT WORD

C cnusss THE PROGRAM TO HALT

RRTOR SPECIFIES A_WORD OF SIXTEEN BITS

(6__OCT.

DIGITS),

e
%THE
Lo, GyIGH SFPINENo A
CHOSEN
)
THE USER WILL BE RSKED

FOR PsiTgsNTQSEIXTEENP8352R=ORD§E

ILL BE "LOADED INTO THE

BUFFE

“SELECT USER DEFINED PATTERN 15"

s 5

Bl MR
R PR

WORD 0 = (OLD
ViUE) # (NEW VALUE GOE
E?go 1 = (OLD VALUE) * (NEW VALUE GOES

R PRV
o PO
RE)
HERE)

CZR6MDO RK611-06 SS VERIF

CZRE6MD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

EQ2

10-JAN-78

12:16

PAGE 18

FOR ERCH HOR?
THE USER TYPES T

(TO LEAVE

PLUS

P$ =§u

THE OPERRT

FILL

SEQ_02%
SEQ 0017

HRY TYPE (') (EXCLQHGTION POINT)

_UP

REST

SPECIFIED.

THE

PATTERN

AND

BUFFER

THE PROGRAM HILL CONTINUE,

INPUT MODE (0 OR’S).

B8.2.4.2

<CR>

JUST

<CR>,

PROGRAM_

WILL

HAN 16 WORDS FOR Pg?TERN 15
IN THE

THE

WITH

THE LAST HORO

PROPER

PARAMETER

CS- CONTROL SWITCH WORD

RQO}TION
TO THE OP ¥8NS
VIDED
BY THE SWITCH
REGISTER
(HARDWARE
A_CONTROL SWITCH WORD (CS) MAY BE SPECIFIED AMONG THE

OPERRTINGPRRhHETERS TO PROVIDE THE FOLLOWING OPTIONS :
BIT
0S
04
03

OPTION
DROP DRIV
IF°£0(DEC) ERRO g EXCEEDED
TYPE BAD_SECT
FILE? (BSF’S) ON FIRST PASS
INHIBIT TIMING REPORTS IN TESTS 13-16
NOTE

OTHER BITS UNUSED

9.0

DESCRIPTION OF TESTS

9.1

SEEK TESTS

}

THIS GROUP OF

THROUGH

PERFORHS

EXE?

T feieorehe

VARIETY

POSITIONING

OPERATIONS.

OHHSEDS o?HPLIED SEEKS 8RE DONE

o elo T Sy 20 conltth 1o Inal

i
R
R
H

STING, SECTOR=FS,

9.1.1

TRACK=FT.

TEST 1 - RECALIBRATE/SEEK TEST

THIS TEST WILL PERFgRH A RECAL IBRATE COHHQNO

OLLOWED

_SEEK

SEEKING IS IMPLIED,

CYLINDER

LC.

(POSITION TO CYLINDER 0)

(RS IN ALL OF THE SEEK TESTS

VIA THE REARD HERDER COMMAND).

CZREMDO RKB11-06 SS VERIF l
48
CZREMD.P11
10-JAN-78
1
872
873
874
75

78
(44

MACY1l 30A(1052)

9.1.2

10-JAN-78

FO2

12:16

PAGE

SEQ 0297
SEQ 001

TEST 2 - SEEK/SEEK TEST

THIS TEST WILL PERPFORM A SEEK TO CYLINDER FC, FOLLOWED BY A SEEK TO

CYLINDER LC.

9.1.3

TEST 3 - CYLINDER RDDRESSING TEST

THIS TEST VERIFIES THE CYLINDER RODRESS BITS,

BY_SEEKING TO

RNO 400’ (OCTAL).

obNE in RQVERSE ahcx
?o c?LNot 0.
noonssses SEQUENCE RS
F

THEN,

CYLINDERS

THE SEEKS

1IN BINARY, rne CYLINDER

0000
001
000000010

001000000

000000001

T NDEROSSflLK 3?5?N
EYEQEDERnogsssgggctbggaf) FIRS; g gsg&
TO
RogE K TO336 C. THE CYLINDER ADDRESSES
0
I S _DONE RGQIN RND

TEST 4 - CYLINDER RDDRESS CROSSTALK TEST

THIS T ST _PERFORMS

TO CY

ADDRESSES ARE

000D+

000 000

—

§0— §.—

[

DDQQEOQ

SEQUENCE RS FOLLOMWS:

==
(o= [

rn B

e e B bt Bt s e

s P

9.1.4

DWW WD D DD D DD DD DD

000000000

SUSCEPTIBLE

flh\

CZREMDO RKE&11-06 SS VERIF 1
c ZR6MD.P11
10-JAN-78 11:48

MACY11l 30A(10S52)

GO2

10-JAN-78

12:16

PAGE 20

101

111

SEQ_0298
SEQ 0019

111

BY SEEKING TO O BETWEEN CROSSTALK SEEKS, THE CROSSTALK

PATTERNS

TEST THE CYLINDER DIFFERENCE LOGIC.

9.1.5

ALSO

TEST S5 - INCREMENT/DECREMENT SEEK TEST

IN THIS TEST SEEKS ARE DONE IN INCREMENTS OF IC CYLINDERS STARTING AT
cYL rc
AND ENDING AT OR BEYOND LC.
THEN, THE SEEKS ARE DONE IN

REVERSE.

BACK TO FC.

IF FC 1S CHOSEN > LC, THE' SEEKS WILL PROCEED

THE OPPOSITE DIRECTION.

9.1.6

TEST & - OSCILLATING SEEK TEST

THIS TEST FIRST SEEKS
rg CYLINDER FC
THEN NC
IS INCRE
9 F xc

FOLLOWED BY A SEEK anc

FC.

unxcu xs INITIALLY EQUAL TO NC.
se ROH FC TO NC IS MADE

REVERSE
1S DONE, DECREMENTING """“’?" Mt
9.1.7

D AGAIN,

Iflé' ALLY

xncnsnsnrsg

VALt

N TO NCYLa

HEN

iucnenen
Ll
(NOT

SEEKING

THEN,

THE

v c uxs
IN

INDER

DIFFERENCE

VALUES.

§s IS DONE TO NCYLI AND

C IN

THE

DIRECTION

RECTION
OF FC, AND SEEKS
ING
1S CONTINUED “WITH

nnts TIL NCYL 1 xgssgs Lg AND

NEEKING 75 Sfiwmm
3 mEn o'fvsa :S m?u&s R

TEST 10 - PSEUDO-RANDOM SEEK TEST

THIS TEST PERFORMS A SEEK TO A PSEUDO-RANDOMLY CHOSEN
IS WITHIN THE RANGE (0-632), (0-1456 FOR RKO?7)

9.1.9

AND

DS'LC.

TEST 7 - CONVERGING/DIVERGING SEEK TEST

THIS TEST PERFORHS SEEKS HHICH EXERCISE

9.1.8

1IN

CYLINDER

WHICH

201(0CT),

AND

TEST 11 - MAXIMUM VELOCITY REVERSAL SEEK TEST

THIS
T;ST
PERFORMS A SEEK FROH CYLINDER O TO_

CYLINDER

YLINDER 0.
THIS PARTICULAR SEEK _CRUSES THE HEADS TO
RCCELERRTE TO MAXIMUM VELOCITY AND THE IMMEDIRTELY DECELERATE,
WITH
PPRECIABLE PLATEAU
OF CONSTANT VELOCITY. THIS OPERATION INDUCES
NO
_APPRECI
HERTING IN THE SERVO HECHRNIS

ESREMB TS/ 8- Fan"5

RIF 1
B 11:48

MACY11l 30A(10S2)

9.1.10

10-JAN-78

HO2

12:16

PRAGE 21

SEQ_0299
SEQ 0020

TEST 12 - MECHANICAL VIBRATION SEEK TEST

THIS TEST PERF

DECREQSING STK Ift

ALLY

ING_SEEKS

WITH

GEOMETRICALLY

és %ngg WITH INTENT TO IN)UCE VARYING

32E"
0:“:‘5tc T"fi
&&T?B::%gfi?‘si 1SDI%E=°koofiag
smksss 15,GONTUED EORelVLS "ge <7 ,em'?zvtsmi
BEING DOUBLED AND LC DIVIDED B? 2, UNTIL LC BECOME
000

00000

00
890
LWN~-0OWw

Bt e Bt Bt Bt Bt et Pt Pt et Bt s et ot s s s s P Bt et ot Pt et Pt Bt ot ot Pt Pt s Pt o

0000 0000000000000
000
o nn
o
LW N+ OwoNoCNLEwWwn-0O
~N N

g8 R

s e Pt P Pt Pt P

IO(DEC)

9.2

TIHES

TIMING TESTS

OPERATIONS2 spINGLE ROTATION anO:SLEKING,
"*FOR EACH TEST THE FuncTION
BE ING
TIME
nxnxnun ?nun
MAX
vznncg anusgungfTYPED RLONG
ux$u THE nunaen
85132£nhré?u§““}Sfi EXCEEDED THE LIMITS SPECIFIED IN THE RKO&/07 DISK
NOTE- FOR SO HZ OPERATION,

9.2.1

PATCH 1

INTO LOCATION 166 (LARBELED HZ:).

TEST 13 - MAXIMUM ROTATIONAL LATENCY MEASUREMENT

THIS TEST MEASURES_THE I

SINGLE DISK _ROTAT ON
MILLI-SEC + OR - 2.5%.

OF TIME BETWEEN 2

CIFE"E
gHUH
ROTQTI?N&&LRTENCY = 25
NT

SAMPLE PRINTOUT -~

nil“"igg'gg‘s*fis GF 198 9860 SPEE'B I OF 54238 13
AVG

9.2.2

TEST 14 - ONE CYLINDER SEEK TIME MEASUREMENT

THIS TEST MEASURES T
CYLINDERS, BOTH IN THE

TI
REQUIRED
TO
SEEK_BETWEEN
2
ADJACENT
FORWARD AND REVERSE DIRECTIONS
SEEKS ARE DONE

m:n T0 631,630
AND THE RESULTS ARE
TYPEO
fbn
tggu
3§R£
THE
SPECIFIED
but
ch
SEEK TIME IS ¢ 8
MILLI-SEC. NOTE: SEEKS nas ro cYL wss ron THE
R
SAMPLE PRINTOUT --

ONE CYL SEEK TIMES

CZREMDO RKB11-/06 SS VE RIf
1:48
CZREMD.P11
10-JAN-78

MACY1l 30A(10S2)

1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051

%82;
1056

102

10-JAN-78

12:16

PAGE 22

SEQ_0300
SEQ 0021

#%FORWARD DIRECTION*#
MIN = 6332 US

MAX = 6749 US
0 OF 410 ABOVE SPEC’D MAX OF 8000 US
AVG = 6536 US
llREVERSE DIRECTION**
MIN = 6314 US
MAX = 6749 US
0O OF 410 ABOVE SPEC’D MAX OF 8000 US
AVG = BS32 U

9.2.3

TEST 1S5 - AVERAGE SEEK TIME MERSUREMENT

THIS TEST

R?URES TH; TRUE AVER

SEEK TIME IN BOTH THE FORWARD

AND

iggg

gEVEESEDI

HE AVERAGE TIME IS CALCULATED FROM THE FOLLOWING

1058
1060
1061

T RVG [T1(410)(2)+T2(409)(2)+...+TH10(1)(2)1/(410)(410)
RE TX = THE HERSURED TIME TO SEEK X CYLINDERS.
FORWARD AND REVERSE
TIMES
ARE
Rgg TYPED, SEPARATELY.
THE AVERAGE SEEK TIME IS

SPECIFIED TO BE <

82;

SAMPLE PRINTOUT --

s s s Pt ot ot ot ot s P

iggg

066

K TI

068

REVERSE

8;?

ot Bt o ot et et ot ot et

8;;

e Bt P

Bt Bt ot ot ot et

s s sB

0000000000000 000000

gom*agggwommwomw
NNN
FaA LT
NONLW—=0OWwoN

076

QVG = 3567 gg SPEC D MAX IS 38000 US

069

MILLI-SEC.

IRECTI

= 35823 US

9.2.4

SPEC D MAX IS 38000 US

TEST 16 - MAXIMUM SEEK TIME MERSUREMENT

THIS TEST HEQSURES THE TIHE REQUIRED TO SEEK FROM CYL

OCT

DEC ).

URE9s } EIN EACH DIRECTION.

TIHE IS

THIS TIME REPRESENTS THE MAXIMUM SEEK TIME,

MILLI-SEC

THE SPECIFIED

MAXIMOM

SAMPLE PRINTOUT -~

g
IONiI
;:EORuflflgeglfi
K TIMES

MAXI

MAX

AVG =

B9l

0 OF 128 RABOVE SPEC’D MAX OF 75000 uS

llREVERSE DIRECTION#**

MIN = 70194 US
MAX = 70667 US
AVG = 70407 US

9.3

O OF 128 ABOVE SPEC’D MARX OF 75000 US

TEST 17 - SECTOR ADDRESSING TEST

CYL

632

AND IT

SEEK

CZR6MDO RKE11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY1l 30A(10S2)

10-JAN-78

JOe

12:16

PRAGE 23

SEQ 0301
SEQ 0022

1096

LLLELELE
L

EWWWWW

IN THIS TEST,

ALL SECTORS OF FC, FT ARE WRITT
EN,

9.4

2S6(DEC)

TEST 20- TRACK ADDRESSING TEST

1M THIS TEST

THE

TRACK

sectoa FS OF CYL FC IS WRITTEN

RO,

100¢(OCT), FOR
CHECK OF ERCH SEC oa S
3 SECTORS IS RE-WRITTEN,

9.5

WITH 256

(DEC)

EACH OF TRRCKE 0,1,2. THEN,
YT ;
tHEN, EACH
;L

AND AFTER

EACH

ARE WRITE-CHECKED TO DEYTECT TRACK RDDRESSING

WORDS

A WRITE
OF THE

L OF THE THREE SECTORS

PROBLEMS.

TEST 21 - READ/WRITE DATA TEST

THE READ/WRITE DATA TEST HAS 2 DIFFERENT VERSIONS,

VALUE OF THE DATA PATTERN PARAMETER (PT

DEPENDING

THE

FOR
PT =0 :

rnxs rssr xs ru: ouxcx vsnxrv
QEFQULT DATA
TSSTES ""53“57537 nu? uu;g

§9£
THE EuténsPngg 13;7 Egnu
THA sE on?n PRTTERNT 55253
g
flrs
s unxrren N u
ns
EE
unxr
=C
A
onpaagc
ugflgg
urs
s
SE
TORS
unxrfzn 555“"§unr T
HE LAST SEGMENT
FOR PT NOT =0

Tuxigéé
PFRFMHS T&Kg
T-LTgmzégETORS
(F lfg) &C
FIED. hg
ERCH
*F!ED
DRTR PATTERN

s Pt
e
“asfi?%
i
e°~§;Z~°§':W'3°§2“°“
nsnninxucCYLINOE
xnos
o

AT s

OF rns

INCn; ng ruarnus§P§E
FS
cusgs '”35 . L nus BE ¢
ADDRESS HILL ae oscnsnsu ED BY tc(INS EhoOF xncnznsufzo) T0 GBTAIN
OR =

C MAY 9:

ue CYLINDER

EACH NEW CYLINDER ADDRESS.

33
51

WITH

OF THE DATA

48
D

EACH

WORDS “OF 1ts OWN 'SECTOR NO.
100(0CT). NEXT, FOR EACH SECTOR
WRITTEN R HRITE CHECK IS DONE, FOLLOHED BY A READ AND' SOF TWARE COMPARE

B s Bt Bt Bt Pt Bt Bt Pt Bt et s s s et s ot s Pt ot ot ot - o Pt Pt ot o Pt s s Pt Pt ot ot Bt s s Pt s ot s P ot Pt ot s Pt Pt s Pt Pt P
Bt Bt Bt B et Bt Pt s Pt Pt et Pt ot et Bt s Pt Bt s Pt ot B Bt et et ot ot Bt ot ot ot s ot ot ot ot s Pt ot Pt s Pt et PtB b e e b bs b g [

SFHESHEEIBIRRE CREEBBYER
PO B 000N £ w0 BB IR Zor— OB

1098

NOTE:
THE

PACK

ADDRESS

LIMITS

1CZREMDO_RKE11/06 3
S S VER Ili'

10-JAN-78

K02

12:16

PRAGE 24

SEQ_030¢
SEG

F ORTASECTORS A wniChCIFIED
“rARSERs
HAY
WORD COUNT
WC.
IF WC x
nn
suoucu
E§g?TSsns Y EXTEND as?ongusnsAaocs
9.5.1

DATA PATTERNS
]

EACH DATA PATTERN IS COHPg I E[E) OF 16 WORDS.
PATTERNS ARE REPEATED AS
NECESSRRY TO
TRIN Tl'E D S
D HORD COUNT ON THE WRITE_DATA COMMANDS.
IS

RB%E

LRRGE

SPRC

NNNNNC
OO T RO C T T NN
v

Ty usyun

CZREMD.P11

MACY11l 30A(1052)

Sgc 38moEC) WORDS.

THUS POSSI

ING THE DATA

R A

DETERMINED

g OF THE PROGRAM,

TESTS.

PIRRLING AND

TRALK

THE

AMOUNT

SWITCHING

AND COULD BE AS

THE FOLLOWING IS THE LIST OF 16 SELECTABLE DATR PATTERNS
WITH NOTABLE FEATURES DESCRIBED:

(IN

OCTAL),

0023

MACY1l 30A(1052)

10-JAN-78

LO2

12:16

PAGE 25

SEQ_0303
SEQ 0024

1175
1176
1177

1178

1179
1180
1181
11

1188

HIGH-LOM
FREQUENCY MIX

HIGH FREQUENCY
FHASE MIX

LOW FREQUENCY
PHASE MIX

177777

000000

052525

177777
177777

198950
198259

13333
ObE

052525
1as§§§

155555
156888

159322

1187
1188
1189

05252
05050
02eses

1191
115

177777
052525

1190

1194
1195

1196
1137

1199
105

1508

1209

e
1513
1213
1813

1516
1513

1220
1221
1202
1223

fesese
126252
052525

155553
25

000090
17777

683
125582

133333

126262

133333

179363
177853

177777

133338

13333

939929

136383

133333

ROTATING
BOUNDARY PULSE

5
ROTATING
CELL PULSE

3
ALL
ZEROS

7
ALL
ONES

1105

150442

s
63504a

26422
013211

455

177777

el
16732

i
177777

113226

0264
653§2§

Bas132

;?f%e%
054581

011055
104426
042213

177777

06455
13

D42puz
21321

132264
055132

066666

17876

PRECOMPENSATION PRECOMPENSATION

|
|

Jesses
15688

000000

000
177777

133333

17777

1201

1202
1203
1204

885000
177777
UUU

MAXTHUM
PRECOMPENSATION
PHASE MIX

177777
172727

175557
127777
177777

000000
000000

127777
127727
177777

CZRGMDO_RKG11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

CZREMDO RKE11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY11l 30R(1052)

MO2

10-JAN-78

12:16

PAGE 26

EQ 030 Y
SEQ ooes

o
N

B Pt $e Bt P

ot Bt Bt Bt s et e Pt B Bt B

Bt ot o

s et

s Bt o P ot Pt ot Pt Pt B

Pt ot

s Pt P ot s e P

ot P

et P

Pt P

RPERRY
Sbi FoTLRS SRR PP
BODNT
N L£WV—-O BBYEH bttt
o A

1224

?“IFTED 1

000004

000040

000100
001000
02

?nIF}ED 0

ALTERNATING

17777

125es2

7777
1777

125252
lsgs

177677

125252

i;;;S;

177377

176777

0525es

17577

e
100000

H FT%%G
P

0777

000177
000
880
5777

003777

07777

017777
037777
0777277
177777

125252

cR
5T
072307

1;
i

125252
1

167777

ALTERNATING

17 2§é
016723
107351
43564
1

114356

6167
123073

151453
164616

PBE
6q

T RSTe

CZREMD.P11

SS VERIF 1

10-JAN-78 11:48

MACY1l 30A(1052)

NC2

10-JAN-78

12:16

PAGE 27

SEOsggOS

1271

1575
}gg

{275
ia;g

{gag?

1282

1283

9.6

TEST 22 - DURL-ACCESS DATA TEST

THIS

S
AR
g oxré 1$
THIS TE

1288

1290

1C.)

1291
1292

ORIGINATED.
m( =i)

1296
isg;
1595

DATA,
AT
CONTROLLER suou.os' "Sss THE DRIVE

}ggg

iggé

ur:n THE TEST

130;
£
1309

oescn

igi?
1312

igii
1315

1316
1317

TA PATTE

DRIVE.

NOTE

LIKEWI
T0

THAT IF

IFY n: uucu n

oxrr 1

HE
"THE GREATES

mmor

anrso (AT

FORT!-EUSEOF

sas

WITHngrr;n:m

PORT
mogmoh

mrm

w&% mo B?mup?
8. a

m HIS
vsrzz

nr
ifl"
&{veanb nmon
BT%
(29
..; gl m on&n
g ’*uggm ?25
sncu
vgnsg%ngs fé
ON THE SAME DRI

MUL TARNEOU

10.0 ERROR REPORTING
3

1320

THE

iggg

SELF-EXPLANATORY.

1326

t;f

..;‘.s

vsc% SE“:ZM

10.1

1324
1325

TANEOUSLY

N WHICH

i 29

m
&g

igig

1321

nsao/m TE

ISK AT TIME

1289

1303
iggg

10N

i 93

IMUL

o
L
uxm r omsn 'ssrs IN AN

guona"?c %fisAL %m rs nusv SWITCHED ON-LINE, AT THE

{222

1285

RENT PROC

COMMON ERRORS

LIST OF

COMMON

ERROR MESSAGES WHICH ACCOMPANY ERROR

r%eooll"'o“} Isme:“suzaswrs EM VERIFICATION PROGRAM. THE ERRORS ARE
1.
2.

UNIBUS PARITY ERROR
NON-EXISTANT MEMORY ERROR

NON-EXISTANT DRIVE ERROR

L
VN

CZREMDO RKE11/06

CZREMDO RK&11-/06 SS VERIF 1

CZREMD. P11

10-JAN-78

11:48

MACY11 30A(10S2)

10-JAN-78

12:16

PAGE 28

SEQ 0306

SEQ 0027

1327

1359

1330

i;l;ll

1333

1335
1337

10.
11.

B%E
1341

iq'
15.

1338

15.

1342

16.

1345
1346

1349

1356

1357

1358
1359
1360

32.
33.
M.

1362
igge
1365
1366

36.
35
39.
40.

1367

"5y2.
43.

1368
1369
1370

Yy .

ig;é

ig';g
10.2

1379

ERRORS

1382

o?.wcr%amon

FUNCTION ERROR

E L

RROR

;mon

v# roeguESS
ERROR
K

RROR

T crc
mp’:
DATA M
DRI
AT
ATT
E

UFE_AND

0T ?.

WILL

g:
WHILE

om&
sm'"
T A é nfl'r
gam

NOT
C

ATUS
CHANGE rnuu
n
xg
N? DRIVE STA rus

ERROR

Y REGISTER

uxm CLEAR

LEAR DID NOT CLEAR onxvs ATTENTION

En ogu.

mv L

ADER

WHEN onx R SERVICING

47. ano SECT 33 ERSOR 5N SECTOR NOT LISTED BARD

ig%

1381

ocrscrso mnv ERROR

23. omx rT touETEERROR
ERROR

1348
1350
1351
1352
1353
1354
1355

1380

|, W é

20.
21.
22.
4.
sg
27.
28.
q.

1347

1375
1376

UNIT FIELD
E

T nsom
suggvs

ERROR HANDLING

REPORTED

BY THE PROGRAM

CONSIST OF

COMMON

FAILURES

RESULTING

rnon Q%EHPTES suasvsren FUNC xons AS WELL RS csnmm ERRORS UNIQUE
EACH

ERROR

'PRINTOUT

CONSISTS

ERROR

osscnxpnou nno resr NUMBER, Possrau FOLLOWED BY HERDER uNes COLUMN

CZREMDO_RKB11/06 S3 ;gl 1
11:48
CZREMD.P11
10-JAN-

MACY11l 30A(1052)

C03

10-JAN-78

12:16

PAGE 29

SEQ_0307

@ 0028

1
1
1
1
1
1
1
1
1

1
1
1

s Bt P

i YRRy,
BBIFRZOR8:34
SRRLO02

o ot P

—

B5gRsR

1383
1384

Blo*safagtfifiiiflzfiios? ’sgiétfl°nsss"’s faxflxsnpnas°e3R0n2>
R
(IF

PN HE
0 PROGRAM
5, O
SRR TESTING.
RTR
CON
10.3

EXAMPLE 1:
% NgN-EXISTRNT DRIVE ERROR
TEST 2

PREVIOUS COMMAND :

YLNDR

MND

177

0000

IVE
Ooggzg 000125

CYLNDR
000000

TRACK
000000

SECTOR
000000

WD CNT
000000

RKDA

RKWCR

RKEA

RKASOF

LO BA
000000

RK611 REGISTERS:

1420

RKCS1

i:ga

REMAINING REGISTERS NOT VALID

ju2s

1457

140324

RKC

0101

000000

1430
1431

PREVIOUS COHHRND

i:ig

ooogogfl
000121

1437

1438

0000 H00

CYLNDR

000000

CURRENT COMMAND :

ERR PC

DRIVE

000000

000400

proreid.

1435
1438

?fl HISCO

RKDC

1452

1432

SECT

000000

i:}g

TRACK

HI BA
000000

1414

i:gé

SRhecliPRRes B8 wonfS!

ERROR PRINTOUT EXAMPLES

lfllg
i:ig

NT) ARE_REPORTED.

OF
A SINGLE DESCRIPTIVE LINE.

1410
i {1

1417

L SOTHER ERROR
X
REPORTS HRY CONSIST

CONTENTS

DMND

TRACK

SECTOR

WD CNT

000000

036000

CYLNDR

TRACK

SECTOR

WD CNT

DO3

12:16

PAGE 30

03:?03n 008808n 000121

000000

036000

CTOR

VRT RD

KIPARGE

ee
e eb

& e

SS OF EEROR(S)

i (1) U
Lrro £ L £E L£rr
000 00
UMY = —
noo
£n

e
b
eb

CYLNDR
000000

PARCK

SEG 0308
SEQ 0029

074000

s P Pt

000000

s Pt

i0-JAN-78 11:48

10-JAN-78

CZR6MD.P11

MACY1l 30AR(10S2)

et Pt Pt Pt

CZREMDO RKE11-06 SS VERIF 1

e
R

CZREMDO RK611-06 SS VERIF 1

CZR6MD.P11

10-JAN-78 11:48

MACY1l 30A(10S2)

10-JAN-78

EOQ3

12:16

PAGE 31

SEQ_0309

SEQ 0030

1470

APPENDIX A

1472

SAMPLE ADDRESS 200 DEFAULT RUN

1476

EER%_FICR#ION PflR%
'.E DRIVE (DRIVE 0), FOR TI'E FIRST PASS
(QU k-vsnxrv PASS) .
MESSAGES
HSRE
RE OUTPUTS - NO opsnnron xngurs 85:
Pnovroso ON AN
ING

NN
OO

FOLLOWING

PR NTOUT

RESLL

RUNNING

SUBSYSTEM

QDDRESS 200

CZREM-D - RK611/RK06-RKO7 SUBSYSTEM VERIFICATION :

PART 1

DRIVE(S) = 0

TING DRIVE 0

ORIVE ScR
NO. sa..
MIN OF 24375 US
MAX OF 25625 US

e B

NN EZWh-0

LAST PHYS MEM RDR = 377776

e
b b

sB B

Bt Bt Bt ot ot ittt Bt Bt Bt Bt ot Pt ot et ot ot ot Bt ot Pt Pt Pt P B

e Bt B

s B

BESRR2000
OR-SSBIRRE RL E0BIRREOR2S

NELLfrLrLLrr
s Lt

s s Bs Pt

1477

AVERAGE SEEK TIMES

MACY1l 30A(1052)

FO3

10-JAN-78

12:15

PAGE 32

e B

#%FORWARD DIRECTION*#*

3567

SPEC’D MAX IS 38000 US

SPEC’D MAX IS 3800C US

" gggfi Bod

AVG =

AVG = 70379

END PRSS #

MES :

GRSGGAE
Or

Snmoed,

[ ]} g
~

HXZMNX

AVG =

IRECTION**

#%¥REVE

DzI%3

s Bt e Bt Pt

v
WWWw

s Bt

e Bs e Pt

e De

e—

A,NNg.om

CZREMDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

TION**

0 OF 128 ABOVE SPEC’'D MAX OF 75000 US

CTION*x

0 OF 128 ABOVE SPEC’D MAX OF 75000 US

SEQ 0310
SEQ 0031

CZR6MDO RKB11/06 SS VERIF 1
CZREMD. P11
10-JAN-78 11:48

MACY11l 30A(1052)

10-JAN-78

GO3

12:16

PAGE 33

SEQ 0311
SEQ 0032

838IRR 2OR
- Bos

Bt et Pt et et (et Pt s Pt s et ot

s Pt Pt P P

s P Pt (s Pt ot

NI v
N NNN NN
oo
onNswn—-0o0 DoONNoNE

g!t_t_wm FALY

Wh—

un
n

NN NNNINIVTATVINNININIYY i

Ty LURCEEBIF
hE o oDD

s Pt Pt s s Pt Pt Pt Pt Pt Pt Pt Pt P Bt Pt Pt Pt Pt ot Pt s Bt Pt ot Pt Pt Pt Pt s Pt Pt P

1537

APPENDIX B
SAMPLE ADDRESS 204 RUN

THE

FOLLOWING

PRINTOUT

HRS

THE

SUBSYSTEM

3&?“8@'&8?:
p 16 aé'Pofi"‘&b&?“i"fi PR g1, RES, ITh

spe

LY resrq

Txns

éfl

SAEhs §P£cxES

aAR2§3‘°°TLE9G¥¥”E§
?
TE

¥§

TER V

”§E'E EH¥QL§ “3g§2QFER

CZR&EM-D - RKB11/RKO6-RKO? SUBSYSTEM VERIFICATION :
LAST PHYS MEM RDR = 377776

PARAMETER INPUT MODE

RKO6 BUS ADR = 177440

RKOB VEC ADR=

RKOB PRIORITY =

210
5

zEH

DRIVE 1 NON-EXISTENT
DRIVE 2 NON-EXISTENT

DRIVE
35¥

4 NON-EXISTENT
NT
s NON-EX §TENT

NON-EXIST
DR
DRIVE 7 NON-EXISTENT
DRIVE(S)

= 0

L = LIST TESTS
C = CHANGE TESTS
I = INPUT PARAMETERS AND RUN TESTS
ENTER L,

vps

OR I

TO DEFAULT TESTS TYPE D<CR>,

ELSE

<CR>

PART 1

eo~TJWOaG-UNTINANBTOIR0NUOZ0S0NNB0PERASRESwNORLMN
{

le4s

10-JAN-78

>owD

o—ENeS )J .- g -.

—OW-4oDoO-rpeOdnFa>A-[NO0|wWUtVmZ-wTMaXDsZzgoElD=iW-]-kTo—l(&|DV~(=UDOUUODUMWODDMgTRWOSUDDV0OOO[eDN0SeODOPt~TRSUOOM0DRTOPUW0DBVOORNONCRDDORDORW—x&4b~OW'=DDD—DWJwe-R-IQdxRDRN(=—RURDtUR—DtMFReETtRDNROReORSe0NitOL4o~BFUtu0RwbMtTRU4SN—OtRNOA—DRw—Ournwo o-Wo~4TT -=4u[+nutnwuiol4nowLn
EGREMB P TI® ! 18- 3ANT58" 1 ue
MACY11l 30A(10S2)

12:16

HO3
PAGE 34

TT"

*%£3'B0aa

—mxOXmDu3lu0w+6Vmm.mTWrmEfoio>s“(ZmY]m—WT~woT-mQV9-wDNnO£o35o.C!rQO—~uMT0~—~-[oZ—M7)U]MQDOBO3Flo!2N%O5F!COO—o—-—IUUMIMLIBITSFN-RCONORNJUFoEEmI|>O"9aa-[
Wwn4e->[+
MACY1l

-0 o x

d ——E oN]~

)Xu%obCv*RZbax(w=.zoR-E%W=—b]iylLo.9lRbe%.QaS=xobO.mel-Rob2R@m—.e0b.RVbWe.]x0W0oouWm .blOv.RWbRw-Wxox.[xeb%.bQR=nBR.YbUen?MDRO?~BR?eD=B~RDKMRD=.NOROU@0OitDR~opDAyONiPIllgOtLtLDWN-LD4oXax[L+Oe0EDOeI5DiOD1RNB0—DYeO2e1-DRO00Ne2WO0DL0~0._Vv2RT=0ML10DWR0L6RBR0D,D90=00ROlEDDTDeMlR1)De1D7uORMiax4EdlR[+DeDLDl
CZR6EMDO RKB11 /0 & SS VERIF 1
CZREMD.P11
1 0-JAN-78 11:48
30A(10S2)

10-JAN-78
12:16

I03
PAGE 35S

w Q ~ &) a ~

SEQ 0313
SEQ 0034

w ol 1)) [¥Y)

~ Q'
4 -~

0 OF 410 ABOVE SPEC’'D MAX OF 8000 US

NNNNN

30A(1052)

10-JAN-78

JO3

12:16

PAGE 36

SEQ 0314
SEQ 003S

AVG = 2502 us

#%REVERSE DIRECTION»*

410 ABOVE SPEC’'D MAX OF BOOO Uus
RAX
= 6b35
AvG
OYREVERZE D IRECT IONN*

R
—

MIN =
MAX =

1M us

AV = 203 Us

0 OF 410 ABOVE SPEC’D MAX OF 8000 US

5§§cun

MIN = 630 1U S
MAX = 6682 US
AVG = B498 US

NNNNNNNNNNN
£ LW

MACY11l

N T P T AT AR

Bt Bt B Pt ot Bt Bt e Pt ot ot o Pt s ot Pt s et ot Pt B Pt ot Pt ot Bt s Pt Pt Bt Bt ot Pt Pt Pt B

LW OWVODNCNLWNN~=ODDN

CZREMDO RKE11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

0 OF 410 ABOVE SPEC’'D MAX OF B0O0O US

TIMES
2?5 CYL EE KIRECTION**

MIN = B319 U
gex s
1
=

#%REVE

0 OF 410 ABOVE SPEC’D MAX OF 8000 US

DIRECTION#*#*

MIN = 6301 Hg
MAX = g
AVG =
us

0 OF 410 ABOVE SPEC’D MAX OF 8000 US

ONE CYL SESK TIMES :
6RECTION!§
;; ORWARD

MAX =
=

AVG = BS11 US

##REVE

0 OF 410 ABOVE SPEC’D MAX OF 8000 UuS

DIRECTION*#*

MIN = 6317 US
MAX = 6698
US
AVG = 6507 US

0 OF 410 ABOVE SPEC’'D MAX OF 8000 US

e
END PRSS #
IO TEST ALL DRIVES TYPE "R"<CR>,

ELSE <CR>

CZREMDO RKE11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
000000

s
e B P

SEQ 031S
SEQ 0036

1 WILL BE ASSEMBLED. #x%
;##% IF "PART"TM IS DEFINED = 0, PART

.NLI?T
LIS
iennaL
5 R

MC,MD, CND
ME

2122222222222 222222223221223332332223333232222333322223222222222322

QBTTL

e Bt Bt s

NNNN
L]

s Bt Pt Bt Pt ot
B

ot s

s Bt Bt

0
V\l\l}\laag‘lfl
SBIFRLE
w 838 IRN

0t Bt

s Bt et Bt ot ot Bt B

OOODODOMODMNINNNN
000000
o LwWwh—

e B

PAGE 37

PART=0

167000

STARTING ADDRESSES

200

TERS FOR TESTS 1-21

PRARIRSL FOR TEETS 1221
gELéu#
UAL-ACCESS DATA TEST

204
220

TITLE

CZRGMDO RKG11/06

,.oxcx

EQUIPMENT &

i‘ll‘l’!llll'll‘lllllllllllllll‘lllll’l'I'l!lllllllllllllllll‘liill*l{i

Bt
e Bt Bt B
e Bt B

1779

12:16

; %% REV 004 %%

e Bt e

NNNNNNNNNNNNNNNY
~N
£ W~ OLONCN
LW

]

10-JAN-78

i#x% IF "PART" IS DEFINED NOT = O, PA R 2 WILL BE ASSEMBLED. **x

QARG
DB
G E

~
U
wrn

1751
175

MACY11l 30A(10S2)

KO3

000001

,;copvnxcur

(C)

1976,1977

SS VERIF 1

tm% MRSS. 01754

.Pnocnnn BY DAVE HOFFMAN

lTHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MARINDEC SYSMAC

lPRCKflGE (MRINDEC-11-DZQARC-C3), JAN 19, 1977.

SBTTL

OPERATIONAL SWITCH SETTINGS

SWITCH

‘¥
H
"
'y
¥
‘¥

11
9
8
7
6
5

M
"

USE

xnuxT TYPEOUTS

xnnxa prxon
TIONS ONLY, ON ERRORS
L BETWEEN opsnnrxous
xc 7ex
xuTESTE
R xn TESTS 17,21
xuux
T 5 xu *

}NHI

g
0

AEHD AP T
c
ARORTN TEST 21
PORT # H;SE HSHPRSE ERRORS IN TESTS 17,21

§arrL CONTROL SWITCH SETTINGS
;:

SWITCH

tx
‘¥

04
03

NHI

sr a

es IN TEST 21

afinncrsn

USE

DROP DRIVE IF 20(DEC) ERRORS EXCEEDED

TYPE BAD SECTOR FILES (BSF’S) ON FIRST PASS
INHIBIT TIMING REPORTS IN TESTS 13-16

1807

{ega

xgxg

1811

1812

.SBTTL

001100

igia

000011

1813

888263

{aao

.EQUIV

11 o

EMT,ERROR

IOT,SCOPE

; ;BASIC DEFINITION OF ERROR CALL

: ;BASIC DEFINITION OF SCOPE CALL

: ¥MISC
AT=
- EL&“"E OUS- DEFINITION
.
300: FOR HORXZONTRL TAB

L;-

EREF:

..coos FOR LINE
F

5:8885 FSS 8288!28& EETURN-LINE FEED

Pssuxv

1854
iges
iegg

155278
177570
-,

Dann: 177er8
: i ONAR
oH RECTSTER TCCISTER
DDISP= 177570
::52585325 sugPLflYRSEGISTER
kacsnennaPURPOSE REGISTER DEFINITIONS bl

1
1831

aooooa

s
i
1
1836

%ggg
1839

1830

177774

000
ooooos

3300

1
é
184
1843
1844

004
0001
000140
00020

1846

000300

1845
}83;
iggg

185
}esé

%
%6

PRi=
PR2=
PR3=
PRY=

0
100
140
5

PRbE=

2000

SWi0=

a0i0s

000020
000010

RAL

TER
TER

HH
: :

an$°
TER
STACK
é" 3

COUNTER

,?25 85 TY LEVEL O

:IPRIORITY
: iPRIORITY
: tPRIORITY
,;PR{OR TY

LEVEL
LEVEL
LEVEL
LEVEL

1
2
3
9
:PRIORITY LEVEL S

:!PRIORITY LEVEL b

: sPRIORITY LEVEL 7

14
2u13=

igs

e
B

33
H

: ¥PRIORITY LEVEL DEFINITI

PRO=

8088

001000

1861
1862

: :PROGRAM

R7=
SP=

u;guxrcu

1856

1859

PC=

PR7=

UUL

,.srncxanxr REGISTE

feiiog
et

Re=
R3=

000340

%H NOG

: }PROCESSOR STATUS WORD

'
w3

PRS=

1 §§Q
1855

§§KLHT= T??? 5

00024

ég

177;75

i 28

SW09=

‘.80

2000

1000

sioe= 19
=

SWo4=
SWo3=

20
10

BARSIC DEFINITIONS

177776

182_

—

000012

SEQ 0316
SEQ 0037

*INITIAL ADDRESS OF THE STACK POINTER %% 1100 *##

&TAck=

.EQUIV

181
1312

ia}7

LO3

MACY11l 30A(10S2)
10-JAN-78_
12:16
PAGE 38
CONTROL SWITCH SETTINGS (PRARAMETER C2S)

SSTER“ SWITCH DEFINITIONS

CZREMDO RKE11-06 SS VERIF 1
CZR&MD. P11
10-JAN-78 11:48

CZR6MDO RKE11-06 SS VERIF 1

CZR&MD.P11

10-JAN-78 11:48

MACY11l 30A(10S2)

10-JAN-78

BASIC DEFINITIONS

1868
1870

-EQULY
g4
.EQUIV SWOS, SWS

000001

SWo0=
.EQUIV
.eouix

187

;

1874

-EQUIV

|
SW09,SW9
fisua

1.5u1

}3;2

.EQUIV

1877

--Qngn al

7
18
1881

fme

188

igg

=
1888

ieae

133?

1835
189-4
1895

001000

ax;

aooo

1914

HE
191?
1918

e
a%r&: 480

-'-

fr = 4

ooooag
UL

890005

FINITIONS (BITOO TO BIT1S)

Ex;

‘fg

8100
¢ BIT09,BITS
y
v
» fi v
BIT08. 79
=

"
k

v
v

BIT07.BIT
BITO&,BITE
BITOS.BITS

-EQUIV

: gz
"-EQUIVVv

{&3

Ti0=
e

e
000040
"

ieee
1380
1905

igié
1913

e 20000
|

BIT13=
BIT12=

1896
1897
1838

igg
130

SWOO, SWO

020060
010000

PAGE 39

1865
1866
1867

12:16

; . ;w
102, 73
BITOI,BITI

.EQUIV

BIT0O0,BITO

000004
000010

:figg
sgsm
szsT
¢= ;u
10 rifianmn VECTOB.ITQUIIE
555_. VED
AND OTHER
ILLEGALERRORS
IN3TRUCTIONS

000030

EMTVEC= 30

;gm;/%}mr TRAP (I0T) #%SCOPE#**
: : EMULATOR YRAP (EMT) ¥*ERROR¥#

000240

PIRGVEC=240
: 'PROGRAM INTERRUPT REQUEST VECTOR
.SBTTL MEMORY MANAGEMEN'’DEFINITIONS

B
888859
000034

cosces

LkorT §: éegL
:

TRAPVEC=34

JoEe K

HUT
A g
Ll

i i "TRAPTM TRAP

1Y KRR, YECTgr

SEQ 0317

SEQ 0038

‘

msu/os vsnxr 1

10-JAN-78 11:48

1919
}25?

MACY11 30A(1052)

000250

ieau

xeiesas

177572

iggg

172816

1927
1928

SEQ 0318

SEQ 0039

250

;#KT11 STATUS REGISTER ADDRESSES

SRO=

177574
1775876

177572

SRi=
8R2=

177574
177576

S8R3=

172516

; "KERNEL "I PRGE DESCRIPTOR REGISTERS

1933
1934
1935

172300
172302
17233:

1939
19

KIPDRO= 172300
K
= 172302
K
17

172
172310

K
K

R
1940
175316

17
= 17031

cledis
17eiis
KiPORS: 178316

ig:g

; #KERNEL "I PAGE RDDRESS REGISTERS

1944
1945
1346
194
1948

172340
175 Y2
17 S....
172346
172350

B
{gsé

KIPARD= 172340
KIPARL= {7 2
K
72344
K
172346
qmm 172350

s
175355

1953
1954
1955
1956
1957

{3553

177744

MAPLOO=1
1
nsgc 'i’
L
=
uxsmgsnme

im
1%5

000000

i%g

.s #ALL

16 B

1702

1963

1952

iggo 000200
000204

"ga ;L'lm"cmcusa

111770 MEM SYSTEM REG

LOCATIONS FROM4 - 776 CONTAIN A *.+2,HALT"
INTERRUPTS

: %L OCA ION
gqconmms 0 TO CATCH IMPROPERLY LORDED VECTORS

012522

000137

012574

000220

:MEMORY CSR REG START ADRS
'11/70 MEM LO ERROR ADRS REG
11770 MEM HI ERROR ADRS REG

' ¥SEQUENCE 10 CATCH ILLEGAL TRAPS

%gi:i?

{3;5 000166 8383§§

:
i,

cleoes: Hens
xf
= 17,

170200
1721
177740
177742

1874

PAGE 40

VECTOR ADDRESS

MMVEC=

iggé

i973

NO3

MEMORY MANAGEMENT osrm%?
;#KT11

igg

10-JAN-

gigpaee: -**g

.sarfl §T uc RDDRESS(ES)

HZ:

»_:
RO
P

. =220

fEca oy
b

;;JUMP TO STARTING ADDRESS OF PROGRAM

;LINE FREQ. FLAG - 0 = 60 HZ
8PSTART

(ele]

1378

1973

1378
197
1980

§§geao

000137

B00sse 001100

1382
000230
1384
!
000046
025534
1386 O0o00S2 140000
1385
000230

1988
1989
1990
193]
1992
1993
1994

1995

199
1997

001000

-JAN-78

STARTING R68RESS(ES)
L

.HIGH:
.SBTTL
X

BO4

12:16

PAGE 41

SEQ 0319
SEQ 0040

;agRSTRT

JMP

.
1100
ACT1i 40O0KS

Y 2222222222222 22222222 222332222222232232232222222222222222222
23

ho
OKS R%Ol#RED BY ACTLL

; SAVE PC

ieuSao

;31)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP

.=5¢2

.WORD
140000
.=$SVPC

.SBTTL

.=#000

APT

,,2)SET LOC.52 TO 140000
;3 RESTORE PC

PARAMETER BLOCK

o 36 3636 36 36 36 36 36 38 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 38 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 26 36 2

'ser LOCATIONS 24 AND 44 RS REQUIRED FOR APT
001000

000024

!Il!lllliii!llill!lillll'llli!l‘!lllllillllll!lllliililllillll!

.$X=.

000024

éfisq

000200
000044

1399 0000% BBIE88

2000
2001

5003

012556

MACY11l 30A(10S2)

CZREMDO_RKE11/08 S8
VERIF 1
CZRGMD.P11
10-JAN-78 11:48

2004

001000

2007
2008
2009
2010
2011
2012
2013

001004
001006
001010
001012

001320
0015496
001546
000030
120210
177940
000377

SO0 001008 001399

; s SAVE

_CURRENT LOCATION

R
FR*L
TO POINT TO START OF PROGRAM

.
=44
1
cT RDDRESS PNTR.
B
BT T
TION COUNTE|

!iil!i&llili&&iiiiiililll&lll&§§li§l§il§ll§ii&iilliii&&i!;;;l;.

IN¥gsFQSE ggggHETER BLOCK RS DEFINED IN THE APT-PDP1l1 DIAGNOSTIC
SAPTHD:

$HIBTS:

snanogz .u"ggg

TSTM: .uogg
PRSTM: .WO
SUNITM:

1320
15496

-WORD

AVECT1= 120210

ABASE=177440
ADEVM=000377

SMAIL
1546

s
HIGH BITS OF 18 BIT MAILBOX ADDR.
Ezno'
Snsss
o? asr m*n.gox (BITS 0-15)

: JRUN T}H OF L
:RUN TIME IN

ST TEST
SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)
::ADDITIONAL RUN 1"50‘55$5’ OF A PASS FOR EACH ADDITIONAL UNIT

SETEND-SMAIL/2 ;;ksncm MAILBOX-E TRBLE (WORDS)
:RKVEC=210,

:RKBAS ADRS

RKPRI=S

:SET DEVICES 0-7 IN MAP

.P?’x“'ll/%-?gnygglfleua

CcO4

MACY11 388'5”1'8"52%“0&0-13"-78
.SBTTL

12:16

PAGE 42

S£9588%804,
|

COMMON TRGS

soRNNRUEEEREERERRRREREEFEFREXEREEEEREEREERRREEEREREREERRRREEERE
XS

: Bgés TN#E CONTAINS VARIOUS COMMON STORAGE LOCATI

; ;CONTAINS THE TEST NUMBER

1O IS EORTEST TIERATION COUNT
558357’2
o&
S5
at
i
EEFT"E'S' -

; ,cg':c;:ig é@T’E‘&;?é?%?gné;gucnon
&

3fi?s{m

{1 INTERRUPT HODE INDIGATOR

.WORD

)

CONTAING ((
ntg
((
£
((

))

; s

CONTR

i: 1
1

((
f‘

)
)

R0
)
)

¥
TR
(
)
Hracn
B
eaahe (el
Hein (( o)
; ;iCONTA
: ;CONTRINS ((SREGAD)

: ;CONTRINS ((SREGAD)

Nt Nt

((

A
A

Nt Nt N

]

Nt Nt Nt Nt N

;
!

g; Fk& (B&L 07>=0=YES)
R EREe ERo ENO
o~

SREGO)

8
¥4

ILLS

HARACTERS REQUIRED
AFTER A "
FEED"

Nt Nl N

SREG20:

&OF

+ #m# + 4 +4+ 4+ o En

v3
s
bl
snfcx;? uogs
SREG17:

ONTAINS

Y
il

£
(=

G7:

gng
g
z
s
.
r
g
g
z
P
1
1
3llc
i
RF

§§§§

3
l
f
é
i
f
v
i
f
f
r
%
%
§
i
s
eg.
00

::
g

:
:

DmNN
<<

s
e o

3
an s 9..

; ;START OF COMMON TARGS

—
m

—
x

—

OO0OOO0OOO0OO0000

n
n

o~ L£NO

s Bt P

8888

Bt Bt Bt Bt ot s Pt

Bt P
P

FORBINITTR Tapan

s e ot Bt Bt ot Pt et et s
et Pt Pt ot Pt
Pt s Pt ot Pt Pt Pt Pt et Pt Pt P Pt P B

- -—_--

1
1
1
1
1
1
1
1
1

ot o
0

YOt

FERSERERER
IS NG

1
1
i

s Pt e P

S e

P P

STONTS: - HoRD
iLSnofi
&S'E?E

Bt Bt B

-..’-‘-

DOOO

1
1

000000000000000 00000

STSTNM: .BY

e Bt s e

01102

22GG

.=1100

SCMTAG:

001103
1

THE PROGRAM.

0C 1 00

001100

———

OO—NO

;®

; s CONTAINS ( (SREGAD)+42)
; ;CONTAINS ( (SREGAD)+44)

.ASCIZ

(207)(37?)(377)

"4BTTL

APT MAILBOX-ETABLE

; ;CONTA

((

)446)

:588=;a

((

)+84)

By
Hecani
Ji6e)
CONTAINE
((

Sgg}n

2 ((
figgé (
I

)472)

e
228)+75)

REL

SEQ_0321
SEQ 0042

wfi%fi.fnsmgs"s

8§E§ FOR EELL

a2 e
3 llli!lllllllllllllllllillllllli‘llll!lllll!lfiillIllllllll!l!il!
RETURN

606606

.BYTE
.HO
.

iséuop
**‘*.

D
e
e
B

000
000000

RE
ASWREG
AU
ACPUOP

NUMBER

wno

Bt B

Moz

;FATAL
E
<

L
LI

-l-

-‘-

'RPTsncé 0Pe cooe

%m:-agfi

F IRELIREINRER

:Eggg §§§§CT

Bt Bt be bt b

8 .‘- 888888888

= 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 38 36 36 36 36 36 36 36 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 36 26 06 36 36 2

DOC

RELRC B0 S0 £ w0 58 SRR ZoR=8

Pt B

e et B

Pt Bt s

RPN

s Bt Bt o

PN RN

ot ot ot s

s et

PRV

s ot s Pt s Pt Pt

20%

000377

Bt Pt s

1
1
1
1

PAGE 43

00000000000 0000000000000D

2096

DO4

12:16

3332238222353555355555

2093

10-JAN-78

%.co ki

1
1
1
1
1
1
1
1
1
1
1
1
1
i
1
1
1

AAAA
GIER

PR 0 INoE SRERSRE
SRS TRL

1
1
1

onLo

1
1

WWwww

2070

MARCY11 30A(10S2)
OMMON T

CZR6MDO RKE11-/06 SS VERIF 1|
CZR6MD.P11
10-JAN-78 11:48

H
NT _TABLE
TE
MODE BITS
GISTER

A6628=08L16/20=03,11/40=09,11/45=05
0=

9=FLOATING POINT PROCESSOR
B8=MEMORY MANARGEMENT

CZR6MDO RKB11-06 SS VERIF 1
CZR&MD.P11
10-JAN-78 11:48

2126

2127

a{ea

001350

001351

000

3E:
2l
001352 000000

MACY11l 30A(10S2)
10-JAN-78
APT MAILBOX-ETABLE

$MAMS1:

.BYTE

SMTYP1: .BYTE

EO4

12:16

AMAMSI

AMTYP1

PAGE 44

SEQ_Q3e2
SEQ 0043

,,HIGH ADDRESS,M.S. BYTE

fitn TTYPEviE,BLK#1
- u_acxmco; BYTE)

NS B1PocaR-002

$MADR1 :
s%
$MamMs2:

s s HIGH
"én.l.mfi
=3 5vrss THIS WORD AND LOW OF “TYPE" ABOVE
s s HIGH
SS,M.S.BYTE

;s
; s

flig Bt
oot
1
BE o
2143
001370
120210
2144 137
000000

o
s
svscré.
SVECT2:

Hit
o
.oy
g el
;;im
hm.m
cVECTOR#28US
3nlu
ausPRIORITY#2
anonmu
: : INTERRUPT

2147
2148

SETEND:
LMEXIT

algg

ng;

xggu

21%
el

1356
1%0

000000
000

00135S

2138

001361

000

2146
2146

001374
001376
001400

1774940
37

SMTYP2

SMTY

$BASE :
SDEVM:

MEM.T

;

;MEM.TYPE ,BLK

MEM.
HIGH

BLK

SS,BLK#2
M.S.BYTE

: ;BASE
ADDRESS OF EQUIPHENT UNDER TEST
: iDEVICE MAP

CZREMDO RKB11-06 SS ERIF

CZR6MD.P11

10-JAN-78 11:48

aiuq

MACY1l 30A(1052)
.SBTTL

51??

: ¥THE

gigg

: ¥NOTE2:

2‘5..

s ¥

158
ste
512?

sts

¥
¥
¥
001400

166

001400

sxse
2}93

001404
001406

2167

2175

2172

2173
2174

0S6361

: ERROR 1

gM1

EM2

001426

062504
062620

:ERROR 2

1
062504

DH100
DT100

0SEY16

gua

062620

DFO1

:ERROR 3

06100S
062504

sxgg

mgg

001434

062504

DT100

2190

DOI440

0SE4S3

EMS

2195
2196
2197
2198
2199

001450
001452
001454
001456

056472
061005
2504
704

:ERROR B
£ME
DH100
DT100
OF03

2202

001460

056511

EM7

gi
2189

D014

001436

062620

Sy
el
gigé mig
381-4% &3250

2200
2201

2203
2204

001462
001464

061005
062504

;UNIBUS PARITY ERROR

DT100
DFO1

001422
001424

rouno

ss
WHICH m: IN
m:(
naLE IS PERTINENT.

SERRTB:

0S&400

gi%

Pop g 70 T
m HEADER
:POINTS
7O
T
:POINTS TO THE mm FORMAT

001410
001412
001414

THI

; ;POINTS TO THE emoa MESSAGE

DH
0T
OF

DH100

001420

SEQ 0044

Ench x? In %c"sng.'t coumin"?; %méfis Expmmso AS FOLLOWS:

061005

ax;g

2l
2180

SEQ 0323

MATION 1; ogrm'&' r«f- }

001402

gi;s 001416

217?

PAGE 45

ERROR POINTER TABLE

'L8$211°" SITEMB.

2157

2162

12:16

; ¥THIS maLs comnms THE mronmnon ron Encn snnon Tum CAN occun

axgg

5%23

10-JAN-78

ERROR POINTER TABLE

FOY4

:NON-EXISTANT MEMORY

:NON-EXISTANT DRIVE

100
DT100

:ERROR 4

;UNIT FIELD ERROR

100

DFO1
:ERROR S

:SUBSYSTEM TIMEOUT

Bilse
DF02

:ERROR 7

DH100
DT100

:D TO C PARITY ERROR

:DRIVE DETECTED PARITY ERROR

CZREMDO RK&11/06 SS VERIF 1

CZR6MD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

10-JAN-78

ERROR POINTER TRBLE

001466

062704

DFO3

001470

0S6530

£M10

gg}g 001476 &5223

DFO02

eel

2214

001500

:ERROR 11

056537

EM11

EM12

2217 EE
o
001
R
523
UL

2218
aaég

:ERROR 10

i
DF02

:ERROR 12

GOM

12:16

PAGE 46

;AC LOW

: SPEED LOSS

001510

056552

001516

062650

1520

0S6S64

gEM13

; PROGRAMMING ERROR

:.:

6574

tniq

:ERROR 14

:NON-EXISTANT FUNCTION

D01

062650

DFO02

001540

0S6614

agax
] Sg

52?
H

28
g

2231

001512
1 14

1522

223

2239
2240

2 é
2243
2
224

061005

152
osésoq
1
062620

301
2238

06100S

001542
001544

001546
D01

D01

203

061005
&g‘g,oq

S0
30

DH100
DT100

DF02

:ERROR 13

DH100

DT100
DFO1

BY100
UL

:ERROR 15

EM1S

;DRIVE TYPE ERROR

DF02
:ERROR 16
Ml

:FORMAT ERROR

DH100
DT100

2247 }ssz 062650

DF%E

-,0015

0S66Y4
0610

EM17
DH100

D01566

062650

DF02

xgrg 056655

gM20

2248

2249
ggo
1
252
5%3
5
2258
2259

001564

001572
001574
001576

062504

061005
062504
062650

: ILLEGAL FUNCTION

:ERROR 17

;WRITE LOCK ERROR

DT100
:ERROR 20

DH100
DT100
DF02

;DRIVE UNSAFE

SEQ 0324

SEQ 004S

CZR6MDO RK&11-06 SS VERIF 1

CZR&MD.P11

3281

10-JAN-78 11:48

MACY11l 30A(10S2)

10-JAN-78

ERROR POINTER TARBLE

.ERROR 21

001600

056670

EM21

001606

062650

DF02

2268 ooiszg 056701

n;lza

e D0ieB% Deie%s
S

asg

gg%
xgiq
7§ 001616
UL

227
2273

:ERROR 22

4188

:ERROR 23

gigg

Ezéég

Enf

2277

001626

062650

DF02

D01
00 1%
D016

8?658_1,
1
0625

M4
100
DT100

agn

062650

:ERROR 24

2283

001636

2287
2288
éég

001642
001644
00164

061005
062504
062650

DH100
DT100
DF02

001650

0S676Y4

£M2k

She 001640 0S674S
23&

2293
2294

gges

001652
001654

0016

061005
062504

ERROR 25
EM2S
:ERROR 26

DH100
DT100

tfia'?

5301

DF02

:ERROR 27

001662
001664

061005

001666

062650

001670

057013
061005
062504
062760

DH1
DT100
DFOS

2310

001700

057025

EM31

sgig

001706

sgoa

2305
2306
ggg?a

309

2311
2312
2315

2316

001672
001674
001676

;SEEK INCOMPLETE

:CYLINDER OVERFLOW

DH100
DT100

:ERROR 30

£M30

:ERROR 31

001702
001704

061005
062504

DH100
DT100

001710

057041

EM32

760

: ILLEGAL CYLINDER

;:DRIVE OFF TRACK

;DRIVE TIMING ERROR
;DATA LATE

DFO

aeqea 001660 056776
2299
2300

PAGE 47

DF02

gg'm

12:16

: CONTROLLER TIMEOUT
: OPERATION INCOMPLETE

;HERDER VRC ERROR

DFOS

:ERROR 32

;DATA CHECK ERROR

SEQ 032S

SEQ 0046

CZREMDO RK&11-/06 SS VERIF 1

CZR6MD.P11
10-JAN-78 11:48
17
1712
00S

5318 8817»4 &ésaq

MACY1l 30A(1052)

10-JAN-78

ERROR POINTER TRBLE
H100

001716

063014

DFO7

323

gag

057056

55?30

535-. D017,

agg 0017,

532

gmaaa

&5504
05

:ERROR 33

DT100

:ERROR 34

gzgg

55?30

e;:a;so

177:'0%

%fiu‘fi

Efifé‘o

;=3a

001746

062620

DFO

gggo 175
062504
0627494
D017
2333

g:l
o

001744 062504
.

k
gg‘z
ooi'rso 057133

1;3% 000000

DT100
:ERROR 35

DT100

gaqs

éfiggon 37

343

1766

gggé {77
354

ggss;

001774

2504

sfing

:ERROR 4

g;:;sag % 327030005
60
osésoq

efi?gg
T100

2363

zgg
53&9
535

’

;ATTENTION BUT NO STATUS CHANGE OR FAULT

;ATTENTION BUT DRIVE NOT AVAILABLE

DT100

DF02

002006

:NO DRIVE RESPONSE-UFE & NXD

062650

5351

001776

gigg

:DATA MISCOMPARE
(S)

:DRIVE STATUS CHANCE WILL NOT CLEAR

:ERROR 4

062650

DFO2

ig osgggg
14
S04

Sfi?go
DT100

sATTENTION WHEN NOT EXPECTED
:ERROR WHILE GATHERING DRIVE STATUS

062650

:ERROR 42

DFD2

gggg

éssgon 43

2371
2372

002022
002024

061005
062504

DH100
DT100

SEQ 0047

‘
.

:DRIVE ERROR WILL NOT CLEAR

001756

3 9 001762
000000
%175-0 0000

sWRITE CHECK ERROR

:ERROR 36
gfias

gg:a

SEQ 0326

DF1

%{;30

g3 35

PAGE 48

T100

5319

gaaix

I04

12:16

CZR6MDO RKB611/06 SS VERIF 1

CZREMD.P11
2;73

374

10-JAN-78 11:48

002026

063114

s Bos Beinge

MACY11l 30A(10S2)_
10-JAN-78
ERROR POINTER TABLE

JO4

12:16

PAGE 49

DFi12

; ERROR 44
M

;CLEAR CONTROLLER DID NOT CLEAR ERROR

2398

770S

2o Gos67d Beloe

5303 002076 063114
2403
g% %EICIJ 0S7744
240
2102
061005
2408
2409

002104
002106

062
063114

Bl
Bile ooetig osmuul
2414
2415

00211%
002116

062504
063114

Bile
s:lg 002120 057426
241

002122

061005

2420
1 Gosisd Gescon
*

auga
1
057013
425 8%513%
061005
igz

nn
£r
nn
N

2426

062504

“88"3 M88"3 Mgs*

062??:

g ~88“g M88°g MBS

064

061005

602

gs;

83 Notd ol nntd Aot nentd need

5394 EE%EEE 0S7666

80
o

062504

063114

;NO ATTENTION IN ATTENTION SUMMARY REG

;UNSOLICITED ATTENTION

; UNEXPECTED DARTA TYPE ERROR

;ATTENTION DID NOT RESET WITH CLEAR

; SUBSYSTEM CLEAR DID NOT CLEAR DRIVE ATTENTION

;MULTIPLE DRIVE SELECT

; ABREVIATED HCE ERROR

OO0O0OMmMe-

i EE%%%E o
2390

sgéé

geesos

OOOMe:

062504

o0Mm:

§§§

g3 gggg4 gs7ele

OO00OMme:
M-4I3IXM

%16

[SOy

2381

QOOMAT ImM
———wD
OO0

2380

oOMe-

23;2 %8& 063114

sS4

; OPERATION INCOMPLETE ERROR

SEQ 0327
SEQ 004

CZREMDO RK&11/06 SS VERIF 1

CZRE&MD.P11
33

10-JAN-78 11:48

ooa}:g

MACY1l 30A(1052)

10-JAN-78

ERROR POINTER TABLE
:ERROR S5

gg?ozsmos

gn?lxm

gg_a‘

146 063194

DF13

35
gg
38
39

%gigg
Taag
ggsxgz 062504
1
063224

:ERROR 5B
55'1;30
DT100
DF1S

2445

002166

063270

DF16

azg

gggi;g

057%5

snso

g:s

002176

000000

awsg
M

ggggg

0S7514
000000

snu
0

EMe2

002216

063334

DF17

002220

35 %xw 062504

ggé
: et
244
%123 061005
2444 002164 062504
§3?

$e3g

2450 002174 ooncoooo

gfi
53(:5

246
2468
2469

005506 0000

212
%os
214
04

2473
2474
g?s

aw%
5373
79
2480
5335

2483
2484

§§§§°" 57
DH100
DT100
:ERROR 60

:ERROR b1

DH100
DT100

000000
7
063944

0
DTe02
DF25

002230

057560

EMe3

:ERROR B4

002232
002234
002236

061005
062504
062650

DH100
DT100

asug
002242
4y

057616
061005
S04

£MeY
DH100
DT100

002250

057644

EMeS

062650

ERROR 63

222

246

PAGE SO

;ABREVIATED HVRC ERROR

;2 TIMEOUT ERROR

:2ND LEVEL IN SUBSYSTEM TIMEOUT
:ERROR IN RECAL FOR RECOVERY

;ABORT MESSAGE

002224

2470

g:?

DT100

KO4

12:16

:ERROR 65

s CYLINDER MISCOMPARE

:DATA ERROR WORDS

;CLEAR CONTROLLER DID NOT CLEAR ERROR

sNO ATTENTION IN ATTENTION SUMMARY REG

DF02

:ERROR BB

sUNSOLICITED ATTENTION

SEQ 0328

SEQ 0049

RIF 1
CZRSHDO
RK611-/06 SS
-78 11:48

PEPERERRRYVRY
SSBIRRLD -8 383RR

EE% feecss
057666
S

PAGE 51

; UNEXPECTED DATA TYPE ERROR

;ATTENTION DID NOT RESET WITH CLEAR

R
h
z

e
DO NN £ W0

LO4

12:16

; SUBSYSTEM CLEAR DID NOT CLEAR ATT

;DATA LATE WHEN UNLOADING HEARDER

S2R

ARG

2540

; CONTROLLER ERROR DURING DRIVER SERVICE

DOC

060044

e B

Bt B

e B

ot e P

RARRRRRRAR

MACY1l 30A(1052)
10-JAN-78
ERROR POINTER TRBLE

002364

062570

DTe0!

;ORIVE DETECTED PARITY ERROR

; UNDEF INED ERROR

;MARKING SECTOR BAD MESSAGE

;BAD DATA VERIFICATION WITH REARD

SEQ 0329
SEQ 00Ss0

CZR6MDO RK611-06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48
063370

24
063430

10-JAN-78
ERROR POINTER TRBLE

MACY11 30A(10S2)

MO4

12:16

PAGE Sz

SEQ_0330
SEQ 00s1
]
!

DF21

; ERROR 100

§n77

;RETRY SUCCESFUL MESSAGE

T601
DF23

. ERROR 101
M77

; ANOTHER RETRY SUCCESSFUL MESSAGE

DTEO1L
DF23

. ERROR 102

5n108

; RETRY UNSUCCESSFUL MESSAGE

DTE01
DF23
103

104

105

106

107

110

;NO VALID HEADERS IN TRACK JUST RERD

;BSE ERROR ON SECTOR NOT LISTED RS BRD

; TIMED-OUT ON READ HERDER

; TIMED-OUT ON SEEK

;ORIVE SIEZED BY OTHER PORT

; "DATA MISCMPR WHILE BRI SET"

RK611/06

c%‘.’ru

VERIF 1

?S-Jm- 8 11:48

MACY11 30A(1052)

-JAN-78

ERROR Poxr&gn TABLE

:ERROR
EM107

111

NO4

12:16

PAGE 53
;"NO NEM WHEN EXPECTED"

SEQ

52836053

E§

i
;
r

0
:ERROR

Smég

112

;" INTRPT WHEN CNTRLR NOT READY"

DT100
DFO1

10
1

O60EE3
1

éfi'}gzn
e
DH1

asxg
% 062650
062504
asi“

DF02

5219

ggs‘{gz

%n%s

261

44
063450

pT202
DF26

5215

DT100

ERROR 114

g %&g @
4y
46

a"?,é
26
%

70
74

DT&01

Igzs

55?33

DT103

:ERROR

DF20
:ERROR

38%
2564

RROR

]

062504

063400

8
:

:ERROR
Euiéo

Sg:a

DFO1

2648

gggg

2651

2652

g%gg

002610

: TYPE ADRS OF DATA MISCOMPARE
(S)
|

116

117

;DATA MISCOMPARE (11/70)

:PART OF DATA MISCOMPARE

DT100

;g gg%os
749

:DRIVE'S CYLINDER INCORRECT

DF22

gfi
2642

115

."NO
ATT'N ON SEEK"
g

120

DT100

ERROR

Eflhfia

121

;RBORT- CAN’T READ BSF
;KT11 FARILURE

DT100

063504

DF30

060771

EM11S

:ERROR

122

;MEM PARITY ERROR

CZREMDO _RKB611-/06
SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

2659

2660

667

;ERROR 123

%SD

0Se416

£M3

002624

000000

002e26

000000

BOS

12:16

PAGE SH4

g1
0o

28 gEn i
g
Bl geu
Sggz

MACY1l 30A(1052)
10-JAN-78
ERROR POINTER TABLE

;NED WHEN SIZING UNDER APT DRIVE TARBLE

SEQ_0332
SEQ 00S3

OB AN BR tyg

CZR6MDO RKB11-06 SS VERIF 1
CZR6MD.P11

ROVl I

COS

R GNRENTE T THE k11 REGISTERS

.SBTTL

SEOS 33&054

BIT ASSIGNMENTS IN THE RKB11 REGISTERS
;RK%SI

)

'CERR !

R/W %

:CCLR !
;

! DCPAR! CFMT ! CTO

! CDT

! BAl7 ! BAlG !

iRMW

iRM

;

12
:
!

R/WI

3
!

8
i

iRM

-------------------------------------------------------

:ROY !
; RZ/W!

! SPARE!

R/K!

R/W!

RMW!

F1L

RMW!

RMW'!

/W !

; -------------------------------------------------------

; RKCS2

115

UPE

i 25

' CLR

DLT !

: 35 i HS

WCE

NED

' ES

NEM

! MDS

585 i R

UFE

i RO

1§

; .......................................................

: RO

*
!

! BRI

R/W

! DESL ' DS2

! DS1

! RZ/W

! DSO

! R/W

R/W

! RZ/W

]

' DC9

! DCB

!
1§

; --------------------------------------------------------

;RKDC (DESIRED CYLINDER)

PNU
3

NUO!'

ONUO!'

NU
READ ONLY

e ————————————————

‘Dc7 ' DC6

' DCS

' DCY

! DC3

! DC2

! DCL

! DCO

;
RN
NNNNNNNNNNNN
UMY 0= b= bt s Pt Bt s s e s
—-OwoNCNLEWN-0

e709

READ ONLY

:NU
:
|

ek s § =

' TR2

READ ONLY

! TAL

! TRO

!
!

e ———————————————

PUN
:

e —————————————————————

:RKDA (DESIRED TRACK AND SECTOR)
:
14
13
127
11

! SA4

! SA3

! SA2

! SAl

! SAD

READ ONLY

;

CZR6MDO RKE11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY11l

10-JAN-78

30A(10S52)

12:16

PRGE S6

SEQ 0334
SEQ 00ss

BIT ASSIGNMENTS IN THE RK611 REGISTERS
;nxga (0ATA
aurrsg)

)

(WC1S ! WCIY ! WC13
!gsxsnhgcu ! WCID ! WCI

! WCB

:
s

WC7 ! WCB

! WCS

: E

;RKBA (BUS

)

&Ezgt/omhgcs

! MC2

! WC1

! WCO

R ——————————————————————

————— —————————————————————

ADDRESS)

CZRBEMDO RKE11-/06
CZRBMD.P11
10~

IF 1
11:48

EOQS

10-JAN-78_
12:16 PAGE 57
MACY11 30A(10 52)
BIT A SSIGNMENTS IN THE RKG11 REGISTERS
;RKER (ERROR REGISTER)
;18
14
13

! DCK ! UNS
:

! OPI

! DTE

! WLE

READ

SEQ _033S
SEQ 00Sss

ONLY

! IDAE ! COE

! HVRC

! DRPAR! ILF ! SKI ! ILC !
FWTE ONLY
i"BSE t ECH ! DTYPE! RERD
:
'SVAL 1 DSC * PIP ! SPON ! WRL ! UN ! UN ! DTP !
READ ONLY

iDRDY !

VvV

! DROT ! SPLS ! ACLO ! OFSET!
READ ONLY

'RD__

! MRT

! ECCW ! PCD

{GATE i GATE
!
:
PR

;

READ ONLY
.. .

IWIND ¢ MSP

! DMD

1. ...

! PCA

;

! DRA

! MEWD ! MERD ! MCLK !

;

i READ/WRITE

WIS

! PAT

! MS3

! MS2

! MSI

! MSO

READ/WRITE

CZREMDO RKB11-06 SS VERIF 1
10-JAN-78 11:48
CZR6 MD.P11

FOS

MACY11 30A(1052)
10-JAN-78_
12:16
PAGE S8
BIT ASSIGNMENTS IN THE RKb11 REGISTERS
s RKECC/PAT
:18
14

i UN

SEQ@_0336
SEQ 0057

RERAD ONLY

! EPAIO! EPA9 ! EPARS !

e
e

iEPA7 ! EPAB ! EPAS ! EPAY ! EPA3 ! EPA2 ! EPAl ! EPAD !
3

READ ONLY

T
e
e

; RKECC/POS

;DRIVE STATUS INFORMATION
;LINE A MESSAGE 00

CZREMDO RKE11-06 S S VERIF 1
11:48
CZRE6MD.P11
10- J AN-7

2850
essl

MACY11l 30A(10S2)

10-JAN-78_

GOS

12:16

PAGE S9

;LINE B MESSAGE 00
; 1S
14
13

! LDG

! REV

! FWD

;LINE A MESSAGE 01

i 15

P PAR ! UNLDG! RTZ
:

i HDS

;DOOR !' BRUSH! HEADS! TRK
.

;LTCH !
:

;

i BRAKE!

; PAR ! ssnvo' an \SEEK 1 PLO
i ERR

! SPEED! CART !
i

"OK

! PRES !

DRIVE SELECT CODE !

!+ DIBIT! INDEX! MULTI:
!

ERR !

ERR !HD SEL!

; .......................................................

HOME ' HOHE ' FOLOW!
oK
!

;LINE B MESSAGE Ol

nrn oy

SEQ 0337
SEQ 00s8

BIT ASSIGNMENTS IN THE RKb11l REGISTERS

]

HEAD_'WR GTE'WR CUR! SEC

iXISTONIWR GTE!

;

FRULT'QND NO!AND NO! ERR
;

2
!

1
!

0
!

CZR6MDO RKE11-06 SS VERIF

CZREMD.P11

10-JAN-78 11:48

MRCY11

HOS

30A(10S2)

10-JAN-78_
12:16
PAGE 60
BIT ASSI GNMENTS IN THE RK611 REGISTERS
;LINE A MESSAGE 10
: 15
14
13

PPAR '
;

:CYLINDER DIFF/OFFSET VALUE!

;LINE B MESSAGE 10
:
14

CBBIR

oo DO

[S
———

! PAR !

'
12

]

LINE B MESSAGE 11

DRIVE SELECT CODE !

]

SECTOR COUNT

2
'

11
!

8
! SECTOR!

ADDRESS

DRIVE SELECT CODE !

DECODED HEAD

COUNT

RKO& CONTROLLER REGISTER DEFINITION

;CONTROL AND STATUS REGISTER 1

:BUS ADDRESS REGISTER

e
06
000010

&
10

: DRIVE SERIAL NUMBER

DRIVE SERIAL NUMBER

PPAR !

et —————————

CYLINDER ADDRESS

;LINE A MESSAGE 15

DO N £ W

nrn

CYLINDER ADDRESS

| ccmceme et et

;

! CYLINDER DIFF/OFFSET VALUE

: PAR : g%xcn-

2920

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

2907

SEQ 0338
SEQ 00S9

;WORD COUNT REGISTER

;DESIRED TRACK SECTOR REGISTER
;CONTROL AND STATUS REGISTER 2

CZREMDO RKB11-06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

I0S

PAGE 61
10-JAN-78
12:16
RKO& CONTROLLER REGISTER DEFINITION

MACY11 30A(10S2)

RKER= . 18

g4y

£nTT§ur ON
;i DES

Y AND OFFSET REGISTER
NDER REGISTER

RKMR1=

‘MAI

necxgrsn 1

MR2=
MR3=
RKPOS=

34
gg

RRPATS. 39
RKECPT
35

Pt B

8888

0000

Pt Bt P

Bt B

s Bt

o
[=
(=]

s Bt

T ISERES

SBTTL

103

CLESSB_ ig;

NDER REGISTER

iMAINT
;HRéNT
:ECC POSIT

1ECE PATTLAN
INFORMATION
ECC
PnTTEnN fnronnnr§ou
:SELECT DRIVE

: PACK ACKNOWLEDGE

§B§Evs CLEAR

OFFSET=
u;
SEEK=
11

;: orr&%
SEEK

WRDATA= igg

;WRI Eflggggn

TR= 121

HEAD= 187

WRTCHK= 131

:READ

DATA

;55??5
HEADER AND DATA
‘WRITE CHECK

THE FOLLOWING ARE NOT DR

BUT ARE USED BY THE DRIVER

TO SIMULATE A SPECIFIC oégfnsg Jusgnr?gn

RELERS= 140

ng§$A?= 141

000001
00

;gs;a

DRIVE COMMANDS

SELDRV= 101

PACK=

000001
00000s

i ORAOR RLGISTER loTER

RKASOF= 16
RKDC=
20
fifiBSYL‘ gg

000177
000300

SEQ 0339
SEQ 0060

:RELEASE DRIVE

EGET ALL STATUS FROM DRIVE

DALHD=
CONCLR=
SUBCLR=
INTR=

164
176
177
300

;

DRIVER ISSUED SERVICE COMMANDS
R.SEL=

gfl.gsz ggé

iR ng ALL HEADERS
:CONTROLLER CLEAR (BIT 15 OF CSl1)
:SUBSYSTEM CLEAR (BIT S OF CS2)
:GENERATE INTERRUPT TO CPU
;DRIVE SELECT

;DRIVE CLERR

.SBTTL

CONTROL AND STATUS REGISTER 1 BITS

GO=

BITO

ROY=

BIT?

1IE=

BAle=
BAl7=
CDT=

CT0=

CFMT=

;GO BIT

BITE

: INTE

BIT8
BITS
BITIO

: BUS
SS BIT 16
§S BIT 17
:BUS
: CONTROLLER gnxvs TYPE (0=RKD6, 1=RK07?)

BITI1

BITI2

ENARBLE

; CONTROLLER READY

:CONTROLLER
.

TIMED

DRIVE RESPONSE

OUT WAITING FOR

:CONTROLLER DRIVE FORMAT (0=22 SECTOR,

1=20 SECTOR)

30
3001
3002
3803
3004
300S
30
300
3008
3009
3010
3011
3012
3813

0000
040000
100000
100000

3015
3016
3017

000007
0010
000010

3021
3022

000100
0200

B
3020

5
3025

3026
27
0e8
3029
3030
3031
3032
3033
3034
3032
30
3037
3038
3039
3040
3041
3042
43
044
3048
3046
3047
3048
3049
3050
3051
3052
3083
3054

JOS

MACY11 3gfl(1052)
12:16
PAGE_62
10-JAN-78
ONTROL AND STATUS REGISTER 1 BITS

SPAR=
DI=
CERR=
CCLR=

SEQ_0340
SEQ 0061

BIT13

:DRIVE BUS Pmnv ERROR DETECTED BY CONTROLLER

BITIS

: CONTROLL. E ERROR

BIT1H

BIT1S

,onxvs INTERRUPT

: CONTROLLER CLEAR

THESE BIT DEFINITIONS ARE USED FOR ADDRESS
THE HIGH BYTE OF RKCSI

000001
00
000004
002

BITO

BIT1

BIT2
BITY

:BUS ADDRESS BIT 16

ADDRESS BIT 17

;

:CONTROLLER DRIVE TYPE (0=RKO&,1=RKO?)
:CONTROLLER DRIVE FORMAT (0=22 SECTOR, 1=20 SECTOR)

CONTROL AND STATUS REGISTER 2 BITS

7. .

; MASK raTa gsx

B
0040

o AR A8 L tals

B
0

g‘ne

004000
010000
020000
040000
100000

8i13
B ';u

BiTs

118
BITI1O

BIT11
BITI12
BIT13

BIT1H

BITIS

Ls;:n.scno« cog: T

:SE&EST
OR nggf
BRIVE IN BITS 0-8
NCR NT IL«IEI\T,E

SUTPUT
RERDY
;um FI1

iMULTIPL

IVE
*NG E

SELECT

;mn—sx* NT %
i NON-EXISTENT
DRIVE
ITY ER
:UNIBUS

uaps
CHECK
A LATE

ERROR

ERROR REGISTER BIT DEFINITION
000001
0002
000004
000004
000010
000020
000040
000100

0002
0004
000400
0010

0020
00400
100
020000
040000
100000

BITO
chl'
T

34 Tg
BITS

g;;g
B ;9

e
179

g‘mo
BIT11

BITI12
BIT13
BIT1H

BITIS

Ecal. ruucr o
g v UNCTION

,xu.scaL ruuc

I%LLE éFUNCTION
: vs rm ERROR
,

;

2L R
RFLON ERROR
PHY
:?NV'?S 22 ES&:"E

,unx
#NE
snno
IMI
;DRI
.opemnon (SEARCH) INCOMPLETE
‘DRIVE UNSAFE

:DATA CHECK

STATUS REGISTER BIT DEFINITION

TED DRIVE
BUS PARITY ERROR

CZRSMDO RKE11/06 SS VERIF 1 9
CZREMD.P11
10-JAN-78 11:

CZREMDO RK611-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

.
|

’

KOS

MACY1l 30A(10S2)
10-JAN-78
12:16__PAGE 63
STATUS REGISTER BIT DEFINITION

SEQ Q341
SEQ 0082

3056
3057
3058

000001

DRA=

BITO

DRIVE QVQILRBLE (CONTROLLER IS SET IF

000004

OFST=
ACLO=

g T2
13

DRIVE OFFSET
;AC LOW

3061
3062

00002
888040

3063
3064

100
000200

3068
3069
3070
3071
3072
3073
3074
3075
3076
307
3078
3079

020
040000
1

3825

3081

3082
3083
3084
308S
3086
3087
88
3089
30

000288

S
o
SvAL=

g T4
T4
BITS
BIT
T
BIT?
g 18
T11

BITIS

.SBTTL

; SPEED LOSS
;0C _LOW
;DRIVE OFF TRACK
! VOLUME VAL
;DRIVE RERD
;DRIVE RERDY
TYPE (0=RKO06, 1=RK07)
;DR}
; WR
LOCK

1L
;
;ET TUS1geThe.
anug 1y, prgoeess

MAINTENANCE REGISTER 1 BIT DEFINITION

000017

MESMSK= 17

; MESSAGE MASK

000020
000040
000100
000200

PAT=

BITY

; FORCE EVEN PRRITY ON DRIVE BUS MESSAGE LINES

a?zs

EJ¥?

001000

0o
004
010000
02!
040000
100000

TR
93
0002

3094
95
3096
3097
3098
3099
3100
gifll

000400
001000
002000
004000
010000
020000
040000

3104
3108
3106
3107
3108
109
3110
3111

000040
000100
0200
000400
10
00200
004000
010000

sit

SPDLSS=
CLO=
DROT=
V=
DRY=
DROY=
DDT=
WRL =

BIT IS RESET)
THIS

Rraliasanaiaaia
R

pen=s

DMD=

BITS

MCLK= BITS
MERD=

BITS

MEWD=

BIT10

DIRGNOSTIC

°HR NT

HflNT

CTOR PULSE
DATA

00 DHR%TE DATA

PCR= BITI11
53?%37 BITi2
g%;ia

,P
TION
:
;HR?TEES TI
BEING RERD OR WRITTEN

RDGATE= BITI1S

;READ GATE

PCD=

’

.SBTTL

DEFINITION OF DRIVE STATUS BYTE D0 MESSAGE A

S.DRA=

BITS

;ORIVE AVAIL IARBLE

S.DRY=
S.TYPE=
S.FORM=
S.O0FF=
S.WRL=
S.SPIN=
g.PIPz
.DSC=

BIT
BIT8
S}T9
T10
BITI11
BITl2
S§T13
TiY

;DRIVE RERDY
;DRIVE TYPE
;Oflg
FORMAT
;OFFSET
;WRITE EOCK
; SPINDLE ON
;POSITIONING IN PROGRESS
;DRIVE STATUS CHANGE

.SBTTL

DEFINITION OF DRIVE STATUS BYTE 00 MESSAGE B

S.ICyL=
S.ACLO=
S.FLT=
S.ILF=

BITS
BIT;
BIT
BITS8
19
T10
BITI11

S.Vv=

S.PAR=
S.SKl1=
S.uWLE=

gITg

S.SPLS= BITI12

;

VOLUME VAL ID

; ILLEGAL CYLINDER RDDRESS
;AC _LOW
;DRIVE FAULT
;ILLEGRL FUNCTION
é RETECTE? DRIVE BUS PARITY ERROR
K I
RITE LOCK ERROR

SPEED LOSS

CZREMDO su/os S VERIF 1
CZREMG.
P11
?m-n 11:48
3112
3113
3“3

010000
020000

3{19

§ii9
118

000020
000040

S
= BITY
S. HDHM= Ei;s

mmsoucen 0K

i
312

3{5‘9’

‘

3133
3134
3135
3136
3137
3138
3139

3130
§{:§

001000

§.SPOK=

go
mzm.ocxeo
:CARTRAGE INTERLOCK

13800
020000

Hl
2 E‘oXS:
k990" BiTi5

:
NG
ERE‘T'B%NL28°3R0

aogg

040000
00

———

BITS

g.rws

T1i0

S.UNLD= BIT1Y

ED OK

:HEADS UNLOADING

DEFINITION OF DRIVE STATUS BYTE 01 MESSAGE B

000040
000100
0002

g.ucuc: Exrs
g.ucma T
HDFL= §§T

;SECTOR ERROR
unm CLOCK AND NO WRITE GATE
WRITE GATE AND NO TRANSISTIONS
F
nu. IPLE HEAD SELECT
: INDEX ERROR
gx 1TRsmon

8é°8°°
0400

gy Binu
Hg
?.53222

5'1‘7 ECT
kénvoE onlgssx

000400
001000
ggaooo
4000

000007

.SECT=

BITY

§.MHD=
BITS
§.XERR= BITS
§.DIB=
BITIO
g PLO=
BIT11
.SBTTL

COMMON MASKS

M.DRV=

;DRIVE CODE

3147
3148
3149
3150

X 00
000
017760
017760

M.PAR= gms
M.1D=
M.COIF= 17760
M.CADD= 17760

PR"é
'BYTE ID
cvunoen DIFFERENCE/OFFSET
ESS

3153

007000

M.HEAD= 7000

Heno DECODE

3151
1

.SBTTL

gigg

3146

.SBTTL DEFINITION OF DRIVE STATUS BYTE Ol MESSAGE A

3.8‘0041"“
= Bii3
§.CART= BIT8

§i3?

12:16
PAGE &Y
DEFINITION 10-JAN-78
OF DRIVE smrug
BYTE
00 MESSAGE B

:DC_LOW
‘DRIVE OFF TRACK
:DRIVE UNSAFE

-f--*000400

MACY1l 30A(1052)

S.DCLO= BIT12
§.DROT= BIT13
S.UNS= BITIHY

315?
3122

123

LOS

07777
00076

M.g
R= 27770
M.SECT= 760

ga
i ":ssnxm.NUMBER

SEQ

523034Sosa

PRAGE 6S

SEQ 0343
SEQ 00&M4

.SBTTL

PARAMETER BLOCK ALLOCATION

: *

llllllllll!lllllIllll!lllllililllllll!l!lllllll!l

R RADDRESS

;: é
B

! DRIVE NO.

TM)g &7Ergnnn DRV vpi

3 ;
;.i

§
z
oy
oTION
c
gérr uasxsrznx

H
Y?

% 3

RTT

x 55

‘¥

TATUS

oE: g§31
E'
Y"g
;% 53
4 Es
i E;

RZORCESB SRR S8 BB SRR R ER B8 33N
000
o

MOS

MACY11l 30A(10S2)
10-JAN-78
12:16
PARAMETER BLOCK ALLOCATION

X INN ISR LT R ETR S

WWwWww
WWWWWwWwWwWwWwwwww
W
nnn R Wgw e Bt Bt s Pt s ot Bt et W
U%U
ot Pt ot Bt W
s ot W
ot W
et B
W Wot Ws Pt BtW
ot s Bt W
ot W
ot Pt Bt W
s Bt Pt W
s Bt Pt
WL
Pt s ot
WWwWwWww
Pt s ot B

Pt
P P

L] Ll
DON onse

CZREMDO RKB11-/06 SS VERIF 1
10-JAN-78 11:48
CZRBMD.P11

ECLISTER
E:cron

CYL NDER

AND DRIVE OFFSET

&1LtER
tL gg TAT
TRT YTEYT 8?Ol
L
g TAT
Y
LE
TATUS
on ? TAT vrBYTE 1111
LINE A s;g¥us
avrs

‘% 5]

;% B3

TATUS

BYTE

ECC PATTERN INFORMA

: 2g

i B
i 19
E
i 16
:

i 55
i 26

i 30
;

i: 3833
[T
i 4p
i 52
i 54
; §3
i 50

i B2

3 ¥*

Illllllllllllllll!lllllllllll!lilllillllllllllllI

.SBTTL

PARAMETERS PASSED TO THE DRIVER
TH; FOLLOWING DEFIN T%ONE ARE USED TO PASS PARAMETERS

0 THE RKOB/RKD?

L-2n- 0

afen coomess

Ezé‘:_g: ta

Rxg &asnsgs(575 16 AND 17)

P.OFST= §
.

p:PRaT= 14
.SBTTL

dRsck:

MMT @ ?TS?"PLiufonmnon

PROGRAM DEVICE STATUS REGISTER DEFINITION

BRvPoS= BIT1
000040

DRIVENUMBER

PR
B
DRVHRD= BITH
DRVDSC= BITS

%:5925iy

o Teero

DRIVE STRTUS CHRNGE DID NOT CLEARR

ZREMDO n«su/os RIF 1
ZREMD. P
-JAN-78 11:48
10
000100
1*
00
321
000400
:gw

000

£t
1
3513

002000
004000

g
3221
ggsg

e
040000
100000

NOS

MACY11 3onuosa) 10-JAN-78 12:16 PAGE
??
ROGRAM o:vxcs STATUS REGISTER DEFINITION
CMDTO= BITH
;NO Tsmxm sé"" 70 COMMAND FOR AT
£ rs CHECK
W.WCK= BIT?
-ua ekl
EFmxnsWR
NOCHK= BIT8
i NO
msnnupr ENABLE
PBSVAL= BITS

;

|
SR SEQUENCE
i on
mgnfiaxu
:ATTEN
Scs n%FFAULT RESET

DRPDRV= BIT10
NODSC= sfru

s
s
@.INIT=
BITIH
DTBAII= BITIS

4wgl.
9“
: INHIBIT

e éo
im xnmmxon UE

,Egg

.SBTTL

PARAMETERS PASSED FROM DRIVER TO PROGRAM

;

me rou.oumc DEFINITIONS RRE

000016

P.CSl=

00002
oooogqa

pIgTc:
;Z 2Rsor; &gg

3238
3239
3240
3241
3242
gaua

000040
000042
000044
000046
000050
0052

P.A00=
P.B00=
P.A0I=
P.BOl=
P.AlI0=
P.B10=

3548
gfiz

800028
880

bP.EPR?z
Bhde= 22
28

33553

229

geao
B

000020
B

23
ggg
3237

88%35

244

830054

%gg

3251
32
64

3255

002630
31
2235
002

-og

326
3263

3264
3265

85234
%gg

,
0026

002654
002656

000
000
000000
000

000
00

0033

0000
0000

000000
000000

FOR REGISTER RETURNS

M THE DRIVER TO THE CALLING

P.CS2= 2
FEE
A

P.0S= 40
36

’

21'8 TAT

42
44

5
'

% R
}2&REGISTER

;

:
:
;
:

46
S0
&2

GISTER

§ fgEn
s

TE 00
TE 00
TE 01
TE Ol
er 10
YTE 10

YTE 11

s:g
TRFORMATION
EGS
‘:5« INFORMATION

.SBTTL

PARAMETER BLOCK 0O FOR DRIVE

PARMO:

.BYTE
'BYTE
WORD
'BYTE

O
O
O
O

,oaxvs NUMBER
;
; YH
i
s

O
O

IOFFSET VAL
:

'BYTE

BYTE
'BYTE

TAT

P.All= 54
"

;

;cm ?fi T ws”fiscxsrsn 1

"WORD
"WORD

O
O

:BUS ADDRESS
REGISTER
iDESIRED TRACK AND SECTOR REGISTER

e
: WORD co&r

( grg

0 - 15)

8O
O
O

BITS

’5853
CWORD

"WORD
"WORD

% 3 16 AND 17)

L%ngg;r)mnou

TATUS REGISTER 2
GISTER

SEQ 0344
SEQ 0065

R
223

L
L
L
L

L
L
L

TAT

g STAT

P I# ON

YTE

[l
o—o—b-t-oog
= [ = (==

OUVLILVIINUVIND

CMMMAMMmMm uim

T
HE%
;

FonD
" pam

ié TORfErREGISTER

=4 3

i
= pur}eI

DOODECD

——

00000000000000

o go
Bvit
§ 1aTie
g gTRTg ?TE

Hic iy

unim

CYLINDER REGISTER
Ogl
n
Y/OFFSET REGISTER

L
L
L

B8
A

TATUS
STAT
STAT

BYTE
00
YTE 00
YTE Ol

LR
L g TRTH? gYTE 10
L
TATUS BYTE 11

:
TATUS BYTE 11
;ECC P ; ON
I
;ECC PATTERN INFORMATION

.SBTTL

TEMPORARY CONTROLLER REGISTER STORAGE

T.CS1:

. WORD

T.CSe:

. WORD

T.UWCR:
T.BA:
T.DA:

E
1=
0
L=

0000000000000 0000000000000000D

;DRI
’

o000
O O

S onse

.‘l\‘lb

}

Y
o

Siidsiee % S

PARM1
:

SEQ_034S
SE
0066

0
;ECC PATTE RN INFORMATION

PARAMETER BLOCK 1 FOR DRIVE

n
N

.SBTTL

SRR
5
888 8 8
888 8 8
ofE B 8

DONCNEWNN-0O

Wwww

o—o—o—o—o—o—o—o—gv- 9584SoRsE R
B guwuuuuwu

DI
)

VL R
nEWR e

FUVTSA i3
8

MDO RK611-/06 SS VERIF 1
.P11
10-JAN-78 11:48

BO6

12:16_PRGE 67
10-JAN-78
ARAMETER BLOCK O FOR DRIVE

MACY11 3QQ(1052)

; TEMPORARY STORAGE FOR COMMAND AND STATUS

._REGIST
;
ETEHPORR?Y
S%ORRGE FOR COMMAND AND STATUS
;
TEMPORARY S$0RRGE FOR WORD COUNT REGISTER

; TEMPORARY STORAGE FOR BUS ADDRESS REGISTER
; TEMPORARY STORAGE FOR DISK TRACK AND SECTOR

- WORD
.WORD

. WORD

00000000

gy
o
o [
i

e [

o £N -

- WORD
- WO

- WO

- WORD

; TEMPORARY STORAGE FOR DRIVE CYLINDER

; TEMPORARY

STORAGE FOR ATTENTION SUMMARY

TEEomey Homos
£on
SR T,
SOISIER. roren
U
1

THESEY

;;smomn; 5;% FOR ngéuEmncg"SI3TER§
{ TEMPORARY STORAGE
; TEMPORARY

FOR EGE

PATIERN

STORAGE FOR DATA BUFFER REGISTER

DRIVER PARAMERTERS

c*ggs ADDRESS BLOCK

177440
ell

HngFsgflug§IVER

ggn

als

mmmmmm

D;D
NOT CLEAR ERROR
REG
o mE
,nc
NTIAL ONLY)
NT

'm
su

r WITH cu:nn

mmmmmm
O

m om NOT CLEAR DRIVE

.fif‘m
tET*HE OUT (QUEUED ONLY)
HULTIPL DRIVE SELEC
mmtren

CTED

NE
VER SERVICING

ocx OF THE DRIVE

—

R MI ?seconoxggm
ifflogl
16 MICssc5w9
OR PROGRAM OF DRIVE
[

.
.

—

MTIN:
LMILI:

SEQSESq8067 |

- 3?%&83% EBNTROC(ER AEG1EreR"SFoRRce

9 ORSRR :

RIF 1
CZR6MDO RK&II/OS-?EN
-78 11:48
CZREMD.P11

/45

400

CZR6MDO RK611-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

10-JAN-78
DRIVER PARAMERTERS

MACY1l 30A(10S2)

.WORD

W.B8SEC:

10
11

0026

l‘l’l
JUU

358888 88

£
—

ZEVRRZEREEYRREBATES o

000
000

ovss&ssss*fewT o

5,4,10

IN
RSR&’00? RELEASED COMMAND ISSUED
DRIVES BEING WATCH-DOG TIMED

.SBTTL

INTERRUPT MASKS

INTMSK:

.BYTE

INTERRUPT MASK TABLE

YTE

.BYT
.BYT
.BYT
.BYT
YT
.BYT
.BYTE

;ITERRUET nASK E0R

DRIVE

INTERRLET
ASK FOR GRIVE3
INTERRLET
RS FOR
FoR DRIVE S
;INTERRI.PT

4
10
20

Y
1
200

; INTERRUPT MASK FOR DRIVE 7

.SBTTL

PARAMETER BLOCK TARBLE

PBLKT:

PARMO

; ADDRESS OF PARAMETER BLOCK GIVEN WITH
MUST BE LORDED INTO PBLKT
;DRIVE CALL.

TIME FOR WATCH-DOG TIMER
NSTRUCTION IN PARAMETER BLOCK

. PRYE QPECI e — VE°L§§ gnxnoxc DEFLT OR PARAM MODE
lTfi?2575 IF = 1
ot
itk
I “°$8

OPCOMP:
oggs:

.BYT
] vrg

0
0

.BYT
.BYT
.az;g

DOTIM:

.BYTE

000

DULACS::

.E¥¥e

000

WCEFLG:

.BYTE

Doc

; INTERRUPT MASKS FOR DRIVE IN PARAMETER BLOCK

TYPFMT:
FORMAT:
:Rncg;E

D0¢

SEQ_0347
SEQ 00e8

ECOND COWT COUNT FOR ALL COMMANDS

.BYTE

I1.DRV:

PAGE 69

300

W.TIME:

SBTTL
0000

.BYT

|
H.HEAD:
BYTE

i
8031

010

(=]

o4
0s
06
07

1
1

nn—--000

004

(S etetefetedetetetetetwetedetetet
et —

3433

W.SEC:

HBR:C%: (WBRB

R
R sg 8

oy Y
PEEEP
RORBRRIRUNOS D NN
£ WO 389

3378

12:16

e 8
g
CLKF: IBYTE 8

XO¥EVB: (BVTE

8:15532 ‘BYT

8
8
O

ETE FLAG

FORMAT CONTROL
IN BIT 4 OF
BYTE

)X‘g ig
ggsvé BLY OVERLRID
UE EYOnnSR PORT
.-1I%ERT%&V&??E&
HRITE CHECK ERROR FLAG

CZREMDO RKB11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
3434
3435
3
37

003142
903143
3144
003145

000
000
000
000

3440

003147

000

3438 ooaie
3441
3442

Y44

000

000001
000002
10

3445

000020

EOB

MACY11l 30A(10S52)
10-JAN-78
12:16
PAGE 70
PROGRAM SPECIFIC RESERVED LOCATIONS

DLTFLG:
NORTRY:
uB
:

.BYTE
.BYT
.BYT

nema?: .BYT

NoTYPE.
(BYIE
uuosu:axrg
vrnosu:axré
.

O
0
0

uconsuzgn
RCDASW=BIT3

ORE

SEQ 0348
SEQ 0069

;DATA LATE ERROR FLAG
:*"NO-RETRY” FLAG
;UN%
MAP
gSNT IF = %

iSET ON
BYTE nonvmsw
= |
NO 'énnons
ABOR

;

ST
CRTES
,ua'%g
; VERIFY

PROGRAN
JUST LOMOED
IF O
'n”cf
gsmugux
CH
HEADERS
SWITCH

:WRITE CHECK
{READ CHECK

=axE~4

DATA SWITCH
DATA SWITCH

;OFFSET REQUIRED SWITCH

s e
s ot ot
et
s o Bt Pt
Pt

2P
AL

3449
3450

NSFE RERENS

LKS:
PKS:
PKSB:

.WORD
.WORD
.WORD

chgz
%
LCVEC: .
PCVEC:
.WORD
MEMVEC=114
TCON.?:

TCONHI:

BLWMIN:

LWORD

.WO

ABVMX1: .WORD
ABVMX2: .WORD

177546
172540
172542

172544
100
104

;KHll:k CLOCK STAT
iKW11-P
CON
IKW11-P

IKW11-P
;xuu-b
TKW11I ME
;L?

O
O

: COUNT
: COUNT

:LO

T
T

BIT

T
1

g
T

IBRA

“B{:

FORWAR
REVEF

RHAR

sun.gx: - WORD

2UNRTS: ‘HORD
gnwg:
. WORD

O
8

MAXIL1:

.WORD

:
ACT:
CMD:

.&KH
.BLKW
.WORD

tD256
1D256
0,0,0,0,0,0

COMSTR:

.WORD

0,0,0,0,0,0

; CURRENT COMMAND STORAGE

PRMPLO:

.uong

;PREV. U.B. MAP REG O

CRMPLO:

.flono

; CURRENT U.B. MAP REG O

SUMHI1:

uug%

RINICT:
niuim: (HORD
- WO

MAXIHL: .
H}NL:.
MINIHS: .
MAXIL2: .WO
MAXIHS: .WO

BUFFO:
.aucut
LOWOCT: .WORD
ngsrBUFPRT:
RECODE:
ERRCOM:

uo:g
.WO

.WORD
.WORD

0
0

D66

O
O

iHI

BIT

RWAR

REVEF
FOR PAR

1LY B
:

PeRRTTe
ge
EH?
ft
MIN
:LO
BITS OF

;ns
iL
i
L
H

‘D

r&gmx
T
MIN
1S OF MIN
T 8:_
T
MAX

;
c%
:REC
iPREVI

'‘DT
0 TIME

(F
(roaumc""lg))

(FORWARD)

'D T
(F
'D
TIME (
'D T
(
DT
(
'D T
(
¢

D)
RSE )
RSE)
RSE
)
RSE )

F
SOF TWARE
FROM FRCTORY

;OUTPUT
BUFFER 1
:LOW 16 BITS OF CONVERTED BINARY NUMBER

THIGH sx Pg OF sonv:mso BINARY NO.
:BUFFE
INTE
:RECOVERY CODE WORD
:ERROR COMMAND

o
nLw

KRR

MACY11 30261052)
10-JAN-78
12:16
PAGE 71
PROGRAM SPECIFIC RESERVED LOCATIONS

gggnon:

SEQ 0349
SEQ 0070

STALLS: .HBHS

:NO.

LS:

'ESRD

Zuosg

ggunngnr c;L "°§§ ;unac

DEIROS: CHORD

gflzx; cYL ggnggn WORD

;gfi’r‘ss? N

0
8
0
5

gnuv
;HEu
i Ot
sg?mn
i X
1(+) OFF

JWORD

5L3§§ sEE$

INTChR:
©
8
Lgfiég 25338 g

WON: IE§§§
BRIRN. XXDPAD: :%
XDPSAY: .BLKW
PLOFST: .WORD
FINCYL:
FINTRK:
FINSEC:
LASTWC:

PMA:

.WORD
.gvr
.BYTE
.
WO

‘BLKW

oaxxs IN gs:

UNIT S

LS TO APPLY

L nx‘

Al Eagfigi

NevPRS. HokN o3

uos&#iE ZEBRD

: CURRENT NO.

——"
O-SELECTED DRIVE NO.
DRIVE WAS ON-LINE
DI

DRIVE:

gg;tég

Ve INTTL vnfiggnns
FOR
ACTUALLY X

:NO. o}

O
0
O
0

IFINAL ngxuoen ADRS
;F*NRL
K “2539
‘FINAL SECTOR
;ncr¥aL r;nnL WC

‘PARTIAL

-Lssr OF DESIRED DRIVES TO TEST (IF BYTE=0, DON’T TEST DRIVE)

NEWNN—-0ON

RARARARRs
A

CZR6MDO ?K&lx/ 06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

0
1
1
1
1
1
1

0ol
001
001
001
001
001

ORVLST

.BYTE

.a¥;§

i
Ia¥;
ZSYTE

001
001

533§§§ 1

i
1

EE§¥3§ S
; §3E 9

:LIST OF DRIVE TYPES

OTYLST:

YIE
YT
YT

O
8

:DRIVE

g 2

0=RKOG&,

NON 0=RKO?
DRV 0
; DRV é
; DRV

'BYTE
'BYTE
.gvr

O
O
0

DRV 3
DRV H
DRV 5

BYTE

DRV 7

;DRV &

:LIST OF ITERATION COUNTS FOR DESIRED TESTS (IF=0

00Sez2e

isrfé?9" ALLOWABLE NUMBER OF ITERATIONS = 77776 (OC

;EST NOT RUN)

mo n«su/

CZR&MD

VERIF 1

10-JAN-78 11:48

u’
H

MACY11 30A(1052)

.WORD

ggw

1
6

1
010

000001

3564

g;
assg % %10
ggn
76 10
3573

£z
3591

gggs

?,?E,

:TEST 04
:TEST 0S

.WORD

0010

000021
0D0S732

732

;3'0

005754

)

400

500

2
1
1
1
1
10
10

:TEST 03

:TEST 06

:TEST 07

:TEST 10
(TEST 11

:TEST 12
:TEST 13
(TEST 14
:TEST 1S
PTEST 16
:TEST 17
:TEST 20

{TEST 21

HTEST 03
.

WORD
WORD
WORD
WORD
WORD

@
2
40O
SO0
2

:TEST 0B
:TEST 07
:TEST 10
(TEST 11
:TEST 12

WORD

PTEST 17

e
ORD
WORD

000010
000001

.WORD
CWORD

1
1
1

10
1

NMTSTS=<DFLTST-TSTLST> /2

e 0
i:TEST
TEST 16
15

:TEST 20
ITEST 21

; TOTAL NO. OF AUTOMATIC TESTS

opeammc PARAMETER LIST

000000

3529 005742
35
gggm 000001
3598
7
000
3599 Q05
000023
3600
752 000000
3601

HoRD 10

3?35

%23

. WO
- WO

blF.E%TOF DEFAULT ITERATION COUNTS FOR ALL TESTS
WORD 10
; TEST 01
WORD 10
51557 o4
WORD
2
:TEST 0S

005726
005730

; TEST 01

:TEST 02

.WORD

£
Rl
feo
3580
005723
000001
§S$
%7
ggoom
3583
3584

200

.WORD
.WORD
CWORD
.uoag
. WOR
.WORD
.WORD

PAGE 72

.WORD

S
355;
gg

GO6

12:16

PROGRAM SPECIFIC RESERVED LOCATIONS

357
ggm
75
35;;
35

10-JAN-78

000025

PRMLST

FC:

Lg:

57:

LT:
IT:
S0:
S1:
S2:
83:

58',30

- WOR

.WORD
CWORD
WORD
WORD
WORD
.WORD

2
I
O
23
O
25

;FIRST CYLINDER

cnsr cvkmggge "gag FOR RKOB, 1456 FOR RKO7

rxk§'r‘°§nnéx

; nsr TRACK
gg Rg
rmsr
c R xr 20(DEC) SECTOR FMT
.Lns SECTOR IF 20(DEC) SECTOR
:FIRST SECTOR IF 22(DEC) SECTOR FMT
:LAST SECTOR IF 22(DEC) SECTOR FMT

SEQ 03s0

SEQ 0071

CZREMDO RK611-/06 SS VERIF

10-JAN-78 11:48

7% S0
garks B
s 02

e b

NN LW

s e

it FEERREEi

CZREMD.P11

776

HOG

MACY11l 30A(1052)
10-JAN-78
12:16
PAGE 73
PROGRAM SPECIFIC RESERVED LOCATIONS

1S:

:;:
WC:

CcS:
ST:
SM:

.WORD

.5050

guaus

CWORD
.WORD
.WORD

O
O
1000

WOk
8403
.WORD

;SECTOR INCREME

:DATA PATTERN
SE

SEQ_03s1
SEQ 0072

u?
BIrESfim&uc-o
n"e : WRD
ABSRCNT(I
? SL é‘

con ROL
SWIT
:NUMBER OF UNIT STRLLS
‘MAX. STALLS, TEST 11

-DEFAULT OPERATING PARAMETER VALUES

PRDFLT:

. WORD
- WOR

;FC gEFRULT
:LC
DEFAULT

WORD
.MORD
-WOR
- WO
.WORD
.WORD
.WORD
CWORD
"
.WORD

O
2
6
23
O
25
I
0
RWBUF

iFT DEFAULT
;LT
DEFAULT
:IT
DEFAULT
;
FAULT
:S1 DEFAULT
;
FAULT
; g
FAULT
;
FAULT
:PT DEFAULT
:LOW MA (0-15) DEFAULT

O
1000

:S
FAULT
:SM DEFAULT

.uong

WORD
WORD
WORD

.WORD
.WORD

O
403
O

:IC DEFAULT

‘HIGH MA (16-21) DEFAULT
:WC DEFAULT
;c§ 8EFRULT

popsixammc PARAMETER VALUE LOW AND HIGH LIMITS
LMORD

;FC LIMITS

WORD
WORD
CWORD
CWORD

O
O
I
O

:LC LIMITS

-WOR
WORD
.WORD

z
O
2

-WOR

.WORD

WORD

- WO

.uong
- WORD
WORD
.uong
-WOR

000001

WORD
WORD
WORD

O
Sa
O
25
I

;I1C LIMITS

;FT LIMITS
;LT LIMITS

;IT LIMITS
;S0 LIMITS
;81 LIMITS

;52 LIMITS
:S3 LIMITS

;IS LIMITS

MAHILM:

N
VUV U
e s Be b=

;PT LIMITS

.5828

BHBUF

;MA LOWER LIMIT

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.HORS
. WOR
.WORD
.WORD

187776
77
O
177777
O
000070
0
177777
O
177777

;MA UPPER LIMIT

177777

.ASCII
.ASCI
.ASCI
.ASCI
.ASCI
.ASCII
.ASCI

;CS LIMITS
;ST LIMITS
;SM LIMITS

.RSCi

.ASC
.ASCI
.ASCI
.ASCI
.ASCII

.WORD

.ASCI
.ASCI
.ASCI
.ASCII

/FC/
7LC/
71Cs
/F1/
/LT/
/1T,
/7S0/

/S1l/

/Se/
7837
718/
/PT/
/MA/

/WC/
/CS/
/ST/s
/SM/

:DATA PATTERN 0O
HI-LO FREQ.
:

PATOOD:

;WC LIMITS

:ASCII PARAMETER MNEMONICS

PRMNEM:

Rn
—

.WORD

. WORD

N
~

[

—

.WORD

WWWwwe—
L

—

106

MACY11 30A(10S2)
10-JAN-78
12:16 PAGE 74
PROGRAM SPECIFIC RESERVED LOCATIONS

Eho

ANSFEREFLRR

BF ERSRERERENS2

—

CEECERCvsirienee FRRRRRORe
BoRRIz
1 &4 o4

—

P A

FEEEEERRE
REARR PR
LEUEERRREERRR
RO
BB IRAEDN

-4

Y&o 83
&

OO0

WWWWWWWWWW W
NNNNNNNNN NN

IF 1
11:48

0S252s5

MIX

; TRBLE FILLER FOR MA

SEQ 0352
SEQ 0073

714
715
719
71
718
719
7

SEQ_03S3
SEQ 0074

177252

006246
00&e

JOb

PAGE 75
12:16
10-JAN-78
PROGRAM SPECIFIC RESERVED LOCATIONS

MACY11l 30A(10S52)

172785

; DATA PflTTERN 01
HI FREQ. PHASE MIX

PaTo1:

\J\l\l\l'\.l’g WWWWWWWwWwWWwWwWwww
NNNNNNN
R=EBBNFRENNNB
WM

CZREMDO RK&11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

0009200
177777

;DATA PATTERN 02
LO FREQ. PHARSE MIX

0 G G W W W

EIEIPHes

W L) W W W L)W)

PaTo2:

133333
Obebbb

PaTo3

PHASE MIX

133333
0e6bEb

— —

3768
3768

006356
006356
006360

;DATA PATTERN 03
AX. PRECOMP.

KOG

MINTATA

MACY11l 30A(10S2)
10-JAN-78
12:16
PAGE 76
PROGRAM SPECIFIC RESERVED LOCATIONS

d&!d

Pt bt s Pt Pt Pt Pt Pt P

§(d(d(_'

CZR6MDO RK611/06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

¥P

(V]

381
3811
3815

PaTou:

n
£

LELLELLLEL

Seii2H2
38333sEReeREEees
R

;DARTA PATTERN 04

006456
006

ROTATING BOUNDARY PULSE PRECOMP.
121105

042213

:DATA PRTT;RN 0S
RO ATING CELL PULSE PRECOMP.

PATOS:

%ii e
38

3824
3825

(T}

SO4
006506
006510

R
B oRwe
L—onwon

20 2
3 B

SEQ_03S4

SEQ 0075

e
s
i

LO6

12:16
MACY1l 30A(10S2)
10-JAN -78
PAGE
7
PROGRAM SPECIFIC RESERVED LOCRTIONS

SEQ_03sS

(gTe]

CZREMDO RKB11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

SEQ@ 0076

438152

Boeis O38TS2

;:DATA PflTTERN 06
PaToe:

L ZERO S

000000
000000
000000
000000

000000
000000

000000
oooooo

000 0
00000

:DATA PATTERN 07
ALL ONES

1772777

;DATA PATT

PaTos: EFTEE

IN FIELD OF ZEROS

000040

g
5
8

B B
8

guwe @ B8
N&
28\3\3 ~
Alun

SR
L

PaTo7:

MACY11l

10-JAN-78
12:16
PAGE 78
PROGRAM SPECIFIC RESERVED LOCATIONS

30A(10S2)

000100

010000

;DATA PATTERN 09
SHIFTED O IN FIELD OF ONES

baToa:

753
17777

Bt ot s e

DO
N LW -

SRR
5
R

CZR6MDO RKb11-06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

—ee

v
SRR

PAT10:

RRne

Ssasesnne

e Be B

;DATA Pfl;{%flfl 1 0
ERNATING 0O-1

0Sese
0S2s2s

SEQ_03S6
SEQ 0077

NOB

MACY11 309(1052)
10-JAN-78
12:16
PAGE 79
ROGRAM SPECIFIC RESERVED LOCRTIONS
:DATA PATTERN 11
ALTERNATING 1-0

PaT11:

;DATA PATTERN 12
SHIFTING ZEROS AND ONES

PaT12:

177777

107351

e
T

72307

—

PAT13:

Or—[0
W~

gm
6

O
[0

177777

— Pngsfiggsx¥5 ROTATING

007056

8
S9N
o
3
2 3§§8§
£

DD
DO

82L R R

CZREMDO RKB11/06 SS VERIF 1
CZREMC.P11
10-JAN-78 11:48

SEQ_0357
SEQ 0078

CZR6MDO_RK611/06 SS VERIF 1

CZREMD.P11

3994

10-JAN-78 11:48

MACY1l 30A(1052)

10-JAN-78

43S64

046167

4000

151453

71149

SEQ _03s8

SEQ 0079

it
i

ggg 71% 6‘0616
:001

PAGE 80

1435a4

87112

12:16

PROGRAM SPECIFIC RESERVED LOCATIONS

S8
i
A%t
007110

BO?7

123073

151453
164616

164616

400

4004
400S

:DATA PATTERN 14
PSEUDO-RANDOM (COMPUTED BY PROGRAM)

4007

007116

4009

0071

WORD

71
0071
%71
71

WORD
WORD
WORD
WORD

4008

4010

4011

4012
4013
4014
4015

'0819
401

PAT1Y:

00711

122
7124

WORD

813
gl
3351
%é
71
uoas 007154

0
> 5353
. WORD
_WORD

4024
4025

:859 0071
0071
Y

Y4
Y4
4031
wggg
Y

0071
0071
%1&4
i%
007

4335

%;17-4

4034

135143
156461
167230
3514
646

'U%ER-DEFIMD CATA PATTERN 15
PATIS
072307

135143
156461
167230
073514
035646

; WORD 00
:WORD 01
:WORD 02
:WORD 03
:WORD 04
:WORD 0S

107351

;WORD 07

016723

4037 wa@ 061672

061672

4039
4040

114356
0%1?7

114356
046167

057467
000000

MINLO1=$D24375
MINHI1=0

4036

4038
YoMl
4o42
4043
4O44

404
4048

4049

007172

007202

007204
007
00721
007212
0072149

107351

143564

030735
1530 3
151453
164616

062031

143564

030735
123073
151453
164616

MAXLO1=1D25625

:WORD 06

(WORD 11

;WORD 10
{WORD

{WORD
i WORD
;WORD

15
16
17

;WORD 13
:WORD 14

;LO BITS OF SPEC’D MIN ROT. LATENCY
:HI BITS OF SPEC’D MIN ROT. LATENCY

:LO BITS OF SPEC’D MAX ROT. LATENCY

CZR6MDO RKB11-06 SS VERIF 1
10-JAN-78 11:
CZR6MD .P11
4050
¥

cO?

obATTONS
L
L UMD ol O RBseATEd

000000

MAXHI1=0

000000
OO

MAXLO2: .WORD

405
4

007216
007220

112160

;HI BITS OF SPEC’D m;c‘ nor;f um:nc;

000000

087884

SEQS asabeo

: LOAD rn@n NEHF%VE ROtJ}‘xmnelmeE

_
FR-HIT:{E OF ngc' ?nx 410 CYL SEEK TIME
't%g FROM :SHORT
T RANDOM SEEKST =E1500¢(10)

5”9’“5*72
&E%B
MAX
AVG SEEK TIME
iHI
BIT
C’D
MAX AVG SEEK TIME
:LO BITS

OF SPEC’D MAX 410 CYL SEEK TIME

; 2$$

5&. GNMENT

% ERROR

SEEKS = 7500(10)

CYLINDER =245(10)

509; EW

5ufi‘f7§ BRECK ERROR
1 NBVEL TWO

ME OUT

PORT
ReL Eo By OTHER
R0 &#figrgo
Ok
ERNYVERRSR
LAG

RCLREQG=81

ANVOLR=B1

<15><12> /CZR6EMDO/

DZR6&M:
XXDPMG:

ERROR

<CR><LF>/CHANGE XXDP PACK~/

¢CR><LF>/CLEAR LOC 40,RESTART PROGRAM/

SUBVER:

.ASCIZ

RZOR

[Soy Sy

PGRTé: .ASC g
020115
020075

PART1:

.ASC

LSTMEM:

.ASCI

8 - RKB11/RKOB-RKO? SUBSYSTEM VERIFICATION : PART &

/é/<15><1s>
/se/<1s 1>

15><¢12><12>/LAST PHYS MEM ADR = ~/

10064
010071
010076

120
021040

0O4eSe2
047503

(Y OR N)

* /
|

PRMINP:

.ASCIZ

(15><12>/PARAM

INPUT MODE/<15><¢12><¢12>

RKBADR:

.ASCIZ

/RK06-07 BUS ADR

RKVADR:

.ASCIZ

/RK06-07 VEC ADR

RKPRTY:

.RSCIZ

/RK06-07 PRIOR =/

SWRMSG:

.ASCIZ

/SWR = 7

NEWMSG:

.ASCIZ

DRVSEQ:

.ASCIZ

<15>¢<12>/DRV(S) = 7/

.ASCIZ

/DRIVE

NXDRIV:

.ASCIZ

/NON-EXIST/<15><12>

NTREDY:

.ASCIZ

/NOT RDY/Z<1S>¢12>

WRTLOK:

.ASCIZ

<12
/WRT=-LOCK/<1S>

ALNPAK:

.ASCIZ

/LOADED WITH ALIGN PACK/<1S><12>

REPLPK:

.ASCIZ

7IF XXDP PACK ON DRV O,

NODRTS:

.RASCII

(1SX<12><12>7%% NO DRVS TO TEST/<1S><12>

CNTRDY:

.ASCIZ

/PRESS "CONT"TM WHEN RDY/<15><12>

NEW = 7/

TYPE "Y <«CR>",

:
TR

0sel11l

-uno
— Y —
own

EOENE
OO0
£

/OVERLAY LOADER

28e8

030131 OuiazY

10016
1

{0010
1

Ll
ol

&228
W

.ASCIZ

Pt
P
e

127

g2—

—
P

0s4a04

OVLODR:

027
020
020122

£ w0
SBBIFRLORCE 55 S5F 0 £S5 38 YRR ZBRLE BBYFR RN B o0

Bt s Bt s Bt Bt Bt et ot ot ot ot (ot et s ot Bt ot s s Pt s B

Q46122

042526

117

5083081

007443

ot Pt ot s P ot s et s Bt s P

LLfLfLrrfrrLrrrrrrLrrrrrsrLsrLLrrLrLrrLrLLLLLLL
LL

Lk
s Bt ot ot Pt s Pt s Pt s Pt s s Pt s Pt Pt
[

389

4106

10-JAN-78
12:16
PAGE 82
PROGRAM SPECIFIC RESERVED LOCATIONS

MACY11l 30A(10S2)

CZR6MDO RK611/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

REPLACE

CZREMDO RKE11-/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48
4162

:%23

010104

{i
]

Hss

4168

0101

tug?

101
]

020042

1040
LU

DS 1g

4504

005015

DS1S11

BiBIR
ii

GRRLS
0

[ ]S

417
4174

10
010

DYE
0%

]

1'{0
8:051

D20

41
-ufi

1
1

D46 108
DS 1 103

0
12

-:;,-j-

7S5

:fa

}

150¢

]

'4109

1508

41
4l
41
41

41
41

1
1
1
1
1

i
10910

41
1

40l

420

Qiouiz

16%

]

5250

pe1aC

Ouel

[]

406
:%
4508

O
1
010213

:gig

744

421

1054

4514

4216

010562

421

:g%g

4217

{gg 4

010570

L.ASCIZ

/1 = INPUT PARAMS,

RUN TESTS/<15>¢12>

ENTLCI:

.ASCIZ

<15>¢12>/ENTER L,C,

OR I/<1S)><12>/% /

DFTEST:

.ASCIZ

~/TO DEFAULT TESTS TYPE D <CR>,

.ASCII /C = CHANGE TESTS/<15>¢12>

ELSE <CR>/<¢15><12>/% /

[

DS 1 103

<15><12>/L = LIST TESTS/<15>¢12>

DSO1

4583
dcod

.ASCII

l?"':‘}

TSTMDS:

—

41
ot

020103
]

U—

SRRLO02838

DO0O0O4C

DROXDP: .ASCIZ /DRV O IS LOAD MEDIUM/<15>¢12>

0414

:{é i
41

/HALT REQ/<15>¢12>

.ASCIZ

104
131

01C
1

HLTRGD:

i
7% ALDRVS: .ASCIZ <15>¢12><12>/T0 TEST ALL DRVS TYPE "R"TM <CR>, ELSE <CR>/<1S5>¢12>/% /

4175

tu;;

SEG 0361
SEQ 0082

04710S

= s

s
3}%

]

gtua?

EO?

MACY1l 30A(1052)
10-JAN-78
12:16
PAGE 83
PROGRAM SPECIFIC RESERVED LOCATIONS

)OS

123 TLSTHD: .ASCIZ <15>¢12>/TEST

3
1

2523

4S04

46101

ITERATIONS/<15>¢12>

EXPLAN: .ASCII <15>¢12>/T = TYPE PARAM LIST/<15>¢12>
.ASCII
b

ASCII

/0 = OPEN PARAM LIST/<15> 12>
/9

S = SET INDIVIDUAL PARAM/<1S><12>
=

CZR6MDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
HSIS

42
Ye

1060€
106

421

S004C

1060

45535

Q10¢

l{:l

4
4e2s
4
4

psesa2
0s2123

252y

.ASCIZ

<15><12>/ENTER T1,0,S,

106
106

052504
1117

DURCES:

.ASCIZ

<15><12>/% DUAL-PORT DATA TEST */<1S>¢12>

1e4
MAWRDC:

.ASCIZ

/MAX WORD CT = 7

SECNL1:

.ASCII

/%%

NOTALD:

.ASCIZ

/7 NOT ALLOWED/<15><12>

SECNL2:

.ASCIZ

/%%

S2>S3/

TRKNLW:

.ASCIZ

/%%

FDLT/

WC2BIG:

.ASCIZ

/%%

WC OR MA TOO LARGE/<15>¢<12>

3&35

DFQUES:

.RSCIZ

/T0 DEFAULT ALL PARAMS,

1105

PFIFTN:

.ASCIZ

(15><12>7USER-DEF PATT 18 :/<15<12>

8261

SELP1S:

.ASCIZ

(15><12>/7MOD PATT 158 : /<15 <12

04751S

MDFY1S:

.RSC1Z

/TO MOD PATT 15,

124

0S144

cBg

1
1

TYPE D <CR>,

ELSE <CR>/<1S><¢12>/% /

00s015

240

§§gé§§ 8%201o4

83?183 0064
000040

gle
1

noLuno

T
3%

(=]

Bt e s B B

SO>S1l/

RBNTAEA

et Pt ot et et s et Bt
Bt Bt Bt (s s et Bt Bt Bt B

114
i 6

e Bt B

s S L

SLLLrrrrLrrrrrrLrrrrrLLsr £

&85
B

4234

4273

OR R/<1S><12>

PARMDE:

7527

:S?l

/R = RUN TESTS/<15><12>

825117
020122

)

4e7e

.ASCIZ

10¢
106

4eb4
4265

SEQ_03&2
SEQ 0083

046501

c‘.

]

FO7

PAGE 84
12:16
10-JAN-78
MACY11 30A(10S2)
PROGRAM SPECIFIC RESERVED LOCATIONS

TYPE M <CR>, ELSE <CR>/7¢1S><12>/% /

CZR6MDO RK611-/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48
4274

GO?7

MACY1l 30A(1052)
10-JAN-78
12:16 PAGE B85S
PROGRAM SPECIFIC RESERVED LOCATIONS

ENTPAS:

.ASCIZ

<15><12>/ENTER NO. OF PASSES (1-77777)

DROPDR:

.ASCIZ

<15><12>/%#%

%‘2 826167

TSTORN:

.ASCII

<15><12><12>/TESTING DRV /

DRVNO:
DRIV:

CART:

.ASCI
.ASCI

.ASCIZ

/ /<1 <12>
/DRV /
/CART. /

Y
4300

RIS

ey Y

e S S
e ey T Sy Sy g

:is

44y
450

11877

4308
L

3398
431

4311
L 13
431
4314
4315

glfl
e
1101

H?E

e e O

8&&&&§§

| ol ot ol ol ond snd ond ondand ond snd ond nd el el el el ad o ol o ol oy ol e

0000000000000 0000000000

Y el

[ gusyuns

i HisE 2 ERl
% R B

4S9e

000

Bisny oeofff
11315

011520
11

046S11

11
11 gs
11

:gig

oiisss

:320

11604

55052363

DROPPING DRV - 20 ERRORS/<1S>¢12>

1
0S1101

000
027124

mme
1

0‘070'00“

SERNM:

.ASCIZ

/SER. NO.

fl%g

FACTBS:

.ASCIZ

<«15>¢12>/FACTORY /

10S
104

2523

BDSECT:

.ASCIZ

/BAD SECTORS :/¢<1S

SOFTBS: .ASCII <12>/SOFTWARE 7/

12>

042516 NOFALS: .ASCIZ 7 NONE/

85208

8:72'49

?115
12

020107
638

:MESSAGES USED IN TIMING TESTS

NOCLKS:

.ASCII

/%%

NO CLOCK/

CLKFAL:

.ASCIZ

/%»

KWll FARILURE/

Cleid
Gils
020055 0S2040 TIMSKP: .ASCIZ - - TIMING TESTS WILL BE SKIPPED/¢<15><12>
Y
3

lié

05351?

. %
Hgig gligg g%iig fil 1 0s2ll
ROTIMS: .ASCIZ <15>¢12>/ROT TIMES :/<15X<12>
%)

ugié
432

“gs;
11

0s1

11640

0064

4324

011632

wgsg

ugw

4325
L

4328
4329

11652

011660
011666

044524
Y

045505
0S1505

:/¢1S><12>/% /

042515

1‘9

114

035040

051§§§

o043
AVGSEK: .ASCIZ <15>¢12>/AVG SEEK TIMES :/<1S><12>
020113
020123

égg
046511
00S01S

ONECYL:

.ARSCIZ

<15><12>/0NE CYL SEEK TIMES :/<15><12>

CZR6MDO RKB11-/06 SS VERIF 1

CZR6MD.P11
4330

4331
43

Y443

43
sg

10-JAN-78 11:48

81157’4

800

11675
11

1S
1440

1;;1

i?
117

046412

MACY11l 30A(10S52)

10-JAN-78

12:16

PAGE B6

PROGRAM SPECIFIC RESERVED LOCATIONS

0S4101
020113

MAXSEK:

.ASCIZ

<«15><12>/MAX SEEK TIMES :/«<1S<¢12&>

020123
025122

11538
im @
12 ms

:,.1,

REVRSE:

.RSC

/%%

REV DIR®%/<¢15>¢<12>
1

H?%

i;;g

613

0S4101

036440

MAXEQ@:

.ASC1Z

/7MAX =

:345

iL 774

101

020107

020075

AVGEQ:

.ASCIZ

/AVG =

:gg

BELOW:

.RSCIZ

~ OF 128 BELOW SPEC’D MIN OF ~/

4352
: 2

1
1

ABOVE:

.ASCIZ

~/ OF 128 RABOVE SPEC’D MAX OF -

4351

020116

i
12101

436s
H%S

Qi1
121

H;?

121

:gg

igo

4371
H%?S

12505
§1
o

4374
4375

1
12236

436
43

437

'43;9
43

4378

12194
121

121
1

4383
4384
4385

451

000040
50&;

4101

l% 032

024040

ABOVELl: .ASCII ~ OF 410 (814 FOR RKO7) RABOVE SPEC’D MAX OF 8000 uS~/

Y
1

%fl
1

ABOVE3:

.ASCIZ

/(6500-RK0O7)/<CR><LF>

.ASCII

~ OF 128 ABOVE SPEC'D MAX OF 75000 US~/

.ASCIZ

/(71000-RK0D7)/<CR><LF>

12244
1

3% gé 4

4382

104

12114

000 MICROS: .RSCIZ 7 US~/

043117
1

{

012106

4364
4365

152;

:liél
-

4359

4360

&; 020116 020075 MINEQ: .RSCIZ /MIN = 7/

012306
012314
012322

SEQ 008S
;

020104
FORWRD: .ASCIZ /%%FWD DIR*%/<15<12>
006452

:3‘1%
H:N?

SEQ 0364

SPCDMX: .ASCIZ 7/

SPEC’'D MAX IS 38000(36S00-RK07) US-/<«15><«12>

)

12330
1

006523

33 o

)

0si11

0o0104

G
1

00001

DO(D

Mo
OIes
WE OIEF
H nil
4409
012473

Gid
o8
000040

4412
<441

012476
1

020040

4419

012517

076

.ASCIZ

/24375 US/«15«<12>

LIM2:

.ASCIZ

/25625 US/¢<1S <1

BADBE32:

.ASCIZ

/%%

CNTRLC:
CNTRLZ:
CNTRLR:
CNTRLU:
CNTRLG:
C
:

.RSC}
.RSC
.RSCI
.ASC
I1Z
.A

/tC/<1S <12
/227¢1S> <12
/tR/7<15><12>
7tuz<1S<12>
/%G /<1 <12
<15 <l2><12>

COMMA
SPACEG:
SPACEY:
SPAC g:
:
SPACEL:

uiy BiEGs G gugies
4415
012514
441

DOC

040

012474

:zi?

000

LIML:

000040

PRMBUF:

WORDSP:
EQUALS:
PROMPT:
PRMPSP:

000040

4305
4387

MACY11l 30A(1052)
10-JAN-78
12:16
PAGE
8
PROGRAM SPECIFIC RESERVED LOCRTIONS

3§g§

CZRSHDO RKGII/OS SS VERIF 1
CZR6MD.P
10-JAN-78B 11:48

.ASC

.
.ASCI
.ASCI
'“321
.EVEN
.ARSCI

.RASCI
.ASCI
.ASCIZ
.RSCIZ

CANNOT READ BAD SECTOR TRACK!-/¢1S><12>

>
F il
7
7 7
’ 7
F&
»

/WORD
/ =/
/% /

4418
4419
4420

W4z

::gé 012522 105037 003116

HHE?

012536

Crel=

125

10S037

003136

022737

013732

10503

003126

:358 giasgz g?l 37 017014
:n OlggS“ 00531

DFSTRT: CLRB

000042
000042
003136

003116

DULRC?
ERRCN
SDRVTST, as42

MOV

ONEHPRS,OOHB

BNE

4s:

DASTRT: MOVB

MOVB
BR

Y435

012574

012602

105037

003136

000001

003116

PSTART: MOVB

012606

012737

00034C

177776

CMSTRT: MOV

Y441

Oleel4

012706

001100

::3

112737

CLRB

JSBTTL

MDFLAG

CLRB
CLRB
CMP

;SET FLAG FOR DEFRULT HODE

:CLEAR DUflL-RCCES§
:CLEAR_ERROR_COUN FOR RESTARTS
,SEE IF EOP RE URN ADRS = DRVTST

;BR IF NOT DRVTST

CMSTRT

;

#1,DULACS

SS TURN ADRS
= NEWPRS
PROCEED

;SET FLAG FOR DUAL-ACCESS DATR TEST

8l nganc

;ET anc FOR PARAMETER MODE

%1, MDFLAG

;SET FLAG FOR PARAMETER MODE

opn7hgsps

:BLOCK ALL INTERRUPTS

CMSTRT

DULACS

INITIALIZE THE

;iCLEAR DUAL-ACCESS TEST FLAG

COMMON TAGS

:3CLEAR THE COMMON TAGS (SCMTAG) AREA
MOV
#SCMTAG, RE
:sFIRST LOCATION TO BE CLERRED

SEQ_03&S
SEQ 0086

JO7

Gercoe
1%7“ 001100

MACY1l 30A(1052)
10-JAN-78
12:16
INITIALIZE THE COMMON TAGS

005026

w bs

PAGE 88

CLR
CMP

SM,RS ; ; DONE?

(R6)+

; ;CLEAR MEMORY LOCATION

P 16PTUP THE STACK POINTER

HOV
M

sscopsiac\x’gwsc ;10T VECTOR FOR SCOPE ROUTINE

INITIN TSE A FEbJECY
.

SEQG_03&6
SEQ 0087

$3ERAOR, SuEHTV

LOOP BACK IF NO

ir EV; V;CTOR FOR ERROR ROUTINE
.
i

fi. me.

i §

444z

10-JAN-78 11:48

fi a

CZR6MDO RKB11/06 SS VERIF 1

CZR6MD.P11

VECTOR FOR TRAP CALLS

9eF AW

1 n. IF n?? :

55321

—

BYS:
65S:

MOV
CLR

$PASS

8
[

o
L

—

n
~N

——
BRe8.-.—.-.33

PRAGEISIRLRE

BEQ

gé

ISPLAY

; ;POINT TO SOFTWARE SWR
LEAR PASS COUNT

"ngTuEEER
SI

#SSWREG, SWR

:iNO, USE APT SWITCH REGISTER

ggx

ggeaosnnvsc

:SET TIME-OUT VECTOR

MOVB

#100. ,SERMAX

;SET nnxnsanon CNT TO 100 FOR $SCOPE

TYPE

, DZREM

TYPE PROGRAM I.D. FOR PART 1

MOV

TYP
TYP

?'BRANCH IF NO TIMEOUT
:3SET UP FOR TRAP RETURN

#APTSIZE, SENVM

CLRB
MOVB

39%:

HxESNnas
SWICH REGISTER
Exsanv REGISTER

S;g!thVEC ;;RESTORE ERROR VECTOR

RESET

;fié

MOV

;3 TRY TO
REFERENCE HARDWARE SWR
; ;BRANCH IF NO TIMEOUT TRAP OCCURRED
‘AND
THE
HARDWARE SWR IS NOT = -1

65%
%658, (SP)

MOV

BITB

o
(=)

[etetwatwietetetuwduderes
el

e 5t Dt Bt B

s s Bt Bt et P

WWWWWWWWwWwWwWwWww

Bt Bt ot s s Bt Bt Bt Bt B

000000000000000000000

8
&8

66S%:

BR
ggg

IT IS

c STER.

;:AND A

B
Bt Bt B
Bt s ot ot e

000000

OUNTER
i33 gk or—Pnocann
R OF ITERATIONS
ou Eagn ADDRESS
33
LOGP ABORESS FOR SCOPE
§E?h133

88%3%Y

Bt s

000000

7
s
" PegznFAILURE VECTOR

INCB
ggga

RS
81, HLPOVL
' SUBVER
PART

NOTYPE
oggncs

uuoen APT

T SWITCH

;CLEAR THE UNIBUS

:CLE
OR COUNT FOR cunnenr DRIVE
ssr HLP FILE OVLD INDICTR

;SEE_IF OPERATOR NOTE SHOULD BE TYPED

;BR_IF NOT
:TYPE_OPERATOR NOTE
iSET FLAG FOR NEXT TIME
gsexxr DUAL-ACCESS DATA TEST
NOT
;TYPE "% DUAL-ACCESS DATA TEST »"

28Rz5

——

40S:

000250

177776

&
W

052716

RRZEER

052720

8
ge8

Bisenes
2RE FRtseL
2

—

(=]

000004

&3
78:

000004

8S:

.
000041

001341

MOV

8PR7 , JSMMVEC+2

Igfifiu’ 7 FOR HNDL

SMMVEC ;VECT FOR

Ifi;fiflg
cmvcm,gx

KT11

FRILURE

ATERROPTE
AGATH
c

MOV
MOV
g

%6, RO
égl)+

ngkg“ou!fl'r&sv’f
;
COUNTER
;
A uoEo

BNE
CLR

42s
STALLS

;BR
IF NOT
YET
iDON’T athgu sngb&s YET

JSR

2842, SNEWPARS
(3

:SEE IF
IN
iBRIF vs;

8176543, SHINUM

; INIT. PSEUDO-RANDOM NOS.

C, GTSWRG

MOV

:OPEN SOFTWARE SWR FOR MODIFICATION

MOV

flé 3456 SLONUM

CLRB
MOV
TST
INCB
MOV
MOV
MOV

boTim
6$,KS384
LKF
CVEC, RO
#CLOCK, (RO)+
R7, (RO)

HINIT:
TIRING
T
:éz*
rgng
55$
sifiofi
: SE
gc PRESENT
,PRE
NT
:LOAD Kulé
,no?n OF CL
;gfi SL
ué

gfip
MOV
TST

?’ )+, (SP)+
o?g aky
aLK

’gfl Eg & T
Essg
TIME-OUT
:SEE IF
L-CLK

INCB

OF KWI1-L OR P CLOCK, ANDssr
FLAGS

TIh

MOV

LCVEC,RO

(SP)+,

| PE
MOV
JSR

:SET

;

TIHI

KW *-L VECTOR

:L-CLK NOT

-CLK

93
PC, GETXDP

iBR ¥r
NOT
:RES on; snvso XXDP

XDPSVD

813, 3841

T THE STACK

:SAY TIMING TESTS WON’T BE RUN
;sir TIMECTOR TO LOCATION

H Es ME

CLRB

TESTS

RESET THE STACK
3Ecron
SENT

PC.SIZMEM

XDPSVD

BEQ
JSR

(SP)+

NOCLKS
ke, any

1578

CMPB

9
003036

;SET KBD PRIORITY = 4
;ADDR. OF RKO& VECTOR STORAGE
;SET IT TO nxga HANDLER
iSET
ga PRI ;rv

; CHECK FOR PRESE

Ys:

TTY KBD

#PRY, 98 TKVEC+2
RKVEL,R1
sI.INTR, (R1)+
RKPR ‘*5’

CMP
BHI
44$:

SEQ 0387
SEQ 00ss

#KBDHOL , 98 TKVEC ;LOAD VECTOR FOR

000004

L0
oL

288

Ll and

g%n

017014

geeRie

MOV

PAGE 89

MOV
MOV
MOV
MOV

MOV

000252

&8
AV EN

0000000000000000

s Pt Pt Pt Pt P Bt Pt Pt s ot ot Pt ot Pt ot Pt Pt Pt Pt Pt P

000000000000 DOODDODD

000060

000062

Yyos:

W
n

%é‘&g&g&o8£
DO NN LW

R ahaRaa

EEEEEEEE L LS LS

RNHin

P
S
iy

4S5

Bt Bt Bt s et Pt Pt Pt Pt Pt Bt Pt ot

4498

4499

B 2 B B s s b it Bt B s Dot i b bt Bs o s W
b :

CZRS’I)O RK611/06 SS VERIF
1
CZReMD.P
10-JAN-78 11: '48

KO?

MACY1l 30A(10S2)
10-JAN-78
12:16
INITIRLIZE THE COMMON TRGS

iSEE

v FIX MA LIMIT IN PRHLIH

IF XXDP'PREVIOUSLY SAVED

iCLEAR

THE FLAG

LOAD FROM XXDP ?

gnz

33§

annncu IF NOT

1et8
BN
MOV

MDFLAG
108

£ IF DEF
2R
} °§
82%
:GE
T RKOB V. cron nno PRTY

YPE
HAL

MOV
BITB
NE

, XXDPMG

§VECT1,RO

$BASE, RKBAS
#BIT7. SENVM
188

csr
RPT RKOG BASE ADDRESS
F NO SIZING
'BR xr NO SIZING

.P11
(v

B
1351

1
1
1
1
1
1

-JAn"58

MACY11 3?0(*
0s2
IAL

328

003036

003040

10-JAN-78

z'?HE COMMON

LO?

1;:18
TAG

"“’E&E‘m‘%

550£c+1
8177437, RO

18%:

177437
003042
014444

RO, RKPR1
ALLDRY
: BEGIN PARAMETER

ios:

007500

NP?;PHOOE

TYPE

PAGE 90

SEQ_03e8
SEQ oos9

IF 1
11:4

§E
BE EESE%SR gERIORITY

T PRTYuénr8 ' 15 5-7S
EE
svone nxos PRIORITY
:GO CHECK ALL DRIVES

; TYPE "PARAMETER INPUT MODETM

; OPEN RKOB&
UNIBUE gggflEsgPFOR HOD;F*CRT OORLUE oN STACK

sgpron nob;r;cnVALUE

; OPEN nxgs vzcroa

80781
865650

TYPE

ASL
ASL

(SP)
(SP)

ON STACK
VEC ADR
=

VPR
oD,
§ MODIFICATION
no
§% RRy
EVEkLUER
L
:OPEN RKO06 xnrsnaupr hnugbsa PRIbEéTY
i1s:
MOV
RKPRI

003042

“fike
?vp

007574
026260

000007

003042
001315

128:

601515
oooo42

ol4s2e

E§S%
KPRTY

JSR
MOV

PC, GETPRM
(3¢)+,Ro

CMP
BGT

fiS‘w
124

gcg

000004

003126
013732

¥S ADR =
NEW RKBAS VALUE

Jgn

RO,

T NEH RKVEC VALUE

GET IT INTO BITS 0-2

;TYPE

"RKO6_PRIORITY =

iTYPE OLD, GET NEW RKPRI VRLUE

; SEE IF RT LERST LEVEL
4

gR IF _NE

EE }F
LEVEL

RO
R
R
RO
RO, RKPRI

;STORE NEW VALUE

YPE

,BUFFO

;ECHO BRD INPUT

i1s

;GO ASK AGAIN

CLRB
MOV

ERRCNT
#DRVTST, 3u42

IMP

CHKLST

TYPE

SLRLF
lgs

SQUES

SMALL

RRGE

GET PRIORITY INTO BITS 8-7

SWAB
ASR
ASR
ASR
MOV

TYPE
?R

TO0

OR LE S

; CLEAR_ERROR CNT FOR RESTRRTS

*E
SET UP DUH 25 3
UPON COMPLETION
OF REOUES
D PASSES
GO CHECK STATUS OF MARKED DRIVES

EEEEEERFERERRERERRERRREREERRRRRRRRRRRRRE
X RERRXRRRRRRRRRERRRREER

[

RKSII/

CZR6MDO RKB11/06 SS VERIF 1

CZR6MD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

4610

0137

137

012706

001100

4630

013772

ooulaoa

d633

DL4004

1314

~.§I §és§7a
1

014

S92

iie
glices doscte
4650 014066 006303

46
46

4E2q

4655
3s§

014108

014102
0iI4106

2701

;33

OOTIE

104401
104401

000060
00S542
000010

MOV

c;;mcx,sp

usL

'}YP
rvp

4s$:
005542

6%:

o,:

555

TSTB
o
BE
TYPE
MOV

BIS
TYPE

ASL
CHP
B

BNE

011470
010042

TYPE
TYPE

MOV

466

MOV

4660

0141

818351

SEE

141

010321

014132
014136

000137
104401

664
4665

141

0141

MOV

10321

01031;

044134
001315

?ggggg
S

?E{B
V: 55"7 ”‘55&ST

46
014112 012703 000401
4659 014116 012701 005606
4663

SEQ 0090

VE INPUT nourms

WPe
SALBHYS
JSR
Pc,ggcmas
e
gm{rsr BEQ
TELDRV
CMP
#'A, BUFFO

32?; 3114011E 605031
04401 007634
463
325 §{3§
——
3
1
-fil BeE Bl
4e43 01
001
3244
|4
465
4SS

onvrsn

813732 10%90:
010163
3§§§L 1§
é&‘?gz 030624
EH
fiEs fiee
sgz §i§§§
;S§
1
141
4629 013768 022737 000101 005272

HEYE
YeY7

SEQ 0369

Ill!!li!lllll!ll!llllllll!lllillllllllllillllililill!Illlllllil

sgg §¥4”'

PRAGE 91

firch RounuEE§
2 9“ cuansu; LIST OF DRIVES TO TEST,
2CH0
g“&!‘m*‘i
‘fiE&filfiEo Ev‘??‘“?mu#‘mfi ?EE
onxvs
ARE CHECKED ron VALID
ngT
o
mev
D, THEY m: Lonoeo INTO me ohxv:

:giz

3250

12:16

TO - DESIRED DRIVE INPUT ROUTINE

:gfx
M3
4614
:sis

4619

10-JAN-78

MO?

X3
COMMA
RI, SCRACH
8’0, SCRACH

8R3

CRACH

A
BRIVES DESIRED 1on°
iafgo OFRE oLl5«22
(15) ST noones
:ug) gflmem Tunu ADDRESS
::SEE_IF
x} NULL
nw*
ALL DRIVES REQUESTED

iBR 1; NOT QkL ong:s

5§c8

fcoYPSSft?s’zcn
mom (CR>, <LF>

:T
“DRIVE(S)
*
;mxfm.x%:
DRIVE= NUMBER
igz;

?“'“1?5 hxsrso DRIVES

!
IF THI on’f.vs 1S LISTED
BBOB
;gn F FIRST TIME HERE
; vré A
:

H FOR BUFFER

iC
T

RT
DRIVE NO. TO ASCII
DRIVE NO.

INCRETENTTM
NG, 0F L1STED DRIVES
iSHIFT BIT POINTER

$10,R1

;ses }r

S6s

$ BRE 14F (BN

oonvtsr R1

iDRIVE LIST ADDRESs

4§

,NOFALS
' NODRTS

MOV

ng
R1)+

MOV

R3. (R1)+

JMP
TYPE

HL tPRG
, SCRLF

MOV

268:

DSVLgf(Rl)

,nsssr THE STACK

R3. (R1)+

R3’ (R1)

Ng“ o%

DRIVES WERE LISTED

:TYPE "
PTYPE “» Ng ong§§ mmr{egg;“

EPRTTERNR§ MARKD

iMARK ALL DRIVES IN LIST

;HALT PROGRAM
:TYPE <CR>,<LF>

CZREMDO RK611/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48
1414
55 Bk

737
T

003116

6§§

000013

141
m

oog;

015062

NO?7

MACY11l 30A(1052)
10-JAN-78
12:16 PAGE 92
TO - DESIRED DRIVE INPUT ROUTINE

000041

:g;x

om n

4675
us;;
46

014176
“583
14

32?
1
%
3535
Y
%eE?

i: i
uw
014214
5759 000131 005272
figg
4901
01007)
i:
6-4
000100 000000
w§§§
7522
14
1
14522

32;.. 0141
4678

%g
46
3230
1
46392

3233
4695

3299

014250
14254
wggg
014

i:a“
014

14;72

104401
004737
013732
137

47
47

14
1M

105737

0OIM
014354
01M

014

Biudse

022700
002005
104401

126127

B3idRi

000757

4718

014374

012701

4720
4721

014402
014404

005021
005021

018400

005021

00S272

IMP

LODFLS

ag,am

gss }
Rxos IS XXDP MEDIUM

;EEB

?g\smsr

ssslgr
onxvs 0 LISTED TO TEST

JSR
Y

PC, RBCHRS

:nsno
§Pouss
,ug;
unu
$(12)

EEE

?gs
8’Y,BUFFO
Chtroy
bxs RKCS1(R2)
PC, INITSS
HK %

TYPE

JSR

?vps"96xxm‘:cE“?K ON DRV O, TYPE Y <CR>

P (tU)

.gsx}wa" 5R>TYPED
:SEE IF "Y <CR>" TYPED
24 F""opnsTssTg NT WHEN DRV RDY*
on
rL
?zrzm
: u T fl:
: CHECK
LISTED DRIVES

98:

000067

’s‘;ég ‘
'BR xé

JMP
IMP

ASKTST
INPUTP

:JUMP
TOFORTHE INPUT
TEST PARAMETERS
INPUT ROUTINE
;gg

TYP

STYPE

Shsa
BLT

BUFFO(RJ) #'0
18?
:

‘CLEmrc' R TV %"TER
535 73 s&'§ an xmu?

;figa

2tans_ncs

CMP
BGE
TYP

#15. RO
128
aurro

CMPB
BGT

BUFFO(R1),#’?
108

INC
CHP

m
R1,RO

CMPB

BUFFO(R1),%’,

BEQ

000054

16$

14§

:GET NEW DRIVE nurgens INTO LIST

les:

TRING

%’fmv RO
BNE
93

005606

, REPLPK

ocru ITER. COUNTS

19%:
TYPE
PROMPT
YPE RSTE
;READ AND CHECK NEW DRIVE NUMBERS
JSR
PC, RDCHRS
sREAD IN I
DRVTST
;ug)
DRVTST
:(42)

014372

4719

000017

00S272

gfia

e
E‘I{T

25 005272 000060 iS%’
1

£
IF
B0
S DEFAL

243

003136

1 001314

471e
4717

012514
030624

T1STB
MDFLAG
wem

108:

14322

35&5 gf:
4707 814

4rie

030624

005272

OIM

4712

737
1417

uu?s

24$:

228:

4704

4713

1 007753

wfi
%E?g
014574
1M
1
msauo

014310
14314
14316

4710
4711

014

4700
Y
47

470

c‘:o “37 005606

208:

SEG 0379
SEQ 0091

MOV

#DRVLST,R1

CLR
CLR

(R1)+
(R1)+

CLR

(R1)+

.y
m'bn_icWILL as sa.scrso

,asssxér

SS FLAG

:SEE _IF TOO
:BR IF NOT
;§c
BAD

:GO

MANY CHARACTERS TYPED
TOO MANY
INPUT

<7 Am <CR> , <LF>

TYPE oaxvss AND ASK AGAIN

;gse 3;' >
iBR_TO
ECHO %

H ggc
:SEE

;SEE

iBR _IF n%t.

THIS

NPU

OIN
CHARS TO CHECK

HARS CHE
IS C

ONCREMENT CHAR POINTER

::BR TO CONTINUE CHECKING
KING CHARS
CH
:GET DRIVE LIST RDDRESS

:CLEAR OUT THE DRIVE LIST

- B08

MACY11 3?9(1052)
10-JAN-78_
12:16
PAGE 93
O - DESIRED DRIVE INPUT ROUTINE

pme
)

0000
00se271

—

Pt Pt Pt Pt Pt ot Pt Pt Pt Pt Pt et Pt s

0000OOOODOOOOD

000001

TSTB

0l4012
00S606

oS
#3

au#ro-xtnoa

:MARK THIS

;PgéNT TO NEXT

:BR IF

;vs IN DRIVE

DRIVE NUMBE

3 N¥LL CHAR YET
NOT

DONE YET

001341

005606

En VM, R3

;

MOV

#377,R3

;ser up"?og 1ZING

gfiga

i3::

FoRE
EEE

2%:

5?58
MOV
JSR

00Sée16

:2177' SENVM

;nn
IVE NUMBER
FoL
:GET APT DEVICE MAP

Egssx}r NO ¥§ agc

'BITgt?fiox
INITIAL
RRV
gsé
f %u126 SDRIVE
DRIVEENTRY
IS REQUESTED
MOVB
ox DRVLST(RO)
Ys§:
?fié
Sé
suxrr f? BSI&?3N DRIVE LIST
ggg
5 0,RO
; z
nxs$é¥c
ALL DRIVES
éfi?fg¥ n%tnonxvsgonnnxzo IN onxvtgt§§r F
R STATUS

[=]

000010

OI,ORVLST(RI)

;CLEAR BUFFER POINTER
iGET A DRI
R
:STRIP ASCII
BIT

0
ACLDRV:
Gnov

00SS10
027650

|l o

Lr &IJ& £
SPPREREG
NEREIRE

aog

(R1)
RO
BUFFQ(RC),R1
#’0,R1

SEQ_0371
SEQ 0092

cust
:GO CHECK NEW DRIVES FOR VALID STATUS
ucns IF ALL DRIVES REQUESTED

00S606

£L

00000
00000000

Bt Pt ot Pt s Pt et Pt

MOVB
BNE

000010

003124

CLR
MOVBE
BIC

000377
00000

Pt bt bt ot et

i£
N

001376
000200

188:

005606

s Bons B

CLR

GhoR Eononatiiiiaii Hsleiiil
gegZoR gRES-8
ERAEN
._E
J8E #35803gg3384 Qe=

B Bons n e

000000000

AN,
RIS

CZREMDO RKB11-/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

MOVB

R§VLST(ROJ
RO, DRIVE

5?#5551 3az

sRET
;
sl}r

FOR SC

3 Tnxaz

;
TYPFMT,DTYLST(RO}

INC
gnp

RO
oio,no

6S:

CLRB

DRVLST(RO)

IS MARKED IN LIST

iSET ong

PC. SCNDRV

4§:

Jns

;aa '

¥Pinonr
vég.

x
x*nc

ELDRY

:co BACK TO

:CONTINUE CHECKING THE LIST

:REMOVE INVALID

LECTED onxvzs

DRIVE

FROM

llllllllllllIllllllllllll}lllillIlllllllllllllllli!llllllllllli

'§?§Is
R0TinSIE§°
gs Theyt 0 ' SIR&DTESTS RND ALIDITY
ITERRTION
415 Tng
(ggr"2
Eu nngxouvaffis o?“S‘?aéxcarsé‘

san
10 WITH
gSELscrxoh
CHANGED
o PROCEED
RUN

TESTS.

;% ($Z) CAUSEScause
nnEbInTE RETURN TO DRVTST. TYPING
RETURN TO ASKTMD.

MACY1L 3081088
1B
20
Ine
8dt:
8

CZR6MDO RKB11~ 08 ?

B ll HB

CZR6MD.P11

104401
104401
E?H?

37§é
i

e e B

DOSS?E

001314
000114

0osa72

014700
000103

0osa72

015016
000111

oosa72

RFBE
ehp
NE

JMP

JMP
JMP

Ve
882343

ggfég
%7L ' BOFFO
68

Lg:.(r:rglrr

CHG;’ST
*1,BUFFO
INPUTP

;ASK_FOR TEST INPUT MODE
: TYPE gmsa E,C, OR I

'?fg? nz?mu aoonsgg

; &!) ganzwm?nRETURN ADDRESS

(2R IF ANY INPUT
’

:531';3 ?‘3‘,’ %u <CR>, <LF>
ATK N(S'ro (L)
N vpeD
x}
:180

E"“g' ;o L§S}Y;E§TS

TESTS
.Esuglrgégréfi&
(I) TYPE
E_IF
Eéfib {fi,{,‘éfig}.fis‘?gflscggf?gs%g"“’

00SS32

014600

o
.

322
164132

rMJUM’UT

EEE

3’,‘"’”"

3203' INTCHR

TYPED
gszllrMELA

§os

QEJH
£E5froves mann

:5:5?

fng&m?'i'EiH mo:x

7
#8176, ISTKS

nup
E K
8“5&1
FOR rcu TEST INPUT MODE

saga

00ss32

kcmLJErIm.

ITERATIONSTM
NG_"TEST
c%%?ér"“’r‘fi&" TE:ISS% b5%"2?%(
535 i"°§ NPUT
iP P&
PC, PREPKB
2s:
c{:ggsr(ngssr mo nsnanon NUMBER
T
p&;zgrsr
.;3;5

010450

JMP

égg

nsxmom

=gl
E?E

JMP

ASKTMD

U ; nsn FOR NEW TEST INPUT MODE

el w.ffis,

HAN
NT TESTS AND m:mnon c
?Son&: SHOULD BE DEFAULTED
B¢RDCHRS
?
°$§'é‘
éfic
Pc
JSR

S034
S036
S040

Egé

015340

013732
000032

TveE’C s;mngos

éavF’T
nSKT"ng

sZ
g

Reste hoRNAR
P AN qflg i
[

BEREERS

&
£

s B
s Bt
e
B
e

rerrrrrrrrrfrL
s . &

00000000000 0000000000

Pt Bt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt Pt ¢

[etwiadutedegeded

00000000

48
4831
4832
4833

ASKTMD: m;s

—

ASkTeT:

010244
010346
030624

Bt ot s

4S74
4600

ot o

\rflii ~

0000000000000 0000000

478S

S0P Boas

ABLTTRES

sy RERRRRERBRRRRREERRRRRRRRERERRRRRRRRRRERRRRRRRERRERERRRRRRRRRRAR

4778

47
4782
H;ga

cos8

,uc) nsURN Aooal-:ss

DRVTST
ASKT
CHGTS
TST

022737

000104

00s27e

BEQ
CMP

NUL INP
#'D,BUFFO

:(12) grgmRESS
RROR nsruan ADDRESS
g
:SEE }r NULL
I

NULL I
‘BR IF
:SEE IF (D) TYPED

4848

00O

00140S
104401

Bis708
i

1
1

737
2

MACY11l

BEQ

TYPE

00S272
001314

ERYPE

BOSE2e

ys§:

i yus pow
4856
4857

4858

E’.}-

4sel

&
e

015144
0151

0151

igt

OIS

o
012174

$
L
4868 i%’

000002
g
4600

uw.

4833

iers gises

fo q

4
M

1
1

foeid O

48
i
4877
Ol
4878 O

1 237
005272
0524964
15326
.

000005

4881

101022

1731

11
4886 015272
A
4889 015304

0000

001

ECHO BAD INPUT
<9>

(CR>,

MOV

HAM

‘§g)+
(hfia

BN
BrE
_ JmP

&%
LODF

{

TST

2§,

;

<LF>

IST ADDRESS

STLIST ROORESS

gg
A

T NO.

AND ITERATION NO.

0oosa72
00s271

128:

JMP
CMP

BEQ
CLR

CMPB

nsx MD
8’ ! BUFFO
168

o'- BUFFO-1(R0)

- 5 BLT& R
galiges

MOV

JSR

Sov
CMP

5=
ey

;BR IF DEFAULTS REQUESTED

; READ mg CHECK
é?fifi?xr
ANY ET ISP
T—
]
,ROCHRS
TAL
DIGITS TYPED
T
;(:s;G3ga
B 10
Aihness
8%
smon n;ruan ADDRESS

030624

4874

014600
isi2

101

,BUFFO

bR¥E?°§OOE
gssllrflgfirgg
Lo
AU
TERS
P LR
3“0 m:mnou&&8’1’ 2!sgr ITERATIONSTM
érvps cumsm TEST

003116

:@g gile 983981 o10uso
M
151
7
1136
M
§1§xg
04401
O1zaza
M
18152
104401
012514
737

LODFLS

SEQ 0373
SEQ 0094

$508DDEFAULT xrsmng
COUNTS 1%E TFhI._}

137 016244

M-

D08

30A(10S2)
10-JAN-78
12:16
PAGE 95
TO - DESIRED TEST INPUT ROUTINE

gH\II

gurro-unm

OBUFF? -(SP)

PC,OCTBIN

R3Po7?795
sosrsnsnm:

; INPY

Slen 104

&;§= -5
H

M
M

0000000000

| olendenlonionl ottt eiciielada

4834
483S

BiNEe Edds_

CZR6MDO RKE11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

9fl
NEH TEST INPUT MODE

MOV
ADD

CMP
BNE

R* R2
#T8TLST,R2

cgrus'r-a,R2

uanem ITER. NO.

wxcmon

: Lt):mn BUF IS (!)

‘D pe,
mm
( TER NO. = 77776)
mimr BYTE

ou STACK FOR OCTBIN

3:
HECK

CONVERT TO BINARY

.ggeT irTERA
>o
7;9'7'5“""d%é% oSS
P TI ngg%fi
n INTO TEST LIST

: PROPAGATE CURRENT ITERATION NO. TO T

les:

( )

s s xr AT
IF NOT

TSTLST
OF
x

END or LIST
DONE

CZREMDO RKB11/06 SS VERIF 1

CZREMD.P11
4830
01

10-JAN-78 11:48
000137 014600

&13;81

ggggg

MACY1l 30A(1052)

005630

10-JAN-78

EO8

12:16

TO - DESIRED TEST INPUT
JMP
ASKTMD

ADD

BR
TYPE
TYPE

168
,BUFFO
SQUES

208:

4899
wgoo

011§§§

10500
5512

o R e il8TALLS
5% -M
ASKMDE: CLR

%
Y
2%
Y
M
491

11
8
1
1
1

491
491
491
wgm
4915
4316

qgw

005272
001314

1
1841
1
1
0154
015432

000124

-4

4930
4331
4
43
934

005750

005752

01551
015
1
1
01

010740
00S740
010771

1??1

4940
4941
4q4y2

1;2 4
01
(O155¢

4943
4944
4945

00S746

glgggs

005272

010727

122

18474

(015540
015544

015562
(015564
015570

4S:

ol e

6464

015454

4935
43936

005272

000i17 005272 6S:
%zgg

15434

15462
i“?‘a'

015729

a1 gla
xg

TYPE

15254

4920
4921
weag
3

010626

010757

104401
104401
000677
13700

Sosaoo

010740
005766

1
1
100

006101
063700
005501

005762

00S754

005742

108:

TERE
DRVTST
g
15T
e
T%

BR
CMP
BNE
JMP
CMP
BNE

JMP

14%:

,PAR

pERRBERS
:
RO
Burro
' SQUES

ASKMOE
#’T,BUFFO
§s
YPLST
8’0,
BUFFO
8%

:BR
10 comxuu;
:ECHO BAD INPU
:TYPE <7> AND <CR>,<LF>

:GO ASK AGAIN

EPCAIN THPUT RG0ES
E?m a¥7 §mu. ac: ?uEEEN OPERATIONS
;ASK FOR

DESIRED INPUT MODE

'505)
RS gmss
RESP
T0 MODE QUESTION
H gty p—
:352 }gnn.uf ;mur
1B BAD INBUT|
:?#2 <7
<CR>, <LF>

;GO
AGAIN
:SEE IF (T) TYPED
:BR
IF NOT (T)
;&n T0 THE T
:SEE }r (0) rms LIST ROUTINE
iBR IF NOT (0)

OPNLST

;Jun; 70 THE (YJSEN LIST ROUTINE

SETPRM
#'R,BUFFO
23
?2‘51

;7
TO THE
SET INDIV. PARAM. ROUTINE
:SE ;r (R) TY 9
:BR IF NOT (R)
2‘5%3 BAD *NPUT
e
o
"’%9‘9’51
LIMITS

ASKMD

TYEE

,secmg

;?fl

JMP
CMP
BNE
&ng

TYPE

12%:

;xncnertfirr' ”?noe'
'ix' TE TO NEXT WORD

#2,R1

7
001314

:GO ASK FOR NEW TEST INPUT MODE

TSTkST(Rl),TSTLShE(Rl) :

qsa
1049401
1

4301

SEQ 0095

MOV

1
1
153

18336 &.Js 1

SEQ 0374

17%:

Y4
M
Y

:gg;

PAGE 96

ROUTINE

Y gt

g&cug

55‘53

% » f ug'r ALLOWED"

- >5{
“NOT_

FOR PARAMETERS

t):)sasscros LIMITS

TY
BR
CMP
BLE
TYPE

NOTAL.
hsxrge
FT,L
208
, TRKNLW

T
;GO
;
;
T

ALLOWEDTM
PARAMETERS
N TRACK LIMITS

MOV

WC,RO

CLR
cLC
ROL

Rl
RO

:DECREMENT BY 1

AGAIN FOR
T

> LT

“ETOLTTM
TYPE
NOTALD
:TYPE
"NOT ALLOWED"”
BR
ASKMDE
:GO ASK AGAIN FOR PARAMETERS
: CHECK WORD COUNT AGAINST PHYSICAL
AVAILABLE

208:

DEC

ROL
ADD
ADC

Rl
MA, RO
R1

;

OUNT LO BITS

: WORD c?um HI BITS
:CONVERT

WORD COUNT TO BYTES

:ADD WORD COUNT

(WC)

TO MEM.

ADR.

]
(MA)

4963

438
433
4
4871
4s7e
4§73
4874
4975

4876
4977
4978
4979
4380
4981

156
12684

sl
pox
I37
737

104
1
01

268

011003

0iSe
of
12
013
015710
018712
015720
015782

1001
000747
122737
001362
000137

‘5552

P&, CHKXDP

016720
000091

30$:

IMP

RUNTST

JSR

PC,ROCHRS

7443
330eaa

378:

001314
000131

0ose72

388:

000116

oosa27e

40s:

015344

CMPB
BNE
BR
CMPB
BNE
IMP

OVLODR

TURN

#1,RO

38s

, BUFFO

3gOUES

IF NECESSARY
SS

RUN TES& ROUTINE
D BY XX

RLAY LOADER ?

(Y OR N) »*"

URN ROOREgg
TURN ADDRESS

TYPED

N
‘SEE IF (Y) TYPED
IF NOT (Y)
:BR
:GO_RUN Tssr§
TYPED
‘SEE _IF (N)
IF NOT (N)
:BR
ASK FOR PARAMETERS AGAIN
GO
s

$
8'Y,BUFFO
40$
308
%’N,BUFFO
37%
ASKMDE

THE ngLOHI

:Fon"evvvvvx?gyv
K
“991
ngfgxnrsuss TER_IN
DRVTST,

! ¥AND tfz) cnuss
0157
015796
0IS7
015734

005001
9737
237

TYPLST:

026040
031172

18:

4998 012748 00S73F O0sa33

s
T
R—
4995 015760 6010(3;
S000
3001

;GO SAVE XXEE LOADER

41
gos

;conso#z.
LINE BY LINE.

433
4397
4338
4998

BEQ
TYPE
TYPE

31
“%%_WC OR MA TOO LARGETM
;GO BACK TO ASK AGAIN FOR PARAMS

ROUTINE
.SBTTL TO - TYPE (T) LIST
:¥THIS ROUTINE TYPES THE
ENTIRE
PARAMETER LIST ON
ruc

437
4988
433
4330

TSTB

BEQ
TYPE

368
368
368
CMP

498
438

4986

IF NECESSARY

.SAVE XXDP LOADER,

368:

F WC IS OK

; COMPARE LO BI S
iBR_IF WC IS OK

253a
16
hsxngc

28$:

0014

40l
758

?#33
BR

; COMPARE HI BITS
-gs ¥F WC TOO BIG

sMAHILM

027000

012666 109407 00S272
12664

BNE
CMP

R1 ‘HAHILME

006126

MA+2, Rl

M
M

012648
01

gfln’

4363
4361

1
1

1014

ADD

005764
006130

o
-

M
4

himh
1
yuz

063701
137
1
1

g
§

i3
M
=

015572
015576
01
01
1
Q018612
128149

SEQ 0375
SEQ 00%%

Nt Nt

4946
4947
4948
4349
M
4381
M

FO8

10-JAN-78 12:16 PAGE 97
TO - DESIRED TEST INPUT ROUTINE

MACY11l 30A(10S2)

SPMODME OBM=ssM=
SNMCNO

CZRSHDO RK611/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

0157
DIS7EE

137
122737

016002
016006

004737
004737

Q157
(015776

1
000137

013732
00D
015344

026060
026040

00ss32

005532

6S:

CLR
JSR

JSR
TYPE
TST

Rl
PC, PREPKB

PC’ TYPPRM
SLERLF
INTCHR

BEQ

CMPB
BNE
IMP
JSR

#032, INTCHR
6$
ASKMDE
PC, ECOBAD

CMPB
BNE
JIMP
JSR

#003, INTCHR
4§
DRVTST

PC, PREPKB

s INITIALIZE INDEX
;PRSERRE FOR POSSIBLE KBD INPUT

CURRENT PARAMETER AND VALUE
!TYPE
:TYPE <CR>, <LF>
; SEE ;F ANY INPUT AT KBD
‘BR_IF

NO INPUT

H ase IF (1C) TYPED
F NOT ($C)
:
TO ASK FOR DRIVE(S) AGAIN
:JUMP

: SEE }r (¢2) TYPED
'BR _IF NOT (12)
i JUMP TO ASK FOR NEW MODE
CHO BABAD INPUT
;ECHO

;PREPARE FOR POSSIBLE KBD INPUT

881062

108:

e wu e e at e

—

238

wsm

'Rl

005760

BNE
§a§

%Resr
opn5¥L7:55

163060

#8176, ISTKS

00ss32

148:

000003

00ss32

013732
000032

005532

015344
026060
026040
0312Se

18
T1S,PT
:

PAGE 98

;SEE

.an IF
3{"3
i

{ ConPyTE

168:
188:

208:

000040

162750

TYPE

CLR

PFIFTN

TST
BEQ
CMPB
BNE
JMP
CMPB
BNE
IMP
JSR
JSR
JSR

INTCHR
2
8003, INTCHR
16
VTST
ge,xurcna
1
MDE
PC,EC
PC,
PREPKB
PG’ TYPPAT

ADD
CMP

k2 RI
:3%..R

IC
JMP

'gxnot

TYPE

3¢nu=

SEQ 0376
SEQ 0097

_IF PARAM.

NOT (MR)
NT
NT

IS (MA)

TER }WEX

POSIT

IN*IST
fi ?N
2?;!‘

B
R
el
T

TYPE ou% ussa-oe?xns PATTERN 1 g

i2s:

000100
015344

BNE

hoD
828

011116

g NN - — 8@
wN
(=]
NN
L b
e

o=
~

828R

bt s s B B

s b

e B

e o

I
EEPEESPERSERER

CMP

00e1S2

oo o oo o oo OO o O O O O O

W we us ui
[

Y e

et el ey wdw

e el

0000000000000000000

o40s1s

GOS8

12:16
10-JAN-78
TO - TYPE (T) LIST ROUTINE

MACY11 30A(10S2)

UMP TO ASK FOR NEW MODE

SEY?IKU?EE%'?D
PflTTERN 18 :*
T

(t
¥éF

3 E@%&%
58 :

%-JM8 11 '08

g e et

000000000000

S 48
e

e be ba be

e e

NN LEWN—-0O

peannsnnnn

117

BRIVE(S) AGAIN

) TYPE
)

TO RSK ?fl NEW MODE

S&WFMOSSIBLE KBD INPUT

T6,3$TKS

lflgEL‘STER%ifiEMST LOADINGOg ALL
ROUTIN??E
T
ARAME
ATxongv
EscuPRR Tssflsoinat*?;
EEofiEernLL¢$§?§u
S IMMEDIARTE RETURN
:

lDRVTST AND ($2) cnuses ns URN TO ASKMOE.

—

o
£
£
o
N

olesos 0473
SG21 Qiesie
ficsie Botnl8
Boer
S50

OPNLST:

DRVTST

g 015212 8153'44

S5 GEs3
SCSe
S0S7

016236
016242

Biune

104401
000756

TYPE

DFQUES

PC,ROCHRS

ASKMDE

CPNLST
72.

000104
00s272
001314

00s272

BEG
CMP

NOTDFT
#’D,BUFFO

gsg

Lgotpt

OPNLST

YPE
TYPE

RSK IF N.L

UFFO
$QUES

TIRN

FRULT VRLUES DESIRED

ERROR RETURN ADDRESS

SS E DENE'-H.L;S
NOT REQUESTED
Hs}
BSSFRUET§ DESIRED
;GO ASK AGARIN

CZR6MDO RKB11/06 SS VERIF 1

S081

10-JAN-78 11:48
12700

12702

16312
16316
1

7
|104401
1 031172
012474
012514

1gg§
1
1
1
1

013732
15394

1
1
1
1
1

16310

005732
005776

4s:

01 025474
gooons
5344
ss:

000002

7
msus;
013737
go-wa?

64
476
2616
031630

BB
MO
oo
§8§
81
Eflgfi’
gggg 818%
2739 ggggf'a
5089
5090
sogé
50
5083

DR—OD®
IR EOR—OBB IR

?83“5

509

e Bt Bt ot ot ot Pt Pt Bt Pt Bt

2730

1
315400
0164
0164
016414
016420
016422

016452

004737

ois:as 062701

031304

000002

016435
862385 oos732
°i."33~° 022702 005776
Biedue
085158 0153wy
016452 104401 005272
016462

104401

000713

001314

gg)o(hsa»,

%
W

:?SEWCT
e

DRVTST
ASKMDE
gg
T
BNE

CMP

SEQ 0377

SEQ 0098

LAG

LOAD

DEFAULT LIST ?oonzss

LOAD
TER LIST ADDRESS
A BS'F‘MT
VALUE
s F
T

UES TO LOAD YET

E Fmg

g l '& m.#
EiSEi

005500

fe
BLT
MOV

RO
108
#"MA, PRMNEM(R1)

#2,R1

i
148’
8BUFFO, - (SP)

1
;

PARAMETER
AND VALUE
AARSTERISK AND
SPACE

; READ ocm DIGITS TYPED

;ug)
1(42)
'rum
;uE)
iSE } ANY
iBR_IF ANY INPU

TS
!

sg FOR RDCHRS
S5 FOR RDCHRS

URN ADDR. FOR RDCHRS

;SEE }r (MA) ngusr DEFAULTED

(182

INDEX

Bl
Egtx
mmsONYPED
i PUT
R
STACK FOR ocram

JSR
PC,OCTBIN
;c&cx S} 171S
CONVERT TO BINARY
148
;
ERROR
SS FOR OCTBIN
MOV
(SP)+,LOWOCT
PGET L
s ?
MOV
sH1oct, uxco%
IGET
Mgfl mmr ITs
; CHECK PARAMETERv&.ue AND PUT xk LI
JSR
PC, CHKPRM
CK VALIDITY
OF PARAM VALUE
é$

. OPEN USER-DEFINED PATTERN 1S rofi

;OVE ON_T0 NEXT PARAHE1ER
ADD

]

016456

IPRDF RO

MOV
MOV
CMP

PC, TYPPRM
TYPE
s#ncs
TYPE
;READ AND snecx ;m
T H&r ANY
JS
c.goe S

MOV

8s:

2 5 040515 00B1S#

Bigses

PAGE 99

NOTDFT:
ugheNT mrsn
n
xnxnmx?n&‘
-TYPE
C
AND vaLut

16326 004737 030624

016344

HO8

12:16

: LOAD nu. DEFAULT VALUES INTO Pmrsn LIST

(ODFPT:

003116

10-JAN-78

T0 - OPEN (0) LIST ROUTINE

005776

SENSRRE

so;;
50

s B

‘

8§07
507,
507
2874

iUy

|
|

CZR&MD.P11

MACY11 30A(1052)

148:

hob
gm
OB
TYPE
TYPE

BR
.SBTTL

32.55

cfihmsr,aa
A2MDE
|, BUFFO

gmo:u,na

SQUES

TO - SET (S)

Hoga ns

FICATION,

FOR CHKPRM

IF NECESSARY

; INCREMENT THE PARAMETER INDEX

E'Smu?g
p8§;}'1'85LIST
IN LIST
i uor
?umg '%n
NEW MODE
;ECHO B0INPUT
Tvp;
<?> AND <CR>,<LF>

AGAIN

INDIVIDUAL PRRRH ROUTINE

; #THIS ROUTINE IS USED_TO ALLOW SETTING OF ANY INDIVIDUAL

i ¥PARAMETER VALUE BY TTY INPUT. A PROMPTER (>) IS
:%¥TYPED AND THE ROUTINE WAITS FOR INPUT OF THE FORM

CZRGMDO RKE&11-06 SS VERIF 1

CZREMD.P11

10-JAN-78 11:48

5114

MACY11 3onuosa)

10-JAN-78

! ¥PARAMETER 2

3%5?
N16464
sxag 016464 104401 012517

;srmnTYPE

e
b
Bl
2129
16
64647 000004
1
16
5128
16506
51
16510 104401
5272

s
SETPRM

4s:

68:3

2113
gfig

PAGE 100

SEQ 0378

SEa 0099

¥ XX=YYYYYY uusns XX IS THE MNEMONIC FOR ANY VALID

gus

5{2

12:16

TO - SET (S) INDIVIDUAL PARAM ROUTINE

16470

737 030624

21
21

16514

104401

1314

it
78} 000013
1%?5}‘: 8883%

5{..33

°{2§"2

orl,am

000002

LIST, AND YYYYYY x; THE DESIRED PARAMETER

:?42%;
1Er%gs
“%v
1N Poucngn
o RETURN
08, SOTHER
TURN JaiTE;
TO DRVTST,
AND (12)Han
CAUSES
TO
PRMPSP

sTYPE *> * PROMPTER

i
eRRORe
eADDR.e
;W)
%
RETURN
FOR RDCHRS
‘SEE IF A
T 4 CHARACTERS TYPED
‘BR
[S8E
IF 1F AT
o LEfs 4 TYPED
;;
BAD &QWT

— m?sgrzcx iE:WRD&Tmas"r e

:READ INPUT LINE

CHP
BGE
rgg
T

RO, 84
X
,BUFFO
SQUES

gge

oa.sé

IN?REFENT 03
:

%:é } ré‘"M
ggs sr
rcx;
gmn";sA SPACE
NEm r POINTER
;: .E
gm mpur
;xncns
r’g'g.r LEFT
INTERIN BUFFER
;
:;BREI}
T scuo
INV o NPUT
W n cHaRA TER IS SPACE
:mcnsnemBUFFER POINTER
.gss ;r
LEFT IN BUFFER
:sua¥ T xmsn FROM CHAR COUNT

<c%1.r>

%ET':TT
188 1 orgiroa OELLESCCenARS
TYPED
acr
2
’
:355
viu
TYPED
sias
6
:
;SEE IF Efvlas msgclmc RESIDES IN m nxgomc T
s i
513?
§1s§§
833921 p00S272 006152 8%
CHP
BUFFO,
PRMNEM(R1)’;B8RTRYIF T TCH“I“S“-IE
MONIC
138
0165
001411
BEQ
108
TE FOUND IN TARBLE

P
J
1528 8192"
gifi
815
51
016564 012702
000002
514

E8 1 SHOTEIE
T A F ng%
Rl o CHECKe
sook ety
8%
YET
: CHECK ré'gMOVVALIDfms
FORMAT :QNITIAL
*
e
ios:
)
R_POINTER
BNE

sisz
5123
21
1
815
gxsu
155
sxsg
5{5
21"5;3
giw
512%

°i2§° gfi‘;‘é 000075 005272
§i2fi ggsé 000040 005272
1661
;25
1661
000075 005272
1
1333
101
12%:
01
322
oiss
2%03 000040 005272
81&33
202
§%ssz.a‘ ggaoo
1 33 150356
148:

ggs
gnga
INC
CMPB
BNE
INC
CMP
BGE
gNEHPB
INC
grcug
SUB

:;?Swroma)
ggqo,wrroma)
R2
8’ =,BUFFO(R2)
4g
R2
YR2,RO
:ggo,aurroma)
R2
ge,ao
R2, RO

S164

016654

BGT

€168
5169

0166EY
016670

S163

5165

016650
D

020027

003315

004737
016510

000010

CHP

RO, #10

;CHECK FOR LEGAL PARAMETER vm.us

052464

JSR
43

gTM

PC.OCTBIN

.355 HOW MANY CHARS LEFT
:BR

IF TOO MANY LEFT

cnscx DIGITS nuo convem TO BINARY
‘ERROR RETURN ADDR. FOR OCTBIN

SBIRR 2N 3B IR REBREB I3t NS 8

e Bt s Bt Bt Pt ot ot Bt Bt Bt Bt Pt e

nunininininiininininicITTOIINUIWDN

CZR&HDO RK611/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
12637
13737
004737
016510

005476
052616
031630

004737
000ee2

031304

JO8

MACY11 399(1052)
10-JAN-78
12:16
PAGE 101
0 - SET (S) INDIVIDUAL PARAM ROUTINE
00ss00

;RETURN TO ASK FOR ANOTHER PARAMETER

sstrncnm

‘“"5‘%‘ié BN e

Bt et Bt ot B

nn s m

TESTS ROUTINE

BEENPns'
DETERMINGD mg'rAND
FiRs? STORES
adka >

rmmgg noas{fc THEN, THE
g

m ; T DESIRED

DRIVE,

AND

nsng GET THE FORMAT FOR THIS

E:DR vs,m’r'uf fi 7 8 ng THE FORMAT BYTE, AND A JUMP IS

.n:ncn
ESSIVE DR FORTsusr”xsmT:o l..m"TIL:”r’iTgN%kECIT’QSS
+ msBS?v‘éE "is csmm.

s Bt Bt B

RUNTST:

INPUT THE DESIRED NUMBER OF PROGRAM PASSES

4§

F
N <

000

GEEPD BF5 RESFAAs R 4

6S:

8%:

~
[A]
N

-0

LU
s al
NNNNNNNN

e 80

DONCNLEWN-0

iGET RYGuPBYNaRY BITS

JSR
PC, CHKPRM
: CHECK VALIDITY OF PARAMETER VALUE
43
:ERROR RETURN ADDR. FOR CHKPRM
; OPEN us&:n-oermgg mnggn 1S FOR MODIFICATION, IF NECESSARY

&FOR

s Bt

MoV ShToct RSt

T0 - RUN (R)

ot
Bt Bt e P

RRRRRRRIIRSHssNs
NNNNg

i
v

Sees

SEQ 0379
SEQ 0100

TYPE

ENTPARS

JSR

PC,RDCHRS

BGE
TYPE

88’
, BUFFO

'Sé" FOR
:READ RE

Bt
u§
w8
CMP
85, RO

(15) g
BT
itég)
ERRORmoness
RETURN ADDRESS
g
H sse HOW MANY CHARS TYPED

BR
MOV=

;%21“‘&'}

—
FO,-(SP)

i
MOV

"°-°°’°‘"
)+, SEOPCT

cLR

sPAs

iBR IF 5 OR LESS
:ECHO BAD INPUT

N ON STACK FOR OCTBIN

: ERROR 2{?&3
ADDRESS 'FOR OCTBIN
ngo NO. OF PRSSES (1-77777)

NIT,

MumgE

NEWPAS: Hngva 77§;7"331ve ,%Eénm'z‘é:&xvé Ro.
CLR

cuecx DRIVE LIST

NEWDRV:

00ss10

FOR MORE DRIVES

MOV

#PRO, 3%]

CLRB
‘x:hg

DRVERS
Ix)grsem

CMP
BNE
JMP

PRIORI

csméx.sp

iRES

ué,onrvs

seemf'r oong'auvfi!I!u?gNGmss
LIST

DUNPRS

;cn.snn

smcx

RROR
COUNT FOR CURRENT DRIVE
TY INPUT BUFFER WORD

JUHP IF DONE NITH THIS PASS

BWo-SQusat’l-SmRTAmRaN3SLaRM.ABmbIRoR'IEoSlmRu.I"FI“rAI.rTMIo.-OHNeG.SPNEqEm-mPoVTmE.nFlaSr.mBmR5mIwmNmTvIvRswNvTvAWRVOWRVNVYWTVWWoVW-VVVV8V
gBpL.°.ZeORfUo9HIilpl-e5mn'el-coéudN4e9m2woTW'uLdNLt8=[nN-wy-L7A}1]l§lmClaU.uElmN.Rld.Sl8R.lE.Fl+R.RlI.+ElS.Hl.Sl5+.0lN.l-Teoo&xWo.l||ALNe|.mm824lL'ElL3Rl79o|vW-LrAl“.lsl3.lS8.Blm.PlE.li.ol.uaIl.S.bmlil.ialmm.e..alal.lL.O=>-..l.0HlLr..T&lFLTlT—MIL..blRE.L.—.RmTlrLb'A..sgbFlLl“8lw4a.e=
00B00ot00—10010010010010!0.010R01001000Sl0l0l0wl0l0lw0l0ml0ln0l00000
2moXxom>af~mium.WDmmNOmTLTo -N -|4d[+P..E.1WN71.Pa@OPmPmEmensnPmuP..mPmPwmPmewwOImoxmOOmsUomoWso-o
5aTonY%eo2&x-9§5 &- g8 W&wi o44-30(a—)l]
CZR6MDO RKB611/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

5280
528l
017520
017524
004737
112765

MACY11l 30A(10S2)
10-JAN-78
12:16
TO - RUN (R) TESTS ROUTINE

KO8

2s:

18:

000125

027522

000001

PAGE 102

SEQ_0380
SEQ 010!

5319

o KoY

$8IT7, (R2)

[v!

D4, (R2)

SEQ 0381
SEQ 0102

8% S8
;CHECK FOR C.

e g7 < 0

SRey o L
SHE?K N8R Sb RER?Y IN CS1

INITIRLIZE FORMAT BYTE T0 O
; INIT SECTOR LIMITS FOR 22(DEC) SECTOR FMT

g8gals

35‘§

000024

ggIT9RKDB(R?)

BEST F 8 SEC?&E }N

gosdie
605512

08 EFHT, FORMAT

TR LBT ATk

T
ILO ONE

ROER WORD 2

S0 TR S Son e

z "g
gF UNIT STALLS DESIRED

CTOR FILE FOR THIS DRIVE

“TES?I 6&

1137
1137

1N
e LT
.

005770

g
77§g
77

017770
017772

EOOEB 000000

XX*

DUAL-ACCESS FLAG SET

B IF N?
iSET_TES
;JUMP TO R/H DATA TEST

oo11i02

S3e8
5329
5330
8331

hc B3,tRe)
821T7 (R2)

6S:

108:

2359

BIT
BSO

]

—

il
2
7766

8323
S324

4s:

PAGE 103

; LAST CYL-S

iLAST CyL-1

iLAST CYL 632 FOR RKO6,
iLAST CYL+1

1456 FOR RKO7

g S ¥
e
&] I BE
o8
|el

BRI,zsa

oo
=
s Pt P
s P P Pt Pt Pt (s Pt P Pt Pt Pt s Pt B P P
Pt Pt Pt Pt s et P (s s s P P

7742

7750
.

12:16
10-JAN-78_
TO - RUN (R) TESTS ROUTINE

SSE }FTHI? &g F&ngT PflSS

7719
77ee

77
77
7734

MACY11 30fl( 1052)

00000000000

Big

O000000000000000000000000000000D0O

5315
531;

Bt Bt Pt Pt e Pt

ggia

00000000000

§gepEeEs BR

KR}
83
At

10
1
1

arl

RIF 1

OB-JRN 8 11:48

(NI
7

CZREMDO _RKB11/

isgflbP11

LOS

CZREMDO RKB11-/06 SS VERIF 1

CZR6MD.P11

10-JAN-78 11:48

MACY11 309(1052)

§332

MO8

12: 1?
PAGE 104

:resr 1

§§§§

8
03

RECALIBRATE/SEEK TEST

£337
000001 001324

137

0062

020026

004737

027522

020032
020036
020044
020050

020056

026040
000113
040316

000001

013765

005734

000002

032374

5354

HSS"

81,STESTN

INP

15t

JSR
JSR
B&g

;

C,SETTUP
ITR

; RETURN uens rnon c

004737
112765
004737
004737

VLN

%g#tllllglllllllllil!llllllllllllllilllllllllliilllllliililill!ll

S341 020012
004737
030462
S342
02001
737 330530
02002

1uésTESTPi RMS A RECALIBRATE, FOLLOWED BY A

TEST NUMBER IN npr MAIL BOX

ssr
UP FOR LOOP
ON sn
E Ir IT
Ng 0 FOR THIS TEST

ITR IF rssr

INI ss

UMP

xf &1

; INITIALIZE onxvsn PARAMS AND SUB-SYS

:PREPARE FOR POSSIBLE KBD INPUT
énL P CMND(RS) ;:SET RECAL COMMAND
;RECALIBRATE DRIVE
;DO sesx TO chxE
MOV
YLN(RS)
;SET CYLINDER = LC
JSR
PCszs ER
;D0 A READ HEADER OR EXPLICIT SEEK
;RECALI vs THE

§§§§

$ llllllll!l!llill!llllllllllill!lllllllilllllll!ll!ll.llllil!l!!

§§§§

‘¥

2327

%gggz 800002 001324 St2s

%373? Oggggg
5368
.
"
b
§§93 8581?3 3837 7 3523»5
250076

020102

000137

SEEK/SEEK TEST

RFORMS

13 SEEK T ceLI

K TO CYLINDER FC, FOLLOWED

;o 3636 36 36 36 36 36 36 36 3 36 36 36 3 36 36 36 36 36 36 36 3 36 36 36 36 36 36 36 36 36 36 3 36 36 3 3 36 36 3¢ 36 36 3 3 36 3 3 36 3 3 3 36 3 3 36 36 3 3 3 3 % % %

5362

.fi T2

020142

gsm ge, STESTN

TEST %Rofl‘fl
QPT MRIL BOX

Jgg

g35:(?
gEE ?RR 5FOR THIS TEST
;s RETURN nggs
raon c TR IF TEST'izggzgt?g A
g
3nl
SR POSSIBLE KBD INPUT

gg;x
116 013765
537 gggléu
00473; 00S732
032374 000002 " -73
JSR CYLIrcP.EvERN(RS)

2378 858138
1 36473?
37 883333
57
Eggg

000002 - S““nSS
JSR CYLxNDE
bc ‘$
SEEKEN(RS)

T CYL
?Eex
10 =Fc FC

T CYL10 LC= LC
;ggsx

5378
5379
380

, lllllll*llllll!Illlll!llllllilllllllllllllll!lilllllillillllill

5383

‘¥

sssxxns ro ch
Ngs

5339

40,20, 10, .a.x.

5384

385

H°

CYLINDER ADDRESSING TEST

THIS TEST vsnxrres THE chxnosn nooness BITS

THEN

EKS

;

40, 100, 200 qoo<oc1)

_ARE oohs f ksvtnst t0 100, 200, 100,

——

Egga

po————e

SEQ oae

RECALIBRATE/SEEK TEST

,lll!lllllllillllillll!llll!l!lll!lllll!lllllill!lllll!{l!!iilll

6333

8
6349
ggo
1
gggg

10-JAN-78

cznsnoo nxsxxxos SS VERIF 1

CZR&MD
.P

10-JAN-78 11:48

2390
;g;

027522
1 004737
004737 026040

S PP
oy
oo
7
o
o

833133

52;1
'
.
gg §§§§°§
1 005;
6365 §§§§Eq2
guos

g489

§:i?

HE
23

MACY11 3oatxosa)

853535

?;s

017766

020232

006265

000002

10-JAN-78

NOS8

12:16

SEQ 0383

SEQ 0104

*
g%»sllll;gg;g&l!lllllllllll&llIlllllllllllllI!llllllllllll!lll’!«l
H

JSR

TMP

gREIEN
PG CHKITR
a0

v
M )
pa— TOrEQLI abaew‘Pcasnsza

000002

PAGE 105

CYLINDER RDDRESSING TEST

Ts xrTESTITER.MAEER
I ger waIL sox
NO. = O FOR THIS TEST

;

X7 TEST

Padiea 53&
:JL
PARAMS
53%BEERUNxvsn
%onPOSSIBLE
KBD AND
INPUTSUB-SYS

s SEEK TOIgELINDERS 12 lns 611 0,200,460 (FORWARD DIRECTION)
2s:
ISR
PC,
SEEK
:FGET_MEXT
K TO CURRENT
ASL
P. eanc
CYL NO. CYL
ggg

ggLoa,P. CYLN(RS)

BNE

1;0

Doflgx;grronuaao SEEKS

:SEEK TOASR
chxnosns qoo
200, 100, uh; GEa? 10%T'C¥L’
q,g 1,0(REVERSE
DIRECTION)
tns
NO.

4s:

0246 001371

TBR 1; NOT DONE YET

S4Y14

3 l!lllilllllllll!llllll«lll&lllllilllll‘lllllll!ll!llllll*i!ll’!!!

6417

gzig

5418

‘¥

CYLINDER RDDRESS CROTSTALK TEST

THIS TEST PERFORMS SEEKS TO CYLINDERS WHOSE ADDRESSES

ARE SUSCEPTIBLE TO BIT CROSSTALK WITHIN THE CYLINDER

2353

5421

00 000 000

S423
S424
E425
S42b
S427

‘¥
‘¥
x
x
‘¥

00 000 000
01
116 110
000
000
011 111 101
000 000 000

S4y22

‘x

S428
g"h?q

x
; *

8431
5432
5433

‘¥
4
‘¥

430

020250

(000004

6438

020252

012737

000004

020274

004737

027522

S4y42

S443

)
.

000 000 000
010 111 111
000 000 000

g:gg

020260
02026M
020270

004737
004737
000137

11 111 111

;¥

g:gg

439
440
S44]1

agongssgugLOGIC. THE CYLINDER ADDRESS BITS SEQUENCE

101 111 111

s#:!l!lggsggiil!ll!llllllll!ll!!lllllll!lll!!illllllll!ll!!i**!!
:

030462
030530
020414

001324

MOV

#4, STESTN

: :SET TEST NUMBER IN APT MAIL BOX

JSR
JSR
TMP

PC.SETTUP
PG CHKITR
15tS

iSET
UP FOR LOOP ON ERROR
:SEE IF ITER. NO. = O FOR THIS TEST
1 JUMP TO nsxr TEST

JSR

PC, INITSS

; INITIARLIZE DRIVER PARAMS AND SUB-SYS

:RETURN HERE FROM CHKITR IF TEST'SHOULD BE RUN

G20300

004737

026040

CZR6EMDO RK611/06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

00S06S
004737

000002
032374

012765

000377
032374

MACY11 3?&(1058)

JSR

00oo02

SEQ_0384
SEu 010S

;PREPARE FOR POSSIBLE KBD INPUT
;SET CYL = O

P.CYLN(RS)

PC S%EKER

;SEEK TO CYLINDER O

P.CYLN(RS)

K ro oYL 377
; SEEK TO Rsnnxnxnc CROSSTALK
CYLiNDE
IN*TIGLIZE BIT MASK
CYL

2s:

JSR

Pc EKsn

CLR

Pvau

JSR
BIY
BNE

MOV

BIC
JSR
ASL

000002
000002

9
5R83

PAGE 106

PC,PREPKB

JSR
; SEEK TOHSYL 377

00SS14

000002

B09

12:16

CYLINDER ADDRESS CROSSTALK TEST

;SEEK TO CYL O
CLR +

00SS14

000577
032374

10-JAN-78

4s:

BR
MOV
JSR

iSET CYL = O

;

CYLNDR

sssx 70 CYL O
x

}r ABOUT TO DO LAST SEEK
THIS WILL BE LAST SEEK

.CYLN(RS) s CYL = 377

CYLNbR CYLN(RS) zsno A BIT TO PROMOTE CROSSTALK
PC,
ken
SE
stsx
THIS CYLINDER
cvtuoa
iSHIFT ax MASK

2s
:GO SEEK T0 ch 0 AGAIN
#577.P.CYLN(RS) ;SET CYL
= 577
!SEEK TO CYL 577
PC, SEEKER

3 l!!lllliilllllllilllllllllIlllllllllll!illllll!lll!llllli*l*!l!

’:

————— e —

R
AR
i

2
Lt’.
’-

INCREMENT/DECREMENT SEEK TEST

x¥ng¥§s TE Tcgfegg ARE oogg IN xucnsnzuts OFéc ngxnoezé

§23: gE“"RsE 533
K TO rg
19"9
¢ IS cuostn > LC,
rns sesxs HILL

ED IN' THE OPPOSITE

DIRECTION.

lll!llllll!iIlllllilllllllllllilllllilIlllllilllllillll!llli!!l

000005
030462

001324

?sr

SCOPE

nov
N

JSR
J MP

os STESTN

P cuxrrn
t
1576

;

T TEST

R IN APT MAIL BOX
OR LOOF
ON ERROR

E xr x;En Ng. o FOR THIS TEST
unp ro
T TEST

-t &
?ESE oFeCHKITR
ITIALIZE SSRDRIVER
PARAMS
INPUTSUB-SYS
KBD AND
POSSIBLE
;REPflst
A ” TEST

027522
026040
005732
00SSee
032374
005732

00sse2
000002

005736
005734

00sSe2
00ssee

005736
005734

00sse22
00ssee

005732

005734

; SEEK IN5ucnsnep 3
non FC TO Lc
c,fCcyLl
s INITIALIZE NCYL: TO FC
2s:
MOV
nchx P.
SYLN(RS)
T CYL = NCYL1
JSR
PC, SE
.se K TO NCYLI
CMP

BGT
ADD

FC, c

43
IC,NCYL1

CMP
LC.NCYL1
2%
BGE
63
BR
4s:
SuB
IC,NCYL!
CMP
LC.NCYL1
2
BLE
:SEEK IN INCREMENTS, BACK TO FC

83:

CMP

BGT

Fc,Lc
8%

:SEE

IF FC > LC

iBR IF FC > LC
;xncnsnsnr NCYL
1

SEE _IF LC EXCEEDED
:BR 32 NOT YET
ncu;o - DO REVERSE SEEKS
iLC
:DECREMENT NCYL1
iSEE _IF LC EXCEEDED
‘BRI uor YET

:SEE IF FC >LC

:BR IF FC » LC

G
|

8. 05 IFLo

020546

il fel
§
g
E
5507

sggg
3
8510
8511
8512
5513
sgxq
8515

12
0616
020620

163737

00S?

CcOS

ineREFENT BechendRT SBER 484

MACY11 3?2(1052)

05522

SuB

SLE
RBD

e
S
736 005522 8s:
732

CMP
BLT
MOV
JSR
BR

005522

013765

004737
000747

005522
032374

000002

108:
128:

*€%s83%8106 |

ggs*ge*e*; it

L DONE

iSsNCYLI

r rc Excssoso
ACHED
- ALL DONE
(o
chu P, CYLN(RS) :SET CYL = ucvu

gg, SEEKER

;8EEKTO NCYL
CONTINUE

3 63636 3636 36 36 36 36 36 36 36 36 36 3 3 3 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3% 36 3 36 3 3 36 36 36 36 30 36 6 36 36 36 36 36 36 36 36 36 36 3% 36 3% 36 3% 36 36 2 %

firssr [

IN THIS rssr sssxs OF Ncaeas{u?sn.gmm ng; oousnm:n

221’

3c&ék
AND.l.gsxg
THE
&nx)mfi%%?gBnéSn

gsxq

55;.'5?'1u

t»:xcc“sI
IE“BEb g ;arf EPgn&6&5 iufivekge SRSERT?R

5522
Esaa

OSCILLATING SEEK TEST

NCYL

LEEl

X BARREAFU DR BB BN BE BB R DR LB L L F R BB R B BUL AL R LR DR LR B AN B R R BB EE R R ERX SRR

#6,STESTN
ssr rssr NUMBER m APT MAIL BOX
ssae.EEE oaosaag 004;37 ggowe.a:E s tére: §8v
522
SS sfmlr';
ses 'xm
IF
L0Ro 5' 'r' onC THIS TEST
§§§§
30 00013, 021520
; RETURN Jn&
400 0°??snwxvsn
'ERT - PARAMS AND SUB-SYS
J rnonsz?«xm
PC, INITS IF TEST’?n“xu%
"

gggé oaosig oou[J
u;, 852538

50 oscxifgnm ctx rT'xa

2s:
gga

g:w

005732

005734

()

5544

020736

163737

005736

005522

Iigg?g

005732

005734

B EE gy o o

gggg

§555

021012

023737

005732

005522

JSR
MOV
T

§9 005736 005522

S mUm g o

MOV

» i PRE

8%:

OR POSSIBLE KBD INPUT

?E
vkc .
s INITIALIZE
NCYL1 TO FC
NCYL1,P.CYLN(RS)
T ch = NCYL1
Pc
gstxen
B .EYtN(RS)

:
;

;x NCYL1
cv!s
= FC

us'

FC > L

fiégz-jg,; itkoe

&"E

gss !rNB* Exgsso:o

Br_

’

xg o

tg:ncvu

ggo oscxufigrmc gesfg TOWARD FC

CMPO
gke
ADD
CMP

O
¢ NCYL1

{2%
IC,NCYL1

FCINCYL1

k
uso - oo REVERSE SEEKS
.rc Y

| (a2
ggsnfr
g
sxckzoeo
iFC
ueo - m.L DONE
mcnsnem NCYLI
:SEE IF FC EXCEEDED

CZR6MDO RKB11-06 SS VERIF 1

§55?7

10-JAN-78 11:48

ggg;éa

5;2

%737

032374

S Gion pE G

000002

108:

0ooooe
128:
Ee e
—' WEMIVIMI
I NI S RIS s W

RIS oRES R SREERIBRTES STERE

S606
S607
Se08
S609
Se10

RRRRRERRRRRRRRRERRER
KRRRR
B Bt s (s (s Bt B Bt e B B e o s bt ot
s Bt e Bt

S600
Se01
Se0e
S6
22

Bt bt s B

SESRREEREREE

VU
UV

S
g

001324

10-JAN-78
12:16_
PAGE 108
OSCILLATING SEEK TEST

BLT

MOV
JSR

128

NCY

snmnw

v
CYLN(RS)
by

SEQ_0386
SEQ 0107

nsncnso - ALL DONE

?YL
= chu

o 363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 6 36 3636 36 6 36 36 36 36 26 36 36 36 36 36 36 38 36 36 36 36 36 36 26 36 36 36 36 36 36 36 36 36 36 36 36 2 3 6 3¢

l*.l.**‘.l**_’l“

742

MACY1l 30A(10S2)

CONVERGING/DIVERGING SEEK TEST

THIS TEST

RFORMS SEEKS WH CH EXERCI

CYLINDER DIFFERENCE
] ifisk 1

a
T&N ucvt‘f 1S
W?fif% rfin*onc
ag §g IN m: oxnzcr

AND &g% Eégfn?"xg‘segkxm gsfommtzgzgmxfi&r{msg

5"?%331cm‘:g.ggsséz;‘fm ‘fgCONVERGING AND”THEN DIVERGING

= 363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 38 36 36 36 36 30 36 30 36 36 36 36 36 96 36 36 36 36 36 36 36 36 36

t417:

SCOPE

MOV
JSR

#7,STESTN
PC.
gemfr
HKITR

ss rss'r numsn IN RPT MAIL BOX
LOOP5

FOR THIS TEST

;RETURN HERE rnon cm TR IF TEST

rc chu

:iSET NCYLLPgs
IBLE KBD INPUT
=

E§%

1SEEK YO el

ADD
S

Y4
IC,NCYL1
IC.NCYL2

IF FC > L
;xucaen»:m NCYL1
; Eug E

BR
SUB

6%
IC,NCYL1

:me
TS ncuso - ALL DONE
;oecnsrcu

nov

MOV

JSR
063737
3§g

005736
'Jt736

1;
163737
063737
gs
37
735

0057
005736
005734

ncrémzo

NCY(2 IS INCREMENTED BY

MP
GT

DOS734

Ys:

832
S8

;

R PARAMS AND SUB-SYS

Pvl.mns;'snt"cv" ' L(Y:Ll
P CYLN(RS)

1a.g.ucvu

‘°§E¥'c?
5§

;

T CYL = NCYL2

:‘BR

Ex 7O NCYL2

3 L;fl
S

}r FC > LC

CZREMD.P11

EXCEEDED

'INCREF‘
L rm
Y ? Excesoso
NGT
PBRCIF

3 X 112212222222 222222222222222223222232222222 2233322233322 223223222 2

hsT 10

PSEUDO-RANDOM SEEK TEST

CZRE&MD.P11

10-JAN-78 11:48

CZREMDO RKG11/06 SS VERIF 1

5612

ggi ;

561
5618

000004

0212

004737

351253 012737 000010 001324

as 851252
xsgg

S68
ssg

g2l
021266
021274

CYLINDER, WHICH IS WITHIN THE RANGE (0-632).

032554
005514
032374

10-JAN-78

MOV

; stf' TE T nunaen IN APT MAIL BOX
s

JSR
JSR

PC, INITSS

00OP ON ERROR

Col
i ffurTM & Pon e st
o

ngsnAMS AND SUB-SYS

PC,PREPKB
POSSIBLE KBD INPUT
PC w
sgg Psewo-muoon CYL INDER
cyl
.chmnsi
c
PC, SEEKER
stK 10 nxs CYLINJER

JSR
MOV
JSR

000002

lIllllllllll!lllllllllllllllllIlllllllil’lllllIlll!llillllllll!

gggé

.hssr 11

8635

e
¥

?,23.,3

gggg
021300

Se4l

ssué 021
051310

2043
051320
5645

MAXIMUM VELOCITY REVERSAL SEEK TEST

mx's(. ;Esr PERFORMS A sesx T0 CYLI

012737 0000

37 830962

000137
831306
)

001324

mr?w%ggfnégc&90?"70
DECg:
:ITEELPON
mQ.
ES HEATING m
TeKv

TEST
seadTsoe

Tf°“""“

MOV
J§n

énglfsg)

T
gs TT
?EsénNUMBE
L0oP oN ERROR
- BOX

;RETURN HERE rnon CHK m IF TEST'

)

sasa 1344 012765
01 000002
a:gg 021362 004737 032374
s651 Ogl3se Q04737 Q32374

m;?“““f
Wse

oabx CYLN(RS) g
cYL = 201 (0CT)
EK 10 cYL 2ol
PC SEEKER
ggsx
6 oYL 0

ISR

Co NExT Tesr- O FOR THIS TEST

B30I 0600 06000 0000 00000 000000 0000 0

000 36 300 30 300030 00

00 06 000 00 300060 06 00

&gg

hssT 12

MECHANICAL VIBRATION SEEK TEST

5661

GEOME

LY occ

2ees

"‘

5667

¥
¥

5660

Sees
5666

rouougo mxs

1’s?:tlllll!llllll!lllllli'“‘!lllllllfilllilll&!lllllllllllllll!ll

€3 mim mrz e

SeS57

#10, STESTN

PC,5ET ¥P

:RETURN HERE FROM CHKITR IF TEST

S630

5655
5656

PAGE 109

THIS TEST PERFORMS A SEEK TO A Pseuoo—muoomv CHOSEN

JSR

22'40

12:16

*s#:alllli&l’z!llllllllllllllIlllllllllIIlllllillllllll!lllllllili

030462

737
027522
737
040

004737
013765
004737

PSEUDO-RANDOM gséK TEST

;¥

ssgia

EOS

T10

MACY1l 30A(1052)

;;

THIS
TfirPERFORHS ortmx FI.LY mcncnsmc SEEKS WITH

SEEKS

OLLOHING SE

ME BETuesn OPERAT IONS

C %S
TH LC o

AN) ST

= SM. THEN,

DONE BE TWEEN o N TIMES. THEN, ST xs

oxvmso BY 2 mo LC IS DOUBL nno SEEKS ARE DOFE BETWEEN
0 AND LC AGAIN, TEN TIMES.THIS' PROCESS IS CONTINUED FOR NEW

ssosggagme

B
12&

S6e94

1510

iy
NNNNNNNNNNNNNNYNY
TUNUNU b= 5 et s s s s Bt s Pt
N—=0DWVONC"NLEWN-0D

it NNN
SEIRR208

5?3
781

723

1S14
1
1

i08l

1
1
1
1
1
1
1
1
gsx
1
021

B SRR
TE Fa

D-

;RET

ScoPE

MOV
JSR
JIMP
®
?sne F

EXCEEDS

CYL

400 (OCT).

THEN,

ING DOUBLED AND

nagrgsm
sgrTEST NUMBER IN APT MAIL BOX
PC,SET #p
LOOP ON ERROR
CHKITR
rx
n
ng.soron THIS TEST
1513
c"fi ;n IF TEST %%“
.

ngm.'s' 'x"ao'3 'xupumr

Pflé

)
J?fi
sl, YLNO
: DO xncns"ggmc s?s'kg
2s:
MOV
810. ,SCRACH

s I INIT. LOOP COUNTER TO_10(DEC)

ys:

iSET CYL

MOV

8s:
8s:

000002

MOV

S_%,S

.c&fi(

PC,

SEEKE

)

= O

‘SEEK T

RoR
ROR
5
BE

T
smp?
o8 cvinor
sfg

CLR

.cvd«ng)

ASR
ROL
ROL
MOV
MOV

535
JSR

’

SEEKS

CYLNDR
gnw
TMPE
810. , SCRACH
grmé STALLS

CURRENT STALL IN STALL WORD

CYLNDR,P.CYLN(RS) ;SET
PC, SEEKER
; SEEK TO
RACH
;gca;n:

BIT
BEQ

oossie

;Trfl. STALLS

INIT. CURRE
; INIT. STRLLS TO SH

MOV
JSR
DEC

DEC
BNE

00sSS14

013737

2221222222222222222222222223222322222222222222222232
2222222222222

t&T12:

:DO DECREASING

00SsS42
oossie2

SEQ 0388
SEQ@ 0109

WHOLE snocsgs ?Q %&sfsux uogr
LC DIVIDED BY 2, UNTIL LC BECOME

(1A [N
—
£
n
£

1
1470

PAGE 110

vm.ucs OF

Golues

S
Eggé
95
g?

e E-k

1436

2608

cl4le
141
14

—

1
S680
Se81

: =

;;

001324

1370
i

."g Bheg
88

FRAre
PPN
74

12:16

MECHANICAL VIBRATION SEEK TEST

T1e

1366

FOS

10-JAN-78

'.l.

MACY11 300(1052)

CZREMDD RKE11-06 SS VERIF 1
10-JAN-78 11:48
CZReMD.P11

NOT

N Ngnxmsn
CYL INDER
;
1

D STALL BIT
:eD? er
2 I DONE WITH %NCREASTRG SEERE VET
;35
’

;DIVIDE CURRENT CYLINDER BY 2
iGET A
gm.L BIT INTO CARRY
;
E
sTALL
TER TO 10(DEC)
; n*
:
g m
ALL IN STALL WORD
i SET

c“'9
chmRsS
P&ésk
%
INDER
T°"‘&:.#‘
SEEK 7 8
Sc EKER
CREME N OOP COUNTER

SCRACH
8%

#8ITO1,CYLNDR
3

ST,STALLS

;

IF NO

rénss YET

YET
;SEE IF oo
:BR _IF NOT DONE YET

*RESTORE DESIRED NO.

OF UNIT STALLS

; lllllIIllllllllll!llllllll!llllllllll!llll!lllilIlllll&ll!liiil

5
13
MAX ROTATIONAL LATENCY MEASUREMENT
lTHIS TEST MEASURES THE
INTERVAL OF TIME BETWEEN 2 INDEX MARKS
*IN A SINGLE DISK ROTA ION THE_SPECIFIED MAXIMUM ROTATIONAL

:L?EENC¥HE25 MILLI-SEC
+ OR - 2.5%. THIS MEASUREMENT IS MADE
0e2leze

000004

RN
R
R R R R RN RN RERRE

t&T13:

SCOPE

GOS

MACY11l 30A(10S2)
10-JAN-78
12:16_
PAGE
1
T13
MAX ROTATIONAL LATENCY IIRSLREPENT

CZRSFOO RK611-06 SS VERIF 1
10-JAN-78 11: 48
CZR6MD.P11

s724

1630

012737

8
B
Bl BY
BiET
BT

EndB

752

S;gé

{

0s7

003133

734

1674

AP,AN

IInNNNINININININIIINIiIvIVY

576

770
577
577
S$773

1714

142765

17
1734

7
1127

17% 1 576
glfl?
1794

0001eS B
000020

040316
000001

022422

003120

161066
000007
000016

774

142761

000020

;

0016
033150

022072

37
022010

022076
022102
022104
022110

737
2024
080337
005537

104407

10000

034136
003176
003200

ua $TESTN

&2 T50p
Pc cumn

T TEST
R m flPT MAIL BOX
sé?
2OR
'“85
xr IT n NO. s o ron THIS TEST

IMP
JSR
ISR
1578

15t1y
PC, INITSS
PC’ PREPKB
potim

JSR

PC,CALBRT

St1

rom:x 45P
%AL1 BIBRATE
10
sorrumc TIMER

PC, INIVRB

f '?”vg @:‘ ':?o BE USED

MR
JSR

Begmr
e
PC,
DRVCAL e ;00’AR
r&rgsz
FORMAT TOO

TSTIY

B 2

2;772 022074
5776
777
5778
S779

fg::

032712

?‘%

W ~N

£2

£z

MOV
TR
JSR

um T0
T TEST
nun
P&
DRIVER PARAMS AND SUB-SYS
SIBLE KBD INPUT
}r
muuc TESTS ARE ALLOWED

;RETURN HERE FROM cumn IF TEST snou.o

i
b 33 §
82
ol ¥Sl
22
¥.

001324

SEQ_03e9
SEQ 01 10

000007

000016
000000

CLRB
TStING
CLR
R3
;READ HEADER TO INITIALI

MOVB

sl éguc

{uqan 1c, ¢ ; SCAPE
nsuhs
COUNTER
Format BIT ;

HOR TO F!
: CHANGE FORMAT AND
es:
CLR
RO
; u;
geg
flcw,mc i SET

BISB
BIS

6S:
7%:

glTSTv

#8.CFMT,P.CS1H(RS) ;
8CFMT,P.CSI(RS) ;C

5&3«}*?22)
RO '

}
51

gggm

PC’ TOPROC

JSR

sc REPSUP

FOR CALBRT

PENT

NDICATOR
sn ADDRESS
T ap10 1

n‘r alr

;
“&a'n‘nng'D YET
ggc
:
MENTTIMETINE xuoxcmon
onné'?REPORT
ctmtn smmw————

5o
198
c&"?B
. CHANGE FORMAT
AND
READ HDR TO ntasus:
&}:
8s:
gtg
gg
% ; “nx 8, n-:naum moxcmon
28%:

ggsnsc

MOV
I

RS,R1

BIC
MOV

#CFMT . P.CS1(R1) AS
P.cS1tRi),RKCS1(R2)

BICB

JSR
78

:savs P&mch.x
noonsss

#B.CFMT,P.CS1H(R1)

PC, TIMER

; ME

;COMPLEMENT FORMAT BIT TO O

:ERROR

MENT F
READ

T BIT 10 O
HDR TO FIND NEXT INDEX

HE TIME TO NEXT INDE

RETURN ROOR;SS

; CONVERT MERS’D CYCLES TO TIME n!5 CHECK RGAINST LIMITS
SAVREG

SR
28%
333

PC,CNVTIM
gahsum.ox

; SAVE_RO-RS

: CONVERT MEARS’D CYCLES TO TIME
‘ERROR RETURN ADDRESS
;ADD CONVERTED TIME TO SUM

CZR6MDO RKb611-06 SS VERIF 1
10-JAN-78 11:48
CZREMD. P11

060237
004737

003200
036332

f81610

003214

s
000000
057467

535
§§ / :%R
sComP_LO BITS To LO MIN

308:

ng gm}nk

'SET NEW MIN

RfigXIH

:
HI
BITS TO HI MAX
i:BR
BR IF
<
g&x
IF > MAX

062031

ELO BITE oL mx

ggx

g
mx
Hip

s
é&mm.ox
WMIN
SMAXHI 1

:SET NEW MAX

&rfis
égcp
Bh?
cnps

LOani TO LO MIN
on;mz

°1'&°1§§E"9“
TIMES BELOW MIN
H
HI aw's % }

R2, SMAXLO1

Haxax,réxro LO MAX
IFARE5 LO
1B
;c

B
s128. R

iggfi&
Fe
:
xae ME

?Egnsc 583m

OB
czEP

888205

555

T OF TIMES ABOVE MAX

DVIDE sfin
BY 125’
T0 GET nvsanctTIHE
E
B
"ERSURE"ENTS v
MOV
87,RY
O0OP COUNTER
=
24s:
333
gfivx DOUBLE -WORD sun BY 2

000007
003200
003176

£ NS

scxrxso LIMIT
COMPARE HI ans TO HI MINIMUM

ggg:

003172

.
’
hs T
152"’MESEF;“S ’ et

}Sg::

882060

b
N
0Oon

55898111

3os
R3mINILI

34§:

003220
003216

SEQ O

BLO
cre.

003216

W
N
()
neEoccEN

HOS

10-JAN-78
12:16
PAGE 112
MAX ROTATIONAL LATENCY nensuasncm

pc’ ‘rogumsm
ot
CK Fn8§ ( 3§ nénfl
1 KBD INPUT
; COMPAREJ
rs-na
ncst
mt;COMP_MI
%
BITS TO HI MIN

3214

= ft 868eo 88

Ti3

003z12

—

ASEREFFES2REY

RRRRRRRRARRRRR

ey
Sy S oy S
e

022114
022120

j=
O
wr

e bt Bt

e e

o e

N0 UL W

i8SFRREN RN

SN
2082

780

MACY11l 30A(10S2)

ROR

005770

SHHLOI

K
P Ia%r
#BI1T03,CS
BNE
368
TYPE
ROTIMS
:TYPE

RS
R
;; SEE xr%“”?
TEST REPORTS
SHOULD BE INHIBITED
50«75 SHOULD
BE INHIBITED

TIMING MEASUREMENT RESULTS' (IN ozc

e
MOV
aLfinxu,-csp)
TYPDS
TYP

TYPE

,BELOW

LIML

Wl
MOV
nevnxx -(sp)
TYPDS

:TYPE "ROTATIONAL TIMES :*

:GET
COUNT OF TIMES BELOW MINE
; ONVERT AND TYEE 35
YPE * OF 128

BELOW

MIN OF

:TYPE SPEC’D MIN LIMIT

IR
:GET COUNT OF TIMES ABOVE MAX

:CONVERT AND TYPE IT

cznsnoo RKG11/06 SS VERIF 1
CZRE&MD.P11
10-JAN-78 11:48

Y4
37N

40l
27
7
104401
012777
000177

012044
3176
asg
131
045270
177256

109

MACY11 30A(1052)
10-JAN-78
12:16
PAGE 113
T13
MAX ROTATIONAL LATENCY MEASUREMENT

23’5 355390104401 813340 7

6841

022410

022416

160422

Sa4Y

$ o S22

gggé

(022430
022432
022436

100002
000137

Q00002

045270

2%:

022440

000004

5865

022442
022450

012737 000014
%737 030462

see.5
“? 022454

RTI

;s
.INTR

:BR_IF NO snnoa
.LET DRIVE mocsss THE ERROR

'RETURN FROM INTR

ts#t:IIl;zaagllll!llIllllilllllllllllll!llllllllllllllillllllll!l

737 030530

001324

g% et esnsilionthe

58
022464 004737 027522
587
gm 004737 026040
ssg;%
74 105737 003133
5874
;
000004
;

004737

2873
ggé
g22760
58
14
737

3; ggggoa

4
oaes
gg

27
éar

022564

004737

022570

012703

12
003153

37 %ggoo
036332
003212

MOV
JSR

ISR

032712

033204
&gggs 000117
000002
004737
040316

gg
58
5881

5891

BPL
JMP

RKCS1(R2)

i
S0 elmvsgeg..
RR g e, 18
lTI'E SPECIF D0'?
CYL SE P?IS ¢ 8 HI -SEC.

gggfl

5890

m&s *Esr nznsunzsfl-é' '?En:” ssfouxfis"fi '5 EK ssnesn a n.mcem
EKS

5889

;SET
RKO& INTRHANDLER
: SEE }r CONTROLLER ERROR SET

;

lIllIIll!llllIlllIllllIl!ll!ll!lllll!!l;gfi;g;gl#llllllilIllliil

2861

ggg
2!
5_!83

Il!lllllIIlll!lIl!l!'fillllllllllllilllllllllllllllllllililllll!

5857

. or 28 neovs MAX OF *
6 MIT
PO m TO nv Txns
> <|.r>
0& HANDLER ADDRESS
mocsso TO NEXT TEST

3633636 3 36 3 36 3 38 36 36 36 36 36 36 36 36 3 3 3 3 36 36 3 36 36 36 36 36 36 3 36 3 36 36 3 3 36 3 % 3 3 3 3 3 3 3 3 3% 3 3 % % % X

ALEDHD: IsT
INC

2629
ng

875

,ABOVE
LIM2
kSumLO1,RI
PC, TYPAVG
SCRLF
kI.INTR, JRKVEC
als

ispscm. INTERRUPT HANDLER FOR READ HERDERS IN ROT. LAT. MERS. TEST

sawE
E; 022422 005200
S848 022424 005762 000000
5849
5850

368:

TYPE
TYPE
MOV
JSR
TYP
MOV
JMP

SEG 0391
SEG 0112

PC.CHKITR

; s; TE? NUMBER IN npr MAIL BOX
%E; liP gnLOOP ON5

ron THIS TEST

RETURN flc"';e
raonszuixm
IF TEST'JU
tTJO "
JSR
PC, INITSS
;'fnx m&?? ngsn PARAMS AND sue-svs
JSR

18:

1578
JEI'PI2

TST1S

5;:

000001

214 sr;sm
PC,5E #w

JSR

JSR
MOVB
CLR
"ERSUREJ’_S_;ROR

&s:

PC. PREPKB

gg'rxn
a4s

PC,CALBRT

'no":oc
JSR

SIBLE KBD INPUT

:CALIBRATE THE SOFTWARE TIMER

;ERROR RETURN ADDR FOR CALBRT

PC, TIMSEK
gxfis&n}ox

RO,
SUMHI 1
PC'CTLOUT

; INCREMENT CYLINDER BY 1

:MEASURE
A
SEEK TIME
;ERROR_RETURN ADOR FOR CALBRT
:ADD MEAS’D TIME TO FORWARD SU
:CHECK FOR (#C) OR ($Z) KBD INPUT

: COMPARE FORWARD TIME TO CURRENT’FORWARD MIN AND M
MOV

PC, INIVRB
:INIT VARIABLES USED
#SEEK,P.CMND(RS) ' :SET
SEEK COMMAND
P.CYLN(RS)
;INIT CYL 10 O
P&gsvg?hs
;D0 INITIAL SEEK TO CYL O

INC "'np.cv N(RS)

JSR
15715
ADD

;PRE

gs ;ranmg ESTS ARE ALLOWED
:SKIP TO NEXT TEST

sMIN xu.na

;SET POINTER TO CURRENT MIN AND MAX

cznsnoo nxsu/os SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

5892

022574

5833
5894 3552&
5895
ggg;
§838
sgg
5
ggé

€903
g&
sg%
5
s%
5

EEEB
19

004737
020037
103406
1003

MACY11 3onuosa)

033624
007220

JSR

003172
017760

000002

26
SZ%
W
33330?5
4
argg
i
44
g4

2650

%gx

537

737

2915
4 012
003222
2315 053858 945737 933e%]
5913

8559"
00
022702
704
2710
852712
2716
022722

022730
022734

004737
032737

033676
000010

ggg?

022754

004737

033770

022724

05?.3;
1
mxoo;
020137
101402
005237
005765
001343
013703

108:
12%:

128
108

ABVMX
INCREMENT COUNT OF TIMES ABOVE SPEC’D MAX
L TCYL P.CYLN(RS)
§es
IF LAST FORWARD SEEK DONE
3
;BR IF NO

ADD
ADC
ADD
JSR

R1,SUMLO2
SUMHI2
no,sumx;
PC. CTLOU

R1,MAXLO2
12¢

iBR r mx
'BR

comms
LO BITS
TO LO MAX
,an IF <
MAX

: DECREMENT CYL a 1
I:ERROR
MEA
ARETURN
SEEKADDR
TIMEFOR CALBRT

:ADD MEASURED TIME TO REVERSE SUM
CHECK FOR (1C) OR ($2) KBD INPUT

et JSR EEJ%»'ELTORngE"T
BEYPOINIER ro' :cfl“nnsm MIN AND MAX
BRTNEET
1R
| COHPRRE 16 MEAS’D RIN AND MAX
; COMPARE REVERSE Ttwo
SPEC’D fAX
LIMIT

007220
007216

003174
000002
017760

ggg 33 742
001257
7494 104401 011644
5929 022750 012703 012101

COMPARE TO MEAS’D MIN AND MAX

BLO
BHI
CMP
BLOS
INC
CMP
BNE

iQE- IEogcm:vmp cszfi'(( TP‘
JSR
Y&nsgs
15715

003202
003204
003204
036332

'55914
918
sex;
591
5918
5919
5920
6921
5922
§923
5924
5325
6926

TIM

; COMPARE CMP
F ORWARDRO,
Tine
70 SPEC’D MAX
LIMIT
MAXHI2
,comm: HI BITS TO HI MAX

137 007216

1 wo;
37
3765
134

JO9

10-JAN-78
12:16
PAGE
1
ONE CYLINDER SEEK TIME ncnsansnem

005770

CMP
Rg‘
12
:
Ha BITS TO HI MAX
0
1
;
a#
68
iBR r MAX
c
1, MAXLO2
conpms LO BITS TO LO MAX
BLOS
18%
iBR 5 < OR = mx
168:
INC
ABVMX2
;gsnc COUNT OF TIMES ABOVE SPEC’D MAX
188:
ISt
P.CYLN(RS)
:SEE IF LAST REVERSE SEEK DONE
BNE
148
:BR IF NOT & YET
; COMPUTE FORWARD AND REVERSE SEEK TIME AVE
MOV
LSTCY
R3
;GET NO. OF MERSUREMENTS
J?R
GETAVG
;C TE AVERAGES
: TYPE TIMING rtnsuhgnsmRESULTS’ (
;mu
BIT
#BITO
,sss 1
MING TEST REPORTS SHOULD BE INHIBITED

MOV
JSR

2335
g::%

1
bneovg R3

PC,

TYPTHS

;; vpéF-or;
negoms
gugu.g
NHIBIT
CYL SEEK TIMES
:GET POINTER TO MAX SPEC’D LIMIT MSG
:TYPE TIMING TEST RESULTS

Ilillléllll!lllilll!l‘g;llllllilllllllilllIlllllllilli«llli!lll*

5936

¥THIS * T MEA
A
EK TIME IN BOTH THE FORWARD
'gnfil_
vf s%?xofg g:i éafi&i
fi
CALCULATED FROM THE

£939
5940
gg:o.é

0*
nxg
= (Tl(q 0)( )+T (499)(2)0 LATHI0(1)(2)1/7(410)(410)
T
SEEK
X CYLINDERS.
:ggggaggsm “REVE
xnss ms MEASURED mo TYPED,

5943

i #THE SPECIFIED nvsmcs SEEK TIME IS ¢ 38 MILLI-SEC.

gggg

5944

S945

5946
5947

:% CYL 814 USED FOR THE RKO7
022760

0Oee7e2

000004

012737

2222222222222
222222222 2222222222222 2SS TS SIS LY

000015

001324

t&T1s:

SCOPE

MOV

#15,STESTN

; sSET TEST NUMBER IN APT MAIL BOX

SEQ 0392
SEQ 0113

S
e

WWWWww

MACY11l

KOS

30A(1052)
10-JAN-78
12:16
PAGE 115
T1S
AVERAGE SEEK TIME MEASUREMENT

JSR

030462
030530
023316

}nsg

JSR

003133

18:

5;:

832712
033204
000é67
040316
2
be
See
00SS4e
S22
12

0oss42

000002

011617
3176
3200

INITSS

PC’ PREPKB

s INITIAL

;

IVER PARAMS AND SUB-SYS

OR POSSIBLE KBD INPUT

ggfxn

:SEE ;rn&x_nxm TESTS ARE ALLOWED

JMP

a4s

:CALIBRATE THE Eonums TIMER

JSR

JSR
CLR
MOV

PC, CALBRT

:SKIP

TO NEXT

TEST

P.CYLN(RS)

;SET

: BCRERENT COLFPTCIENT

¢, DRVCAL
NCYL1
LCPI, SCRACH

CcYL =

:SEEK INITIALLY TO O
;§sr os T mtiou CYL INDER
TINIT
FICIENT TO 411(DEC)/B14(DEC) FOR RKO?

MOV
JSR

ch#x P.CYLN(RS)'
PC, TIMSEK
;

SR
JSR
IST16

poakiNGRD)
Pé,%HSEK

15716

017760

UP FOR _LOOP ON ER

.§£E x;oxrr*s:;. v;ggTz 0 FOR THIS TEST

;ga

CLR

;SET

SEQ 0393
SEQ 0114

OB
oy
ST
00N FoR caonr
MOVB
#SEEK P.cnwmsf-gt
K som

000001

3514

033560
00ssee

PC,SETTUP

FT'ts:ttl:L«xm

:RETURN HERE FROM CHKITR IF TEST’
JSR

unnnNIININININIYY

NNINNNNINTNNNININININIIVIVY
o \B\0:0\0

n
NN

SRRB3 A2A A Sd A LT R
R
R5
§
AR
K& R % NERRE FERRE28z =RSheiee B
23

CZREMDO RKE11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

A FORWARD §s K TIME
TURN ADDR

CALBRT

1+
&A ngvsnsc
o pndbmngndianr
.insl.%
EK TIME
:ERROR_RETURN
OR CALBRT

JSR
PC, RVTERM
:C
TE
A nsvsnsrf' TERM
&m;
NCYL1,LSTCYL
:SEE _IF
YETmc YE
TYPE
AVGSEK
:
“QAVE
K TIMESTM
;DIVIDE FORWARD gm §$ (um)moi/tsmzaw') “Foé‘fim
ngx
UML 1.50
;GET DIVIDEND

5
ngs

MOV

JSR

gg‘\;

HOLS;,MR
:g: L.n.bpaio
na'smsumoi

;GET DIVISOR
; PERFORM DIVISION
:GET FORWARD AVG

:DIVIDE REVERSE SUM BY (410)(410)

BER

ggv

%’E;hi'fi?

MOV

MAXIL2.R2

TYPE

FORWRD

TYPE

, REVRSE

?g:.!
ggxgugfiga
ggx
sg:s&mcx)g
; TYPE FORWARD nvsnhcss'

:GET DIVIDEND

PERFORM DIVISION
iGET REVERSE AVG
; TYPE " #%%FORWARD DIRECTION#¥x"

11722
3176
034260
Ol226e4

MOV
kSUMLOI,RI
JSR
PC, TYPAUG
i RE\T/ESEE nveggggnx

:POINTER TO FORWARD AVG
i TYPE FORWARD AVERAGE
n
:TYPE “SPEC’D MAX IS 40000 US

011740

; TYPE “#%%REVERSE DIRECTION*»%"

CZR&PDO RKB11-/06 SS VERIF 1

10-JAN-78 11:48

6021

602

1
00
es
B30q
73
g3332 005
004737 030530
3316

000004

023336

000137
.

023342

004737

023642
027522

(e ———

2355

RRR
23
2R

252
U‘S

LL -

«lllllllIlill»lllli!lIvlIIl"Illll!lllliliill!lllilllllllllillllll

t&Tie:

R
JSR

SCOPE

FOR THE

3&552755"‘

ggTfi?m%nIN_APT_MAIL BOX

PC, INITSS

; INITIARLIZE DRIVER PAR

PC.CHKITR
JMP
15t17
UMP TO
; RETURN HERE FROM CHKITR IF TES

18:

E@a
Fg
JSR

5§t?§£ma
4s
PC,CALBRT

NO. = 0 FOR THIS TEST
XT TEST
RUN

SuB-SYS

g&’?fl‘nnxm"’?flfi‘nfi?mI.ESUuETo
:gfix
NS"L‘I-ED TEST
.cnum THE SOFTWARE TIMER

7 oOSEEKe
GRRQRSETUBN
ODR FOR CALERT
P.CMND(RS) :SET SEEK COMMAND

MOVB

838002

CLR
P.C&fi(RS)
3 AgIT ?
TOSE
316
JSR
PC
VCAL
:
%N
T!N.
KNT TOCOUNT
CYL O
005037 00SsS42
CLR
kflCH
; INIT ME
%37%'5% 000002 Agmsmsnszflmmg%vftfisé'%nmnm ,gsch = 632 OCT, 1456 FOR RKO?
'HSRSHRSEusfio&"FR CALBRT
firw
;
003176
noo
n
SUl'I.Ol
’noo
MERS'’D mt TO FORWARD SUM
oa:mg 005537 ooggoo
; CHECK ron (m OR ($2) KBD INPUT
Pg 3*'%'*
gn
853320 8393; 325332
sy3aumo T%N"Ex
RguansNT ¢
NTERR
cflggsm
TO
MIN AND MAX
GENEN 27
BTD SR=z
TR
A

2332
023464 020037
007224
60S0 02
103406

BLO

gggs

%oaaa

007222

SEP

60S4

023502

005237

003172

60S7

023512

004737

033312

B0S8
6059

o I8Bl

% CYL 814 IS THE
L

INeFTeEte..0K 1S vooo us

TGE pPss
-

10
023414

60S1

SRR

MRS

6034 85%0‘0

1
gg:‘o
R8

SEQ 0115

ITHIS %EST rtasunss Ilt REQUIRED TO SEEK FORM CYL O TO

Sl
G mwe o,
6033 023376 112765 000117 000001
soug

SEQ 0394

AVERAGE SEEK TIME MEASUREMENT

";¥ugnuui;a;|unuunnuuunuu“lnnuuunuun

?&7- 853?32
ggfi4 %09;
000004
€050
004737 032712
603S
6036

LOS
10-JAN-78 12:16 PAGE 116

Gie gud) glsee

e o Bt
s s e

6013

T1S

gesers gizre) goseos

s Bt e

ONOCNLWh=-0O

SEEEEE SO

.P11

MACY11l 30A (1052)

023472

10100;

06 00S06S 000002

023516
023520

023642
060137

003202

ngnmum5?

BHI

é‘MXLOH

"asunslgcasven
8 seéx Yo

15117
ADD

gchmRs)
PC, TIMSEK

R1,SUMLO2

;conhmé
HI BITS TO HI MAX
;BR IF
¢ mx
;

;

53 ax;g TO LO MAX

xncnsrtm COUNT OF TIMES RBOVE SPEC’'D MAX

ser CYL

TIME

ennon srunu noon FOR CALBRT
:ADD MEASURED TIME TO REVERSE SUM

;

023524
023530
023534

00S537
060037

004737

MACY1l 30A(10S2)

Ti6

{81083

3174

005542

000200
033676
000010

005770

168:

188:

SEQ_0395

INC
CMP

R1,

MAXLOY

SCRACH
#128. , SCRACH

e
®JSR* aam PCs ceh
T VG
BNE

SEQ 0116

TCLRRE1 &VEK
FOR
“SM)OR(tZ) KBD INPUT

commen&vsnss
%sSPEC’D

007222

000200

PRGE 117

SUMHI2

; conpmejagvsase'p?t

007224

S4e

12:16

MAXIMUM SEEK TIME MEASUREMENT
ADD

8e384 88579 g
020037

MOS

10-JAN-78

ADC

003204
003204
036332

R
&

—

280 oSO
R A RAE R B

CZR6MDO RK&11-06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

6§

MNTSR
TRSQBRRENT flN&N
AND MAX

i€

: %‘ans T0 HI MAX

: COMPARE L
;?n ‘r <

axrs TO LO MAX

: INCR COUNT OF mts neov: spsc D MAX
; INCREMENT
i€ Fr
oor: WITH%ae r:nsunensms

szsk&*m%mfiaswfltms

; TYPE nn{nc MERS nsmnesu.rs (
BIT
BIT
E
ng
TEST REPORTS SHOULD BE INMIBITED
1
o BE INHIBITED
TYPE
rm -mxxwfl SEEK TIMES"
MOV
bnaovsa 73
:GET POINTER TO MAX SPEC’D LIMIT MSG
; TYPE TIMING TEST RESULTS
TYPTHS
JSR
Illlllllllllllllllill!illlllllllllllllllllllllil!lllllllllil!ll

°§§ E

030462
620322

[

001324

027522

866123 000001

e e Pt Bt Bt Pt Pt s Pt ot Pt Pt Bt Pt

oorororor
o oo oo oo oo O

&
nswn—-oO 3BIRRZER838

éggu @fi

i
023744

i 001176
001174

023752

157360

883768

883752

023770

385
000

000010

000012

sncnu}m
fims mxn;u

uut Sréc'
'x DONE, rouowoa?

*g#:;!llllsggllllllllllllll&llllllllllill!llllllllIi'il!!illl!li!

§3v

Pgsgrgsm

sgrTE;T nunaea IN APT MAIL BOX

O onggg
E IF ea-%Ro.
HKITR
?gfgo
;
UMP
TO
rf
i
”EQ
;RETURN HERE FROM CHKITR IF TEST SHOULD
JSR
JhP

THIS TEST

J2R
MOvVB
ov

P&’
PREPKEP. CMND(RS)
AREPARE ,sgfl R%??E%Er
L RED
?RBUT
SWRDATA,
38
F ,P.(f‘Y N(RS)
%

MOV
MOV
CLR
CLRB
MOV
ng

FC,
32
F
gnt 7
.SECT(RS)
meur P.BALO(RS)
ggs 'P.WC(RS)

MOVB

FT.P

K(RS)

;SET NUMBER
OF SECTORS'IN R3
ngv

TSTB
BNE

#20.,R3

FORMAT
43

CK FT

s:-:r PACK ADR FOR ERROR PRINTOUT

;SET SECTOR = 0
:SET DATA BUFFER ADDRESS
:SET WORD CNT

FOR 256(DEC) WORDS

ssr R3 INITIALLY
= eo(oec)

'DETERMINE THE FORMA
:BR IF 20 SECTOR ronnm

RKE11/

RIF 1

Eish
6l
6l

bl2i§3
2}%
sx;g

0240

024042

024074

2{3..

{

sxg; 3531

1
0047

105065

2%2?
6168
6169
6170

6171

000004

121

éfiu

12701

JSR
¢

noa'vE
JSR

0316

000001

3554

024260

Riorq N uoR+
woaocn
oo
= 22(DEC)

s§3

8., SLPERR
Pc'ssfi

cgéc ‘)m

om0

(

EEm ng gfrrsn
WITH SECTOR NO. + 100(OCT)
;% c onunnisn YET
:SET
nnon
:SE {S"m gzoopog« ERROR

;xunmuzs

10 O

005542 .
munuuu 005504
005

001202
001204

clm 137 177776 001206

105265
120365

001272

000100 154702

000400
000004
000004

A, P.CMND(

5'659
E.IJ;

gMc7' NIT. m COUNT
neggnn nscbo’s'- ;g: }r an SECTOR ERROR OCCURRED

Efl\a'

cof e U

36 001004
oauguo 005204
Yoy,
352704
1333
024254

SET R3

JSR

ngon
INC
Efl
8.'_"7'

1
oeuzég

Pé Oggsc
52?5 SEC (RS)

e WITEL&BE bl P,

%27 000005 063446
164
7
Y
128:
1
figf% %gof 154742
29% 000012 005542

sxgg ggfi

6164
6165

024030 001110
030462

SEQ 0117

e Eay "zc"'?55 T

ADD

§EH§

gi 7 0242
6160
6161
B162
6163

1
304

SEQ O

o AR P NOPRE
SS The “TEST

108:

el
geik
2{33 §§:i

6155
sxgs

351058

25700 034304
000100
“ e
g%""‘s’-""
i G50 ?SSISSTuxm sscron
OR_NoO.+ 100(0CT)
g?:?
JSR Pcl;f
s
-Lono
66-2'7 ou“oa“:1’:1. — ;READ THE?gga%cronPC.figcv’“c#': TPES%T
O(RS) Stum T§
CK R + 100(0OCT)
&

gi% 853i g
g{:g
i

6150
fi%
2‘%53

NOS
16 PAGE 118

10-JAN-78

MOV

BEIE ¢ é4
W

si
gig

30A(1052)

s WRITE Tnsovgumsrfi
g&g?on
WITH r
4s

R
P L/ S aNSE 1 e
e LT Sl
15
1

MACY11

CAL
,

Sogcm»
ACH

B Bl
g.oras»,é

;

Efia 3’ £
: CHECK

OR INTO MEMORY

oms BUF INTO Rl

g CTOR + 100¢OCT)

LR,
I secTon
§TYJ. ; ”gosa%oum

SCRACH
$BIT0, aSKR
oég..scmcu

: INC ;En? E
ggse Fns nnong*
5328%" BE REPORTED
zgs}r
mtnsc) ERRORS YET

148:

MOV
MOV

E%on

gatm) $REG12

,gegeDATA

208:

BNE
INC
CMP
BNE

228
RY
#256. ,RY
108

iBR
IF J
: INCREMEN
i SEE }"'
iBR_IF NOT

BNE

:BR IF NOT DONE YET

22%:

; R

BIT

INCB
CMPB

4, SREG10
RO’ SREG11

8BIT6, 3SWR

P.SECT(RS)
R3,P.SECT(RS)

uono
:GOOD DATA

;gss }Eugc 'T" Iul
RROR SHOULD BE REPORTED
ERROR SHOULD BE REPORTED
D NUMBER
T
commmc YET

: INCREMENT SECTOR
NO.
;SEE IF ALL secrons CHECKED YET

2222222222233332222233232232323332223233332232233332322333
3222223

1&TEST 20

TRACK ADDRESSING TEST

MACY11 300(1052)
10-JAN-78
Te0
TRACK ADDRESS NG
;%IN TH s TE T,

NN
wn

' ¥THREE

cron FS OF CYL

SEQ 0397
SEQ 0118

FC IS WRITTEN WITH 256 (DEC) WORDS

SECTORS ARE WRITE-CHECKEDTO DETECT

001324 15120: Bov
-

IMP

P— JSR

TRACK ADDRESSING PROBLEMS.

420,87;:;n
PC
CHKITR
1stai1

;gir
LJEST _MUMBERINPTMAIL BOX

IFxg ng = o ron THIS TEST

cmfm
o o~ f
%m ?n
R PARAMS AND SUB-SYS
ng
:
POSSIBLE KBD INPUT

MOVB
A, P. CMND(RS
1 m COMMAND
lgg 000001
000002
MOV
FC,P.CYLN(RS)
;SE
CLRB
P.flacxm§)
;p
mncx NO. TO O
MOVB
FS,P.SECT(RS)
516 000004
0825
000010
MOV
,P.
omsi
FERORADDRESS
12765
177400 000012
o1
MOV
#-256.
,P.
(R§)
§t
256(DEC)
qgnns mgmncxpngnc (&g(% ) A r%oor 'r‘mmxs
0,1,2 WORDS
116500
PtI:OE Be c ’ :350 wo(ocn Téf?“mccx"go + 100(0CT)
7%2 80100
034304
1276
61§

11376

oy g o
S
S
g S
[ Sy

PAGE 119
EST

CEAEFRBAFLBLEBRERPER
LR RS R EP L LR R BB SR AV RLERRRB B L LR RSB LRER SRR R L LS

040316
000005

A
CMPB
'3,P.TRCK(RS) oh? ;r qr

00000S

JSR
PE;s:f‘
ISR
c
:WRITE A SECTOR nw WRIT-cnscx RLL 3

X ;g
6% %53 mcm
OB
ERT
000001
?gxa ufiBa 5

Ye4

024472

JSR
INCB

024476

S06
024514

024516

1355

000040

Ts wmrsn YET

e ;00 A una'E-cnscx OF THE 3 SECT n&n'r'gnwn;";Eg& r%n2‘""

R
RRRRRRR RN
VRRECRES DONCNEWN-0O

BlO

T%OF T
N3E 04‘3'r ?onsncoésacx1am£nn
:: %0F THEsg SEC?&é‘“’
ssc
ts DONE TO vsnxrv
TES. mtn
EACH
is ne-unmzw AND AF ;H unn ALL
OF THE

OO OO

gasaatiaes§§§§§§E§§§§§§§§§§§§§§§3§§§”

OO OO OO OO OO OO O O OO O O O O

CZRSHDO RK611/06 SS VERIF 1
CZREMD.P11
10- JAN-78 11:48

CMPB
BNE

000005
RWDTST:

RWTINX=¢STN-1> %2

PC nxc
tnco«RS)

oa .TRCK(RS)
68’

FOR LOOP ON ERR

T K0T RS
1N TT;QCKKNO
RR
(RS')E ;fing‘x‘ Es 8"& COMMAND
:WRITE-CHECK ALL 3 SECTORS
: INCR THE TRACK

;SEE IF ALL 3 'mncxs RE-WRITTEN YET
‘BR IF NOT DONE YET

:R/W TEST INDEX

llll!l!lllli!lllllllllllllll!lilllllll!lllllil!ll!l!lllill!l!li

'iT T 21

RERD/HRITE DATA_TEST

lTHE READ/WRITE DATA TEST HQS 2 DIFFERENT VERSIONS DEPENDING

;%0ON THE VALUE OF THE DATA PATTERN PARAMETER(PT
I
‘* FORPT
=0 :

CSRRSQO
RKGl 1 /08 §&V§§IF{1
1

MACY11

Cl0

30B(1052) _i0-IAN-78 42:46 PAGE

120

*E0:P3%19

A HRME L

e
v
AT YAus
e HAT
TP
TRe
SPIRALING
occunas ON me
secrtm mmsu EACH TRACK.

i
ge3
es%8

lTHI?TEgT%&G
READ/WRITE FUNCTIONS ON THE ENTIRE RANGE

mm
.C

gs3s

9 e Chay, Tinp 1 B CBCRL
e TS BTl
'Mfim &W
n:mm
ke uc ch
omn'gna?ovsspecmso

.SH&“?»&&':E& SECTOR
WG WORDS OF THE_ CLRRENTU ST

5“39

se:?
£
6249

S
LR R

ggg?

PR DOLICEIRT

.%ggs
nén'35cat

552

1‘glllll'l;zl'llll»llllllllilllllllllllll!I!Illllll'l!llllil'lllIlllll*

B
mam
&53 322355335 EEmm
%xg;
430 o T E
63

2523 o24542

737 027522

% R
5

13;B %’}8o s Fen

R ..

R
w-or-#nss ROUTINE

S "55‘ FROYcuxim IF TEST% anns mo sua-svs

I opr ey o 08 - L
;E
6 (INS FCofi‘ctNCr§nE
mso) ro

o B8

SRR

@ Es:%q
'"ER:*SP}’ nYTA TEST DESIRED
W
BB
¥ 000010 i Fmmov"ms m’fi"a&‘&% T R/W_BUFFEa ADDRESS
O

é%‘i m gfi% m 000012 32 '81'(.:)63 ;fi&u%gg;ucms);?flg? 'T‘ngronssscrons

B74
25;2’

85:3235

L MR

6277
5;3

g‘grsg

B58s
6283

024676

6280

762

2700 1777

e 6$:D

000010

£90013737
009782 00SE02
013737 005764 005604

B
BRleeugia
J
PC, CHKLIM
: CHK
COUNT AND PACK ADR TO AVOID OVERFLOW
[

:RETURN

ADDR FOR TRANSFER NOT ALLOWED

:SET PARAMETERS FOR NON-DEFAULT DATA TEST
s:
,'}88
%‘P.
0(RS)
5 ;ggg{rg ?;331

BIC

Rov.

MOV

u7§?74 RO

Ra'praTI(RS)
MR$2, PMA+2

0 2 BITS

SET BUF énsnéshég

024716
024722

Cco47

026604

00S732

[l el

XOVLAD

KT11

000002

AR
NITIRLigE TEST
FC,P. CYLNRSS)
9
.1R+
R1 P
o

#3
—

52
~N

154026

=
£

154016

208:
22s:

000001
153774

24s:

003136
BRB418

000001

005760

880665
024636

000004
000030

;SET XXDP OVERLRID INDICATOR

EEE

gg?flGEHENT PRESENT

; PREPARE MEM MGT FOR RELOCATION

INIT CYL. TOF

PflTT POINT

Bt
"";spsi
o
FEREETED
c’tcxso ON THIS CYLINDER

'co

novg E%:E::sggfi?; :{NTiI I'I'%
gron
T0 FS e
NEG
SC"&‘“"E%"
s MS%RP?SM&R
TO AVOID OVERFLOW
5&5
.
: 'S:
ER NO Su.o5

154100

000001

SEQ 0399 _
SEQ 0120

igl_aronn Tssrs n: cwasz; ADDRESS

000001

—

:
8355:8
SEeN
g8te Sa=% R \l\lg

B BT

2545":38%89
OR
ERROR

JSR

Pc.sm

;ST

'ofi? » 3SR

';!RE"}%MS INAIBTTED

gglrm

#KrlagT%:cus INHIBITED

.rs;;B

154056

—

000012

121

SS REGISTERS FOR &LocmON

; PREPARE PAGE

=
—

80—

995

BINFORRS SRR
Bron

INCB
18T

001110

—
b

|=]

000012
035762

""'

0e477e

30A(10S52)
10-JAN-78
12:16
_PAGE
T2l
READ/WRITE DATA TEST

e 880005 i2§
.

o
= W

MACY1l

w4
s
28

oo
W

A
38

003134
055716

884718

105237

: E

024704

NLEWN-O

)
83550000
RRRERRRRRRE DEOLEEOED S
S

CZREMDO RKE11-/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

go'iva

"OXB
igza
gg
IT

PC.L

THIS xrsn

:LOAD DATA INTO R/MW
fli}é

%mP m!‘»i)‘la Trifl fl

m;%“sts'mm?)
I m c&mm
fien.c
;
uméTTEN
oéfn.asm
: c }r“%no AND COMPARE SHOULD BE DONE
T3, 3SWR

ggzva f mr‘g#s.cmomb
g I&‘g

gxr
JgER
T5TB

oa&ra.asun
gg
CMPBUF
DULACS

%omms INHIBITED

: lmgs COMPARES INHIBITED
:32&
m;§FmuaT
_OF DATA
DBAL-ACCESS OMPARE
DATA TEST

RovB
P.CMND(RE
s SET;'2
ORIVE NDTE%E
HELERGE COMMAND
JgR . skt
38?5533&
AELEE
Eggps 55’
"féfi
%v
mTEET
DESIRED

; INCREMENT PACK ADDRESS FOR ouxckVERIFY
T mm TEST
g
BERaLiRel,
;éssfléaffi%"s'*e':.er
et
BGE
348§
:BR IF LIMIT EXCEEDED
IMP

GO BACK AND TEST

CZR6MDO RKB11/06 SS VERIF 1
10-JAN-78 11:48

CZREMD.P11

000005
000003

MACY11

00000s

000002

000004
00SSe20

30A(1052)
T21

348:

368:

10-JAN-78

INCB

CMPB

BEQ

o oo
WWWWW

PREPAAN

;30

:SEE IF TRACK LIMIT EXCEEDED

P.CYLN(RS)

; INCREMENT CYL

gfig

ags

iBR IFYES

CMP

LCP1,P.CYLN(RS) ;SEE IF CYL LIMIT EXCEEDED

ADD

gs P.SECT(RS)

;I ng

BLE
MOVB

17
P.TRCK(RS),R3

:
F NOT
;GET TRACK no.

MOVB
CMP

R3.P.TRCK(RS)
R3'LT

JMP

éxs

BGT

268

CMP

P.CYLN(RS),LC

Efi?

P.EYLN(RS),LC

1STB

XOVLAD

CMPB

CMP

93;

26%:

?h;
308:

027262
003144

318:

172516

oun

.SBTTL

; INCREMENT TRACK

INC

JMP

ADD

863138

1IN

258 :

734

377

.TRCK(RS)

: INCREMENT PACK ADDRESS FOR NON-DEFRULT oarn TEST

40s:

002

000002
005734

P TRCK(RS)

SEQ_Q400
SEQ 0121

iBR IF YES

BLE

885632

PAGE 122

353

ADD

005734

12:16

READ/WRITE DATA TEST

.8ECT(RS),LS

17,R3

CTOR BY IS

.gssF LS Excssoco
: INCREMENT TRACK

;PUT
iSEE

IT BACK
IF LT EXCEEDED

168

iBR IF

C,LC

; SEE }

IC,P.CYLN(RS)

:INCREMENT THE CYLINDER

agg

:BR IF LC EXCEEDED

IC,P.CYLN(RS)

;DECREMENT THE CYLINDER

33§

iBR IF LC EXCEEDED

: JMP Tg guscx FOR NEXT PATTERN

;?R I

FC)LC

;SEE

IF LC EXCEEDED

.sesa§r LC EXCEEDED

;SEE_IF XXDP MIGHT BE OVERLAID NOW

£EQ
JSR
1ST8

318

:BR IF NOT

UBMPRS

:SEE_IF UNIBUS MAP PRESENT

CLR

J4SR3

BEQ

PC, GETXDP

32%

;nesron: XXDP LOADER,

IF saveo

:BR_IF NOT

:DISABLE 22-BIT MODE AND UNIBUS MAP

END OF PASS ROUTINE

llllllilllllliilillllllilllllillllllillllil!!illlilllllllilllli

¥INCREMENT THE PARSS NUMBER (SPASS)
Pnss nxxxxx- cunc¥s XXXXX IS A DECIMAL NUMBER)
:I;PEgo

PxIF THE

SEOP:

000004
237
137

042777
005037
005037
005237
042737

153474

ISN’9
JuMP
?o
APTPARS

SCOPE

INC

SDEVCT

; INCREMENT DEVICE COUNT FOR APT

BIC
CLR

#BITE, 3STKS
STSTNM

xnrsnnupr
K?O
oxsaaL§TTY
..zeno

INC

$PASS

; ; INCREMENT THE PASS NUMBER

IMP
NEWDRYV
:GO SEE IF MORE DRIVES TO TEST ON THIS PARSS
DUNPRS: :THIS IS TRULY THE END OF A PASS
CLR

001326

BIC

§TIMES

#100000,8PASS

ERO HE NUHBER or xrsnnrxons

::DON’T ALLOW
A NEG.

NUMBER

CZRSHOO RK611/06 SS VERIF l 10-JAN-78
1
CZR6MD.P

éfi&fi‘%fi%

7
1
1
474

SEOPCT:
SENDCT:
885553
1326

Bt e e

A
%é gxscu

D
e
e

RPDRON

oo
£rr

555

000
042116
020123

2737

000001

001340

0237§§
6839

001326

000002

000775
000137

(PC)+

SEQ o4 0 1
SE Q@ 01 22

; ; LOOP?

1
$DOAGN
(PCI+,a( PC)+
1

; ;RESTORE COUNTER

MOV

§PASS, -( SP)

,.snve

%32“

SENDMG

PC, (RO)

RESET

JSR
NOP
NOP
NOP
JMP

;s YES

TYPE “END PASS
#

NS FOR TYPEOUT

G0 TYPE--DECIMAL ARSCII WITH SIGN

HITYPE A

SENUL

$ENDAD:

SRTNAD:
SENULL:

PAGE 123

.WORD
BGT
MOV
.WORD

asy2, R
SDOAGN

$DOAGN:

F10

12: 16

$GETY2: MOV
BEQ

e
Pt

000240

DEC

TYPDS
TYPE

025550
000042

DM NN
L WY

frrrrssrcrr

(o a0 Al al al Al alale ale aleale ale gl gl oo o304 310 310 410 410

MACY1l 32“(1052)
10-JAN-78
ND OF PASS ROUTINE

CHARACTER

:1GET MONITOR
ADDRESS
:IBRANCH_IF NO MONITOR
{;CLEAR THE WORLD
G0 TO MONITOR

,,gnvs ROOM

;3ACT11
(PC)+

; s RETURN

.WORD
.BYTE

nprpns
-1

CMPS
BNE
CMP
BLO
INC
BR
JMP

SAPTENV, SENV
2%
#2
$PASS,
2
STSTNM
1
WPAS

;NULL CHARACTER STRING

8/
SENDMG: .ASCIZ <1$><la> /END PRSS’
APTPAS:

oo1102

18:

017014

; RUN UNDER THE APT 7

iBRANCH IF NOT
;THO PflSSES ’

N
;BRANCH IF

INCREHENT THE TEST NUMBER
:LOOPING FOR APT_TO DUMP NEXT PROG
;JMP TO MAIN LOOP

DAuoécntxon 1S Expeérso (AND VALID).

; THIS IS THE ABNORMAL
RETURN FROM THE DRIVE

025622
0256

0256

032765
001002

0?0137

010000

o421e4

N2 §i§;33 000001

33 12013% 00ss10

025654

025664

001403
005201

R
040037

g Bl

00SS40

S674 060137 O44342

000020

!
:

N
WHICH IS USED
(NED = NON-EXI TSN

NEDHDL: BIT
18:

2%:

3%:

J
MOV
MOV

MOV
CLR
CMPB
BEQ
INC
ASL
BR
BIC

MOV

JMP

rge "

ERRHOL
RO, -(SP)
R1.-(5P)

$1.RO
Rl
R1,DRIVE
35
R1
RO
2%
RO, NEWON

;SEE_IF NED ON DRIVE SELECT

iBR IF NED SET
iGO HANDLE ~OTHER ERROR
:SAVE RO,R1
SET BIT POINTER
E COUNTER

F Rl = CURRENT DRIVE NUMBER

,INCR%HENT COUNTER
,?g%F IT POINTER

i CLEAR ONLINE BIT FOR

(SP)+,R1

{RESTORE RO,R1

RETNML

; TRKE

(5P)+ RO

NORMAL

THIS DRIVE

RETURN

I REEERRREREREREXERRERER E22I2222 2222222222222 2222322222222 2 2 2 2 2 22

CZR6MDO RKE11-/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

Gl0

MACY11l 30A(10S2) IO-JRN-7$Y 12:16

KE YBOARDINTES:UPT HANDLER

.SBTTL
R

CMPB
BGT

000172

MPB

000141

000040

153166

000032

000022

555
CMPB

18:

BIC
MOV

2s:
3%:

012440

000007

4s:

0124Se

88731

208

012433

0260 36

— a?c

137808

012426
000100

KBDHDL - TTY KEYBOARD INTERRUPT HANDLER

YPE

cnsa

Bits
R
ox77200,n1

R1,#172
2

6‘0141

3axrfifgfia
605
LC

baxrs
ISTKS
(SP)+.R1

#032,R1

:SEE xr LOWER cns: TYPED
:BR IF NOT
IF NOT

VE 1 37
Eflgfi“5§gn
g“z
(fC)
TYPE
Eans (1C)
c

,CLERR
xao INTERRUPT ENARBLE BIT
; ;
iR

:SEE xr (42) TYPED

;BR IF NOT(12)

MPB

s022,R1

iSEE_IF (tR) TYPED

CMPB
es
E

?59
E;P

CNTRLZ
32

;ECHO ($2)
i
RETURN

Esg?flan

lsnrcnn
lsCRLF

$ RE <TURN
c§ 'Huo (LF>
288

#007,R1
S
NTRLG

e e e e

I555«
BP0 A?"“"
CHRRRS
PRGN KBD?3 BUFFER

BNE

TYPE
gn

**%83%123

;
SEE }r (1G) TYPED
Hs NOT (G)
;
1ECHO
(1G)

’

llllllllIlll.l!llIlllllllil’llllllll!l!l%llllll§§!ll!!llli!i!il

'&BTT§ g

; ¥THI

PREPARE roa xevao

suanou INE CLE

INPU

nao aurren AND THE

'?‘”‘Eufl
Tt PRepaRAT?ou“fo%’k&"fi""‘t’ul"FYT KOS
' aLEQ KBD INTERRUP

* 'an
C, PREPKB
;;lllllillli!llllli!lllllll*lIlll!iilillllllllll!llllllllllllli!!
026040

00s077

026053

000207

153102

8se850 883997 808136 1s30ee
44

PREPKB: CLR

§18
S
RTS

asSTKB

agife,

#BIT6,aSTKS

CLEAR KBD BUFFER QND DONE BIT

INTERRUP
ENE
BLE KBD YRYERROPT
ETURN

3 ll!illlll!illllllllllllill!llllli!lllllilillillili!ll!lll!l*i*l

*4BTTL

ECOBAD - ECHO BAD TTY INPUT

:¥THIS SUBROUTINE ECHOS A CHARACTER WHICH HAD BEEN

CZREMDO RKG11-06 SS

CIREMD. P11

VERIF 1

10-JAN-78 11:48

6508

MACY11

2314 026

S SRS

oo oo oo
oo o

026064

026070

000207

6541
gS42

TYPE

RTS

026072

104407

0257'4 612;3; osooosggg 0S5716
1
055716

852155
1

142
144

0S6l162
006130

006126

BS54

£555

6SS8

123
0261

8521

3700

174

026204

i
026216

ggzg
0262
6Sb1 0262
BS62b2
6563

;ECHO BAD CHARACTER

: RETURN

$QUES

:TYPE <?> AND <CR>, <LF>

0262344
02ee40

;IIIillll!llllllllllllll'llll'l.lllllllllllll’llliIlllllll!llll

41ZMEM: SAVRE

@x
15T

BRI

12%:

MOV
355

noann
R1.MAHILM+2

ROL

SOL

ROL

000001

104401

007413

004737

0S3422
053736

012746 CO06126

g
OOP COUNT
= &

aom E LOOP

nov
EEE’

i 1

006100
112737

BR- 1 Wn'c‘? "'*Se

g
T i
#6,R2

Rl
R2

ROL

000037

,ggg:mngr KEY FOR SSIZE
'g
T
SENT

; ADD VIR¥88L mo&%;
T03err£osnr ro G r puvsxan ADDRESS

0S6162

.1’

ROL
DEC

P'amcss?g:u
t11

MOV
SLSTAD, MAHILM
;SET MEM un
?
Shn
MAHILMI2
sssm
MEM
n§ "3009 g TS
168
:SHIFT SAF LEFT B, AND PUT IN
R

024
1
101

|=]
(=]
£
~
[A]
N

, INTCHR

irtls
o a2EPLRe

':g
123 m
1"'01 836158
b1
§§: gfig

PC,ECOBAD

SlLR el

"%33
il Wrs
4

3 F % og&ev
- A QUESTION MARK (?). THEN, R <(CR>

ECOBAD: TYPE

001314

I
026136 012702 000006

6538
33

(

Illllllllllllllll.llll.lllIIlllllllllll!llllll!il.ll!!Illllilll

2§§§ 8seis
| 0137
026114

[3
2
6535

PAGE 125

;;l!llllIllIII!Illllllllllll}llllllll’lll!!lillll!!lllll%llll!l{!

104401 005532

104401

H10

Qo882 edRo BN Frv Tidbr

;

65{%

_10-JAN-

;#TYPED IN AND WAS DETERMINED TO BE INVALID FOR SOME

Egfi

515

)

a'o#‘

gw
003144

§ET H? gir OFHHL
OF
{MIT
fr
9

ng‘n?

ass ;rSa BIT ADDR

MOVB

UBMPRS

:SET "UNIBUS MAP PRESENT" FLAG

JSR
JSR

PC, 3880820
PC, 98$SUPRS

:CONVERT BINARRY TO OCTAL ASCII
PTYPE “XXXXXXXX"

TYPE ”LRST PHYS n%n
ADR= XXXXXXXX"
{es:
; TYPE "LAST PHYS MEM ADR
=
nov
bmuu.n -(SP) :PUT POINTER ONSTACK

SEQ P393, 24

CZREMDO RKB11/06 SS

CZREMD.P11

6S6M

6565

10-JAN-78 11:48

026244

104401

026250

104401

gggga 026256

000207

65!}9

VERIF 1

026254

104410

001315

TYPE

001315

883

6582
5

gsga

I:=583

0253%5

;RESTORE RO-RS

!RETURN

ce?S&fi"533""'5?33?"?55?*""’EE#'3:6'53:52"**""***""*’*’
YPOS
STYPE IT
'EHE

007623
030624

TYPE
JSR

335
gz%

000006

104401

001314

000010

7%:

005272
052464

8s:

716

£535
==§

026344

365
oasgg

6598

026352

0126

005737
001360
010066
000207

RTS

4s:

104401 005272

026354
026360
026362
026366

1
BNE

oaoog;

{:23.,3

5599
5600
6601
5602

RTS

s TYPE <CR>,<LF>

s 3r oggmmus, AND INPUTS NEW VALUE, RETURNING NEW VALUE ON

104401
004737

;:ggé

' §CRLF

SEQ 0125

,uf'm R SUBROUTINE WITH OLD PARAMETER VALUE ON STACK. SUBROUTINE

2233
ua'e.a'&?E
6581 026270

SEG Q404

iH lag#;;:lllI?’gfil!!l;l!la;z?#lag#Ri;fillg;l#;#lli!llllll!illlllnn»

£273
026260 016646 000002
6578 026264 104403

:;sg

,SCRLF

TYPE

RESREG

gg;g

10-JAN-78 12:16 PAGE 126

ECOBAD - ECHO BAD TTY INPUT

EE;I
857

6288
1;552
65

I10

MACY11 30A(1052)

SEE

6S:

TYPE
TYPE

’ggpgégyfsnomc
ZEROS
STYPE
* NEW = "

iREARD NEW VALUE FROM KBD

;(fg) gTURN

:(42)

RETURN

Ro
4%
PC

Feat 1P ke CHARS TYPED oo
35 1P Ve

,BUFFO

;Ecus a% INPUT

:RETURN - OLD VALUE

52-"’

$QUES

béo (SP)

MOV
ggn

#BUFFO, - (SP)
PC,OCTBIN

TST
BNE
MOV
RTS

000002

AC, RDCHRS

MOV

052616

8NEWMSG

(SP)+,R0O

sH1o0ct
6%
RO,2(SP)
PC

.‘3555 '_x,r >Ts CHARS

UNCHANGED

TYPED

Eafiosmos
RETURN PC
ti'TO CHARS ON STACK
gcx TO amnny
GET NEW BINAR

iSEE_IF HI ans ms 0
iBR_IF NOT
:PUT NEW VALUE ON STACK
:RETURN

“’82
l;&%

5 3 BRI

6611

«or UP TO SIX omfis T0 és TYPE

6608
eble

0 00 00

0000 0

5“;{5 sfiééw%as“&ious m"%om”"“ "“‘%s"“oF TUAE SuITeH

6613
6614
6615

026370
026376
026400

022737
001010
013746

000176

Be17
Bol8
6619

026410
026414
026420

4737
012637
000207

026260
000176

026404

104401

000176
007614

001140

!lIllllllll!lllllllllllllllll!lllblllllllllllllllll!lllill!lill

&SWRG: CMP
BNE
MOV

SSWREG, SWR
&%
SWREG, -(SP)

;

JSR
MOV
RTS

PC, GETPRM
csfm SWREG

TYPE OLD, GET NEW SWREG VALUE
:STORE NEWVALUE
:RETURN

TYPE

6S:

SWRMSG

E }F Ngorrume SWR SELECTED
I
T
PUT OLD VALUE ON STACK
TYPE “SWR
=

CZR6MDO RKG&11-06 SS saxr 1
CZREeMD.P11
10-JAN-78
11:48

MACY1l 30A(1052)
10-JAN-78
12:16
PAGE 127
GTSWRG - OPEN SOFTWARE SWITCH REGISTER FOR MODIFICATION

6620

662)

51:33

3 CRAFEPEFRRIREBERBERB AR B IR

6625
6626

1%THIS suanoumc INITIALIZES KIPAR’S xxpon's ron
: ¥CON;&cuous 4K 'f. STARTING AT PHYSICAL

6624

627
6628

S NOT Tumfg ON IN THIS SUBROUTINE. HOMWEVER,
¥MEM MGT Tm%
ENABL

6632

6633

640

Y22 104407

44
e
432

436

852%4
026

664
454
ssu
Y
gg oarawgg
45 0264
026476
5547 026504
22...8

026506

00S001
012702
012703

012762

172340
800010

077406 177740 4S:

10122
01 000200

005303

8°
1
105737
00140
0127
012737
104410

177600
003144
000060
001000

sss;

MOV

MOV
ADD

172516

177572

108:

000207

BNE
MOV
TSTB
BEQ
MOV
MOV
RESREG
RTS

Rl
sKIPARO, R2
%8, ,R3

077405 -40(R2)

s
8177600, -(R2)
UBMPRS
108
#60, J¥SR3
#8113, 35RO

§av§ RO-n;m

NIT FOR
LOADING
noon OF FIRST PAR
LOAD a PAR’S AND 8 PDR’S

PDR =

UP,READ/WRITE

nPhn
?aXTP

oscmn

LOOP COUNTE

ggop
r}% 8 ARE LOADED
FOR 1/0 PAGE
:SEE_IF 22-BIT ADDRESSES
iBR IF NOT
:ENRBLE 22-BIT MODE,AND UNIBUS MAP
{ENABLE KT1l TRAPS
:RESTORE na-ns
RETURN

llllllllllllllllillllll&“lllillllilllllllllllllli!llllllll!lll

&senvxcs ROUTINE FOR MEM MGT TRAPS
026510

004737

041704

13737
0137
0127
01

177574
177576
0265
000340

6514

313? 7

oasggs

373{

23
66
665
ggg
6660
44
2225

CLR
MOV
MOV

DEC

6652

B65S

I3 2222222222222

tRITMM: snvaec

6653
BESY

L R L2222

.aur MEM

ggg?

663

FRER

mp 7 1S LOADED
WItH |
TO PRESERVE mg x/o Pncz
%22-BIT noo; AND THE uuxaus MAP ARE ENABLED,
IF PRESENT

6629
66
66
66

B R AR SRR R BRI R B R R E R

ixrmm - INITIALIZE MEMORY mmcznsm REGISTERS

177572

172516

lIlll!llllllllillil!llll“lllilllil!lll!llllllllll!*lli!*llll«ll

001174

ktERHD: JSR

cnmsn STATUS FOR PRINTOUT

MOV

001176
001200
000004
000006
001202

6663
352322 %esegu 000003 063526 8s:
6664 026564 112737

MOV
MOV
MOV
MOV
58"

CMP
MOVB

(?u (SP)+

#3,0F30+18.

TRV
HLTPRG

:GET SR3

;CLEAN
UP STACK
:FIX PRINTOUT FOR NC SR3

BE6E
D0S6B76 10913, Lpeeol
,ggg 025553 600157 044134

wee

6671

3 R 2222222222222 232232222333223222323332222222
333222322222 2222 222222

6672
6673
6674
6675

e
IMP

m? aosnnvsc+a

:lusné

cE'r
sm
iSET rms-our VECTOR

KT11 FAILURE

;ABORT 11

:XPREPAR - PREPARE MEM MGT FOR RELOCATION
:¥THIS SUBROUTINE CALLS INITMM, AND THEN SETS UP CONSTANT

1%FOR KIPARE IN SAVPAR, AND LOADS THE UNIBUS MAP REGISTERS,
;%IF PRESENT.

SEG Q405
SEQ 0126

CZR6EMDO RKB11/06 SS VERIF 1
czR&MD. P11
10-JAN-78 11: 48

66;;

104407

56;8

Oce4e2

Di§701

604

i
61 1
003206
osog;

6691

|
!

quq
6622

10320
10420
703
00SS04
077106
042765
142765

2;82

10“419

INIT ngn MGT REGISTERS
LO BITS OF MA
nnsx FOR BITS 13-15
HI BITS OF
MA
savs THESE BITS

ROL

;GET MA BITS 13-21 INTO R1 BITS 7-15

R1,SAVPAR

; CONSTANT FOR LORDING PARG LATER

4s:

000010
000007

5706
6707
Y4
67
6710
£711

ROL
ROL
ROL
SWAB
ROL
RORB

Rl
RO
R1
R1
RO
Rl

7518

UBMPRS

9s:

031 R1’
3, (RO)+
nu (non+
oabooo

S0B

:LOOP UNTIL 31(DEC) ARE LORDED
CLEAR BR BITS 13-17
P.BALO(RS);
oxSoooo
#3,P.BAAI(RS)

BIC
BICB

RESREG
RTS

3 5 JEIEH I

0600000

4§:

006126

157776

BS:

006126
000002
006000

00SsS46
005546
00Ss46

e
i
6728
6729
6730

;ADD 4K WORDS

; RESTORE RO-RS
:RETURN

060 00 0600 0006 06 0000 000 0000 06060000 0600 300 303600 306 3

000

igllfigzggllllillllllllll&lllIllllllllllillllllll!lllllil!llilil

00ss46

000412
023727
1033
013737
062737
162737
000207

iSET REGISTER COUNTER
;LOAD A MAP REGISTER

i
FNDXDP - FIND STARTING RDR OF XXDP LORDER , AND STORE IT
!

a:o
ggv

026742
026744
026752
026754
026762
026770
026776

;SEE_IF UNIBUS MAP ENABLED

MOV
MOV
MOV
ggg

g;ig 026726 00S737 006130
Al
R
R—

6716
6717
6718
6719
6720
6721
S?SS
Y4
6724

R1.RY

BEQ
CH
iBR_IF NOT (NO UNIBUS MAPPING)
; PREPARE FOR 22-BIT ADDRESSING -’ LOAD UNIBUS MAP REGISTERS
MOV
#MAPLOO, RO
;STARTING ADDR OF MAP REGISTERS

020000
160000
000003

; SAVE RO-RS

PC, INITMM
PMA,RO
817777 .RO
PMA+2,R1
RO,R3’

MOV

12700 170200
12701 000037

6697
6632
66
6700
670
67
67

PAGE 128

JSR
MOV
BIC
MOV
MOV
MOV

100
581

PAEPAR: SAVREG

K10

12:16_

WRG - OPEN SOFTWARE SWITCH REGISTER FOR MODIFICATION

104

10-JAN-78

CRERRRERERRRRRRRRR
R R R RN R R RR AR AR R R R R AR AR AR R RR AR AR
EER

804735

g Bl Gk

MACY11 383§1052)

tfioxop

8%:

MAHILM+2

annar g} gex RE
1S END OF XXDP

ga?s

nnHILn 8157776

ggz IF Egn LIMIT > OR
= 157776

MOV
ADD

nnuan XXDPAD
XXDPAD

;HI MEM anxr IS END OF XXDP
{ADD 2 BYTES

RTS

iRETURN

SUB

ssbou,xxopno

:COMPUTE START OF XXDP

lllllilll!llllllil*!lllll*llliIllllllllllllllllllillilllllllili

APg YTOF T
'

1 BITS OF UPPER MEMORY LIMIT

3
gésoooo, XXDPARD

; #WOULD
C

i %IF SO

S
—
LOADER ON
A WRITE
T

EHPT IS HRDE HOVE THE LOADER INTO UNUSED MEMORY .

RIF THfSIS NOT POSSIBLE, A RETURN IS MADE TO THE ADDRESS

SEQ@_0406
SEQ 0127

CZR6MDO RKB11-/06

6732
2;33

P11

SS VERIF 1

10-JAN-78 11:48

MACY11

g?g
6737

104407

74 057056
sn?
274

8014737
737
-43-0

7"2
674
£
2

027054

005001

027060

027056

005760

2%:

4§:
53
6S:

7 ps D64

306 005762
3732
%g?as

Ve
676
s;aa

ggnaq
7126
oa;xao

%s
1

oos??g
005762

5;7

;1§

005762

6@5&9 072000 005550

E'??5
027163 83735 c:aC%5322“.
2779 8571

§;§

g;x

figgg

6781

027202

010103

6785

027216

6787

027222

7& 1

g;gg §§;§5~ %figo
6784
7 12 020337
786

027220

101011

001003

020237

000002

005776
006130
006126

TST
B0
TST
BEQ

DEC
CLR

RO
Rl

us
MA+2
6%

F
T mm TEST
oEF
““'f
APriEs

ADD
82, (SP)
RESREG
RTS
PC
MOV
WC, RO

s r ux MEM non 0
UP nomm RETURN PC
.RE
;
uau
; uono cggm LO BITS

CLC

:DOUBLE IT FOR BYTES

TST
BNE
CMP

100000

;SAVE RO-RS

lfgngsn eag PROTECTED E IF
ACCESS DATA TEST
S
M
¥ ga’
S
555
gg mx(km
?,EEa
1 *32';‘53
Tkfi TO BE RUN

283
CMP
BHI

005546

g?
8§7i§ 183539 003135
6771

gou.
@
CLRB
JSR

7 sl i
2;20
}

2725 g%?g
s;sa
7%1 )7
6764
gné
6765
71
101

L10

!i!llill*!lHll!lII!lllllllllll‘lllllllll!l!lllllililil!ii!lllll

005764
18 000002
10441
005766

6753

12:1

&EKXDP: SAVREG

2;38
737 003136
e
orok 0040
g;:é G7RGe
g&a %z@
794

-JAN-78

33755:32 - N SOFT
Su?rcu'“fifcig?sn FOR MODIFICATION
s #FOL
THE
THE
TORE
V AND XXDPSAV+2.
;ur%?"fsNGNOT
m“&?smv
73“:5\&: ?fi SS03&:3
NO&HRLXXRE?RURN
1S MADE.
:

027000

sgé

30A(1052)

gtla g RO
m+aB!
PErugxop

’:’5‘97
kaa
3
qs

ng
8
RO, XXDPAD

: DECREMENT
iSET HI BITS = O

COMPUTE LAST ADR OF XFER IN R1-RO
R
éNIT
‘rS' 'g'f.
?“ns INDICAT
5?03“

L OF 3
ADOR or
xxop
§§MSPUTE
fr
nh
OF
xxop
1
OVE XXDP

cuscx u a TS or msv XFER ADDRESS
iBR _IF
cnecx LO ans OFLaggfixrsgoegnxxop

8%:
NCB
SVD
§§1snvs
x%xcTOR
:ATTEMPT TO rmo A savs AREA
F
cng

108 ;

12§:

5"5

MOV

g
c ooo
XDPSAV
5
ggvxop
3
32,RO

RO, R2
R1'R3

238
CMP

.sm R2
R3, MAHILM+2

BNE

148

BHI

CMP

16$

R2, MAHILM

§:
r MA > OR
= 16K

vé nBS 72000
T Lonosn

3nv§o EE

avras TO LAST ADR OF XFER

;csr A COPY

: COMPUTE END OF SAVE AREA
:SEE_IF THIS sxcssos MEMORY LIMIT
,BR IF ss CAN’T SAVE LOADER
:BR IF <

MEM LIMIT

‘SEE IF LO BITS EXCEED MEM LIMIT

Sms 306129

CZREMDO RKb11-06 SS VERIF 1

CZR6MD.P11
s;aa

10-JAN-78 11:48

oa;eas

wxoo;

§§2

7 882
Efi@
figéfi
mgx
792 027242 017616 000000

2;33 35;533 6832% 003135

MACY1l 30A(10S2)

10-JAN-78

12:16_

PAGE 130

SEQ_ Q408

GTSWRG - OPEN SOFTWARE SWITCH REGISTER FOR MODIFICATION
-

168:

5“5

éss’,EBB&EV

Sh”

svh

n§v
BMOV

V42
Z’
108
a(SP), (SP)

SEQ 0129

gg xg YES - c%-zls&vsmhenosn

:
;GO
SAVE
onoe
rxx
RETURN P
INDICATO

6795

i
g;gg

llllllll!!lllllllll!illlllllliill.lllllllllllllllil!iillll!lll!

1%ST
v+2. A 'rov
S36(DEC) WORDS ARE MOVED.
B
Ry
eR

: ¥THI

geet

2887

gfi

p—

;§§8
027262

681

V+2,

104407

000001

68?7% 000041

HE B Wy s
7

BACK TO LOCATION XXDPAD (ITS ORIGINAL

539 .

XDPl:

fis@

xgxcgton TO SAVE XXDP

R
el
ago
XDP2

s
35
IF NOT SAVED

MHov3
MOV

cuE é R
XxdPao’R
§0Psn8‘gnm

) xxOP
WORDS
EH
85
Sofl%i
4738176F
GET_SAY ADR LO BITS

BMI

XDP

GETXDP: SAVREG

3 0573190 Bi5785
p 882098
e8sd
6821
027320 013700 005550
,

AT me

éhs;s;lllI:;EE!lllil!lIIlillllllll!!Il!llllll!ll!lillllllll!lllll

012704

231

DES

TRSBAN SR
es

T
15
14
6812

MOV

TSTB

A
Efié

D BYXXDP

SEN

;fi}rmflmgfio
ve
SR GET XXDP

6S:

3333 857

?84»17

XDP2:

gggnsc -

§Es¥o§eno-as

',:S

053733 006000

gge

POINT TO END OF XXDP LOADER AREA

027344

:3‘33

7354

gg§

7%8 %ggg

7360

&€

027372

gga

7374

"S"

684
6842

006000

000766

4737

;:gg

osfox

7404
027406

6100
006101

026422

XDP4:

;

(Ran,(mu

T INDICATOR TO G£T XXDP

£}

6828

MOV

#1,RY

and

; SAVE RO-

DEC

#6000, RO

EE.E

'?28? R'?na)

XDP2

:COME HERE IF MEM MGT

kDP3:

JSR

PC, INITMM

ROL
ROL

RO
R1

gguc

;

A WORD

}r
1§3s(osm WORDS YET

POINT TO END OF SAVE AREA

c&
}r525(0&) WORDS YET
;G

;x IT MEM MGT REGISTERS

iGET ADR BITS 13-21 INTO Rl BITS 7-15

Egsg

70{

794

g§; 177572

Eggg 85?:55
6854

72354

1 605538

704

isno

6855

10521

685
6860

12105
333

177572

737

000200

74;2

EEE
6864

33;

177572

7974
;fié 020000
§§§§ §§é ; 020000

6865

ses;
Bie

1M
1

1;322

7523

168:

172354

134

713

£370

ER FOR MODIFICATION

MOV

R1,

a}g

XDPSAV,R1

Bag

:{sgooo.gi

:GET LO

§u —

; SEE grugzgrrsocggvsgg GET XXDP

MOV
INC

38K IPARG

SET UP

iFIX UP R1

gn
EA WORD
;TURN ON MEMORY MANAGEMENT

ggc

28%“0

; TURN OFF MEMORY MANAGEMENT

INC

J8SRO

; TURN ON MEMORY MANAGEMENT

MO
ggs

20%:

géz
BIC

22s:

DEC
BNE

ADD

(R3)+,RS

BITS

TO REFERENCE PARG

J8SRO

MOV

188:

l2:

=382 2

Al
79
1
7»%% §£

10-JAN-78

gzg 3

7w12

MACY11 30 1052)

g;—

CZR6MDO RK611/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

RS, (R1)+

(R1)+,RS
335?33)¢

:
A
; TURN OFF MEMORY MANAGEMENT

5eirxa,n1
oSfrxa R1

ggsxgrflgvsarLOJ TO PRGE 7
iSET P
=6 ncnxu

R2
168

i
:BR

#200, kK IPARE

XDP2

,uponrs

SEE_IF x§3a
uonos YET
IF NOT
YET

:BR TO RETURN

l::872

3s;llIlllllllIllll!l!lllllllIlll!llllllll!lll!llll!!illlillll!ll!

5875
687
68
687

¢ruxs suanourznc INITIALIZES THE DRIVER AND ITS PARAMETERS
:%AND DOES
A SUBSYSTEM CLERR.
;l USESRe,RS
;% CALL:

TTL INITSS - INITIALIZE SUBSYSTEM

&
:

‘:gg(i

$3 lll!l!lllllllI»lll»lllilll‘lINIIllllllllll!lll!lilllllllillll!llll

587
D

5882
6883
£885
,:ae;
588
5888
6859
6830
6891

02
027353
057848
35 gs
027556

7576

vd
689
7612
gggg 027
6898

6839

12737
312737
013708
10588?
004737
112765
004737
11375;
113737
113765
153765
000207

040716
003630
314
762
17
040316
00SS510
005510
003125
042164

003124

3046
333044

INITSS:

000001
000000
002714
000007
000007

JSR

MOV
MOV
CLRB
JSR
Mov8
JSR
MOVB
MOVB
MOVB
BISB
RTS
MOV

NITSS

ERROR RETURN ADDRESS
:En§¥2§é :§§TT UP
UP ABNORMAL
NORMAL 5
ADDRESS
sPARRO. RS
1@ET ROBRESS OF m‘sék'r‘fis’é"“s
NORTRY
:gfgm'
"%szi RY”
FLAG
RPRM
:CLEAR DRIVER
INPUT PARAMETERS
osoaan P.CMND(Rs);SET suggvs EM CLEAR COMMAND
PC, DRVC
;oo
YSTEM CLEAR
onive P DRVN(RS)
C
nr onxvs
E ?R 55
5 5 E P.B.
rpnfcsxucnsi
agurvas oan
P.CSIH(RS
BIT
suanourtus EXIT

uulununlnuuulnninlnu*uuinunu"uuuuu“

"4BTTL

CLRPRM - CLEAR DRIVER INPUT PARAMETERS

SEQ 0130

CZR6MDO RKB11/06 SS VERIF 1

CZReMD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

10-JAN-78

Bll

12:16

PAGE 132
CLRPRM - CLEAR DRIVER INPUT PARAMETERS

SEG 0410

SEQ 0131

6300
6901
6902

¥THIS SUBROUTINE ZEROS THE FIRST 14 avrss IN THE DRIVER
wnmnsrea BLOCK (WHOSE ADDRESS IS IN
CALL an
PC,C

6305 027622 010046
sgg;
7624 010546

cuapnn: MOV
MOV

RO, -(SP)
RS, -(SP)

; SAVE RO
snvs =g

RO_RE
18’

1
BR %r

2389.

b
6308

llllllll!illiilllll!i!l!illllllllllllllllll!!ll!l!llllillfi!!l!{
7626
7630

010500
062705

B910
95763 000068
6911 027640 001375

000016

6912
76M2 012605
6913 027644 012600
23}2 027646 000207

5926

;oarvt uxu.

7712

027720

*OtlJ;

113
vé

gggo

6954

x TOE-LOCK
INSURE
9

mé.hér;é
oxmioimsl.v

RKO6 1S LORD MEDIUM,

;:
moa nsrukuSS>
027650 105037 003124
Qéasasllgtaalllll:;::#llll!l&llllllllllllllllgg;lgl;!l!!;3% % % % %%
02?1;5‘4 004737 027522
JSR
PC mnss
$IN
én&x@
onxven CLEAR SUBSYSTEM
027660 113765 00SS10 000000
MOVB
?Ri
fif’
;sssxrg;a{xveoasbeLono
aaxrno ————
%;én%
12295 000013 000041
gnepa 5;3,3.41
:gse";rNgoT(os IS XXDP MEDIUM
% %oumug 003116
Eaga ggrmc
: E IF
START

694

6955

:RETURN

mr'?nrp§0§§& -onVETM.

6945 %14 gg;x

6951
sesg
695

)b
YET

NST DONE
iRESTORE RS
{RESTORE RO

(SP)+,RS
(SP)+,RO
PC

aLLE

6927
6928

694
6947

:GET PARAMETER BLOCK ADDRESS
;congrs LIMIT ADDRESS

mu
ounusg ‘%kf
TED
?W
no

3
6925

RS, RO
#P.CS1,RS

I'Illl!llillllllll!‘llll!l&lllll;;llilllllll!llllillil*!!l*lll*l

6920
gggg

2:2{31
22}33‘%0
6935
593;
gea
gfi
23".,1

Ehp

BNE
MOV
MOV

RTS

ggig

gg:gg

MOV
ADD

010134

000100

005510
003124

12712

000001

7742
77;3
77

012712
005237

002001
005542
005542

027760

032762

001000

027756

001375

000010

3%:

gps

ésonoxop

MOVB
TSTB

DRIVE,RKCS2(R2) ;SET DRIVE NO. IN RKCS2
TYPFMt
,gss F RKO?

BIC

000010

‘DISABLE RKOG INTERRUPT

BNE

5§

MOV
CLR
INC

#<CDT!GO>,(R2)
SCRACH
SCRACH
148

;SET GO FOR nxo7 IN CS1
:CLEAR STALL CTR
: INCREMENT STALL COUNTER

ggv

5%:
75:
148

$1E, (R2)

:mxs E%sgssofis LOAD MEDIUM"

BNE

BIT

;co,ma)

#MDS,RKCS2(R2)

iELSE

SET

GO FOR RKO& IN CS1

:STALL FOR ssvsnm MILLI-SEC

:SEE IF MDS ERR

Cll

cZRbgoP?.l(su/OS?&v;e11: HB

MACY1L 3QRNORV°2 ARN'DHIVE rdR:49ar[8CE 133

oouu?

000001

TM
%§

003124
000001

g6c5%s 862848

6984

030152

042762

?:!:é

13273

N=—

030140

6980

B888

003046
00Ss40

1 BRIS ol
000100

0301772

?oxgx

030212

104401

5 Bin Ny
g

(5 Bk el
3

0302

004000

;CIJE

030260

000734

;

oaoegao

112;55

WIP

;007

030302

’

040316

7010
7011

030320
030322

012765

74 11272%

AR B

;37

001004

SSaom,n:coos

ga
MOVB

corftmm ; #
'nxg;'% !rnc
HE
YSTEM
onbsmrsg cmomsa
Ist:r
READ DRIVEw
STATUSADDRESS
COMMAND
l TI'OIATOR

188:

208:

JSR

:SET ABORT FLAG

ALLTRM
TYE,RKER(R2)

:GO ABORT TESTING
;
}r
rvg ERROR

;SEE IF mxs oan& E
ss'r'gAND
xs'gg'
c

arnas

MIVE STATUS

}r r:nli "eroxcgnon'mouN|'Ems DRIVE

Ra @a*mgflwwST Rl o
*]

T
BITB

! IV
kBIT7, SENVM

X*
DRIVE
.ng
-non!Exxsrsnt"
;se: F UNDER AP

égsnvxcsgsi:g g&mcsuna)
':ED
Rmex::E;:zPr
Efi
%
; Wm& RETURN ADDRESS

000040

%;g%

(2 B XUD o
7

JMP
§{r

4?::5 o g?ivs Isos 837 P. noomS) : TEST FOR DRIVE Renov
RO
Vho!® N o aur
S 83Nl’gwg«
”Ssci
m 88762

2& 030166 032765 000200

6389

000000

1ggLDRV P. CHN)(R n) gN&'l«D FOR REPORT

R2),P,.LS1(RS)
c
JSR
15
s?
:
T
g‘fiffi
RKG611 REGISTERS
Jggm
,REPSUP
i SET
ERROR REPORT

007656
007656
001341

3539

MOV

00SS04
000014

SEQSFQ’ 161 32

lls

000040

es:

007656
007656

000001
000001

000001

000632

000002

e R

Rel Reior

;SEE IF DRIVE IS WRITE ENABLED

811

MOV

Si.WRL,P.AOO(RS) é‘f"&TéTEOEOC
K SEL .

IVE , BRODRV+6

T *Mflies?oiiw

%IXE No#‘ r"c DR iG’s':#wéss.socs COMMAND

nous
JSR
?2‘{8
BNE

MOV

:&8&
P cmomsi;afims
Lfi vs&&
COMMAND
DRIVE
’aggam .CMND s
COMMAND
(RS)

osaa P.CYLN(RS)

goouoa

7023

000002
OOOOOS

063562

7033
7034
7

278
#1456, P.CYLN(RS)

nova

SLSTTRK P. TRCK(RS)

8-4
n&%om&n&
88,
CFMT, P.CS1H(RS)

:SET Tancx-e
T
8 ascronronnnr

§§§E
0255"¢g‘“‘“s’
?E
secron FILE
ax; ;c:aflvoe
¢
:: rggngsz
?59: §177777,
gaosaa RUBUF+6 ;: vré
ERROR
MESSAGE
CMP
}R#L
1’ s IN 1.D. WORD 3.
BNE
MOVB

BADDRV+6

BISB
i2s:

000207

#'0ahoonv+s

T
’

:TRKE

ERROR EXIT

BRI
fib 'S
:GET DRIVE
NO.
:

Ree
BR

-RoReRY
2s

,T¥g§

ADD
RTS

82, (SP)
PC’

;FIX UP RETURN PC
:RETURN

D WITH ALIGN PACK"
X

, o 363636 36 36 36 36 36 3 3 36 36 38 36 36 36 36 36 36 36 36 36 36 36 36 3 3 3 3 36 36 36 36 36 36 3 36 3 3 3 3 3 36 3 3 3 3 3 3 3 3 3 3 3 3 % 3 % % X XX %

fiTngup QUTINE
CAN MAIN-L ELEoos
D BY ANY OTHER
!¢suaaou¥§
-==
ONLY
gt;;fi;?l;;:lllll?;;:l;:é;égz:;!!lllll!;;l;;alggllllg!lllllll!lll!

7
7038

BR
MOV

:ERROR FREE RETURN

733

;gzé

108:

007656
007656

;3‘;’;? 030454 062716 000002
030460

27%:

Bl S

el Bl Ul oo

7032

25§:

*%d'8133

030330

D11l

10-JAN-78
12:16
PAGE 134
SC NDRV - SCAN DRIVE FOR STATUS

30A(10S2)

(=]

;oxg

MACY11l

-4
gfa..
B

CZR6MDO RK611-/06 SS VERIF 1
CZR&MD.P11
10-JAN-78 11:48

030462

011637

MOV

°°1§;E

TARCK52088:
!

522VZR
iC
nags
ngvcOINTER
.

YSTEM CLEAR CMND

gg;g“%miosm :

000001

177776

llll!llllllll!lllllllllli’il!!l!.lllilllllllllllIlllllllli!l!ll

SHITL
&fixk"“'é&osqr*‘"’
o
RA¥Ion
NORGER£ OR THE cURRENT
!TEST INTO STIHES
TO DETERHINE IF TH S _TEST

NE RETURNS

lTO §H§:§E
rus
gsfl
"ngg R§sr HéLLngs ?fié g).
}r IT IS

VE|

T PASS (QUICK
VEg FY) or n

uuxcn STARTED At ADRS 200, ALL TESTS WILL BE RUN
O

39 000144
Y

i oo

7067

030546

003136

003116

001115

cuxxrn:

TSTB

DULACS

gET
nnx ERROR CNT TO 100 FOR SSCOPE
:SEE_IF DUAL-ACCESS FLAG SET

TSTB

MDFLAG

iSEE IF 200 START

ggva
BNE

R1,-(SP)

#100. ; SERMAX

iBR_IF_YES

CZRSHDO RKSII/OG SS VERIF 1
CZR6
10-JAN-78 11:48

MACY11 389(%052)10-JAN-78

12:16 PAGE 135
- CHECK CURRENT TEST ITERATION NUMBER

000001

BNE

;BR_IF NOT

BNE

iBR_IF NO

TST

001326
001304

38:

MOV
BR

4s:

oo1102
00Se26

001304

000004

000002

$PASS

;SET_UP FOR 1 ITERATION
)
-ACCESS TEST

§TSTNM,RI

DEC
ASL

Rl
R1

BEQ
ADD
MOV

23
#4,2(SP)
<sk)+ R1

MOV

18:
2s:

iSEE IF r%asr PASS

8l,STIMES
18

MOVB

SEQ 0413
SEQ 0134

NT TEST NUMBER

CREMENT BY 1
§
TO GET TEST LIST INDEX

TSTLST(RI) svxnssLons Tt

RTS

ah IF
.noJusr
:RESTORE

N NUMBER

o BE SKIPPED
PC TO RUN THIS TEST

*RETURN

§uunnuuuuunununln lllllllllllllllll!llillll!llll*i

TTL RDCHR? lTHI
I

N?
RING OF

4§n§n
xu ro#Enn
uh
rin

: #IMME
P #RET

Y F

TO EIGHTY INPUT

AND PLACES

; ng THREE SPECIQL

:%TAKEN IF (1C)
IT
D, AND
;%IF(16) x§

NPUT _CHARS

F (fZ)
iy 25

RKEN (fU) OR ISTER
INV
AL ID1S INPUT
IS TYPED.
_OPENED

: %FORnogrr cnrxou xr ECTED.

I'EN THE (#G) RETURN

TRAKEN
pe
OF INPUT CHARACTERS IN THE BUFFER IS RETURNED
l HERgUHBER
*
,l
’

-0 BDB IR Lo
BB ® T £

NN N NN NN NN

NN NN NN NN NN

etetetatatatatatatat
ottt oo oYY

7100

CALL -

‘¥

JSR

Psnocuns

<CONTROL -

<CONTROL-Z

TURN ADDRESS>

RETURN ADDRESS>

éE?NTROL-U OR ERROR RETURN ADDRESS>

;;llllll!lllllll!!lllliill!llll!llli!llll!i!lllll!ll!il!lll*lliil
RDCHRS:

010146

MOV
MOV

CLR
CLR

:READ A CHARACTER

2%:

030634
030636

0l2426
000004
000032

RDCHR

000004

3s:

:INITIALIZE CHARACTER COUNT
:INITIALIZE RUB-OUT INDICATOR

;READ A CHAR

(SP)+,R2

CMPB
BNE

#003,R2
43

;SEE_IF (#C) TYPED
iBR IF NOT (C)

MOV

Q4(SP),4(SP)

:PUT_RETURN ADDRESS ON STACK

TYPE

:CHECK FOR (12)

4g:

; SAVE Rl
:SAVE R2

MOVE

;CHECK FOR (1C)

000003

b2
030666

R1,~(
R2.-(5P)

CMPB

BNE

CNTRLC

248

#032,R2

iGET CHARAC TER xnro R2

:ECHO (1C)

'BR TO TAKE EXIT

:SEE IF (1Z) TYPED

'BR IF NOT (%2)

cznsnoo n«su/os SS VERIF 1
CZRE&MD.P11
10-JAN-78 11:48

7124
7126

71
71

71
71
7130
7131

ngg

030670
030674

030702

704
10
12
030716

104401
062766
000763

2702
1006
104401
66

030724

000752

7135
7136
7137
7138

030753
7
34
790
44

2702
1005
104401
004737
B4

7142
7143

030754

005700
1726

7134

012433
000002
000025
012445
000004

MACY11 30A(10S52)
o—.mn-n 12:16 PAGE 136
RDCHRS - Rsno STRING OF KBD INPUT CHARS

14
nug
7150

7151
7152
7153
7154
7185

762
764

&s:

000004

1000
mos
03101
ggmw
1016
031020

7159 031024 00sS001
715

005272
005542

CMPB
BNE
TYPE
ADD

78:

8s:

cMPB

005542

012463

118

148:

RO
23

;cus(f*x THE cf'mmcrsn COUNT
:BR_IF C
=0

NS
DEC
MOVB
BEQ
TYPE

153
BKSLSH

CLR

SCRACH

RACH

031034

(£NS037

00SS42

7163
7164
7165
7159
716

8310%
1050
031054
ggxgg
1

104401 005542
110260 005272
005200
%2700 000120
1264
104401

001315

TYPE
MOVB
INC
CMP
BNE

7170
7171

031076
031102

104401
104401

005272
001314

TYPE
TYPE

;i;g

031134

000207

031064

CLR

7169 031070 112760 000000 00S272
7175 031106 000703
7173
031110
104401
001315
198:
7174 031114 112760 000000 005272
7175 031122 062766 000006 0OOOOH
7176 031130 012602
24%:
7177 031132 012601

CMPB
BEQ

MOVB

TYPE

MOVE

BR
TYPE
MOVE
ADD
MOV
MOV
RTS

:CHECK THE
RUB-OUT INDICATOR
:BR_IF WE HAD A PREVIOUS RUB-OUT
ISET nga- T aoxcmon
’

SCRACH
13

TST

SEE IFno'¥Enua-ou7
RUB-OUT (DEL) TYPED
IBRIF

CRACH
e&Eém““m"
SCRATCHcoum
ORD FOR TEMP. BUFFER
20
BUFFO(RO), scmcn csr
mo BUFFER

TYPE
BR

7161

7168

R1
118
R1

#015,R2
1
;HANDLE POSSIBLE DIGIT

005542

TO TAKE (tU) EXIT

TST
BEQ
TST
BNE
INC

000015

110237

8007, R2

:BR

:SEE_IF ($G) TYPED
:BR IF NOT (1G)
'ECHO (1G)
:OPEN SOF TWARE SWITCH REG. FOR CHANGE
:TAKE (tU) RETURN

122702
001426

031040

;SEE_IF (fU) TYPED
iBR IF NOT (tU)
PECHO (tU)
;mx; OLD PC POINT TO NEXT RETURN ADDR.

EES
mm.c
PC,G
¥

031026
031032

7162

IBR TO TRAKE (12) EXIT

8025, R2
8S _
CNTRLU
h 4(SP)

:CHECK FOR CARRIAGE RETURN

les:

;ECHO (12)
IMAKE OLD PC POINT TO NEXT RETURN ADR.

gugs
Y
JSR
BR

7158
7159

7160

CNTRLZ
ba 4(SP)

o rggpaua-ogn;oaésm
BNE
1 R

701
003
1

116037
1
1
10
005701
001403
104401

(tW)

: CHECK FOR uc)

000007
012452
026370

798
7;2 d0eoss Siede3

:CHECK FOR

2130 83337723 001020
122702 000177
7141
7144
7145
71'49

TYPE
ADD

000004

SEQ Q414
SEQ 0135

R2,

SCRACH

R2, BUFFO(RO)

RO
#80. ,RO
as

as osu:rso

moxcmon

aar 1 cn OR IS NOT SET

cn.sm n: -ou'r INDICATOR

.ses }r
<ca> TYPED
:

s; ;cnmcu WORD ron TEMP. BUFFER

cumncr
pro BUFFER

Scuo
CHARAC
uT C
TER xn o aurr a
guc MENT CHARACTER C
ss F TOO mm cumnc zns TYPED
cm mo u-'

bo aurrn(nm Pf.lT
Tsnnxmnuc NULL INTO BUFFER
,BUFFOD
' SQUES

?s
RLF
ho aurromm
(SP)
<sfi>+
R2
(S5P)+.RI

;ECHO INPUT STR m
:TYPE <7),<CR>,(LF>

m(s snnbn ExhFROM RDCHRS
TYPE <CR>
PUT Tsnnkaxm NULL INTO BUFFER
:FIX UP RETURN ADDRESS
:RESTORE
na
‘RESTORE Rl

:SUBROUTINE EXIT

cznsnoo RKG11-/06 SS VERIF 1
CZREMD. P11
10-JAN-78 11:48

MACY1l 30A(1052)
10-JAN-78
12:16 PAGE 137
ROCHRS - READ A STRING OF KBD INPUT CHARS

2180

7184

; HI

3i§§

mx nu on'fé

7189

llllllllllillllllll‘llllllliilllllilll!l!lllllll!l!lllllll!i!l«l

;i%
7192

;193

031136

oaflgg’

7198
§§u§
7199
1184

104401

oxox?s

835

104401

7200
;201

031160
oafisu

016146
104303

; 04

031170

000207

012474

TYPTST: TYPE

ggx

831129

INC

Tvsgs

. YTE

012467

005626

083

7209
;aix
7515

?ncfigritm
70 GET TEST NO.
,T
TES}GNT). IN OCTAL

Igvr

;: wg sgpkéngxm
ZEROS
ES

$STLST(R1),-(SP) 53:
NT ITERATION NO. ONTO STACK
;;Y
I E?gqon NO. IN OCTAL

;&:%sg Léngmc ZEROS

RETURN

wmane
TER T
ae&gg.

7215

;gig

CALL

!llunnilnunnuuinnulunnluunnnu&nuuuun
012476

wp.onn. '11935

831#55

%358?

8?355

;ggé 83{55 ?2%5 843??2 006152

§Nng

;aeo 03{2(134 513; 085732 00S476
7224 831525 016137 005734 005500
ggiagwo

ms;gg

8503353

;gge 33%253 %ng; 083736
7034

(gp)

:PUT xrosaYc ONTO STACK

mu§
SUBROUT
Ysse T
1t xx:wwvwv
: $WHERE XX IS
c
:vv;wvw 15 2 VAL 82,%3“‘{}5
mém %snomc
:
Sfiviv”' ' RI'Ex ”8«52\1 mex INT "»2

7214

7235

: TYPEA SPACE

3gsllllllllllllll?i!Illlllll?llIllll;gall!illlllllllllll!ililli*!

7210

7229
730

sr LIST Fon

SPACE 1

hxp-csm

SSPACEG

RTS

;Egg

;ges

moex NTO

TYPE

MOV
wcgs

7206

; ig

YYYYYY”

“PC, TYPTST

ng
8311% 88?512
;igg oafiso 109403
7

ou 55:
1 gx”

18:

M(R1), PRMBUF ?;gr %nomc INTO OUTPUT BUFFER

ngx

m;ms;uu) Louocfpg; hou aérs
OF P?RRH INTO LOWOCT

MOV

msna(nn HIGOCT ; PUT HI BITS OF PARAM. INTO HIGOCT

fig

2?%SSS

?gx

é"gc PRMNEM(R1) :§EE E'FNé%ren xg
(MA)

ILOH(.)

spy

mus SUBROUTINE TYPES THE LINE

;puT’
aoons:i;gngr
BINARY VALUE ON STACK

?vavwww suppne%mc Lénomc 0's
:

WORD XX = www

:%WHERE XX IS THE NUMBER OF THE CURRENT WORD OF

SEG Q415
SEQ 0136

CZREMDO RKE11-06 SS VERIF 1
10-JAN-78 11:48
CZREMD. P11

H1l

12:16 PAGE138
10-JAN-78
TYPPAT - TYPE CURRENT WORD OF DATA PATTERN 1S

MACY11 30A(10S2)

SEQ Q416
SEQ 0137

; ®USER-DEF INED PATTERN_1S, AND YYYYYY IS ITS lS-BIT

; #VALUE, IN OCTGL
DIGITS. <CR> _AND <LF> ARE NOT TYPED.
: #ON Su'mv
n# conm*n
m: INDEX OF THE CURRENT

2000080080088

woa
m-: PR ERN
llllillllllllilllllllllllilllllllllllllll!llilllllll!!ll!llllil
104401
010146

rvppnr.

o12s02

TYPE
ggx

TYPOS
.BYTE

BYTE
TYPE

MOV

.BY
-BYT

WORDSP
kép-(SP)
2

TYPE "WORD
"
PUT Im% o:gorgnac -

’25
‘9&
gxcxr

EQUALS

nunaenm

- ; TYPOC

YPE LEADING ZEROS

finnsmn,-(smcsr BINARYanus or THIS WORD
1 O
£l
3
6
LEADING ZEROS

;ncruau

o 3636 3 36 36 36 36 36 36 36 3 3 36 38 36 36 36 36 36 36 36 36 36 36 3636 36 36 36 36 38 36 36 36 36 36 36 36 36 38 36 36 36 30 36 30 36 36 36 36 36 3 36 36 06 0 3 36 2

fgfi% %i%vg'*‘}ggfinéxr'ég '8§FI"E

X X 2

T (BT
) (cimoALL A
A
REMAINING

!HITH

lPROPflGRES

8 SLOF THEJggTTERN

iiil&ll;;llilill;i&il&lii{lil;iil;iiil&il;i:i;&iii§§§i§§§¢ig;;;
HODPIS.

HOV
MOV

0sz2120

00e1S2

100000

005760

000115

BNE
; SEE IF PATTERN 15 IS SPECIFIED

;SEE IF PRTTERN

43:

840884
0ose7e

R I

isPRHNEH(RI) ESSE }FC?RRSNT PARAMETER IS (PT)
PARAMETER$"PT,
:SEE IF CMP
T

TiS,PT

asE F PRT;SECI#?EEPECIFIED

1S SHOULD BE noolrx
MDFY és
;

PcRDCHRS
ces

#'M,BUFFO

;

ms PATTERN 15 SHOULD BE MODIFIED
RE URN ADDRESS
RETURN ADDRESS
RROR RETURN ADDRESS

2: i L INPUT

IFICATION NOT REQUESTED
YPED
F (M)

CZREMDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11: 48
?

1362

031370

I11

P
MACY1l 30A(1052)
10-JAN-78
12:16
PAGE 139
MODP1S - MODIFY USER-DEFINED PATTERN 1S

1405
7533 83135-4 104401
00S272
001314

011145

£s:

7500 031410 Towad: O1earq
; 1 gguuu 133481 81§sw
7% 031420 004737 030624

8%:

;

031374

0007Se

7
7298

031376
031402

104401
005001

7304
7305

0314
0314

7307

0314

88%359

7308
7309

001006
701

7310

031434
O( 1432

03144

105060

031512

7;2;
A%
1
Bl
Bl
1
732
oaxsgg

732
;%55

ggxs
isau

;%gé 831242

7333

005737
001015
010951

0017

108

000002

000040
0osa272

031576

000702

7343
7344
7345
7346

031600
031602
031604
031606

012602
012601
012600
000207

;g:é

104401
104401

TYPE
CLR
JSR

SELP1S
R1
PC, TYPPAT

TYPE "MODIFY PATTERN 15"
xnmnuz: WORD INDEX
:TYPE CURRENT WORD AND VALUE

148:

0s2464

005272
001314

;READ NEW DATA PATTERN WORD

:(1C) RETURN ADDRESS ron RDCHRS
:($2) RETURN noomf'
S FOR RDCHRS

:(tU) OR smon

URN noon FOR RDCHRS

BEQ
CMP

: CONT

BEQ
CLR

168
R2

iBR
T
mr
cunnem VALUE
FINIT, () ;w

BNE
CLRB
DEC
INC
CMP

148
BUFFO-1(R0)
RO
R2
%6, RO

iBR I
T (1)
: INSERT
TERMINATOR BYTE
!
<f‘ MENT CHAR COUNT
;
(') INDICATOR
:SEE_HOW MANY CHARS NOW

MOV

#BUFFO, - (SP)

iGET BUF.

a6
CMP

BLT

3%
#32.,R1

228
8’ BUFFO

20é

PC,OCTBIN

MOV

(SP)+,RO

B0y
TST

:SEE IF ANY
I

ONCREMENT
W Tmosx
ESEEREF nu%

iBR 4r DONE, TO RETURN
INUE uhu
nfixr WORD
;gse F (!

8’ BUFFO-1(RO) ;seé ;rnbns

JSR
TST

007156

:TYPE R ;Ench
:TYPE ASTERISK
AND SPACE

208

052616

:ECHO BAD INPUT

TST

CMPB

00s271

sH10ct

E0%aTiS(RI)
rR2’

IN BUF IS (!)

:BR_IF TOO MANY

: CHECK ggx

ERROR
;gET

URN

INARY VAL

;SEE_IF VAL

ON STACK FOR OCTBIN

AND CONVERT TO BINARY

SS FOR OCTBIN

XCEEDS 16 BITS

1POTREN
WO
INECINTO TRBLE
Eggs '? (") uns“!F'\'r’Sso

BEQ
108
:BR IF (') WAS NOT TYPED
les:
ggg
a:aag,R1
,SEEI} ALL DONE YET
MOV
PAT1S(R1), pnns+é<nnPagmcmsTO NEXT WORD
noo
#2,R1
; INCRE
INDEX
xst
:LOOP UNTI
. ECHO ano INPUT
208:
YPE
,BUFFO
;ECHO BAD INPUT
. PROPAGATE CURRENT WORD TO END Of mrrsm 1S TABLE

1544

031566
031572

128:

005271

(022701 000036
7334 831550 001413
73% 031260 063781 Bontos
;ggs 031564 000755
7339
7340

;GO ASK AGAIN

24%
268

7l BiE
7321 331
022e 000006
e QU
J—

7324

' SQUES
43

7315
14
8273; 000041
Al
Bl
Rl
731
1HbY
2
000041
2313 031453 B85
7318
031474

TYPE

TYPE
sfince%
TYPE
PROMP
:READ AND CHECK imur IF ANY
JSR
C, ROCHRS

700

;BR IF MODIFICATION REQUESTED

,BUFFO

BR
; MODIFY PATTERN
1
15

031610
031

7306 0314

YPE

104401

SEQ Q417
SEQ 0138

007160

rvpe
BR

' SQUES
83

:TYPE <?> AND <CR>,<LF>
iBR TO ASK AGAIN

22%:

MOV

(SP)+,R2
(SP)+.RI

;RESTORE R2
:RESTORE RI

: (#C)

RTS
RETURN

: NORMAL RETURN

MOV

(5P)+.R0

‘RESTORE RO
:RETURN

CZRBHDO RK611-/06 SS VERIF 1 e
CZREMD.P11
10-JAN-78 11:

012766
000770

013732

012766
000764

015344

J11

MACY11l 30A(10S2)
10-JAN-78
12:16
PAGE 140
MODP1S - MODIFY USER-DEFINED PQTTERN 15

000006
000006

24s:

MOV

1 (12Z)

RETURN

268:

8DRVTST,6(SP)

;PC FOR_($C) RETURN

SASKMDE,6(SP)

;PC FOR ($2) RETURN

228

MOV

SEQ o4 1 8
S E Q@ s} 139

iBR TO RETURN

228

:BR TO RETURN

llllllllllllllllllllil‘l'fllll.l’lllllllllllllgllllill*ifi!lflllllnl

; ¥THIS ?I.BROUTI ?’ECKS %Gfl NTS OF LOHOCT AND
iHIGOC
¥2§51
VAL
g";
AND UPPER

e U, B

€passED

e i&‘??’éfii&sm %fsflT

LaTg e 1 NCREMENTED BY 2 S RoR S

:%52"%3:’ IF N0

; ® CQLL

RETURN
IS

ADDR,

FOLLOWING

JSR

giig}rfl\ru\rw~e
NN SN
N & 20& ERERG
Zoganss =8

CHKPRH.
O40S15

R1,R2

168:

005476

0oe042

CMP

#”MA, PRMNEM(RL) ;BEE

005476

006044

005732

000001

005476

00SS00

006044

005476

0oe042

00SS00

0060S0

005476

006046

005476

005732

F ;flR

c0s

ESE F H&gfl BITS= 0

MOV

O(SP),(SP)

GET E

RETURN PC

CMP

LOWOCT,

)

INPUT
VRLU%OIg300 SMALL

BLO
CMP

BHI

MOV

IM(

168
LOWOCT, PRMLIM+2(

;UPDATE 16-BIT P

TER an 1&

T VALUE IS T00

BNE
CMP
BLO

1?
-gn 1 naIE
HIGOCT,PRMLIM+2(R2) -gs:
HIGH WORD TOO SMALL
168
:BR }F HIGH WORD IS TOO SMALL

CMP
BLO
CMP
BHI

LOWOCT, PRMLIM(R2) ; E IF LOW WORD ;s TOO SMALL
168
-BR
Eou WORD IS TOO SMALL
HIGOCT, PRMLIM+6(R2) :SEE IF MIGH WORD IS TOO BIG
16
; BR {F HIGH WORD TOO BIG

BIT

BNE

248:

INPU VALUE ISLARGE
%OO LARGE

=13

gk 0

- CHECK VALIDITY OF 32-axr Pnaansf R VAL

208:

AMETER IS (MA)

HIGOCT

BEQ

BR
:CHECK VALIDITY

18s:

GET COPY_OF INDEX

TST

000000

; SAVE RO-RS

MOV

BEQ

005500

005476

SAVREG
ASL

0Ooel1S2

s Pt
Pt Bt Pt Pt P

N
o
oo

N
o
£

(=]
o

—

3
858
[,

NN
£ £
O

YRIEES

AN
NN RN

(=)
8 8 W DROLELOLNE L6 DHLE bhLLBOLE@
Bt Bt ot ot ot ot Pt ot Pt ot P
ot et
P ot ot Pt
s Pt

N
n

Ii!lllllllllllIillllllllllll‘lllll!llillllll!il*llliillllilllll

agg

IB;TO,LOHOC

W PARAMETER VALUE INTO LIST

RETURN

SEE }r MA §5°88°

243

:BR

IF u;cn WORD NOT EQUAL TO LOW LIMIT

ass

:BR IF HI WORD NOT EQUAL TO UPPER LIMIT

LOWOCT, PRMLIM+4(R2) ;SEE IF LOW WORD IS TOO LARGE
168
:BR }F LoW WORD IS TOO LARGE
: UPDATE 32-317 PARAMETER VALUE IN LIST
26%:
MOV
LOWOCT,PRMLST(R1) ;PUT LOW WORD INTO LIST

CZREMDO RKB11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
;:

031774

;:89
7433

013761

00SS00

0047

032060

K1l

MACY11l 30A(10S2)
10-JAN-78_
12:16
PAGE 141
CHKPRM = CHECK VALUE OF INPUT PARAMETER

9«8’ 010710
101
00 58
1
003176
UL

741

741
741
741

062766

741

062716

741

104410

741
741

8337

131

000002
000002

HIGOCT, PRMLST+2(R1)

JSR

PC, MXWRDC

308:

000207

THIS MA

sGET WORD COUNT IN R1-RO

:TYPE "MAX WORD COUNT = *

MOV
JSR

#SOMLOL1,-(SP)
PC, $0820

;PUT PO%NTER ON STACK
:CONVERT TO OCTAL

TYPE

i TYPE

ADD
D

28%:

WORD INTO LIST

MAWRDC
RO,
01

JSR
000014

;PUT HIGH

WORD’COUNT FOR

TYPE
MOV
MOV

0s342

MOV

; COMPUTE AND TYPE MAX ALLOWABLE

SEQ Q419
SEQG 0140

RESREG
RTS

PC '

$SUPRS

<CR»,<LF>

k2, 149(sP)
: INCREMENT'RI INDEX
#2, (SP) ;GET NORMAL RET
PC
;RESTORE RO-RS
:RETURN

741

7420
7421
7422
7423

§ 3 BB

2458

74
7430
7431

oaaogg

oxg;ox

032076
102
104

100413
1

035079 bB3LoT
163701

34 33511

7435

ggxés

7437

oaaxgs

7436

3 5

MXWRDC: MOV

00 00000 0000 0

200

sSuB

MA+2,R1

700 000001

R1
RO

TST

CLR

005501

ADD
ADC

001403

BEQ

005701

27%:

MOV

§ 3 BN

-SBTTL

027522

27%

;BR IF WORD COUNT < B5,536 DEC

iMAKE WORD COUNT = 65,536

0600 0000

; RETURN

0600000 00020 0000

742 035130 019704 093034
;:EE 3351;2 8%3;33 000003
7469
032202
006101

ORVSER: SAVREG
000001

MEM LIM

FROM MAHILM

DRVSER - TYPE DRIVE SERIAL NUMBER (LOW 3 DIGITS)

000141
040316
011374
011410

; INCREMENT BY 1 WORD

; ¥THIS SUBROUTINE TYPES “DRIVE SER.

104407
004737
112765
004737
104401
104401

#1,R0
R1

: #2EROS SUPPRESSED.
032134
03 133
142
032120
032154
032160

: IF NEGATIVE, RETURN
:DIVIDE BY 2'TO GET WORDS

$1,R1

RTS

;SUBTRACT MA

27%

ROR
ROR

;HI BITS OF

Rg,no

BMI
CLC

NO REGISTERS ARE SAVED.

sGET LO BITS OF MEM L

MAHILM42,R1

ggg

005764

30600 0000 230

MAHILM, RO

MOV

oog;ao

;332 355%
395930 000001
7440 032153 oooan'}
794
1
7442
7443
74944
7445
7446
7947
7448
7449
7450
7451
7333
7
7454

0000200

; #AND LEAVE THE WORD COUNT IN R1-RO.

;352 032060 013700 006126

;32;

0000 000 00

: ¥MXWRDC - GET MAX WORD COUNT FOR CURRENT MEM LIMITS AND CURRENT MA,

JSR

Y Y

Ps xuxrsg

NO.

XXX*

; SAVE ng—ns

:CLEAR

S.S.

(IN DECIMAL),

P P

TYPE

MOV
MOV
MOV

P.A11(RS),RI1
#$0CTVL ,R4
R4, -(SP}

TYPE

MOV
ROL

SERNM

#3.R3
R1

;TYPE

* SER.

WITH LEADING
TSR]

AND PARAMETERS

sROSTAT.P.CMND(RS) ;SET READ STATUS COMMAND
PC, DRVCAL
;READ
STATUS OF THIS DRIVE
,DRIV
i TYPE “DRIVETM

JSR

NO.

{GET "RTM STATUS BYTE 11
:GET ADDR OF C
FF
:STORE IT ON STACK FOR $SUPRS
:INIT CHAR COU
:INITIALIZE BIT POSITIONS

CZREMDO RK611/06 SS VERIF 1

CZREMG. P11
79

MACY1l 30A(1052)

10-JAN-78 11:
006101

%E‘.’:‘.’:‘.’

233

SED

4s§:

006101

181
101

100

R1
R1

assssc ;

p—

032300

61 76

ra g i

AZ feE g bl

7i% §§s§§
GINE
74@
74
;g%

4%
7511

7512

;gig
7513

CRTSER - w

:u'i' a E%?flc %

;3% §§§
iu ;g; oo:ng 000007
7487
72 0014
7488 33%57% wsagg

7503
7504

oecnsn:m cmn COUNT

:RETURN

R Y1222 222222222222222222:322223222121222222 2222222222222 2222222222 3

'8BTTL

;3%

7500
;‘é&é

Sbfi“Ea'i“h BYG1Y
%o 821
DIGIT INTO CHAR BUFFER

R3’

RTS

7480

7489

XL
g
'RES ong RO-

;3;

GET A WORKING COPY

RO,lmu

DEC

ol e

sGET NEXT 4 BITS

R1,R

303

—

ROL
ROL

e
MOVB

gggsgs

PAGE 142

MOV

;3;7; 032252 000207

ROL

7974 835530 10441

—

ROL

7
254 110024 3660E8
7468 0322
7469

L1l

12:16

DRVSER - TYPE DRIVE SERIAL NUMBER (_OW 3 DIGITS)
ROL
R1

mfi ggg% DOE 1§1
?

10-JAN-78

032366
032372

000001

nlsa stosm‘ NO.

XXXXXXXXXXX" (IN OCTAL),

éh¥;E;§lll!llllllllillllllIlIlllll:!lil;ll‘l.!ll;!ll&l?lllll!l!ll

N4S:

ézgs
BEQ
INCB

:3 59:’4}3 csmmsf —— .fi.tr'??s@“9'05 F“fim
aa 1
CTORS
P sscnns)
:IF 20 ?‘ READ SECTOR 1

MOVB

ongonnp.mms; :SET

BEaaS

100l
q?g? BIIdIG
34922

104401
000207

cmmmcs SERIAL NUMBER

NPE
JSR

3736

SRNR, i hee, SEL0CT 1uSecoeT) FoR ey

SR aggp TP
eseR
N013-85?
Pc'.'gougo'
M*
gfnmv
PC’
388SUPRS
. SERIAL NO. IN OCTAL

JSR

001315

gaz

TYPE
RTS

SCRLF
PC

rvpe CCR> " AND <LF>
: RETURN

lllliIillllllllll!lllll!gtlll:lg;lz;;llliilllzlllllllllilllll!

uls sppeioiue
RIS AR LI 20 LT, o e
085
ot ity
v S

lON ENTRY T0 THE suaaoun

ST THE DRIVE
Lo
B e [KPR
AND CYLINDER NUMBERS

;nusr BE PRE-LOADED &no ug PARAMETER BLOCK

!llll!llll!!llllllillillll!lllll!!lilllliii!lll!il!lil!l*ili!ll
;%

CALL

JSR

SEQ 0420

SEQ 0141

CZRSHDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
g?fl
76

12
4

1023

MACY11 3g2é1052)

M1l

10-JAN-78

12:16

PAGE
143

SEQ au26
SEQ
0142

KER - PERFORM IMPLICIT OR EXPLICIT SEEK

888565

000001
146526

000001

SEEKER:

cs%;xs:ag&o(m)g{f.
;EEK

MOV
MOvB
BIT
BNE

} XPLICIT SEEKS REQUESTED
EXPLICI
SEE

JeK®

8’3”'65“8&
p-cmO(RE) 156 RERD,LERDER Conmano

Che "“?S.cha“Rs, ; MPARE TO EXPECTED
CYL INDER
i
T bsr BAD
s CYLYo
MOV
NO.
BEQ

001174

28:

4s:

040316

§gnon

(s#n RO

:CYLINDER MISCOMPARE

DRVCAL

MOV

RTS

H B

URRENT CMNDS

TP IS

; PERFORM COMMAND

:RESTORE RO
:RETURN
T

"&gTTLsm#n. - sm.# FOR ST unp'émgf Tgng

s ¥IF

HIS SUBROUTI

nLL

OR ST STALL TIMES,

m:m:n
hs:
gronm
ERAGETM CPU. IF BIT8
ugnEauu. T?sé A RANDOM
STALL IS nm.x:o.

l!lilllllll!lllllizgilllllllllllllllllllllllIlllil!lll!llllllii
STRLL:
000400

146434

052620
052720

oossie
000016

nox

RO,-(SP)

JSR

PC SRAND

2 R

sfi

'a’°‘é

Emu.s,RO

cn REQUESTE

§g§

SNER
LOOP §§UNTER

§gtQ

éhfi?fisun

MOV

18:

53:

$LONUM, RO

gsg

ofa ,R1

; SAVE zfl

EgfivF NST
Aanoon gmu. ?
:

RATE

PSEUDO-RANDOM NUMBER

FGET IT xmo RO
:SCALE IT DOMWN

;GO STALL uxm mon NO.

mu. RESTI

cougnm ?on qo ug“

- lllllllllll&l!llllllllllll!llllllillllllllllillll!lilll!lllilli

"8BTT

non - RANDOM CYLINDER ADDRESS GENERATOR

mus suan TINE GENERATES A PSEUDO-RANDOM 9-BIT CYLINDER

m—:s§tmgnt.saves IT IN "CYLNDR".

lSUBROU
# CALL

JSR

ND.

PC, RNDADR

IT REQUIRES ms SYSMAC

CZREMDO RKB11-/06

CZR6MD.P11
757,

3352%

SS VERIF 1

10-JAN-78 11:48

MACY1l 30A(10S2)

10-JAN-78

N1l

12:16

PAGE 144

SEQ _Qu4ae2

RNDADR - RANDOM CYLINDER RDDRESS GENERATOR

SEQ 0143

s REEEFERERRREREEEREEEERBERFRRERRERERERBRBERRERERERERRRERAREREERS

gg @g ggngz gg? %gfi
;3;; m
005

ANDADR. JSR

MOV
BIC
SE

PC, SRAND

;

;g;g

ggt.m.cmm

%cmus“oom T0 A VALID CYLINDER

017764

00SS14

GENERATE 2 16-B1

%bmntcmm &TQRQSOHW
TCYL, evuon 355 }r
ch gs
?ooBIG

NUMBERS

7580

;2133

.SBTTL

;EPS

,‘E:;s;l!lzllllzlzar:::lg;l;lg:gé:l:;;g!llilll!!llll!lllllllllll!

7581
7682

753;
;gg

CEELEERRBRI BB P EBEA SRR R BYEE LR BE LS R B LI R R AR ERRB LR B L LG RSB U L 222

003132

;sgo

000100 150320

753.‘3

174575
000166

150314

759%

000131

150270

;ges

174060 150300

;ggg

ROUTINES TO HANDLE KWll-L OR P CLOCK

&¢ kon: ;'s*r:a
1§:
3%:

7238

R?g

E -gu.&x. Ema.s INTERRUPT

o-aooo dPKSB

;SET S0 HZ. COUNT

#-1667. , 3PKSB
gg

MOV

1, dPKS

MOV

%Exr“" cg gégcxou&.n. EEDUSED

%oo,a.xs

MOV
5?5

RTS

;28?

Tgucr

5 T 60 HZ. COUNT
% 5?‘(‘,5‘ 'éxus FREQUENCY

E INTERRUPT,CNT UP,REP. INT.

;

KHZ. ,AND RON

lE'BE:..';;;SEE':z::'t's;.;'E:EE:.?;¥E."".'.'..""""..*'*"

;Egg 032664 005200
;g% 032666 000002

étsgzliifagllI!l;;lll!llll!lllllll;g;l::iaistszzl#;gzIlllllllllll
* RTI
:
;Ecr
FROM INTR

;ggg

;‘Eltggllig;g;atgltat:Itl3;&;lgt&:l;;#gllll#llllliill!lllil!illl

7608

7609

032670

7611

7610

105737

003132

032676

005077

150246

032704

005077

150242

032674

7612

032702

;gig

032710

7613

43t

;gig

5
reee
7624

001003

000207

5%5&iululunuuulnuunnnnuinnunnnnununn

&lkoF:

18:

T1sTB

PCLKF

gse WHICH CLOCK USED

CLR

al.xs

oxsnaLz KWll-L INTR

CLR

aPKS

,DISRBLE KW11-P INTR

BNE

RTS

P-CLOCK USED

TURN

; RETURN

,sg##:llg;:;;#lllglllllllllllllllI#lllll#?iI;llilllll!llllllllll!

Tl bl CLIBRTS A, ST T v i anie
{1810k
of thE KULLL O o CLOCK TAIC INICRvAL cUALs T ine
mssun.rém cnuémnon CONSTANT IS LEFT IN TCONHI-TCONLO (IN

;ggg

¥
mno-ssc:

IF THE SUBROUTINE HAPPENS TO TIME OUT WAITING FOR

7627

mmso AFTER THE CALL TO CALBRT.

A TICK OF THE CLOCK,

A RETURN IS MADE TO THE RDDRESS LISTED

cznsnoo RKG11/06 SS VERIF 1

MD.P11
7628

10-JAN-78 11:48

7629
;Isg?
D

7€

712

104407

335""

005037

;gig

7630

005037

anam.

003176

003200

737 032614

03273 0S700

7642
Qae7ue QoseOl
7154-4 o;:a;;s 104401 011556
1

T84p
035766 Obhgsg
7649
7650

Zees

;;g

Cooooo

002005

7684 033008 Ogarug Coo1s0

7655
%E?

oamw

7658
765
7563
;g.sx

05053753?

oo;xgg

3200

005202
%

7@1?3
564

000200

SEQ 0423

SEQ 0144

N S SR

ifié

-4

keIF € a°°"acé' el

agud g’ #

BNE
TYPE

6S:

'ENAB& m;u L OR P ch;cx INTR

a8, CLKFAL
e

.RUN TIMER TO NEXT CLOCK TICK

8s:

CLR

ELR

R T-

;ADD MEASURED CYCLES TO SUM
338

RS sum.u 01

ADD
BCS
INC
Sfi'é

RY, SUMHI1
£3

£128. ,R2

} ERCAEMENT. CLOCK[JIME-OUT INDICATOR

:TIMED-OUT ON KWll-L OR P INTERRUPT
i

e
i
'

)TP

; INIT CLOCK INTR INDIC

BT Rl YR W, V. S

5Em°“"oi
RETURN AODREGS' C-OCK INTR
1
:ADD MEASUREMENT TO SUM

:BR IF SUM OVERFLOW
35515- mx’;ag:asunsnsms MADE YET

:INCR CALIBRATION LOOP COUNT

; TAKE AVERAGE OF128 MEASUREMENTS
ROR
ROR

SUMHI 1
SUMLO1

;DIVIDE SUM BY 2

17:;

000166

03311

0137g§

3176

033122

010237

033126

SUMHT1

:INIT SUM TO O

{

;g?S

7683

CLR

:INIT CALIBRATION LOOP CONSTANT

SUMLO1

003200
003176

7535 033060 gluas?ooan 000376
7674
127 050053

033116

SET DIVIDE LOOP COUNT

cme;ouc:1

7681

CLR

; SAVE RO-RS

7,R2

31
33 102

SAVREG

cn.c

833055
3054

7682

PAGE 145

7670
;gn

7680

12:16

812703 000007

7668
766

75;9
767
767

10-JAN-78

CALBRT - CALIBRATE THE SOFTWARE TIMER
;% CALL JSR
ALBRT

.llillli!lililllll!lll!l!i!l!lll!lli’fil!!!llllll!ili!lll!l!l!lll
<ERROR nsr(mn ADDRESS)>

713:333 3357»0 005002
mgg

MACY1l 30A(1052)

Ble

12;33 000461
12703 026400
13704
3200

0047

001307

3244

003166

:DIVIDE LINE PERIOD IN N-SEC BY hnen CYCLE COUNT TO GET cnua CONST.
&5
scla
;SET DIVIDEND= 16666667 NS

MOV
MOV

168:

$376
foabsaa R3

gg;

Tgs

MOV

SUMLO1 RS

MOV

Ra. TCONHI

MOV
MOV
MOV
JSR

BNE

SETE,'?"EB‘;HE LINE FREQUENCY

46
umlsao R3
SUMHI1, R4

:SET DIVIDEND= 20000000 NS
;SET DIVISOR

PC,M.DPID

; PERFORM THE DIVISION

:BR IF HI BITS NOT O

:GET FINAL TIMING CONSTANT

8522%89P?¥61x,08-§§N!§§I§1!48

cle

ke 38éfl§a’ C&EI g?EaTHéeSbPTHSREET*;ER

7232
140 88559 882296
7687
033144

;ggg

033146

18S:

00020?

Jgg
38 CLKOF
RESREG

5E}SQ8LE KWll-L SECLOCK NTERRUPT

;RESTORE RO- RS

RTS

;690

SEQSEBEHIHS

; RETURN

723&

lllIlllllllll.l"Iillll!l‘lllllllilllllllllllll!ll!l!lll!!llll!

7696

m: INTE

7233

7697

7698
77%1

;;na

Aamas

032704

000200

7733 833 23 %583
033 S6

E i
062716

7723

7731
77
77

7734

7735
7737
77
773

&r’;ou. IF A CO

9" -

ERROR RET

sn:osn THE CALL .

$ !iilllllllllllllllllllllliilllllllilllillllllllllllll!Il!ll!li!

%
BIT

3
70

on
g

uég"i

,rllr;ERspzcmL mml«:Rgoop o

3 S

000002

S QR oo

0000 00

RDD

R4’

#BIT07,RY
TIMER

0 00 230 000 0000 2 0

82, (SP)

%flsfim 58c&vcn.

SEE IF TIFED-OUT unmuc ron INTR

INTE

T NO

D YET

X UP_ERROR-FREE RETURN PC

22?255.9:%" .

o 363636 36 3 36 36 36 36 36 3 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 38 36 36 36 36 36 36 3% 36 36 36 30 36 3 36 38 38 36 36 36 36 36 36 36 36 36 36 36 36 30 36 36 36 3 3 %

'i INIVRB - INITIALIZE VARIABLES USED IN TIMING TESTS

s e

et Pt et ot Pt Pt Pt Pt

N JIIIIIIIIIIINNN
R 20N S DOV EWh- 0O 3

7705

chs couu xn’iu- EACH Lsog, m'ig CHECKS

ll!lllilllllll&llll!lil!lllllllil!!!llllllllllllllllllllll!llll

£LMNVO

[

thivRe: g8
CLR
CLR

figz

fi% 003202
<

033254

033304

033310

005037

000207

019;;99

CLR

SUMHI

CLR

52§%h§

v
MOV

A32z27

193553 003222
003224

MOV
MOV

003230

CLR

003216

3226

SUMLO2

CLR

003212
003214

1777277

R
gum i

ABVMX2

CLR
RTS

;coum OF FORHARDTIHES ASOVE 'SP
SPEC'D MAX
;
REVERSE TIME
ESWTIME SUM AND Rv%
;REVERSE TIME SUM AND AVERAGE

#-1,MINIL1
s-1.MINIH1

;MIN MEAS’D FORWARD TIME

#-1,MINIL
§-1 HINIH

;MIN MEAS’D REVERSE TIME

MAXIH2

;MAX MERS’D FORWARD TIME

;MAX MEAS’D REVERSE TIME
; RETURN

JEEERRRRERRREERRERRRRERRRRRRRRRRRRRR LR AR

R R AR AR

R R AR R

AR RE R

CZREMDO RKB11-06 SS VERIF 1

CZREMD.P11

10-JAN-78 11:48

MACY1l 30A(10S2)

.SBTTL

7740
7741

77494

220

77u§

033322

012777

BED e

03347;

%370 ga%0m

res

2 -

7782

0334S0
Y

004737
7

041704
o443se

17666

000004

rre e o

033512

MOV

25:

4§:

000001

s
000000

SE -5353

’

35“
onx
G2 g?gg?g
JORD O
ggfl
PC, TIMER

ADD

v
MOVB
JSR

8(S
(R,AL
P cnuo(RS)
.
;Ct

Rre

gsg

82, 4(SP)

81, INTR, 3RKVEC

PC’

lIEnikngltRE)

INTR INDICATOR
i
nxos SEEK TIMER HANDLER VECTOR

I"¥Tnbg
..é‘
L eueasfliF sssxuo
m
TIHE
é

PC,CNVTIM
R2,RO
R3AY

MOV

DRIVE

ss FOR DRIVER

g§n
MOV
WV

T&’”"“
ZRROR
MOV
au(spa,u(sp)

000004

NIT

sonvsagsngnn
“!kégL s T;HE
10
EUT
n
Ls e Biré %
Enagg

gigrggi
RKO6

E URN PC

HRNOLER

afifigfisgsnELERR COMMAND

.gg

: gafif?‘a&fif
?fi?@nzgpgnnos

?“HEB 5¥“o&’ssssx

a&x Sanon RETURN PC

LEPECTAL
INTERRUPT HANDLER FOR SEEKS IN SEEK TIMING TESTS e
%lggl%liilllll!lllIIl%llll'lllIlll!l!illillllllllllllllll!llilI

&EEKHD: ggv

1
2703

O
(]

7750 G338
7791

000747

ugfi

033472

=8 X3

é\l\l

7785

033470

000001

000004
147422

16 815235

7 BEm g
7776

*tn03
LR
L8
5839
147510

034136

7l
ge LSS gorgz%a 033434 000507

777
7780

TIMSEK - MEASURE AN _EXPLICIT SEEK_ TIME

!Il!lllllll"llillllllllll&l!!lllllll!lllllillllllll“llll!ll!l

7777

SEG g42s
SEG 0146

nsiunu RDDRESS)>

7747
774

;753

12:16

EA
N e TR R L
PR TR
L LA

5238

.
7724

10-JAN-78

TIMSEK - MEASURE AN EXPLICIT SEEK TIHE

0000

045270
040000

2%:

aég

4s:

RTI

?NC

(22) R3

f.xnrn

:ox,na

gsrxgxrgngr mT(csxT

LET?n?
g30c§§s THE ERROR
onx TINTR SET YET

nxos xu R INDICATOR
327
:RETURN FROM INTERRUPT

: lii!lll!ll!llllIi{lllllllllilllill!l!ll!llillll!illl!lllllliiIi

iFDTERH - COMPUTE
A TERM OF THE FORWARD SEEK AVERAGE FORMULA,

CZRSHDO RKE11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY11

12:16__PAGE
1 48
10-JAN-78
TIMSEK = MERSURE AN EXPLICIT SEEK TIHE

3OR(1052)

;#AND ADD

B33e1e

s
537
104410
000207

TO THE FORWARD SUM
T

R R

S A

e R i

2 2

R2-R3

;GET_COEFFICIENT

HULTIPLY BY 2

RS
PC,M.DPIM
sg,sunuxa

83264

;GET MEASUREMENT INTO

RO,R2

SCRACH, RS

00ss4e

IN SUMLO1-SUMHI1-SUMLO2-SUMHI2.

; SAVE RO-RS

51'R3

MULTIPLY COEFFICIENT

RDD TO FORWARD SUM

R2, SUMLO2

003202
003200

SUMHI1

; RESTORE RO-RS

DD D

SS
R DO NN
£ Wh—

S02

FOTERM: snvasc

o4407
10002
1370S

SEQ Q426
SEQ 0147

lIlll!llllll!l!lllllllllllllllllllllllillilllllllllllll!lll!lli

invrsnn - conpure

ARififl?fi
8

VNN NN NNV

i iaddsirssat

AVTERM: snvnsc
0oss42
053204
003230

S
RO,R2
R1,R3
RY
agRflCH,RS
PC,M.DPIM

R3, MAXIH2

=
R2,

003226
003220

VERSE v;
AGE FORMU

IN MAXIL1-MAX
Hl-nnxxLe-nnkIHa
e
g Ed d a2
e e e
e
e e e

#AND ADD IT TO THE REVERSE SUM

€D 00D D

NN NNNNNNNN

RO-RS
; GET MEASUREMENT INTO R2-R3

GET COEFFICIENT
MULTIPLY BY 2

HULTIPLY COEFFLCIENT
iADD TO REVERSE SUM

MAXIL2

MAKIH1
PC

; RESTORE RO-RS

liillli.li!llllllIIlllIillllllillllIllllllllllllliilill!!*lll{l

'i
MEAS’'D
ME TO MEARS’D MIN AND MAX
.nuo REPLRCE
gSCESSRRY TIME IS IN RO-R1, POINTER
:%TO LO MIN IS x
oocooe

iliiiiililllili1;;!!lli!l&iili111&lnl:iin:n;&&****u&;*nn;&;n;15

AHPTIM:

000002

4g .

000006

6S:

000004

RO,2(R3)

BHI
BLO
CMP
BHIS

4s$
R1, (R3)

BLO
BHI
CMP
BLOS

8s
R1,4(R3)

MOV
MOV
CMP

; COMPARE H% BITS TO HI MIN

RO, 2(R3)
R1.(R3)
RO 6(R3)

108
108

MAX
:
;COMPARE LO BITS TO LO MAX
OR = MAX
5

czasnoo nxsu/os SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

7852

033664

010063

;ggg 033674

000207

7863

033670

010163

000006

000004

2883

7858

7863
;g;

7959

8s:

MOV

RO, 6(R3)

:SET NEW MAX HI BITS

108:

RTS

Pc’

iRETURN

MOV

033676

033700
702

3724

~ ;.2

:SET NEW MAX LO BITS

éfi
3730

R 12222222222 2222222222222:22233:222222232222222222222222222222222233

104407

8ETAVG: SAVREG

01030S
oosoool

§1u§9020 003200
010337

R3,RS
gcli

MOV
CLR
JSR
MOV

SUMLO1,R3
PC,M.DPID
R2, SUMHI1

;HI _DIVISOR = O

CLR

;SET DIVIDEND = REVERSE TIME SUM

MOV

13703 003176
0047
053244
010237 003200
003176

1
013702

003204

CLR
MOV

;g;;

33 ;gu

004737

053244

JSR

m:mg;

010237

3202

R3, SUMLO1

R1
SUMHI2,
R2

MOV

003204

SUMLOZ2 . R3

PC,M.DPID

MOV

;g'x?'g 3;!"9 ?633% ovragr
;gg? 8337155 000207

R2, SUMHI2

gggnsc Wy L
RTS
PC

2885

SUMHI1,R2

MOV

7
033740

3744

; SAVE RO-RS

MOV
gts

787
7874

7875

R1.4(R3)

icemvc - COMPUTE FORWARD AND REVERSE SEEK TIME AVERAGES BY
:%DIVIDING TIME SUMS BY NO. OF MEARSUREMENTS (PASSED IN R3 ON ENTRY).

786
7953
786
7870
787

SEQ Q427
SEG 0148

- ll!lllllll!!ll!llillllllllIllllllllllll!illl’llllllllllllllnllll

7859
7860

7825

MACY11 309(1052)
10-JAN-78
12:16 P
149
TIMSEK - MERSURE AN EXPLICIT SEEK TIME

:LO DIVISOR = MEASUREMENT COUNT
:SET DIVIDEND
= FORWARD TIME SUM
'PERFORM DIVISION
:STORE FORWARD TIME AVG

; PERFORM DIVISION

;STORE REVERSE TIME AVG

RESTORE RO-RS
ERE$URN
;

7884

5 !lll»!lll!l!lllllll!llllilfilillllllllllll!lilIllil!lll!llI!l»lnl!!

7886

,mus SUBROUTI

78
7889

;%IN BOTH T
: #THE MAX speg Ns

7885

‘&8TTL

7887

TYPTMS
-

SEEK TIM nc nsnsunsnsms

m: umxnuo$

; #CIN 8?01!%)

TIMES

IM NG TESTS

YPED ARE
gfi sgo cs omc IT

;gg?

‘:,,2',? nl:s

;ggg

: i'Il!lllllllllllllfllllllill‘ll{llllll!lill!llllll!llllilll!i!ll!!

7894

7895
7896

7897
78
78

033770

_
033770
4010

012701

4020

013749

7903

034024

7904
7905

7906
7907

011722

003212
034210

gg-oom

104401

012701
004737

790

gguogs
40
034034
03403e

rinsua:nsu

INTERT0 SPECIFlED

T
YPTMS:

033774
034000
4004

T0 m.

104401

737

104405

010337
104401
000000
012701

; TYPE Fonumo MEASUREMENTS
YPE
FORWRD
nov
JSR

MINTL1,R1
PC, TYPMEN

003216

MOV

kMAXIL1,R1

003172

MOV

001315

TYPE

034234

JSR

TYPDS

034034
003176

4§:

MOV
TYPE

L.WORD
MOV

PC, TYPMAX

RBYMX1, - (SP)

R3,4S
O
#SUMLO1,RI1

; TYPE '-u.ronumo DIRECTION®%%"
:POINTER TO LO MIN
:TYPE MIN MEAS’D TIME

PTYPE <CR>

AND <LF>

:POINTER TO LO MAX

{TYPE MAX MEAS’D TIME

JGET COUNT OF TIMES ABOVE MAX

:CONVERT AND TYPE 1T

iSET_POINTER TO SPEC’D MAX MESSAGE
:TYPE* OFXXX ABOVE MAX OF XXXXX US *

:SPEC’D MAX MSG POINTER GOES HERE
:SET POINTER TO LO AVG

A(1052)

10-JAN-78

Gle

12:16

PAGE 150

8%2228"9“6“’?3-?&!;5151148 p——" P%gs - TYPE RESULTS OF SEEK nnmc MEASUREMENTS
o8BS
0BG GBS
B MEASURERENTS
PREENC
TR OTHE e,
7910
; TYPE REVERSE
:
DIRECTION"l
; TYPE "lllREVE
VR
YPE
s

7913

737

034210

13;%

3?33

Al s oull GUL
;319 833?3

R
I e o
;:Eé @féfi oE lcauggl: 003202
;?Eg Z wiaag 68338
7355
;;Igg

éégos

navnxa,-(sm

;ger c% T$§E£§Tmovs MAX

'RETURN

N
a83“° gsumoa Rl
RTS

;
.

ST
PmIEL
o POINTER
e eGOESe
:
'D MAX
HERE
: ?T:cpgxuten"?g LO AVG

l'lllll!lllllllllllfllllIllllililllll;l:lllllillllllll!l!lllllllil

;3 1

;nfi'ng cT)g"%nuE?F
PLI;E
nccv&.gEguu?finmns?ins
av msIS

2330
:

5:""5
Té"i%ofla‘t?u&u
i
agMADE TO me%onsss LISTED AFTER THE
:lC“.L

2a3s

J9CALL =

738
g aimm aes
7942 034146 004737 0S3204

ChvTin wey
JSR

;3333

;"lllInllllllllllllllIIIlll'llll!l!lllll!l;!;{:g;!:!:;;Elgg;g#li!!l

7943
7944

034152
ggzxsw

;33

33«%22 0155?2 000000

4§:

;9“ 03:}70 3?390" 001750

7948

034166

005700
001002
000207

7l
GuIE poi Rl
7953 034206 000207

Zaee
7956

7961

7962
7963

ise LT

sMULTIPLY
:MAKE SURE

E‘T’E

g(SP) (SP)

sszosaanson Ugsrunn PC

535

:SET HI

15T
BNE

ISR

PC,M.DPIM
RO’

R
RTS

#1000. ,RS

e
HI 2 WORDS
O

‘BR IF NOT
;

BITS

= O

:SET °78§¥2§°%=u§000 (DEC)

RURoRD

foweRr
T o
:ERROR-FREE RETURN

PC’

;ggg

I e RMoness)

222222222222222222232222222323222222232323

'4*7'53;?;'3*?33?;?;';23?0 TIME IN US. POINTER TO LO TIME IS IN Rl

034210

034214
034216

104401

010146
004737

011756

0S3542

1‘;gg%SQI#E;Ellll!;?;ggllllll!!!ll;;;gll!?:llll!ill!lllillil{lllli
MOV
JSR

R1,-( SP
PC, HISDBED

. iGET POINTER TO LO TIME
:CONVERT TO DEC

SEG Q428

SEG 0149

CZReMDO RKB11-06 SS VERIF 1

CZREMD.P11
7964

7965
;959

10-JAN-78 11:48

034222

034226
034232

004737

104401
000207

MACY11l 30A(10S2)

JSR

012003

011765

Hpmax: Tvcs

7978
7979

104401
000207

012003

TYPE
RTS

7é;§
§34533
864
3? 053542
797
34246
004737
053736
034252
034256

Z38s
7383

(a .

PéI:niSfleo
PC’ 388SUPRS

micros
pC

T PE, "§¥£n= is Sou

.Gsn
S‘ DEC
i TYPE
1

:TYPE "us -

21222222 2222222222222222232222232322222323232223232222222 3332222

tgngxgn; TYPE AVERAGE MERS’D TIME IN US. POINTER TO LO TIME IS IN Rl
4260
034264

104401
0101496

011774

ggwsr

004737

05373

034266

004737

;ggg 034302 000207
7951

JSR
JSR

, R

;

7989

:TYPE "US "

i!ll!!llIllllll!ililll!illllllllllllllilllllllllll!ll!lllill!li

103431

7
7988

:TYPE IT

22222222222222222222232222222233222222232222222222222222222222

;37" oa:zaq

738?

micros
bc

igxpggxn- TYPE MAX MEAS’D TIME IN US. POINTER TO LO TIME IS IN Rl

7373

7980

PAGE 1S1

PC, 388SUPRS

TYPE
RTS
, R

;9;1

12:16

TYPTMS - TYPE RESULTS OF SEEK TIMING MEASUREMENTS

053736

7968
7969
7970

10-JAN-78

4276

104401

053542

lllllllillIl!!lllllIllllllllllllllll!l!lllilllllfil!lillll!!lll!

t¢PAVG: TYPE
MOV

JSR

AVGEQ
R1, -(sp)
PC.
3#$DB2D

RTS

JSR

01200

PC.
aoogupns

TYPE

; TYPE AV
!GET POINTER TO LO TIME

convznr T0 DEC

STYPE
:TYPE

*us *

7994

7338
799

$ X

7938
7933

8001

034304

8003

034312
034314
334332

8007
8008

034324

8002
8004

034306

104407

012701

oxooa;
020127
001374

lilllllllllllllllllllllllll!l!!lllllllll!llllll!!llillillll*l!i

063554
064554

MOV

MOV
CMP
EE§
RTS

REG

SRWBUF , R1

RO, (R1}+
R, SRWBUF+512.
23
PC

VE RO-RS

ADDRESS OF DATA BUF INTO Rl

EE'
WORD
INTO
urus
B
ITTEN YET
gg *r
NOT
osge
ETURN

, llilllllll!llllllillll!lllilllillllllllllllllllillilllllliil§l§

8ole

irc
on s T:IS
SUBROUTINE DOES A uaxrs-cgggg ?r ggg;on FS ON CYL

381“

: #TRACK

8018

2%:

104410

ggié

8017

( ODSEC: SAVREG

000207

o2
8019

1122222222222222222222¢2:2222232322232212222122223232222222222222
23

i LODSEC - THIS SUBROUTINE LOADS THE CONTENTS OF RO INTO ALL
: %256 (DEC) WORDS OF THE DATA BUFFER(RWBUF)

1og(oc§) #ofi THH? ShRTHEULRR

#THE P

034326

034330

104407

016546

OCK MUST BE PRE-LOARDED

WITH

3c oE?n unx“‘sn

THE PROPER PARAMETERS.

llllllll!llllllillllllllllllll*lllll!lllill!lll!llillllll!!lil!

000004

8019 034334 10S0eS 00000S

tAKCHK: SAVREG

MOV

CLRB

: SAVE

RO-R

P.SECT(RS),-(SP)' ;SAVE TRACK AND SECTOR PARAMETERS

P.TRCK(RS)'

éLsnn THE TRACK NO.

SEQ 0429

SEQ 0150

CZREMDO RKB11-06 SS VERIF
CZREMD.P11
10-JAN-78
1

MACY11

10-JAN-78
12:16
PAGE 152
TYPTMS - TYPE RESULTS OF SEEK TIMING MEASUREMENTS

30R(1052)

SEQ 0430
SEQ 01S1

.LOAD THE DATA aurrsn WITH THE CURRENT TRACK NO.

2s:
000001

MOVB

RC (nsx,ao

JS
MOVB

NO. INTO RO

;PERFORM THE
;1ncn§n£nr

WRITE CHECK
HE TRACK NO.

:ADD 100(0CT)

'TO TRACK

Lb P.CMND(RS)
‘LOAD
DATA CHECK
WITH COMMAND
TRACK NO. + 100(0CT)
oukrcux
:SET WRITE

JSR
INCB

DRVC
P $RCK(RS)

CMPB
BNE

00000s

;GET TRACK

#3,P. TRCK(RS)
2

MOV

RESREG

RTS

;ss:
F DONE WITH ALL TRACKS
gr ngr 2325 YET

(SP)+,P.SECT(RS)’ ;RESTORE

TRACK AND SECTOR PARAMETERS

;RESTORE RO-RS

RETURN

336 36 36 36 3 3 3 3 36 3 36 3 3 3 3 3 3 3 3 3 3% 3% % 3% 3% % % % % ta i3s32222223332223

iLooP 4 - GE RATE SIXTEEN PSEUDO-RANDOM NUMBERS AND LOARD THEM
:#INTO THE PAT ERN
14 TABLE.

lll!lll!lllliIllllllllllllllll 1333332332332
222 2222222222222 2222

{dDP14: SAVREG
MOV

000010
007116
052620
052720
0S2716

4s:

MOV

JSR
MOV

#8.

sPAt14, RO

MOV
DEC
BNE
RESREG
RTS

PC, SRAND
;LbNUH,(RO)+
HINUM, (RO)+
1
4g
PC

sav; RO-RS
:INIT

,gET

LOOP COUNTER TO 8.

:GENERATE 2
;PUT ONE

S OF PATTERN 14 BUFFER
s-axr RRNDOH NUMBERS
R INT
TTERN

;PUT OTHER NO. INTO PRTTERN
iSEE _IF 19 WORDS LOADED YET
:BR IF NOT
YET
:RESTORE RO-RS
'RETURN

gs;¥lllllIIIlIIIIIllllllll.lilllllllillIl;lililllil{llllliil!i!l

335
IS no?n§
D AFTER a
;con2u§25'fl¥NE
Nfiko
‘¥p, CYLN(RS)

rn;

FINTRK,

2
034504
S10
S14
034520
034522
034526

DATA

u:uunnnnnnnlunnn T2 T

188:

0344

000002

MOV
NEG
CLR

AND FI NSEC

2(SP), (SP)
2(5P)
822. RO

BEQ
MOV

198
#20.

CMP

,savssno RS
WORD cgunr
:STORE
LASTKC, -(SP)
;naxs IT POSITIVE
(SP)
ROOM ON ST
:MAKE
-(SP)
3(5P), (SP)
;srogs NO.
SECTORS Tnnusrsnnso
2(5P)
;cgg
ngn
ON ON
P.SECT(RS),2(SP)’;
ORE
STARTING SE ron

MOVB
CLR
MOVB
ADD
CLR
MOV

TSTB

19%:

THIS xs usso WITH

K ADDRESS OF A SOF TWARE

#tNADR: SAVREG

034450
034452
034456
034460

SED IN LASTWC.

0 COMPUTE THE conne

2 %¥THE
i

NA?I R . HAS
THE COMPLETED,
2°'S COMP. TO
OFT

FORMAT

,RO

RO, (5P)

;DETERMINE FINAL SECTOR ADDRESS

;ck;nn NO. OF TRACKS TRANSFERRED
:SET
FOR
22 SECTORS
THE F
:DETERMINE
iBR Irosa
CTORS
:SETET FOR
200 SECTO
_SECTORS

;CHECK FOR SECTOR OVERFLOW

CZR6GMDO RKB1i/06 SS VERIF 1

CZREMD.P11
8076

80
80

10-JAN-78 11:48

034530

632
M

160016

54
¥

6616
122716
101
16

oosgss

63%2&5
000779

12637

8091
8092
8093

034610
034614
33m;=ao

6516
011637
005726

8095

0346

000207

8094

8096

034622

10-JAN-78

BHI

000002
000002
000003
000003

005576

000002
00SS574

208
218:

SuB
INC

BOVE
CLR
MOVB
CLR

CMPB
BHI
SuB

22%:

104410

MOVB

PAGE 153

SEQ Q431

208

SEQ 0152

,NO cnecx IF sscron CORRECT

RO, (SP)
z2(5P)

;?E ng §£ COUNT BY 20 OR 22
; INCREMENT TRACKS TRANSFERRED

2(SP), (SP)
2(5P)
#3, (SP)
224
83, (SP)

;DETE }r: FINAL TRACK ADDRESS
:CLEAR F1I
CYL INDER
:CHECK FOR TRACK OVERFLOW
:NO cgc FINAL TRACK
:DECREMENT T
COUNT BY 3

218

:CHECK FOR TRACK OVERFLOMW

19P)+ FINSEC STORE
FINAL: ?oficSECTOR
- TRANSFERRED
L-oM
-(sP)’
:
MAKE
?mcxs
P.TRCK(RS), (SP) ;srossnsrmnuc TRACK
2(8P)

(SP)+,FINTRK

: INCR CYL COUNT

:STORE qm% TRACK

ADD
MOV
TST

P.CYLN(RS), (SP) ;CALCULATE FINAL CYLINDER
(SP) ,FINCYL
:STORE FINAL CYLINDER
(5P
;CLEAN
OFF ST

RESREG

8099

12:16

FINADR - COMPUTE FINAL PACK ADDRESS

101004

80
ag 999772
ooss77
gogx
8332»2
&ES-.’Z
aoes
550 gssxs
00S

808
8084
8085
e;
808

MACY11l 30A(1052)

IREST

i RETURN

RO-RS

; luuunununi"nuuuuuunnunnnnu;uunuun

8100

*&BTTL

8104
810S
8106
8107
gigg

:%0F ALL mf'
TTERNg
oo-xs(omcx R rv nuu DATA TEST
:%IF PATRN ;
NO. OF WORDS IN THE WORD WDSXFR
:%0F THE PATTERN
mégtm;n;o
BY"'ENO. OF THE BIT SET IN R1 ON
;smnv ARE
L
I»lllI»‘llllllll!l!lllllll!ll!illlllll“i!llIlllllll!lllllllfll!lll

8101
8102
8103

8110
8111
8112
811
8114
8115
8116

eug
8118
811

034626
034630
034634
ogul?
03464
0346
0346

8120

8121
exag
8123
axg

104407
01370; 005572
005737
005544
19&7,
12
006216
01577% 000400

LODBUF: SAVREG
MOV
TST
BNE
MOV
MOV

202000
032701
000001

3%:
43

012701

063554

001003

0346
034674

333%8

8126

034702

8128

706

8127

005200
006201
000772

882300

neno/unm-: gn BUFFER

CLR
i
BIT

;SAVE RO
;ggr NO.
eg
:SEE _IF ou CK
nxrv DATA TEST DESIRED
iBR_IF NOT o% ERIFY
;ggr DATA PATTERN smmmc ADDRESS
:SET PATTERN WORD COUN

RO
#BITO,R1

;mér BRTTE
tNDT
:SEE
_IF THIS BIT IS SET

#RWBUF , R1

BNE
INC
ASR
BR

RO
R1
4§

ASL

006300

ASL

MOV

#16.,-(SP)

8129

034710

062700

8131

034720 013701 00Se02

012746

ASL
006216

000020

ADD

MOV

mm BUFFER (POINTED TO BY
Psmmc DATA PATTERN.
IF
H IS Lonoso xs conansso

uo;xrn,na
3s
sPATOO, RO
#256. ,-(SP)

006300

034714

MOV

6S:

300

83.,3“70"

8130

LODBUF - LOPD
T

,mus suaaounns Lonos HE READ/WRIT
1% PMA
Pm+
WITHHE
..é
: ¥PARAMETER PAT
T

:SET BUFFER RD

'BR 5@ THIS g*‘l’ gs SE
: INCREMENT PATTERN NO
iSHIFT TO l-:xmms NEXT BIT
'BR TO CHECK NEXT BIT

'MULTIPLY PATTERN NO. BY 32(DEC)

$PATOO, RO

:GET ADDRESS OF ossxnso PATTERN

Pnn,#u

:SET BUFFER ADDRESS

,se PATTERN WORD COUN

CZR6EMDO RKB11-06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

8132
8133

8134
8135
axg;
giaa

og:
034730

005737
100036

055716

0137
0s27
746 mamx

003206
000001
{38388

;as

Kle

MACY1l 30A(1052)
10-JAN-78
12:16 PAGE 154
LODBUF - LOAD THE READ/WRITE DATA BUFFER

172354
177572

TST
BPL

$KT11
308

ss }rn;ncr m:ssm
I

BIS
g}g

#BITO, 9%SRO
:}38060.31

URN ON MEMORY MANAGEMENT
:FORCE RELOCATION THRU KIPARG

;BUFFER LOAD
LOOPSAVPAR,
FOR MEM
MGT sréms HE
MOV
38K IPARG ;;er UP WORKING P

8{33 g
itlm.}i
22%:
14
24%:
§i:§
4 g3e7 11 020000
8144 833
oé?g; 000200 172354
8145
2701 020000
aw?
268:

ngz
MOV
ag
ADD
BIC
DEC

1(agp§3m'
(R3)4, (R1)+
girxé.m
#200, 38K IPARG
#BITI3,R1
R2

814

DEC

o
34§:

A
MOV

BT
(R34, (R1)+

44§ :

DEC
RY
BR308
TST
(SP)+
RESREG

814

%saoq

81g
15 006760
8151 035016 042737
8152
035024 000410
8153

8125
exs;

000001

177572

032030 012321
011609

ax?g %?Sg’
816, 035046
032044 0OG37D
emg
005726
8163
O
109410
gigg

035052

000207

BEQ

28s

GETTR
copv or mnzm nooness
FER
:Bono
EE3ezmou 73N
NEXT PAGE
Emc r:
v YK FOR NEW PAGE
;8ET
ncn&q“
: CRFIfism
COUNTER
iBR IF

ALL

;DECREMENT PATTERN WORD COUNT

BR533
1BR
1o MEMORY
NEPEAT THE PATTERNT YET
BIC
#8170, 38SRO
H)
BR
44§
;cos'r'oal'&rum
:BUFFER LOAD LOOP FOR NO MEM MGT STARTS HERE

28%:

RTS

SR I TPRITERN WMORD COUNT D oo

:LORD A m‘n WORD INTO BUFFER
: sc‘;&:n'! gg'fism WORD COUNT
1BR 70 THEREPERTgsacx THE PATTERN.T YT
:POP
;R;;Tons RO-RS

:RETURN

g }gg

g
: aiuuiggafi:'u;&#miwluiaa&;n&nnunnuulunnu*

8171
gigg

;%70 BY
+S) T0 TME APPROPRIATE REPEATING DATA PATTERN.
IF
5835?'35{5'} Efi R"nxrv ONFE T
me gam IS COMPRISED OF ALL THE PATTERNS

gi ;9 035054 10M407

éh;;fi;u;as;za&nuununnung;sz;;al;giunuuunniuuu

8170

; ¥THIS s%our Ns"zsnroms A sor': gum: COMPARE OF THE R/W DATA aurrsn (POINTED

gi_/?_g
ex;g
81
8180
8181

35056
4
72
035076

112737
012737

013702
005037

nr PRTRN3::1:%
pngE:'éu
TOUL 5
BIT sfigr IN R1 ON ENTRY IDENTIFIES THE

000040
000007

005572
005542

06210S
063446

MOVB
MOV
MOV
CLR

WDSXFR, R2
SCRACH

;SET _NO. OF WORDS
CLERR COMPARE ERROR

gg'r

gss“rmgms IS QUICK VERIFY DEFAULT DATA TEST

#PATOO, RO
#256. ,~(SP)
#RWBUF, R1

:GET DATA PATTERN smmmc ADDR
:SET PATTERN WORD COU
:SET BUFFER ADDRESS

exes 0351
gig“

833%12

004737 041704

mooslgosg 005544

gag

8185
8186
8187

035114
035120
035124

012700
012746
012701

MOV
MOV
MOV

006216
000400
063554

JSR

#40,DH701+438.
87 OF25+2

PC nepsup

;RESTORE ERROR MSG PARAMS

iST

PREVcm5 FOR POSS. PRINT

SEQ 0432
SEQ 0153

o ggo RKB11/
n
0D D00 €D G0 COAD CDCD CDCD D

P11

RIF l
-78 11:4

28-3R~

MACY11

188

18¢

3%:
4s:

BBIRR 202 E

[etererelereterares —

000001

Li2

10-JAN-78
12:16 PAGE 155
MPBUF - SOFTWARE COMPARE DATA

3gfl(1052)

BS:

ER
LR
BIT

ASL

A93

#BITO,R1

SEQ 0433
SEQ 0154

m??Esmm NO.

F THIS BIT IS SET

BIT IS SET
,?R xr ru;s

HULTIPLY PATTERN NO. BY 32(DEC)

Rl
g

I‘.‘%’é%
70EEkCAMINE
"”""En
NEXT BTYT

oparoo RO

-tsp

Pnn ‘R1
vru
W
N
ne

--o-

0 RN
fOroR
nn)
wn 8o NN L£WN-0O

22s:

0019%;
0627

e
0010
00013
00S304

Gsse

24s:
172354

00121 )

25%:

020000
000200
020000

17235 4

035740

822158
00S

202

2?2

1202

032380

450

035362
035366
035372
035376

348:

3888 8

010237

004737

i SET

;

GT PRESENT
H;H
SEEI}F

308

MOV

SAVPAR - 6PRRS

BIS
MOV

#140000, R1

MOV

CcMP
BEQ
MOV
BR

IT
BEQ

e
EEC
BNE

JMP
DEC
NE

:?gr

.37

123y

(ngat,(n1)+

T UP WORKING_PAR

FORCEns"Scn??ou THRU KIPARG
3

?EITPS??EWB%EFOORE

ARE DATA WORD TO PATTERN WORD

§§xxpnns,snscxs5 T PanrS“LE%aurour
osfrxa Rl

oaoolgsxxpnns

gzg

ggg

E IF

xng

LOW TO NEXT PAGE

ar NO

RFLOW

PAR BY ugcsoz NEW PAGE

Egscns NT usno csuursn

;an IF NOT ALL DONE YET
T _0UT
L

CflggEETPATTERN_WORD
Bg
‘F ggg?flsungH
PQTTgRN YET

: COMPARE LOOP rog Ngancn MGT STAR
2517025Y°§;NPQTT
RN
RO?RESS
30s:

g116es
012737

c6s:
27%:

66781

:PATTERN uon

l
; COMPARE LOOP FOR MEM HGT STARTS HERE
BPL

B
i

sxrlx

;GET ADDRESS or ossxnzo PATTERN

00SS74
005576
005577
o40212

06344 )

00120
00Se0

318:

&LRB

§R3)¥,<n1)+
01+438.

MOV
85, DF25+2
. COMMON COMPARE ERROR HANDLER
3Ss:
MOV
R2
G10
SuB
WOSXFR, SREG10
MOV

JSR
SAVREG
MOV
MOVB
MOVB
JSR

SREGI0'LASTWC

PC, FINADR
FINCYL,RO
FINTRK.R1
FINSEC.R2
PC, BDSRCK

A WORD TO PATTERN WORD

prsoblpe
JUS ol
TR usnoen OR TMSG

:ADJUST ERROR DATA WORD COUNT
;GET WORD NO.
;GET 2’S COMP OF WORD NO.

:COMPUTE ACTUAL PACK ADRS
:SAVE RO-RS
iGET CYL
IGET rnncx
:GET SECTOR
:SEE IF THIS SECTOR LISTED BAD

cznsnoo RK611/06 SS VERIF 1
CZR&MD.P11
10-JAN-78 11:48

gs:g

402

410

37 001000

Qg gqfi
g&gfi
00S542
Y4
1

Mle

MACY11 30A(1052)
10-JAN-78
12:16 PAGE 156
CMPBUF - SOF TWARE COMPARE DATA

nssasc

005504

?"F

737 003144
Y4
1
005270 001174
438 ?
005266 001176
1 ;
10411
Y

5-705;

G5
B8 A
17 coure U
8258 035462 00S037 001176
46$:

858

..'% ggg

8264
§§;

514
gggi

8273

035562

fio 12‘%2
%fi @ 653737
7
ue
1722
8575 BS&EE& 913;3;

eag

113737

8084
8285
gsg;

00S574

005577

001200

38%:

001176 00S576
001200 005577
oo 74
74 428:
75 88“75
y

1212
B
2

001210
001214

000100
1020
005737 00SS44

143242

0ais7

8295

03S

005302

8298
8299

035726
035730

Do33

001002
000137

50%:

035306

408$:

228acH

£y

i Bedk Y8 ERROR COUNT

Serent S

iBR_IF THIS IS rm rmsr snnon
;SEE_IF UNIBUS MAP PRESENT
1 nor
:GET CURRENT MAP REG O

ISITG7H, 3SWR
oaxao'.,scmcu
54§

THE ERROR COUNT
gngnirMENT
nu.
'fiaSRs SHOULD BE REPORTED
sse xr RROR
10(050)
EnnonsYET
LIMIT EXCEEDED

B oo
SRESH

;DATA MISCOMPARE (11/70)

TR HEROD

HEADING FOR ERROR MSG

.iggcs.rmcvl.

§ Ygérrensn

FINSEC,SREG?

“acs.rxmnx
G7,FINSEC
et YL
Hfia«:fi&

fiE‘cm”
MOV

uicm
-atga).sazcu

MOVB

;RESTORE RO-RS

368
UBMPRS
468
CRMPHO, SREGS
CRMPLO,
[1B
ég

cn"fia
Sc B
3
vB

MOV
CLR

sfiécié:fifis
SREG1

B
ADC

B
ddecu
ggeé

cYL

E xr FFERENT TRACK
355 }r §xrr§§sm Rgscton
:SET NEW PACK ADRS FOR PRINTOUT
St anaaud

icgtuo'sfl
NO.
;ce; gooo 8?5“
.

585mu§2 BRYe1cAL ADDRESS

SREG1Y
G

ADD
MOV

+2,SREG13
né,ggtcxs

ERROR

sug

0S5716

035250

ROL
R

o212

000002

03275%

7%3%
1513
121

1210
00S604
001214

B3870e
8533

001174

BLT
gnp

RROR

e
1

ggézg
933&5
001202
448 :
03557
16337 177776 ooieouo
-

RER
CLR

fié%%
01 143434 368 :

%fi
000012 005542
002511
3737

T TB
Q
MOV
v
ERROR
ERROR

#BADSEC , RECODE

SEQ 0434
SEQ 0155

JSREG1S

;GET VIRT. ADRS FOR PRINTOUT
YPE GOOD mo BAD
DATA,

MEM. ADRS.

BIT
BNE
TST

$BIT6, ASWR
54§
PATRN

gr#

EE IF Ve MEM MGT mesem
6815,
iBR
IF NOT PRESENT

DEC

oscnensm WORD COUNTER

53%
308

:BR IF NOT DONE WITH PATTERN YET
:JUMP TO REPEAT THE PATTERN

BEC
DEC
BNE
JMP

$KT11
&9

R4
Y

355 }r JUST
RROR SHOULD BE REPORTED
1 E OR SHOULD BE REPORTED
:SEE IF DEFAULT DATA TEST
O HANDLE MEM MGT

i: DECREMEN
BECREMENT PaTTERN WORD COUNT

RK611/06

.P11

734

740
794
746
4

VERIF 1

?8-10"- 8 11:48
ggg;

MACY11l 30A(1

12:

PRGE 157

HPBB?a 509 Ofl$flfléDRTA

335312
5716

000001

-JAN-78

S3§:

JMP

S6S:

%C
T

S4S:

177572

10441
000207

BEHO

TST

RESREG
RTS

348

$KT11
S6
#8170, 38SRO
(SP)+

55052333156

;SEE_IF
MEM MGT PRESENT
3
IF NO
PRES;NT
;01
E MEM MG
;POP_THE STACK

;RESTORE RO-RS
;RETURN

Illlll;lllgllll'll!lllll“?lllIllllilillill«llllllIllllllllillll

g;:ié

nuxgétano?
NE&'T'E&I&;m'xrrEer&Jn
mmsrousn suounxoHEBE

g’:i?

'IF "ou?obg xnc THE
gau. Tocna.x

8314
8315

Ol
b
TRACK
THE
sfm u P )nus#
&Eoch
3?6
vnu
nuneea

8319

§4 °Eht"“‘

S;.éo
B:‘Eé

537 000002 017754

]
8

8329
8330
833
83
83
8334
33
;_-39
83
3
8340
aaué
8342
8343
8344

1044

12
g
2
g&gg
036032

3; 0031
0o
65
01;;500
1004
en; 000002
153
685737 003125
1411

012746

024000

0360
604
60

012746
157-4
1 714

036000
12000
00024

036054
036060
83&9%

3127%
012746
012746
012746

26000
1000
013000
000026

834
eaug
34
83??

6074

35052
1
104
0321?3

012603

easg

036114

009737

8345

eau;

8353
8354

B35S

036120
036124

116502 000004
60203
mgms 000400
010337
01660s

053204

003176
000012

000002
00000S

sk
"
CHKL IM
§§o TRMSFE#‘%*IRN ADDRESS>

6‘&tl’l‘lllllllllllillllllllHlll.lllllll!illllill!llll!llllllll!il

CMP

BLT
SAVREG
CLR

P.CYLN(RS),LCMS gs
sré”%"cuecx ADDR. LIMITS YET
348

:SAVE
RO
UMLO1
CLR
UMHI1
CHP
LSTCYL,P.CYLN(RS)
:SEE IF ON LAST CYL
BNE
8s
;BR_IF NOT
CMPB
82,P.TRCK(RS)
;SEE IF ON TRACK 2, CYL 632/1456
BEQ
368
iBR_IF CAN'T DOTRANSFER
8%:
7578
FORMAT
BST?‘" NE THE FORMAT
BEQ
10$
F 22(DEC) SECTORS
: STORE consmms ron
(0ec) sectors
#10240.,-(SP)~
3;NO. OF WORDS ON 2 TRACKS
nov
u
0..-(S5P)
;NO. OF WORDS PER CYL
MOV
#5120. . ~(SP)
iNO. OF WORDS PER TRACK
ES"
:
,-lsP)
iNO. OF SECTORS
:STORE CONSTANTS FOR 22(DEC) SECTORS
10s:
oV
#11264.,-(SP)~
;NO. OF WORDS ON 2 TRACKS
v
#16896.,-(5P)
;NO. OF WORDS PER CYL
MOV
#5632. . - (SP)
-uo OF uongs PER TRACK
MOV
822.,~-lSP)
OF SECTORS

. COMPUTE NO. OF WORDS LEFT ON mis TRACK

i2s:

MOV

(SP)+,R3

MOVB
S
CLR
gsx

P.SECt(RS),R2
R2
aess,RS

JSR

PC,M.DPIM

MOV
MOV

R3’ SUMLOI
1215p

;

NO. OF

SECTO

;GET CURRENT SECTOR NO.
iNO. OF SECTORS LE
:GET NO. OF WDS IN THESE SECTORS

;STORE THIS
N
RESTORE Pnnnn BLK ADDR

; COMPUTE NO. OF NORDS LEFT ON THtS CYLINDER

8358

8360
%361

3364

b3 3ttt

?8828353i# i333aeaasan

~N
W

—

WWL

KRR 5
S

836S

%Bm

8356
8357

SEEFENF £528

CZREMDO RKE11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

012703

000002

017760

Bl3

MACY11l 389(]052)

10-JAN-78
lazlbquRGE 158
MPBUF - SOF TWARE COMPARE
MOV

CMP

000002

148:

00000S

148
R3
P.TRCK(RS),R2
R2,R3

MOV

(SP)+ RS

JSR

053204
003176
000010

PC,M.0PIM

IGET gg.

:NO.

WDS PER T

R3.SUMLO1

;ADD_WORDS TO TOTAL

MOV

LCM1,R3

;CYL LIMIT =631/1455

BPL
CLR
CLR
MOV

168
R3
R2
(SP)+,RS

;GET NO.

053204
003176

JSR
ggg

003200

ADD

000006

000002

P.CYLN(RS),R3

PC,M.DPIM
gghLox.Ra
SUMHI1,R2

:GET NO. OF WHOLE CYLS LEFT
OF WDS PER CYL

:COMPUTE NO. OF WDS xn THESE WHOLE CYLS
{ADD THESE WDS TO TOTAL

MOV

6(SP), RS

RESTORE PARAM BLK ADDR

BNE
TST

18%
(SP)+

;PO

égp)+,n3

;ADD WDS ON TRKS 0,1,

ggg

20%

:GET DESIRED WORD COUNT

208:

xnbr 63271456

CYL 63271456

CLR
agx

RO
;iuC(RS),Rl

;WORD COUNT HI BITS
:GET THE DESIRED WORD COUNT

BNE
INC

;BR_IF WORD CQUNT NOT 65,536 (DEC)
iSET HI WORD COUNT
= 1

:SUBTRACT WORD COUNT FROM NO. OF WORDS LEFT TO DETERMINE IF OVERFLOW.

og.

NUMBER OF WORDS LEFT IS IN R2-R3,

SUB

SBC
SUB

BPL

1
1

;LO PART

sHI P
‘BR IF

g?,R1

:GET NEW WORD COUNT IN R1

R1,P.WC(RS)

;SET NEW WORD COUNT IN PARAM BLOCK

82, (SP)

; RESTORE RO-RS
,rx NORMAL RETURN PC

2(sP), (SP)

:FIX_"NO TRANSFER" RETURN PC
nssroae RO-RS

WORD COUNT NOT > NO.

OF WDS LEFT

;SCALE DOWN WORD COUNT TO AVOID OVERFLOW (SUBTRACT THE EXCESS)
fiEE

000012

0
9

000002

308:
348:

RESREG
AOD

000000

368:

MOV
RESREG

&
0

WORD COUNT IS IN RO-RI1.

Rx,aa

R2
RO, R2

sl MOV

RTS

PEXIT

*RETURN

.
|
~
‘

:ADD THE NO. OF WDS ON TRACKS
O
l cYL saa 1 456
CMP
LSTCYL,P.CYLN
Rs)
E IF CYL = 632/1456
188:

;

IN THESE TRACKS

ADD

SuB

168:

000012

:BR 52 NOT
: DECREMENT rnncx LIMIT TO 1 FOR CYL 63271456
;GET CURRENT TRACK NO.
:GET NO. OF TRACKS

MOV
10t5P) RS
:RESTORE PARAM BLK
COMPUTE NO. OF WORDS ON WHOLE CYLINDERS REMAINING

017756
000002

017760

RACK LIMIT = 2

Lsfch P. chN(nsi :SEE IF ON CYL 63271456

BNE
DEC
MOVB
SUB

CLR

SEQ 0436
SEQ 0157

DNV
£Wn

R
P PP PR E R RRz
RS3sHiEEPPLPPPRP
SIBLER2Y Re83BNFRECAES

TR 78-3An"58"11 e

Cl3

SE°59335159

llll!5Iilllill!I!!lllllll‘ll!!!!lllllll!ll!lilllllll!llill!i!ll

s by

P LTHRTREI B W

s b

.:.*s%s THc
fimsNOSTV,
8 BTl FiLieo
INPUT, OR INPUT O HER THQN (tC) OR (fZ)

flCTION IS
CKEXIT

003120

!ll!lllll!il.llllllllllillllllllllllllllllll!lllllllli!lll!llil

éh.ou cMPB

BNE
TST

BEQ
CMPB

005532

2s:

&8
00

BEQ
JSR
aeger

{mcm

;

:BR

liY
RUNNING TESTS

STS

SEE IF ANYko
TTY

MorLac
1

EE:
xr"&ém MODE RUN
g& YES

g
08

BRI

3, INTCHR

PC,GETXDP

F ($C) TYPED
uor (1C)

E Rs
XXDP URREN LY3VERLQID
Xng

IF NECESSARY

pae
xossvs

CEie :i
e iR
&E

JSRX
9%9
gme
32"
g&s

vcm.
’$§?§n
.’m
s
, INTCHR
gfwurp,no
;§oa,mrcm

T RE
.ob
&
Em RECAL IBRATE
. Lzak
(EXIT
FROM TEgTS
;:
x}F m(fiz” TYPED
)
'EET RETURN
= INPUTP
gss
}P"éf(:) TYPED

g;u

78:

SN"EB

gcsm,xmcun

8%:

JSR

PC, GTSWRG

RTS

003046
000001

MOV
MOV
MOVB
4$:

005532 12%:
005532

%,
TgTB

c&rsnm

R
CLRB

6S:

005532

PC cTLOUT

108:

TYPE
TYPE

SERRHDL
, R. ABNL
mcx
§P
cmomsi

,HLTRGD
cmg%

,RO

PC. PREPKB

Bermy oo
rmc

msa ADDRESS
ACK
COMMAND

;;E “HALT REQUESTED"
"PRE
NT WHEN RDY"
55

355 r uc) rvpso

ume sua FOR MODIFICATION

smas.s KBD INPUT AGAIN

!lllllliilllll!i!IlIlllllllllllllllllllllllllllllllll!lllllil!i

iumse

unérs
A BLOCK or wgg(ocn uonog
ONT

nno PERFORM

lfl WRITE C
: ¥ADDRESS. DATA uono xs Pnsseo IN R3 ON ENTRY RWBLF xs THE BUFFER
!USED
s EERBEERFEREREEEERREEEREXREEERENHEHER
NN R RN RN RN R ERREEEERE
S

CZREMDO RKB11/06 SS VERIF 1
CZRSMD.P11
10-JAN-78 11:48

MACY11 38“(1052)

o4Es
7

£ e
75

84
8478

igc

1
8482

036
0365

036610

036624

000010
oooo1e

b05753 8R03%8

000001

112765
084737
104410
000207

000001

#400,R1

ga.(koa+

MOV
;WRITE THE DATA
J

SEQ_0Q438
SEQ 01589

; SAVE RO-RS
oust e

ng Sc 582

aurrsn WORD

;SET UP EgsflfliTER

85 qu EONE CR_COUNT

#-400, P. WC(RS) st?suosuscounr
SRWBUF ,P.BALO(RS)

ADDRESS

WTQ CW(RS)
i?ET EIDSTSOHHQND

PERFORH unxrs CHELK

&s:

SWRTCHK , P CHND(RS) :SET uaxrs CHECK COMMAND

ggn

PC,DRVCAL

RTS

;sskrgnn
WRITE

'RESTORE
:RETURN

RO-

CHECK

RN RN R R RRE AR AR RRE R AR RRREE

lll!llllllllllllllll!llllllllligacgl;al;glllllllll!lllilllii!i§

tACRMA:

104407

ogooi2

SAVREG
CLR
MOV

R1
P.WC(RS),RO

INC

BNE

4§:
63:

NEG
BE
ROL

802768

:GET WORD COUNT

'BR xr NOT 65,536 (DEC)
:CONTI

RO
>

BIT

:GET TRUE WORD COUNT
:DOUBLE THE WORD COUNT TO GET BYTES

RO, MA

;ADD IT TO COMPUTE NEW MA

Ad2

§ 3 BN

;

;ssr HI

RESREG
W
nfis
PC

005764

RESTORE RO-RS
;RE?ugn

I RN
R R R RR RN

Pt et Pt

iREDBSF - RERO FACTORY BSF INTO BSFACT, AND READ SOFTWARE BSF
:#INTO BSSOFT
kta;;:llllllllllll!lilllilllllI!lillllllllllllllli!lilllIlilillll

Pt P

080826

Pt et P

[+ o]
n

MOV

s IR

s Pt

wn
AR RANARANAR
3*~8mvm:u--ogg

063554
177400

000131
040316

160

;iINCRHn = INCREMENT MA BY WORD COUNT IN P.WC(RS).

Sggggg§8$$$$8££8$8383

PPPRPPRPPRR22R

Bugd g3gels

4s:

81
765

PAGE

WRTSEC: SAVREG
:LORD THE e/u BU{;ERUEI;B DATA

it el §i§§§§ 868330
73

D13

12:16

MPBUF - SOFTWARE COMPARE DATA

104407

8468

10-JAN-78

000012
003125
036742

000004

000007
800
1

00882

00000S

J§R

BIicB

MOVB

MOV

,INITS

‘SET FOR 22 SECTOR FORMAT

R?BATQ
P. CHND(RS) ;SET kggg EAT COMMAND

MOVB

¥g¥a

oxb R3

BEQ

INCB

INIT THE 2

*CFMT, .CSIH(RS)
CYLN(RS)

K(RS)

P.SECT(RS)

;SET TRALK
=

63271456

:SET FACTORY asr SECTOR LIMIT
:BR IF 22 SECTORS

‘SET STARTING FACTORY BSF SECTOR NO.

cznsnoo m.u/os SS VERIF 1
CZRE&MD.P11
10-JAN-78 11:48

8524

746 oos;pa

8527

ggg

8530

:3531
1535
:masas
8536
g 7

;22

1s7=?§

11
358

1276

77-ogg

EL3

MACY11 30A(10S2)
10-JAN-78 12:16 Pnce 161
CMPBUF - SOFTWARE COMPARE DATA

6%:

MOV

7140 003046

8%:

MOV

60-02

000010

41
0316

003141

182
§§§ % 000004
17 041704
108
1 1%
37
4134
1

3232 000010

820
12783
00002
%35 @ 66?7:39
ggluasaa
8543

01533

85
ggus
-4;
354

7100
fi,‘:}?’

7
1057

8550
esgé
85
8553
%gg

037120
037152
ggn
7130
037136

125;03 000004
%
736
012737 042164
000207

8232

ess;

855

85
8559
8560
8561
gggg

037140
037146
037150
037154
037160

ggnuo
3141
040316
00314

032765
001
000137
105237
000137

130600
042164
003141
044342

#BDSCHD,A.ABNL ;SET ; n ron BSF READ

CLRB
JSR

WCEFLG
PC,
DRVCAL

; INI
T:E F
IREAD T
ncronv asr

%8
CMPB
?25
ERROR
JMP

55’9 SECT(RS)
P.5ECT(RS),R3
33 REPSUP
120
HL TPRG

’ER
;s'écI:;F@
L%HI?.EEXCEEDED YET
'grx n"om}'eug FOR PRINTOUT
:naofa'f'xng
RERD
tHALT- cm'r PROC

Ve
1STB

R3P.CTIS)
ri'“olmhs
T

3 SINETv§§ISR
M.
:gsxf
sscroa FORMAT

MOV
CLRB
JSR
gga

#BDSCHD,A.ABNL ;5E
R FOR BSF READ
WCEFLG
; INI % ERROR
FLAG
PC, DRVCAL
:READ
SOF TWARE BSF
" FLG
;gexy mTw ERRORS

CMPB
BLE
BR
MOV
RTS

P.SECT(RS),R3
148
108
SERRHDL,A.ABNL
C

TSTB

MOV

MOV
ADD

168:

:SET uono COUNT FOR| SECTOR
#8SFALT, P.BALO(RS)
,SET OR mcron BSF

WCEFLG

:SEE _IF AN

#BSSOF T P.anLoms) :SET ngn FOR

#19. .R3

#2,P.SECT(RS)

000034

SECTOR LIMIT

:CHECK

NEXT gcron

;SEE ;r LIMIT EXCEEDED YET
:BR_IF NOT
YET
:REPORT ERROR AND ABORT
;RESTORE ERROR HANDLER ADRS
;RETURN

: ¥POSSIBLE ERRORS IN RERDING BAD SECTORS.

8DSCHD: BIT
BN
J
4§:
INCB
IMP

lLI reo
037164

gscRC!DTE!OPI'DCK,P.ER(RS) ;:SEE IF nnv READ ERRORS
4
;BR If A READ
ERROR OCCURRED
ERRHDL
:GO_HANDLE 0 HER ERROR
WCEFLG
iSET ERROR FLAG
RETNML
:TAKE NORMAL DRIVER RETURN
OO

'r{rpasr snvnsc

00S004
012700

004242

037204
037210

104401
104401

061652
001315

037174
037200

8S79

037214

104401
104401

00S001

PARATELY.

X R R

XA AR

SECTOR FILES (BSF’S)
NO. OF ERCH BAD SECTOR

INA TRBLE OF OCTAL VALUES, FOR EACH OF THE

ll!!lllll!llllilllllIllllllillll!lllllfllilllllll*li!lli’lli!*lll

104407

037166
(037170

85
8576

nme RECORD

!sgr 20

hv
PBSF - TYPE FACTORY AND sorrums
PEWITH m&cvunosn TRACK, AND SECTOR

3573

77
8578

003046

#-400,P.WC(RS)

5 3 HIHHHHHHHHHHEEHE

8567
“ceg

8573
8574

148:

MOV

;¥THIS 1S THE ABNORMAL DRIVER RETURN WHICH IS USED TO HANDLE

8566

8572

003046

12%:

S 000002 000004

B2ee
8571

INC

000012

SEQ 0439
SEQ 0160

011423
011450

3s:

CLR
MOV

RY
#BSFACT+10,R0

TYPE
TYPE

' DHBOY1
SCRLF

TYPE
TYPE

CLR

snv; RO-RS

:INI
asr FILE INDICATOR
;ADRS
OF DATA IN FACTORY BSF

,FACTBS
'BDSECT

:TYPE “FACTORY"
:TYPE “BAD SECTORS"

; INIT LIMIT COUNTER

TYPE

“CYLNDR

TRACK

SECTOR"

CZR6EMDO RKB11/06 SS VERIF 1

CZRE6MD.P11
ggg?

10-JAN-78 11:48

83;558

?83569

4§:

001315

1
1049402

16'.1;003

1 012473

8293
a9y

830398
104402

8535
8536
8597
a5
85

2
272
37274

104401 012473
111003
010346
104402
01 001315

77'31

ggg;sg

8604

03;%'

88?70-4

8607

037320

012700

8610
%i é

037332
037334

104410
000207

95”:5 037316 tmsacoloEE

8613
Beie
8617

683;3%

%ig

O;|7336

104407

8621
8622

037344
037350

116501
ussog

037354
0_:'4355

(00SO0
83‘1‘3%

8627

037370

001003

037372
837378

8638
8633

037410

8630
8634
B63S

0374

126502
001404

003242

188:

SEQ Q440

SEQ 0161

;gssx r.x_r"rg SECTOR LISTED HERE

?YPE

,NOFALS

:TYPE "NONETM

MOV
TYPOC

(RO)+,-(SP)

:GET A CYL NO.
:TYPE
IT

gsxe

I;lgm,r\':a

!:GET
TYPE TRACK
SEPARATORS
AND SECTOR

R3. ’ -(sP)

PUSRCIN.
ee
;TYPE IT

TYPE

%m.r

SPACE2

PTYPE <CR>, <LF>

TYPOC
TYPE
MOVE
MOV
TYPOC
TYPE

SPACE2
tRO),R3
R3,-lSP)
$CRLF

8[";

fié,uas.

Egssngr Ng;n\x(&nencneo IN THIS FILE

gag

?3:

; %E;E-FYE‘S’T“ FILES TYPED YET

P TYPE SEPARATORS
:GET SECTOR NO.

;TYPE IT

INC

:SET INDICATOR FOR SOFT. FILE

E;Ps

agorras

ftT:E

RESREG
RTS

#BSSOFT+10,R0

;ADRS OF DATA IN SOF TWARE BSF

-sogsrugneaggo SECTORS :TM

{RESTORE
:RETURN

RO-RE

TN COMPUITE MO, OF WORDS
XFERRED ON PARTIAL XFER o rrnr
AND STORE IT IN WDSXFR.

:%(TERMINATED BY BSE ERROR),

&i;;E;llg;c;éallllllllfllil!l‘lll!lllczias'l;gllllll!ll«l!lll!ll!!lll

00000S
000004

000030

005572

MoV

P.CYLN(RS),RO

CLR
gng

R3
siocw.ms;,no

MOVB
MOVB

6%:

8%:
12%:

P.TRCK(RS),R1
P.SECT(RS),R2

5§T ORIG. CYL NO.

;GET_TRACK NO.
;SECTOR NO.

:INIT
SECTOR COUNT TO O
; Sa A Nognxc. AND CURRENT CYLS

CMPB

P.DTS+1(RS),R1 ;COMPARE TRACKS

INC

BNE

000026

005203

010337
104410

PAGE 162

§§°’

MOV

011436

OI/U0E Odgrey
o7 tee
000303

037412
037416

8%:

148:

8626 057_35355 126501 000027
8628
8629

F13

12:16

ggl

E;PE

000176

8620 037340 016500 000002

8623
ggg

10-JAN-78

CMPBUF - SOFTWARE COMPARE DATA

3? 011470

e§

gg
8530

MACY11 30A(1052)

CMPB
BEQ

R
SWAB

MoV
RESREG

'BR IF NOT EQUAL

P.DTS(RS),R2
128

: COMPARE SECTORS
iBR IF ADRS ARE EQUAL

Gg’
hoRsC
R3

A
R OMPARE ADORESSES
= o1
:COMPUTE NO. OF WORDS XFERRED

R3, WDSXFR

:INCR SECTOR COUNT
3 ST0 RE I T
; RESTORE RO-RS

cznsnoo nxsu/oa ss vsnxr 1

CZREMD.P
%gg

10-JAN-78

037420

11:48

MACY1l 30A(10S52)

RTS

8639
012704

000025

83;3:3

%gzm
02

000023

gggg

7434
7440

8652
8653
ot g

037446
037450
ggg

005002
005201
3‘1‘

8657
%gg

037462
037464

gbue ufig 63?335 003125

38958;

005001

005200
000207

gga

4s:

SEQ 0162

: RETURN

R&ETRACK IN R1, AND SECTOR

zcsmnhr

gss"x_rEg SECTOR FORMAT

MOV
INC

#19. ,RY
R2

iSET SECTOR LIMIT
:INCR, SECTOR NO.

CLR
INC
SEE

R2
RI1
gi , 82

'ser SECTOR =
:INCR, TRACK NO.
85: }r
TRACK LIMIT EXCEEDED

INC
RTS

RO
PC

: INCR. CYLINDER NO.
:RETURN

CLR
6%:

8661

23'“

gssxér Ng;cron LIMIT EXCEEDED

iSET mnc

3‘;?6;;;!l!;;IIl'lll!lfll!l“ll;g;illll#g.lil!illlllllllll!ii!l!li

§§§'

§g; 037

3235

;é:
"E? ngls%“Pm'""'Em+ !"'r'xomu TS‘EE;“""’USTR“PQP
.BALO(RS),
*T
Y 2
&

104407

74'7505 80q7 7 333833
74749

0165

8678
037504 ééé%?
1ic208 80905
es;q 83;313
3%9952
75 ggfio
1101 § 000004
.‘...
8676
7624 11
000Q

037530

013703

‘

fii35;;yl‘g;sgzgl!IIIlIillllalllll‘l&llll‘lll“!llllIlilll§§ll!ili!i
Jgn

PC, FINMEM

iV
.rr‘gs
MOVB
MOVB

BB
Sg' 'che g; : ?Encaéffn?np%énnons TO NEXT SECTOR
RfiP.?RkK(%)
§UP8mE WK
RS.P.SECT(RS)
;upoms

AD
%E

R3,P.WC(RS)
s;

,upoms
9 ug
iGET BYTES xrsnnso

288

gahggn

;UPDATE PMA, PMA+2

MOV

005572

28"

22 %zg; §goa

ROL

&;3
40 fi%
8'23? 01,532 00500

8687

037574

8690

037610

8691

SEQ Q441

:hg;gsllgscllIl<lIllllllllllllllllg&?lllg#gfill;l?ill'iilll!l!!ll!l{

000002

essg:

8677

wg 3Lmées 5
S PASSE n%ggi
037422

864
864

PAGE 163

ill!;lllll!lI;Ill;;l;ll:lllllll!llllllll!llllll!lllillll!l!!l!il

§:3

g‘#q

12:1 6

CMPBUF - SOFTWARE COMPARE DATA

000207

86:0

Gl3

10-JAN-78

gxg:mias 005602 000010
013700

7%89 04
7

037614

6737

100002

MOV

P.DCYL(RS),RO

u:ggérs R3

00S604

77774

gxc

3677774RO

055716

TST

sktii

1S8

BPL

goaos XFERRED

PnhP.BRLO(RS) ; UPDATE P.BALO(RS)

ADD

00007

;

00S6

MOV

%’?% OF WORDS XFERRED

PMA+2
16$

BRHI(RS)

;UPDATE P.BAHI(RS)

:SEE IF MEM MGT

CZR6MDO RKB11-06 SS VERIF 1
.P11

10-JAN-78

87ess 184G

MACY11l

30A(10S2)

10-JAN-78

H13

12:16

PAGE

11:48

CMPBUF - SOFTWARE COMPARE DATA

026604

168:

000207

PC,PREPAR

aESREG pe

164

SEQ Q442

SEQ 0163

;

UPDAT

M MGT AND UNIBUS MAP

;gE TO&EHSO-RE

SREEREBEEREEREEEREREEEZEEREZEREREERERRRERRERERXRRFXERERRERRRRRLR

ARVPRTS- SANS INTLIL PORMETERS £08 ThansFER

s RERRRRERERERXERERREEBEREREEREREEEREEERREERERREXBEEERERR
XX EREER RS

&UPRMS: SAVREG

e I
sres B

MOV
MOV
NEG

00ss72

MOV
CLR
TST
BEQ

00se02

fi?’fi
itz
7713 493780

ggv
GTPRMS:

GTO:
68:

A i

037736

MOV

80208

1
000207

ggxg

: aWDSXFR
Ro '“EE?
: §£ c nnsn
55uc<5§1
;MAKE IT Posxrxvs

Pnn
Pnn+a

;}N%T PMA TO R
:INIT PMA+2 T0 O

2@#2PMA+2

:SET PMA+2=MA+2

PATRN
cro

:SEE IF DEFAULT DATA TEST
iBR_IF YES
i
SET PMA=MA

SAVREG
nox
osnvpng.éno1
MOV
oE
R2
(ROY+, (R1)+

AV
Song
39 -ggvs AREA

BE REG PC

es*

MOV
ofic

RTS

ofigggne
vsr

no-

l!llllllllll!lll!lll!ll!Illllll'lllllillilillllllllllllll!illll

i
TRNSFR_- PSRF A TRRN?F
DATA
R, AND

: $ENCOUNTERg
:¥ROUTINE IS

H$ g MUS

SUBSTITUTED FOR DRV

SET IN THE

E BAD SECTORS,

PARAM BLK. THIS SuUB-

WHEN BARD SECTORS MUST BE HANDLED.

lll!llllllll!llllIlllIllilillIillllilllllfillllllllll!&llilillll

tANSFR: MOV

004737
004737

R4, -(SP)

a17
BEQ

.ucSSRRECODE

CLRB

INIT

01 WCEFLG

i
; SET WCE _ERROR FLAG

00SS0o4

000001
000002

003141
00SSo4

S§:

BIT
BEQ

#BSERR,RECODE
6%

6%:

JSR
TST
BNE
TST
BEQ
JSR
JSR

PC,MIDXFR
P.WC(RS)
4
R4
83
PC,GTPRMS
PC, SVPRMS

037710
037626

MOvB

INC

Inoxcnroa

WCEFLG

003141
4031
010

037466
ooooiz2

040022
040026

CLR

;§§Ig“"ugzEgnan OgNCRAED

;SEE_IF BSE ERROR OCCURRED
?R sF NOT
NCR_BSE ERROR_INDICATOR
;UPDATE PRRAMS TO RESUME XFER

iSEE_IF ENTIRE XFER IS COMPLETED
iBR_IF_NOT
iSEE_IF flNY BSE ERRORS OCCURRED
:BR_IF NOT
;RESTORE ORIGINAL PARAMS OF XFER
:RESTORE WDSXFR,PMA,PMA+2

CZREMDO RKB11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

8748
8749

8750
8751
8762

8753

040032
(040036

040040
040044
04004e

005737
wooo;

004737
012604
(00207

I13

MACY1l 30A(1052)
10-JAN-78 12:16 PAGE 165
CMPBUF - SOFTWARE COMPARE DATA

$KT11
83

1ST
BPL

055716

026604

8s:

JSR
MOV
RTS

PC, PREPAR
(s#n RY

SEG 0443
SEQ Ole4

;SEE_IF nsn MGT PRESENT
R IF NOT

Pnspms nzn MGT AND U.M.
nes ORE
R
:RETURN

8756

3 illli!liilllll!lllll!illlllllllllIllll!ii!lll!lfllll!lllllllii!

8758

; ¥THIS_ROUTINE ns&ms LIST OF g& SECTORS FOUND IN

8757

*48TTL

8759

SEARCH BAD sscron Tnal.ssOUTINE

%¥THE SPECIFIC

TABLE ?ao SECTOR

TWARE OR BAD SECTOR FACTORY)

8760

won THE SPECIFIC CYLINDER AND TRACK DESIRED. RO AND R1 MUST

8763
8764
8765

nus LIST OF BAD SECTORS IS FOUND ON THE STACK WHEN THE ROUTINE
:¥RETURNS TO THE CALLER. THE FIRST ENTRY ON THE STACK WILL BE THE
: ¥NUMBER OF BRD SECT
FOUND FOR THIS CYLINDER AND TRACK!lll!lll

S;Eé

8766

767

ecomnm THE CYLINDER AND TRACK, RESPECTIVELY.

010237

8768
8769
8770
8771
8772
8773
8774
8775
8776
8777

040054 010337
040060 012637
040064 011402
040066
012437
moogs 062737
(0401
005003
040102 062702
8301
005712
0110
100430
040112
12

8781

0401

3733

ougxgs

lllll!lllllll!lll‘llll‘l!lllllllllllll!"lllIl!lllllllill

001266

&AHTBS: MOV

001270
001272

001264
001000

001264

000010

18:

8778
063708 0000OM
8780 Ouoiie
mmg% gsgaog
001264
3782

87
8785
mmg
378
788
8783
3790
8791
8792
8793
8794
8795
8796
8797
798

8799

000766

o401
040140
040146
oqméa
040154
040156
330160
0162
04016M
(040170
040172
174
040200
(040204

112
2737
123701
02

040210

A5o
CMP

040130

8057

001302
174377
001303

BGE
3%:

001302

000746
010346

4s:
177700

013703 001266

013703
013746

000204

001270
001272

TST

MOV
CMPB
BEQ
TST
BR
INC
MOV
BIC
BR
MOV
MOV
MOV
MOV

BIC

005722

005203
012246
042716

MOV
MOV
MOV
MOV
ADD
CLR
ADD
TST
BMI
CMP

5%:

RTS

sg
, STMP2

STMP3
(SPY+, STMPY

:STORE RETURN CONTENTS OF R4

o R2
R2.STMP1
5§

$ YE5-G0ag SECBeINT
E§
IouI
T OF$RBLE
v XIT

(R4) ,R2;GET ADDRESS OF BAD SECTOR TABLE TO SEARCH
(RY)&gTHP 1
;SETUP FOR LENGTH OF BAD SECTOR TRBLE
#1000, STMP1
R3
;CLEAR R3 FOR COUNT
#10,R2
iSET na FOR POINTER TO CYLINDER ENTRY
(R2)
rssr F ALL ONES
YESRO, (R2)
TEST IF BRD sscvon IN PRESENT CYL

(Ra) smmo
§TMP10+1,R
4s
(R2)+
18
R3
(R2)+,-(SP)
2177700, (SP)
18
R3,-(SP)
THP2,R2
TMP3.R3
ampw'-(SP)

8174377 smpm

rcn-ggx - 937 POINTER AT TRK/SEC BYTE

csr TRK/SEC WOR
:CLEAR nu. BUT TRAC
:CHECK IF BAD secron IN THIS TRACK
vss - co
T SECTOR NUMBER ON STACK
m
nm:n TO NEXT CYL WORD
co EST
c
ao
PUT T /sec s ACK
:CLEAR ALL
BUT sscroa NUMBER
:GO CHECK
REST
FILE
TEXIT - PUT
R OF BAD
iSECT
ON STACK-RESTORE
:REGISTERS
iPUT RETURN ON STARCK
TURN

l!li*lllfllllIllllllllllllllllll‘l!llllllll!lllll!l!llililllll!l!

8800

*4BTTL

8802
8803

%SPECIFIC SECTOR IS LISTED AS BAD. IF THE SECTOR IS LISTED
I
:¥TABLES THE ROUTINE SETS THE "BADSECTM FLAG AND RETURNS. IF THE S CTOR

8801

BAD SECTOR CHECK ROUTINE

:¥THIS ROUTINE WILL SEARCH BOTH TABLES TO DETERMINE IF
A

CZR&HDO RKB11-06 SS VERIF 1
CZREMD.P11
MD.
10-JAN-78 11:48

B rmi e
8808 O40Ses Ob4u37 040950

8809
8210
8811
8512

26
30

0402
QuOe3

881

8816

gjeea
1015
Q2aer

001404

012737
000763

B
O40SLe Oo960s

1
B822

QuOS74

005
0OI37Y

040306
040310
Q40312
040314

005303
001764
005726
0007

040226

003232

o40226
00SS0o4

7%:

001000

00SSo4

(SP;+,R3
63

;TR?LE ADDRESS GOES HERE
:GE
R OF BAD SECTORS,
:IF
ANY,
GO TEST WHICH ONE

BEQ

:IF YES-EXI

1§, #BSSOF T

#BSSOFT, 18
2%

BIC

CMP

IF ANY

;ELSE TEST ¥r OTHER TABLE ALREADY SEARCHED
:SET OTHER rnaLs FOR SEARCH
:GO_SEARCH IT

#BADSEC,RECODE

; CLEAR BAD SECTOR BIT

PC
(SP)+,R2

ns URN
THIS SECTOR IN TRBL
v

;vzs-co
s;rané ;

BNE
BR

X
73

i IF_NOT ZERO-CHECK NEXT ENTRY
'ELSE
GO
SEARCH orucn TABLE

BIS
DEC

: DECREME

#BADSEC,RECODE
R3

SECTOR COUNT

;SET BAD SECTOR BIT
CLERR STACK OF OTHER BAD SECTOR

BEQ

:NUMBER

9§

SEXIT

(SP)+

]

:GO SEARCH IT

BEQ

TST

H R

. WORD
MOV
BNE

RESREG
RTS

8%:
93:

:SET TABLE ro SEARCH

MOV
BR

3%:

R4, SRHTBS

CMP

4s:

SEQ Q444
SEQ 0165

#BSFACT, 1S

JSR

DEC

II2I2232322323223323232232333322232233223322322322 3222222222222 22 2222323

"SBTTL

83834

CALL DRIVER ROUTINE

;snrnv JSR PC,DRVCAL

335

WITH RS POINTING TO PARAMETER BLOCK

unsrunn RTS PC

836
3837
8838

.rurs nourrusog
.anLx

8839

;

;lBL

gso
qurxnr

n suasvsren OPERATION BY
OCK MUST BE SET UP

nusr POINT TO rue PAR

us nourxne IS CALLED.

¢rnxs ROUTINE WAITS F

anr ON TO

P %WHILE unx*xnc THE un?nuogs ?
3

COMPLETED.

S CflLLES TO

PREVENT

‘:?fi%gg;up
SuscySTen RoGTINGS ERELIQETR?HE DONE
: %FLAG WHICH xevs gus nou%xfle“ggnhs¥uan 13"$ é

6ksgatillll!Illlllllllllllllllllllllilllllllllblllllllllllil!ll!!

(040316

8851 040320 OON737 032472
3025 Qu03DY DOUZYr DIEIas
3823
8854
55
8856
87
8858
8859

MOV

2%:

6S:

8833

8840
8841
8842
8843
8844
88YS
8846
8847
8848
8849

BASRCK: SAVREG
15:

0014

854 04300 0S8733

8825
8826
8857
8828
8859
8830
8831
832

(040226

042737 001000

ma
8813

PAGE 166

; #IS NOT LISTED THE FLAG IS RESET.

8804
8805

8814
8815

J13

10-JAN-78
12:16
AD SECTOR CHECK ROUTINE

MACY1l 3%9(1052)

(040330
040334
Q40340
Q4O344
040350
040352
040356

105037
108037
004737
105737
0015
005077
113762

PC,STALL
PG CTLOUT

; SAVE RO-RS
:PERFORM A STALL IF REQUIRED
:CHECK FOR ($C) OR (12) xao INPUT

CLRB
JSR

DRNAFG
PC, STRCMD

:CLEAR DRIVE SIEZED BY OTHER PORT FLAG
:STORE PREV AND CURRENT COMMANDS

CLRB

003123
003137
040606
003136

140566
005510

SAVREG
ISR
JSR

1578

BEQ

000010

CLR
MOVB

DORNE

;CLEAR DONE FLAG

DULACS

:SEE IF DUAL-ACCESS TEST

JSTKS
DRIVE,RKCS2(R2)

:DISABLE KBD INPUT
:SET DRIVE NO. IN RKCS2

268

:BR IF NOT

CZR6MDO RKB11/06 SS VERIF 1

CZR6MD.P11

8860

886

10-JAN-78 11:48

03%
749

76
fond
g2£5
sasg
14
886
&g 8:8:
8870

012712
1

832%

82
1
032
go
1 91
61
1
5

ggé

MACY1l 30A(1052)

CALL DRIVER ROUTINE

000001

010000
000001

100000

208:
000010
000012

005510

000100

32%

33%

887

8876

8879
8880
888

0404

112737

112
6137

1
8cay S}S‘gé..
883¢€
8886 040526
8887

000101

000176
00S510

q
8895
8896

0562 06-47

050570

0047

045140

0566
040570
040574

105737

8898
040603 1o44id
gggg 040604 000207

003123

890S

8907
8
8309
8910
8911
8912
8913
8914
8915

248:

:SELECT THE DRIVE
FOR C. READY
{WAIT

INC

CLR

;INIT INNER COUNTER

: INCR INNER COUNTER

:DECR OUTER COUNTER

iBR_IF
T}PG-OUT
YET
ORT,RECODE
;SET
mggr
LAG
$SELDRY, PRVCMD+1’ ;SET PREV C
= SELECT DRIVE

MOVB
MOVB

SCONCLR P.CMND(RS) “;SET CURRENT CMND = CONTR CLEAR
DRIVE , PRVC
;SEY DRIVE NO. r?n PREV. CMND

JMP
BIT8
BEQ
MOVB
MOV

VE SIEZED AND HALT
:REPORT
ALLTRM
x.onvmo),nxnsorhm?) :WAIT FOR DRIVE ATTENTION
338
:BR_IF NO ATT'N_YET
DRIVE ,RKCS2(R2) ;SET DRIVE NO. IN RKCS2
:g (R2)
;1S
DRI
EAR READY
kousn

MOV
JSR
JSR
ERROR

MOV
JSR
MOV

4s:

. WORD
JSR
1578

128

#BITO, (R2)
#8177, (R2)
208

#BIT12,RKCS2(R2)
:SEE IF NED ERROR SET
2
;BR_IF YES
#BITO,RKDS(R2) ;SEE IF DRIVE IS AVAILABLE
iBR IF YES
uooong
(R2)
: ISSUE CONTROLLER CLEAR
iGET DRIVE NO.
DRIVE,RD
#100,R3
;SET_OUTER COUNTER

28%:
268:
63:

PAGE 167

JSR

(R2),P.CSI(RS)
PC,I1.CST1
PC.RE
107

;GET CURRENT CONTENTS OF RKCS1
:GO_READ CONTROLLER REGS
iSET _UP nzei FOR PRINTOUT
SIEZED BY OTHER PORT"
;TYP&'D&

aq%w,ma)

:WAIT FOR C

PC, PREPKB

#100000, (R2)
S’ 4g

: ISSUE_CONTROLLER CLEAR
;EW INPUT
iGET
BLOCK ARDDRESS

PC,W.WTCH

:P.B.
SS GOES HERE
:CALL WATCH DOG
:DONE SET?

PC.C.INIT
DORNE

BEdrec
°
RTS
PC

;CALL DRIVER

i NOCLORE RO-RS

: YES-RETURN

2 2222222222222 2222323223323323322332232232222222222 222
3P Y Y Y
'4STRCMD - STORE PREVIOUS AND CURRENT SUBSYSTEM COMMANDS

8903

8906

000001

37 043760
003102 000017 22%:
1743
11
00SS10 000010 30S:
1
fios

8830 g:ggg 8657.5 100000
8831
7
026040
8892 040556 O
040566

8833

005233

K13

12:16

BIT
BNE
BIT
BNE
MOV
MOVB
MOV

BIS
MOVB

u;g; 000016
004
0s0212
00473; 041704
%1

MOV
BEQ

BIT

DEC

8874
8875 m fi;agua 000200 005504

8877
£578

10-JAN-78

040606

104407

040610
040614

012701
012700

040622
040624
0b2e
040630

012021
012021
012021
012021
012021

040632

012021

o o 36363636 3636 36 3 36 3 36 36 36 6 36 36 36 36 36 36 36 36 36 26 36 36 26 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 36 36 3 36 36 3 36 36 36 36 36 36 36 6 2 3 X X ¥ %

005232
005246

StRCMD: SAVREG

MOV
#PRVCMD, R1
MOV
#COMSTR, RO
; STORE PREVIOUS COMMAND
MOV
MOV
MOV
MOV
MOV
MOV

(RO)+, (R1)+
(RO)+. (R1)+
(RO)+. (R1)+
(RO)+. (R1)+
(RO)+. (R1)+
(RO)+. (R1)+

; SAVE RO-RS

:ADDR OF PREV COMMAND STORAGE
:ADDR OF CURRENT COMMAND STORAGE

SEQ O4NS

SEQ 0166

CZREMDO RKB11/
1
CZREMG.P11
?3-?S -78VERIF11:48

0634
90
o642

891
gg
|
|
|
;

8923

ggsg
8926
|
.

005270
ogsasg
02

040672

012701

00S246

8930
31

040702
07
87

040712
040714

Bi
i
012521

CALL DRIVER 10-JAN-78
ROUTI

003144

0137
137
137
013737

gggx
z

105737
001414

MACY1l 30A(1052)

005264
005262
005270
005366

12521
i
1

#COMSTR,R1

MOV
ngv

(RS)+. (R1)+
(R5)+, (R1)+

n 3
MOV

RESREG
RTS

f ;1,§§i;:
(RS)+. (R1)+
(RS)+. (R1)+

;RS POINTS TO DRIVER PARAM BLK

;RESTORE RO-RS
i RETURN

aqag

:383$1§E“° THAT 1S TESTED IN THE DRIVER CALLING

:%THIS
R 325é?SR&L 5HE
Y 98¥ RTHE
WHENRourxns
NO ERROR
Hflg 2“
SETS THE

«IlllllllllllilllllllllflllllIlllllll«llllllllllllllIllllllll!lllll

040716 152737 000377 003123
3
838753
032737
100000 0O0SS04
8944
7
001403

EARFRE: BISH

2%:

838739

6883?5

040

001410

040754

113737

003126

oun7q5 105737 003126
04 7§a

oug;bs

005037

001174

——

003126

eegg
07 6050 7 005504
954 (040774 000207

18:

8356

"88TTL

040776
04i000

104407

105237

032737

369

041012

001412

8971

041022

002406

8970

Egncnr

E&i?fl ERROR COUNT

iNO - SKIP TO EXIT

:CHECK IF ANY ERRORS HAVE OCCURRED

REGS

MOVB

ERRCNT $REGS

CLR

Efggn
RTS

gécnr

;GET RETRY COUNT

:PRINT RETRY SUCCESSFUL MESSAGE

SLERR
Sscovsfiv
FLAGS
: RETURN

TYPE ERROR ROUTINE
JSR

RTS

PC, TYPERR

PC’

aruxs ROUTINE USES THE “ITEM CONTROL avrs* (SITEMB) TO DETERMINE WHICH
:%ERROR IS TO BE REPORTED. IT THEN USES THE “ERROR TABLETM (SERRTB)
§$NTRYTgnoerxns WHAT INFORMATION IS TO BE REPORTED CONCERNING

041004

ges

ERRCNT

BEQ

»Rsruau

83960
8961
gggg

8967

TST8

: ¥ENTRY -

eggg

8966

;SET_THE DONE FLAG
onuvbe
,
RECODE
;TEST
IF ANY DATA ERROR
2%
:IF NO- DO ERROR_RECOVERY PRINT TEST

; lnnlniuuiinunnnnuuinnuunuuunnuunammu

8957

8364

BIT
BEQ

CLR

001174

895S

MOV

;SEE_IF UNIBUS MAP PRESENT
:BR IF NOT

llil!!llilillI!illl%llllllllllll:zlllllllllllllll!l!!lllllllll

8951

UBMPRS
i
CRMPHO,PRMPHO

gggg

8949

PAGE 168

1ST8
BEQ

MOV

104410
000207

ggga7

12:16

MOV
;STORE PREV U.B. MAP REG O
MOV
CRMPLO, PRMPLO
MOV
asMAPHOO,
CRMPHO ; STORE CURRENT U.B. MAP REG O
MOV
J¥MAPLOO,
CRMPLO
: STORE CURRENT COMMA&ND

43:

8934

L13

041014

123727

Illl!llli&llllliilllllllll!l!llll!lillllllillillIllllllllllilil

003130

000040
003130

f?PERn SAVREG

005770
000024

INCB

DRVERS

#BITS,CS

{SEE_IF DRIVE SHOULD BE DROPPED

BEQ

:BR

BIT

CMPB
BLT

DRVERS, #20.
3%

; INCR_ ERROR COUNT FOR THIS DRIVE

;

_IF_ERROR LIMIT EXCEEDED
IF NOT

:SEE IF 20(DEC) ERRORS EXCEEDED

:BR IF NOT

550323Y 3157

041024

10S037

003130

1
1

041454

;

001114

6S:

B98E
-

899
94

001400

102

18:

1
1114

2%:

33:

831&

9004

ouif

831

{
11
0
%
fix?x?
§1§7
%?agg
90{
{ 1
11 246

§1g
gxgg
i
1

11 012473

?0137§

137754

20%
RO

;CLR RO FOR _ERROR NUMBER

MOVB

SITEMB,RO

;ENTER ERROR NUMBER

816:

REWORY.
':gma.asun
B

;FORM_ADDRESS OF ERROR ENTRY

?EYS

:BRANCH IF THERE ISN’T ONE

(RO)+,28

,CRELF
"AS2SP2

MOV

$§TSTNM, -(SP)

:GET TEST NO. ON STACK

(RO)+,48

' TSTMSG

gcuhog

;TYPE "PREVIOUS COMMAND :*

:%ko}uo

; TYPE PREV COMMAND HERDER

;55
MOV

?OV .

TYPEE

:SIX
VAL
2§¥m$?m'e IEBDR o?egaev CMND VALUES

SPACE2

(R2)+,-1SP)

PTY
éemnmons
iSEE IF 7 VALUES TYPED YET

:gm E2

; INDENT

104401

TYPE

,CR2LF

9026
27

041276
041300

041272

104401
000000

;;3; A WORD ON STACK

DEC

9025

+ 1 DiclTs
: SUPPRESS LERDING ZEROS
;nspomvsogscnxpnou ONLY ?

b le
ogheces R2

mwfiz

Scaau-'
gg}ua,asun

o o

0412

;TYPE *

e
;e;gs
ng«T:

{

9024

sTYPE "%%

;TYPE ERROR MESSAGE (EM)
{EM _POINTER GOES HERE
;
DH POINTER
iBR IF THERE ISN’T ONE

{

ngs

$13 ks
lool
Blawis
1
13:“8"'

:GET EM POINTER

TYPE
LMORD
MOV
%g

eoi

385

IQERRTB RO

MOV

|Ta¢e

ougus

;FORM INDEX FOR ERROR TRBLE

o-oieao

:oi

ROCEED Egnos
10 TESTT NEXT
DRIVE
;xm?fi?
ourgg
:BR IF NO
$INIT INDENT INDICATOR

%iq

991§ gxgg 1&381 8‘1’5«33

;CLEAR DRIVE ERROR COUNT

m;g

308:

SEQ 52447

JMP
CLR

e
gn
BEQ

TYP

o41142

PAGE 169

DRVERS

1120
11
11
fi

gii'és
womx mii 1
ggg fifi%

12:16

CLRB

DDO

78 &

ML3

10-JAN-78

TYPE ERROR ROUTINE

0410
000137 Qi70%6 140072 9%:
1&
1
1402

PP PR P PR P PR PR R R B

8972

10-JAN-78 11:%8

MACY1l 30A(1052)

2200
000

CZR&MD.P11

CZR6MDO RKB11/06 SS VERIF

:ac:gR g

,DHFI!EF

:BR

IF NOT

:TYPE HDR FOR BA DATA

NEE
B
| ;moewr
TYPOC
¥
TYPE PREV. HI BA BITS
TYPOC

012457

4s:

TYPE
LMORD

; TYPE PREV. LO BR BITS
: TYPE DATA HEADER
:DH POINTER GOES HERE

Q@ 0168

9055
90
9057
qossosaq

9068
9069

9070
9071
9072

1002
6
0l
012473
131496
044
14
"0}

302
1

6005 10
1004
104401
005005

012473
128:

001315
41434

041426
041432
041434
mwag
041442
041444

012473

0000
104401
105710
001331

001315

041454
041456

104410
000207

041446
041452

062700
000751

9073
9074

148:
158:

001315

10
104401
104401

11§:

348
36%:

168:

000002
208:

’

TST

DEC
BLE
MOV
TSTB
BNE
TYPE
gka

R2
20%
(RO)+, 168
(RO)
34§
SCRLF
ggs

l'f‘;ncsa

148
SCRLF

BNE
TYPE

368
, SPACE2

.WORD
TYPE
1ST8
BNE

TYPE

ADD
BR

SCRLF
trRO)
ms
#2,RO
14$

: - &ma WORDS
-T
’

gfl

semmrons

F <cn> <LF> NEEDED

DH’S?
no-anmc
,csr
XT DH POINTER
szs } ANY DATA FOR HDR
; ;g
sxx EX
LINE
iRE-INIT xuosm INDICATOR

;iBR
COMPLEMENT
INDENT INDICATOR
IF NO INDENT REQUIRED

,moe
YPE DH
-on POINTER GOES HERE
; TYPE A DT?
YES-BRANCH

xncnsnem DF POINTER
:SEE IF END OF DF BLOCK

RESREG
RTS
c
- R I2222222222323223232322323222322322233223322322
3223223222222 X23222 ]

"8BTTL CONTROLLER ERROR REPORTER ROUTINE
: XENTRY:
JSR PC, CONERR

38;2

msrum

RTS PC

9077

mus ROUTINE DECODES THE CONTROLLER ERROR WORDAND

9079

i *RETRIEVED FROM THE RKBI1 AND PLACED
IN THE

9078

: ¥REPORTS THE RAPPROPRIATE MESSAGE. THE nxsxRscxsrsns ARE

ggg?
9082

9083

ng‘

COM

SPACE2
3(R1)+,-(SP)

;
:BR_IF NOT
; u NT
;
FIRST DATA WORD
ON STACK

TYPE
MOV
TYPOC
DEC
BEQ
;;Pe
BEQ
TYPE

BRANCH ;5 THERE ARE NONE
GE
INTER
S

208
RO
RO

NIT
NT INDICATOR
éspg’d 8Escn19 ION ONLY ?
T orvsgxmsn
srn

MOVB

BEQ
MOV
MOV

SEQ Q4u8
SEQ 0169

o2
o4
i
=52

108:

ksscm.r
aoggna,asua
(RO

PRGE 170

NI-O—-

1454

12:16

R:E
gg
MOV

1
1

735

ggga1 fixu
1M

90
9063
9064
9065
9066
9067

—
010000 137622 S8:

1%
1
1
14
1
141
041412
mi;u

MACY11l 30A(10S2)
10-JAN-78
TYPE ERROR ROUTINE

SEp mzfimm

cznsmo RK611/06 SS VERIF 1
CZR&MD.P11
10-JAN-78 11:48

PARAMETER

:gtfo%.
mzs IS DONE BECAUSE PARM O nnv NOT ae VALI

041460

104407

!!!llllllI!!IllllllI-!l»llll!l*illlilllil!!!!!!!l!li*i!*l!illl!!*

ébnsna SAVREG

: SAVE RO-PS

CZREMDO RKG611-/06 SS VERIF
CZREMD.P11
10-JAN-78 11: qa

9084

377

9086

39090
9091
30

1474
1
1
1510
1;12
15&3
1

004737
785
1
1
;9
1405

3035
9096

g:xggg
1

1407

9085 3314

38§§ 8:{252
9097
3098

MACY11l 30A(1052)
10-JAN-78
12:16 PAGE 171
CONTROLLER ERROR REPORTER ROUTINE

135337 833125

003123

044352
000001

003052

000002

003052

18:

000004

003052

2%:

041540
g:xswu

105737
wg;

g}g?

ouissa

68333?

9103

156N

001402

39099

Bl4

1546 10%2

BISB

INCB

003137

003140

158:

9102 §§1§§2 032737 000010 003052 3%:
9104

9108 owxs?g
9109
15
910
1553

633367

gigg

aqiggs

633433

9110
9111

041606
041614

382737
1402

giig

041

g:isl

41
1395

882737

JSR
BIT
BEQ
ERROR
B8R
BIT
BEQ

000040

003052

4S:

S§:

104071

gi{g gzi
§§%z§? 000400 003052 68:
9119 g:xsae 1 5;

8377, DONE

;SET_DONE_FLAG

PC, TOPRCC
oairo .CONT
su
7%
#BIT1,E.CONT
2s

:LOAD RK REGS INTO snscs
snnon 0?
NO-BRANCH
CLERR CONT DID NOT CLEAR ERROR

#BIT2,E.CONT

; ERROR 27
NO-BPANCH

ERRch

sgnon

BIT
BEQ

;UNSOLICITED ATTENTION

INCB

BIT

BEQ

REISSU

iSET FLAG TO RE-ISSUE COMMAND

#BIT3,E.CONT

gsaon

BIT
BEQ

$BITS,E.CONT
13

; ERROR 59
NO-BRANCH

915
Egnon

ggxta,s.conr
72

;DATA LATE WHEN UNLOADING HERDER

ssnon

9119
g%go

g:xsuq
oqiggs

6820;;
0013 ’

002000

003052

9%:

ERROR
axg

73
:ggrxo.s.conr

3%53

g:isss

ggfzgz

100000

003052

10S:

SEE

oagrxs,s.cour

9125

041670

104052

9130
9131

9132

E OR

ERROR

ggxre.z.conr

; ERROR 47

: NO-BRANCH

PATTENTION DID NOT RESET WITH CLEAR
suasvs CLEAR DIDN’T CLEAR DRIVE ATTENTION

; CONTROLLER ERROR DURING DRIVER SERVICE

;DRIVE DETECTED PARITY ERROR

sMULTIPLE DRIVE SELECT

ERROR
: UNDEF INED ERROR
CLR
E. cont
:CLEAR CONTROLLER ERROR WORD
JMP
BGNRTY
:GO DO RETRY
R EEEREEERNE RN R R R RN RENR R R R R RN R R RN R RRRERRRRERREERREE

&BTTL REPORT supponr og INE
: #THIS ROUTINE

s ALL

THE PARAMETER BLOCK DATA TO BE REPORTED

;%INTO THE PRSSE TEMPORARY REGISTERS FOR REPORTING.

g}gg

9135

041704

041706

005037

00SS06

9138
9139

041720
041724

012700
016520

001162
000002

9136

géa

B8S$:

003052
044152

NO-BRANCH

73
$BITY,E.CONT
55

003052

118:
78:

;ERROR 37

uuexpecreo DATA TYPE ERROR

BR
BIT
BEQ

001000

104075
005037
000137

iNO ATTENTION IN ATTENTION SUM REG

ggnon

g3e732

041672
041674
041700

* NO-BRANCH

sss IF DRIVE WAS SIEZED BY OTHER PORT
:BR_IF NOT

oqiggg

9126
9127
9128
9129

;ERROR 17

DRNAFG
15%

3iia

9125 041223 10409»

: INCREMENT snnoa COUN

TSTB
BEQ

ERROR
000020

SEG 0449
SEQ 0170

ALL THESE MAY

k;flgflpas INCLUDED IN THE REPORT, BUT THEY ARE LOADED ANYWAY.
104407

9137 0417i2 116537 000001 00SS506

SAVREG

CLR

ERRCOM

MOV
MOV

#$SREGO, RO
:FOR REPORTING
P CYLNIRS), (RO)+

MOVB

LEAR ERROR COMMAND STORE

P.CMND(RS), enncohsrons COMMAND START VALUES

CZREMDO RK611/06 SS VERIF

CZR&MD. P11

10-JAN-78 11:48

9140
9141
3{:

041730
041734
alfi

9145

Q41750

149

116520
105020
1

012700

MACY11 30A(1052)

REPORT SUPPORT ROUTI

00000S

000004

MOVB
CLRB
Eol\'\"g

001174

MOV

000012

f6Y

1?29 B
1
"' —r—"
s Bk
Rk

503

3
miehs giesd
9154 042016
gig ov2022

i
MOV
MOV

3{53 8:'05;2 Bifi% :’:’:’:

9160
316
g6k
Eigg

:ox

mis B
damRe
1
000034

ggag

aaoss

1
16

§issao

2
ooooss

9%2&
.
3@3 835;% ?i% %533

317
Qustis 1ocel
9174 042120 10S021
9175
1
012021
478
Bl 1k
oo
9178
0421
111021

PAGE 172

P.WC(RS), (RO)+
#$REGS,
RO

HI gnBITS

g‘(
P.
tggs)ct‘l‘?nsVALUES FROM THE

25% (R0t TN
o8
R e
v
$
PM(RS), RO)+ gg?sm'!ggm?gmnéu Exr 1S
P.WCR(RS) . (RO)+ ;

BERRITSlyirSToneo
A un
P.ER(RS) (RO)+

MOV
MOV
MOV

P.AOO(RS), (RO)+
P.BOO(RS)
. (RO)+

MOV

P.A10(RS)

533

SEQ

PTRCK(RS) (RO)+
(RO)
+
‘RSECT(PS) (RO)+

EG36
0 35%"Ei

3%:9

i
9159

Cl4

o-mn-7§ Néa‘“’

) (RO)+

E.g;ggg;,gna;:

STORE nggxous commuo’B
AN ébr‘a"m’afmo
i gl e
Egs
?%?fi?'fié‘
8,8:§E
8:
PREV CMND STORAGE

B
CLRB
ngv
R
MOVB

B
(R1)+'

(RO), (R1)+

; SECTOR

38 Baim Olesel g

SEREUC

9133 3351?3 8128?1 000004

283

fi?héfifzm)

:LO BA BITS

9179

042134

105021

ai%

42703

042160
042162

104410
000207

9185
9186
gigé
9]

gig?
9192

I8
9195

CLRB

177774

BIC

(n8)+,(R1)+

‘?Yk ADDRESS

(R1)+

01777?'4‘!!3

RESREG
RTS
PC
,QE;;lll;g;g;#lg;;lll;sfi#;:éllillllll!llllll!l!lfllllllllll!*llilli
;¥ ENTRY

REURN
:¥THI

RTS
CAL

:sz;i%fiséfiézégzmL

PC,

ERRHDL

Y THE DR

N AN ERROR IS

e e el

ETECTED

lilllll!llllliIliliilillfllllllllll*iifilllfiilllililli!ill!l!!li!l

Q45

SEQ 3171

CZR6MDO RK611-/06 SS VERIF

10-JAN-78 11:48

MACY1l 30A(10S2)

10-JAN-78

REPORT ERROR ROUTINE

12:16

PAGE 173

Buditd 1939% oo0377 ocoziez ERRMOL: BTEECC w377, DoME

a0 @% %‘%fi 00SS04 ERZENT: é;«éa E(E.Rgégél? RECODE y@??VESS?HORD

Bussls 812788 ooe7iy

Q8 g g e

——

s 89#

CZREMD.P11

042234 004737 041704

MOV

fY
JSR

sPARm1
RS

ELss 175
70" pRRARETERBLOCK 1

Rl {NORHiBRIVER"
OBERATIONS
IN ERROR-PROCESSING
g%‘sgfifi ggz&:%&%flgs;mfl

PC, REPSCIP

92?3

mxctla THEY %rssrs
A m

9212

cnmsmomxc NATURE ARE FIRST

31}

§RAT ERRORSOF B NORE

35}3

TESTED.

¥f§

1 m ERROR xsrg&p
ssr

35i§
%éo

IF‘&’?‘:‘&&
éfia&fi&“&&‘@'&?
ngknggéa
necxsrsa anmours

£l
4554 Q45548 BAS50Y B88B3Y ooooao

BYY

RR
e
"uEE B5e8lrs) ?E%r""mf°YPROEREEJSTER

qzé

§’11§

$RBORT , RECODE

gg:? 0‘053'02 ' 1
p—
388:
fi figfi omaga 833588 000020 3s:

gzl';on
ézz

:78
;NED ONLY
3g?e,9.csa(rz5) ; TEST UNIT FIELD ERROR

gg;

fig%

@z@

010000

BiI

SNED, P. CS2(RS)

TSST JE UFE & NED BOTH SET

32«5

Que3n

000137

sJ::gon

ggs

REPORT NED & UFE BOTH SET

gsgz

8354'58

39%:

sggon

9251

042404

000100

48:

BIT

3
:REPORT UFE ONLY
3738
#CMDTO,P.PRST(RS) ;

9azg

042252

001406

asgon

g
00 00SS04

ggg
000020 18:
3
s 2%:
ggg BEN
ggg my
78 men
010000 000020
R

0327&5

000020

000014

:REPORT ERROR

gg
M,P.CS2(RS) ;TEST NON-EXISTANT MEMORY
857
gg o
#NED,P.CS2(RS) ;TEST NON-EXISTANT DRIVE
B B s e om s own

SEQ Q4S1

SEQ 0172

3258
3258 g

£
(o]

[

MACY11l 30AR(10S 2)
10-JAN-78
REPORT ERROR ROUTINE

€2
BIT
o

y
832388
oossou

038737 000400 00SSOM
01006
B s

3260

Sb_

—
418:
386 016000 000014 SS:

CRROR
BIT

BReent
e ab T B AND HAKEPND. REPORT
SORUAZD, P.PRST (&) ; SEE-TF DRIVE S1EJED By OTHER PORT

ERROR

107

'DRIVE SIEZED BY OTHER PORT

BIT

SPAR,P.CSI(RS)

;TEST D TO C PARITY ERROR

B
BIT
ERROR
8IS
3
BIT

37%
0RPAR,RY

. TEST DRIVE DETECTED PARITY ERROR

7
SRCLREQ, RECODE
37%
¥ACLO,P.DS(RS) ;TEST AC LOW

BIT

$SPDLSS,P.DS(RS) ;TEST SPEED LOSS

Quguze

JouIOZ

%68

QIeres

1403

020000

000016

65S:

000 005504
3660
10
68:

3575
378
378

42
&

37
004000 00SSO4
3660
03e7s 000010 000036 7S:

382

QuBSed

Ouevbs 803620 000036 BS:

3584
3585

(049579
QoS

3588

Ouseis

10401
137

199023

guseld

g3e7ov

gueese

lguolz

3535
3595
9237

3539

137

276&
Q4SE

(04oBY
Quzede

043660

276 004000 000016 248:

353

£3

B¢
Toemoc
0 PROCESS
TIMEQUT
gfigo?os.ascooe
%rgg
TIé?gTTgflefir&o&éZ
PROC?

ERROR

3286

SEQ_Qus2
SEQ 0173

“s:

O4su

%72
%73

PRAGE 174

SLEV2ER, RECODE TEST_IE LEVEL 2 ERROR
41
'YES - SKIP T0 ERROR
57
&
'ELSE MAKE FULL TIMEOUT REPORT

3530
gues]1
3571

E14

12:16

BIT
BNE
ERROR

3565
3564
3565

—

n
NWw

3525 usuis
ooa7
gasgggg
géeg %7

?UI

CZREMDO _RKB11~
CZR6MD.P11
1

137
0374

ooooOI
043660

002000
043660
0OOOCH

284 1 o0a
137 Qu3esn
g
833858

3500
$303

QuB670

lowais

3307

045704

104016

3304
2
137 043660
3305 QuSe7E 0e7DY 00DG20

2ss:

BEQ

ERROR
BIS

ERROR
P

108:

i2s:
13s:

378

¥CTO,P.CSI(RS)

;TEST FOR CONTROLLER TIMEOUT

BIT

a1, Ry

. TEST ILLEGAL FUNCTION CODE

BRRoR

BIT

57
12

WPGE,P.CS2(RS)

;TEST PROGRAMMING ERROR

P
BIT

378
MILF,RY

. TEST

378

ERROR

SMP
BIT

378
FHITE, RY

ERROR

us:

6#RCLREQ, RECODE

“BR’ IF DRIVE 15 AVAILABLE

BIT

ERROR
000020

65S

. TWO TIMEOUTS ERROR REPORT

ERROR

BIT

30TYE, RY
15

ILLEGAL DRIVE FUNCTION

. TEST DRIVE TYPE ERROR
. TEST FORMAT ERROR

CZREMDO RKE11-06 SS VERIF 1

9310

Q31

931
931

10-JAN-78 11:48

;Sz

%3&8

140;

7222
3

CZREMD.P11

9314
9315

=|319
931

=mg

931
9320
9321

<|g§§
]
9324
9325
elaeg
932
9328

10401
37

37
;35

1406
%

1406

MACY11l 30A(1052)

043660

004000

148:

043660
040000

goeoo
3760

158:
005504

000002

168:

004000
043660
001000

005504

1
14

1
lm

004000
043660
002000

9332

043032

000137

043660

3333

3660

g:aoas

032765

en;gg
333

3338
9339

99343."13
9342

010000

00 005504
ggggso

043660

gwu

3345
9346
9347

gx 19
04311
0431

3144

00C

043660

3660
5012
044522

112

000036

000 005504

000040

783

100000

000020

3333
mai
1137
10 005504
3335051 ggig 60 13% 003121
9

gxgg
1
3166
833"2

04054
;37
37
004737

9360

043204

001025

9359

9361
9362

9363

3176

043206
043212
043220

032737

013702
042762

016237

3036
000100
000024

000000
001202

158

JMP
BIT

37%
SUNS, RY

; TEST DRIVE UNSAFE

BIS
JMP

$ABORT, RECODE
ALLTRM
#SKI,RY

: TEST SEEK INCOMPLETE

ERROR

BEQ
ERROR

BIT

BEQ
ERROR
BIS

168
20

178
21
SRCLREQ, RECODE

JMP

378

218:

22%:

SEQ 0174

; TEST WRITE LOCK ERROR

BIT

208:

SEQ Q453

SWLE , R4

19%:

268:
005504

BEQ

188%:

27%:

400

37%

BIT

PAGE 175

37%
#COE , R4
18%
22
$RCLREQ, RECODE
37%
régne,m

93?,5
833150
433 000400 00SS04 SO0%:
9354
043156 001403
9355
939;
935
9358

JMP

12:16

JMP
BIT
BEQ
ERROR
8IS
JMP
3&5

178:

$% g 1bie 004000 00SS04

9331

10-JAN-78

REPORT ERROR ROUTINE

F1Y4

BIS
fRon
43$RCLREQ, RECODE

Exs

JMP

BIT
BEQ

#DROT,P.DS(RS)

SRCLREQ, RECODE

37%

: TEST CYLINDER OVERFLOMW

:TEST ILLEGAL CYLINDER

;TEST

DRIVE

OFF

TRACK

#DTE,RY
21%

: TEST DRIVE TIMING ERROR

ookr,P.csamsm

; TEST DATA LATE

26
37s
S0PI,RY

; TEST IF OPI ERROR

373

:NO - SKIP REPORT

ERROR
JIMP
JSR
JSR

78
PC, BLDEXH
PC . RDHDO

;GET OUT OF ERROR REPORT
:GO BUILD EXPECTED HEARDER
:GET HEADER OF SECTOR O

BNE

28%

:IF YES-GO MAKE ABREVIATED REPORT

5’?§°"
JMP

BIT

BEQ

ERROR
JMP
BIT

%ssaaom RECODE
378 '

ggo
ggia

gggxsnn
RECODE ; TEST IF FIRST ERROR
DERCNT '

BIT
BEQ

SLEV2ER,RECODE ;TEST
IF A SECOND LEVEL 2 ERROR
268
iHAS ALREADY OCCURRED

JMP

BIT

MOV
BIC
MOV

SLEV2ER,RECODE

RKBRS, R2
#IE . RKCS1(R2)

;TEST IF ERROR GETTING HDR

:STORE HEADER O INTO REGISTERS
;RESET INTERRUPT ENABLE
RKDB(R2),SREG10 ;FOR REPORTING

CZREMDO RKSHI% SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

9364
9365

?]%9

g&?&fi
3234

9368
93;3

81 537
016237

134

937

9383
gfl

ggg

‘:ag

74
043302
g

PP PP P PR R R E R

937
374
9375
f:l",

3336

3390
eggé

457
7
105737
H?

1403

100000

Y4
1

001204
001206

000000

043660
042204

000400
000004
003121

T
BB
7
o-wsae

005504

SEQ E
SEQ 0178

e
30
378

;MAKE OPI REPORT

ER2ENT

;GO MAKE 2ND LEVEL REPORT

BEQ
BIS
TSTB
?E’,Q

23%
$HVRCER, RECODE
DERCNT
gg‘

; TEST IF FIRST ERROR
;YRS ~ REPOR

BEQ

318

29%:

BIT

176

BNE
ERROR
JMP

;RROR

%8808 00Ss04 30S:

PAGE

RKDB(R2),$SREG11
RKDB(R2),SREG12

28s:

00SS0o4

GlY

12:16

MOV
MOV

BIT

M
g-:w

9393
9394

00005:
0000

MACY11l 30A(10S2)
10-JAN-78
REPORT
ERROR
ROUTINE

BIT

l;ERR,RVéSl(RE) ; TEST IF ERROR DURING STORAGE

SHVRC, R4

OLZVEER,RECODE :*EST II?
2] END LEVEL ERROR HAS ALREADY
; OCCURRED.

B
Kaoow
JSR
PC . ROHDO

BIT

:TEST IF HVRC ERROR

NO-SKIP EXIT

Gl DRNLRE

ogvm,nscoos

TEST gr
mon
12935" NG HDR

SEMEe

(EL eO

535

1202

MOV

Rxoétgg),gnscm:STORE OFF HE

15837
134 ?omoooooa 88(1:883

H?¥
gne

55°Eé“§&e§fi
%‘?;PIY
TEST_INYE
S5i§
'

55 BOB oe

1533
1

1204

043660

33%
O04IMSE
BO0L3F
Q42204
3339 333453 83270“ g'}ozoo
|
fi% fififi vé gfi

s 8:3;3&
04
é‘x.s;o
:7:7“9%
3385
xisgé1 &:ooes

—o4

MOV

328:
23%:

ERROR
JMP

ERROR
E%é

MOV

go
nsvga

RKDB(R2)

)

SREG11

31
73

BReent
5asfi.m
8BSERR, REC
p%vun?)

VIATED REPORT

ANY
IN UNLOAD
GO ERROR
MAKE SHORT
REPORT

: MAKE FULL REPORT

R0
REPORT 2HD CEVEL ERROR |
i TEST 55025 BAD SECTOR ERROR
!gt
; T EYL NO.FLAG

:19;;;-14(5?
A1 &5“‘rha
goin7SESROS
EXCEPT TRACK
P.DTS(RS),R2

3405
OUINIS 00TrSS abois
3406 3:3475 322737 oo[J ICSOS 005504

%8
BIT

“’"‘"’c“é
ChER Ml QITS EXCEPT SEETOR
cehossc,necoos ?gs?: §uu

o]
3409
9410
g:ié
3:{4

ERROR
BIC
BR
EéE
S}?

104
#BSERR, RECODE
37§
#DCK, RY
:gcxsnn, RECODE

BAD BSE
RESET BSE ERROR FLAG
GO EXIT
'YEST IF DATA CHECK
T TcmmCHECK ERROR m RECOVERY CODE

35§

‘A 1 IN REG 12 FOR CORRECTARBLE

9483

03-15085

351

043516

"4{5
833?:0
3-419 83?&53
3418

94i9

043554

04355

1
2737
000460
fizzg
;

000002
100000
ooc:clcmmg‘cg

00SS04

000001

001206

BNE

00SS04
338:

1;0377 88?20240 005504

000403

012737

34%:

37%

Yng Rgs;
NO ERROR OR REPORT

B§°
ELS

3SEgcm,
RECODE EgoééT
. Eofigecm LE{"
S
‘REGL2 TO INS?cmEuncoanscmaLs

MOV

#1,SREGI2

CZR6MDO RKE11-06 SS VERIF 1
10-JAN-78 11:48
CZREMD. P11

10??37

MACY11

35%:

0o3ial

it RS

001414
1057
1003

368:

Bi3eeR

000020

000014

000200

00SS04

000040

000014

052737

000200

00SSOo4

032755
001404

004000

000014

000200

00SS0o4

000010

000014

000200

00Sso4

882937
032765
001404

682935

37%:

43§:

Y4§:

oencnr

SEQ _Quss
SEG 0178

TEST IF rxnsr ERROR

aés

gu3£ P.CS2(RS) ;TEST WRITE CHECK ERROR

BIC

SABORT,RECODE

;CLEAR ABORT & SET WRITE

1578

DERCNT

TEST IF FIRST ERROR

JSR
ERROR

PC, GTPKAD
33

gggoa

BIT

T(RS),

oucsnn RECODE

378

ntPonTocx ERROR

;CHECK ERROR IN RECODE
NO
- SKIP

co GET ADDRESS OF ERROR
:REPORT WCE

esa
ERROR
BIS

43§
36
$RBORT
, RECODE

#DRVHRD,P.PRST(RS)

;TEST HARD ERROR

EéT

gegvDSC,P.PRST(RS)

: TEST STATUS CHANGE NOT CLERRED

BIS

$ABORT
, RECODE

Son

géz

zggDSC,P.PRST(RS)

Ennon

qga

46$:

PAGE 177

c K RE).sSREGI0cos?’é
iEP
RROR
Fe%fi
EE'é 988?$§8n°§ -

BNE

H14

12:16

hay

ax;
044666

;figa

MOV

737

104033

30A(10S2)
10-JAN-78
REPORT ERROR ROUTINE

BIT

BEQ
snnon
IS

:IFST ATTENTION BUT NO FAULT OR DSC

#ABORT, RECODE

SUEXATT,P.PRST(RS)

ALL TRM
29
#ABORT, RECODE

;TEST UNEXPECTED ATTENTION

:ALL ERRORS MUST EXIT THROUGH THIS POINT
003046
003044
00SS04

044064

012737

862238

0ooo1e

000200

00SS04

004000

00sso4

000113

000001
003046

O421e4

003046

ALLTRM: MOV

MOV
MOV
17
NE

SERRHDL , A. ABNL
SERRFRE. A. NORM
ORT, RECODE

ofiBv,hK S(R2)
47§

E?¥
BNE

RKBRS

BLG

onc

B&s
47g:

$PARMO ng

MOVB
?gg

MOV

gggoar,necooe

ONRTY

EQ, RECODE

onean P.CMND
URETRNE E.ABNL

RESTO

PRRAMETER BLOCK SELECTION

sro
INTERRUPT VECTORS FOR RETRY
nxv gpsnnr ? xr ANY
v (Hn

E
ofl?egEénov SET
$E§Ta?§
:RECALIBRATE REQUIRED BIT IS SET

{ELSE ABORT WITH ABORT MESSAGE

RRETRY SET LR PARAH
IBRATE

IS REQUIRED

BLOCK TO DO IT.

oEkRHoL,a.naNL :RESTORE ERROR RETURN

CZREMDO RK611/06 SS VERIF 1 e
CZR6MD.P1
10-JAN-78 11:

9476
9477

0N4072
0uMl

032737
00 HSQ

Q47
9480
g481
g482
QU833
9484
quygs

411
yile
Q44116
Q44120
044124
0OY4130

104060
137
104061
105037
1050§7
000137

947

o441

000400

DSé? 7 000200

MACY11l 30A(1052)
10-JAN-78
REPORT ERROR ROUTINE

082204

489%:

003130
003126
017026

044134
044136
044140
0O4Y4144
044146

000S
000000
105037
00000S
000137

HLTPRG:

IMP

0126086

9530
9E31

; REPORT ABORT-RETRY FAILED

;DROP DRIVE 8 GO TO NEW DRIVE

ERRCNT
NEWDRY

ERRCNT
CMSTRT

;DISABLE ALL DEVICES
HALT THE CPU

CLERR ERROR COUNT
'RESET ALL DEVICES

i THE INITIATING ROUTINE FOR RETRY.

4152 032737 000136

044170

0004S3

044200

001000

044220
O44224

7
113737

044250
044256
8::262
ebb

11276
004737
012700
012025

001174
003126

000200
3036

000177
040316
005246

U
43
044306

044314
0ON4320

012052
0127_
012737

004737
104410

002630
000000
040316

ANY OTHER ERROR IS
TO BE

‘RETRIED HERE.

IF RETRY IS UNSUCCESSFUL RFTER 4 ATTEMPTS,

00SS0o4

BGNRTY: EEE

ggssnnenvnceneoplennsocxsnasucsna,nscooe ;TEST IF ANY DATA ERROR

00SS0o4

9s:
-

BIS
BR

#ANYDER, RECODE
23

1STB

NORTRY

;SEE_IF "NO-RETRY" FLAG SET

CMPB
BNE

ERRCNT,ERRLMT
18
$REGS
ERRCNT, SREGS
102

:BEGIN RETRY IF ERROR COUNT HAS
:NOT BEEN EXCEEDED

:FLAG IS SET AND PROGRAM HALTS.

BNE
BIT
BNE

00Sso4

003127

CLR

001174
00SSo4

000001

18:

177776

2%:

3%
#BADSEC,RECODE
2%

MOVB
ERROR
355

fif°°flé, RECODE

MOV

RKBA

THE ABORT

iBR_IF YES
; TEST IF aao szcroa FLAG SET
:IF YES-EXIT TO CALLER

;GET ERROR RETRY COUNT
:REPORT RETRY UNSUCCESSFUL
.SET ABORT & QUIT

MOVB
JSR
MOV

.
K BASE ADDRESS
osuacLR cnuo<n$)
ser
:Go 00 IT UP TO CLEAR SUBSYSTEM
PC, DRVcAL
ocbnsrn RO
GO AND REESTABLISH THE connnno

MOV
MOV
MOV
MOV

(RO)#,(RS)#
(RO)+. (RS)+
(RO)+. (RS)+
(RO)+’ (RS)+

MOV
MOV

7.
%3 gue
01
fisoes
£
fen N
952
9528
9529

b6l

: THE FOLLOWING CODE WILL DETERMINE IF AND DATA TYPE ERROR
:HAS OCCURRED. IF YES,
THE RETRY IS NOT DONE HERE BUT RETURNS 10

gg{g g::ggs 623%3
ggi; 044%:3 0137

9519
9S20
9521
9525

RESET
HALT

CLRB
RESET

003126

ggi?
§§:g?8
?05737
003126
9512
4el6
1012

9513
9514

;IF AN ERROR OCCURRED IN THE

iRECAL ATTEMP SET_ABORT
;PRINT THE RECAL ERROR MESSAGE, AND
;GO REPORT DETAILS

; THE_PROGRAM WILL HALT HERE IF THE ABORT FLAG HAS BEEN SET OR

ggo? Oqfli;E 5737 003143
%
g2 e
95

DRVERS

SEQG_Q4Se
SEQ Q177

:IF THE DRIVE READY BIT IS RESET

Eo3 Guaich BLE OO
950S

CLRB
MP

gggé

OLEVEER RECODE

EREENT

ERROR

PAGE 178

BGNR
ORBORT PECODE
60

JMP

CLRB

9487

9500

BEQ
BIS
ERROR

00SSo4

24GE

SUES
9489
9490
9491
9492
9493
5434
GGG
G496
3397

BIT

00SS04

I14

12:16

MOV
MOV
JSR

RESREG

(RO)+, (k5)+
(RO)+. (RS

#PARMO, RS
#PRO, 24PSW
, DRVCAL

:AS IT WAS ENTERED INTO THE
:PARAMETER BLOCK

LOWER PRIORITY TO ALLOW INTERRUPT
an DRIVER
:IF RETURN GETS HERE, NO ERROR

CZRGMDO RK&11/06 SS VERIF 1
CZR&MD.P11
10-JAN-78 11:48

gggg

094322

3534
9536

Q44324

9537
9538
9539

(044340
Q44342
0443s0

9536

324}

044332

MACY1l

000207
152737

052737

000207
152737
000207

000377

000400
000377

003123

00SS04
003123

9542

Q44352

35
35

044360
83"393

012701
12551

9653

044374

O0lk221

sgg

4404

9557
9558

(044414
044420

9559
9560

3561
3562
3

4354

“

003036

16221

4400

0lb221

Y410

0Olbeeal

Q44424
044430

000002

016221
016221

00001
000012

(16221
00

0157

32??

auggso

oafzss

9570

4472

815331

474
044476
45
OMY
Q44504

gg;s

O¥4510

9579

Q44512

9580
3581

9585

9586

3587

BISB

%377, DONE

:SET DONE

RETNML:

RTS
BISB
RTS

PC__
8377, DONE
PC

:SET DONE

BIS

SLEV2ER,RECODE

I T P

MOV

MOV
MOV

000014

MOV
CLR

2714

Q44516
044520

MOV

0141 000001
04031
000100

SAVREG
MOV
MOV

000014

4433 g25729
002000 00SS04
705 000040

8571
9572
9573
9574
9575

9576

RETANL:

001174
00

1521

094832

95E
3569

s OCCURRED,

fbmoc

013702

9564 044436
76
9565 OY444Y 66~73
>

RECOVERY WAS SUCCESSFUL

:SET LEVEL TWO ERROR

Py e

T LR

R
STATUS

ii!lIllllllIlllll!llll’l!llll'lll!Illlllll!l!ll!l!llilllllll}ii

04407

9554

SEQ Q457
SEQ 0178

%*GATHERING DUTIES.

83"3&2

179

; ¥THIS ROUTINE SUPPORTS THE ERROR HANDLER BY PROCESSING TIME OUT

95y

954

PAGE

‘&BTTL TIHE OUT PROCESSOR ROUTINE

9546

J1l4

12:16

RTS

9543
9547

30A(1052)
10-JAN-78
REPORT ERROR ROUTINE

SSREGS, Rl
;SET UP R1 FOR RK REGISTER STORAGE
nxggéz ),(R1)+;STORE ALL VALID RK&11
RKCS2(R2) . (R1)+ :REGISTERS
RKDC(R2), tR1)+

RKDA(R2)
. (R1)+

RKW (25)'"““
RKBA(R2) | (R1)+

RKASOF (R2), (R1)+
RKDS(R2), (R1)+
RKER(R2)
) (R1)+
RO

#PARM]

BIS
ADD

a*uoros
RECODE ;SET
TWO TIMEOUTSFLAG
#P.A00, RS
‘BUMP RS TO POINT TO DRIVE STATUS

MOV

fcfioro P.Pnsrtnsiflé ES;KggR TIMEOUT
3

z§§)+,ln1)+

MOV
MOV
MOV
MOV
MOV

(R8)+. (R1)+
(RS)+. (R1)+
(RS)+. (R1)+
(RS)+, (R1)+
(RS)+. (R1)+

012521

MOV

(RS)+. (R1)+

MOV

#PARMO, RS

012705
104410
000207

MOV

002630

RESREG
RTS

R YT

sarrL

:RETRIEVE THE STATUS FROM THE
:DRIVE.
:SET UP TO USE
P

.RosrnfP CMND(RS) ;DO READ onxvs srnrus COMMAND
PC, DRVC
-CALL DRIVER

012521
012521
12521
15321
012521

012521

; THIS CODE WILL ATTEMPT TO

MOVB
JSR

EEE

18:

RKBAS, R2

;novg ALL THE DRIVE STATUS INTO THE
:TEMP

REGS FOR REPORTING.

(RS)+, (R1)+

:RESTORE PARM O

2222222222222 3222222323232323233232332323232 2322222223222 22 2223

READ HEADER O ROUTINE

IEEEREEEREREEERREEEREEREEERERREEREREEREER
AR R AR EL R R AR RRRR LR LR

CZR6EMDO RKG11/06 SS VERIF 1

CZRe6MD.P11
9588
9589

3290
9]

A
9593

3594

gsses

953?

10-JAN-78 11:48

Q44522
(044522

540
42
44

u§3

104407

152&
15

700

000026
oooos;

ggt;:g

0'*‘06“33

833712

9515
9613
9614
%{2

0446
044656
0446
044664

153765
012705
104410
000207

9611

013712

LH 145752

003125

9622

016537

952;

O9¥4712

116537
116537

gggg

%57
OW4300
9625 044704
9630
9631
9632
9633
9634

3635
36

0447

005737

0M47
47
4734

005337
000426
032765

Q44742
044744

9641

9642

oo1174

002837 00108 001200

001404
012737

ow;ga 000403
mu 4
012737

3638 044766 O0Tuds
i

EEE

ggn?,me)

BIS8
ov
RESREG
RTS

FORMAT,P.CS1H(RS) ;RESTORE TYPE AND FMT IN U
#PARMO, RS
:RESTORE P.B. O ADDRESS
:RESTORE RO-RS
PC
i RETURN

BICB

#PARM] , RS

HOLDM, (R2)

:FROM THE DRIVE STATUS. CLEAR
:0FF UNUSED gxrs AND POSITION
:FOR ”‘,,3'5 a§ HE DESIRED
:CYLI D R IN THE READ

;&'Tmups ?o: usecp.e. 1

: ISSUE RD u& WITH FMT BIT = 1
S&“f? §o°'r' Sbvn:fingv IN CS1

#8.CFMT,P.CSIH(RS) ;CLEAR THE FORMAT

;és#'#:llEE#Igag'.(lgggggl;&::g!llllll!Illllll!lllil!lil!i!lllll

044666

9627

6S:

000007

%ég

9621

Ys:

R1,P.SECT(RS)
;INSERT TRK,SECT FOR READ HDR
RO P.CYLN(RS)
:SET CYL NO.
#SUBCLR,P.CMND(RS) ;SET S.S. CLEAR CMND
8PRO, a8PSW
;ALLOW INTERRUPTS
PC, DRVCAL
:CLEAR THE S.S.
sROHEAD, P.CMND(RS) ;SET READ HEADER COMMAND
PC, DRVCAL
;D0 g
HEADER
HOLD3, (R2)
1SS
HOR WITH FMT BIT = 0
:gxw,ma)
‘S,’fi# 58'1' c.YachuTJv IN CS1

MOV

#160017,R0
0

;STORE TRACK AND SECTOR
:GET THE CYLINDER ADRS

MOV
MOV
MOVB
MOV
JSR
MOVB
JSR
MOV
EE:E

000001
177776
000001

000007

P.DTS(RE),RI
P.B10(RS) RO

PAGE 180

MOV

017772

K14

12:16

BIC
ASR
ASR
ASR

002714

81 1
1
oooog;
11
0001
0127
000000
7
040316
112765 000125
004737
0316
013712
017770
8032;% 000200

SAVREG

MOV
MOV

16001

4
vEed
3
044604
0O4M612
4elb
2

10-JAN-78

READ HEADER O ROUTINE

RDHDO:

3538
3239
3600
9535
3t
9603
9604
9605
%

9608

MACY11 30A(1052)

000027

001200

000016

000023

001200

ggooas

Al g ooun

044776

0450

012737

005337

000002

001174

I I 22 222222222222222222222222122223223223232222232232222222222
22

&R
MOVB

001176

001200
010000

|Oii7e

G&tPkAD: MoV

hRAR REGIRTRRS
O e

MOVB

P.DTS(RS),SREG? :STORE THE TRACK AND SECTOR
p.or;mnsa,snscé

TST

1§:

BR
BIT

001200

2%:

BR
MOV

001176

W4S:

P.DCYL(RS),SREGS ;GET CYLINDER NUMBER

BEQ
MOV

SREG

SREG?
;
5
8CFMT,P.CS1(RS)

2
#19.,SREG?

33
#21.,SREG?

DEC

$REGS

MOV

82, SREGE

:ADJUST THE ADDRESS CONTAINED IN

;mgngxm :;:cxsrsns FOR THE AUTOMATIC

SEQ 0458

SEG 0179

C%RSHDO RKE11-/06 SS VERIF 1

10- JAN -78 1 1:48

CZREMD.P11

L14

MACY1l 30RA(10S2)
10-JAN-78
12:16
GET PACK ADDRESS ROUTINE

PAGE 181

Se4Y
WG

Slekis)
947
48
G549

CEREBERRENE RN

045012
8:
B
2

001174

MOV

842130

45134
045136

N
o

001176
001200
001200
001200

23%:

RN R RN

R R RERERRRERERRER R RN ERRRRERRRRE RS

P.DCYL(RS), SREGS cousrnucr EXPECTEg

P.DTS(RS),R1 oestaso YLINDER & xneg TRACK
2174377 ,R1
: CLEAR a# BUT TRACK

ASR
ASR
ASR

R1
Rl
R1

MOV

P.DTS(RS),SREGE
;

BIT

#CFMT,P.CSI(RS)

BIC
ADD
BIS

000016

o8 Gisiod
2
0M5116
04S124

NN
oor

S034
36

B Riat

967
9674

B(DEXH: SAVREG

BIC

967,

TRACK AND SECTOR REGISTERS TO DETERMINE

: #WHICH HER%%TI=2
EXPECTED. LOADS EXPECTED VALUES IN SREGS, &, AND
l? FOR REP

9670
9671

BUILD EXPECTED HEADER

: #USES DESIRED CYLINDER,

9653
954
965S
C1)
965
96
9659
9660
366

*4BTTL

0
O
o
Cfig

350
%!

H R 2 222222222222 2222322232 2222222222222 2222232222222222222232222 23

BIC

SREGE
, SREG?

BIS

1,SREG?

RESREG
RTS

1 ssr SET THE HEADER FORMAT

8177740, SREGE
5 na ALL BUT SECTOR
R1, SREGE
n
TRACK AND SECTOR TOGETHER
#1%0000, SREGe ; INSERT BSE BITS

w5 :;fiE&?
ngg
BIC

;n
s;c R. suxrr THE
TRACK
{OVER TO CONFORM TO Henosn FORMAT
:CHECK THE FORMAT BIT AND

$REGS Rl
PC

; COMPUTE THE HERDER VRC

SEQ_Q4s9
SEQ 0180

CZREMDO RKB11-06 SS VERIF

CZREMD.P11

MACY11l 30A(10S2)

10-JAN-78

MLl4

12:16

PAGE 182

RK611/RK06-RKO7 UNIBUS DRIVER FOR SEQUENTIAL OPERATIONS (REV.

10-JAN-78 11:48

.SBTTL

%76
9677

RKB11/RKO6-RKO7 UNIBUS DRIVER FOR SEQUENTIAL OPERATIONS (REV.

. %GHT
$
Sfiagznmb
(?
1977

iflUTHOR "ROY’
.SBTTL
o 3633000

2020 2OREEEF £R5S

305!

003060
003100

0030Se

003042

177776

883018

30 0

0000 00 0000 00 00 00 00 00 000 00 000 00 00

000 060000 3 00

2 2T S

00 0 0

RERCYFIRE semmmfoafimflsw‘;&;
NIN FOR.

§W0MT
E
g
g
g
t
e
f
g
n
.
uc
nf
Ez
g"
ON
SS
fi
u&#t‘_
DETERMINED BY

ME. THE TIMER COUNT

i?“&«%fifi?”xfi“%’r&s"fi"&6"&%42’&&0
R Commano
DEVICE STATUS

TIME-OUT WILL BE

fli DRIVER WILL USE Tl-E LOCQTION H H!N AS THE NUMBER

MILL ISECONDS

SPIN)LE COMMAND.

Uk!? OPERRTm THE WATCH-

TIMER WILL

LIHI?R}XSR
HIL&Tfis
TFE LOSRTIM H SEC
RS THE TIME

HRTCH
08
TIONS SIMULATEOUSLY. FOR SEQUENTIAL
OPERATIONS ONLY ONE OPERATION WILL BE WATCHED.
v

****#**3#****..*#.

D
0 0
O WO
DO
NNNNNNN

65?77‘

*WATCH-DOG TIMER

THE WATCH-DOG TIMER DOES A PSEUDO-TIMING OF RKOB-RKO7 UNIBUS

*.#**#*-l‘l

MIVINININI
I NI NI NINI
G MININI I B RN EE I

R e BEE -

JSR
RETURN

OTHERWI
BY LOCR

PC,W.WTCH
IF NO DRIVE ORDER EXCEEDED ITS TIME LIMIT

RETLRN TO THE

'.Efl

RPPRO IATEPMNE

Tfl US REGISTE

ROUTINE ADDRESS
CMDTO FLAG
OF THE

OCK WILL BE SET.

5 300000600 00 0600 00 000 00 00 0000 06000 00000 30 0000 06 2 030 00 303 0

30 03

00 0

W.WTCH: nog

RS,-(SP)

§ VE
RS Tg
ON
§TRCK

LwTiR

BEX&@WLEE:EMW?HEE

BNE

TACK
TACK

MOV
TSTB

W.MILI,W.MTIM
g TIME

Rsmnm.xzs nxu.xsscono TIMER
,cm-:c ;
IVE IS BEING TIMED

DEC
BNE

u.an'
208

80n ?
bgcgefigsfi
:RETURN IF NO uns our

BEQ

i NO

SEQ_Q4&0
SEQ 0181

0.10)

RKE11/06

9732
;g

P11

04S216
04S222

RIF

?3- gu- 8 11:48
105037
013705

003100
003112

MACY1l 30A(10S2)

¥WATCH-DOG TIMER
CLRB
MOV

97 8325""34 020537
osan; 003054
000100 000014

BIS
CMP

Ega

Jg O04S240 001002

9740
mgg:o.z
oosg:p 003054
g7y
83
gou S’ 050522

974

9743
3744

3745
97
9747

5252

gsgs
5262
045264
045266

012637

gxsgog
1260

012604
012605
000207

177776

10-JAN-78

BNE
5§

208

CLR

JSR
MOV
MOV
MOV

MOV
MOV
RTS

N14

12:16

W.TIME
PBLKT,RS

PAGE 183

;RESET TIMING INDICATOR
;LocaoT
R S OF xmxmmtrza BLOCK

s“sso éxaz
|

#CMDTO,P.PRST(RS);cF%cx
;SE gm&
IMEognmnc
OUT FOR
gr ongsa

0.WAIT

RS,0.WAIT

PC,R. ABNL
(SP)+,PS
(S5P)+.R
(5P)+.R

(SP)+.RY
(SP)+.RS
PC

iNO, DO uorcénfipLursLsrsla&x‘nm FOR

5cu.$nn
WAIT FOR COMMAND COMPLETION
:BRANCH TO ERROR ROUTINE
;REST

;ngro
REST

*RESTORE RY
'RESTORE R
‘RETUR

CZREMDU RKB11-06 SS VERIF 1
CZREMD. P11
10-JAN-78 11:48

B1lS

12:16 PAGE 184
10-JAN-78
¥RKOB INTERRUPT SERVICE ROUTINE

MACY1l 30A(10S52)
SBTTL

SEQ a4 & e
S E v} ol 83

#RKO6 INTERRUPT SERVICE ROUTINE

RRR
R AR AR AR R R AR RRRRRERR
RN R RR R R R R AR ARRRRFRRR
CEREEREEEREERERRRERRR

THE FOLLOWING SERVICES:

m
o2
<

SERVICE PORT _WARS SEIZED BY OTHER PORT
ggéVE S WAIT FOR_COMMAND COMPLETION
ITION NG COHPL TION
OHHQND IF DRIVE WAS RELEASED

alfl

-‘!JND—

Nt et
Nt

D ngg DRIVE R.

QUIRED

uso RKO6 DRIVER.

THE COMMAND WILL BE ISSUED

THREE LINKS ARE PROVIDED TO THE DRIVING PROGRAM.
THEY ARE:

1.) A.NORM ADDRESS OF NORMAL RETURN (SUCESSFUL COMPLETION_ OF COMMAND)
2.) A.ABNL ADDRESS OF ABNORMAL RETURN (UNSUCESSFUL COMPLETION OF COMMAND)
3.) A.CONT ADDRESS OF CONTROL ERROR RETURN
FOR NORMAL AND ABNORMAL RETURNS, THE ADDRESS OF THE APPROPRIATE
PARAMETER BLOCK WILL BE IN RS.

FOR THE CONTROLLER ERROR RETURN,

THE LOCATION E.CONT CONTAINS

THE REASON FOR THE CONTROLLER ERROR.

ROUTINES USE

-o

{71]

ZOVO
cCo

I I K K i K K *****#****
B i I B R R K R
i

THIS ROUTINE WILL

AN_INTERRUPT,

UPON RECEIVING

PERFORM ONE

CST?
.STR
. ISSU

R MK

THIS ROUTINE WILL SERVICE ALL RKOB INTERRUPTS.

B B

e T
L T TR T

.INTR: MOV

MOV

MOV
MOV
MOV
MOV

[

e b
e
b

045326
045334

003036

CREEREEEEERR NI

e e

I.CCLR

000010
001000

003002
003002

100000
0S0s46e

0030s2

MOV
MOV
BIT
BEQ

BIS
JSR

RS, -(SP)

RY.-(5P)

R3,-(SP)
R2,-(SP)
RI.-(5P)
RO -(5R)

R AR R RN RRRRERRR AR

:STORE RS ON THE STACK

:STORE R4 ON THE STACK

;STORE R3 ON THE
R2 ON THE
:STORE
RI ON THE
:STORE
:STORE RO_ON THE

STACK
STACK
STAC
STACK

‘LOAD R2 TO ADDRESS RKO6 REGISTER
RKBAS, R2
RKCS2IR2),T.CS2 ;STORE CS2
:CHECK IF MULTIPLE DRIVE SELECT
#MDS, T.CS2
18

SE.MDS,E.CONT
PC,R.CONT

INO,

CONTINUE

PROCESSING

:SEY MULTIPLE DRIVE SELECT
:REPORT ERROR

CZREMDO RK&11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

04S340

000137

047s20

105737
001410

003074

102037

s pe
e B

485137 8282

Bt Bt Bt

032737
001413

9854
985S
3858
9859

003002
177770
003112

848537

¥RKO6

18:

003002

003000

0012
0001

003020
003020

032737

164000

003002

874887

000014

003016

032737

125700

003016

105037
1

000010
0S0s46e
047520
D0

0030s2

o4ss2e

052765

010000

O4S534
Q4S5S40
O4S544

00S037
004737
000137

003054
0S0se2
047520

O4SSS0
045SsY4

01370S
001002

003054

045556

000137

046502

o4ssee

C13704

003002

1STB

1.RTRN
I.ISRL

; RETURN
cnccx IF INTERR PT OR RELEASE

BMI
CLRB
BR

5§
I1.ISRL
1.1G0

;

5%:

CLRB

§.1 RL

: CLEAR E g

BIT

SNED!UFE,T.CS2

;CHECK rgn
on- XISTENT DRIVE OR
i
UNIT
s
ROR
;NO
WRIT
ounL ACCESS INTERRUPT
RY r
onxvs NUMBER

IMP

75:

-ATTN

CHECK IF DRIVE AVAILABLE

Htcxé‘
RELEASE COMMAND
vss
FLAG
con?xnuePROCESSING INTERRUPT
:GO PROCESS

DRIVE ATTENTIONS

BIC
383

lfc hvnsx> RY xss onx
Ex tgg) T.CS1

T¥ERAC

ron“89§$33 REPORT
hSSSaIW cs1

MOV

RKDS(R2),T.0S

;STORE STATUS REGISTER FOR COMPARISON

BNE

1.100

INO, CONTINUE PROCESSING INTERRUPT

T
BIT

#DRA, T.D5

cugg;rxr DRIVE SEIZED BY OTHER

:CHECK IF ANY DATA rnnusren ERROR EXISTS

BIT

#DLT!WCE!UPE'NEM, T.CS2

0
fixfncnz)
T.ER

ngs
;

108:

’ 18:

1 14
1 12

SEQ Q463
SEQ 0184

001407

052737
00473;
0001

PAGE 185

BEQ

BEQ
MOV

ClS

12:16

INTERRUPT SERVICE ROUTINE

IMP

001041

BBD
DB DDDD BB
8

sgsseases§§838 REOR BORRERRE

137
e
01370S

010400

10-JAN-78

30A(1052)

003074

000473

DONOC
N EWN-0O

DD
DD DD DD

ggBSER
BB

3804

MACY11l

finsaERROR
Sscxsrsn

118

BIS

JSR

€. uonr .CONT
XPECTED DATA TYPE ERROR
PC.R
:gpggueRson

CLR
MOV

u.ogv
PBLKT,RS

CLR
JSR

0.WAIT
PC,R. ABNL

Cngs
unxrcgnnnga RSHAL $xou
xnoz E ABNORMAL TERMINATION

MOV
BNE

0.WAIT,RS
23

,LonoPQRRHETER BLOCK ADDRESS INTO RS
;stEo
WAITING PROCESSING

MOV

T.CS2,RY

:STORE RKCS2 FOR DRIVE NUMBER

IMP

CLRB

IMP

2%:

ATE

BEQ

IMP
1.100:

;§

cuecx FOR DATA_ TRANSFER ERROR TYPE ERROR
BIT
#DCK!OPI!WLE!COE'HVRC!BSE'ECH, T.ER

BIS

000014

;

3 hrnn

W.TIME

;NO,

WAIT FOR RELERSE OF RKO& DRIVE

STORE REGISTERS

THIS
DRIVE
};uc §§HEEE?°"
*nxs DRIVE

r TIM

#DRVSZD, P. PRST(RS)
;
IVE
ssxz;ngn -

I.RTRN

1.ATTN

Rcsrons REGISTE

INO, ghoggs 3$§E *xgu

3860

0YSSEE

9864

ESRERBPTT®!
1 78-FAn"5
042704

177770

861301
78 000000
a51062

000000

Jisioe

000137

RIF 1
B 11:48

000164

D1S

YL 06U} b 0BT EBrviRE RouTIRE 108
BIC

3%:

046150

00S037

A e

100000

052765

000010

004737
00040S

0S0170

108:

003000
003000

(=]

—

unn
N

38 HOnEdd T2 g2
§48
2 i&
S
§9 ALY

y
9
Z

o
(=]
o
one

R RGL L
- Sh
Pt Bt Bt Pt e Pt

\D:BD:0:0:0

nLw-0

003000

85783
010400

P.DRVN(RS) ,R4

-CHECK IF_DRIVE NUMBER IS EXPECTED

co EXECUTE SPECIAL HERDER SEQUENCE

a.ugsr

;CLEAR WAIT FOR COMMAND COMPLETION

i
9ok
s;gg RO,
RKCS1(R2),T.CS1
nTus Rscxsrsn 1

I.ERR

RETURN

;SET UNEXPECTED ATTENTION

; STORE CONTROLLER STATUS

:STORE PATTERN AND POSITION INFORMATION

g(né) P. EPQ*( E:ET& EWTR“LERSTATUS
p
RKE
RKE?PS&RS)PEPOS(;g §83§EOELE POSITION
T CSl P.CS1(RS)

GET

OR RKCS1

SNED! UFE,P. csatns)chgsgr
:C
xgggga NON-EXISTENT DRIVE OR

RO, I.STAT
Ss$

0s0274

0030se

PC,1.CSTS

000020

55¥32£Rgg STERS

I.ERRA:

I.ERR:

003015

c&flir vz RTT NTION SET

SUEXATT,P.PRST(RS)

0000e2
000060

003101

gfl

15%:

I1.ERRC:

003000

1.HDAL

1hrnn

000016

829828

cRgaLHo,P. CHND(RS)
cufigc *F

NORH

000014

CON INUE

NO, 'DRIVER

KASO (Ra>
{g;

883137 go9ER:

57é§

;MASK OUT UNNECESSARY BITS

zCERR T.c81

3014
3015

00190;

#tC<DRVMSK>
,R4

3%
000001

SEQ_Qu4e4
SEQ 0185

GRgSRRERIVE STATUS
E

'BRiC&Rg

kggflesg"eEDCLERR

PC,R.CONT
I.RTRN

nsponr CINTROLLER ERROR
1GO RESTORE REGISTERS

Ig.DSC,T.MR2
3

HgCK IFDR}VE ?TQTUS CHANGE CLEARED

®E.DPAR,E.CONT
PC.R.CONT
I.RTRN

;SEY DRIVE PARITY ERROR
;Inoxcnrs CONTROLLER ERROR
i RETURN

RESET
INTMSK, T.ASOF+1 ;cuzcx r nrrsnr;ou
2%
iNO
ICAT
RROR
8E.CLAT,E.CONT sst ATTENTION DID nor RESET

0S0S46
047520
040000

003024

2%:

000040
001000

000014
003026

3%:

002000
0S0sS46e
047520

003052

WITH CLEAR

#DRVDSC, P. PRST(RQQETHSSC
DID NOT CLERR
#S.PAR,
T.MR3
cut
K
IF
DRIVE
PARITY ERROR
S
:
xn?xcnr
nonnnL TERMINATION

CZREMDO RKE11-06 SS VERIF 1
991

991
991

000020

000014

020000

003024

020000
003101
003064
047520

000014
003100
003114

ELS

30A(10S2)
12:16 PAGE 187
10-JAN-78
#*RKO6 INTERRUPT SERVICE ROUTINE

Ss:

.SBTTL

000000

003000

100000

003000

BIT
BNE

I.HDAL:

JSR

hrnn

IMP

1.RTRN

;GO RESTORE REGISTERS

ABNL

¥READ ALL HEADERS

MOV

BEQ
CLR

8
S

#ORVHRD,P.PRST(RS) ;CHECK IF HARD DRIVE ERROR
108
s YE
co REPORT ERROR

#S.PIP, T.MR2
:CHECK 1 gnévs ss CYCLING DOWN
10
:NO, REPOR
RRO
8E.UNLD,P. PRST(RQ):SET oaxvs
UNLORDING
INTMSK,W.T
:SE}Y UP
8 SECONDS FOR DRIVE TO CYCLE UP
W.B8SEC. W .onv

BIT

;GO REPORT ERROR

:GO RESTORE REGISTERS
INTERRUPT SEQUENCE

RKCS1(R2),T.CS1

svons csx TO CHECK CONTROLLER

#CERR, T.CS1

cnccxué gnrno
ER ERROR

0.WAIT

;CLEAR WAITING FOR COMMAND COMPLETE

ENTION

CLRB

W.TIME

JSR
JSR

PC,1.85T1
RO, I.CCLR

MOV

RKASOF (R2)

:NO,

CLRB
CLR
JMP

W.TIME
W. DRV
1.ERRA

;Rsssg TIMING ?u DRIVE
gg COUNT
T
ICLEAR
:GO REPORT ERROR

MOV
MOV
MOV
MOV

Hon.nsén1
RKDB(R2),
(R1)+
RKDB(R2).(R1)+
RKDB(R2) . (R1)+

;GET
:GET
;GET
;GET

BNE

35§

:YES,

CLR

MOV

000016

RESET TIMING ON
o1E

-DRV

TIME ogx
T.CS1,P.CS1(RS) CLEAR
;ST Efinon
E

ST
:CLE

IésTRN
PC,R.ABNL
MP
I.RTRN

003014
003015

Ss:

BITB

CLR

73:

003002
003002

114
803
003100

§§000
762

0003

000026
003000

003026

0000s6e

SEQ_Qu4esS
SEQ 0186

aér
BEQ
BIS
MOVB
MOV
JMP
10%:

0s0sz2z2
047520

288
:8:8
W
Ro

9921
992
992

10-JAN-78 11:48

5 YX8RoR8 n

G §¢,§
53 F258EES9

CZREMD.P11

MACY1l

MOV
MOV
BIT

o
k

I.RTRN

CHECK IF

:CLEAR WAITING

W.DRV
W. TIME
$3 RKHRI(RE)

.CS1

sSu

ALL HEADERS

COMMAND COMPLETION

MAIN MEMORY RDDRESS
FIRST
OF HEADER
SEC
OF HEADER
THIRD WORD OF HEADER

R1,HDR.AD
:ST
RKk&S2(R2),T.CS2 ;ST
g
#DLT,T.CS2
: CHECK

MOVB

ATTENTION IS SET

,T.ASOF ;STORE ATTENTION SUMMARY

0.WAIT

HDR.CT
258
0.WAIT

JSR

%fig
cn?E
nss*oas
REcxsrsns

INTMSK, nT sor+1 ,cflsc IF DRIVE

DEC
BNE
CLR

CLR
CLRB
MOV

ONTROLL R REGISTERS

gs FOR
NEXT HERDER
CHECK FOR DATA LATE
DATA LATE

REPORT ERROR

:DECREMENT NUMBER OF HEADER YET TO READ
(IF
32 GO ¥§
NEXT READ HEADER
;CLE
R WAI
FOR COMMAND COMPLETION

:CLEAR
TIME OUT COUNT FOR_THIS onx
VE
:CLEAR WATCH DOG TIME ON THIS DR
:LOAD
MAINTENANCE REGISTER FOR sscron COUNT

:LOAD
EC
MMAND
COUNT
SECTOR
:GET

:ERROR RETURN

r.nn3,9.911<n5) :LOAD SECTOR COUNT

CZR6MDO RKB11/06 SS VERIF 1
CZRE6MD.P11
10-JAN-78 11:48
9972

6404

410

000137

047520

9975

g:s

016562

000002

000020

397
gg;g

:430
046436

115552
042765

000007
165777

9980
338

Q46444
S:Fusa

112765
016562

000125
000016

gg;a

004737

MACY11l 30A(1052)
10-JAN-78
12:16
PAGE 188
¥READ ALL HEADERS INTERRUPT SEQUENCE

050534

JSR

PC,R.NORM

MOV

P.CYLN(RS),RKDCYL(R2)

017
000016

MOVB
BI

P.CSIH(RE) 'P.CS1+1(RE) ;STORE BITS 8-1 s or cS1
l?CsCDT!CFfiT),P.CSIé;?&E.gLsgfl ALL axrs EXCEPT FORMAT AND

000016
000000

MOVB
MOV

$RDHEAD,P.CS1(RS) ;STORE COMMAND ISSUED
P.CSI(RS),RKCS1(R2) ~; ISSUE READ HEADER

IMP

7;422 016562 000004 000006

25%:

3 :
460 000137 047520
445%
S:gusw
737 000400 003052 358:
EEEL
472
004737 0S0546
39
046476 000137 047520
gggg

.SBTTL

MOV

JMP
BIS
JSR
IMP

046502

016237

000000

003000

I.ATTN: MOV

9992
ggga

(046510
046516

032737
001441

100000

003000

BIT
BEQ

046520

032737

164000

003002

BIT

3335

;.g;
399

19#.:99

9998

046530

046526

001007

016237

000014

003016

igggg

046536

032737

125700

003016

iooou

046544

001407

10007

046554

004737

0S0546

10010

046564

013704

003002

zooxg
10013
iggig

046574
046600
O46604

105037
5037
013705

003100
003114
003112

13351

I.RTRN

; INDICATE _NORMAL TERMINATION

'RESTORE REGISTERS

1.RTRN
os DLT,E.CONT
cb T
1k

,Rssrbas REGISTERS
;SET
gnrnLATE WHILE UNLOADING HEADER
:REPORT ERROR
{RESTORE REGISTERS

RKCS1(R2),T.CS1 ;STORE connnuo AND STATUS
#CERR, T.CS1
13

cutcx IF CONTROLLER enaon OCCURRED
iNO, CHECK IF ATTENTIO

iCHECK IF ANY DATA TRRNSFER TYPE ERROR EXISTS

BNE

;

13335 Q46546 052737 000010 003052 1§:

igggg 046560 000137 047520

#DLT!WCE' UPE!NEM, T.CS2

; INDICATE ERROR

MOV

RKER(R2),T.ER

;STORE ERROR REGISTER

BIT

#DCK'!OPI!WLE!COE'HVRC!BSE'ECH, T.ER

BEQ

JSR

IMP

hrnn

JRESTORE REGISTERS

MOV

T.C

;SAVE €S2 FOR REGISTER NUMBER

CLRB
CLR
MOV

W.TIME
W. DRV
PBLKT,RS

:CLEAR WATCH DOG TIMER
RESET TIMER VALUE
:STORE PARAMETER BLOCK ADDRESS IN RS

CHECK FOR DATA_ TRANSFER ERROR TYPE

BIS

;NO DATA TRANSFER ERROR

oz UDAT,E.CONT ;SET UNEXPECTED DATA TYPE ERROR
C.R.CONT

:REPORT ERROR

10011 046570 042704 177770

2%:

10016
10017
iggig

046610

042765

000006

;
:

}8359

046616

000137

045712

10022

046622

032737

040000

003000

58:

BIT

BNE

JMP

10026

046636

016237

000016

003014

6S:

MOV

Rknsortne) 1. nsor

10023

iggag

10027

Sfi- 30

166

046644

ggxog;

105737

047520
003015

000014

:LOAD CYLINDER aooaess REGISTER

P.SECT(RS) | RKDA(R2) Lbno SECTOR ANDT

*DRIVE ATTENTION SCANNER

9990
9991

SEQG Q466
SEQ 0187

BIC

sfc<okvnsx>,nq ;STRIP OFF JUNK

CLEAR DRIVE POSITIONING AND DRIVE POSITIONED FOR DATA TRANSFER
IN PROGRAM DEVICE STATUS REGISTER
BIC
#DRVPOS ! DRVPDT,P.PRST(RS)

JMP

TSTB

I1.ERRC
#DI,T.CS1

I.RTRN

T.ASOF+1

;GO REPORT ERROR
cuscx IF ANY DRIVE ATTENTION

1YES,

PROCESS INTERRUPT

Resfone REGISTERS

:STORE ATTENTION SUMMARY

CHECK IF ANY ATTENTIONS SET

CZREMDO RKG&11-/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

046650

001007

G1S

MACY11 30A(10S2)
10-JAN-78
12:16
¥DRIVE ATTENTION SCANNER

10028
10029

Q46652

052737

000002

003052

10033

046670

133737

003101

003015

10039

046716

013705

10030
6660 004737 0S0S46
igggé
g:bsau
000137 047520

10038
Oueso8 095997
o4 003052
10036
835382
004737
828845
i:ggs O9¥e712 000137 047520
188“0

10041

10042

046734

§Es

001402

003112

820088

iooqa

046736

000137

047420

10049

046750

uosos;

000026

046762

004037

047620

000014

BNE

BIS

7§:

8%:

13835 Q46742 042765 000002 000014 118:
1

10048

O46754

112737

1
10050
OuE738 013368
10051 046776 032765

10052
ioosa

047004
047006

001401
000461

000001

003026

000200

003000
000042

10055

10061

837 44

004037

047620

00000S

003000

10064
10065

047052
7060

013765
3765

003014
003101

000032
000033

000020

003052

1006

7050

112737

047520

10066
10067
10068

7
047070

igg;g

047102

047076

004737

10072

047106

013765

032765

040000

000040

10075
10076

047122
047124

001404
0S2765

000040

000014

10079
10080
10081

047134
047140
047144

105037
005037
0049737

003100
003114
0S0S34

10069

138;3

igg;g

igggg

097114

047132

047150

1407
737

000137

000407

0G0S63

13%:

BIT8

INTMSK, T.ASOF+1 ;CHECK IF DESIRED INTERRUPT

BYe
JSR
IMP

MOV

15%:

118

JIMP

: STORE PARAMETER BLOCK TABLE

:STORE DRIVE NUMBER

#E.UNLD,P.PRST(RS) ;CHECK IF DRIVE UNLOADING
:NO, ' CONTINUE

I.UNLD

:SERVICE DRIVE IN POSITION AFTER ERROR

CLR

RKMR1 (R2)

;CLEAR MAINTENANCE REGISTER 1

JSR

0,1.1S5u

:SELECT DRIVE WITH ATTENTION HIGH

BIC

#DRVPOS,P.PRST(RS) :;RESET DRIVE POSITIONING
#DR.SEL,T.CS1

;LOAD COMMAND

MOV

Moy

T.MR3,P.BOO(RS)

MOY
(5
BR

& Ber sR00TRS) SLReCK
FOR DRIVE STATLS CHANGE
oo
ol RO ee
1.RERR’ ~
: PROCESS Eggon

MOVB

STATUS BYTE 00 MESS B
1:STORE
ERBRe STATUS

#5.FLY,P.BOO(RS) " ;CHECK IF DRIVE FAULT
12%
;N0, CHECK FOR DRIVE STATUS CHANGE
I.AERR
: PROCESS ERROR

#DR.CLR,T.CS1

;LOAD COMMAND

JSR

RO, 1.1S5U

MOV
BITB

T.ASOF ,P.ASOF (RS} ;STORE ATTENTION SUMMARY
INTMSK . P.ASOF+1 (RS} ;cuscx IF ATTENTION RESET

JSR

PC,R.CONT

1.RTRN

:RESTORE REGISTERS

MOV

T.MR2,P.A00(RS)

;SIGRE MAINTENANCE REGISTER 2

BEQ
BIS

16%
'YES, CONTINUE INTERRUPT PROCESSING
#DRVDSC,P.PRST(RS) ;SET DRIVE STATUS CHANGE DID NOT CLEAR
1.AERR

; GO’ PROCESS ERROR

CLRB
CLR
JSR

W.TIME
W. DRV
PC . R.NORM

;RESET TIMING ON THIS DRIVE
:CLEAR DRIVE rgnxnc COUNT
'REPORT SUCCESSFUL COMMAND COMPLETETION

BIT
BR

168:

PBLKT, RS

BEQ

BIT

:GO REPORT ERROR
:GO
RESTORE REGISTERS

o UATT.E.CONT 'SEP’
NS0l TORTED
ATTENTION
Pc'n.cofig’
;GO
gEfi%S%
ERROR
1.RTRN
:GO RESTORE REGISTERS
P.onvfitng) RY

IMP

000040

I.RTRN

MOVB

BEQ
BIS

047520
003024

PC.R.CONT

I.RTRN

050546

:YES GO PROCESS INTERRUPT

;SET NO ATTENTION IN ATTENTION SUMMARY

IMP

BIT
BEQ
BR

10026 Qu7pie DAS7eS Q03023 OOOCHD 128:
B
B IR L o
igggg 8:7353 000446

7%
8E.NOAT,E.CONT

SEQ Q467
SEQ 0188

JSR

MOVB

000042

PAGE 189

158
#E.CLAT,E.CONT

;CLEAR on*vz STATUS CHANGE
:

:YES, CONTINUE INTERRUPT PROCESSING
;SET ATTENTION DID NOT RESET
i
"WITH DRIVE CLEAR
:FLAG ERROR

#5.0S¢,P.ADO(RS) ;cgEgETxr DRIVE STATUS CHANGE

I.RTRN

:RESTORE REGISTERS

CZREMDO RKB11-/06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

10088

000004

105037

003100

veeed)

s e Bt
e

CLSB
000016
003000

JSR

1.RTRN
MOVB
JSR
I.RTRN
giTe

000014

2%:

003024

000014
003100
003114
10%:

0sosee2
047520

.SBTTL

047466
Q47474
047476
047504

032737
001403
052765
108037

020000

000014
003000

003101

003015

000020
0S0s46

0030s2

040000

003024

000040
003100

000014

I.UNLD:

20%:

GURRENT
CONTROLLER STATUS

.C52'P.

T.SA,P.

(RS)

T.DA.P.DTS(RS)

T.D0C.P.DCYL(TMS)

T.RSbF,P.RggF{RS)

T.ER,P.ER(RS)
1.0S.P.DS(RS)

RO, I.STAT

;GATHER DRIVE STATUS

BIS
JSR
IMP
BIT

#DRVHRD,P.PRST(RS) ;CHECK IF AHARD DRIVE ERROR

#DR.CLR,T.CS1
RO, I.1S5u

BNE
BIT
BEQ
BIS

MOVB
MOV
JMP

:YES, REPORT ERROR
108
:CHECK IF DRIVE IS UNLOADING
os PIP, T.MR2
:NO, REPORT ERROR
10
UNLOARDING DUE TO ERROR
#E. UNLD,P. PRST(RQ) -s; ?fi&
INTHS
K,W.TIME
;SEY"TIM
THIS DRIVE
W.BSEC, W.DRV
:LOAD 8 SECONDS FOR CYCLE UP TIME
1.RTRN
:RESTORE REGISTERS

JSR

PC,R.ABNL

IMP

I.RTRN

; REPORT ERROR

iRESTORE REGISTERS

¥ERROR CAUSING DRIVE TO UNLORD

gxea

RugLo gg§7(n5) ACLERRDRRIVECUNLORDING BECAUSE OF ERROR

MOV
JSR

oe CLRT E.CONT
CONT

38 ? §UE o&xvs ELERR
{gsrnu8 &ss
IF ATTENTION CLERRED
RSO¢+ C CK INUE
BITB INTMSK(RY),T.
158
BR

15%:

gasT.¢81° s

:ERROR
RETURN
;LORD
COMMAND
:CLEAR DRIVE ERRORS
: ERROR RSTURN
INTMSK, T.ASOF+1 cuecx I nrrsnrrou RESET
E; # ? ERROR
2
ATTENTION oxo NOT RESET
8E.CLAT,E.CONT s
PC.R.CONT
: REPORT ERROR
I.RTRN
:RESTORE REGISTERS

BEQ

0030se

o e

Www
DN

TT.WCR.P.WCR(RS)
S§é'F Eg (RS) srofis 83 RSLLESEREGISTERS

MOV
MOV

003015

CLEAR EB?%SGDFSRTT”IS DRIVE

MOV

003000

SDRVPDT,F. PRST(RS) pESSTP?g&uggfllflc IN PROGRESS BECAUSE

019¥41 P. CSI(RS$ fiEEP connnug xs§UED

MOV

047460
047464

SEG Qu4es8
SEQ 0189

Skc

grg

MOV

o o

s Bt Bt Bt Bt Bt e Bt e
e Bt Bt Bt Bt e
Bt Bt Bt Bt Bt Bt Bt Bt B

e
e

I.ARERR: BIC

MOV

004737
000137

PAGE 190

#ATTENTION ERROR HANDLER

MOV

0000000000000 000000

Bt Bt e e B

000014

—

FREERLE BBURR L O B0 ® o0 £ w0 DB INA ZoR o

042765

oy o S T o

e Bt

s Bt s Pt Bt s e

s Pt Pt

s e

54 FEVES :

18844

047152

12:16

*ATTENTION ERROR HANDLER

.SBTTL

1888
1B8E"

10-JAN-78

MACY11l 30A(10S2)

BIT

BEQ
BIS
CLRB

h
TRN

¥S.DSC, T.MR2

ssr ATTENTION DID NOT RESET
REPORT ERROR

RESTORE REGISTERS

cuscx xr DRIVE STAUS CHANGE RESET

NT INUE

20%

:YES

W.TIME

Eésr TIMING ON THIS DRIVE

oonvosc P. PRST(RQ) QETonrvs STAUS CHANGE DID NOT CLEAR

nrLrfrfrfrss
OwoNNCNEWN~-0O

0 RKB11-06 SS VERIF 1
.P11
10-JAN-78 11:48

003114

I1S

MACY11l 30A(10S2)
10-JAN-78
12:16 PAGE 191
¥ERROR CAUSING DRIVE TO UNLOARD

CLR

047510

00S037

047520

012600

I.RTRN: MOV

Q47524
0475e6
047530

012602
Clee03
012604

MOV
MOV
MOV

047514

Q47522

047532
047534

004737
012601

012605
000002

0S0se2

JSR

MOV

MOV
RTI

W.DRV

;CLEAR_TIME COUNT

PC,R.QBNL

!REPORT ERROR

(SP)+,R0O

;RESTORE RO

(SP)+,R2
(SP,+,R3
(SP)+,RY

; RESTORE R2
,RESTORE R3
;RESTORE RY

(SP)+,R1

(SP)+,RS

iRESTORE Rl

RESTORE RS
iRETURN

SEQ 04&3
SEQ 0190

CZREMDO RKB11-06 SS VERIF 1
CZRBMD.P11
10-JAN-78 11:48

J15

MACY1l 30A(1052)
10-JAN-78 12:16
¥CONTROLLER CLERR ROUTINE

PAGE 192

igigé

,SBTTL

}8{%3

;;!!lllll!!lllllllll!ll!ll!llllllllllllllill!illl!lllllllllill!!l

10185

10156
10157

THIS ROUTINE WILL BE USED BY THE DRIVER TO CLEAR THE CONTROLLER

Py
iy

10158

AND CHECK IF THE CONTROLLER ERRORS ARE RESET.
IF THE ERROR IS NOT
CLEARED, THE ROUTINE RS SPECIFIEC IN A.CONT WILL BE CALLED WITH

10159

10161

10160

10163
igigg

10166

E.CCLR SET IN E.CONT.
REGISTER

USE

tx
H

R2
RS

ADDRESS OF RKOB REGISTERS
ADDRESS OF PARAMETER BLOCK

‘%CALL

JSR

RETURN

10162

#CONTROLLER CLEAR ROUTINE

eeecases

RO, I.CCLR

10167

igi;&]

: ;lllllllll!llll!!lllll*ll!lllllIllll!!il!ll{-I!lill!&lillil!«l!!}l

igigg

10172

047536

047544
47652

016237
032737

000000
100000

100000

000000

I.CCLR: MOV

MOV
BIT

RKCS1tR2),T.CS1 ;STORE COMMAND AND STATUS REGISTER 1
#CERR, T.CS1
;CH%EERAFEagg;ROLLER CLEAR DID

10176
10177
10178

047560
047562
047570

001407
0S2737
004737

000001

003052

BEQ
BIS
JSR

5%
8E.CCLR,E.CONT
PC_R.CONT

:YES, RETURN TO DRIVER PROCESSING
;:SET CLEAR CONTROLLER DID NOT CLEAR ERROR
‘REPORT CONTROLLER ERROR

igig?

047576

000200

RTS

:RETURN

MOV
MOVB

#1E,RKCS1(R2)
#-1 1.1ISRL

;SET INTERRUPT ENABLE
:SET INTERRUPT ENABLE_ ISSUED

RTS

*RETURN

10173
igi;E

10179

047574

012762

011000

10182
10183

047600
047606

012762
112737

10185

047616

000200

10184

047614

005720

0S0S46
000100
177777

003000
003000

MOV
000000
003074

S%:

TST

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

(RO) RO

(ROJ+

:SET UP ERROR RETURN

‘ADJUST FOR NORMAL RETURN

SEQ Q470
SEG 0191

0D
OU‘

K15

MACY11 30A(1052)
10-JAN-78
12:16 PAGE 193
*COMMAND ISSUED BY DRIVER ssnvxcs ROUTINE

SEQ Q471
SEQ 0192

.SBTTL

,illlfll!lllillllllillllll!lll!l!lllll!llllllllll!ll’lllll!lli!i!

‘¥

ERROR

ADDRESS IN A.CONT.

AND cusc x CONTROLLER ERROR OCCURRED.

‘¥

3
98

ik
; ®

#COMMAND ISSUED BY DRIVER SERVICE ROUTINE

THIS ROUTINE HILL ISSUE THE COMMAND AS specxrxso IN T.CS1

CONTROL HILL

URN

USE

ADDDRESS OF RKO& REGISTERS

mmmm——

‘¥

0 THE nourxns SPECIFIED BY THE
;

-—-

02
03

i%CALL
;¥

JSR
RO, I.ISSU
<ADDRESS OF ERROR RETURN>

07
08

i
;l

;l
x

VIO

0S
06
09

047620

013746

003000

0476

113;37

000000

003002

047652

142737

177753

003001

2§ 047666 1057?5 000000

047660

013762

003000

000000

7672

oo;—

04;700

83?3

047716
047720
047726
047732

001406
0S2737
004737
000440
032737

1S 047624 005037 003002
s;

7674 6o~

eeeccccccccces

I.CCLR

1.STOR

CLR

000010

#$C<B.CDT!8. crnr> -c31+*
-

MOV

ngtnn T.CS1

100000
0S0S46

003052

BEQ
BIS
JSR
BR

024000

003000

176400

832737

131761

0477e4

122716

00000S

BPL

JSR

BIT

NUMBER FOR COMMAND

eEL
CLEAR
errs EXCEPT

T.CS1,RKCS1(R2) rssuc c

gég

047754

BICB

T.CS2,RKCS2(R2) ;LOAD DRIVE

003000

2%:

OMMAND ISSUED

H ?MPORARY CSo

P.CSIA(RS),T.CS1&1;STORE BITS 8-15 OF CS1
RKCS1IR2)

0S0042

;

P.DRVYN(RS),T.CS2 -Lono Iuvgnxvs
NUMBER

MOVB

03273; 001000 003002

—

1.C52’

MOVB

MOV

18:

r cS1,~-(SP)

TSTB

001027
%8?535

I.1SSU: MOV

000007 003001

047742
83;;23
(=)
£
N

- OWwDN

35
36

003002

100000

5? 33771

—

I O

18 047644 116537

ROUTINES USED:

:,lllll!illllllllllllllllllilllIllllllllll!lllliillllillllillllil

28
29
30
gé

ADDRESS OF PARAMETER BLOCK

RETURN

‘¥

xr CONTROLLER

;
.CERR
HIL# BE SET IN E.CONT AND

DD
DD
LLEWWW

leliel

noo nxsxx 0t SS VERIF 1
11
10-JAN-78 11:48

WARIT FOR READY

PC 1.STOR

co ST

#MDS, T.CS2

: Htcx xr HULTIPLE DRIVE SELECT

2%
8E.MDS,E.CONT
PC.R.CONT
108

cuecx 1

con ROLLER ERROR OCCUERED

NO CHECK FOR OTHER CONTROLLER ERRORS
:SEY MULTIPLE DRIVE SELECT FLAG
REPORT CONTROLLER ERROR
:RETURN

iCHECK IF ANY CONTROLLER ERROR IS SET

BIT

#CTO!SPAR, T.CS1

003002

BNE
Sfié

73
;gFE!PGE!NEH!NED.UPE!NCE!DLT,T.CSE

003016

EfiE

;chsorvs:rnrssscusesssancscoszorssopxzocx,r.sn

CMPB

#DR.CLR, (SP)

;CHECK IF CLEAR DRIVE

,
|

MAC

)

-JAN-78

12:16

PAGE 194

C%n'gopfiSII/?S .?gnv;gxfxlue
o 3°“‘6S§Sm %gsuso BY DRIVER SERVICE ROUTINE
T DRIVE
HARD ERROR
14
BIS
SDRVHRD,
P.PRST(RS)
ii%s fifi %%ggg 047536 000" 3%:
BYE
3 I.CCLR
s
RIVE ERRCRCLEAR
‘173? RO,
;60’1sg?
Tmcomnou.sn

i1854?
i
1

18548

14 8657?3.'

7
883258

000100 000000 S$:

{%:Egé” 0S0022 0S2737 001000 003052 7%:
i10253 050030 004737 0S0S46
:
iSS'ég
823832
8?%83
_—
10256 0S0040 000200

MOV
TST

T?T
RTS

BIS

JSR

TST

ngv
RTS

'é‘
(SP)+RKCS1(R2)

(RO, +
RO

25'
ERJ U;cN?ERRUPT B
ENARBLE i
“2"38“ RO FOR

#E.CERR,E.CONT selr)R?%}“g&k‘?&"fi“ DURING
SREPORT ERROR
PC,R.CONT
(SP)+
:ADJUST STACK
(RO),RO
o?rusr RO FOR ERROR RETURN
RO
.RE

SEQ Q472

»sso 0193

CZRE6MDO RKB11-06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

MACY1l 30A(10S2)
10-JAN-78
12:16
PAGE 195
#STORE RK611 UNIBUS REGISTERS

.SBTTL

10257
10258

e e B

;I CALL

TURN

USE

ADDRESS OF RKB11 REGISTERS

s B

PC,I.STOR

e
T ®

THIS SUBROUTINE IS CALLED BY THE RKO& DRIVER TO STORE ALL
RK611 REGISTER IN TEMPORARY LOCATIONS.

i
H

R
&

s Bt o

’

B
Bt B

#STORE RK611 UNIBUS REGISTERS

P’ EEEREREERERRRERRERRERT
RRBRRERRERRRRR AR R R R R R AR AR AR AR RS R AR

080 228
R BR0000S
DD
BRI 2D Theto 3% a W
NN

——

SEQ Q473
SEQ 01

DIREEEEE

R R R R RS R R

003000
003002

I.STOR: MOV
MOV

RKCS1(R2),T7.CS1 ;STORE ALL CONTROLLER REGISTERS
snécs.?(ag) T.cga ;
EXCEPT DATA BUFFER

003020

] 3

R&DS(RE),;.DE

MOV

RKDCYL(R2) . T.DC

00 3852

MOV

3832
003010
00

003030
003032

MOV
MOV
Vv

MOV
MOV
RTS

RKBS(Es):t.ES
DA(R2),T.DA
A

Ex w&):fi.nsor

RKHRS( )'r.mg
»

RKECPS(R2),T.P0S
RKECPT(R2),T.PAT

; RETURN

CZREMDO RKE11-06 SS VERIF 1

CZRE&MD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

10-JAN-78

: 16
12:16

¥STORE CONTROLLER STATUS

PAGE 196

SEQ Q474

SE@ 01935

igsgg

.SBTTL

igsgé

;illllilllll!ll.}lllilll!l"llll!llllll!llllll!llllllllllllll.l!l

18593

102

ioegg

THIS suaaourxnsgx; CALLED BY THE RKO& DRIVER AT PRIORITY 7.

1023?
18%98
10299

#STORE CONTROLLER STATUS

THE FOLLOWING

tx
¥
e

10300
16301
1030

STATUS

STATUS nzcx;rsn
ERROR REGISTER
nrr;nr ON
Y/OFFSET REGISTER

10305

AND

uEHH'HBuur n?cxs*gn
aug
SS
REGISTER
DESI
ngcx AND SECTOR

‘¥
e
‘¥

{gggq

REGISTERS WILL BE STORED:

CYL uoén

i%CALL

JSR

PC,1.CSTS

{oagg

1031
1031
1031
10315
iggig

‘x
(8@
i®
%

iggi;

: ;I!!l!!l!llll!lllllllll!llillll!H-lllllllllillllllllllll!!l{llll

1§3°°
10595

;:
¥

RETURN

RESS REGISTER

THIS ROUTINE ASSUMES THE FOLLOWING REGISTERS CONTAIN:

===

R2
RS

10319

0S0170

042765

177741

000016

I.CSTS:

10323
10324

050212
ogao

016265
oxbesg

10
000002

000020
000022

I.CST1: MOV
MOV

}835?
0S0176
042737 000036 003000
10322
0204 053765 003000 000016

10325
1032;
1032
10328

igflgg

10331

igggg

0226
050234
0242
0250

050256

0S0264

050272

BIC

BIC
BIS

016265
016265
016265
016265

000004
000006
000012
000014

000024
000026
000036
000034

000032

MOV

016265

000020

000030

MOV

016265
000207

00ie

MOV
MOV
MOV
MOV

RTS

#177741,P.CS1(RS)

#36,7.CS
T.csx‘s.ésxtn5)

RKO& BASE ADDRESS
ADDRESS OF PARAMETER BLOCK

;CLEAR ALL BITS EXCEPT FUNCTION

‘cLshas} c°¥¥3“° sggsosrnr
§GENERRT2NESI STATUS inroan3$xou

RKCS2{R2) ,P.CS2(RS)
KWC (R2) ,P.WCR(RS)

:STORE COMMAND AND STATUS REGISTER 2
3
WORD COUNT
REGISTER

RKASOF (R2) ,P.ASOF (RS)

;srgggsg;rznrxon SUMMARY AND

RKDCYL(R2),P.DCYL(RS)

;STORE CYLINDER ADDRESS

RKBA(R2) ,P.BAR(RS)
KDA(RE),P.BTS(RS)
RKDS(R2) ,P.DS(RS)
RKER(R2) . P.ER(RS)

:STORE
BUS
SS
REGISTER
;srogs Besxnso
RACK AND SECTOR
:STORE
DRIVE STATUS REGISTER
:STORE ERROR REGISTER

RETURN

CZREMDO RKB11-06 S S VERIF 1
10-JAN-7 8 11:48
CZREMD.P11

MACY11l

on Ltk (3(3§?3CN3C3CH3¢)
£L
h;d
Krfl (=] DO
NN LW n ::umug
O WD~ T
o

WROLLWWW

SEQ _Q47S

SEQ Q136

THIS suaaourxue WILL as USED TO GATHER onxvs STATUS

BYTE 01

HAS PREOIOUSLY BEEN SEIZED. IT RUNS AT PRIORITY 7.

; #CALL

JSR

RETURN

THIS ROUTINE ASSUMES THE FOLLOWING REGISTERS CONTAIN:

AND

11.

IS ASSUMED

THAT THE DRIVE

.
<ADDRESS ot ERROR
RETURN>

(0]
LW

i3RS;L3Bog
o

197

CONTENTS

RKOE& BASE ADDRESS

ADDRESS OF PARAMETER BLOCK

ROUTINES USED:

1.1SSU

:,lll!lll!lll!llllllllllllli!il!l!lllillllllllllll!llllllllll!l!§
0S0274

012762

000001

000026

MOV

#1,RKMR1(R2)

112737
00403

000001

003000

MOVB

#DR.SEL,T.CS1

000044
000046

MOV
MOV

000026

(=]
£
N

28 &

003000

W
[
[+

o W

3 N

CNDCNDC?;C“DCKD
&%BESY

PRGE

#GATHER DRIVE STATUS

Pt Pt P

Rt
Rt AR o
Jotoi2BAR.

Bl6

12:16

SEEREERRERRERRERRRRRREF
RRRERR RN R R AR R R R R R AR R AR R R R R RR AR RERRRER

’i

—

e Pt et Bt Pt Pt et Pt Pt Bt Pt s Bt P B Pt Pt s Pt Pt —

00000000000
W W ol
WWWWwW Ww

10-JAN-78

#GATHER DRIVE STATUS

.SBTTL

s P
s et ot s o Pt s ot et et
Pt Pt Pt ot ot it et
s Pt Pt P
et Bt Bt Bt Pt Bt s ot s

30A(10S52)

—

c———
-

:LOAD MAINTENANCE REGISTER 1

;

FOR STATUS BYTE Ol

:LOAD COMMAND

%gn

RO, 1~ 1S5u

MOV

T.MR3 P.BO1(RS)
#2, RKMR1 (R2)

:LORD ; ;
REGISTER 1

MOVB

#DR.SEL, T.CS1

LORD COMMAMD

T.MR2,P.A01(RS)

csr srnrus BYTES 01

srons
§$¥H§ BYTE
ox MESS A
:STORE STATUS
BYTE 01 MESS B

;

FOR STATUS BYTE 10

ggn

RO, 1. 155U

EETOSTRT¥S
BYTES 10

000050
0052
000026

MOV
MOV
MOV

T.MR2,P.A10(RS)
T.MR3.P.B10(RS)
#3, RKMR1 (R2)

:STORE STATUS BYTE 10 MESS A
:STORE STATUS BYTE 10 MESS B
'Lono MAINTENANCE REGISTER

003000

MOVB

#DR.SEL,T.CS1

000054
000056

JSR
33
MOV
MOV

003000

MOVB

000040
000042
003026

3
00140?

I.STAT:

CLR
JSR
33
MOV
MOV
BIT
BEG

RO, 1. 1S8U°

T.MR2,P.AL1(RS)
T.MR3.P.B11(RS)

nxnaxtna)

#DR.SEL,T.CS1

RO, 1.1S8U

T.MR2,P.A00(RS)
T.MR3 P.BOO(RS)
#S.PAR, T.MR3

i
FOR STATUS BYTE 1l
;Lono gonnnno

iGET S nr¥s BYTES 11
:ERROR RETURN
:STORE STATUS BYTE 11 MESS A
:STORE sr TUS BYTE 11 MESS B

:LOAD
MAINTENANCE REGISTER 1
;
FOR STATUS BYTE 00
:LOAD COMMAND

:GET STATUS BYTES 00
:ERROR RETURN
:STORE STATUS BYTE 00 MESS A
:STORE STATUS BYTE 00 MESS B
'CHECK IF BAD PARITY DETECTED BY DRIVE
:NO,

RETURN NORMALLY

CZR&POO RK611/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

Clb

MACY11 30R( gs2)
10- JQN-?B
12:16
GATHER DRIVE STATUS

1
7 002000
16331
G288
88
37
885858
103%

0030S2

igg
93

OSOSOS

10395

0SO0S10

000014

103%
igggg

0S0Sle
0S0S20

0S276S

005720
000200

001000

PAGE 198

3%:

IS
328
MOV

.CONT
R-COT"
(Rfi),RO

SS$:

BIS

#PBSVAL,P.PRST(RS)

RTS

TST
RTS

8E. DPQR

(RO, +

SEG Q478
SEQ 0197

;
INDICAT BRD PARITY DETECTED BY DRIVE
REPORT
;LORAD RO ERRO
FOR ERROR RETURN

; RETURN

;SET PARAMETER BLOCK STATUS VALID

{ADJUST RO FOR NORMAL RETURN
:RETURN

CZR&EMDO RKB11-06 SS VERIF 1

CZR&MD.P11

10-JAN-78 11:48

: 333

MACY1l 30A(1052)

10-JAN-78

050522

1059;;

?gggga

R.ABNL: CLge

10405
10406

0S0S34
osggwo

105037
004777

003101
132300

xgsog7
108037
005037
004777

033101
003108
003114
132262

{8385

104
1041
10411
10412
10413

0S0556
050562
050566

000207

PAGE 199

#COMMON DRIVER RETURNS

{oqox

12:16

*COMMON DRIVER RETURNS

.SBTTL

{§§§§ 8?8?53 833207

D16

5ng§KnaNL

; INHIBI;ErggggsngfxggTaggsanupr REPORTING

PC’

:fi"?8

R.NORM: CLRB
JSR

INTHSK
PC, 3A. NORM

,xuuxax FUTURE DRIVE INTERRUPT REPORTING
: INDICATE NORMAL RETURN

R.CONT: CLRB
CLRB
CLR
JSR

INTMSK
W.TIME
W.DRY
PC,2A.CONT
PC

; INHIBIT
rgruns onxv; INTERRUPT REPORTING
; RESE
H DOG TIMING ON THIS DRIVE
CLEAR TIMING COUNT FOR THIS DRIVE
: INDICATE CONTROLLER ERROR RETURM

é?s
RTS

RTS

: RETURN

SEQ Q477

SEQ 0198

CZREMDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

JACY11 30A(10S2)
10-JAN-78
#COMMAND INITATOR

{ggig

.SBTTL

;g:ig

$ 3 FERRRBFPEE PR R B

10418

10419
ig:g?

x
i *

10422

PAGE 200

LR R RS RI SRR AR R LR RSB LB R L LR E R R LR

‘e

READ ALL DRIVE STATUS

18:59

AL LR

L2 X2

THIS SUBROUTINE WILL INITIATE ALL COMMANDS AS SPECIFIED

BY THE COMMAND FIELD OF THE PARAMETER BLOCK.
SPECIAL COMMAND ARE ALSO EXECUTED:

RELEARSE

TE
¥

SEQ Q478
SEG 0199

#COMMAND INITATOR

10423
10424

10425

ELB

12:16

THE FOLLOWING

CONROLLER CLEAR
SUBSYSTEM CLEAR

READ SPECIFIED HEADER

igzgg

THE ABOVE COMMANDS ARE TRANSLATED INTO A SEQUENCE OF COMMANDS

10430
10431

:#CALL
‘¥

JSR
PC,C.INIT
<ADDRESS OF PARAMETER BLOCK)>

{8:35

10434

‘¥

RETURN

FOR THE SEQUENTIAL OPERATIONS, THE DRIVER WILL LOAD THE

ig:gg

LOCATIONS, PBLKT AND INTMSK.

10437

ROUTINES USED:

10439
10440
ig::é

T
¥
¥

1.CSTS
1.STAT
I.CCLR

10438

ig“::a
1044

104
10447
10448
10449
xoago
10451

0570
0S0S72
0S0574
050576

010546
010446
010346
010246
010146
010046
013746

10425
104
10454
10485
10456

0S0610
0S0616
0S0e22
050630
0S0634

013737
017605
062766
016504
2704

10458

0S0e44

116437

10457

0640

: - I 222222222222 222222223222222232332223233222222222332222223222 222224

C.INIT:

177776

003042
000016
000002
000000
177770

000016

003102

003101

003062

003114

010537

003112

10459

0S0eS2

050660

013737

116437

003102

ig:fi

0S0e66

013702

003036

i8:§?
10464
10465
10466
10467
10468

W.WTCH

177776

MOV
MOV
MOV
MOV
MOV
MOV
MOV

MOV
MOV
ADD
MOV
BIC

MOV

MOVB

003100

MOVB

;
:
:
:
:

RS, -(SP)
R4, -(SP)
R3,-(5P)
R2,-(SP)
R1,-(SP)
RO, -(SP)
PS. -(SP)

RKPRI,PS
316(5P) RS
82, 16(SP)
P.DRVN(RS) ,R4
#$C<DRVMSK}
,R4

RS, PBLKT

;STORE
iSTORE
;:STORE
:STORE
;STORE
;ST
:STORE

RS
R4
R3
R2
R1

ON STACK
ON STACK
ON STACK
ON STACK
ON STACK
ON STACK
PSW ON STACK

:LOCK
OUT RKOB INTERRUPTS
: STORE
TER BLOCK ADDRESS
;ADJUST R;TURN
;STORE DRIVE NUMBER
;MASK OUT JUNK
:LOAD PARAMETER BLOCK TARBLE

I.0RV(RY), INTMSK' ;LORD INTERRUPT MASK

1.DRV(R4) W.TIME ;SET WATCH-DOG TIMER FLAG

MOV

W.SEC, W.DRV

;LOAD WATCH-DOG TIME

MOV

RKBRS, R2

;LOAD R2 WITH RKO& ADDRESS BASE

RESET ALL BITS IN PROGRAM DEVICE STATUS REGISTER EXCEPT
DRIVE
IN USE
WRITE FOR WRITE CHECK
NO CHECK
DROP DRIVE FROM TEST SEQUENCE

INHIBIT BUS ADDRESS INCREMENT

CZREMDO RK&11-06 SS VERIF 1
CZREMD.F11
10-JAN-78 11:48

30A(10S2)
10-JAN-78
*COMMAND INITATOR

12:16

PAGE 201

SEG Q479
SF@ 0200

000014

BIC

#1C<DRVUSE ! W. WCK ! NOCHK ! DRPDRV!DTBAII> ,P.PRST(RS)

ig:;q

0S0672

042765

1047

3?875@ gse 00 000016

700

010500

MOV

ADD

RS, RO

050710

ADD

RS,R1

anCULnTE“”§R§hecnrxon 70 BE CLERRED

ig:g;

MOV

#P.CS1,RO
#P.EPAT,RI

CflLCULRTE Lnsr LOCRTION TO BE CLERRED

CLR

CMP
BLOS
CLRB
MOV
CLR

RO,R1
1:
x RL
CSE(RS)
Rxhn

(RO)+

;CL

CMPB

SUNLOAD,P.CMND(RS)

10479

050706

104

010501

062701

075176

FL6

MACY1l

000062

714

104;2
071 823389
104
0507
101775
10480 050722 105037 003074
10481 050726 010465 000020
10482 050732 00S062 000026

10483
10484
ig:gg

050736
0S0744
050746

132765
001402
000137

051462

10487

0S0752

122765

000107

10488

10489
10490
10491
10492
10493
10494

10495

000040

18:

000001
000001

BITB
BEQ
JMP
3$:

10501

BHI

050762

050770

122765

103540

000117

000001

CMPB

BLO

10502
10503
10504
10505

10506 0S0772 016562 000020 000010

10507
10502
10509

051000
051006
051012

052765
5037
122765

000002
003054
0117

000001

016562

000002

000020

051020

001007

iggia

051036

000431

10515
10519

0S1040
osxggg

122765
001007

000115

000001

10518
iggég

051056
051064

016562
000416

000032

000016

10521

0S1066

122765

000111

000001

003066

003114

051022

MOV

000014

10510

10S11

BIS
CLR
CMPB

10522
10523

258

0S1

116565 000006 000032

051074
051076

001003
013737

051112

001003

S$:

:NO,

DRIVE COMMAND

;

PACK ACKNOWLEDGE

cuecx xr

; YES

: Rtnoonrn

:
:
i

TA TRANSFER

xvso

$DRVPOS,P.PRST(RS) :SET DRIVE
xrzonxnc
0.WAIT
:CLEAR WAIT FOR COMMAND
#SEEK,P.CMND(RS)" ; CHECK IF SEEK

SOFFSET,P. cnno(ns)
6%

CHECK FOR OFFSET

P.CYLN(RS), RKDCYL (R2) ":LOAD CYLINDER ADDRESS

P.SECT(RS)nxoa<na> -Lbno SECTOR AND TRACK
0

1SSUE COMMAND

;CHECK IF OFFSET
CK FOR UNLORD

P.OFST(RS),Pnsottns) ;STORE OFFSET

P.ASOF (RS) |RKASOF (R2) :LOAD OFFSET REGISTER
8%
;GO ISSUE COMMAND
#SRTSPL,P.CMND(RS)

;CHECK IF START SPINDLE

BNE
MOV

73
W.MIN,W.DRV

:NO' "CHECK IF RECAL
LOAD WATCH DOG TIME FOR 1 MINUTE

BNE

:NO, CONTINUE

CMPB

;

RANSFER COMMAND

WRITE DATA
READ
HEADER
WRITE HEROER
WRIT
cgs

P.CS2(RS), RKCS2 (R2) sEoso

CMPB
BNE

CMPB

CLEAR

MOVB

: QELECT DRIVE

MOV
BR
6S:

$SEEK,P.CMND(RS)

208

UNLORD

5§

MOV

10524 0S1104 122765 000113 000001 7%:
10825

RECALIBRATE
OFFSET
SEEK

BNE

MOV

10512 051030 016562 000004 000006

10517

;:CHECK IF POSITIONING COMMAND

START SPINDLE

101174

ADDRESS

chx RfE'kxsue
NEXT nzruau PARAME TER
CLt
OR INTERRUPT ISSUED
:STORE
DRIVE NUHBER
:CLEAR RKO® MAINTENANCE REGISTER 1

igzgg

10499

:STO

:
:
i
0S0760

R BLOCK ADDRESS

nexrs P CNND(RS) :CHECK IF SPECIAL COMMAND
35
N0, PROCESS
C.SPEC
:JUMP TO SPECIAL COMMAND PROCESSOR

10496

10500

TORE PAR

onscnt P.cnuo(nsi:CHECK IF RECAL

c%nsnoo RKG11/06 SS VERIF 1
CZRE&MD.P11
10-JAN-78 11:48

1os§g

105
{osae

ggxléu
013737

1122
051130

12;55

32765

MACY1l 30A(1052)
10-JAN-78
%¥COMMAND INITATOR

3064

1657

003114

000017
000016

8$:

18?53 0S1136
116565
000001 000016
051144
Q42765
000200 000014

10531
105;5
1053
10534
10835
10536
1053;
108
10539

000014

SEG Q4eq
SEQ 0201

MOV

W.B8SEC,W.DRV

MOVB
I

P.CMND(RS)
,P.CS1tRS) -nBeéonnnnno INTO CS1
#id. WCK,P.PRST(RS) ;RESET WRITE FOR WRITE CHECK

MOVB
BIC
BIT

:LOAD RECAL TIME FOR 8 SECONDS

P.CSIHIRS),P.CS141(RS) ;STORE BITS BITS
8-15 EXCEPT
OF CSl FORMAT
.fc<crnrecbr>,9.csxazg) -CLER?Yg%L

{8231
{eas 89 191%
5140 003014 118
xoswg
§§1533
37
330015
iosuu
iawa 13373; 003101 003015
13§3§ 821522
1
003100
158:
10547
0512
005937 003114

?ES
MOV
gg;s
CLRB
CLR

15 WTCH T.RASOF’EES
35¥EH"°R"“#1RE;UR"
nxhsor(na)
9§§one
TTEN xon"gunnnav
{TT" K,T.AS0F+1 ‘Efi‘?‘;" xnrsnngz; sas gccunsso
u.*xne
5n:§£r ??H?fiéVSN
THES gzxvs
W. DRV
:CLEAR
DRIVE TIMING COUNT

10551

MOV

MOV
MOV

P.BALO(RS),RKBA(R2) ;LOAD
ADDRESS REGISTER
P.WC(RS)
,RKWC
(R2)
h%
uosgsc
T REGISTER
P CYLN(RSJ.RKD
CYL(R2)
:LOAD CYL NDER nooness REGISTER

gzga

gggrcux,

353
BR

gfiaoarn
268 ! ] csxtnsi"
;G% sgfléssu§

MOVB
BIC
MOVB

P.CMND(RS),P.CS1(RS) :MOVE COMMAND INTO CS1

MOV

BIT

oofaaxx P.PRST(RS) ;CHECK IF INHIBIT BUS ADDRESS INCREMENT

BIT
BEQ
BIC
MOV

OCHK, P.#
CHECK IN NO CHECK MODE
3os
nb SKIP CLEAR OF INTERRUPT ENABLE
E,P.CS1(RS)
CLEAR INTERRUPT
LE
c51(n5),nxcsxtha) : ISSUE COMM

10543
igggo

051
0512

ggoxoo
0016
045140
000000
000200

000016
000000

737

100000

003000

833 37
137

0S0534
052442

003000
003000

0S1272 016562 000010 000004
10525
051
016
000012 000002
105
821
815
000020
1053;

igg

1314

ggiggs

1 1013

004

000131

108:

208:

000006

105?9 051332 032765 000200 000014

BIT

igéég
iggpg °5i%3°
821355 095222
0406 000123 000016
=]

0S1352 116565 000001 000016
10563
051360
042765 000200 000014
10564 051366 116565 000007
000017

10565
10566
10567

051374

142768

177750

10568

051402

010;37

003054

10570

051414

001403

000017

25%:

26%:

10569 051406 032765 100000 000014
10571
10575

051416
051424

0S2765
0165

000020
000020

051456

000137

0S2442

000020
0000I0

igggg
10581

27%:

.SBTTL
0S1462

122765

000141

000001

BICB

BEQ

10573 051432 032765 000400 000014
10574 0SI1440 001403
10575 051442 042765 000100 000016
10579 051450 oxssm; 000016 000000 30%:
igg;a

JSR
IMP
MOV

000001

10562

BIT

BIS
MOV

JMP

#CERR, T.CS1

; CHECK FOR ERROR

PC, R. NORM
C.RTRN

auo¥cn EC
IS FINISHED
ESTORE REGISTERS

P secrzag) RKDA(R2) .L

¢nuocas&o .guecx

sig AND TRACK NUMBER

8. WCK,P.PRST(RS) ; CHECK

un TEfifl%fifi COMMAND

un connnno SHOULD BE ISSUED

#id. WCK,P.PRST(RS) ;RESET unx?s FOR WRITE cuzcx

P.CSIHIRS) ,P.CS1+1LRS) {STORE_BITS 8-15 OF CS
#1C<B.CFMT!B.CDT!B.BA16!B.BAL7> P.C51+1(R5) CLEQR RLL BITS EXCEPT
: FORMAT, DRIVE TYPE, AND BUS ADDRESS
i BITS 1&-17

WAIT

27%

:LOAD WAITING FOR COMMAND
:NO.

LORD c;a

oaax csa(nsa :SEt INHIBIT BUS ADDRESS INCREMENT
CS2(RS)
sssha) htono cse

RESTORE REGISTERS

*SPECIAL COMMAND PROCESSING

C.SPEC: CMPB

SNOCHK P. PRST(RS) -cuggx IN NO cggcx MODE

308
;N0
SKIP CLEAR OF INTERRUPT ENABLE
#I1E,P.CS1(RS)
:CLERR éntsnnupr NRBLE
P.C81(R5),RKCS1(R2) ;ISSUE C
PC, W. WTCH
;CALL WATCH DOG TIMER
RKES1(R2),T.CS1 ;STORE C
AND STATUS REGISTER 1
cRov.r.csl
:WAIT FOR RERDY
108

1
276
16
004
853§37
7
1767

PAGE 202

BEQ
BIC
MOV
JSR
MOV
BIT
BEQ

10540

116
11
11
1176
ggxeos
121
1553

Gl6

12:16

$RDSTAT,P.CMND(RS)

;CHECK IF RERD DRIVE STATUS

CZR6MDO RKB11/06 SS VERIF 1

CZR&MD.P11
10582

10-JAN-78 11:48

0S1470

MACY1l 30A(1052)

001132

BNE

10289 Ocidos 1iecee 000007 000017
051522
051530
ggxgsu
i “E

016562
004737
g
: 57

16265

000016
045140
0002

1§§§§ ggxggg §84;§7 833555
i

000000

000016
000016

051622

032765

001000

10604

4037

047536

106
182

1
1

000001

000036

2737

oxoogo

000014

10603

ggxoqa

000020

33 1.CST1

BIT
CLRB

8CERR,P.C 1232) ?§HECK QP‘c8N?£SELEa Enggn
WTIME
BT MATCH DOGTIMING
ON THIS DRIVE

BIT

#MDS,P.CS2(RS)

BNE

JSR

{3605 os}swo 055722 010400 000020
10&59 051646 001oo§
{06{

{ sié 8?1592 880137 8?25%
10614

0S1676

004037

0S0274

10618
10619

051714
051722

032765
001402

000400

10618
100
1321? 02i70q
8?1710 T3Eaas
37 833114

10624

0S1740

0S2737

iggsg

00137

10625
10628
10629

10630

10631
10632

10633
10634

10635
iggg;

g§17gg

100000

04737

0S0S4

0S17S6
ggxrsu

122765
00104

000140

0S1772

:
052765

052006

112737

1766

052000

052014
052022

010537

016562
116565
042765

003052

000010

000020
000001

000007
165777

MULTIPLE DRIVE SELECT

i CLEAR

YES

xuggcars CONTROLLER ERROR

;

IMP

C.RTRN

;522¥on£ nssfgrsag

6%:

JSR

RO,I.STAT

;GATHER DRIVE STATUS

BIT
BEQ

#NOCHK, P.PRST(RS) -cuecxogr "8 CHECK MODE
8%
;NO, REPORT ERROR

ggg

IVSRRVQILIRBLE
R

gcn;sggfit.PRsr(RSJ -tgg*gnrs °§§VE égTasfizso BY OTHER PORT

&R
woTIME
CLR
uiogv

R
Run?cugggc
I BOG TIMING
38:827
*xnz ON DRIVE

o3 ;

SR
IMP

PE
R NORM
C.RTRN

'RESTORE REGISTERS

9%:

BIS

$E.MDS,E.CONT

;SET MULTIPLE DRIVE SELECT

10S:

INTELET Seekhe

JSR

PC.R.CONT

CMPB
BNE

SRELERS,P.CMND(RS) ;CHECK IF RELERSE COMMAND
138
:NO.
CHECK IF READ ALL HEADERS

000020

BIS

003074

MOVB

000017
000016

RO, I.CCLR

URN

;CHECK IF

;CHECK
:YE

MOV
000010

#DRA,P.DS(RS)
S

JMP

003054

fia%@fix
p PRST(RS%CL
5“72" C o
W
;YE HE?N?lch
"

BIT
BNE

05244

000001

:STORE CONTROLLER REGISTERS

gfihnagng;,:.nogiks; ;§¥ons s;nrus a¥;s 00 ggggggg g

gi$TR" SNED!UFE,P csatné)RR8R chur NON-EXISTENT DRIVE OR UNIT FIELD ERROR
BNE
A i
;ne#ofig sa&on

000014

10657
021730 093737 B9928934
iggg 051734 080137 oS2442

#DR.SEL,P.CS1(RS} :ST

?53

c%gNE

10602

:NO, PROCESS OTHER COMMANDS

.CS1(R5),RKCS1(R2) ; ISSUE COMMAND
PC,W.WTCH
:CALL WATCH-DOG TIMER
RKES1(R2),P.CS1(RS) :STORE COMMAND AND STATUS REG. 1
#ROY,P.CS1(RS) ;WAIt FOR RERDY

iosgg
82{282 83?043
76 550563 000014
1828? Bixiéfi
e

SEQ 0202

MOV
JSR
MOV
BIT

:ox

§ ?88838 888815
$037
003100

108

SEG Q48!

B-EETUNRL,MCER(ND)450R0
(R EOUCOMANG. )
oic<crnrecbrS,P.csxa§3)’-%bgnng%L BITS EXCEPT FORMAT

MOVB

2%:

PAGE 203

ROV
BIC

oooo:o

18?3? ggiggs
108
1

H1G6

12:16

¥SPECIAL COMMAND PROCESSING

{82?3 321532 643?52 152997 000016
1053? 0S1514 612755 000001 000016

10588
10589
10590
iosex

10-JAN-78

C.RTRN

RS,0.WAIT

: INDICATE CONTROLLER ERROR

:STORE

PARAMETER BLOCK ADDRESS IN

SRLS,P.CS2(RS)

:”
WAIT FOR COMMAND
:SET RELERSE BIT

#1,1.ISRL

:SET'FLAG FOR RELEASE COMMAND

MOV

P.CS2(RS),RKCS2(R2) ;LOAD CS2 FOR DESELECT

MOVB
BIC

P.8SiH(RS),P.cS141(RS);STORE BITS B8-15 OF CSI
COC(CFHT!C6T>,P.CSlézgioéngR¥YgEL BITS EXCEPT FORMAT

CZR6MDO RK&11/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

10638

10639
10640
1064
1064

igg:q

10645
1054;

1064
10648
10649
10650
10651
}gggg
10654

10655
10656
10657
10658
{8&23

gggoao

036

12765

000101

000137

0S2442

766
0014
2765
016

osaogs
8258

122765
goxog;

052044

76
0521C2
110
116
052120
052126

gggxao

I16

MACY1l 30A(1052)
10-JAN-78 12:16 PAGE 204
¥SPECIAL COMMAND PROCESSING

000016

MOVB

000400
000100
000016

000014
000016
000000

118:

000164

000001

13%:

0105
016537
6837 S
14
012737

003054
000010
000020
000024

003070
000007
003072

012737

000026

003072

000403

136
052144
052152
052160
052166

016562
016562
016562
116565
042765

10662
10663
10664
igggg

052210
052212
052220

10667

10669
10670
10671
10672
10673
10677
10678
10679
{828?
10682

000016
052442

000000

224

2765

000176

000001

052234
gggg:o
e
052250
052252

004037
832«2
2765
001472
005062

047536
000400
000000

000014

122765

000177

000001

32%:

000100

003052

34%:

BEQ
BIS
JSR
BR

000040

000010

36%:

MOV

256

000467

052266
052270
052276
052302

00! o?
0S2737
004737
000457

052304

012762

052326

ooxqo;

052312
052320

10685

330

050546

000000
100000

000016
000016

052737

000001

003052

052336

004737

0S0S46

10691

052344

013746

003060

10693

0S2350

016265

000000

10692

0S2342

000437

REGISTERS

RS,0.WAIT
‘SEt WAITING
FOR COMMAND COMMPLETION
P.BALO(RS) ,HOR.AD ;LORD HEADER ADDRESS
#8.CFMT,P.LS1H(RS) ' ;CHECK IF ag SECTOR FORMANT
14§
:YES, LOAD 22 IN HEADER COUNT
#20. ,HDR.CT
:LOAD 20 IN SECTOR COUNT
22§

:GO ISSUE READ HEADER COMMAND

$22. ,HDR.CT

:LOAD 22 IN SECTOR COUNT

BNE
MOV
JMP

34§
- YES, INDICRTEDILLEGRL DRIVER COMMAND
P.CS1(RS),RKCS1(R2) : ISSUE READ
HEADER
C.RTRN
;RESTORE REGISTERS

CMPB

328

BNE

JSR
C.RTRN
BIT
BEQ
CLR
CMPB

#RDHEAD,P.CS1(RS)
°g%5RE READ HEADER COMMAND
#NOCHK, P.PRST(RS) :CHECK IF NO CHECK MODE

SCONCLR,P.CMND(RS) ;CHECK IF CONTROLLER CLEAR

sNO. CHECK IF SUBSYSTEM CLEAR

RO, I.CCLR
:CLEAR CONTROLLER
:ERROR
RETURN
#NOCHK,P.PRST(RS) ;CHECK IF NO CHECK MODE
40$
;
INDICATE NORMAL RETURN
RKCS1(R2)
IRESET ¥ursnnupr EEQBLE
408

: INDICATE NORMAL

#SUBCLR, P.CMND(RS)

RETURN

:CHECK IF SUBSYSTEM CLEAR

368
8E.ILLD,E.CONT
PC.R.CONT
C.RTRN

:YES, CLEAR SUBSYSTEM
;SET ILLEGAL DRIVER COMMAND
:REPORT ERROR
{RESTORE REGISTERS

#SCLR,RKCS2(R2)

; ISSUE SUBSYSTEM CLEAR

37%

:NO,

JSR

PC,R.CONT

: " CONTROLLER ERROR
‘REPORT ERROR

37%:

MOV

W.MILI,-(SP)

:LOAD 16 MILI-SECOND COUNT FOR ATTENTION

38%:

MOV

RKCS1(R2),P.CS1(RS) ;STORE CS1

MOV
BIT

RKCS1tR2) .P.CS1(RS) :STORE COMMAND AND STATUS REGISTER 1
#CERR,P.C51(RS) ;CLEAR IF CONTROLLER ERROR RESET

BIS

#B8I1T0,E.CONT

BEQ

BR
00001E&

;RESTORE

P.CYLN(RS),RKDCYL
(R2) ;LOAD CYLINDER RDDRESS
P.SECT(RS) 'RKDA(R2) ;LOAD TRACK NUMBER
P.CS2(RS) ,RKCS2(R2) :LOAD DRIVE NUMBER
P.CSIH(RS),P.CS1+1(RS) ;STORE BITS a-xg OF CSl
otc<CFHT!c0T>,P.CSI(RS)FECLE$R ALL BITS EXCEPT DRIVE TYPE

MOVB
BIT
308:

C.RTRN

MOV
MOV
MOV
MOVB
BIC

016265
032765

10687
10688

18233

MOV

001027
016562
000137

10683
10684

10685

#RDALHD,P.CMND(RS) ;CHECK IF READ ALL HERDERS
30$
;
cuscx"ér CONTROLLER CLEAR

000020
000006
000010
000017
000016

10668 825232 651012

10676

CMPB
BNE

IMP

000002
000004
000020
000007
165777

10661 0S2174
112765 000125 000016
052202 032765 000400 000014

igg;g

#NOCHK, P.PRST(RS) :CHECK IF NO CHECK MODE
118
;
NOT RESET INTERRUPT ENARBLE
#1E,P.CS1(RS)
:RESET INTERRUPT ENABLE
P.C81(RS),RKCS1(R2) -xssussconnnno

BR
148:

#SELDRV,P.CS1(RS) ;STORE COMMAND

BIT
BEQ
BIC
MOV

MOV
MOV
BITB
BEQ
MOV
228:

SEQ Q482
SEQ 0203

C.RTRN

FINISH COMMAND

:SEt CLEAR

SUBSYSTEM DID NOT CLEAR

'RESTORE REGISTERS
i

DISAPPEAR

CZR6MDO _RKB11-06 SS VERIF 1
c
.P1
10-JAN-78 11:48

032765
001411
005319
00136
005726
052737

DD
NNEW
QR2ERORY

= 1 b=t bt s Pt e
onn
oo

00000000

J16

10-JAN-78
12:16
PAGE 205
30A(10Se )
#SPECI AL COMMAND PROCESSING

BIT

000016

000040

0030se2

0S0s46

000014

177777

003074
000000

177776

39%:

C.RTRN:

TST
BIS

(SP)+
#E.SCLR,E.CONT

aoJu STACK
;SET
YSTEM CLEAR DID NOT CLEAR

38%

CHECK onxvs INTERRUPT AGAIN

:"
DRIVE ATTENTIONS
:REPORT ERROR

R. cour

B8R

BIT

#NOCHK ,P. Pnsrcnsi : CHECK ; CHECK MODE

1ST

MOVB
MOV
JSR

{RESTORE REGISTER

(SP)+

ADJUST s:ncx

C.RTRN

n;s

REGISTERS

#-1,1.ISRL
8IE RKCS1(R2)
PC,R.NORM

:SET’ INTERRUPT ENABLE SET
:SET INTERRUPT ENABLE
:INDICATE NORMAL TERMINATION

(SP)+,PS

;RESTORE PSW

MOV
MOV
MOV

(5P)+.R1
(SP)+.R2
(5P)+.R3

'RESTORE Rl
:RESTORE R2
:RESTORE R3

MOV

(SP)+.RS

MOV

MOV
.SBTTL

cuccx IF ATTENTIONS CLEARRED

{YES, FINISH COMMAND
oeCREMENT 16 nxLxsscouo COUNT

BNE

40$:

SEG 0204

39§
(SP)

JSR

0ooo400

#DI,P.CS1(RS)

SEG Q482

BEQ
DEC
BNE

004737
000415

040000

MACY11

R TS

(5P)+.R0

'RESTORE RO

(S5P)+.RY

;RESTORE RY

RETURN

:RESTORE RS

OCTAL TO BINARY CONVERSION ROUTINE

I22 2 2222222222232
2222232222222 22222222222222222222222222 3

; *
s &
®

; #CALL
s

e
El

THIS ROUTINE WILL CHECK A STRING OF ASCII CHARACTERS TERMINATED
IF THE CHARACT ERS ARE LEGAL
IT
WILL GENERATE TWO BINARY WORDS PLACING THE LOW 16 BITS
ON THE STACK AND THE HIGH 16 BITS IN LOCATION SHIOCT

WITH A NULL <000> OR COMMA.

MOV

JSR

<RDDR$SS OF RSCII STRING>,-(SP)
OCTBIN

RETURN

20
0Sesee
0S2see

Bro—-8aE
e

(REREERBRRRERERBEXEERERRREERE
XL ERERERRER R XXX R R R LR R R ERR XA LR RRRRE

OCTBIN:

MOV

RO,-(SP)

000010
2s:

0000SH4

00C0e0
000067

R2
(RO)+,-(SP)
3
#
(SP),
3%
$'0, (SP)

#'7,(SP)

; SAVE RO

iSAVE RI
iSAVE R2
iGET ADDRESS OF ASCII STRING
iCLEAR DATA WORDS
;PICK_THIS_CHARACTER
GET ouT

:IF COMMA GET ouT

;MAKE SURE THIS CHRRRCTER IS

AN OCTAL DIGIT

IF 1
11:48

ROL

RS _

8S-8°2R8 Ses

;

:STRIP THE ASCII JUNK

(SP)

(SP)+,R1

{ADD THIS DIGIT

MOV
MOV

R1,10(SP)
R2 SHIOCT

;SAVE RESULT

MOV
MOV

(5P)+.R1
(SP)+ RO

:RESTORE RI1
'RESTORE RO

RTS

'RETURN

1ST

(SP)+

MOV

3a(sP)4, (sP)

.WORD

ADD
MOV
MOV
MOV

$HIOCT:

;

#1C7,

MOV

4s:

TST

3s:

000002

oo
N

8&
ggoooog
oog

ADD

RTS

:LOOP

:CLEAN PARTIAL FROM STACK

(SP)+

(SP)+,R2

;RESTORE R2

82, (SP)

*ADJUST RETURN
;CLEAN UP PARTIAL FROM STACK

(SP)+,R2
(SP)+.R1
(SP)+ RO

{RESTORE R2
iRESTORE Rl
:RESTORE RO

:GO PROCESS ERROR

:PUT_ADDRESS OF ERROR ROUTINE ON STACK
HIGH ORDER BITS GO HERE

SBTTL RANDOM NUMBER GENERATOR hOUTINE

s s

RN RN R R R

RRRRRRERE

;¥THIS ROUTINE IS A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR

;!NIIE A RANGE OF O TO 2(+33)-1.
:%CALL:

‘¥
;#

JSR

RETURN

PC, SRAND

Sgo0gYge8acs

o
oo

s \1\138-—0

NWWOOO

000000

0N
OWWo
NN

FBR
OGN
[y

$RAND:

052720

0S2716
001057
047401
052720
052716

: RETURN HERE THE RANDOM
; ;NUMBER WILL BE IN

SLONUM

MOV
MOV
MOV

RO, -(SP)
R1,-(SP)
R2.-(5P)

:;PUSH RO ON STACK
PIPUSH R1 ON STACK
:1PUSH R2 ON STACK

MOV
MOV

SHINUM,R1
8-7,R2

PiSET R1 WITH HIGH
:1SET SHIFT COUNT

INC
BNE
ADD

R2
18
$LONUM, RO

MOV

18:

; ;CALL THE ROUTINE

i®

000

R2
R1
R2

BIC

177770

ROL
ASL
ROL

ASL

(=
000
NNNNNNNNN S N
NN
\Y
e
Wnene

000000000
NNN

o3%fim

ASL

000010
0Szele

SEG_Qus4
SEQ 0208

10-JAN-78
12:16 PAGE 206
OCTAL TO BINARY CONVERSION ROUTINE

MACY11l 30A(10S2)

ASL
ROL

ADC

ADD

SLONUM, RO

RO
R1

RI1

$HINUM,R1

#1057,R0

1SET RO WITH LOW

LEFT AND
INTO R1 AND
'ROTATEROcnfiav
:::SHIFT
: CHECK FOR DONE
; ;CONTINUE SHIFT LOOP
:'ADD NUMBER TO MAKE X 129

: :PROPOGATE CARRY

:ADD NUMBER TO MAKE X 129

:ADD LOW CONSTANT

ADC

: 'PROPOGATE CARRY

MOV

RO, SLONUM

:'SAVE RO

MOV

(5P)+,R2

::POP STACK INTO R2

ADD

MOV

#47401,R1

R1. SHINUM

:1ADD HIGH CONSTANT

: 'SAVE Rl

o
S Rl t I T
CZR6MDO RK611-/06 SS

VERIF

10805
025712 01360
1§g ggnu
89
716

082720

176543

E
A
morss

10830 052730 000000

0834 055743

25 B2

§§;§
08
7
ig

182997 90099 001340

10037

18333
ioesx

0S3030

183?5 Efi
o B0
mes;

183?2 8230

10860
10861

0S3062
0S30e4

i i LEAVE
i s
SAVE

[

revesown
|0 RIS el
62S
;
i iNO cni K FOR CONSOLE

000040

1430

000002

000011

122716

000200

105037

053200

123726

1156

013746

001154

gg
dgil

001350

001341

enpE

Séo
MOV

0S2772

004737 055420

1% m %
1

B0
wom cnm
148;

m 115832

1
{0947

BR
MOV

HALT

1004

wh—-0

236
£L

0S27

::1S THERE A TERMINAL?
;;53 IF YES

JSR

-(SP)

"!HALT MERE IF NO TERMINAL

%?E&OSenv

DiBUNNIRG TNRBT MOOE- - RING

RO,618

0
SAPTCSUP , SENVM

PCISATY3

- :SEYUP MESSAGE RDDRESS FOR APT

::: Sp

70 APT

7
7

STPFLG
1s

TYPE
MESADR

—~O
[+

108
1 I
1
1
1
1

STYPE: TSTB
8Bl

e
e
e

~—

722
105737 001157
758 183032

: ;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING

1@%3
1

,:E?Lusmc
A TRAPréggoaRUCTION
e
TYPE

oo
Mos—
PR

10824
10825
10826

10850

STAcKk INTOe
Ra
iPi00P
RETURN

e GONTAING
R R THE XPhRRRcreR e
LA
SFIHER
To“EELLCHeTeSs!

10857
! %

i :

(2P)+’RS
L

SEG Qye

, .Illlllll!lllll'ilQl.ll‘ll’.lllIIII‘Illll‘l‘llllllll‘lll‘lll’llll‘lll

sto 0206

PAGE 207

SLONUM:

i3t
! ig

108

12:16

SHINUM: .WORD 176543
.WORD
123456
.SBTTL TYPE ROUTINE

123456

lls

1 0839

10-JAN-78

Rov
RTS

108
10810
10811

L16

RANDOM MUMBER GENERATOR ROUTINE

MACY1l 30A(1052)

SSED

2s:

5359

.“:83” -(SP)

PYlEJg‘! cx no'fo as TYPED ONTO STACK

608
3s:

MOV
aooRT

(spn RO
82, (SP)

i
n .%

4§:

?'sfi

) - aa
CMPB

gcmr.(sm

CLRE

$CHARCNT

S
L5
522

#HT, (SP)

CMPB

BNE

MOV

(SP)+

$FiLLC, (SP)+

$NULL, -(SP)

SKIP TY!

::z
*smmfi"on
POP 17or} mgSTACK
'r R:Tum PC

ANCH IF <HT>

; ;BRANCH IF NOT <CRLF>

;;POP <CR><LF> EQUIV
s S e 0

; CLEAR cmmcren coum

:; S IT TIME
?ofi FILLES CHARS. ?

::IF NO GO GET NEXT CHAR

::GET # OF FILLER CHARS. NEEDED

CZREMDO RK611-06 SS VERIF

CZR&MD.P11

10-JAN-78 11:48

MACY1l 30R(1052)

TYPE ROUTINE

10863 053070 105366 000001

7%:

i%; 8?%3 %5759 053134

{oes;

g{m

%;%

053200

DECB

fin

737 88363; 053200

1;72

8}3

’

fi?a
sus

iggs 8§3i§oo; 053200

%na

B RS led e w0

s 4?)

..%ngs TAB WITH SPACE

INALT umxf mui;En 1S RERDY

égnvggc

,,vss;-cul.mCHARACTER COUNT

"9&cr&cm

18:

&nza
INCS
$CHARCNT ; . WORD
$TYPEX: RTS

090
0308

3214
“1’3

MULTI IER Bé
IN 5
MTIPLICND IN

PRODUCT RETURNED IN RO-RI-RE-RS

2222222

Etll

006001

M.DPOl: ROR
ROR

RO
R1

§2ig
gfi 658%053%
391
83 gg &35&

B56
%

3220

2796 000041

006002

sB
Bt B Bt e Bt s

914

::gmrzvgsn LINE FEED? : COUNT THE CHARACTER
: CHARACTER COUNT STORAGE

ENTER WITH

h DPIM: EL:

gis

::mu
'f’r"‘SST ATsTacK
Egg ST orE orF

Fag(SP)
(PC)+
gc

oosoo?

ot ot Pt e Pt P

053204

03(1:3

éeTTL &E"fifi %P#uow: PRECISION INTEGERS

B0
58 RRE

Bt Pt s Pt (s Pt s s

000002

EgorNOT COUNT AS A COUNT

lllliIIl‘!lIllll!lll!l!ll!!'.lli.lllll!!lllli.!llllllllllill!ll

0904

5;83 ‘m A NULL

B3 W A0S01R BEIXRER
RN ORTE

“‘.. .-‘... Ed ‘

ot ot Pt

000012

s Pt Pt P

66743?
wsaa
09
00020

SEG

%s}‘m@"&: ugg?joBE TveED:

82& c

MOVB

$TYPEC: rsm

ggigg
053176
0532

PAGE 208

:HORIZONTAL TRAB PROCESSOR

f%g gig ggfi 126010

i%gg
10886
10887
1

M16

12:16

1(sP)

gsca

i;g gi{xg &'xfi%; 000040

xg‘;
xéo
ioan osa;zs

10-JAN-78

ggg:fl

0919 0532

oo%gg

726

MOV

M.DPO2: DEC

ars'?

2222

#41,-(SP)

222

s a2

2222322222222 2222222 222

;CLEAR HI ORDER WORDS

:MOVE 33 (DEC) TO COUNTER
:SHIFT TO ADD

ORI
RO’

;ADQ oouagfs PRECISION TO OBTAIN NEW PARTIAL

gsfipm

! DECREMENT COUNTER

RY, RO

(5P)+

N — . -~
PRO

:REMOVE THE COUNTER

sgoegeor

§ fi%@?fi@ififimfimfififififimfififififi&fi@

Pt s

0S3242

RTS

000207
i

DOUBLE-PRECISIGI!

IT&WEE

USES ALL

GISTERS (RO-RS)

ENTER WITH

e
000040

MOV

000002
000002

ADD

2(SP),R0

ac;
cL
M.DP40: ROL

ROL
ROL
ROL
Egr

s P Pt P
Bt Bt Pt ot s s ot Bt B

3332
ARRE

-(
RY,

Sy
sss'
2(SP)

?fé THE DIVISOR

,R1

;PERFORM THE INITIAL SUBTRACTION

1 Hr€"TE o LONGER LASTING CARRY BIT

M.
-(SP)
R3

R2
Rl
RO
asp

TFST“CARRY !I?'Iék'r

000002
000004

ADC
RADD

aSP
3
Y4(SP),R0O ;¢

ADD

ADC
ADC

R4,RO

TST

asP

BEQ

INC

DEC

000006

BGT

ROR

BCS

M.DPY44:

RS,R1

ADD

M.DP42: ADC

asp

; 1

;¢

. +4

6(SP)

M.DP40

FOR NEXT

-(DIVISOR)

Egg?“CARRYTM
;AD

+(DIVISOR)

j6eY*

M. DPY4

ADD
ADC
ADD

RS,R1
0
R4, RO

ADD

#10,SP

cLC
ROL

;i CLEAR

M. DP42
RO
asP

%ronDIVISION CYCLES

SOR TO THE STACK

M.DP41
asP
%sm,m

M.DP41:

(SP)

Q
CLR
288

Bt Pt P B
e

840,-

NG
NEG
‘s‘gg

000010

RA0-RiRe-ra

: CRYUUFEF LY BREEE L AR B LR BBRES

f'DPID: MOV

000002

-PRECISION INTEGER DIVISION

IR
RETURNED
IN RECR3

s e
e Bt Pt Bt s Bt

¥ REFRFREXERFXRFRARREERERRAESERERRRERFERER
RN EFRRRRR R ERRERRHRREE

.“ TTL

s ot e

et e 8 P

B Pt s ot s Pt s Bt ot s Pt Pt P

Pt et B @ ot Pt P P

fii

RKb11/06 SS VERIF 1
10-JAN-78 11: %8
EZRero P11
¢

BO1

MACY11l 30R{10S2)
10-JAN-78
12:16 PAGE 209
DOUBLE-PRECISION MULTIPLY SUBROUTINE

;ADJUST STACK BY 4 WORDS

ELSE SUBTRACT

OO0

ZREMDO RKG11/
1
ZR6MD.
P11
?3—?34- RIF11:48
10974
10975

053406
0S3410

}

83.’?'23 000207

000207

MACY11

COl

(
- JAN38&.&."?4%&9510:4
fivx&f :16__PA
éumoufinf 10
CLV
RTS

SEQ_Qye

s¥a 8209

ioe;; osauie %Sggg 000006

M.DFSO: noov

{oeag

.SBTTL

10985

4THIS ROUTINE

WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN

B Je40830

lggg"'

'cuns&xca:o OCTAL ASCIZ NUMBER.

388

18388

5‘3

41
1

1?33 w
fi

11
11
TM
ugw
11 xé ggé

18:

11313 8?
11020
053524
H 1
11054
ii§§§

2s:

3s:

——

INTER T

::"& Fhe "RobTINE
D

TYL+13.,RS

STERS
44UP'L!h:POINTER
TO LOW WORD
;;

8l12. ,RY

#1C7 R3

CLR

E;éfixm

Efi" RS)
"

ROR

5113

R
s’0,R2

RS,2(SP)
nggnsc
R
PC
ASR
R3
ROR
R1

ro oam

g‘é

ngxa

OF BINARY NUMBER

HE RDDRESS OF THE FIRST ASCIZ CHAR.

go
$OCTVL: .BLKB

;;g{
33

;*c

11029

MOV

JSR

IN DATA TABLE

::g
fr 2?gs“'? bfl??
gxcxr
:iALL g
-ADJUS POINTER ron FIRST

: 3ASCI
'
T IT ON THE
S
¥
EE"?W
ALL
cxsrsn
¥
TO
,;pos%qon :E
msx roa THE LAST DIGIT
:POSITIONT
NUMBER FOR

THE r:x ocmL DIGIT

130
14

mx m
::
Eu fi fNTRBLE
THE n“ TABLE

#PNTR, - (SP)

; ;POINTER TO LOW WORD OF BINARY NUMBER

PC, 3880820

IS ON THE STACK

TTL DOUBLE LENGTH BINARY TO btcmu.nscu convsm ROUTINE
s#&"'fi%fi#""fi?tt""525#*3'*"5?#'E'fiE&#‘fififiE&E’?5’3&*5&3?3523
;oss? 53"5
R. gf
HE BINARY NUMBER MUST BE

11027

11028

)

MOV 2(SP),R1

INC
MOV

000002

fi3{3

LoiE
cEie
1101

5‘2%

$DB20: SAVREG

11
11

DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE

3 AN PRELTBY YR VPR B R BN E R AR AP B R L BX B SR RS EB U B SRS L A IR AL B R ERRBRREE

igg;

ioeso

6, SP

CZR6MDO RK&11-06 SS VERIF 1

CZR6MD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

11033

1183;.’ @fi 6?&85 000002
110
8% D23e ifoce
81295¢ 0O00AS

$DB2D:

1iflit-.3

$
552

11050
015992 pemnis 053640
{8 gl pie

0
?2?38?

1ims

005602

‘ifig

fig

11049

Hgg

%fiz

11024
ufl?.g

3
:

11
11
11

11059
11060

635532

ligh
11068

E28 Man
1100

118;1

160400

Hgg 053

“873 §§

7
053720

W
N
n
n

—

11
11
11
11
11

B8EReE

1107

0
|

000000

PAGE 211

RETURN
VREG

38\/
OVv

BVv

2(SP),R2
OLC
R0
TRs5iSRi

EEK
sSuB
é-."?

ég :

ggg

Eg‘.

ACD

g6
MOVB

(R4)+,

somt
R3
lngu
(P&)+

SBC
NC

DEC
.MORD
BNE

CLRB
n;snsc

STNPWR:

:; THE FIRST ADDRESS OF ASCIZ

;;IS ON THE STARCK

ha1*aee
Hhele
3ts-n.m
TRPURIZ, RS

R g
145000

35632

RSS ‘o

fia )+,R1

(RO)+

555?3&3‘%2T5379 POINTER
ADORESSRalT
OF CROSCVL
:igET
Py OROFRESa
NOmBLRSTEINS srac

BB TRA%0_CONVERSIONS
Y
PARTIAL
: LEAR
*SUBTRACT
TEN POMWER
;;BR_IF TEN POWER TO LARGE

:ADD 1 TO PARTIAL
;;kgOP

'RESTORE SUBTRACTED VALUE

§;;ga“vsmfr
i ONNGE CPRRITAL
10 ASGIT

; ; DONE?
:3BR_IF NO

: s TERMINATOR
;;g;;rons REGISTERS
:
RETURN
::1.0E09

:1390400

;;1.0E08

s9d.

Ligeoo
041100

i
:; 1.0E06

gaqeu

;3 1.0E04

é"“

;3 1.0E02

6750
6

-y

figg

fio;g

000060

H%‘O

3s:

ys:

11
11

DOl

12:16

DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE

fioaé

10-JAN-78

1
0

:;1.0E03

;;1.0E01

;;1.0E00

SEEFYL" bhumdRton. escrz elS5BEReS1OTRES
RO BRGL2 ST
s s HEEBERRRRERERERRENERFREEEEERREEERXREREERRERX
XXX XXX LR ERERERRER

SEQ 0489

SEQ 0210

CZREMDO RKG11/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

EOL

MACY11 3ontxosa)

10-JAN-78_ 12:16_ PAGE 212
YPE NUMERICAL RSCIZ STRING SUPPRESS LERDING ZEROS

iigg;

;;Igagxsgugaggsag USED TO TYPE AN RSCIZ NUMBER SUPPRESSING THE

1xogg

: %CALL

{igso

?gx

11098
11035 053736 010046
11098
D237uq oesg Coooo
11099 333;23 001403

SSUPRS: MOV

11033 §§§£§§ oosaog

2s:

ifgga

65?;;3

000060

111

010037

053766

11102
0600000
11103 023766
3§£7 812600

'
M
)
BEQ

11108
023775
O06e0%
iiigg
:
11108

ggga

DEC

MOV

3gugeggo;éspm

; ;FIRST ADDRESS OF ASCIZ STRING

RO, -(SP)

; s SAVE RO

t; ERMINATEOR?
o
;BR ¥r YES

: :BACKUP BY "1"

O(SP)+,R0

1120 1Y BOINTER GOES HERE
'!QE§¥SRE

:;D,(RO)+

RO, 3%

"53 1#’352" ASCII “0" ?

:iSAVE FOR

3s 3

TWORD
MOV

.SBTTL

BINARY TO OCTAL (RSCII) AND TYPE

BT S P e

TYPING

RGP/ THE STACK

o 363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 3 36 36 3 36 36 36 36 36 3 36 36 I 36 36 36 36 3 3 26 3 36 36 36 36 36 3 3 3 % %

iii?g

figg;gLRoggéyg IS useg T0 c;angsxg16-BIT BINARY NUMBER TO A 6-DIGIT

ii1d
11118

T
P

iiiié

:g;zpos---sutsa fleEE 10 %Erup SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE

hey,
Mm-S
.BYTE
N

11118
11117

T
‘¥

iiigg

':g;;;gg-aa-§¥rzgcucne TO TYPE OUT WITH rue SAME PARAMETERS AS THE LAST

iiiig

.BYTE

R
FOR TYPEOUT

;iN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE

11122

¥CALL
:

iimM=1 on 0
; 1=TYPE_LEADING ZEROS

;

11123

iiiS?

:g;ztoc---snrsn HERE FOR TYPEOUT OF A 16 BIT NUMBER

HE
11130

B
P

{iigg

11131

0S3776

017646

000000

%iigg

ggzoxq

062762

000002

11135
111

uoos
4010

116637
112637

000001
0S4223

0S4221

$TYPOS:

MOV

TYPON

0S4036

11140
11141

054046
054050

11139

0S4044

112737

010349

010446
010546

00000S

054220

; sNUMBER TO_BE TYPED
::CALL FOR TYPEOUT

MOV

J(SP),-(SP)

; ;PICKUP THE MODE

sgo

2%9535’

: ;ADJUST RETURN ADDRESS

MOVB
MOVB

11139
osuégé
EE§737
000001
0S4221
STYPOC: MOVE
11137
054
112737
000006
054223
MOVB
11138

NUM, - (SP)

D=SUPPRESS LEADING ZEROS

STYPON: MOVB
MOV

MOV
MOV

1(5P),SOFILL
(SP)+.SOMODE
+1

$1,SOFILL

#6, SOMODE+1

ISR
b

;;LOAD ZERO FILL SWITCH
,.Nunggn OF DIGITS TO TYPE

TT FOR
THE ZERO
FILL SWITCH
SIX(&) DIGITS

#5,SOCNT

,,ser THE ITERATION COUNT

R4, -(5P)
RS, -(5P)

:SAVE RY
i 13AVE RS

R3,-(SP)

AVE R3

SEQ_ Q490

SEQ 0211

gggg

[

s s s s B

SOMODE

-4

177770

002402
00S204

12602

6S:

012604

000002

000004

8s:

SOCNT:
SOFILL:

BYTE
YT

moB
-

79%:

T ALREADY

Ss:

ANYMORE 0'S
SCII

4s:

000002
000
000
000
000
000000

ROL

38:

oS4222

—

g9
S

O-ghikPRE4E
g.ek

2s:

O —4 X DD+

T THE_ZERO FI#L SWITCH
NPUT
NUMBER

60001

53
TRL DI IT OUNTE
,,ZERO IL
SH TCH
iflg TO TYPE

§ Ihe: ST
.SBTTL CONVERT gxunnv 10 pECIMAL’}ACReeR

, il!ll!lllll{llllllllill!lll!!llll!lllllllill!lilililllIllll!!ll

iruéuenourxue IS USED
T

INARY NUMBER TO
A S-DIGIT
I
DEPENDING ON WHETHER_THE
lNUHBER IS POSITIVE OR_NEGATI VE A SPRCE OR
A MINUS SIGN WILL BE TYPED
DIGIT OF THE NUMBER. LERDING ZEROS WILL ALWAYS BE
*#BEFORE THE FIRS

D DECIMAL (RSCII) NLHBE

1
1
1
1
1
1
1
1
1
1
1

ALLOWED

18:

024504
Olgees
82“212 012216

0S4214
054219
0s4el
0S4e20
OS4eel
0OS4ee2

,,SUBTRQCT I; FOR MAX.
SRVE IT FOR USE

000006
oS4eee

1
1
1
1
1
i

; sGET THE NUMBER OF DIGITS TO TYPE

1175

0S4200

SEQ 0491
SEQ 0212

<<<<<

gOHODEOI,RH

0S4e23

i 3333333& RoR<3an Z00

o2NOFRFRFveR
2R ESr o R 2R8I

éég;oq

5 2

Bt Bt B Pttt Bt ot et Pt ot Bt Pt P Pt s e Pt P P

1
1
1
1
1
1
1
1
1
1
1
i

05:052

LA i fi-

e s B

Bt ot Pt Bt Bt Pt s

SRR LSR8 B8R R 2R 8 3at e 2aRNN S S N r R EOR S DB SRR PR B ES SFR £S5

s Bt Bt B Bt B

s Bt s s s Bt Bt ot B

Bt ot ot ot ot Bt s s

s ot s

ot ot ot et

s Pt s P ot o

s s Pt ot ot s

s P Pt Pt ot s Pt P

s ot

CZR6MDO RKB11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

FOL

10-JAN-78
_12:16 PAGE 213
BINARY TO OCTAL (ASCII) AND TYPE

MACY1l 30A(10S2)

TY!

lREPLRCED WITH SPACES.
;l
;¥

0S4224
0S4224
OS4e2e

010046
010

CALL:

$TYPDS:

MOV
TYPDS

MOV
MOV

NUM, -(SP)

; ;PUT_THE BINARY NUMBER ON THE STACK
;3GO TO THE ROUTINE

;;PUSH RO ON STACK

::PUSH R1 ON STACK

CZR6MD.P11

10-JAN-78 11:4

]

CZREMDO RKB11/06 SS VERIF 1

MACY1l 30A(1052)

CONVERT BINARY TO DECIMAL AND TYRE

{iigg §§u§§§ §i§§32
1l
115§§ §§4§§§ 8 T
6633
11504
02useg
405
i1
Y
11532
Y
g&%fi&%
11207
Y4
15703
i}ggg

053272

12723

ii§i§

633583

fiefu

os:aoq

oos;gs

i% ig
11

f
6?
106316

11525

112

MOV

—0
0000SS
Y440
0040

000
o
18:

11210 054274 016001 0S4430

11 Sq

324

000060

Y344

10;23

11230
xxagé
iigaa

054360
82"323
053355

010502
764
i
726

[z gguggs
ch 385002
ol
11253
11235

11236
11237
11238
11239
11530

11241
11242
11243
11534

11245

11246

11247
11248
11249
ii§§?

11252

112583

iy
054402
Y404
Yy
82441

Y412
054416
4y
4y
Yy

054434
0S4436
0S4440

5%:
000001

iises

11234

Ys:

UUIU

116663

605013

12605
012603
012602
012601
obasgo

104401
016666

012616
]

001750
000144
000012
000004

3%:

11515 3343?3 iiixos
11221

GOl
10-JAN-78 12:16 PQGERélH

177777

000040

6%:
78

0S4440
000002

STACK

MOV
B
MOV
REG
MOVB
CLR
MOV

RS,-( P)
e
20(SP),RS
RS
8’ -,1(5P)
R#SDBLK,R3

:1PUSH R3 ON ?Tncx
AFRSNEI
;5§§T
;Nfifi*lt o
ER sio
PiEAKETHE BINARY NOMBER
P
:IMAKE T
R NEG.
;3
ZERO_THE C aJ¥§E§NOEx
:ISETUP TH; OUTPUT POINTER

MOV

SOTBL (RO),R1

1iGET THE consvn“%"a

égc

ADD

R1,RS

; s INCRERSE

EfiIB
ASLB

;gp)
(SP)

;;sgx
; ;MSD?

1(SP),~1(R3)

;i YES--SET T

8’

:IMAKE IT A SPACE IF NOT ALREADY A DIGIT

gexe
ggg

fié ,(R3)+

R1,RS

BCC

BIS

#'0,R2

MOVS

BIS

.R2

“EEER;HEHEIQEE CHRNE%TER TO A BLANK
“ES"?;T”IS BCD DIGIT

THE 3CD DIGIT BY 1

; ;ADD BACK THE CONSTANT

92 NG LERDING 0’S?

:3BR _IF NO

: IMAKE

THE BCD

gxcu

DIGIT ASCII

750553)+

“§H§TT¥§3aEnsnr 55" IN THE OUTPUT BUFFER

8%:

MOV
gn
Bgza

RS,R2
X
329"

3GET THE sg
:13G0 C
0 ASCII
:WAS THE LSD
FIRST NON-ZERQ?

9s:

CLR

MOV

-é(spa,-etna)

MOV
MOV
MOV
MOV
MOV

(SP)+,RS
(SP)+.R3
(5P)+.R2
(SP)+ Rl
(5P)+ RO

e
BGT
177776

::PUSH R2

SEQ 0213

¥g¥a

oooouo
177777

R2,-(SP)

SEQ 0492

ROUTINE

TYPE
MOV

000004
$DTBL:

$DBLK:

.SBTTL

§3 P Y

MOV
RTI
10000.

meo
§s
(R3)

$DBLK
2(SP),4(SP)
(SP)+. (SP)

EShhE
::GO
?8 £§§T e

feo

55;2 --SET THE SIGN FOR TYPING

:iPOP
::POP
:iPOP
:POP
: 1POP

TERMINATOR

STACK INTO RS
STACK INTO R3
STACK INTO R2
STACK
INTO Rl
;rncx NTO RO

:INOW TYPE THE NUMBER
:IADJUST THE STACK
: sRETURN TO USER

1000.

100.
10.
.thu
Y
ERROR HANDLER ROUTINE
22212222222222222222222222222332232233223222232223232222222322
23

'4THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT,

CZREMDO RK&11-06 SS VERIF 1

CZREMD.P11

10-JAN-78 11:48

MACY1l 30A(1052)

i0-JAN-78

ERROR HANDLER ROUTINE

iiSég

HO1

12:16

PAGE 215

SEQ 0493

; ¥SAVE SH$°E$38RR£T52
NUMBER AND THE ADDRESS OF THE ERROR CALL

i}ggg

;“52ggxrcn oP Hgtg Psoggggg BY THIS ROUTINE ARE:

fze2

g
'%CALL

11258

;isuxaéx

1126

iiggé

INHIBIT ERROR TYPEOUTS

Bobe 8N ENRSK

ERROR

{2
B
pgzeyz
ooues
St
11
4y
15?
001102 124456

i
MOV

§§
LIS
B o oy
STSTNM, aorsanv
ST NUMBER AND ERROR FLAG

iig?g

7585

SBELL

11264

0S4450

11268

4464

1127

SERROR:

777

002000

AL 1 2 1 001310

124446

{{gga O5ua03 ?22;;;
iif R
1274
7737 u 7# 1114
ez
Bew 9B BT
11
054544
11235

Efi 113737 001114 054566

iisg&
11285

004585

456

0S5430

000

11585 Qeuers DOO;;; 124342

18:

208:

gxrxo, 3SWR

INC

ggg
MOVB

%EP)ksnapc
::82?"
§§ xrsna is

Fkpm

MOVB

; ; ERROR=EMT AND N=ERROR ITEM NUMBER

SITEMB axs

JgeTE

Ec,SATYY

.BYTE

9%,

%aan

sn FORERROR
xng Sucrxon
THE ERROR ITEM CODE

1870 NShon s
Eiss? TEM NUMBER EnPnR NUMBER

: :REPORT FATAL

nnon TO APT

3TEONCERROR

lize
e §32777
|
bkt
iiaeo §§q 0
001000 124330 3%:

b
1 3;1109,
W 3SWR
géa

,.LOOPFON ERROR SWITCH SET?

iigga
iiges

gg:gég
ns:ggg 013715

ggg
MOV

,,cgecx 5855“" ESCAPE ADDRESS
: 'FUCGF RETURN ADDRESS FOR ESCAPE

11299

0546

1153§

ugx

5715 001110
001306
001306

i{ggz osaggg ggfggf 025534 000042
11300
11301

iiggg
11304

11305
11306
11307
11308
11309

054642
0S4e42

000000

000002

4s:
e

6S:

.SBTTL

MOV

gng

HALT
RTI

SLPERR, (SP)

55 CAPE
SESCAPE, (SP)

ggenoao.acua

TTY INPUT ROUTINE

e 1L il

PIFU

ggruau FOR LOOPING

"SSZEé’ ?groanccsprv

i IYES

; ; RETURN

CRBBBREBBRERRBEEERRRREE
LR EE R RS ERERREER SRR RLEERREERRRREREERERRER

"ENRBL

LSB

.DSRBL

LSB

SEQ 0214

CZREMDO RKG&11-/06 SS VERIF 1
CZRBMD.P11
10-JAN-78 11:48

MACY1l 30A(1052)
10-JAN-78
TTY INPUT ROUTINE

I01

12:16

PAGE 216

11310

53 P Y Y 222222122222 2222222222233222222223323222222222322232222222322 ]

11313

‘¥

*igig

iigié

‘féfiff ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

11314

11317

0S“A44

011646

11320
11321
11322

0S4e54

105777
100375
117766

11g§§

054546

82:270

016666

000004

000002

ou2729

657500

124260

000004

124264

$RDCHR: MOV
18:

000004

11353
024309 Ooigia o004 000023 2%:
11326 823703 188377 124232
11327
11328

11329

;3 INPUT A SINGLE CHARACTER FROM THE TTY

RETURN HERE

: sCHARACTER IS ON THE STACK

::WITH PARITY BIT STRIPPED OFF

;

11318

11319

" RDCHR

712
0OS4714

ggu?gg

11337
024750
11332
4732

100375
117746

g42716

OBisee

(SP),-(SP)

: ;PUSH DOWN THE PC

TSTB
BPL
MOVB

J$TKS
15
JSTKB, 4(SP)

:WAIT FOR
: A CHARACTER
:iREAD THE TTY

gt
TSTB

3w
agrxs

:;WAIT FOR A CHARACTER

#1C177, (5P)

:MAKE 1T 7-BIT ASCII

:;sp),uxuo
:éSP),Il?S
%40, 4(SP)

5;55 tTHu?Fesscnsev
2553 &gflnlgpsg%nL CHAR?
;Ennxs:xr
UPPER CASE
::G0 BACK TO USER

MOV

BIC

4(SP},2(5P)
#$1C<177> 4(SP)

124226

BPL
MOVB

||ood

g
BR

.13

177600

2
J$TKB, - (SP)

:iSAVE THE P

;:GET _RID OF JUNK IF ANY

RN
TP NG e o

::LOOP UNTIL ITS THERE
:1GET_CHARACTER

P12
AOTDISCARD
TT
: 1YES, RESUME

iiaaa gg:;a;
; 000004 000140 3S:
{igéé os=7uu §§2227 000004 000175
11337
ggu?és
gaégss
000040 000004 4§:
11338
4762
0002
11339
11340
Hg::é

054764
054771
ggggg&

gtg
ggg
BIC
RTI

.ARSCIZ
.ASCIZ
.ASCIZ

/tU/<15><12>
: ;CONTROL "U"
/1G/<15>¢12>
: :CONTROL "G"
<«15><12>/SWR
= /

11343

055007

11344
11345
11346
11347

055014

052536
136
%gg%g

005015
006507
osasosg

000
000012
020122

SCNTLU:
SCNTLG:
SMSWR:

040

047040

053505

SMNEW:

.ASCIZ

.SBTTL

POWER DOWN AND UP ROUTINES

036440

000040

iig:g
11350

1135]

055020

012737

11325
022030 000798
11354
11355

11356

0S5032

11359

055032

0SS044

012737

055020

: POMER UP ROUTINE

o, -

sWAIT LOOP FOR TTY TO COME UP

000024

MOV

#SPWRDN, PWRVEC

;SET VECTOR FOR POWER DOWN

LBl
G Gy fong ook
11363 055072 104401 0S5106

pey
TYPE

EMURRVECR
, PWRMSG

;TYPE “POWER FRILED"

11365

JMP

JSLPADR

055052

055076

0S5100

012737
000005

000177

$§PWRUP: CLR

;SET VECTOR FOR POWER UP

$PWRCT

11364

88?%37

#SPWRUP, PWRVEC

aguncr

11360

0S5104

. POMER DOWN ROUTINE

$PWRON: MOV

éng

iigg;

00S037

000024

NEW = 7

055104

000340

124002

4s:

000026

MOV

RESET

$PR7,PWRVEC+2

;RE-ESTABLISH POWER AND TRAP PRIORITIES

o ieuize ne e

:CLEAR THE UNIBUS

:RESTART THE CURRENT TEST

SEQ 0494
SEQ 0215

CZR6MDO RK611-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
11366

11367

11368
11369

11370

0SS10+

000000

0SS114
0SS122

020122
042105

0SS106

11371

O00S01S
0S5130

047520
040506
005015

JO1

MACY11l 30R(1052)
10-JAN-78 12:16
POWER DOWN AND UP ROUTINES

042527

046111
000

11375
11378
11376

11378

11379
11380
11381
11382
11383

.ASCIZ

<15>¢<12>/POWER FRILED/<15>¢<12>

.EVEN

BRI

0SS130

0SS134
0S5136
OSS144
0SSi46
0SS1S2

105737

001406
032777
001402
013716
000002

o 36636 36 36 36 36 36 36 96 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3636 36 96 36 36 36 36 36 36 36 36 36 36 36 36 3 % %

001103

560PE1 TSTB

SERFLG

;SEE _IF AN ERROR HAS OCCURRED

i}ggg

.SBTTL

SCOPE HANDLER ROUTINE

11389

3 5

001000
001110

123774

;!SN11=1
; #SW09=1

11397

;

}iggg

11400

0SS154

11402
11403
11404
1140S

055160
0SS162

001404
032777

0SS172

000416

0SS174

013746

0SS1S4

055170

11412
11413
11414

055216
0SSe20
0SSee2

11416

055230

11417

005737
001101

055200 012737

11410
0SS2
11411 05521
11415

055226
30

123750

RN REN

000004

0S5220

105737

001103

123737

001115

001103

001000

123664

001421

11420
11421

0SSe44
0SSe24e

101015
032777

SCOPE
TST

; ; SCOPE=IOT
STIMES

;CHECK CURRENT ITERATION NUMBER

BEQ
SXTSTR
BR IF 0, TO SK IP CHECK OF SWR BIT 14
18%:
BIT
#BIT1M4, aSWR
;;LOOP oN PRESE TEST?
BNE
$0
YES IF SWI1Y
#8888START OF CODE FOR THE XOR ftSTERloooo

000004

0413

INHIBIT ITERRTIONS
LOOP ON ERRO

SXTSTR BR

000450
022626
012637

0SS234

0SS236

040000

#CALL

$SCOPE:

001304

005737
177060
012637 000004

11418

11417

I I I I

lRND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08>
lTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
,!S
Wid=1
LOOP ON TEST

11395
11396

11409

BR IF NOT
SEE IF LOOP ON ERROR DESIRED
BR IF NOT
SET ERROR LOOP ADDRESS ON STRACK
;RETURN

#AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>)

11392
11393
11394

11406

6%
#BIT9, aSWR
6%
SLPERR, (SP)

iTHIS ROUTINE CONTROLS THELOOPING OF SUBTESTS. IT WILL INCREMENT

11391

11407
11408

R R R R RRRR R R RR RN

68:

11401

SEQ 049S
- SEQ@ 0216

i SCOPE1 - INTERNAL SCOPE ON ERROR ROUTINE
lCflLLED BY *SCOPER"TM

11390

.WORD

BEQ
BIT
BEQ
MOV
RTI

11384
11385
11386

PWRMSG:

11374

11377

$PWRCT:

PAGE 217

MOV

aoERRVEC -(SP)

BR
CMP
MOV

ssLnb
(SP
(SP)+
(SP)+ J8#ERRVEC

MOV

TST
MOV

THE “xon” TESTER CHANGE

s vz *aET
NOP*" (NOP=240)
,.SR
CONT NTS OF THE ERROR VECTOR

I%Enfi
i .ssr
a
97
53T
oagT OR
(SP)+ aoennvsc
,.RES
ERROR VECTOR

rz TEST
..CLE H? K AFTER A TIME OUT
..RE TORE THE ERRO VECTOR
BR
78
OOP ON THE PRESENT TEST
6S:; #es#%END OF CODE FOR THE XOR "YESTERwuuns

S%:

2%:

TSTB

SERFLG

,,HRS AN ERROR OCCURRED?

CMPB

SERMAX, SERFLG

;;nnx. ERRORS FOR THIS TEST OCCURRED?

BEQ
BHI
BIT

3
#BIT09, ASUR

H
F NO
; ;LOOP ON ERROR?

CZREMDO RKB11/06 SS VERIF 1
CZRE6MD.P11
10-JAN-78 11:48

11422
iizgg

055254
ggsggs

§i3§9

11425 0S5

if:gg
11430
ii:gé
11"33
114
11435
11436
11437
11438
11439

001404
863537

001110

xosoag 001103
3

001110
001306

11441

055374

013777

001102

11443
11444

(0584
0S5S410

000002
003720

ii::g

11447

0SS

055402

112737

013716

11448
11449
11450

sqés
Sy
055426

112737
112737
000403

11453
11454

0SS
3?5

010046
oagst

ii3§$

001106

78:

4$:

g:gg

112737

000001

001106

001115

123540

11460
11461

11462

{izga
11465
11466
11467

(0S5460

; ;BR_IF NO
::SET LOOP ADDRESS TO LAST SCOPE

gkn

fgxnss

::E%E“R ng ruEBEE ?rréggnnrxons TO MAKE

CLRB

682737

STSTNM, aoxsanv ,,szanvTEST

$MXCNT:

RTI
2000.

0S5656

gg;;g:

Q00100

?60037
105720

001334

fem

11470
ii:gé

0S5
osggag

11474

000004

001395 001320

001376

010037
0127?7

001336
000004
000002

001341
000004

18:
2s:

Y ALLOW ou: ) ERROR ON NEXT TEST

177776
052722

ADDRES

s PS
. NUMBER OF ITERATIONS

#1,SFFLG
81 SMFLG
satyc
#1,SFFLG

:;TO ONLY REPORT FATAL ERROR

MoV
MOV

RO, -(SP)
Rl -(SP)

; ;PUSH RO ON STACK
.,PUSH R1_ON srnc

gnsa
BITB

,.g;sgg;xucUNDER APT?
SAPTSPOOL, SENVM ; ; SHOULD SPOOL MESSAGES?

MOVB

EhA
ggprsuv,ssnv

iPHONGT: | BR|CooneE!

33
a4(SP) RO

:3IF NOT:
BR
$IGET nsssncs ADDR.

MOV
TSTB

RO, SMSGAD
(ROY+

;;Pur ADDR IN MAILBOX
;;FIND END OF MES

s ST

ADD

Egg
BNE

82, 4(SP)

sgécrvps

001320
000004

ADD

82, 4(SP)

4§:

TO REPORT FATAL ERROR
,,TO TYPE A MESSAGE

BEQ
MOV

RO, SMSGLGT
32' $MSGTYPE

013746
004737

000000

SLPARDR, (SP)

MOV
ESV

11475
11476

0SSSee

81, SERMAX

MOVB
MOVB
BR

COBR

85953; 000004 055566 3%:

0855556
055862

MOV

gpr.

11473 §§5su

062766

MOVB

; ;SAVE ERROR LOOP ADDRESS
,.CLERR THE ESC nps rnon ERROR ADDRESS

Il!lllliillll!illllll!l!lilll!llllllll!lillllllllllliilllll!ll!

000001

ogs 10
055514
055516

;552H121$EITERQTIONS?
'fxnc££n§u§
xrennrxon COUNT
cusgg
nnr oflx;ggs;xgns MADE
;Nx
HUHZZ§F$in RATION
COUNTER
NUHSE
I0ONS
TO
DO
; ; COUNT
;;ssr
Tgcuunasn
IN APT MAILBOX
: SAVE
LOOP ADDRESS

MOV

thrvx-

000002

:gxrlx,asun
SICNT
srxgss.sxcnr
=i SICNTSTIMES
SMXCNT,
STSTNM
STSTNM
;TESTN
(SP),
SLPADR

; ;ZERO_THE ERROR FLAG

SOVER:

0SS656
055654

06 759

SERFLG

(SP) ' SLPERR
SESCAPE

000001
000001

1425
017600

g8 Bl

11477

4s
gssESR,SLPRDR

.SBTTL APT COMMUNICATIONS Rourxflt

055466
470

SEQ 0496
SEQ 0217

MOV
CLR

11426 gggzgg
DeBdug 68?53?
OdoTuzp 000001
Coooo! 001340

iiggs
11459

PAGE 218

BEQ
ESV

oss
77; 004000 123632 3%:
ggg
835393 é%%? 001104
INC
gg
9
3
001304 001104
SEE
0S
815737
830006
001104
1S:
MOV
05
13737
5410
001304
MOV
0SS340 105237 001102
$SVLAD: INCB
ggsauu
613737
001102 001324
MOVB
5352
011637 001106
MOV
011637
005037

11442

MACY1l 30A(1052)
10-JAN-78
12:16
SCOPE HANDLER ROUTINE

001304

055356
ossggg

11440

KOl

MOV

MOV
JSR

. WORD

J4(SP) N8

17?776, -(SP)
PC,STYPE

BUMP RETURN RDDR.

?EEN5§bofl%x?’ LAST XMISSION?
SR

:3PUT LENGTH IN MAILBOX
PITELL APT TO TAKE MSG.

:;PUT MSG ADDR IN JSR LINKAGE
UMP RETURN ADDRESS

; ; PUSH 1%%376 ON STACK
::CALL TYPE MACRO

CZR6EMDO RKB11/06 S vsnxr 1
CZREMD.P11
10-JAN-78
11:48
11478

11479
114

qugé
114
11483
11484
11485

0SSS570

055570
055574

g5
055604
05561
0S5

105737
001416

737
737

1413
13
176

LO1

MACY11 30A(1052)
10-JAN-78
12:16
APT COMMUNICATIONS ROUTINE
53:

055656

108:

001340
001320
000004

118:
001322

TSTB

BEQ

TST
TST

BEQ
BNE
MOV

$FFLG
12%

118
J4(SP),SFATAL

?28
gtga

11492
11493

MOV
RTS

(SP)+,RO
PC

.BYTE
.BYTE

O
O

11494
11495
11496

11497
11498
11499
11500
11501

3
56

00
207

(055655
055656

000
000

055654

iiggg

000

$MFLG:

SLFLG:
$FFLG:

055660
00200
000001
000100
000040

CLR
MOV

.BYTE

.
APTSIZE=200
PTENV=
APTSPOOL=100
APTCSUP=040

.SBTTL

SEG Q497
SEQ 0218

; ;SHOULD REPORT FATAL ERROR?
F NOT:
BR

SENV
129
$MSGTYPE

{}:99
g2
255 oo?ggg o 12%:
}i:ga 8?2233 %8?53? 3%52?2
11433
§§§§33
68§§37
3?5&54
11481
46
012601

PAGE 219

:fiscrags
’fftc

,,RUNNING UNDER APT?
:IF NOT:
BR
,,rxnxsueo LRST MESSAGE?

::IF NOT:
MWAIT
;;GET ERROR §

TELL nbt TQPTEEEUESRQSDR

::gtsgg ERTQL
FLAG
:: E nggsnhsFLAG

gflFLE
(SP)+,R1

,,POP srncx INTO Rl

; ; POP Sgncx INTO RO

..nsssc FLAG

H
FLAG
: 'FATAL FLAG

ROUTINE TO SIZE MEMORY

Hggg

:‘unuunnuniuulnnuuunnunuunu"nuiuunn

11506
11507

11508

JSR
RETUR

PC,SSIZE

ISLSTRD HILL CONTARIN:

11509

11510

1 Tll OPTION

11511

*sLsrax HI#L CONTAIN T

ii?ii

§81T07 oon-r

11512

*SKT

11518

0S5660

010046

11520

055664

010246

11519 055662 010146

11521

11532

ngggs

11523
11524

0SS5674
0S5700

010600

604&09

57
055720

000200
100062

11259

11
11528
11529

57
055710
(QS5714

11632
11833

055722
0S5730

11§30
11831

-- LAST QBSOLUTE ADDRESS OF AVAILABLE MEMORY

Lnsrugnnx RS A SAF

non nauncsns

¢91715 -”308§'$EHHPE
nen v n5~822n5~r OPTION

{igig

11535

-- LAST VIRTUAL ADDRESS OF THE LAST BANK

I1THOUT é{ Hé

DETERMINED BY ROUTI

$SIZE:

MOV

RO, -(SP)

MOV

na.-c

MOV

QHERRVECH2, - (S

gxo 46

MOV

13746 000004

013746

MOV

000006

MOV

12637
012701
105727

000006
003776

012737
005737

0S6060
177572

MOV

R1,-(5P)

TRAP

$KT11:

000004

.WORD
BPL

MOV
TST

.,g

THE srcx

aotnnvsc -(SP) i AVE P

i 9

; ;SET rua ERRVEC PS

MOV
MOV
TSTB

)

snvs no THE STACK

NT ERROR vscron PS & PC

snvs THE STACK POINTER

TO THE Pnsssfi?

usu QLD PSW AND PC ON STACK

(SP)+, aoennvsc+a
<:SAVE THE PSW IN IJ8ERRVEC+2
#3776.R1
;SETUP ADDRESS
(PC)+’
,,uss MEMORY MANAGEMENT?

200
SCORE

,,ssr TO USE MEMORY MANAGEMENT
F NO

#SKTNEX, ¥ERRVEC ; ;SET FOR TIMEOUT
JUSRO
,,k111 ARE YOU THERE?

CZR6MDO RK611/06 SS VERIF 1

CZR6MD.P11

10-JAN-78 11:48

734

11540

055716

iaggg 077406

177740

716 000200

BIS

18:

11845 gse
742 177600
%i§3§
geerre sésgqs
16 000004
11§45
§6§zg;
ifi
20
172516
11846
14
01
11848
1
856056
ooooDy
11550 0Se032 Q0S737
143776
0S6O42

ii?
o] §§§¢§
iig S 0560
11
5060
]

b | |

MO1

12:16

s
0968 Rg’

ADD

#200, (SP)

ggg

4§:

MOV
TST

12
D2szie

000040
172356

ADD
ce

037

177572

$KTOUT: Rov
Ekn
KTNEX: BIC

062701

004000

18:

PAGE 220

#100000,$KT11

GR
MOV

ROy
G0
MOV
BR

| ]S

11585]
1155

10-JAN-78

E TO SIZE MEMORY

100000

737

el
—
11?39
723 815785 605818
{iggg 0557

MACY11 3886%?52)

?gg?b?hé?gtna)

B127800,-(R2)
a2
eemavec
053:3:§n3
3s

SEQ_Q4s8

;;YES--SET KT11 KEY

HINTIALIZE
fon
“roe ANDLosomne
55“880
E?cnr
"593.'5"
EIGHT “PDR.'S"
fifgfiog-“Kl UP, RERD/WRITE

: ;UPDATE FOR NEXT "PAR"

| iSeTUP KIPARZ EOR 170 - -OADED
55&%?“5 ¥I:2RSTF§§
i%g£52°
§EEun3L
2
SYT
MODE
: : THIS EDP-II HAS A SR3 REGISTER
.

#SKTOUT, 9ERRVEC
} ; SET POR TIME OUT
;s 1RAP ON NON-EX-MEM

38143776
#40, (R2)

soxtpna7,(na)

IIMAKE A 1K S
; iLAST ONE?

ggsnbx

(R2) ,R2
¥ §§o

tIGET
LAST snnx+1
: s TURN OFF MEMORY MANAGEMENT
s sKT11 NON-EXISTENT

#4000,R1

: : INCREMENT BY 1K

$177776,R1

::LAST

7
iigse Boe0ee Dier3s 62 ??2 883063
gconE: géx

T
aéé u?:3§£§§vzc’Eégé*ugognnénsour

11561
11325

#40,R2
cn;i

11560
11

056076

0S6l
gggx

02
711

000040

701 - 177776

11262
B26ile
Tes%0r
004000
11
1
7
000040
112&9 gggxgg 6?5085

iissa

ossiaq

oiasa;

CMP

SCROUT:
SUB
§SIZEX: SUB

ggggga

i%s;s

osg{ss

865389

11578

0Sel64

000000

11§7? 335123 000000
iiggg

iiggé

11583

11584

{iggg

11587

11588
11589

MOV
ngg

?a )+séax

EELRS; anuga

59;

égp)+,no

: SRESTORE RO

.WORD

$LSTAD: .WORD
_SBTTL

PRSI S—_—

RO, 5P

MOV
MOV
§LSTBK:

L3000,
R1
%40, R2

i31K STEP
: : TRAP 8aETan ouT

MOV

ggg

11?93
§§§140
§1S?
7 0S6162
iis;x
{uu
ioaar 056164

11§7§
3221?2 815333
11574 0Se154 012601

ADD

ADD
TST

IRESTORE

THE STACK

Egfi;:,a:zggggg+a ; ;RESTORE ERROR VECTOR

n1,gt§§n5

(§$)+:R
(SP)+.R1

;;LRET ADDRESS

;55551855
Fe
: iRESTORE RI

; ;CONTRINS THE LAST ADDRESS
: :CONTAINS THE LAST BANK

SAVE AND RESTORE RO-RS ROUTINES

$ igasglaslag!llllil*illllill!!!!l!llllll*l*illlll!l!lilfll*!f!*l!li

; %CALL:

SAVREG

; ¥UPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE:

i #TOP---(+16)

i ¥ 42--=(+18)
; % +4---RS

SEQ 0219

cznsnoo Rxsxx/os SS VERIF 1
CZR&MD.P11
10-JAN-78 11:48

NO1

MACY11 30A(1052)
10-JAN-78
12:16_ PAGE 221
SAVE AND RESTORE RO-RS ROUTINES

11590
11531

;% +b---RY
;% +8---R3

1159§
1159
11594

iiézé 056166

11897
11538
115
11600

0Se16b
832172
172
056174

:%410---R2
P¥412---R]
: %+14---R0O

ii239

056212

822553

$SAVREG

010046
gxoxwg
010246
010346

Heal Beeicy Blons
11235 E502 16646
11604
016646
11605

016646

36333%

000022

ggg

22(5P),-(5P)

022

000022

MOV

; \RESTORE RO-RS
;
:
¥
RESREG

G MOV
ov

11620
11621
iiggg

MOV
MOV
RQY

{SP)+.R2
(SP)+,R1
(SP)+,R0

056254
5255

STACK
STACK
STACK
STACK

R R SN ST
;3SAVE PS OF MAIN FLOW
i 3SAVE PC OF MAIN FLOW
Ll

;;QE TORE PS OF CALL

cgp)+:nu

12602
012601
863883

ON
ON
ON
ON

(SP)+,22(SP)
(SP)+,22(5P)

MOV
MOV

RO
R1
R2
R3

;iSAVE PS OF CALL

11618 056246 312504

gxesoa

; ;PUSH
:3PUSH
: 3PUSH
;;PUSH

22(5P),~(5P)

(sp)+,§a(spa

sggg

000022

MOV

11615

012666

RO, -(SP)
R1,-(5P)
R2,-(SP)
R3,-(5P)

RIS
22tsP),-(SP)
22(5P),~-(5P)

iigia
55525: 012666 000022
11614 osgsao 012666 000022
0S6234

MOV
MOV
MOV
MOV

Y
MOV
MOV

11608
11609
11610
xxsxé

11615

(5P)+,R3

;i 3SAVE PC OF CALL

TORE PC OF CALL

;;Rssrggg PC OF MAIN FLOW

; 1 POP §r K INTO RY

;i iPOP

STACK

INTO R3

:;POP STACK
INTO R2
;;POP STACK INTO RI
;;POP STACK INTO RO

iiggg

.SBTTL

11626

11627

PETHIS nourxu; WILL
ngxup
THE LONERREYTE OF THE “TRAP" INSTRUCTION

i}ggg

*ggT
THfl?Inourgg INE. THEN USING THE ADDRESS OBTAINED IT WILL

3 o 363636 36 6 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 3 36 3 36 3 36 3 36 36 36 3 36 36 3 36 36 36 36 36 36 36 36 36 36 3 36 3 36 3 36 36 36 36 36 36 36 36 36 % 3% % %

11628

*nno uss

11631
xxggg

0S6262

010046

11634

056270

00S740

11636
11637
ifiggg

056274
056276
056302

11633

11635

056264

056272

016600

STRAP:

000002

11100

00&300
016000
1
000200

RO, -(SP)

TST

(RD)

MOV

ASL

0S6316

MOV

RTS

11640

HROUGH THE
TRAP TABLE FOR THE STARTING ADDRESS

MOV

MOVE

i{ggé

acéP) RO

(RO),RO

RO
§TRPAD(RO)
(RO, ,RO
RO

; $SAVE_RO

i ;GET TRAP_ ADDRESS
iBACKUP BY 2

13GET RIGHT BYTE OF TRAP

:3POSITION FOR INDEXING
i3 INDEX
IN
TO TABLE
13GO TO ROUTINE

;:THIS IS USE TO HANDLE THE “GETPRITM MACRO

11643

0S6304

11645

0S6314

11644

TRAP DECODER

0Se30e

011646

0166E6
000002

000004

000002

STRAP2:

MOV

MOV
RTI

(SP),

-(SP)

4(sP},2(sP)

: sMOVE THE PC DOWN

:iMOVE THE PSil_DOWN
: iRESTORE THE PSW

SEQ 0499
SEQ 0220

VERIF 1

RK611/06 SS

10-JAN-78 11:48

RAP

Y e e e o o e e Sl el o Sl Sl Sl ol ol ol ol d o ol ol el ol ol el ol ol ol el d and ol ond-

CMPU

MACY11 3?“(10&)

_SBTTL

164

10-JAN-78

DECODER

12:16 PAGE 222

TRAP TABLE

S THE STARTING AODRESSES OF THE ROUTINES CALLED
;¥THIS TAGLE CONTAIN
INSTRUCTION.

a POC
_MORD | iEACL=TY
STRPAD: ShPsc

164

P%8Y

;

igg
e
e e

STYPDS

1665

SRESREG ; ;CALL=RESREG

SCOPE1

- gfi

It}

TSTMSG: .ASCIZ

000

AS2SP2: .ASCIZ

TRAP#5(1

—
e

TEST 7

/%%

/UNIBUS PAR ERR/

gfigs

EM1:

ggcé

EM2:

.ASCIZ

/NON-EXIST MEM/

10S

EM3:

.ASCIZ

/NON-EXIST DRV/

8:30'40

EMY:

.ASCIZ

/UNIT FIELD ERR/

os4523

EMS:

.ASCIZ

/SUBSYS TIMEOUT/

g:uwo

EMB:

.ASCIZ

/D TO C PAR ERR/

gggiég

EM7:

.ASC1Z

/C TO D PAR ERR/

0S3517

EMI10:

.ASCIZ

/AC LOW/

owaiog

EM11:

.ASCIZ

/SPEED LOSS/

0S1108

EM13:

.ASCIZ

/PGM ERR/

0S410S

EMIM:

LASCIZ

/NON-EXIST FUNCT/

2440

»»g
bme b b {7
P2 0Pz
00

[l]

[eerSre

TRAP+

.ASCIZ

042515

[
[y

b ) e e

(et

—

fl
o

T Y

o4y2s24

1104

ZRE
258
ey
—
unin St
b e e
tearay
Y 5

LAl LAl N

e Bt Pt Pt ot Pt Pt Pt ot ot s Pt Pt Pt Pt Pt Pt Pt ot Pt Pt P

'\ *IA

A AR
882A

e S

.:CALL=TYPDS

R (NO LEADING
TRAP+3(104403) TYPE OCTAL
R (RS PER LAST
) TYPE OCTAL
TRAP+H(1
DECIMAL NUMBER (WITH SIGN)

SAVREG ;;

1668
Eig

e el

ROUTINE(WITH LEADING
OUTNURBER
04401) TTY
TRAP+1(1
T e OCTAL
TR L)

86l

{56‘0

o o e el e

ROUTINE

TYPOS :IGALL=TYPOS
TYPON ::CALL=TYPON

16
16

[

THE “TRAPTM

3.%555 EM12:
052506

.ASCIZ /ILL FUNCT/

)

TYPE

TTY_TYPEIN CHARACTER ROUTINE
SAVE RO-RS ROUT-INE
RESTORE RO-RS ROUTINE
INTERNAL LOOP ON ERROR ROUTINE

CZREMDO RK611/06 SS VERIF 1

10-JAN-78 1 :48

CZREMD.P11

.ASCIZ

/DRV TYP ERR/

g(ll%

7514

EM17:

.ASCIZ

/WRT LOCK ERR/

fiifi

fi‘:g%

EM20:

.ASCIZ

/DRV UNSAFE/

EM21:

.ASCIZ

/SEEK INC/

047440

EM22:

.ASCIZ

/CYL OVRFLO/

SIBIRA

fiéifi %i% Nu“" EM23

718

046131

.ASCIZ /FMT ERR/

ASCIZ /ILL CYL ADDR/

1§ 053122 047440 EM24: .ASCIZ /DRV OFF TRK/

;

1
1

052040

045522

Lol
TM [

.-.—.—.é
(N

—

/DRV TIMING ERR/

EM26:

.ASCIZ

/DATA LATE/

EM27:

.ASCIZ

/CONT TIMEOUT/

EM30:

.ASCIZ

/0P INCOMP/

EM31:

.ASCIZ

/HDR VRC ERR/

EM32:

.ASCIZ

/DATA CHK ERR/

EM33:

.ASCIZ

/WRT CHK ERR/

EM34:

.ASCIZ

/DATA MISCOMPARRE/

EM3S:

.ASCIZ

/NO DRV RESPONSE-UFE & NXD/

EM36:

.ASCIZ

/DRV ERR WILL NOT CLEARR/

EM37:

.ASCIZ

/DRV STATUS CHANGE WILL NOT CLEAR/

EMHO:

.ASCIZ

~/ATT’N BUT NO STATUS CHANGE OR FAULT~/

—

(=]

—

R
&

[Syt

REE
g

FERES
288 =

ot s Pt s P

ARy

Bt et Bt s Pt P

NNN
o

.ASCIZ

EM2S:
1
825907
xg
1
0s

R
D

PAGE 223

EMIS:

000122

;i“

coe

12:16

0S4S24

o4l 63

10-JAN-78

126

110S

71%

s P P P Pt Pt P
s s s et s s Pt s Pt P Pt Pt Pt s et Pt s P Pt Pt P

TRAP TABLE

%g 020124 O0S110S EM16:

N
n
N

s s Pt P

Bt Bt Pt Pt Pt s Pt (et ot Pt Pt Pt s Pt Pt et s et P Pt Pt (et Pt Pt s Pt Pt s Pt Pt Pt Pt Pt ot Pt ot Pladaiadad ol ol ol ol ad ol ol o ot oY Sl ST o

Bt Bt et Pt Pt s ot B Pt Pt Pt Pt Pt Pt Pt Pt Pt s Pt Pt Pt P

MACY1l 30A(10S2)

020116

SEQ_0S01

SEQ 0222

' CZR&MDO RKG11/06 SS VERIF 1

10-JAN-78 11:48

TRAP TABLE

10-JAN-78

D02

12:16

PAGE 224

m%mSHonadNm@m@m@g

E1I‘flo)Eelo)m).nomo')Te.lme1)mno5)m1]]m1m)e%"me1mSn]1]m]1m)m1e@)m1SOem1v]m1enom1om)e1m)m1emem1o)momb1)m5l1neomo1m5m1omom1owem1lmo1momS1mol‘mo1mofo1liom14

. CZR6MD.P11

MACY11l 30A(10S2)

.ASCIZ

/ATT’N BUT DRV NOT AVRIL/

EMY2:

.ASCIZ

/ATT’N WHEN NOT EXPECTED/

EMM43

.ASCIZ

/ERR GATHERING DRV STATUS/

EMS2:

.ASCIZ

/MULT DRV SEL/

¢i
@

.ASCIZ

/HDR COMP ERR/

.ASCIZ

/SUBSYS TIMEOUT~

EMBO0:

.ASCIZ

/ERR IN RECAL FOR RECOVERY/

EMBIL:

.ASCIZ

/DROPPING DRV,

EMB2:

.ASCIZ

/CYL MISCOMP/

EME3

.ASCIZ

/CLEAR CONTR DID NOT CLEAR ERR/

EMBY:

.ASCIZ

/NO ATT’N IN ATT'N REG/

EMBS

.ASCIZ

/UNSOLICITED ATT'N/

EME6:

.ASCIZ

/UNEXP DARTA ERR/

EM&?7

.ASCIZ

/ATT'N DID NOT RESET WITH CLEAR/

53eguys1os

EM41:

SEQ_0so2
SEQ 0223

020124

FATAL ERR/

181M
181

181
181

10-JAN

11:48

1
1

40
103
14
11

1
182

{

124

{

101

1
1
1
1
1
i

116
1

1
1
1

1aa‘

688

£
=N

bt pmm

—

o0 L£0—

o fone—

s e

5g2

[ve]r
1]

¥elod)

& oo

_10-JAN-78

EO2

12:16

PAGE 225

SEQ_0S03
SEQ 0224

EM70:

.ASCIZ

/SUBSYS CLEAR DID NOT CLEAR DRV ATT'N/

EM71:

.RSCIZ

/DATA LATE WHEN READING HDR/

EM72:

.ASCIZ

/CONTR ERR WHEN DRIVER SERV/

EM?73:

.ASCIZ

/DRV DET PAR ERR/

EM7Y4:

.ASCIZ

/UNDEF ERR/

EM?7S:

.ASCIZ

/7MARKING THIS SECTOR BARD/

EM76:

.ASCIZ

/BAD DATA VERIF'N WITH READ.

EM?77:

.RSCIZ

/RETRY SUCCESSFUL~

EM100:

.ASCIZ

/RETRY UNSUCCESSFUL~/

EM101:

.ASCIZ

/CANNOT FIND A VALID HEARDER IN TRACK JUST READ~

EM102:

.ASCIZ

/BAD SECT ERR ON SECT NOT LISTED BRD/

ECC OF LAST RETRY IS:/

)

Bt
Bt et s s s Bt B
Bt B

e Bt Bt Bt Bt s e s e s B

TRAP TRBLE

4S22

s Pt Pt P

L R

i
b L b e

84
Bie

Bt ot s Bt ot s Pt Bt Bt Pt B

e et B Bt Bt ot ot s Bt et s s Bt ot P Pt ot ot et B

s ot Bt Pt

s s P

s Pt et P Pt

834
83S

MACY1l 30A(10S2)

§5E5¥2 2 52 92998£53 §23
TR 23
SnoS
8
32
M £25%= S8ow§2 52 Rtn Ghio5 ZnT2ol
90 I

MD.P11

SS V;gIF 1

-50-'2

00
N
ot s (ot s s s ot Bt et Pt e Pt ot et s P Pt Pt ot ot Pt P

RKb11/06

s e s s s Bt Bt Bt B B et Bt ot ot et Pt Bt Bt s Bt Pt Bt ot et s B e ot o ot et P Pt Pt Pt ot et Pt Bt P ot ot et Pt P Pt Pt ot s Pt P

CZREMDO RK611/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48
{g;fl

lG?é

060400

020122

MACY11l 30A(10S2)
10-JAN-78
TRAP TABLE

PAGE 226

0“7153

fifl 14

8;35%%

iE;g
=
iggé

FO2

12:16

EM103:

.ASCIZ

~/TIMED-OUT ON RERD HDR/

EMIOY4: .ASCIZ /TIMED-OUT ON SEEK/
EM10S: .ASCIZ ~/DRV SIEZED BY OTHER PORT/

Bt Bt s et s s s s et e Bt B B Bt s s Bt Bt Bt Pt et Pt ot s e

lggg

et
R R

Bt Bt Bt Bt Bttt Bt Bt B

313
33
914
918

.ASCIZ

/DATA MISCMPR WHILE BRI SET/

EMIO7:

.ASCIZ

~/NO NEM ERR WHEN REF’ING LOC 760000/

EM110:

.ASCIZ

~/INTRPT WHEN CNTRLR NOT RDY/

EM111:

.ASCIZ

/NO ATT’'N ON SEEK~/

EM112:

.ASCIZ

/DRV CYL INCORRECT/

EM113:

.ASCIZ

/ABORT- CAN’'T READ BSF/

6&7

11
1

910

416

10;

711

113

0808 caoion4
Gighcg
§§§gfix
3040
EM114: .ASCIZ /KT11 FRILURE/
14
042522

3}9
gig

115 8:3593 0S0040
051666
oS1122 EM11S il ASCIZ /MEM PAR ERR/

920
921
922
923
324
825

103
ggaxxs
S040
120
o46503
045522

e B

e B B Bt B

EM106:

0S1125
041440
000
gq
0201
030466

042522
042115

DH100:

.ASCIZ

/CURRENT CMD

020126
000072
020061

DH10S:

.ASCIZ

/PREV CMD

DH200:

.ASCIZ

/RKB11 REGS

:/
:~

SEQ_0S04
SEQ Oz2es

oooF-ooeSNoS)Se)oooSluolRooo5noovo))%)oee)olo)o)o)o)voo)=l1—oM1~4O1TO1!‘1TD1~111‘
RRE0RQ—NE0—N-oR8mEM2—RmAz3RS2A1R3A2R0A¥Re7TA2—NaTo— M30Ae7EN—zARE—NoRARB~NN—RbER—tRm1E30E5mEFSB&-EhE~mz|Q—oN4p8uexnu4N8mO—8sm£—N-o88ZS8B98Z08~—,N88
o«@o@Ya3OaNRo&a8.XYTNN o-@«O-w&93@gON ©@35aO5@8e.£aN0 ©@C-FTeJ@o¥NO oO@«ea@ga0 N®-TMaRoN@-Taow 8eNo -oaQi e=@ &t a@@ ooo oo WT@ aaa @-u &w@ ooo g2% &ow -zo ooo N~N >a
@Qau@o-naoy 32@oT@@xaaOTS~M O0zoox¥=z--N @o- o@ vs>> @a Nw NI

1m]Lm1LL%e1e&g&e1eu“e1&¥mLL1fee1ieeg1Lw1LLg1L&%mL1LLf3Te1lD%e1q3TD1mD"Dg1D3ILxe"1fL3TDe1imLm1%DD1aDmD1mDfD1eiRm1emED1D%D1mLmo%1oE&1Dwm1L%Loeo ggT e|0bR
0S1S07

%fié:é@.fi%

0061
0102
0040
020040
020061
030101

MACY11l 30A(1052)
TRAP TABLE

020040
020062

10-JAN-78
12:16

a=z-— zw“

a 4

CZR6MDO RK611/06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11

GO
PAGE 227

SEQ_0S0S
SEQ 0226

035040

~—

ab=

—z

[

@ o TM

nO8|Mm--.toMylX4s4wT.'-ql)5NOmui|—3lU.l8Xm—[8&-.l+='][a4s3Tbul8N+oaN.>y\~7e=-tn—tMuDmT4T)|tMaTO({10}-O4tAwmo-(ooo=LA)owNw-4N[ 'm3G4—OT.—LM-(%mo[3W=tvI]aotO—TtINwD[xa-nv—w-oO44ln&~[w—.7oNn1]M4o-XQmX-|O8=5o484)Va=4q=Q4X-4[[-o+aN)=4—e%=t43oT4W-L'I—S—0ilf)N3=4-— 207(—ToXwo—<-&[)+t430oT.y00e-Q=mw~tM3ot8m5MO8—

|JWmMWh#w(=u@mN~Mwm-t-t17etyo-NmMQ|.mfiu

mmflNOWVO—&<mfi-sfim&mglmmm~0mOm-mwnom~m%owa
ATN
o£

oy oTF Qo0

TM wNo o . .~

& §& g& ¢¢¢ § $$ g2

RARARARARERAR ARS8 38 8 4584

u&4o[ Q~ mx (o==] ([“4i8='1] (w-] w~— [oA-20)F]

]%80u37N4Q7.(—~8)OsN2L.L8F5eO8e—3(.vONa.-5L=U3L)u-NQaO8eLS0Loe8L-eee-eya—d[DW.ONa7t2L]DL—S1oaONe-t)mel@-.Dfs[gL)O—Nxe71]DSeDSee5LS[L—aQN1=S]Roho3Lovnd(D8)oe.Q—Na71}LoLtS(R7-]ow4vN]&(n¢}4D]D8o3%ADo)e~(o—LQ81)tiN)[+DAoD5oALo][-L8~oo8.ON]tN[}+oD)L=fLooDAooLtooel7lowN)Q—af)lLo]foLb0i)L1oo8~—l(.a1l&N1LoE8oe=3odL3lo
w'o~)N]4—w«2o4N=Oo kQXekl.mQwx.N ('X-=3] %7oN'woaaQ N&)[|zo>~5=]o4>oN8l]b[€woxQ4='] »"4oou,-[I4€|.NN=0b']=
CZR6MDO RKE11-/06 SS VERIF 1
10-JAN-78 11:48
CZReMD.P11
MACY1l 30A(10S2)
10-JAN-78
TRAP TABLE

12:16

HO2
PRAGE 228

SEQ_0JS0&
SEQ@ 0227

p([4N&+)>A—.

HI PHY

LO PHY

VRT AD

KIPARG~

guse
L)

062604

gggg

062614

2091

O0e2bl2

DH707:

.ASCIZ

/PC

LOERAD

HIERAD

DH710:

.ASCIZ

/PC

CSR AD

CSR/

% e

287

~/MEM REGS :/

DH711:

.ASCIZ

/CYLINDERS :/

DH204:

.ASCIZ

/RKDS

DHS02:

.ASCIZ

~/ERR TRYING TO GET FAILURE INFO/

DHS03:

.ASCIZ

~/2'ND TIMEOUT OCCURRED GETTING DRV STATUS/

DHBOO:

.RSCIZ

/% OF RETRIES:/

125

2
Bl
2507
104
111

1
8;7%0
1124

107
123
000
020106
042511

001164

001166

1210

001216

005264

1
figs
1204
1214
00 1520
001226
fi;z
001204

DT102 WORD
001200 DT201: .WORD
001206
pT202 WORD
001222 DT203: .WORD
001230
001200 DTEO0L
WORD
001206 DTe02: .WORD

005262

DT103:

001212

RKER

RKMR2

MEMSYS/

RKMR3~

oL
o

7505

.ASCIZ

;

—b

SEQ_0S07
SEQ Oz228

DH706:

3 353 58528 83 23 3822
T =2 noots

R22

A2
ao N
=)
-

2 :7398 3aR

PAGE 229

DH70S: .ASCIZ ~/KT1l REGS :/

183
—
EVEN
1116 00SS10 00SS06 DT100: .WORD

53907?
ig
208 %%% 1574
eoeé
D01 os
goeq“ “2535 wiai
001 1§
001224
goaa 0625 g h%
aogg osas;E %1208
20

104

102

12:16

nNoOoWww

1
1
101

osasgs

004503

=-n
wn

? B8 298
RS
ON

5375
2059 062504

2078

11
835040

et dh

12
14

1
1 sg

RRR
SNBSS

§§§§§§§§§§§§

20c 0e3113 §§§?§é

MACY1l 30A(1052)
10-JAN-78
TRAP TABLE

e Bt et B Bt o o ot ot s s P Bt s s B Pt Pt Pt ot ot s s s P

s B ot Pt s Pt s ot P

s ot s Pt Pt s ot ot s s Pt Pt o ot et Pt Pt Pt ot o Pt

243450

CZREMDO RKE11-/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

001214

.WORD

SERRPC,DRIVE,ERRCOM,SREGO,S$REG1,SREG2,SREG3

SREG36,SREG37
SREGS,$REGE,SREG7,SREG10,SREG11,SREGI2,SREGL3

SREGIY,SREGIS
SREGle,SREG17,SREG20,SREG21,S$REG22,SREG23,
SREG2Y, SREG2S
SREGS,SREGH,SREG?
SREG1O,SREGI1,SREG12,$REG13,$REG1Y,SREGIS,SREGLE
PRMPHO,PRMPLO

CZREMDO RKG11/06 SS VERIF 1
CZR6MD.P11
10-JAN-78 11:48

DFO1:

82 22 000883
{5832
1203; 062623
000

120
15833
1
12100
12185
121

12103
12104
12105

061156
go7

061245
goa
061036

0626

000

000
000

061350
007
061053

000

12109 8252?2

000007

000

12108

12110

12115

{Sfia

061159

e 061833

12118 82%223 061036
12118

12116
12117
12118

osasgs

000

0626
ggas7a
2674

061350
00?7
061437

062700

061454

12123
12124

{aiae

12119

062676

}gigé

062702

12120

DF02:

000

000010
000

000

osa;xs

061goa

DH102
DAH200

.WORD

0,0

.BYTE

.WORD

DH203

.WORD
.BYTE

10
0,0

'BEEE

aflooo

.BYTE
DFO3:

0,0

DH201
7,0
DAH202
2,0

10,0

omo
—
000

e 88
".BYTE
HORD b1
0,0

002

000

.BYTE

12137

igigg
12140
12141

061437

825742

061454

010

000

ossruu
062746

000003
000

000

852752

007

000

002

000

12145

062750

12144

i%i:fi

062754

062756

061245

12147

062760

000007

12148

062764

061156

1214

12148

062762

061156

000

“

7,0

.WORD
BYTE
.WORD
BYTE

'E??E
9“601
.WORD DH102

.WORD

DA202

- WOR

DH203

BYT
DFO4:

.WORD
'BYTE

- WORD
-BYTE

"WORD

DFOS:

“THE FOLLOWING REG DATA MB INCORRECT"

2,0

10,0

3
0,0

9#101
0

DA102

.BYTE

2,0

.WORD

DM1OI

'BYTE

|
|
,

'fi??E DH200
ghéoa

-WORD

000

062734

‘ALL CHARACTERS OCTAL
:SECOND HDRLINE
‘NUM OF COL-ALL OCTAL

DH1O1

813 geree 68
igigé
825;52 051°§2
15133 8257
600
062736

;NUMBER OF HEADER LINES
OF COL ron FIRST HOR
*NUMBER

000

12135

SEQ 0S08
~ SEQ 0229

0,0

igias
osa;ig 061189
12153 82%714 osxgqs

12136

PAGE 230

0,0

DH201
7,0
DASOO

.BYTE

JOe

12:16

2,0

.WORD
'BYTE
.WORD

.BYTE

000

010

O
DH101
27,0

.WORD

000

'BYTE
.WORD
.BYTE

.BYTE

000

002

BYTE

.BYTE

000

.WORD

.WORD
.BYTE
.WORD

000

062640
42
2644

igigg

MACY1l 30A(1052)
10-JAN-78
TRAP TABLE

0,0

:0PI,

HVRC

CZREMDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
12150

062766

007

121
121
121
12154
12158
1215;
iais

0627
061245
06277
002
061550
776
000
3000 061771
003
061567

12160

063012

003

063014

000007

xgxgg gfi 05199?
12161
12162

12165 &%‘e’g
12166

12167

063024
&%

007

061245

iaiw
32 061652
061353
15193 %34
R I

000

.BYTE

3,0

igigg

12188

12189

12133

063054

061156

003

007
061245
002
4 061624
063066
000
%72 061652
063074

000004

063104

061652

063110

062037

063076

121

063106

igiqs

063112

xsxgg
121
12285

12199

000

12200

000

&3‘58
1

000
061156

000

&gxau

osxgqs

122
12203
12204

&3130

061036

12205

063134

061350

063122

126
3132

DF10:

007

000

02
000

000
000

BYTE

7,0

"BYT

2,0

Bidos

.WORD

DA1O1

DA1D2

2
b
BYTE 3,0
.a"vnr"g

BYTE
.WORD
'BYTE
.WORD
.BYTE
.uong

000

'59';5
-WORD 3“30"
DAHBOY1

000
000
000
000

DHE0B

.WORD

000

003

12139 063114 000006

.WORD

DFO7:

000

12180
12181
12135
121
12184
12185

000
000
000
—

.BYT
DF11:

.WORD

DF12:

0,0

7,0
DAH102
2,0
DAMBOM
0,0
ghsoru
,0
Y4

'BYTE

0,0

"WORD

DABO41

-WORD

DH701

.BYTE

3,0

.BYTE

0,0

.BYT
- WOR

0,0
DH101

.WORD

DAM102

-WORD

DH201

.WORD

BYTE

'BYTE
.WORD
'BYTE

7,0

2,0
DM200
0,0

KO2

12:16

7,0

DA102
2,0
ghsm
0
DMBEOB
3,0
ohgoa

12178 &38552

00000S

.BYTE

.WORD
.BYTE
. WORD
.BYTE
.WORD
.BYTE
gelrag

o
000

12179

[

000

il
BEe Lo
é{;ss

12177

MACY1l 30A(10S2)
_10-JAN-78
TRAP TABLE

PAGE 231

SEQ_QS09
SEQ 0230

A
n
U
(A]

000006
o6l

B b

&
&
RO
R
ne
208 ¥ R oL

000
000
000

000

000
000

003
062355
000

000

866

061156
00
061c4S
C
061036

061437
002
062414
000
061104
000
061454
010
000011
000
061156
007
0b1245
002
061036

. WORD
.BYT

DF 14:

000
000

000

DF1S:

000
000
200
000

000

000
000
000

000

DF16:

000
000

;FORMAT FOR 2ND LEVEL ERROR
; IN HEADER_COMPRRE ERROR
;AND 2ND LEVEL HERDER
;’ VRC ERROR

000

007
061245
0
061550

061991

DF13:

o
n

000006
000
061156
007
061245
002
061550
090
061771
003
062355
000

o2 RSFERGCRERNSH

8 googzidosed

063144

000

PAGE 232

£ON
X
ono
[=]
£

364

.BYTE
. WOR
.BYT

000

12:16

OO0
O
OO
N
-

05200;

TRAP TABLE

LO2

_10-JAN-78

oONOOoOo
no\Nooo Dg.UOQON
b
ounooo T

)
s B bt s Bt Bt B Bt B

e B Bt Bt bt s B

sB B D

s s Bt s e D B B Bt s s B o B Bt s b bt bt e be e b

N
NN
RN RN
RN
mwmmmmmmvwmmmmmmmmmm
RN
o
433 iy SREEBBVRRECRNSDRI
\DDWU\SWQS@V?
LL
ol
~N # /3%

s et B B Bt s
eb

MACY11l 30A(10S2)

SS VERIF 1
-JAN-78 11:

DH200

;FORMAT FOR 2ND LEVEL ERROR
; IN OPERATION INCOMPLETE ERROR

SEQ 0S10
SEQ 0231

CZReMDO RKB11-/06 SS VERIF 1
10-JAN-78 11:48
CZREMD. P11

063306

063310

063312

000
061350
007
061§§7

i oe2 g

061104
061454

.BYTE
. WORD

000
000

12:16

0,0

DH201
7,0

§2§“

000

8&501

000

ofiaoa

000

[=]
n

DF21:

.gORD

000

00e

000002

DF23:

gORD

o624
001

DF2Y4:

. WORD

DF2s:

. WORD
.BYTE

000
000
000

000

000001
002

000

000000
007

000

.BYTE

£
00
UV
O
0
0
o0
8

06l

000

O—-0=0—-0—-0—0

061326

000

oOmwo
(=
(=]

- WORD

DF22:

000

0e1503

HB0S1

000
000

WOOoOn

. WORD

(= =]
o
£

DFa0:

nNONOO0ODO0OoT
~NO e .-%DN nooo
e = e X

000

o0 N%Q
no-~N
oNGo

DH711

000

3,0
ofixox
0
fixoa
0

000

e B B

Sususash

.WORD

000

D
A
LYY

Bt et B Bt Bt Bt Bt Bt s s B Bt Bt o B
s s Bt B

Bt s Bt B

runnN RN
RN RN NN
W
W
W W
W
s bt s bt s Pt B
e
(=]
NN LW
N

e s s e s

DF17:

000

O S
n

Bt B et Bt B Bt B

s Bt Bt B

L O o T L L
N RN

NMDN'NUNNN
£a8B BDBBBBBBBBE
I IIA YNNI

L
Lo T ]

s Bt Pt Bt s ot P —

'"‘%&%&

12262
12263

MO2

MARCY11l 30A(10S2)
10-JAN-78
TRAP TABLE

PAGE 233

SEQ 0S11
~
SEQ@ 0232

000

ooo

FRK
@
wn
n
:

061245
02
Ob2ee2
000
062265
003

DFe7:

10,0

.WORD
'BYTE

DF30:

WORD

DAH102

-WORD

DH703

.WORD
.BYTE

S
0,0

WORD

.WORD
"BYTE

§
0,0

DA101

.WORD

DAlO2

WORD
BYTE

Q46440

371
372
373

0b365SS
0b3bbe
063670

030062
031062

BEXId

fedee

4,0

.uong
WORD

2,0

8#704

BYTE

3636

7,0

WOR

'BYTE

NOTMSG:

DH1O1

oflgos

7,0

2,0

DH706
0,0

DH710
3,0

;READ/WRITE DATA BUF <AT LEAST 1536(DEC) WORDS>

RWBUF:

3554

0,0
D4702
2,0

a$¥°

.BYT
030

2,0

DH102

BYTE
DF31:

7,0

WORD
BYTE

PAGE 234

&
0,0

DA10!

BYTE

NO2

12:16

DH202

WORD

.BYTE
.WORD
.BYTE

000

368

.BYTE

BYTE

000

3s
36;

2
&,0

BYTE

000

3604

365

.WORD
‘BYTE

WORD

000

B3ues

o2NOC £

DF26:

000

363

e sB

e 2&
ii
T
8085 Sr8eRESnS] Qn8s82dy3B

JOm

——

SEREEALERANNYS®EEEEE
n ZORC
SR

359

Pt s Bt Bt Bt B

Qe3use

MACY11l 30A(1052) ~_10-JAN-78
TRAP TAB LE

061 Sg

N RN

ot Bt Bttt Bt P Bt ot st Bt B B B Bt Bt B

s B Bt s s (et o B B

VN RN

s Bt Bn Bt s s Bt

Bt B Bs Be B Bt e s e e e b

R RN NN

uua

CZREMDO RKB11/ 06 SS VERIF 1
10-JAN-78 11: 48
CZR6MD.P11

%#%% NOTE #x%/<{1S><12><12>

LASCII

<«1Sx<12>/

.ASCII

/ALL DRIVES TO BE TESTED MUST HAVE :/<1S><12><12>

.ASCII

/1. A 20 OR 22 SECTOR FORMATTED CARTRIDGE~/¢1S><l2>

0S1SeS

O0S1

020101
020122
041505

SEQ _0S1e
SEQ 0233

| CZR6EMDO_RK611/06 SS V;SIF 1
10-JAN-78

11:

MACY11 3?9(1052)

RAP TABLE

s Pt ot s e P et Pt Pt o s P ot et Pt Pt s Pt s et s s Pt s s s P

s Pt s s Pt s s Pt s s s P Pt s Pt s it Pt s Pt Pt Pt s s Pt s P P

e
ey

CZReMD.P11

1
1
1
1
14
1
1

3
2912
Sug1

/2. HEADS MANUALLY LOADED-/<1S><12>

.ASCII

/3. DESIRED PORT SELECTED/¢15>¢12>

L.ASCII

/4. WRITE LOCK DISABLED/<15><12>

LASCII

/5. DRIVE READY LIGHT ON/<1S><12><12>

.ASCII

/DRIVES NOT TO BE TESTED MUST HAVE BOTH/<15><12>

.ASCII

/PORTS DE-SELECTED./<1S><12><12>

_ASCII

BPLERSE NOTE THAT THE DEFAULT VERSION OF RERD/WRITE3(15><12>

(]

431

064

2428 824 37
2429

.ARSCII

_ASCII /DATA TEST 21 TAKES ABOUT 10 MIN, (20 FOR RKO7),/¢15><12>

BO3

10-JAN-78 12:16 PAGE 235

064394

1117

051040

122 043505 021101

04109

051508

020123

_ASCII

/REGARDLESS OF THE PASS NUMBER./<¢1S><12><12>

EEREMBPTL°"
1 7B-TAn"PE 11 ue
12430
12431
1
1

06M3S2
064360
4
4

043117

0S0040

4414

i?fl:o 05::52
il

12443
12444
12445

.ASCIZ

7511

027061

000001

co3

12:16

SEQ.P5'daas l

PAGE 236

042s10
020123
051108

1
1
1
0S011

£ne
BE
Ey
2
124

0S2040
051501

MACY11 39&5&0?5&L510-JQN-?8

Al
005015

.END

/FOR SO HZ CPU OPERATION,

PATCH LOC.

166 = l./<¢1S><12><12>

CZR6MDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

coles

12:16

PAGE 238

2104
6962

214s
887S

45SS
9228

9233

9316

9341

6083
S809*
§919%

S834
e072%

S899%
7722%

60S4Y*
7917

7721%

7902

9317

9452

459

8943

9504

9516

9278
2119

onNEwWw
DO

[y Sy Syety

r—oo—o—.—;o—::o—u—u—o—o—u—u—o—o
80‘# n 20
AN ORI LFBDIRS BN

RN RPN

e Bt P

Oe b

e Bt B

e e e bt e Be e b

e e

g.—

fun LR N £ L0 £ £

§$fi

2
=33

10-JAN-78

SEQ _0S1S
SEQ 0236

CROSS REFERENCE TABLE -- USER SYMBOLS

ot et e s Pt Pt Pt Bt Bt Bt Pt B

F2IPP2222222222222 cEo-- 222w 22P2222222222222

Pt ot P

29§

o RN RN NN oy

40718

bt
e e

8
§-4

[

R
S
:
ol

' ABRSE = 177440
= 000200
- ABORT

MACY11l 30A(10S2)

2146

4732#%

429

9439

9449

9454

462

CZR6MDO RK611/06 SS VERIF 1
10-JAN-78 11:48
CZR6MD.P11
laaflb
e42
6415

EOQ3

12:16__PAGE 239
MACY11l 30A(10S2)
10-JAN-78
CROSS REFERENCE TABLE -- USER SYMBOLS

11280

11457

SEQ 0S16
SEQ 0237

11499

4936
7351
4829

4953

4975

4999

S013

4845

4856

4865

4890

So24

S033

YysEY

6969%

6973%

B8438#*

B8S27%

BS4Y4*

8553#%

*
9204

9460*

QY73

Q475

10402

=0S*
6977%
8816

Q4B
1*
6978
8824

10406
6990*
9406

6991%
9509

6992

6998%

6999*%

7000

7025%

7026%

7027

@ryg
gue
g 13 SRRSE ISSni8S

3034
8207

3056
826l

3204
8303

3348
8860

3441
8865

4639

Y737

6151

7390

8119

s8e3

5926

6080

SHSE

7518

7705

S696
36
3025

11290
3205
3047

11421
3349
3082

3442
309

4065
3109

3217

3358

4074

9120

3026
3027

3048
3049

3067
3084

3083
3098

3097
3111

3139
3140

3218
3219

407S
4076

11428
8863

30
B2lE

308S

3099

3141

3220

6862

6864

3003

30S0
8219
3051
3030

3086
3070

3100
3087

3142
3360

3221
4077

3359
s010

11403

3037

3038

3206

3350

6325

9095

8558#
940S
X477

8190

95028

9087

10686

ReR

5710

S830

2143

w
=)

Bagl
Bt B

= O+
(D
D
000+
onNNE
- WoLON

000004

31
5198
823

mg:sfu u::&:g NNNON# £0NnL
B

o
[V

A
A

AA A

s s Bt e e B

A A

e e B

IBIRRIZOR=E °

s 0L

WS £
b
gugmu
SEsSsssssssss
.
=

22
g

22 T

108

728l

FO3

CZREMDO RKB11-06 SS VERIF 1

MACY1l 30A(1052)
10-JAN-78
12:16
PAGE 240
CROSS REFERENCE TABLE -- USER SYMBOLS

BIT3
BIT4

= 000010
= 000020

1900%
gggo

3016
ggis

3017
3?62

3039
3040

3059
3060

3207
3061

3351
3076

3444
3118

4067
3132

6321
3208

9102
3352

3445

4068

|'BITeé

BITS

= 000040

362"
18978

1898%

3019

302

3116
2063

3077

10983
3078

3091

3104

3119

3133

3209

3353

4069

3120

3134

3210

3355

4070

3065

3106

3121

3135

3212

4071

888
3080

3093

= 000400

861
066

3079

BITE

87
4

6500

3105

= 000200

467

3092

| BIT?

2855

Bo%er
3042

306

agsz

463
3021

3122

3136

3213

3356

3357

4073

5293

10S6S

10649

CZR&MD. P11

10-JAN-78 11:48

= 000100

BITS = 001000

BKSLSH
012463
DEXH
04501
BLWMIN
317
BPTVEC= 000014
BSE
=
BSERR =
000002
BSFACT
aag
BSSOF T
323

BUFFO

005272

1896#

g'gg;T:
CALBRT 8839?2
CART
CCLR
CDT
csnn

CFMT

CHGTST

011401
= 100000
= 002000
= 608888

CHKITR

015016

6646
Yyous
357
34578
1910%
3043
40eSs
34758
34748
3484ys
4795
4921

9117
7147
9382
SB03*

11380
7155
96538
28

7720%

8558
6141
8526
8538
4538
Y7
496

9397
3733
8s
8607
4629
4833
4970

189uo

731
3487
30088
30098

gfii?:
34

42928
38
29968
32330
4797

saga
6021

2935

5166

7316

10565
1056

253k
ES?%

7495
10172
6951

75888
4525

7639
76038

14
H

CMPTIM
CMSTRT
CNTROY

5892
4429
41608

5312
4433
4683

033624
012606
010071

32108
6327

10238
9502

7318%

7323

7339

3;36
895
9978
g;;a

392
6181

207

8814

4681
4866
5053

9251
B177%

4702
4869
5055

8288

3606
3094

3609
3107

3108

3123

3137

3214

4706
4g71%
5087

4708
4876
5104

4713
4894
5130

472y
4909
5137

6591

6535

7150

123&3

12?23
7632

7017

7485

8516

9611

10219

10528
3274
3
4837
5440
6256

10585
3223

10636
333
997

10659
10174
10528

10225
10585

10540
10636

10596
10659

10684

5527

5583

5619

5643

5676

5726

479
0638

47474

7686

2887°

000100
S0S4

10002
9409

76M4Y

CLRPRM- 097629
CHMDTO =
CMPBUF

33
939
8807
8812
4632
4835
4973

83224
4730
73728

CLKON
CLOCK

gqao
04s

3095

5204

3046

3081

4830

6301
4597
5172
67378

76098

3024

48268

2355
98

6274
4605
5093
4955
29628
43168

q;sz
%114

CHKLIM
035
CHKLST
014522
CHK
1630
CHK
027000
CLEAR =
00010S
CLKFAL
011556

CLKOF

“332
& 72-

5157
BUFPRT
005502
B.BAlb= 00000!
B.BA17= 000002

309
2992

SEQ _0S17
SEQ 02 38

9566

9735

6047
44388
8451

5065
9493

78408

7164

7169%

7170

5867

5949

GO3

CZREMDO RK611/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY1l 30R(1052)
10-JAN-78
12:16 PAGE 241
CROSS REFERENCE TABLE -- USER SYMBOLS

CNTRLC
CNTRLG
CNTRL
CNTRLY
CNT

012426
Q12uS2
1244
Diguus
3

43988
44028
Y4008
44018
4333

BYEE
B9
eY7h
7130
gy72

7118
2136

COE
=
001000
COMMA
012965
CAMSTR
CONGLR=
D01
CONERR
041460
GR
= 0O0OIS

30468
39058
78
.
3491
18188

9393
9644
€308
68
9083w
490B1

9836

10002

@33
1066

9s2l
4367

¢R
cR

“el
ygos

4084
10890

CNVTIN

CRLF

CRT

70
b6
Seq

' CR2LF

019987

Eirour_

g3e3ze

005720

EYUNDR. 802219
C.INIT
70
& AVan 522323

a37e"

18198

5307

34038

36078

S7gl

051462

DESL
= 0000I0
DFLTST
005670
s
Q1103
DFST
12652

30168
35678
42998
1969

Bek - Y6300
DCKERR= 500020
Biee = 999858
BeRCNT- 803127
=
=

10851

8eSl
B8
7qdqs
8989

%889

1023s
332%:
§§§§'
39178

107118
105818

9001

9025

BS03

G0N

6823

5996

10880

6080

8967

cOke

oéz2e

Sess

S695*

10626

10643

10665

10870

2265
2493

3587
5096
Q4238

4820

4839

442

4863

4888

2352
8Ly

1o
8%

2187
8137

2229
8853

2337
537

BNl

12094#
2es9
2487

5283

15123s

aure
15108w

2643
533

5857

e%r
o613

2607
5397

2391

23%

2403

2409

24IS

121978

DFI4
OFIS
OF 16

0B3174
083224
3550

Sus?
5439
Sy4s

192038
190368
1oocew

OFS1

063370

5841

12590

Se37

Sesix

943l

5368
12140
313
15165
151778
13gaw
g3’

55321

eese

9420

S7aq
2331
5
5319
5326
s625
8373

Bge3
17

10890

10002

062704
0Bo74Y4
760
0B3014
063050
063074
063114

Be33eo

8920%
8951
%

4377

9836

DFO3
DFO4
DFO5
OFO?
DF10
OF11
DF12

BFs0

gl
1

10238

411
9502
4466
9375

aiea"
gle3

DB3144

%450s

Be58'
9413
2042
9350

BFor!
Beoeg
BFO2
BEsgEd

DF13

714

oo oqes. '983d
cuss
sueox Se2s
23La" fBa3" iouuc o o
10698 10877 10e02" 10812 10615 10622

10706
10488

C.SPEC

5745

SEQ 0S18
SEQ 0239

2@
5633

155acs

2301
5829

g5
5571

gl
5589

ees

Se99*

5706

5710

10680

10689

10702

227l
2499

2277
250s

2283
esll

10238

12147

152108

5696

CZRBMDO_RKG11-06 SS VERIF 1

MACY11 30A(

DF22

2637

122954

12313

2649

063430

2547

DF30

063504

| ou?oo

8@10

» DH101

061156

| DH102

0Bl24S

| DH103
' DHION
DH10S
DH106

061263
061306
061023
061326

DH203
Bn%

1437
061454
g2317

%
DHEDé

1036
1350

DHSO
DHSOé

“i?g‘ai
062355

DHSO03
%fi%

S?E;

2245
2323

9006

2559

12308%

: éw ¥

B179%

8233x

123244
Bbb4¥

12335k

2251
2329

11940%

2335

2203
2081
2371

2287
2377

2209

2215

2293
2383

2299
2389

2221

2227
230s
2395

2311
2401

2317
2407

1212;

12142

12149

12164

12179

12199

12212

12225

12238

11
s
11% s

1 185
le2l

12129
12131

12203
12205

120S4s

12207

12118
12120

“93 : i igg
120608 12220

12135
12137

12246
12eS2

12250
12233

12263
12267

12216

12229

12265
12271

0Ob24lY4
gissg

120668
Hfi:

lge4
i i

Dbl16S2
061701
1717
17
161;

8577
2563
S

12183

12190
12185

12192

1
&
{20i7:

11998%
1
2
1
&
12174
12155

12572
1229
1215

12218

12231

DH701
DH702

062037
062126

Bl47%
2657

B178%
15030.

8232%
12282

12020%
12332

12194

705

062206

120398

12341

10022
4474%

10694
11267%

1144lx

9830

9960

999

lgg‘i

DHBO41
DHE042
1

DH;gg

Ob2ez2e

i
4
06 062465

I
= 040000
DISPLA
001142
I?P
174

DlfigFLG

119948 lel

000

iEO‘O é :

12352

3001s
20428
59388

7788
446b*
Y474

13—
B0t o
1 .}30 12310
030%

9343

123:3
18

12151

12305

12114
12116

12170

—

2197

{2337
K

533240 |

2275

15158
j

119738
119768

SEQ_QS1

69
32

12276.
15633
Bl
1/
11953s
12287
119238
12303

242

123164

1225;
Bl
2629

119578
004
119608

PAGE

ROSS REFERENCE TABLE - BseR SymBoCS

2553

1517 '

_12:16_

063400

DF23

HO3

-JAN-78

10-JAN-78 11:48

CZREMD.P11

)

ea42
12244
1232l

10236

1226l
12263

12166

12181

12201

12214

2233

12227
/

2239

12240

I03

CZREMDO RKB11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

MACY11l 30A(10S2)
10-JAN-78
12:16__PAGE 243
CROSS REFERENCE TABLE -- USER SYMBOLS

DONE
DOTIM

8853
4S30%

003123
003133

DRA
= 0OODODL
DROY
= 000200
DRIV
011374
DRIVE
005510

34198
34278

30568
S065s
4o91s
39908

8990

9855

8896
4S27%

10808

B8942%
©731

9084%
6872

9198%
5954

9535k
B026

7453
4720%

S215%

G222

£223

S226

5301

BasYs

9097

oese

12077

5743

5881

593

6035

6121

6133

10076
B%er
10il8
97T
10011

472e%

473B%

47M1X

4634
5137

469l
7348

6998

7028

DRNRFG
DRNAVL=
DROPDR
' DROT.
=

003137
010000
011310
0OODHO

3931
30768
yogls
30628

8973
9333

' DRPDRV=
DRVCAL

002000
040316

3i7e
8582°

10970
5349

DRVDSC=
DRVERS
DRVHRD=
DRVLST
DRVMSK=

000040
003130
000020
00S606

3209%
Jieus
32088
36208
30iss

9941
d4gex
9436
4640
9819

93910
S220x
8917
4689
0

| DRVPOT= 000004

35068

10018

10086

3519

G284

' DRPAR = 000010

BRvNE - 815990

DRVPOS=
DRVSEG
| DRV

| DRVS2D=
| DRVTST

007634
2134

010000

013732

DRVUSE= 000001

30398

8571
8983

4o30s

es
3130
53

3926
4904
32048

| BRCLR= 800808
| DR.SEL=
00000]
DROXDP010134

39878
53868
Gib7s

DSWR
=
DTBAII=
' DTE
=
' BTYE
=
DTYLST

3DSC

177570
100000
010000
000040
005616

(IR . S
DT102

BTs01

DTS02
DTS03
DTEOL
ot

Sa0ex

100496

10507

9603
4995
10470

9848

4619
5021

10610

4465
10569
9338
9301
6231

5524
5314
85l0

5430
gSle

5426
ssed

OBoB4Y
065850
065870
8576

5618
150854
890
5368

7019
8734

10018
46
79498

1
10470
BS58
6384
4785k

120808

' BUCGES
Dbas3e
DUNPRS
O25dua

S30i%

2007
BS46

1824
o528
30998
304i%
35318

Oeseae

7008
BS23

10061

8859

@068

8878

9538%
7646k
6440

6890

6891

6936

10047

7047
BB49s

10138
870
10243
G718
10486

7483
49474

7494
9520

6976

9824
5048

4625
5076

4626
5128

10103

10127

10241

10376

10383

10587

g%
5960

21®e

5533
5575

5559
5578

10362

10369

6889
8480

2521
9830

4692

4784

4gle

6739

7065

8856

8430

10238
10938

s180
55%

818
5384
o432
ass8

o438
eSO

o994
otve

2SSz

2558

2sed

2624

120888

WN3lE

WM36

WN9S

4e9

5312

oupe
csBe

o479
2ses

1583, 120%e

39308
8225

6946

9273

9898
9958
6943

30698

SEQ_0Se0
SEQ 0241

120848

goue
15089

WMoas
63908

6328

4828

4855

E=§o

ce4y

6622

% b

701
714

268
ee’4

EM21

056670

EM2Y
EM2S

056731
745

Eflss
M
EH

EM3]

EM3S
EM37
M4

EM41
EMY2
EM43
EMS
EMS2
EMS3
EMSE

eelde
2e38
22;2

2280
e

67;:

ee9

b41
701
25

2178
e
2310

7072

ee9

e3e

05711e
057144
057173

2334
2340
2346

05723
057300

e3s2
2358
2364
2370
2190
e4l2
2418
2436

0Se434

057330
057360
0S6453
057411
057426
0S7443

2184

Y S WYy

e
e

Gflq

6574
0Seb14
056638

Efll

EMIY
EMIS
EHI;

eee
eeeb

32&55&
0S6564

T Y S S

Efllé
EM13

2640

ebl0
eblb

060726

060663
060704

Y450*%

EMI1L

EMI1l
Eflllg

9836
5025

5592
5314
5504

5254

bl
S000
Bt Bt B s ot s e s Bt ot s s et Bt Pt Pt Pt Bt s B Pt B Bt Pt P Pt ot s Bt Pt Pt
¥UL
L NNNNNNNNO
NN
O D DD
I\l\lfl‘\l\l\la
L NNDNoo
B
IR
nNOo
- 3W ND-- WO\ISS ey
I
T
T 2
2 1 23
7T 5 1
BN¥
\l-SD\IJ\D(:
L2 2 2 2 2 2 2
2 2 2
X3 3 3 323
5 7 F 3

&0532
eees?
Dooe3n

2208
2556
esee

9416

s i s e s B ot ) s e

EHIOS
Enil
Enilo

Oegusl

3042
4816
1913%
2166

JO3

_ 12:16__PAGE 244

4488

Le
T eyey

056361
05%220
060264
060307

EMi0s

100

4079%
Y069
3085#

CH
=
ECOBAD
EMTVEC=
EMI
EMI
EM1
EMIO1

10-JAN-78

CROSS REFERENCE TABLE -- USER SYMBOLS

FUY bt b B b

007226
DZREM
ECCNC =
040
ECCH
=
00

MACY11 30A(1052)

CZREMDO _RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

11782

10002
6S14s

10238

SEQ _0S21
SEQ 0242

KO3

MACY1l 30A(1052)
10-JAN-78
12:16 PAGE 245
CROSS REFERENCE TABLE -- USER SYMBOLS

Me
M&0

11685#
11785#%

mmmmmmmm

CZREMDO RK&11/06 SS VERIF 1
ZREMD.P11
10-JAN-78 11:48
0Se472
057462

2196
2448

Mb1
M&2
ME3
Me4
M&S
M6
5"97
M
M70
M71
M72

0S7514
0S7544
0S7560
b
7644
057666

EM7Y

117

2526

11837%

0&0165

2538

11844#

| EM73
EM?7S

EH?;

M7
NTLCI

ENT
EQ

ERRCNT

RRCOM
FRFRE
ERRHDL
ERRLMT

ERRVEC=

7705

Sill

7744
0011
0044

060077
0131

010346

11242
1251

0031

042164
003127

ER2ENT
EXPLAN
CCLR=
E
=

042204
010500
000001
001000

E.CONT

003052

E gk§3= 838858

E.DLT = D0OO400
E.DPAR= 002000

E'fib%og
?88638
£ NOAT= 00008

E.SCLR= 000040
E.
=
0004
;
s
0010
E.UNLD=
020000
FRACTBS
011423
FC
005732
FDTERM
FINADR
FINCYL
FINMEM
FINSEC
FINTRK

033514
034450
00S574
037336
005577
00SS576

24S4
2460
2376
2382
2388
2394
o4
ee
2406
2508
agéu

2520
532

11790s
11794s
e47e
2478
2484
2490
2496
11688%
2s02
11824#
11829

11796#%
11801%
1180Ss
11808%

11811#s
11817s

11834s

11839%

44
41918

2550
4782

118S3#

ggfgo

Y425

4e02%

gwgeo
339
33
34238

9136%
6883
6435
9511

9137%
89428
6882

11527%

11532%

11544%

11549%

9903

10067

10108

10132

3213!
10678%

9095

9102

42748
Y4148

19068

1152

5195
7250

4463

92018
42078
33484
33578

9263
4899
1817?
10251

9903#
10624%

gass:

334

10390%
33568
33588

9984
991

3355: 1 80e

33598 10095
33538
33508

106
1003S

32208

99;1

ggeg:

ggs

5971
8062
3S1ls
8619%
3S13s
3S12s

77984
8238
809 2x
8669
B080*
B0S0*

33518

42964

SEQ Q0s22
SEQ@ 0243

9840

HYEHYE

9371

10390

10229
10006

7044%
12077
9461
6973

Y47SE
3396

B94S*

B9I47

8950

B9S2%

908S*#

9199%

8438

8553

8560

91978

9460

9475

44B3*
9480

BHS9*

9491%

9511

11558%

11568%

11569%

B6E60*

11408

11409%

11411%

11414*

11522

9106

9110

9114

9117

9120

9123

9127%

9802%

5501

5505

5533

5536

5538

5548

5551

5555

9984* 10699%
10006* 10029% 10035* 10067* 10108* 10132% 10177% 10229% 10251%
10686%

10624

10041

10116

10126

48S

5483

5453

8240

8265

8271

8242
824l

82L3
8267

8273
8272

[

Y4BYx*

9483%

6104

6106

6187

6290

6358

E3RERB P11

0_RK&11/

08 5505

RIF

B8 11:48

MACTLL SBROISRerehENE
930S
6761

FMTE
FNDX

LO3

12:16__PAGE
246
AN=7
YMBOLS
E TABLE -- USER

7486

8072

8332

8521

8541

11658

11659

11662

11663

11664

11665

7224%

7377

7392

7397

7404

94898

9517

6l14

6892

6189
6107

6298
€297

S774%

433

11657

0583 Bau
8646

%12

6617

8456

10648%
10654*
7c2l*

[NCRSC
LN%THH
INITSS

10002

10238

SSO4

S540

S544

S554

5596

§597

Se0l

Se02

7778

9362

9387

10246

10534

10575

10641

10708

5369
e024

5335
6101

S443
6184

SS30
6882

5586
6935

o
N

9605
9608

7450

Sb46

5679

4994
B435%

4997
BYMYM

S0e2

Seel*

S311#

bY463%#

10130

%
10401

10405#*

10409*

7484

77208
4992

10544
000100

——

%
4447

8428
9947

10033

10065

S019
8454
10117

4 —t—t

6349
6353
10059

-nND2Z

—

Ree
*:0—0
=

S
W
g B3o
W
&

GEREEs $99929
s PR

88§[V IV
[y
nE

o—o—r-.-:s

—

oocEnND

Bt Bt ot Pt e

8352n8S8

58
000

(ilb—tn
£ (=]

el ol ol ol

gg"fi@é LRPIREPIRESE
3\3‘0*]

Land ol and and ot o ot St S oY )

gooo 8o
—r—

nnnn

Fg:XXXX
o2

e
e i

: s2
SBXgo—om

uin

.
—d

totatatatatatatatatate

4 -

10077
99308
10172%
9888
10458

10604

10669

103c3%

10593

988748

-4

*&%é

Dosrsre

Dl Dt 0t D

0
B

Pt Dl Bt B

BRASR

39083> 233203

MACY1l 30A(10S2)

—4 0 bt b

MO3

12:16__PAGE 247
10-JAN-78
CROSS REFERENCE TABLE -- USER SYMBOLS

CZRSHDO RKb11-/06 SS VERIF 1
Pl
10-JAN-78 11:48

sS850
9809*
10048
9854
9852
9982
10119
10360

7787

9792

10183%
10104

10480%
10128

10634*
10214s

9892
10008
10129

9897
10024
10134

9900
10031
10143

Bl44*

B8206*

8214

11508

6B865#%

SEQ_0Se4
SEQ 0245

CZREMDO RKE11/06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

6131

6195

34948
8238
4101s
4963.

S090*

S170%

3604#%
7429

4944
8S02*

170202

19548

8920

1071

42328

407

80;
760
007413

LSTMEM
LSTTRK=
LSTTST
14
L
D0S742

005762

MAHILM

006126

MAPHOO=
ggzk

= 678;08

MAXEQ

HRXHIés
Hfl§n13

HRXHifl

MX}%
Max
MaxXIL

76!
220

gggg
00
3516

48S#

4794
35968

g&gg!
19538

43438
40S0s
:054:

34698
34738
34684

MAXI
26
MAXLOl= 88;031

34728
40498

MAXL O 00;822
HeLR<= 000903

40598
0a0s

agg

30244

flg§t8§= 11 ?ég

flDF%?g

00?11?

= 861680

:ggg:

aqéz:

MEMABT
MEMCSR=
MEMSYS=
MEMVEC=
MERD
=
MESMSK=

003145
172100
6677HH
000114
001000
000017

3437%
195Ss
1958#
3454
3081#
ggsflo

MIDXFR

037466

86684

gEC 0S 8?538%
s

MACY11l 30A(10S2)
10-JAN-78
12:16 _PAGE 248
CROSS REFERENCE TABLE -- USER SYMBOLS

6120
9568

OERR?: 6
740
LSTCYL

NO3

43478

T, - e
MINHI1l= 000000

B
4048s

H%N%Lé

88321%

MINLOI= 087467

Sguze

MMVEC = 000250
MODP1S
031304

19228
S096

M.CARDD= 017760

31508

4803%
4932

;3;;
695

5297%
5319

6210

8001s

8023

7e20*

SEQ_0S2S
SEQ 0246

B3SO
5300

7ees

7382

7384

7387

7390

7395

7400

7403

5923

5976

6038

7490

7576

8328

8357

8380

8518

6278
8504 *

6279
8711

bes8e
8712

6283

6746

6757

6759

6764

6772

7427

BS4B8*

656l

6713

6717

6719

6784

6787

5894

S914

6941

7087

8426

7491
6355

4946
8503#%

4950

b532*

6533%

6S47%

8921

7974

S804
S251%

Se53*

S5275%

S277%

6049

6067

§790
5993
2793

S795%
7734%
;7 *

991
825#%
S832

SO#*

S274%

5897

§917

992
807

733%

7827%

S2S2%
oooe

S5276%

B0OS2

;qaau

sggs

H4y32*

9800

4Y435*

i0ece7

7965

7978

7991

S789#%

826

8741

7730%

7828%

S990

7729%

7900

4548

4666

4844

Soe4

SB891l

e0%6

7727#

7897

7915

6070

i060e

5798

786

Sggi

NS0O3%
8175

oot

4S0O4#
72738

Tralw

TAM2

SaRenoopri 16-Tn-

MACY11 30“(1%52)

RIF 1
11:48

CROSS

SEQ_0S26
SEQ 0247

_12:16_PAGE 249

REFERENCE TABLE -- USER SYMBOLS

7681
7942

7869
8352

7876
B34

7951
B3I

109338
10904#

suge
541
8603

490%
Sq4¥
59p4%

549
554
59pb*

x
934
550%
5368

S49S
5551
5976

9893

10236

J
1
1
2
1
2

£
£

WUV ERR

L :

Bon Pt s

WWWWW

s bt

SoRosaoRT AL

e b

s e

31498

10-JAN-78

BO4

1
e

nLLe

—
[y

5
J 3R

.S833233958
"

SO4SH

§727

5868

£970%
52158

6974
6426

5367
B33
10532

5393
elge
10573

5441
E2ss
10600

5480

5528

S584

S620

Se44

10618

10639

10662

10671

1070S

5168

5208

659

7324

107368

9347

9836

10002

10238

S80S0

5057

10236
948Y

5928

9358

S677

99%
8974

6979
soss
105815

S533%
S59%#*

9830
6389

4494

Ss07
5590

5
oo

4335

T8I N

S50S
S588%

10058
858y
a7

NXDRI v
NXF

SSOo4*
5557

9502

CZRENB0AKGLL/08
S5 VERIE 1

MACYLL 3pA(I0SE) AO-IBNZE

oREqsu=
00020
N
8305‘0

Ju4se
3 8

3;32

PARMO

gsgsl

PARM1

PART

= 000000

]

17S1s

3293
4976
PART
PATRN

S4Y

PATO3
PATOY
PAT

006356
416

37678
3789

456

38118

PATIO
PAT11
| PAT12

16
006756
007016

39198
39418
8

PATlS

PAT
PAT

S16
Sk

PATLS

DO7DSE

PAT1

GO7iSe

| PBSVAL= 001000

%LKFC

PF‘{ETN

PGE

Q04000
i

11116

1764

e0ll
16

4099
=

Q740%
1767

g&g
1

3690

9936%

9943

9964# 10S08%* 10S68* 10630% 10647%

;gsY

ggfl;

“

8716

aysg

9528

9579

g:?"l
24

351§
3623

3546
3631

1770

369S
378

1780

407
sYzE

1792

4081
672

1800

3563
3641

4306
6817

9838

12357

12358

12406

12442

826

g8l12

8183

8238

8709

10395

73l

I o oo 1ovsre

:géal

4523

114

8129

SE0_9527.o

9870%

818S

12443

1806

3568
3647

1807

358S
3657

9613
1970

1972

3594
3661

3597
3669

yysg

1974

3602
367é

1976

3604
3639

4392
6819

4431
7036

7508

7583

4491

4sS1
8310

Yo
8480

B82H4

8683%

S84 >

8685%

9685

5587

5623

SENT

38328
Ys

478 Bl
4027

32148

38
:

Yesos

S015

7335#%

7588

9293

10236

PKS
1%
T

49
Jiegs

ysee
785

7613%

7596#%
78k

8;83:

sggg

5730
7218%

;87
2l

30688
18238

PMA

00Se02

gz&;.

PRPROFPFLg

géééq&

2 1§I

PKB

PRMINP

007500

012476

PAGE 250,

9854

30258

s W
=
2

12:16

CO4

98S0*

= 002000

PIP
PIRG

12:1

5692
44yli2s

41lls

Y566

I?'
5026

5953

7609

89?%5

8131

8202

8282

5101

S142

S239%

Scbex

5346

6028

5370

6102

5396

618S

6260

5483

6498#

6531

8457

8891

CZR6MDO RKB11/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

~ 36364

4506

- WOV

==
-

—
Lol and

18%

1840

DO4

12:16_

PAGE 2S1

Sa40*
1

S241%

S259#%

S2b3*

SEQ_0S28
SEQ 0249

7554

7382

7384
7403%

9728%

q742x

728

8878

8567

519

4568+

8818. 1358 14782

6266

6292

6333

113S1%

i1359:

11360%

7392
7404%

7395

7397

10451

10452+#

10711%

7400

12092

e876x

s218

7048

‘3263

9529

8888

9601

6744

7281

1008S% 1688E” 16372«

10073

10386%

10594+%

7015%

BY476%

8526#%

8538*

7492%

8686#%

9149

nuuunn

Omm

SebY*

5199

go—u— 8 B2

Ore

RARAAATR AR RN

S236b#%

8919%
Sle2

34808

10-JAN-78

CROSS REFERENCE TABLE -- USER SYMBOLS

Y4168

33353333
3

fiiégsggé

PRML IM

MARCY11 30A(10S2)

bl1a%

O
O
0
<
v
v
r
N
4
- o
nonn

.CS81 = 000016

TM27
10657

H49%

5393'

P.DCYL= 000030

Sl
9622

BS54

1065¢
10097%

387

10331%

$920

838"

SbaS#*
S962#*
5366
838

8518%

EO4

CZR6MDO RKE11/06 SS VERIF 1
CIREMD. P11
10-JAN-78 11:48

MACY11l 30A(10S2)
_10-JAN-78 12:16 PRGE 252
CROSS REFERENCE TABLE —- USER SYMBOLS

P.DRVN= 000000
PI0S = 000030
P.DTS = 000026

6890%
9158

PP EPoS=
D000
ER o= BO003Y

P OFST= 0OOODG

P.PR&T= 000014

P.SECT= 00DOO0Y

31908
3237
35338

190%x

35408
35368

10326

6936%
9278
8658

9863
9eB2
BE7T

10040
9333
@e72

10216
10100%
9153

SEQ_0Se9
SEQ 0250

104SS
10327%
9401

10608
9403

9590

9625

9626

9655

966l

9735%
101IEE

984S*
10IoEx

98GR
10IdB¥

0%
iQfuI

9917
LGS

blEME

B16S

6189

6273%

6298%

8988

S
3129 e
9224

100S9% 10328%

35008
3eis

9381
100lge

9264
10091

9436
1004«

9441
100S8x

9446
1007ex

9451
10oSes

9Se
1OIIS

00%ie

10788¢

6118

Bloex

8123

Bl127%

6129

6140

3796s

10470x

10817

J0SO7¢

10S3lx

10532

P.TRCK= 00000S

2i30%
Bo49%
9la9s
€391

€337
BS50
Cidos
€353

E349s
Bbe2
GiS6%
gax

6356
Bb7b*
6193
70I4

P.MC

= 000012

9%53s

E111x

G191%

6272%

P.WCR = 000022
QNEMSH=
g, INTT=
1
=

30318
3520
Soa18
8
3444

9158

= 000164
ROCHR = 104406

29788
5113

9866
1ibbos

10645

RODATA= 000121

10SS7

468
9l4p
B197%
S4alx

10Sed

BOI8
9598
6198
GOI9

10575

10800

B347
10554
bol4k
G0y

BSo3r
10656
b2l
G082

8388

6299%

6300%

7016%

7493%

10099%

10324x

9276

9321

9326

9331

9336

9470

ygon

N783

4E27

4ESY

4903

4%I

SON

53688

6138

6323

7008

7489

8517

HEAD= 000125
STAT= 000141

23708
Sirgs

©S281
g8

S74eT
7usl

7520
o%Ew

9603
10al

9980

= 000113

Sagss

5348

9472

10524

&82a4

9508

gz3s

g7ae

galer

RCLREG=

004000

ROHDO.. 999998
=

RECODE

REDBSF
REISSU
RELERS=
REPLPR

0002

005504

036674
003140
000140
007753

REPSUP 041704
RESREG= 104410
RESVEC=
RETANL
NMC

REVRSE
D

0949324
O44342

011740

RKRSOF= 000016

3075

yea3

3%4"

53938

ji88

9271

9383
9466

9595
Sigoe

8300
3530
3975s
Gj4ee

BS14s
%
63
4E73

19078

9se8M
10538

3591
gi30x

5
8781
8ode
(8683

8792

665
5810

8030
872l

10891

8990

7043

9353
9363
xS

9574
iEux

9378
ez

9384
Ger

7776
7oy
8163
630

- Bl182
Eua

9946

10026

Ge17

7525
eed;
8094
ee%

gsee

9473
BSb2

9535k
9208

9538w

29468

8884

9557

9876

6003

8633

10663

8539

B271%
8330

6297%
€360

H3IWOH
8519

BYOL®

@477%

8494

@S5k

SO75

SI24

S1%

6se:

garsy
9413%
%02

g3
9331%
9ules
ds0

gas
9336*
9429
3509

7809
8505
9673

7ga3
@610
11008

a7
8635
110G

Gmu

9999%
U0

93lpk

9406
e

9351%

B8535
B30

8881
sule

8403
9531

91348
Zurd

8407
9560

9206
7ee7

8484
Gl4

10281

10329

10S518%

10S43

9271

9276%

9NO9x
w7ex

9326%

9099

3204
6998

33388

G298

1086l

7020

BS3ex

808
10512
6308
Goeee

10552

8708

10618

BOS9%
9976
6207%
G021

9144

B679%

10810%

7911

B249
9070

8305
i8S

FOu4

CZREMDO RKG11-06 SS VERIF 1
CZReMD.P11
10-JAN-78 11:48

MACY11 30R(1052)
10-JAN-78
12:16 PAGE 253
CROSS REFERENCE TABLE -- USER SYMBOLS

RKBA

SEQ 0530
SEQ 0251

RKBADR. 007596

29418

10277

10325

10S51%

003036

3336w

3228

4SSle

4SSk

4Se3

uS72x

6BBY

7774

931

965

9518

9MI

9729

RKCS1 = 000000

373

4Y84®

S771%

SBY8

B9BY%

7757

93p2%

9366

9391

9821

1Qeblx
8886%

1Q673%
9552

10EE3
9793

10e33
9953

10546% 10274

9551

106Uk
886

10163% 10351 10233

9387%

10588s
¥

18093% 10173

7775%

10576x
M

3381%

1070
10217%

10835 10030

10275

10323

10S06%

9390

9955

9956

9957

RKBAS

' RKCS2 = 000010

| RK
RKDB

= 800024

]

Uuuu

RKDCYL= 000020
RKDS

RKECPS=

10284

10594

007574
007551

41238
41198

RNORDR

=
=

ROTTHS

3040

10286

RKWC
RLS

33388

33378

9%7s

10285

4YS02

4584
4575

4500

55408
30178

9856
10632

011537

43198

825

RISt
ole7ed
RWBUF
3554
RVTE

RWDTST
O2usie
RWT INX=
40
R
050522

R.CONT

050546

NORM
SAVPAR
SAVPRS

0S0534
003206

sA
SAVXDP
SCLR
=
SCNDRV
SCOPER=
SCOPE1
SCRACH

003210
027254
000040
027650
104411
055130
005542

005560

£G= 109407

9466

10287
9559

s
)
29538

RKVEC

6964

RKMR3
=
| RKPAT
=
RKPOS =
| RKPRTY
RKVADR

10590
63es

29864
29458

83508

RKPRI =~ Q03042

3340

10620
9%

19375y 19283 19893 10538 10396 1osiee 10SS4k 108Se%
533;:
529
2
93
834
9365
9388

RKECPT=
RKER
= 000014

RKMR]

21158

7573

B 5%

36049

306
6315

B2218
9741

iBs

Bie?
208

b742
9851

1004k

4SeO*

Y556 ¥

E073%

B078

10327

10655%

10283

10360+

9999

10280

10328

4579

4S9Sk¥

9728

10452

1037

10374+

10381%

10482%

4574

4S77%

S747%

S841%

7753%

7768%

|6l
8936

6110

6137

8r07

6190
1338%

6269

7015

7023

7492

7497

8002

8004

9943
9914

10121
9985

10141
10007

10611l
10036

10069

10109

10133

10178

10230

Se7
17
8714

68098
10682
69348
116BSH
11665
4645¥

10279

10552

775
8001
8702

116638

10S53%

9824

10324

9926
9908
10409%
10081
B135

11039
3965
6776
30208
4761
6332
113788
35038

9833

10S11%

10276

Q1
10391
72
6691%
8704

9558

10595

9803
10253
3679
39648
35098

10331

9389

Y557 %

84
10625
10405%

10679
10548

10688
10621

10401%
10030
10701
10709

633
3
©806

ge77
8062
B850

b7
8110
8906

eE03
8177
895

g8l2
8239
9083

7yze
8325
9135

7449
8468
9197

7esz
8432
9548

7793
8572
9589

7Ble
8619
9653

7ge2
8668
10993

4EHWE*

YBY?

SEB4%¥

S690%

S702%

S5708%

5767

5812

S965%

5967%

036

8715

6139%

8206

6146

B1S0%

6153

635o%

HI53x

7148

7150¥

7IS1

7ibl®

7lel

ESReMD.

SECNL1

010727

CZREMD.P11

SECKN.E

611/06?S

01075;

2EEKerTM 892440
=

Vv RIF l

SEEKHD 033472

MACY11l 30A(10S2)
CROSS

7163

7802

42358

4925

g®2*

2973

ueuo:
;fi;

4329

;;37.

7 égo

SELDRV= 000101
SELECT
00SS34
SELPIS
011145

29608
3500%
yoees

6957

SETPRM
SETTUP

4520
S341
sgsg

51218
5365
2227

005774

36098

§§§E§ §i§;3

::QB:

aggg

SPACEN

012471

44078

ggm
=
COMX
012264
SPDLSS= 000020

2
43808
30608

11410

016464
030462

SIZMEM
026072
SKI
= 0000

SPACEB

2467

SRTSPC=
BOBITL
SROT = 1@%%
SRl
SR2
SR3

= 177574
= 177576
= 1725;

gr
TACK =

STALL
gmu;

TKLNT=

7
0011

032472
;;5
1

PASS
017002
STRCMD 040606
SUBCLR= 009177

P
—
émé 003176
UL

SUMLO2

svgtfins 100000

SWREG

SWRMSG

837558
000176

007614

42948

4
3036

Y4068

7297

7454

78
9318

7199

asse
6001
9282

B064s 1099]
d : 225&1
19278
19288
198?0

6657
6658
2273'

75448
333 #

8851
4512%

506
5751

S5213#
7758

335! u!.

57935

33 T
18118
18228

5991:

il
33230

9g
944

sgas

T
D)

7667%
34628

680
S90e*

8395,

30520

1959.

41268

7822

10-JAN-78

8181%

B339

8876

10638

7496

_PAGE

254

sEFEAENCE TABLE -- USER SYMBOLS

23/

c558

GO4

_12:16

5560

8247

B8260%

8263

—

oou

Zl3d

€59]

5593

18437
5626

Se49

S4S4
SeS1

S459
S6S3

S463
S687

S487
5689

SSs08
S70S

5675

§72s

5866

5948

8303*

11533

11548#*

7409%

7635#*

7657%

7877%
7410

7634%

7656#%

5132
5439
6180

5176
5478
6202

5526
6206

5582
6255

3393

961

931

9019

9022

042

9047

062

6656

E854*

H8SH*

6858%

6BBO

8136%

81S1*

8207%

BbYS*

BBB1

11545%

5219

7041%

7042

8439

4YB21%

4900%

5298%

SEBS*

S703#

8455
7046

8906#
7771

9519

9600

10676

10234
6006

575
46

5780%

e
?.91 *

GSB18%

M
§e§3

5887%

ge-es!
-

5888

N
2999
988%

7871%
6004

790
6059%

8326%
7725%

9798*

9082

wue?

wuzax

wusox

elSI

w?g

5515

B61S

6618%

7583

5981

7867
599%%

6616

18383

5127
5391
6126

7723%
5982

I'd

SEQ_0S31
SEQ 02s2

7878%

6262
9030

6309
11268

7922

6313
11275

6319
11287

6321
11290

STsERAoDTePSN
et e —

= 000001

0Mo— o

:]T:Log:T:T8e@-aTbog:o~rdTTop::TTT—TgTTLoTLooaVTmu]TWn—8o2Tog:]Top8Do8Tt.[1o.[8L.Db8e:e8ee8e8b:b-— e8wNne88e.eNOe8AMbmNbNNWNIFNMDUO—~OOD0

TMoo -[=V]eloplD—ml]OMO— IOWIS@o MRDeC0RCR0Ce0aR00Ob000RN

8S,0>ANORRwPeSnSB.SReRBS
CZREMDO RKb11-06 SS VERIF 1
10-JAN-78 11:48
CZREMD.P11
MACY11l 30A(10S2)

CROSS REFERENCE TABLE -- USER SYMBOLS

- —

—

10-JAN-78

— o o[TM

-— o — TM O

12:16

HO4
PAGE 2SS

SEQ@_0S32
SEQ 0253

1
CZR&MDO RKB11/06 SS VERIF
10-JAN-78 11:48
CZREMD.P11
§.3pLs= 010000

30988
311

S.UNS = 040000
S.vw = 000100
3. WCLK=
000100
- 2.uGAT=
| SIWLE =
=
| SIWAL
| 3.XDOK= 000020
| §;XERR= 001

311498
30928
31338
3134
3110w
30978
31188
31378

S.SPIN= 010000

S.%
s.qugs= %
s

B
81
82
53

TBITvE=

TCONH
TCONLO

4923
4923
4927
4927

52%
5297
8290
529l

3166
003164

39568
J4ces

7682%
7684

7940
7941

19088

011513
TIMSKP
TKVEC = Q0ODED
010450
TLSTHD

33108
19168
42038

TOPROC_

69%

35388
38998
008
36018

3638
5792

312

TIMSEK

008750
2750
784
4

Q44352

2889

s7se

46368
7663

4693
7703

7645
4498%
4803

4499
4848

6904

7777

4704
7708

4759
776l

5973

6033

9086

9253

95478

5963

3498
148
£303*

YySlx

Y4ySex

80178

11361%

6319

6316

6324

8731

55120
AL 883ise
12TiNe
TSTHDS Q102uY

3078
ies

53333,
328

coiux
3519°

s7aex
3690

s7wusx
QG2

022760

8868

5885

5905

5946

RAEK - 099930
TRKC
T
10771
-

TRAPVE=
T

TRTVEC=

Qo428
13098

4934

187
1371
13TI0
78711
TSTie
1371
72714

056342
020002
021226
021300
0213
1626
0224940

41808
996
313
2584
2620
2694
2677
2727

4781
116674
53398
Sb1b#
BeHOW
56738
57238
87

Tsré

8536e2

8938

B33l

78721

D2M516

6182

78715
13780

1873

7874

T3TS
7876
1817

262

SEQ 0523
SEQ 0254

31288Y

014012
3150

TELDRV
TIRER

o4
PAGE 256
12:16
8
10-JAN-7
)
30A(1052
MACY11
CROSS REFERENCE TABLE -- USER SYMBOLS

8093

6178
53

S3e7

5838

020414
020620
021080

B4y
24g
Sse8

B4768
B5248
55608

393

4378

58644

60S7

7749

gy
4ssex

4esr

4e3lx

6741

7076

7200

CZREMDO RKB11-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
TWOTOS= 002000

TYPAVG
TYPBSF

034260

037164

TYPDS = 10440S

TYPE

= 104401

' TYPERR

040776

TYPLST

015726

TYPFMT

TYPMAX
TYPMIN

003124

034234
034210

TYPOC = 10440

4O074s

600S

73908

5829

S83S

6404

7903

4493
4633

4497
4636

4gs2

4894
4960

4895
4967

4899
4%8

310

003006

Si2e
5928
B482
6979
71581

7495
7961
8585
3005
9042

7965
8589
9
8947

11363

83ese

34208

8131
5998
BSi4
€393
7163

9007
9051

4755

7
7898

7293

1lg77

79874

7918

11659

4535
Ye4Y4

4YS4S
4647

4566
4655

4570
4656

4575
4665

4584
4673

4596
4683

4598
4688

490i
493l

508

4309
5028

4910
sgMe

4925
S

4923
5056

4930
072

4934
s073

4935
Si04

7413
7911
8576

7453
7914
8577

74SM
7920
8

8599
90i2
9057

5i%5
6001
BS515
7000
7168
7300
7BMS
7987
8608
9015
902

BOC?
BSE
7001
7170
7301
789
7991
8973
9016
9

5205
6006
BSe4
7022
171
7339
39
8B4SO
8989
9017
9065

5303
6082
BSBS
7027
7173
7340
7905
84Sl
8930
90i8
10854

825
6402
6581
7028
7192
7407
7909
8575
8331
90i3
11101

8995
9022
11166

5233

5256%

6893

6934*

BI47

696*

7009

7018

7916
7913

79748
796l

11656

7294
7500
7974

11655

7297
7644
7978

9001
9026
11270

9011

9021

9024

9044

6578

7201

7247

7252

B8998

11657%

G0
993s

4es0
d876x

7idz
a877°

9901

99¥ex

9947

10026% 10027

10033

10064

10098

10106

10130

10092
10322
9815

9887
10103*
10362%
981

9898%
10127
10369*
0

9931%
10i73%
10376%
9859

9933
10174
10383%
9353%

9939
10214
10S37*
930

9968*
10218
10538
93%%

9990
10219%
10540
10010

9992
10221

10022
10225

10099

10238

10280%
10284*

10365

10372

10379

10386

10281%
33208

T-ER

0030ie

33g54

T.MR2
T.P0S
T.WCR

7243
5071

7299
72iBs

10543%

10544

1
1006i*
10274%
99

9873
10091%
10321%

9833

9836

9999

9919

19555 10842 10554, 10°%6
33258 10097 10282+
335cs 'S82qx 'SBoS 10100

10279%

003024

33288

238

9911

9971

10055

10072

10285«

1036

10114

10136

003030
003004

33308
33198

10286%
10094

10276

BE43

6692

8249

8916

9237

9243

9815

9893

10236

10606

UNLORD= 000107

8
9025
11241

5837
6476
£43
713k
7250
7473
7924
8584
9004
9028
11278

B85398

003002

UBMPRS
0G3144
UEXATT= 000010
UFE
= 000400

583
B472
1
7130
7244

8594

T.CS2

003006

5830
5831
BYOS < B4BE
BS91
B
7118
7124
7139
7219

8588

8833
6827

33158
10047%
10234
33174

J-HR3

Sl
5978
E483
6992
7186

7923

4987#

D03000

003010
083012
003020

4490
4632

SEG_0S34
SEQ 0255

4914

T.CS1

T.0A
1:8¢
1.0S

4489
Y622

610S
S840
BYB0
978
7147

5027
4990

T.BA

8572

4488
4599

TYPPAT
TYPPRM

TVPIST 031136
T.ASOF
003014

9568

6%90

116588

(031252
0311

9254

839

TYPON = 104404

TYPOS = 104403

JO4

MACY1l 30A(10S2)
10-JAN-78 12:16 PAGE 257
CROSS REFERENCE TABLE -- USER SYMBOLS

34368
32078

30238

2963s

9908

B371
9451

10487

6558%
9882

10050

1087SX
10002

10373

10380

10387

10388

10093

,
10215%

CZRGMDO RKG11/06 SS VERIF 1

CZREMD.P11

UNS

10-JAN-78 11:48

= 040000

UPE

= 020000

30518

KO4

12:16__PAGE 258
MACY1l 30A(1052)
10-JAN-78
c ROSS REFERENCE TARBLE -- USER SYMBOLS

9313

SEQ _0S3S
SEQ 02S6

30288

9225

9830

999

oos7ee

j0es

4eE

6299

6751

WCE
= 040000
WCEFLG 003141
KCERR = 000100

30298
4338
40708

9427
6317
8735

9830
B528%
9430

99%
8530
9502

10236
854Sk

8547

B8Sb1*

8733%

36108

B8il1

8180

8236

8634

8677

870S*

8706%

30488

9309

9836

10002

233

6103

el86

6211

63l

8479

10559

39728

6132

6315

8024

8482

10SSS

9923

9938%
10599%

9951%
10617%

9965*

10013#%

10080%

10089*

10118#

10140%

99%66*

10012%

10079% ' 10088%*

10i17%

fosd BER
=

- WCDASK=

WC2BIG

011

XFR

005572

WHDSW = 000001

WORDSP

= 004000

012502

uRDATA= 0ODTE3

WRHERD= 000
WRL
= 004

. WRTCHK= 000131

WRTGAT= Q40000
WRTLOK
007707
WRTSEC
036542

W. DRV

W.MILI
IN,
W.MTIn

003060
003086
003056

W75k 383768

oyt

W Wk 898590
W.BSEC

XDPSAV
XDPSVD

:
X0P3

XOVLAD
XXDPAD
XXDPCH

003064

005550
00313

5355
057374
027354

003134
005546
003117
007240
HD
001000
SR%TRT: EREEEe U
YC

SATYI
$ATY3
SATYY
SAUTOB
$BASE
8DADR
SBODAT
SBELL
SCHARC
SCKSWR=

$CMTARG

5436

N
420
2y
001134
001374
001122
001156
001310
053200
¥REE¥E U

001100

G438

Youds

0418
J4138

is
50674

S086#
31398
guoge

4ioe

1Q4i1%

4953

7294

9730%

10460¢

984S*

1052de

9871%

10526k

9705
10523
e

10691

1139

10410k

10458k

10Suew

10118

10826

33808

9872

9937

99S0*

18232

18283

830w

B769%
6760%

6837

6790%
6770%

6821
6793

6822
6814

6848
8437%

628Y*
6719%

H368
6720%

BBL3%
B721%

8431
6762

6768

6820

11270
10866%

11302
10873

10882%

10887w

4440

4441

yy4yg

4455

4456

4457

878, 1923%

6obl¥
E6715%

2021s

9844

9922*

39088
35058
aice
Y0B1%
1998
11479

1144988
10839
11283
20388
51458
20338
50358
50968
10856%
11662

9732%

1061b%

6774%

11460

arese

10547

10598

35068
34298

E81c
£853
6826

8737%

7001

358
33818
s

3325

10236

816"
£33
b832#

6775%
G541%

6868

4SHS
20048
11494
11452

114498
114518
4SS5I

000040

50588
el

sSusss feaeeg=1

lfl(flfl)lfl§°i
T S SR
U‘QgNUVOQUQ\OFOOmH

RS888R8888888R88
: 17
258238
SEC RS

[

\Nor

205;:

2053:

Egggc

c08l#s

s
27
2086#

2056:

20Ses

CRor
83

59
oLS

20S9s

SEQ_0S36
SEQ 0257

2060
2073

20bls
20748

2062
207Ss

2063
20764

20648
2077

2065%

50533

58548

S0%E%

58528

2077

7168

7173
9007

7413
9015

sl
50688

sl
50898

s8ads
50718

SBEEs
50738

20874

2088#s

2090

2091

2092

2093

2094s

4665
7899

4807
7909

4991
7914

S840
8578
10890

6483
8585
11278

6564
8599
11302

6565
8995

11034#
7498

10993#

2082

c2084s

2085

20788

11558#
4596
7500

9028
115658
1241
7976
7226
11082%

90S1

11249%
7989
7411

S2lb*

H5388%

6407
1124Ss
64098
6400#
b417%
64168

b413#

4733

3065

11297

420
4478
864
#
11265%

10834
4sse

11280
4734

11457

6980

11459

S210%
11302

6337
1137¢

7064 #*

6401
11392
11419

11425%

11272%

11273%

11274

11302

11271%

11302
11293

11295

11302

11451%
10859

11479
10890

11488#*

114964

8044
171
11430%

10791
6599
11431

10799
7327
11433*

10804
%
10761
114944

8981

11274%

11282

11302

1?453:
8986

4y4ys7x

21478
1148S#%
10890

4Y485*

PO FrBes

e e e
U LSl Sy S SRR U of Sy
b b e OV ) £ M)
L0
e—
nu
-0
owun
W

o
B
A RR
L Lo l® e

— - 000N

—

U‘Nmfl‘fl'to—a

—

= 0

——

SCM3
SCMY
SCNTLG
SCNTLU
$C
$
SCRLF

(=]

sCM2

LO4

12:16__PAGE
o JAN-78
CE TRBLE -- USER SY

ROSS REFEREN

20S3s
o= = 0 I NN = b= b= YN nnn

SCM1

76-3an"

MACY11l 30AR(1052)

RIF 1
8 11:48

DoOW

CZREMDO _RKB11~/
P11
CZRb

11439

11445

300S

MACY11l 30A(10S2)

b2
0011eM4

6530
11302

6823

7574

8043
1 4535

12:16

PAGE 260

SEQ_0S37
SEQ 0e2ss

8132

8203

8292

8301

8690

8748

115308

e 5s

£33cx

1435 11343

11382

11423

11438%

11444

2010
5724

210Ss
5865

Y477
5947

S340
6019

5364
6096

5390
6179

S438
6254

S477
10834

5525
11280

5581
11436

11455

11490%

11494

114585

11468

S3808
S63e
61708

5382
S6578
6172

SY1l4s
S659
6222

S467#
5718

S469
5855#

SS13%
S857

111S6%

11182%

6394*

£395%

S7%

11534%

11557%

S617

SeMdl

S131

S20S

10810%

654
11571%

E~d

11578#%

W LMo~
WNNOOMn
L 2 2 4

go—o—o—-.—mmm
L0000
W

B403

6416

6422

7069

489S
11302

4910

4368

S0se

OO0

LNW
n—w

Ww
o

11487%

b
b

K
K

Lol ol

11483

10890
Sb#

B 55

o b

2203
5

11471%

MNE

L =N
oW
O

114448
10861

Lrapats

SR ALkm®
STAt
%

11463

g
P

ccc

—_

U 0= s et s e ) OO U
£ = U= e e
(= wooowun NOW L£WOTM L= L=
un WoOoo
- L= OO0
w
—D
A WmoU

= U= 0TM WML

Py
-

e b a7
e
—

—

L o

LJL

r—o—ggl
etWNW
un
- Z0ou

:83881832
FOREIE REE

£0

1
l’l 1
00 1
00 1
00 1
=
UL

IWUNIQHF-}' gmmmmmmm
S
83
..2.........

1
1
1
1
1

10-JAN-78

CROSS REFERENCE TARBLE -- USER SYMBOLS

11532
11549

== MUMNMNINY
= M NN
&0
et e e(R
Ry -

WNO

g.‘
SRR Shoe 8

CZREMDO RKB11-/06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48

12077

10786%

4790
7340

4836
10890

S10S

B zvo®
&ROBEEESE FEREFENG

Bt Pt Pt ot Bt Bt ——

NN
NN =N

Pt e e B
Dt B
Bt s s e B B
e D

$SREGS

4
888888888888888888 STalats

QRROBRERORGGEERE

Pt P

Pt Pt Pt Pt Pt

nNEWN—-0

OOOOOOO0

goueeAAAARRARAARgoenensnoes
i
BRE

MDO RK&11-/06 SS VERIF 1
10-JAN-78 11:48
.P11

NO4

MACY1l 30A(1052) 10-JAN-78 12:16 PAGE 261
CROSS REFERENCE TRBLE -- USER SYMBOLS

155%
Slgbl
6157%

bBbbl®
82;91
B8277%

sgl

280%

79%

8214*

15885
12077
12085
12085
12085
12085
12085
12085
009

12085

8282

12084

12089

B8284*

12084

12089

12081

8275
12081
94i9x

12089

8278
12089
12081

B2S7%
9671

8265
12081

8237
9424*
9417x

12089

9388%

9423

8271%

8950%

9145

9513%

95]14x

8272%

b2o*

9637

9639%

JeM41x

9627

9630*

9B634%

B36*

4459

6392

11265

11290

2095
S617
B414

20%
SeMl
6416

5865%

9363%

12081

12089

9169

91
Q1

Sé

*
co¥

%% 70%
16

11663
11400%

Y446

6S6*
4ox

BES7%
OGBE3%
6I90%

7S526%
96S4*

7527%
9B64x
6ESB¥

B251%
9668

82“2:
96b7
8259

8258%
8269

8267
9670
B273%

12081
9624k

9672

12081

12088

HY4y4y7

4449

4451

4453

4455

4456

4457

11093

11307

11345

11401

1{5 7.

7412

7472

7499

7964

7977

7990

1780
Y457
S724
11267
1&335

1784
4459
5865
11258
11803

1785
4460
S947
11259
11415

1786
S340
6019
11260
11417

1787
S364
6096
11268
11418

1788
5390
6179
11275
11419

1789
S438
b2s4
11287
11426

5340%

GS3b4#

S5390%

S438%

S477%

552S5%

SSB1¥

SBb17%

SE4 1%

SE74*»

S724%

B43ex*

1140l

11426%

11431

11434+

11444

11518%
11566%

1987

STIMES

c8b*

B8283%

B8236%
9389%
9390%

12077

géfi?l
B2y
6l O6%

$SWREG
$SWRMK=
STESTN

B281%

B8235%
9364*
9365%

SEQ_0S38
SEQ 0259

6019
4Y4Sex

B09*
S230%

bH179%
6393

B2S4*
7071%

11436%
7076x

11428

|
f

iézg

1264

1572
1276

006022

PAGE
8 _12:16__
10-JAN-7
)
MACY11l 30A(10S2
SYHS%ES
USER
-TABLE
FEAENCE
CROSESEE
b6

Yyg2ex

B8771%

S0oas

Broos

49gx

8772%

11305

©S032%

8786

%:@ gggsi i
S?gg

Se93%

11322

11328

S701%

5703

6391%

6467%

6S500%

905

B8858% 11305

11320

11326

5934

60968

59478

609

S9S0

6170

5959

61798

§970

6182

5974

6221

6010

6222

60198

62548

S414
S617%
S865%
6022

6257

4388
620

S868
6031

168:?

lsgge

15088'

gr:ap

Sgéégg

20sos
20458

10877

10890

STRAP2

TRP =

0S6304

116438

TSTNM

1102

11654
116478 11656% 11657% 116588 116598 11660% 11662 116638 116648 116658 116668
gYy42% 8997 11267 11302 11392 11435% 11436
lquao 1?553' S314% B£392% bY24x 7073

T¥ng

s u%
%‘rTPFLG 00115
Tl

TYPBN= #%%%%% U
T

TYPEC
TYPEX
TYPOC

TYPON
STYP?s
SUN

:8%2

776
D01 35

"' 'lw
o 001370
SVECT1
UL

SVECT2 001372
SXTSTR 055172
$SGETY= 000000

$.5.SM= #x¥x%x U
SOFILL

0S4221

SHOCAT= #xxxx¥ U

= 064460

.SASTA= #xxx%% U
= 001000
.$X
..HIGH
..LOW

000226
000224

106896
046 1%;5!
10890
1

4451

1153§

]

116328

116;2

114

11647

g
1
1088

10862
1

10872
10888#%

111
111318
26610

111388
11657
5278%

11658

lllggl

§ug:
1438

llsgs

11655

10877%

10878

10184

114064

9747

9982

10173

1113;&

11136%

11146

11181

11353

11370%

11444

11445

1127

19618
19998
6201

11449
19944

19778
197648

4550

21448
11402
6408%

18;?2

55033250 !;

SEQ _0S

393
S390%
5380
5367
63648
356
3404
0%
*
4
769:
?509
S584
55818
5565
gsasn g528
Eng
gweg
q;;.
gflfll gflgg
§85S
5736
S7248% 5727
5716
S6748 S677
5657
4y
His
56;9
S8

——

8780

g?ggl

BOS

6 SS VERIF
RK611/010-JAN-7
CZR6MDO 11
8 11:1 48
CZReMD.P
1146

e U

11403

9654
208
6205

11452
1999

9708
100
6304

1972
34748
6416

10222

10536

10577

10589

10643

10665

19884% 1994
1983# 1985S# 198748 444
197448 1982
4459
3S1Ss
34758 3484 3506% 35098 110828
11302
11249%
110208
6420 10890 10962

114978

12076%

10683

10710

199Ss 1997%
612S
4460
11305 11348

{

lfi(su/%jg"\_';gl

EERERB

1812s

575?

1 3878
~N

191 "

[eerpe

9395

550593"8251 i

828;

9370

9380

g062e

S609%
6090

S934

6010

S350

e02e

S946

6018

11526

——

@+ OOOOND UG == e 0D = b= (D (D 4= b=

—

[+4]

L0PRmmm B PRM.Y

L %el

Dol
' M
[ IV L

e
e o

0
35582o fea

6387
11401
§781

63788

BY4EOPS
BYSCOP
CKEXIT

COS
MACYLL SRR64E RereABNCE
22"TA
RackBBLE
haREY

CZR6MDO RKB11-/06 SS VERIF 1
CZRE6MD.P11
10-JAN-78 11:48

17608

. SEOP
.SERRO
.SPOWE
.SRAND
. SRE
.3
.$5C
.SSIZE
.SSUPR
.STRAP
.$TYPD
.STYPE
.STYPO
.

ABS.

6010

2057
2072

5674

2060
207s

2061
2076

2062
2077

2063
2078

2064
2079

206S
2080

2066
2081

2088

2089

2091

2092

2093

oW
N
oo

S380

5414

S467

SSeS

5609

S630

5657

5716

5855

S934

6010

11657

11658

11659

11662

11664

11665

BB=ENS

S934

1793

1794

1795

1796

1798

1799

1
1
1
1
1
1
1760
1760
1760
1760
1760
1760
1760
1760
1760
1760

0B4460

—

1
1

—

6088
11647
Y477
1 91
1
1
1
1
1

-0

e082
20}4:

000

n
o
[
o

gl cr

2014s

2067

a0Ry FiRSes

585S

SCATC

5716

— .—:

SSgE
§%
$SSKIP

5657

et
o = B Y
Bt
Pt s Pt Pt Pt [ et e e
Ou
DNNED
OO
N
=W LW
OW—-L£oND

5630

ey S Y
e

SSCHEg

5609

—

5565

5380

S41Y4

S467

20ss
2070

20s6
2071

2087

5513

6403

—

SDECBN

116474
19188
1918#
1918s
191Es
19188
19188
15188

SEQ 0S4l
SEQ 0262

Y4618
5356
ee2ee

TRMTRP
TYPBIN
TYPDEC
TYPNAM
TYPNUN
TYPOC?
TYPOC
TYPTXT

19188

—

gegdddadoriias

SWRSU
N
me

DOS

12:16
PAGE 265
10-JAN-78
CROSS REFERENCE TABLE -- MACRO NAMES

MACY11l 30A(10S52)

1797

CZREMDO RKE611-06 SS VERIF 1
CZREMD.P11
10-JAN-78 11:48
ERRORS DETECTED:

EOQS

MACY11l 30A(10S2)
10-JAN-78
_12:16 PAGE 266
CROSS REFERENCE TABLE =-- MACRO NAMES

DSKZ: CZR6EMD, DSKZ: CZREMD . SEQ/SOL /CRF /NL : TOC/EQ: QNEWSW/DOC=DSKM: CRIV10.P11,DSKM:CZR6MD.
P11

RUN-T%

40 3 SECONDS

RUN-T
RATIO: £58/89=7.3
CORE USED:
49K
(97 PAGES)
DOCUMENT PAGES:

263

SEQ_0S4e
SEQ 0263