Digital PDFs

AC-9116E-MC

March 1978

272 pages

Original

134MB

view download

OCR Version

187MB

view download

Document:	CZR6HE0 RK611 UNIBUS RK6 DRIVE PART 1 AH-9118E-MC MAR 1978 gray
Order Number:	AC-9116E-MC
Revision:	000
Pages:	272
Original Filename:	CZR6HE0__RK611__UNIBUS_RK6_DRIVE_PART_1__AH-9118E-MC__MAR_1978_gray.pdf

OCR Text

_UNIBUS RKEDRIVEPART1

CZR6HEO

AH-9118E-MC

FICHE1 OF2

MAR 1978

EONEN

MADE IN USA

UNIBUS RK6 DRIVE FART 1

CZR6HEO

~ AH-91186E-MC MAR1978

FICHE20F2

MADEINUSA

. B0O1

/
EOF1CZ

PNIO

00010000

780223

.REM %
IDEI!IIFICQTION

et Pt Pt Bt
B

PRODUCT CODE:

AC-9116E-MC

PRODUCT NAME:

CZREHED UNIBUS RKE DR PRT 1

DATE:

FEB 1978

MAINTARINER:

DIAGNOSTIC GROUP

AUTHOR:

GARY PAPAZIAN

NB;TI(I-‘ WTIW
INTHX&DOCU?“E
SSL%JCCT T?cmflgs D%EW
—

EOOU&
NT WT}% I
LITY

[YEERSE

NMH

ZOREEBBNRREDR WO
LLLWWW

ND—-O\DSV

ERHDR1CZREHESEQ

MACY1l 30A(652) 25-JAN-78 12:08
PAGE 1
2

s Pt Pt

£ WO ~on LWy

CZREME.P11

8°m+£“o“wst Rx”sazgn PRT1
-JAN-78 12-05”

IP?ENT

HAT MAY

ORPORATION ASSUME
AR IN THIS DOCUMENT.

ARD.MAY ONLY-Be USED OR COPIED TNACORDRNCE WITH
THE

¥RRMS OF SUCHL
D GITAL

T
N 0T

%EP!?NT CORPORATION ASSUMES NO RESPONSIBILITY FOR
USE OR
FBILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS

SUPPLIED BY DIGITAL.

BB RRPOR2B IV 2oR= S0 NG h E LR SO SN L O 8 5 & SFH £S

CZREHED UNIBUS RK6 DR PRTI1
CZREHE.P11
25-JAN-78 12:00

MACY1l 30A(1052)

25-JAN-78

COl

12:08

PAGE
2

TABLE OF CONTENTS

1.0

ABSTRACT

2.0

REQUIREMENTS
.

5. é
3.0

NAR

HARDWARE

PRELIMINARY TESTING & PROGRAMS

PROGRAM CONSIDERATIONS
L4

g. é

)

1
3:2
3.7

3.1

PDP-u FAMILY COMPATIBILITY

BBoo NITIONS
%fl l-:mat.so

ou FAILURE RATE ANALYSIS .
B

3110

3.11
4.0

OPERATING mocm & CONTROL FUNCTIONS

Y,
y.

4.7

5.0

ST nm

CONSOLE SHITCH REGISTERS

i
2‘@.‘.&ghaéé"

HALTING

DRIVE DIAGNOSTIC FUNCTIONAL DESCRIFTION
S.1
S.2

6.0

UNIBUS ADDRESSES & VECTORS

GENERAL
TEST DESCRIPTIONS

ERROR REPORTING

6.1
6.2

ERROR INTERPRETATION
ERROR PRINTOUT EXAMPLE

CZREHED UNIBUS RK& DR PRT1
CZREHE.P11
25-JAN-78 12:00

1.0

Fih EomBD8 IR LOREEBNC R LR OB® o £ w0 BB IR B

SEQ 0003

ABSTRACT

ERROR DETECTION

FendERLTM

e,o

LOGIC IS CHECKED BY SOFTWARE ERROR FORCING.

) 1, THE DRIVE
PART
RS
L (MITH MO ERROOF
RUN
GETER B SUCCESSFL

G"1
BinaniC TESTIRG.
THRDEEGR
M PABC
ol 1co9eE0s
SRS
TESTS WILL BE KEPT SMALL TO FRCILITATE SCOPING
L

s s Pt Pt Pt
s Pt Pt Pt Pt ot s Pt
s s Pt Pt

PRGE 3

1 SRR Pl T DA eh LR

¥R XCAUTTON®®#3%%

HRLTING THIS PROGRAM ANYWHERE BUT AT THE END OF A PRSS,
#ERVE THE HERDERS IN THE DISK CARTRIDGE IN AN
UN)E

RMINED STATE.

e.0

REQUIREMENTS

e.l

HARDWARE

THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DISK DIAGNOSTIC:

E%ELETYPE

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

12: 08

25-JAN-78

ERLTIERAThih R

s Pt Pt Pt P

S0 IR 250

MACY11l 30A(10S2)

16K

KWll-L

B8BTS RS kb

NOTES:

*ES%IHILL ggléYbflg‘SES CLSCK éS¥S§D ALL TIMING
BEGINNING OF THE TESTS WILL CONFIRM THIS.

THE PR

» . NON-F
2.2

AN HORK OFF EITHER FORMATTED OR

TTES

PRELIMINARY TESTING & PROGRAMS

THE RK611 DISKLESS CONTROLLER DIAGNOSTICS (ALL PARTS) SHOULD FIRST RUN SUCCESSFU
3.0

PROGRAM CONSIDERATIONS

3.1

PDP-11 FAMILY COMPATIBILITY

0 UNIBUS RK6 DR PRTI

U MU MU 0 s 5t Bt s Bt B et Bt Bt s Bt Bt ot Bt Pt Bt Bt Pt s Bt s B Bt s B ot Bt B
000WVLOD
nN—0OWwoN

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

FRECKE SRR R BN 2B 3o 2R 358 SE h E LR S DB SrR FORLE 58S

P11

25-JAN-78 12:00

MACY11l 30A(10S52)

EOL

25-JAN-78

12:08

THIS PROGRAM

PAGE 4

3EQ 0004
'

USED BY THE PDP-11,04,0S, 10,20,

34, 35,40, 45, 58“';"%

F 13'( mmaui; WITH THE LSI-11 INSTRUCTION SET AND CAN TEST
THE DRIVE CONTROLLER FOR THE LSI-11 IS

oesxcus
3.2

0 BE DIAGNOSTICALLY COMPATABLE WITH THE RKB11.

XXDP

EHIS SROGRM CAN BE CHRINED BY XXDP & WILL NOT OVERLAY THE
CHAIN MODE OPERATION (MONITOR)
l.

T’E INPUT DIALOGUE IS BYPASSED.
Aoonsss 8 CONTROLLER INTERRUPT VECTOR IS

3. &L
BSI I'ER
I&
NOT BE TESTED.
IVES IN THE ’'DRIVE PRESENT’ CONDITION WILL

NOTE:

THE DRIVE PRESENT CONDITION IS:
A.
8 CORRECTPORTSeLECTED

C.
D.

HRI&E EOCK DISABLED
ADY INDICATOR ON
DRI

DUMP MODE OPERATION (MANUAL)

2.
3.3

IfPUT DIALOGUE IF STMTED FROM 220.

THE opznmon IS FIRST GIVEN

nsc
?o
Yggm;'.gg:
?E Pncx m DRO WITHA SCRATCH

ACT/APT

THIS PROGRAM I
OMPATI
IT IS APT
COMPATABLE TO
EXTENT THAR RPT HOOKS WILL BE IN THE
PROGRAM & WILL HORK THRU THE 'UPTON INTERFACE’.
FOR OTHER m'rznrncsg

1.E. LOAD & D

APT MAY ONLY LOAD & START THE PROGRAM.

AUTOMATIC MODE (MONITOR)

1.
2.

THE INPUT

THE BUSS

DEFAULTED.

DIALOGUE IS BYPASSED.
ADDRESS & CONTROLLER INTERRUPT VECTOR IS

?%% ESIVES IN THE ’'DRIVE PRESENT’ CONDITION WILL BE

NOTE:

THE DRIVE PRESENT CONDITION IS:

CZREHED UNIBUS _RKE& DR_PRT1

CZREHE.P11

25-JAN-7812:00

MACY11l 30A(10S2)

25-JAN-78

§§2

éié

13
2i§

£
£18
16

25?
522

gca
Sas

223

PAGE S

SEQ 000S

A.
HE
LOADED
PORT SELECTED
%gCTMANUALLY
B.
C. HR{VE OCK DISABL
gé

203

303

FOl

12:08

3.3.1

ADY INDICATOR ON

DUMP MODE (MANUAL):

INPUT DIALOGUE IF STARTED FROM 220.

APT ETABLE DEFINITIONS

THE FOLLOWING DEFINITIONS ARE VALID FOR SPECIFYING APT ENVI onm-:mm.
TABLE (ETABLE) ENTRIES, VIA RUNNING THE APT UTILITY PROGRAM “TSP”:
1.

1 TE ahlSCRIeT
g

sorrums

- E"‘aqm-E"T —Sfl&sflDOES sSIZING
SIZING

BIT § == 6

o0, To ?Suwur
EE”'Eggnsm

BIT 6 = 6

555

0 APT IF SCRIPT MODE

BITS 4-0

ggg

i?
sozrcu
(som:fi
sun

gaag
ggg

&En‘uo'fuficn
6x§~ftn
395
uggm"-l
ggusvs'g 5'1?
14 (LWEST)nus*
ALWAYS BE SET

231

238

nscxsrsm

- i

%” "?gfi GI TE géuséasfsno'

239

sumf-u

242
g:a

CPU OPTIONS:
NOT USED

245
ggg

MEMORY TYPES 1-4 AND MAX MEMORY RDDRESSES
NOT USED

248

USED WHEN ENVIRONMENT MODE BIT 7 = 1. DEFAULT = 210

251

BUS PRIORITY

257
258

10.

ggg
agg

(USER SWITCH REGISTER)

INTERRUPT VECTOR 1:

USED WHEN ENVIRONHENT MODE BIT 7 = 1. DEFAULT = §
.
INTERRUPT VECTOR 2:
NOT USED

BUS PRIORITY 2:
NOT USED

CZREHED UNIBUS RKE DR _PRT1
CZREHE.P11
25-JAN-78 12:00

MACY1l 30A(1052)

@25-JAN-78

Szo

PAGE &

11. BASE ADDRESS:

261

USED WHEN ENVIRONMENT MODE BIT 7 = 1. DEFAULT = 177440

12. ogvscs

gggg

TIveors
10 1 &IN ?és?ES
grfioDE
BIT
BETC; ?ué'
BivE BETECARE
0T052°“p8§61uc
LSED.

268
g;g

13. courno#Lsn DESCRIPTOR WORDS:
NOT USED

7
e;

14. DEVICE DESCRIPTOR CODES (IN WORDS):
NOT USED
-

g;g

3.4

DUAL ACCESS

2
£78

THIS_PROGRAM W
LT
PERCRTTH Bunk

pUAL ncgsgs ngrs WILL BE INCORPORATED IN A SEPARATE PROGRAM

s;g

T
TEST
ESS,
ARleehudY
BEPenTTCRED 76
?é
PoRT ONDER

TEST TO PREVENT conrsurxou WITH THE orus

A LATER

283

ggg

3.5

2
239

DATE.

MEMORY MANAGEMENT

MEMORYY MANAGEME NT NOT USED

§§§

3.6

291
ggg

PARITY CHECK ENRBLED
IF THE MEMORY PARITY CHECK OPTION IS AVAILABLE ON THE SYSTEM,
THE PROGRAM WILL RUN WITH MEMORY CHECK ENABLED.

294
gqs

3.7

239
2398

BAD SECTOR

THE PROGRAM WILL COMPARE DATA ERRORS WITH THE BAD SECTOR
INFORMATION CONTRINED ON CYL

ggg

410, HEAD 2.

PRINTOUTS

OF DATA ERRORS DUE TO BAD sscronéxrnncxs WILL BE MASKED OUT.

301

ggg

3.8

EXECUTION TIME

ggg

THE EXECUTION TIMES SHOWN BELOW ARE BRSED ON THE PDP 11/50.

ggg

TOTAL TIME:

ggg

A BREAKDOWN OF THE MORE LENGTHY TESTS ARE SHOWN BELOMW:

gi?
312
313

—

GOl

12:08

§ MIN,

30 SEC

ch ADDRESS 8 DIFF REGS-PART 2: 2 nxnl 1? SEC
TEST54 srnvzg
TEST 37 SEEK rnon ch 0 TO ALL CYLS
TEST 40 SEEK FROM CYL 410 TO ALL CYLS

: 40 SEC
: 40 SEC

m mwuuuuuw
U U NOVONoN
0= s s s e
LW~

CZREHED UNIBUS RKE DR _PRT1
CZRBHE .P11
25-JAN-78 12:00

MACY11l 30A(10S2)

25-JAN-78

HO1

12:08

PRAGE 7

SEQ 0007

THE ABOVE TIMES ARE APPROX. DOUBLED FOR THE RKO7.
3.9

FRULT ISOLATION
TO BE DETERMINED.

3.10

ERROR CORRECTION AND FAILURE RATE ANALYSIS
THIS PROGRAM WILL NOT DO ERROR CORRECTION OR FAILURE RATE

ANALYSIS.
3.11

DEFAULT UNIBUS ADDRESSES & VECTORS
THE FOLLOWING IS A LIST OF ALL DEFAULT ADDRESSES & VECTORS
OF ALL HARDWARE TO BE USED & THEIR MEMORY ADDRESSES
WHERE THEY CAN BE CHANGED.

R 4 ee
TR
P-CLOCK STRTUS
RELOHEs
FECEES
L-CLOCK S
REG
-CLOCK INTERRUPT VECTOR
VECTOR
INTERRUPT
-CLOCK
TTY KB S RTUS REG
TITY gg

E augTES REG
ITY
TTY PRINTER

LOCATION

DEFAULT CONTENTS

i
iaeg
15

igzwe
f
};25:%
(e

1150
1152

177564
177566

1326
1330
1332
1144
1146

4.0

OPERATING PROCEDURE & CONTROL FUNCTIONS

4.1

PROGRAM LOADING

177546
100
104
177560
177562

THE PROGRAM CAN BE LOADED FROM_PAPER TAPE USING STANDARD
PROCEDURE FOR RBSOLUTE LOADER TAPES; OR FROM ANY MEDIA

SUPPORTED BY XXDP.
q.l.l

LOAD THE STARTING ADDRESS (SEE SEC 4.2).

“.1.2

SET SWITCH REGISTERS RS DESIRED (SEE SEC 4.3).

4.1.3

SET DRIVES TO BE TESTED IN THE ’'LOAD’ CONDITION & WITH THE

RETOERLETSCEOED RORHC
e ol BoRPS RAETEE R, ORIVES

C
FEO UNIBUS RKE& DR_PRTI1
25-JAN-7812:00

MACY11 30A(10S2)

25-JAN-78
NOTE:

12:08

PAGE 8

SEQ 0008

THE DRIVE WILL NOT RESPOND TO THE ’'START SPINDLE’
CMD_IF THE RUN/STOP SWITCH IS IN THE ’STOP’

POSITION.
4.1.4

PRESS ’START’

HE PROGRAM WILL IDENTIFY ITSELF_AND HILBRBEGIN A

DIR%O&%
HITH HE OPERATOR TO DETERMINE

DRIVES TO BE TESTED

PROGRAM BEGINS TESTING ONLY THOSE DRIVES SPECIFIED BY
THE INPUT D
FA
CIFIED DRIVE CANNOT BE FOUND BY

NOT

AVAILABLE.

THEN

NNING WITH

THE LOWEST

RICAL

Pé&O&D
gN ETHE DRIVE
IVE EEFORE
MOVING TO TFEE%(T IVE
IN SEQUENCE.
TO BE TESTED WILL BE TYPED AT THE

gEGI NérfiLOF
ESTI

4.2

ACH PARSS.

L DRIVES.

“END OF PASSTM WILL BE TYPED RFTER

STARTING LOCATIONS

LOCATION 200 ~ STARTINGWSS 70 DEFRULT THE BUSS
%? HE CONTROLLER INTERRUPT VECTOR
RLL DRIVES IN THE 'DRIVE PRESENT’
&7

8:90\30"0"5“'0&-0

409

THE DRIVE PRESENT CONDITION IS:
A.

B.
C.
D.

HEADS MANUALLY LOADED

EETED
CORRECT PORT
MWRITE LOCK DI
D
READY INDICATOR ON
DRIVE

LOCATION 204 - SAME RS 200 START BUT BYPASS TEST 16 (N SQUARE)

LOCATION 220 - STRRTING

ESS TO INPUT TESTING PARAMETERS

VIA_THE
INPUT DIALOGUE.
BUSS ADDRESS &
CCS)NTggTERRUPT VECTOR INPUTTED ONLY ON

LOCATION 230 - SAME AS 220 START BUT BYPASS TEST 16 (N SQUARE)
LOCATION 260 - RUN MODULE TEST

...DEFAULT MODE_ONL

THIS SKIPS

OVER THE FOLLOWING TESTS

1. TEST 35

FORMAT PACK

e. TEST

3. TEST
9.

TEST

ZER

Lfrr Lt
-t P Pt P Pt Pt Pt et Pt Pt
o
W

NOTE:

DECREMENT FROM CYL 410 TO O & RERD HERDERS
SEEK FROM CYL O TO_ALL

SEEK FROM CYL 410 TO ALL

MACY11l 30A(1052)

25-JAN-78

JO1

12:08

PAGE 9

THE PURPOSE OF
A QUICK MODULE

SEQ 0009

BYPASSING IS TO PROVIDE
TEST

LOCATION 270 - SAME AS 260 START BUT BYPASS TEST 16 ALSO.
IMPORTANT:

FOR VARIATIONS OF THE ABOVE

SEE XXDP ACT/APT

CONSIDERATIONS IN SECTIONS 3.2 & 3.3.
ALSO,

THE PROGRAM WILL DETERHINE WHETHER

THE DRIVE TO BE TESTED IS RKO® OR RKO7.

OPERATOR INPUTS ARE NOT REG’D.

4.3

SWITCH REGISTER
THE SWITCHES ARE USED TO PROVIDE CONTROL FUNCTIONS.
SWITCH

FUNCTION

e s

e e e

OOO=-NWEN

CZRSHEO UNIBUS RKE DR_PRT1
25-JAN-78 12:00
CZREHE

4.3.1

SW¢1S)>

OUNTERING AN ERROR, AFTER TYPING OUT
THE PROGRAM HALTS ON E
THE ERROR MSG AND PERT INENT éNFORATION.
PRESSING "CONTINUE"TM CONTINUES OPERATION OF THE PROGRAM.
4.3.2

SW<1Y

THE PROGRAM _LOOPS ON TH; TEST THAT IS BE ING EXECUTED WHEN

5?$H5251§H IS PUT ON.

4.3.3

THIS SWITCH IS NORMALLY USED ALONG

SW¢1D

NORMALLY USED WHEN
THIS SWITCH_INHIBITS ALL_ERROR MSGS.
R_LOOPING ON ERROR (SW9),
LOOPING ON TEST (EE#H
WITH SWITCH <13
, SW ITCH <15> SHOULD NOT BE SET.
4.3.4

SW¢l12>

THIS SWITCH BYPASSES R GIVEN DRIVE AFTER 20 ERRORS HAVE

MACY11l 30A(10S52)

25-JAN-78

12:08

PAGE 10

SEQ 0010

BEEN DETECTED.

483
4.3.5

SW<¢11>

ERCH_TEST WILL
FIRST PRSS
ERC
(USUALLY
SO, S
ITERATIONS, SO
4.3.6

NORMALLY AFTER THE

RATED A NUMBER OF TIMES
A
SETTING THIS SWITCH INHIBITS
ICK PRSSES CAN BE MADE.

SW<10»

RINGS A BELL ON ERROR.
4.3.7

Y ONCE.

25-JAN-78 12:00

E4ReHE.P11

ig;:

CZREHED UNIBUS _RKE DR _PRT1

KOl

USEFUL WHEN ERROR TYPEOUT IS INHIBITED.

SW<09>

THIS SWITCH PROVIDES THE TIGHTEST POSSIBLE SCULPE LOOP FOR

ERRORS.

IF THE PROGRAM DETECTS AN ERROR,

TO THE BEGINNING OF TEST.

4.3.8
== OV NN LEWN=-0OW

mmmmmmmmmmmmm
R e
e e e e e e & ]

S22

SW<08»

THIS SWITCH
SW<00-7>) F
EST 15 IS
004

S08

IT WILL LOOP BACK

IS USED TO SELECT A PARTICULAR TEST (flS PER
EXECUTION AND
QUENT #OOPING.
THUS IF
SELECTED THE
SWITCH SETTING WOULD BE

LECTING & LOOPING TEST 1S,
gL %HE PREV?gsgL?ESNOTED
(1-14) THAT
WILLBEFBE XECU%
4.4

"SOFTWARE® SWITCH REGISTER

IF THE PROGRAM IS

R SWITCHLESS PROCESSOR (I.E. AN 11/04 OR 11/34)
~§LERH
TMT
HARDWARE
TCH
REGI%ER IS
’ guncu
ISTER.
T
g8).
SH
'SOF
ssnmc
gu
;fgc
“}
BRE
|
L°$ST
mo‘?flnc‘)ucu
aE
uuxcn xs C&.Lg afivfi?fic A ONTROL G’.

OCEgg};gL%%gs INTERRUPT.
YPRENTRY
O!'
IOR
é
,.
r
'so
THE
ROUTINE:
SWITCH
TN RESPONSE Fo ?fi Snongf 302“7:-5
TIME EXCEPT

SWR = NNNNNN

NEW =

focyT
EHuET o8 EnTEReD. " U’
LERDING
ZEROS MAY
ArE BENOT
FUNCTIONS
USED TO
CORREC T?PINGERRORS DURING SHITCH ENTRY.

REOUIR;D

s
HIT
HRRDHRRE SWITCH REGISTERS, THE ’'SOFTWARE’
SHITCH EGIS ER MAY BE USED.
IF THE PROGRAM FINDS ALL16
SWITCHES IN_THE ’UP’ POSITION, ALL SWITCH REGISTER REFERENCES

WILL BE TO THE ’'SOFTWARE’ REGISTER AND THE PROCEDURES DESCRIBED

CZRBEHED UNIBUS_RKB DR_PRT1
25-JAN-78 12:00

CZREHE.P11

MACY11l 30A(10S2)

25-JAN-78

LO1

12:08

PAGE 11

SEQ 0011

ABOVE MUST BE FOLLOWED.
4.5

INPUT DIALOGUE

HE DIRLOGUE WILL BE DONE INTERRCTIVELY
THE _PROGRAM WILL
THEN
RflggsgflETER
BY CONSOLE TYPEOUT.
THE PRRQHETER MAY

B gcfigggln 2:LoueoUER5999"Iz‘nsognsbkicgksgsspg"fiss o
THEN BE EN RED.

IMPORTANT:
qls.l

FOR VARIAT

SEE XXDP, ACT/APT

ABOVE,

CONSIDE nrfo"g ?§
SECTIONS 3. 3 3 3?3.

DRIVE SELECTION
THE REQUEST WILL BE:

DRIVES TO BE TESTED:

IS CARRIAGE RETURN TO TEST ALL DRIVES

TRrRE" PBRIVEPREGENT’ CONDITION.
10: a8 TESTED, “SHPARATED
&Y Lomas & TERWINATED
E.G.

IMPORTANT:

4.6.2

DRIVES TO BE TESTED:

BY ACARRIAGE

1,2,4,6

FOR VARIATIONS OF THE ABOVE

sse xxop ACT/APT

CONSIDERATIONS IN SECTIONS 3.2

BUS ADDRESS
THE REQUEST WILL BE:

TYPE IN BUSS ADDRESS IF NOT 177440
THE DEFAULT IS A CARRIAGE RETURN
4.5.3

CONTROLLER INTERRUPT VECTOR
THE REQUEST WILL BE:

TYPE IN CONTROLLER INTERRUPT VECTOR IF NOT 210

THE DEFAULT IS A CARRIAGE RETURN.

Y.5.4

EXAMPLE OF PROGRAM DIALOGUE

PLAN—

THE EXAMPLE SHOWN IS FOR A PROGRAM STARTED AT ADDRESS 220.

CZREHED UNIBUS RKE DR PRTI1
CZREHE.P11
25-JAN-78 12:00

5};

MACY1l 30A(1052)

@25-JAN-78

MOl

12:08

PAGE 12

SEQ 0012

ALL OPERATOR RESPONSES ARE UNDERLINED.
UNIBUS RKO®&-RKO? DRIVE DIAGNOSTIC

PART 1
CZREHED

DRIVES TO BE TESTED:
603

1,3¢CR>

’

§§§

TYPE IN BUSS ADDRESS IF NOT 177440 <CR>

ggg

TYPE IN CONTROLLER INTERRUPT VECTOR IF NOT 210 <CR>

609

610

WILL TEST DRIVES:

612

Bld

DRIVE 1

(THE REST IS IDENTICAL TO THE EXAMPLE SHOWN IN 4.6 BELOW)

b1l

613

618

253

PROGRAM EXAMPLE

33!
bee

THE FOLLOWING IS AN EXAMPLE OF A PROGRAM STARTED AT THE
ADDRESS (200) & WITH 2 DRIVES ON THE LINE.

624
£25
bS5

UNIBUS RKO&-RKO? DRIVE DIAGNOSTIC
PART 1
CZREHED

628

WILL TEST DRIVES:

630

603
631

DRIVE O

£34

DRIVE SERIAL NO. RAA

635
=]

CARTRIDGE SERIAL NO. BBB

637

DRIVE 1

ed0

CARTRIDGE SERIAL NO. DDD

£38
B42
gue
£4d

DRIVE SERIAL NO. CCC
END PRSS #1

g:s

WILL TEST DRIVES:

£d

;nxvs 0

(7]

650

CZR&HEO UNIBUS RK& DR_PRT1
25-JAN-78 le2: 0o
CZREHE.P

NO1

25-JAN-78

MACY11l 30A(10S2)

12:08

PAGE 13

SEQ 0013

DRIVE 1

END PRSS 8 2
(ETC)

THE ABOVE ASSUMES NO ERRORS DETECTED.
THE NUMBER OF PRSSES IS DETERMINED BY ACT/APT/XXDP

IMPORTANT:
4.7

FOR VARIATIONS OF THE ABOVE,

SEE XXDP, ACT/APT

CONSIDERATIONS IN SECTIONS 3.2 & 3.3.

HALTING THE PROGRAM

OF HRLTING ITSELF SUCH THAT
R METHOD
PROGRAM PROVIDES
I
AND/OR
VE IS _NOT
LEFT IN ON UNDETERMINED

STRTE IE'DaERDS UNL02R£D 0& INVQL D FORMAT.
TO PROPERLY HALT,

Hsgggn

TYPE CONTROL-C ($C) ON THE CONSOLE.

ORDED & F RMATTING IS VALID,

AM W LL:

?YPg
“CPU_HALTED"

HALT THE PROGRAM

C‘U‘SU"G‘C‘
RESV2S

m-‘

mb-

-4

%"I

HE ADS ARE NOT LOADED AND/OR FORMATTING IS INVALID,
PROGRAM WILL:

696

oogue"ntsrpgflo¥"3i E%ESé‘uéfiéé'nno/on FORMATS

'CPU HRLTED’
HflLT THE PROGRAM

NOTES:
1.

HE RBOVE EXRHPLE IS FOR T
E
HOD VIR X

*
THE PROGRAM I
LL
IT

AND/OR ronnnr conkscrtv 35 REQ'D, TH
JUMP ON TO THE MONITOR WHERE THE NEXT
T

CALLED IN.

SSpS——

SOLE WILL RETURN THE
H THE 1° ST DRIVE RGRIN.

EO
-0
—~Z

OPERATING THE 'CONTINUE’ SWITCH ONN T
I
PROGRAM TO TEST 1 WHERE TESTING WILL

PLERSE WAIT"

INGTM

00
0
ZC

THE TYPEOUTS WILL EE *“RABORT PE ND IN
“PROGRAM RBOR

ettt

czasueo uuxaus RK6 DR PRT1

CZREHE. P11

25-JAN-78 12:00

MACY11 30A(10S2)

25-JAN-78

12:08

SEQ 0014

5.0

DRIVE DIAGNOSTIC FUNCTIONAL DESCRIPTION

;ix

5.1

GENERAL

;

;ig

714

718

CHECKS
opganggn ufiur;ncnxn§¥ R?

717

$
?Ng

;gg

NCE TEST

R?uz ane

Exxsrsucs OF nu L on P CLOCKS ron us: xu rue

STATIC & CYCLE
UP TESTS

;gg

o:§" THE 0RIVEDSEESY T0 5Pekn¥"s5 uxrnou“ufinz 82?

727

THE ENT

]

BY VERIFYING

ALL

PRIRO
ERRE T

;31

pxp...s*""gra?figax#& sns

;gg

734

SEEK, WRITE HERDER, READ HEADER TESTS
THESE

;gg

TESTS

CHECK THE ABILITY OF THE DRIVE TO DO SEEKS

uengén ogssnrxous & 20, 22 SECTOR FORMATTING.

;gg

5.2

739

2222322222232 22222322222222 2323222222332

BASIC CONTROLLER TESTS,

;:é

TEST DESCRIPTIONS
P 2 s 22222222222

740

SIZING & SETUP

!illillillll!ll!lll!llillllIl!lill!!llllllllllll!ll!l!!li!l*lll!l

743

;3;

TEST 1

746
747
748
749

REFERENCE ALL CONTROLLER REGISTERS
THIS TEST
VERIFIES THAT ALL ruc CONTROLLER REGISTERS
CAN
cs
D.
Tu;
INABILITY
TO BE ACCESSED WILL
RESUL
"E°¥
AP WITH
AN ERROR MSG,
ANY
snnon xn THIS
WILL RESULT IN ABORTING ALL OTHER

;gg

TESTS AND JUMPING TO

752

;ga

TEST 2

755

°'END OF PASS’

SIZE THE BUSS

;g;

figi“‘“
3 auuu NE“iu THE

THIS TEST IS ENTERED

Y IF *DRIVE

759

CONTROLLER

1S EXAMINED AND IF NOT SET,

758

AUTO

SELECTION’

DEFAULTED

ogen 200 START IN THE

evefl%“ofl!”i FROMO THRU 7 IS

SSED.

760

DRIVE

IF SET, THE PROGRAM WILL BYPASS

762

MDS,

761

cxsrsn ners

;nesgfl}sgrs
CHECK
ogrp;geflBILITzFTO
SELECT TDESEL§$I°NS

726

ens C CONTROLLER

TESTING

}

THAT

ERROR (csana

TESTED AS AN RKOG.

DRIVE ONLY IF THE ERROR WAS'A RESULT OF

UFE OR NED BEING SET;

——

BASIC CONTROLLER TESTS, SIZING & SETUP
THESE TEST

;g?

e A

PAGE 14

;85

————

THE

OR BOTH NED & DRA RESET IN-

CZREHED UNIBUS_RKE DR_PRT1
CZREHE.P11
25-JAN-78 12:00

MACY1l 30A(1052)

@25-JAN-78

763

;28

TEST 3

F CERR ou: TO DTYE, THE DRIVE WILL BE TESTED RS AN RKO?7.

TEST 4

;aq

Tiremggixieg mzlm
S 1S?s?sofi? fizg%o xg

337
TEST S

790

;gg
800

Sflé

EDE
[ rereterereteted

QVU'U'J(JNO—OS

00 0D €D 00 CDCOCD
A0 CD (D

UNLORDS

0BE Tsrs

PROCEEDING TO THE NEXT TEST.
BURFEEBEFBF LR UL BE L LB LS U S C S LR LR

STATIC & CYCLE UP TESTS

TEST &

803
804
gg@

TEST

?.JE
H'"'f vgfirréfir
CAME roMgsscokascr DRIVE.
e TRenORatTeF
0 GO LOW

;33
799

’

UNLORD DRIVE TO BE TESTED

THIS

795
79
79

FIND NEXT DRIVE TO BE TESTED

THIS TES} FINDS THE NEXT ’V552§‘$§"T PUTS
?
TUET Sl

7§§

795

T8 Y8 Shdon I
ST R RBTESTED
<7 n g
ggP,}:gggg{sga;m
A Pt 2R

;;g

;gg

fiflfé@&ms&méT

it
=

780

VERIFY OPERATOR DRIVE SELECTIONS
TH{_S TEET IS ENTERED ONLY IF DRIVE SELECTION IS NOT

o
;81

SEG 0015

IF CERR DUE TO DTYE, THE DRIVE WILL BE TESTED AS AN RKO7.

769

PRGE 15

DICATING THE OTHER PORT IS RCCESSED.

;gg
76

12:08

23222

B R SRR DR B LR BL R

2232222222222

R RS R RS R AR

REFEREEY

2222 3233322222223

3% ]

REFERENCE & CHECK ALL STATUS BYTES IN RKMR2 & RKMR3
CHECKS THE ABILITY TO REFERENCE ALL
DRIVE REGISTERS AND THAT THEY CONTAIN CORRECT STATUS.

TEST 7

PRINT DRIVE SERIAL NUMBER
THIS TEST READS & PRINTS THE DRIVE SERIAL
# FROM MSG A,
IN DECIMAL & IS PERFORMED ON THE 1ST PRSS ONLY

TEST 10 SET VWV WITH PACK CMD

IF Vv IS RESET, THE PACK CMD IS USED TO SET IT.

TEST 11 RELEASE DRIVE

WORD 11

CZREHED UNIBUS RKE DR PRTI
CZREHE.P11
25-JAN-78 12:00

MACY11l 30A(10S2)

@25-JAN-78

§é§

12:08

PAGE 16

SEQ 0016

TESTS THE ABILITY TO RECOGNIZE THE RLS BIT AND NOT RAISE SACK
TEST 12 DRIVE TYPE TEST

THIS TEST COMPARES DRIVE TYPE IN MSG A AGRINST ’'DDT’

526
82
§

WRONG CDT IN RKCS1 IS SENT & ERRORS ARE VERIFIED
_

83
3

TESTS THE ABILITY OF THE DRIVE TO DETECT EVEN PARITY SENT BY

PARITY THEREFORE _THE CONTROLLER SHOLLD DETECY

Cl-ECKS
2
THE ENTIRE STARTUP SEQUENCE, IE:

443

846

848
8;8

F
PER SEQUENCING.
$"“s'vs'RIFm
B
sm“é§1 18R

122222322222 2232322222322332222222 2222222322
SEEK/READ HERDER/MRITE HERDER TESTS

g?é

P222222222222232 213t

853

854

2222t

323222222232 222

3222222322332

233223322

TEST 1S STATIC CYL DIFF AND CYL ADOR REG TEST; PART 1

THIS

TR
T

T, o)

Hsf"S{ls
t#
NEORNA
T EfiaoABOVE
REGISTER
HAD
Zéi*
tu&
%x?‘ffi
vfixlfi
c-0
S
RRI?Y
BIT
EEt
THAT HEADS DID NO
L OTHER APPLICABLE STATUS BITS& REGS.

820
861
863
ged

TEST 16 STATIC CYL DIFF & CYL ADDR REG TEST-PART 2

THIS TEST CHECKS THE RBILITY OF THE DRIVE TO PROPERLY SET THE CVL
CyL AODR REGS
FOR ALL COMBINATIONS
BY SEEKING T0

868

L evesoy

geg

874

BoR1TY ?o CONTROCLER WHICH IS NOW

EVEN

TEST 14 VERIFY START SPINDLE CMD

gug

871
g7

ITING *PAT; ON

THE ERROR CONDITION IS RESET WITH THE CLEAR CMD

839
840

867

{VE

CHECKING FOR

837

866

IN RKDS.

TEST 13 C-D PARITY ERROR DETECTION

832

VERY

OTHER CYL.

(N 5@

EKS)
.

IT IS PERFORMED IN THE SAME MANNER RS THE ABOVE TEST.
TEST

17 HEAD REGISTER TEST
THIS TEST CHECKS THE ABILITY TO SELECT ALL HERDS

(0,1,2)

CZRGHED UNIBU'S RKE DR_PRTI
CZREHE.P11
25-JAN-78 12:00

MACY1l 30A(10S2)

25-JAN-78

EQ2

12:08

PAGE 17

SEQ 0017

VIA RKDA & READING BACK FROM MSG B3 BY THE SELECT DRI

HEAD 3 IS CHECKED TO PRODUCE INV. RDDR.
SINCE g

ueao noonss

TLLEGAL
8
STGO
ARE NOT TIED 10 seex cmbs

S ARE TIED TO SEEK CMDS

2 N by T T

TEST 20 SEEK TO CYL O

gT? Q&ITY T0 DO
A %E s

TEST 2l TEST SECTOR COUNT REG.

U’l

IES T
NO MOVE
Y CHECKING ALL APPROPRIATE
RIFIES CMD COI‘P TION BETWEEN 10-1SUSEC.
US BITS.
RD O-ERDER IS NO PERFORMED
RS THE PACK MAY NOT BE FORMATTED.
FOR 22 & 20 SECTOR FORMAT

TEST a2 DETECT OUTER LIMIT

THIS TEST
VERIF%EE T HAT_THE ABOVE TEST DID RCTURLLY POSITION ON CYL O
L IM } T AS THE RDJACENT CYL

BY DE

AN ERROR IN THIS TEST
AND/OR

DWDOWDWDWD DOW DO DD OO DDD
nnU ML) 0 bt e Bt Bt s Pt Bt st b O
W=D VONCNLEWNN—-DW

TEST 23

A.
B.

NDICATES:

HERADS WE RE NOT ON CYL O
COULD NO T SEEK IN REVERSE DIRECTION.

BASIC WRITE/READ HERDER & HERD SWITCHING TEST
THIS TEST CI'ECI(S HEFID SHITCHING BY WRITING UNIQUE HEADERS

ON ER

?F b A

UNIQUE. 22 SECTOR F

I.E.

TEST

BQC & VERIFYING THEY REMAINED

T IS

TRACK O: ALL 0’S FOR ALL SECTOR HERDERS

TRACK 1: 0101 FOR ALL SECTOR_HEADERS
TRACK 2: ALL 1°S FOR ALL SECTOR HEADERS

BASIC WRITE/READ HEADER TEST; ALL 1’S, 20 SECTORS

USING ueao 0,

WRITE 3 READ 20 SECTOR HEADERS BY WRITING ALL

1’6 AS HEADERS.

ATTEMPT TO

FIND SECTORS 20 & 21.

VERIFY

THEY ARE
NksNGER THERE BY READING 22 SECTORS AND NOT
DATA FROM THE PREVIOUS TEST.
FINDING 0’S
TEST es WRITE & RERD HEARDERS CYL O,

TEST eb SEEK FROM CYL O TO

HERD O

1 & RERAD MERDERS

C%fl&

0_UNIBUS_RKE DR_PRT1

CZRBHE.P11

25-JAN-78 12:00

MACY11l 30A(1052)

25-JAN-78

PAGE 18

SEQ 0018

931

THIS TEST CHECKS nsc s B uonos o 12 FOR CORRECT STATUS AFTER RDY

935
ggg

YL
xn?éenf
VE
f végxsxso
"5BEO & CYL ADDR’
n
VERIFIED
'ro BE
1

932

1S RE eVErnon
255"
cno

938

usaoeghg

ggg

AD FROM 1 SECTOR,

;

HEAD O & VERIFIED THAT THEY ARE

DIFFERENT rnon CYLO TO SHOW THAT THE HEADS DID ACTUALLY MOVE.

g:g

TEST 27 WRITE & RERD HEADERS CYL 1, HERD O

Q44

945

TEST 30 TEST RECALIBRATE CMD & RERD HEADERS

943 75

948
949

THIS TEST

Renos HEADERS.
IT
VERIFIES
“&NE““
ON CYL 1 FROM THE PREVIOUS
TEST DID NOT ovsnuaxrz CyL O ns

gsisasi

AN ERROR IN THIS TEST INDICATES THAT HERDS:

953

954

ggg

957

ggg

A. MOVED TO A CYL OTHER THAN 1
B. DID NOT GET BACK TO CYL O

TEST 31 SINGLE INCREMENT SEEKS TO THE LAST CYLINDER

360

THIS TEST DOE
NGLE INCREMENT szzxs OUT TO THE LAST CYL
mou§
u?x?f
Egnomc SO AS NOT TO INADVERTENTLY

961

962

oesr mm.

ggg

TEST 32 READ & SAVE BRAD SECTOR INFO & TYPE PACK SERIAL #

967
ggg
970
g;é
873

;

974
3;2

THI
THAT C
(1456 ron RKO?7), TRACK 2 CAN BE READ.
mx%
552 RIFfn?
Y!f rré
cH
xt(s mxh $
m mxs
"?
13“ R gn &&%fl?fl%ugs
useo g
A17n§§.Diremag' '§YP£U2E
noxcn N* R1 noxrlcg

THIS IS m SO AS NO

FUTURE

g:;;

ESTS un. BE BYPASSED.
STROY
BSE nro OR AN ALIGNMENT PACK BY WRITI

THE PACK SERIAL # IS TYPED IN OCTAL & FOR THE FIRST PASS ONLY.

353

THIS IS THE FIRST TEST WHERE THE READ DATA CMD IS PERFORMED

981

ggg

TEST 33 DETECT INNER LIMIT

984

THIS TEST venmss THAT THE LAST CYL IN THE ARBOVE

985
986

—

FO2

12:08

TEST WAS 632 (1456) BY DETECTING INNER LIMIT AS THE ADJACENT CYL
IF THIS TEST FAILS, IT INDICATES THAT HEADS WERE NOT ON THE LRST cYL

——

—

CZRBEHED UNIBUS RKE DR_PRT1
25-JAN-78 12:00
CZREHE.P11

MACY11l 30A(10S2)

25-JAN-78

Gae

12:08

PRAGE 19

SEQ 0019

-3 ; BSE INFO IS
gOT VALID.

THE FORMAT PACK TEST

ToohuoTb BESTACY
NG B2TREG OK AN

ALIGNMENT CARTRI DGE

OO
O

ZoR-S NNN§ RE [NV 3 DDV N EDR—OD
B IR ED—OD BORR LER

SINCE THERE IS
A SEEKING OR LIMIT DETECTION PROBLEM.

3 ificTTSEv'°?fl8§EnEN§gE"§éEEPACK IN 22 SECTOR FORMAT BY

0 TO 632 _(1456) WITH WRITE HEADER CMDS (ALL TRACKS).

RDERS WILL BE READ IN THE NEXT TEST

TEST 35 DECREMENT FROM LAST CYL TO O & READ HERDERS
THIS TEST VERIFIES MOTION IN THE NEGATIVE DIRECTION BY
SINGLE CYL INCREMENTAL SEEKS.

TEST 36 SEEK FROM CYL O TO ALL MAJOR CYLS & READ HERDERS
THIS TES;EEEEKEYERBH&C;%RSSTaesbtnng MAJOR CYLS & RERDS HERDERS.
IT THEN

MAJOR CYLS ARE:

(DECIMAL)

(OCTAL)

8
15

B
]
128

256

5§12

10
20

100
18

200
400

1000 (RKO7)

TEST 37 SEEK TO ALL CYLS FROM O & RERD HERDERS
TEST 40 SEEK TO ALL CYLS FROM LAST CYL & READ HERDERS
TEST 41 SEEK TO ALL INVALID CYLINDERS

1F AN TLLEGRL
OK URLORD
HeabsDo HOY HOVE
s ‘THAT ES
PRODUC
L IS SPECIFIED IN A SEE
TE®

INVALID CYLS ARE
& 1457 THRU 1777

633 THRU 777 (8) FOR THE RKOB
FOR THE RKO7

e D

o Pt s ot ot

s ot ot

0000000000000000
LLILWWWWW
—
=0V
NUN
DN

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

s s ot ot et Bt Pt s B

s o P

ot et P

ot Pt Pt

997

TEST 34 FORMAT PACK

THE PROGRAM DOES NOT REQUIRE FORMATTED PACKS AS FORMATTING
IS PERFORMED IN ANY CASE.

CZREHED UNIBUS RK& DR PRTI
CZREHE.P11
25-JAN-78 12:00

1043

1047

MACY11l 30A(10S2)

25-JAN-78

HO2

12:08

PRAGE 20

SEQ J020

RD FORMATTING
IS FOL bOHED BY A
0 STANDAR

SElean
e’ "IEsTORS"AGT PAGSE"CYLS BRCK
FORMAT.

CZREHED UNIBUS_RKE DR_PRTI1

MACY1l 30A(1052)

—~00

(=]

1
1
1
1

25-JAN-78 12:00

XAR2 (]£

CZREHE.P11

ioss

@25-JAN-78

6.0

ERROR REPORTING

6.1

ERROR INTERPRETATION

1054
}ggg

PAGE 21

SEQ 0021

uueneve AN ERROR MSG IS PRINTED ou1PLL ascxsrsns
? DATA PERTAINING TO THE
E
cnr %ns

iggg

conrsu?g 6r"§u:cganQSPONotucEgcxsssssAT* 51

1059

%825
1063
1064
1065
1059
106
1068
1069

RINS A
Eosxrxon'g”Paocsgg:guens
;EE THIS PC
C“LknINDICATE
§°hgc?§: THE
SHORT
ngsfi“gEFUL.
'¥fl§ u%gkHg
ggls ng
3? 10LooxlggE
HE
PC IN
I ;&gg.
MORE INFORMATION
T 0
H
xH&?
1 A ITTLE
FAULT WILL
GIVE
R
;
ns#ont.
oe
xacnntxou
AND C
EXAM Nnrs
HE DATA xvzu W k BE
CERT
;
VERY HELPFUL IN PINPOINTING T FRUL
A r XPLANA
OF WHAT IS BEING CHECKED IN THE
TEST IS GIVEN AT THE

1071

MSGS

1060

1870

BEGINNING OF E

1072

NO ERROR LOGGING OR OPERATION HISTORY IS PROVIDED.

1077

iggg

6.2

i
1

1
1
1
1
1
1
1

1
1
i
1

=== 0000000000000

BREBBBIRR
EER B BBV

1080
1081
1082
1083
1084
1

ALL THE NUMBERS GIVEN uxr ERROR

ig;g

RY TEST.

IN OCTAL.

1223

[

12:08

ERROR PRINTOUT EXAMPLES:
EXAMPLE #1:
MSG A0 ERROR

AFTER START SPINDLE CMD & FWD SET
ooooxu

030144

HOIHN

016530
mé%?

ooggo

000100

0137m
01744

0001

000001

#K RKER RKDS
RKDC
010000 000000 000000 000000

THE ABOVE EXAMPLE SHOWS EXPECTED & ACTUAL DATA FOR
»

WIL
TYPED QUT ONLY ns
rrssr
bxgseaencg/o
?HE3cYL
?i
ouxsfb
DDRESS & HERD 8 SECTOR INFORMATION IS n vnnlnaLE PARAMETER
OF THE TES

C%RS

0_UNIBUS_RKE

c RB”E.PII

DR_PRT1

25-JAN-78 12:00

MACY1l 30A(10S52)

1104

@25-JAN-78

12:08

i{gs

EXAMPLE %2:

iigg

AFTER UNLOARD CMD

1110
1111

TEST NO.
PC
000003 _ 014330

110?

PAGE 22

SEQ 0022

NO_ATTN IN RKASOF

111e
%iia

RKMR2
000144

1115
1116

1117
1118
1119
1120

JOe

RKMR3
10000C

RKER
000OOO

RKDS
100101

[ END OF DOCUMENT 1]
%

RKCS1
000206

RKCS2
000104

RKASOF
0O00COO

CZR6%O
UNIBUS_RK& DR_PRT!

CZR6

|
|

1121
1122
1123

xxsg
XL
1126
iigg

MACY11 30A(1052)

25-JAN-78 12:00

iigg

1134

1135
1136
1137

1138

PAGE 23

SEQ 0023

'NLIST CND, MC, MD
.LIST
.ENRBL

iigg

1131

12:08

¥#% PGM REV 039 x»x

;

@25-JAN-78

ME
RBS,AMA

;DEFINE SYSMAC MACROS

167400

$SWR=

000001

§TN=

167400

;DEFINE SWITCHES 1S,14,13,11,10,9,8

SET FIRST TEST NO. T0'1l

E
-TITLE CZRGHEQ UNIBUS RK6 DR PRTL
; *COPYRIGHT (C) 19751977

.o g1 sggg ¢onp

i
141

lPROGRRH BY GARY PAPAZIAN

1143

nrnxs PPOGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC

1146

’

ii:g

.SBTTL

OPERATIONAL SWITCH SETTINGS

1150

SWITCH

1133
1154

"
S¥

14
13

HEB

; ®

1143

1147

1128
1157
1158
1161

iigg

1164

2 e

¥PACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977.

'y
D%
S¥
.SBTTL

USE

Hgbp %fl 5
o&? fsgoa vpsggrs

1
10B

RLIBIT5« éaso
TYERATIONS | CORS
és
833 ERROR

TEST

IN SWR<7:0>

SUMMARY OF STARTING LOCATIONS

1165
1166
1167
1168

Dx
"
‘¥
%

200
204
220
3

FAULT PRRAMETERS
FR¥LT
PnnnnErens 8 BYPASS TEST 16
TERS
sspur PARAMETERS & BYPASS TEST 16

1170

260

RUN_ MODULE rssr VERSION-DEFQULT MODE ONLY BYPARSS

ii;a

270

SAME RS 260°S ART BUT BYPASS TEST 16 ALSO

171

TESTS

35 gg 40 &

CZREHED UNIBUS RKE DR PRT!1

25-JAN-78 12:00

.SBTTL

1174

1
117
1178

001100

{}Bfl

000015

1187
1188
1189

1777
177772

{i79

1188
1190

177570

1191
1192
1193
1194
{}95

000001

1198
1199

000004
00000S

113
1

177570

12:08

;#INITIAL

8§TACK=

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

.EQUIV éfl?,ERROR
IOT,SCOPE
1

.EQUIV

; ;BRSIC DEFINITION OF ERROR CALL
; ;BASIC DEFINITION OF SCOPE CALL

; *MISCELLANEOUS DEFINITIONS

v
gt?:

199

.EQUIV

PS ;;u

T8
TR.
MRIeRN
£OR
116008
’l

ggsagssrggflcggg;figs gsrunn-ans FEED

SlKLiTe 17070

i RO

%o
“3'
Rd= %%4

fifik §€
55
5:

B315p= 133?70

l‘l l*l

0000

1508
1ag9

0g
000040

: PRIORITY LEVEL DEFINITI

1511
{51}

9
808300

1218
1219
1220

1554
1555
152‘4

1225
1226
1227
iees
1229

3“ PLRY REGISTER

?fi.fio¥é§§
i

PC=

1213
1214
iais

o T A TERRUPT REQUEST REGISTER

: ¥GENERAL PURPOSE REGISTER

000007

1208
1209

SEQ 0024

BRSIC DEFINITIONS

1203
1204

PAGE 24

1
14

020
010000
004000

203000
208908
D00200
000100
0040
000020
000010
000004

SP=

PRSZ
o
PRE=
PR7=

538
g
§3§
34

RAL G

; s PROGRAM COUNTE

Ezpaiggirv LgVEL S
ety
L 23
Eapniggirv
LEVEL
! !PRIORITY LEVEL 7

. ¥*SWITCH REGISTER" SWITCH DEFINITIONS

gl"l: 4
13=

SuWle=
Sull=
SW1

SW0S=

SWo4Y=
SW03=

2000

N——

CZREBHE.P11

MACY1l 30A(1052)
2S5-JAN-78
BRSIC DEFINITIONS

000002
000001

Dgagg2

1262
1263
1264
152;
1
126
1268
1269

1276

i
1581
1282

o83
1285

ITO?:

i
T07=

T05=

BITON=
BITO3=
§xroa=
T01l=
TO00=

- 33 v
v
“
.EQUIV
.EQUIV
v
“
v
.
v
-

ey
.Egfl v

153

1853
1275

1Tl
BITO9=

£58

1271
172

PAGE 25

SEQ 0025

,
' Su2

: ¥DATA BIT
T15=
|
Ti4=
4
T13=
iTias
1
T 6:
o

808049
0004

1261

.
OV
: Iv

12:08

1528
1257

1258

MACY11 30A(10S52)
@25-JAN-78
BASIC DEFINITIONS

-EQUIV
.Eouxx

88580

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

BB E PR L oA S SRR

CZREHED UNIBUS RK& DR PRTI
CZREHE.P11
25-JAN-78 12:00

000004

3888182
UUUN

000014

e
208020
000064
UL

000240

DEFINITIONS

(BITOO TO BIT1S)

2000
1000

400
W

20
10
y

BI7T09,BIT9
79
BITOS,
BIT07.BIT

BITOG, xrg
BITOS.BIT
BITOM.BITH
Tg
BITO3,

SR
T :giré

: ¥BASIC "CPU” TRAP VECTOR ADDRESSES

ERRVEC= 4

vsg: 13

TBITVEC=

TRTVEC= 1M
BPTVEC= 14

58;

30
EMTVEC=
Tnnpvzczga
TovEcs €9
PIREVEC:SHO
-

.SBTTL

:; TIME OUT AND OTHER ERRORS

;;5555
33

D AND ILLEGAL INSTRUCTIONS

: ; TRACE TRAP
BREAKPOINT TRAP (BPT)
: ;
IPUT TRAP

(I10T)

#%SCOPE¥¥

: ;EMULATOR #nnp (EMT) %%ERROR¥¥
..

: i "TRAP" TRAP

KETRYEROVECTOR
INTEKEUP?RREQUEST VECTOR
' PROGRAM
:110
..

RKO& CONTROLLER REGISTER DEFINITION

Bt s B B o ot Pt ot s s Pt s Bt Pt ot o ot ot s s s Pt Pt ot ot ot s Pt Pt e B Bt Pt Pt Bt Pt P B s e Bt B B s s Pt s P
WW
WG W R
e B Bt B B et s B n e
n
N
0
DOHNC
U LW~ DD

UNIBUS_RK& DR_PRT1
P11
25-JAN-78 12:00

Buva2o/ —EB8BIFREONE38

;

: CON

RKDA=
&
RKCS2= 10

£SE§¥
: CON

RKER=

‘ERR

;DA

RKASOF= 16
KDC=
go
RKDB=

AND STATUS REGISTER 2
TATUS
REGIST

,oaxgs

IATTENT
;oe;a

AND OFFSET REGISTER
REGISTER

.SBTTL

CONTROL AND STATUS REGISTER 1 BITS (RKCS1:0)

;

DRIVE CMDS

= 7

R ggE= 11

RECAL=
13
OFFSET= 1;
é
EE K=
21
DDATA=
gnon;gf sg

WRHEAD=
27
WRTCHK= 31

W& WJUN'—B

STATUS

26
34
36
30
32

CLEAR=

BITO

ggg

iMA
GISTER 1
:MAINT
gTER g (MSG LINE A)
:MAINT
TER 3 (MSG LINE B)
:ECC POSITION
INFORMATION
:ECC PATTERN INFORMATION

sSELECT DRIVE (GET STATUS)

Eggcx ACKNOWLEDGE
;DRI

;ST

zuS??E
HggSER AND DATA
:WRITE CHECK

BR17=

BITS

g’ra

g,;i?

:BUS
58

CFMT=
DCPAR=

B 715
5.71

BIT

SPINDLE

;nscg&¥annts
:OFF
K
:
DATA
3
;gax E
TRR

B ;;

BR1b=

AND

RKMRl=
RKMR2=
RKMR3=
RKECPS=
RKECPT=

; LDRV=
CK= 5

BIRREBR-S

b0 Couni&c«EcotEn
ségron REGISTER

RKCS1=

RKDS=

000040

SEQ 0026

$BRSE=177440

=" ¢

@ WL

s s e et e

W)
L£rw
[l =1V ]

NO2

MACY1l 30A(1052)
25-JAN-78
12:08 PAGE 26
RKOB CONTROLLER REGISTER DEFINITION

;xg; gnurr ENRBL$

ESus

SSRSI 16

: CONT
;gsnc

a}r
R

;vps (0=RKDB,

R gaxvsnronnnr (0=22 SECTOR, 1=20 SECTOR)
¥ ; OR DETECTED BY CONTROLLER

xnrs
DRI
:CONTROLLER
ERROR
: CONTROLLER CLEAR

=
CERR=
CCLR=

ITiH
afrxs
BITIS

.SBTTL

CONTROL AND STATUS REGISTER 2 BITS (RKCS2:10)

DRVMSK= 7
RLS=
BIT3
BITH
BAl=

SCLR=

BITS

1=RKO7

;MASK FOR DRIVE SELECTION CODE
:DESELECT OR RELEASE DRIVE IN BITS 0-2
:BUS ADDRESS INCREMENT INHIBIT
:SUBSYSTEM CLERR CONTROLLER AND ALL DRIVES

CZRGHED UNIBUS RK& DR PRTI
CZREHE.P11
25-JAN-78 12:00

1343
iaa“:;
1346

MACY1l 30A(1052)
25-JAN-78
12:08 PAGE 27
CONTROL AND STATUS REGISTER 2 BITS (RKCS2:10)

SEQ 0027

:
%gf
PGE=

B
ax;g
3}110

{ SUTBUT READY
ot
n Bi ING
Lgn BEog
LECT
1
EEaSS

H
}3?1’

B
163008

L
Bss

Bliie

LR
%a LATEE
nsoe

1355

000001

ILF=

BITO

; ILLEGAL FUNCTION CODE

&?fi

|
1358

INP

ADY

SBTTL ERROR REGISTER BIT or-:rmmou (RKER: 14)

e
000010

i = BIT3
[
gm-

131

000100

ECH=

DTYE=

5175

:
IVE wps ERROR

1363
1363

000
00
810000

toEe.
IDAE=
BYE=

§}no

BI18
BITi2

ICYL
P
INVALI
tBRIVE TIMING

DCK=

BITIS

.SBTTL

STATUS REGISTER BIT DEFINITION (RKDS:12)

000001

DRA=

BITO

000010

ACLO=

1365
1368

ig;?

g2000g

moa“uoDD

1372

1374
1375
1376
1377

8%2

Ei;g

BITi3

S
e
DRIUE TECTED EERGONPARITY
ERROR

FECC

HAR

RFLOW
ERROR
§S ERROR: HEAD/CYL
ERROR

;m RATION (SEARCH) IHCOMPLETE

:DATA CHECK

;ORIVE nvnigl,a?n.s(CONTROLLER IS SET IF
oISB
! DRIVE
; tou

ST=

BIT2

1383

300030
mum
000400

004000

6%=
A
DDT=
WRL=

Bife
BIT8

BITIl

EBSIVSuOFF TRACK
QeD
ESvae T
(0=RK0B&, 1=RK07)

iggg

100000

SVAL=

BITIS

:STATUS VALID

iggg
1393

gg%%
100

Eég: » éflg
mep= BITE

1378
i
1382
1388
39

3%
1397

005408
2000

BIT3

HRITE LOCK

.SBTTL MAINTENANCE REGISTER 1 BIT DEFINITION (RKMR1:22)
SMSK=

nilke
gile
MEWD=
BITIO
=

01
FoRcE §N PARITY ON SE®CON MSG LINES
:Hngxmzmuc SECTOR PULSE

RAINENGE
CLOCK
MAINTENANCE ENCODED WRITE DATA
-

—

uRITagssNznTégfl
EhERD OR WRITTEN

GRT=
RDGRTE= BIT1S

.SBTTL

DEFINITION CF DRIVE STQTUS BYTE 00 MSG A (RKMR2:34)

;DRIVE AVAILABLE
; VOLUME VALID

i DRIVE TYR (0=RKOB,1 = RKO?)
-

ON
; SPINDLE

{BRIVE SYATGS CaNGE

.SBTTL

DEFINITION OF DRIVE STATUS BYTE 01 MSG R (RKMR2:34)
asgxg "SHEPRESENT

BRUSHES

IN ERLch
TR&GE

ll§

ADS LOGD%NG

,INVRLID DISK ADDRESS ERROR:HEAD/CYL

ggé
I%“fgcléé:gigggfi PARITY ERROR
fi..

MDD

N ne e n

.SBTTL

DEFINITION OF DRIVE STATUS BYTE 00 MSG B (RKMR3:36)
Y
M M
0
= et e e O 0D IO
LWU-0O

.SBTTL

ggfiF%iFPR .fi

100000

SEQ 0Oes

PRECOMPENSATION ADVANCE

SSSI(.SLS&:I&S&S&
AR
EEEEEEEEE
R R LR EELE:
w
U’Nfl(flg&&&g
n
DOV
JI&I&&S&;IS‘SJI&
EHR-OBBIRNE
W 83 R
RSN s -0 BB IR 2R B 8

s
ottt ot o o ot ot et s s s Pt s Bt ot P ot Pt Pt et s Bt Pt Pt ot s P P Pt P
s Pt s <0
Pt s Dt Bt Bt Bt Bt ot ot Bt ot s Bt ot ot et s o

—

004000
10000

MYl R IATERAN
RISCE
TER 15877 oEPERITTon cRKMR1:22)

©POOOODDD0D

25~ flN-?Blé:00

CZREHED UNIBUS_RK
CZREHE.P11

,R/H

K ERROR
S
TRACK
UNSAFE

DEFINITION OF DRIVE STATUS BYTE 01 MSG B (RKMR3:36)
; SECTOR ERROR

;WRITE CURRENT AND NO WRITE GATE
HR&BE gfiL‘ AND NO TRANSISTIONS
;HERD

BITS

"ULTIPLEIHEED
SELECT

TRIBIT tnnon

:PLO ERR

ERROR

CZREHED UNIBUS RKE DR PRTI1
25-JAN-78 12:00
CZREHE.P11

830000

1454
1485

e e Bt Pt Pt Pt Pt s Pt Pt Bt Pt —
ss

LLLLLLLELLELLLL

TTET A

040000

—

000007
077770

—————
A
e

@25-JAN-78

007000
100000

——

DO3

12:08

PAGE 29

DEFINITION OF DRIVE STATUS BYTE 01 MSG B (RKMR3:36)
.NMOV= 3}71
.LIMD=
BITI
D.SUNS= BITI4

: SEEK_AND _NO_MOTION
;LIMIT DETECT ON SEEK
; SERVO UNSAFE

.SBTTL

COMMON MASKS AND OTHER BITS: MSG A (RKMR2:34)

M.DRV=

7?7

SBTTL

COMMON MASKS AND OTHER BITS: MSG B (RKMR3:36)

M.SER=

77770

M.
tcus §171u
M.SECT=
M.ID=

e
e

MACY11 30A(1052)

M.HERD= 7.
M.PAR= axrxs

;DRIVE CODE,

ALL BYTES

:DRIVE SERIAL
%, BYTE 11
Y
E
SE
gu
a$¥é
o oufir BYT Z

HERD nccoog g
PRRITY MESS A/B, RLL BYTES

SEQ 0029

CZRSFEO UNIBUS RK& DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

EOQ3

25-JAN-78
12:08 PAGE 30
OMMON MASKS AND OTHER BITS: MSG B (RKMR3:36)

MACY11 389( 1052)

SEQ 0030
)

.SBTTL

000000

o ot Pt Pt —
s s P P
ot
s s ot P

0070S6

b {73

8
438

Te70

007076

MDTST

:BYPASS N-SQUARE TEST IN DEFAULT MODE
s INPUT ALL PARAMETERS 8 START TESTING
;BYPRSS N-SQUARE TEST IN PARAM MODE
sENTER 0DT11

STS DEFAULT MODE ONLY

TESTS
"°8%’§§AS EVERAC
260 &eanss N-SQUARE TEST ALSO

MDTSTA

RACT11 HOOKS

3 lllllllll!l!li!!lll!llllll!ll!I!Illlillllllililllllllllllll!lll

0002
0000
043010
0000Se
100000
000274
001000

000046
0000s2

Aooxs niaeggso BY ACT11

:SAVE PC

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

sgggno

"WORD

- =§SVPC

100000

,.E)SETokgc.Sa TO 100000

_SBTTL APIPRRAMETER BLOCK

RESTORE

o = 3636 3636 36 36 36 36 36 36 36 30 08 36 36 36 36 36 36 36 36 36 36 36 3696 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 26 36 36 36 36 36 36 36 36 36 2

:ssr LOCATIONS 24 AND 44 RS REQUIRED FOR APT

-llllilllllllllI!Ilillllllil!ll!!llll!lll!illl!!lllllll!!illllll
. '

000024
£

F
R Q‘L0

INT TO START OF PROGRAM

3
N’TMCT gC)ORESS PNTR.
8
. =YY
$APTHOR ;;:8
g'
LOCRTIM COUN
s EEmEEnEEEEEnnnkl 363030 36 0000 0006 3000 000600000000 00 0 000000 00300000 000 300 360036 0606 36 00 30 0030 00 0 00 0 00 0 0
"

10
001000

APT PARAME TER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC

geees
BeREs

; INTERFRCE SPEC.

888§

e
s s
Bt s P

DONC'NEWN-0O

067744

.SBTTL

e e e B

AY REGISTER
SWITCH REGISTER
gufpk
3

BYT16
PARSRT
BYT16A
0.00T

007034

L L L

STARTING ADDRESS(ES)

; ; SOF TWARE
! !SOFTWARE

35520
35530
jfiguo
36550

006774

s s s s o Pt Pt ot ot

0
0

28START ;;JUMP TO STARTING ADDRESS OF PROGRAM

007014

LLLL

Pt o Pt s

.uono
uon?

J"Eou

007120

s ot

SWR
.SBTTL

DISPREG:
EG:

ot e
ot
s s s s et P
s ot

e B Pt Bt Pt ot ot

D LOCATIONS FROM 4 - 776 CONTAIN R “.+2,HALT"

*ALL

lSEOI.ENCE TO CATCH ILLEGAL TRAPS AND INTE RRUPT
lLOCRTION
%CONTRINS 0 TO CATCH IMPROPERLY LOADED VECTORS

LLLfrL Lk

38 SB8o8BBIRRLERN
28 3B
ICREOR2B
33 3e

1471
1472
1473
1474
1475

TRAP CATCHER

SAPTHD:

SHIBTS:

. WORD

$TSTM:
SPASTM:

.WORD
.WORD

SMBADR: .WORD

MAIL

80.
600.

;; TWO HIGH BITS OF 18 BIT MAILBOX ADDR

;,‘DDR;?S

%L 0X_(BITS 0-1S5)
APT MA

TEST
M _OF LONGEST
,,RUN
;sRUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)

—

e Bt B

Pt ot Pt s s s s s P P

nnunnunininnininuin

Pt et

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

s ot s s Pt o et

e Pt e Pt

iy IV

e Pt Pt e

SRR
A
W
EREARR wn =35m0 neA LoRpnon
NLORBBED
T £
DB I LR

g8 s

e Pt s Pt P

WHERE

IBUS_RK& DR_PRT1
25-JAN-78 12:00

1010

1012

001130

000042

MACY11 30A(1052) 2S-JAN-78
APT PARAMETER BLOCK

SUNITM:

.WORD

600.

.LIST

.WORD

FO3

12:08

PAGE 31

; sADDITIONAL RUN TIME (SECS) OF A PASS FOR ERCH ADDITIONAL UNIT

SETEND-SMAIL/2 ;;LENGTH MAILBOX-ETABLE (WORDS)

JUSE LOOP X TO OMIT JSR PC, SUBCLR
.MACRO

LOOP
SCOP1

#STACK, SP

;RESTORE STK PTR

.IF

PC,SUBCLR
24

;CERR AFTER SCLR

& B3 WITH STANDARD BITS SET
MACRO FILLS EXPECTED MSG RO,BO,AR1,B1,R2,B82
I

: R=D.DSC AFTER ATTN OR O AFTER DRIVE'CLEAR'OR’ANY IMPLIED SEEKS
:

NOTE: A CAN BE ANY BIT COMBINATION DESIRED

EEX
MOV
MOV
CLR
.ENDM

Hov

F.ERB

Em!o.snmo.omyéo.w%g.ogé. .RO
:EXPECTED MSG RO
#<D.SPOK!D.CART!D.
’ .gm '3?”5'“1
:EXPECTED Al
81.E.B1
;
10 FOR
E
ED'MSG Bl
E.Ag
s EXPE :p nsgfi .

#3583

inee 1B FOR EXPECTER Med B3

06 TESTE
ik,SEL5
0100
| TS "I SEUER BN 150,0
“EitAbo: & 'HEADA’
Tnfo,*SECTOR®
put J1ESs
18 READ gg g § PUT
o fifl"‘g
INFO INTO
1=T8s T
"MACRO

.ENDM

< ERROR DESCRIPTION)

CHECK

R,C,D,E,F,G,H,I

JSR

. RROR
WORD

PC,

RROR
RROR
RROR

C
D
E

CHECK

CHKMSG
csh?x
A

T ERROR #
DIFF/OFFSE
A=CYL ADDR
g B=CYL
ERROR %

;

SEQ 0031

: CHECK
,A1,B1
52
ngcs"?fi?c??tgg
néhg
: MSG
RROR F
:
RROR
iMSG Al Enaon
iMSG Bl
ERROR

C%RBHEO UNIBUS_RK& DR_PRTI1

oo
oo oo oo oo
T b= b e s s s b ot s Be
WN-0OWVONCNLEWN—-0O

o-»-o—o-o-u—o-h-t-o—fio—o—o—o—-t—o—o-o-»-o-o—a-o-v—v-v-o—o—o—o—v—o—u—-o—o—u—o—o—o—o—o—.—o—-—r—o—o—v—»—
R
&
28

[l
T ey ey

%"a'%fi"fi‘é%fi&’%fi%%fifi%fi#

P11

25-JAN-78 12:00

MACY11 30R(1052)

GO3

25-JAN-78

12:08

T PARAMETER BLOCK

;

PAGE 32

SEQ 0032

C= <ERROR DESCRIPTION>

"MACRO CWD2

A,B,C,?D,%E

MOV

#2,RKMR1(RS)

‘;S'T‘
B0

vtg?r
e
§

RROR

BEQ
ERROR

E
B

.ENDM

CWD2

.MACRO

LPCHK
CLR
g 5

km_c

JMP
IMP

SLPERR
SLPADR

.ENDM

.MACRO

LENDM

LPCHK

CYLADD

ng
NOTg%snnso c

sse

iBR IF ves
:MSG B2 NOT CLEARRED C

:SW 9 WAS SET.
:SW 14 OR B8 WAS SET

WeRE IsN&THSRR IS SET
SN oIF sunfu
e I !:5&:
2T R ; oS T RET TEST)
; RETURN
:SW B WITH SWR <7:0> AP

SWB1Y

‘SWR9 (LOOP ON ERROR) TEST
;
TSTSWS

sng
1

L.ENDM

;SEE_IF
MSG A2=0
E 1F vEe

7R
SESCAPE

"MACRO

; SELECT WORD 2

R,B

Lfirgc

SW9, ASWR

BNE
JMP

TSTSW9

A=BRANCH POINT TO RECONDITION DRIVE
B=JMP POINT TO RE-ENTER MAIN LINE
;LOOP ON ERROR?

:YES, RECONDITION DRIVE
:RETURN TO MAINLINE

TO OMIT CHECKING MSG RO,BO,Al & Bl

! USE DRCLR

"MACRO

DRCLR

R,?C

MOV
MOV

#CCLR,RKCS1(RS)
SUNIT RKCS2(RS) ;DRIVES

'CLsggthSI

T CONTR RDY

"°§
o
Bga

cc,rsmm

138 BSIVE-SLEPSATR B B6% GRB
:TEST FOR ATTN

ERROR

154

;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD

CZRGHED UNIBUS RK6& DR PRT1

CZRBHE.P11
l
1238
1239

iszg

.ERB

CHECK

HO3

12:08

PAGE 33

iA=BLANK TO CHECK RO THRU B2

Enf& a%«crocxong cnccxmc°§uk
HRU B2

1
iggé
1653
iggg
1654

!EE R BLARK
%rAD THRU B2 IN DRCLR
: THE Fou{oumc fi&o
N "fi CHANDGED ON 24-0CT-77
:
é
:5
5ag§
LEc‘l‘{Eh:lgswhc
1
HAND“°€°° 1 NG FOR SUBSTITUTING ITEM 2

{gg

"MACRO

CALIB

A,D,?C,7F

ir;sx

MOV

1€€3

583

1665
1666

ZRRor

Dg%
E§§<5§

MOV
JSR

81, RKMR1(RS)
PC,GSTAT

1662

iga';

1523

BIT

1670

167

1575

12’72
1676

ig;7

1573

1680

1683

.ENDC

iggg

.ENDM

1688

ige

"MACRO.

iggg
1693

IR
I

MOV

)

80.RTZ, HMR2

BG.FATTL

o TEMP2

BBy RO T TR TER RECAL cH
T_CONT

:SELECT WORD 1
.

:
;

TZ NOT ssr ounxuc RECAL CMD

?
TTN AFTER RECAL CMD

EHE“cE
2 t1"'“:75Afi& 276,n?
<AFTER
RECAL CMD>,T.A2,T.B2,T.B3
CuWD2
CMD>

ngx

PsRKI'R*(RS)

‘§§'PE$T TlfiMESSAGE

BEQ

:BRANCH IF SO

DRCLR

’f T

i|pl;lg

flies

SEQ 0033

273,265,274,266, <AFTER DRIVE CLEAR CMD>,T.A2,T.B2,0

]

1645
1647

25-JAN-78

APT PARAMETER BLOCK
IF
-

1642
164

25-JAN-78 12:00

MACY11 30A(1052)

ERROR

330

m.'fugcss uL ?

:REPORT THE ERROR

CALIB

i IDAE IS CLEARED ONLY BY RECAL & DRIVE CLEAR

CIDRE

MOV

#CCLR,RKCS1(RS)

cznsueo UNIBUS RK& DR PRT1
CZREHE.P11
25-JAN-78 12:00

MACY11 309(1052) 25-JAN-78
APT PARAMETER BLOCK

s Pt s Pt Pt P Pt s s s Pt Pt P

£394
695
696
697

MOV
MOV
JSR
ERROR

698

DRCLR

699
700

103

12:08

PAGE 34

SUNIT,RKCS2(RS)
SRECAL , HCS1
PC, DOCHD
;D0 RECAL_CMD &
GET CONTR RDY
124
:RDY NOT FOUND AFTER RECAL CMD
X

PC,GSTAT

;85

éa

3o.xone,una3

sss }r
IDARE IS CLEARED

;83

ERROR

155

xonz NOT cLsnnso AFTER RECAL CMD

MOV

07
W—-0WwoONCNLWwN—-0

ot s it ot o

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

NNNNNNNNNNNNNNNNNNNYY

;LOOK FOR ATTN FROM RECAL

;NO ATTN AFTER RECAL CMD

JSR
ERROR

HCS1
50¢no
P8SEEK,
13}

READY
;D0 SEEK CMD asgsvK CONTR
CMD
:NO 35Y AFTER

CLR

E.BO

CHECK

3204,205, 206, <DURING SEEK CMD>,T.AR2,T7.82,0

JSR

ERROR
.ENDM
:

8CCLR, RKCS1(RS)

T1, TEMP2

PC.FATTI

CIDRE

A=D.FWD/D.REV

"MACRO

SKRDY R
MOV

MOV

ggg

75;

#<D.PIP!D.SPIN!D.VV!D.DRA> ,E.AD ;EXPECTED RO

¢<n-oaspox-o.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

3 ENDM

SKRDY

;gg

.MACRO

SKATN ?A,?B

e et et s Pt 0 ot et s et s it Pt s s Pt s s ot s s s P

7
759

730

735

RROR

7
733

734
735

736

;33

Pc FATT2

#CERR, HCS1
A

cugcx

133 §gq 135, 136, <AFTER SEEK CMD>,T.R2,T.B2,0

OR
F.EARB

ERROR

210
D.DSC

;CERR AFTER SEEK CMD

137

:CYL DIFF NOT CLEARED AFTER SEEK CMD

Binom
:

;us

:QUICK START SPINDLE.

749

:NO nrrn nrrzn SEEK CMD

17
ESS

Jus
7HS
;32

;FIND
A

SRATN

"MACRO GQKSRT
JSR

PC, SUBCLR

SEQ 0034

CZREHED UNIBUS RKE DR_PRT1

25-JAN-78 12:00

APT PARAMETER BLOCK

e e

MOV

JIFB

.ENDC
.ENDM

#SRTSPL , HCS1

PC, DOCMD
121

;D0 START SPINDLE CMD & GET CONTR RDY
:RDY NOT FOUND AFTER ST SPIN CMD.

150G, TEMP2

:SETUP

UNLD

_TIMEOUT

;FIND_ATTH

:NO ATTN AFTER ST SPIN CMD.

108,28

QKSRT

QKSEEK

JSR
ERROR
MOV

ENTER WITH CYL % IN RKDC
?A
#SEEK , HCS1

PC, DotMD
131

150000, TEMP1

JSR

PC.FATT2

ERROR

.ENDM

%0 (0%

;CERR AFTER SCLR

CLR
A
TSTSWS

MOV

PAGE 35

PC,FATT1

QUICK SEEK.
"MACRO

JO3

12:08

Jgn

ERROR

NNNNNNNNNNNNNNNNNY
\l\l\l\l\lgfll\
NNNN
R0k
LW
&3 58SRRLERN28BBLRR
£ nnéé 8 DO NN
mfl\l\i\las
LW

et ot s s s ot P Pt o ot Pt s Bt Pt Pt Pt ot ot ot s s s s P ot Pt ot ot ot Pt ot s Pt B

MOV

uin
OO0~

e B

e P

JSR
ERROR

;D0 SEEK CMD & GET CONTR READY
iNO RDY AFTER SEEK CMD.

;FIND ATTN

s&g

gcenn,uc51

:NO ATTN AFTER SEEK CMD

ERROR

210

;CERR AFTER SEEK CMD.

JSR

PC, SUBCLR

ERROR

;CERR AFTER SCLR

QKSEEK

QUICK REPETITIVE SEEKS

A=INC/DEC

CYL®

B=FINAL VALUE OF CYL# BEFORE EXITING

.MACRO

QKRPSK

A,B,?C,?D

JSR
ERROR

PC, SUBCLR
24

;CERR AFTER SCRL

MOV

TOCYL,RKDC(RS)

;CYL#

CM
BEQ
A

TOCYL,B ;LAST CYL DONE?
;En é‘ YES
‘ELSE DO ANOTHER
ocYL

ot o

NNNNNNNNNY
[eeleelealue]on]

B Bt s s Bt s Bt s ot P

25-JAN-78

ERROR

3 SIS
ngWHD

CZREHE.P11

MACY1l 30A(1052)

ox;esx

JSR

PC, SUBCLR

ERROR

:CERR AFTER SCLR

CZREHEO UNIBUS_RKE DR_PRT1
CZREHE.P11
25-JAN-78 12:00

MACY1l 30A(10S2) @25-JAN-78
APT PARAMETER BLOCK

1806

}sgg

KO3

12:08

PAGE 36

SEQG 0036

LPCHK

{3?3

.ENDM

iaié
131
igig

QUICK
5o=5Lm<u
#8“80 SUBCLR & LPCHK
:D=NON-BLANK TO BYPASS

ig};

"MACRO

181

QKRPSK

QKUNLD

PC, SUBCLR

;CERR AFTER SCLR

JSR
ERROR

PC, DOCMD
'1’ 1 anm

;D0 UNLOAD CMD 3 GET CONTR READY
:RDY NOT SET AFTER UNLOAD CMD.

JSR

PC, SUBCLR

MOV

193§

JSR

Emon

PC, FSPOK
815

:SPEED NOT DOWN BY TIMEOUT

éanon

PC, SUBCLR

:CERR AFTER SCLR

igxg
wEaaxu

ganoa
MOV

1822
ieea

igiasg

1827

ig,‘e’g

ERROR

133?

igg
1838

LPCHK

24’
SUNLOAD, HCS1

12'

;NO ATTN AFTER UNLOAD CMD
;CERR RFTER SCLR

710, TEMP2

24’
°*

1840

ig:a

.ENDM

1848
{gfi%

! A=WRHEAD/ <CFMT! WRHEAD>
; USE m&
<R>,X TO OMIT CHECKING RO,BO,A1,Bl1

1841
1842

}ggg

1851
1823
1854
1855
1857
wga
iSEB
1861

"MACRO

1852

QKUNLD

JIFB

WRHDR

MOV
JSR
RROR
5B
I
RR
57?8“
JMP
¢

R,C,?D

8<A> HCS
ggb
GSTAT
8CERR,HCS
20
nécxa
$e0P

PC oArcré

;00 DATA XFER CMD & GET CONTR RDY
;Eg ngv nngn WRITE HERDER CMD

:GET FRESH STAT

:CERR AFTER WRIT
ER CMD
ESSomxgg
BALANC &Qesrs

:ABORT

DRIVE

CZRGHED UNIBUS_RK& DR _PRTI
CZRBHE.P11
25-JAN-78 12:00

MACY1l 30A(1052) @25-JAN-78
APT PARAMETER BLOCK

1523

F.EAB

1864

.ENDC

1866

.ENDM

1865

iasr

1823

CHECK

LO3

12:08

PAGE 37

SEQ 00237

77,267,300,270, <AFTER WRITE HEADER CMD>,T.A2,T.B2,0

WRHDR

; A=RDHEAD/<CFMT!RDHEAD>

ig;?

: USE RDHDR ¢R>,X TO OMIT CHECKING ARO,BO0,Al,Bl1

iB;S

"MACRO

137q

1875
1876
1877
1878
1879

1881
iggé
1884

{gegaas
1

A,C,?D,?E

MOV
JSR
RROR

#8<A> , HiS]
PC, DATCMD
17&

;D0 DATA XFER CMD 8 GET CONTR RDY
iNO RDY AFTER READ HEADER CMD

‘mecie
5233

;CEORTTBALANCE
ss&ve OF TESTS O

MOV

1888

1889
1890

8CERR, HCS1
D

MOV

RKDB(RS),

;1’ST WORD FROM SILO TO RHTAB

RKBB(RE)'(R3)+ i5:RB

BIT

#DLT,RKCS2(RS)

(RO)+

BEQ

1ggé

SRHTAB, RO

1T
asg

SPe:
JMP

1893

RDHDR

’

g GSTAT

RROR

173

;DLT AFTER READ HERDER CMD

:ABORT DRIVE

YPE

MSG18

:ABORTING BALANCE OF TESTS

% 94

IMP

$§e0P

189
1838

LIF

1899

.ENDC

?.sna
CHECK

301,271,302,272,<AFTER READ HEADER CMD>,T.A2,T.B2,0

1902

{282

evon rovon'

1903

;

§38§

:B=310 FOR TOCYL/311 FOR FRCYL

1904

igge
19i&

isig

:A=TOCYL /FRCYL

.MACRO HDCHK3 RA,B,?C
RDHDR RDHERD, X
CMP

iéiq
1316
1917

—

RHTAB,A ; CHECK uongng (gYLO) ONLY

iRE cvfl“fiono HEADER ERROR

MACY1l 30A(10S2)
@25-JAN-78
APT PARAMETER BLOCK

.MACRO

S
A LR R
VoV
IV o]
NNN
W

MOV

SRDHERD, HCS1

iR8 RBO°aFFERReRD uEABER ERBTM" TMY

TYPE

;ABORTING BALANCE OF TESTS

for

Try

$§eoP

MSG18

RKDB(RS), (RO)+

MOV
MOV

RKDB(RS), (RO)+
RKDB(RS) (RO)+

géT

8DLT,RKCSE(R5)

JSR

Pg GSTAT

;CERR_AFTER READ HERDER

CMD

; ABORT DRIVE

ST WORD FROM SILO TO RHTAB
é
ND WORD

3'RD WORD

.SEE IF DATA LATE
;DATA_LATE ON READ HERDER
E OF TESTS

;

ga. SRHTAB+132.

ghLI
WORDS DONE?

JSR

PC,SORT

; SORT RHTAB INTO SRTTAB SO THAT IT

4RTTas,rRo

Hov
CMP

(R0}
s, YenP1
¥ohe:

$HDTARB,
R1

ERROR

202

HBENT, wes.

BNE

'BEG NS HI;H SECTOR O

:
ADER TABLE
:CALC HEADER TRBLE

;C
ACTUAL WITH CALCULATED WORD
;BR _IF COMPARE
;RERD HERDER MISMATCH
;ALL _WORDS DONE?

iBR IF NO

RALLHD

A=TOCYL/FRCYL

"MACRO

SEQ 0038

ifon §5;08TCHO
8CERR, HCS1

BEQ

.ENDM

e e

SRHTAB, RO

MOV

PAGE 38

MOV

e te"gs
lde
JMP

?A,78,7C,?D,7E

MOV

12:08

RALLHD

§éT

2 &FEREE0SPREBRESER

e peps
e

CZRGHED UNIBUS RKE DR PRTI1
CZREHE.P11
25-JAN-78 12:00

B=HERD#, C = 0 FOR 22 SECTOR,

HDTBL

R,B,C

MOV
MOV
MOV

A,C
s
#C . FORMAT

JSR

PC,FHDTRB

176FILL

:HERDER
; TRBLE

1 FOR 20 SECTOR

SR::o—u—r—o—o—o—o—nu—usg;g;o—;;v—o—o—u——SHSRREALEE SQVG'M
(7] Q§QOQ
um~83PARR
Y.

CZRSHEO UNIBUS_RKE& DR_PRT1
ZREHE. P
25-JAN-78 12:00
1974

Enon'

——0
-0d

By
Q00

NO3

12:08

USE FSECA FSO22,RDSEC,22
USE FSECA FS020,R20SEC,20
.HRCRO

PAGE 39

SEQ 0039

HDTBL
FSECA

FOR 22 SECT OR_FORMAT
FOR 20 SEC TOR FORMAT.

R,B,C

’

§E£28RCAGGED IF NoT“FOUND 8Y TIMeouT
A:
18:

MOV

M
JSR

TST

EsE
ST

2s:

3s:

BEQ

TEMPL,

T
P

- (SP)

"TEMP1

SECTOR

c?on

DEC

TEMP1

MOV

(SP)+, TEMP1

BNE

RTS

MOV

[V IV IV DO

. 1975

MACY11 30“(1052)
25-JAN-78
T PARAMETER BLOCK

(SP)+, TEMP1

82, (SP)

;SAVE TEMP1

;gsrgp TIMEOUT
{READ SECTOR

:LOOK FOR SECTOR O

:BR IF SAME TWICE
; TRY AGAIN

TEL §§ REST
;EX

IF TégEOUT NOT UP

TEMP1

;SKIP OVER ERROR

- ENDM

USE FSECB FNS22,RDSEC,22 FOR 22 SECTOR FORMAT
USE FSECB FNS20,R20SEL,20 FOR 20 SECTOR FORMAT
.HRCRO

FSECB

A,B,C

FI ND NEXT SECTOR IN C_SECTOR FORMAT
ERROR FLAGGED IF NOT FOUND BY TIMEOUT

CZREHE 0_UNIBUS_RKE DR_PRT1
- CZRBHE.P11
25-JAN-78 12:00

MACY11 30“(1052)
S-JAN-78
PARAMETER BLOCK

3s:
2s:

MOV

1B
CMP

gég
§§§
ggg
MOV

ggg

BO4

12:08

PAGE 40

SEQ 0040

TE'PI -(SP)

sSAVE TEMP 1

Pstc SECTOR
A J—

;
i B0t
TRY READ DIFFERENT TWICE

TEnP1
(§P)+,Tenpx

1 B0tTRY RGATN IF TIME LEFT
;RESTORE TEMP 1

(SP)+, TEMP1

;RESTORE TEMP 1

gg,(s#)

{READ SECTOR- |

:SKIP OVER ERROR

.ENDM

USE SECTST FS022,FNS22,RDSEC FOR 22 SECTOR FORMAT
USE SECTST FS020,FNS20,R20SEC FOR 20 SECTOR FORMAT
THE FOLLOHING MACRO DEFINTION IS CHANGED ON 24-0CT-77
1. EE ? #INES FROM THE COOING

HRCRO

CTS

JSR

ERROR
A:

142

CLR PSEC
JSR
PC :

ERROR

HOY
JSR

séé

233

;

E,F?R,?

To¢ SEC

;

CMP
ggg

BEQ

ggg

gscron,ssec

DEC

.ENDM

SECTST

;

CMP

ERROR

ERROR
BNE

sséron PSEC
sebron,Pssc
144

;FIND SECTOR O

:SECTOR O NOT FOUND BY TIMEOUT
;PREVIOUS on
:FIND NEXT g&

:DIFFERENT

TUP

EXPECT

cron

NOT FOUND BY TIMEOUT

CTOR

}GBoATE"
% EBcToR
iRE

,an IF READ SAME TWICE

TRY 1 MORE TIME

nsc B3 ERROR, SECTOR REG UNSTABLE
'MAY BE DURINS SECTOR PULSE TI

INS

;MSG B3 ERROR BETWEEN SECTOR COUNTS

;BR IF SECTOR COUNT NOT DONE

SECNT

‘DETECT QUTER LIMIT: FCP1,FC,D.REV,OQUTER
:DETECT INNER LIMIT: LCM1,LC,D.FWD, INNER
; THE F FOLLOWING MACRO DEFINITION IS CHANGED ON 24-0CT-77

CZRSFEO UNIBUS RKE DR_PRT1

CZREHE.P

25-JFN-78 12:00

MACY11 300(
lmié

CO4

-78

12:08

PAGE 41

SEQ 0041

ADD NEW LOCAL LABEL
. DELET CHECK MACRO CH.L ON LIMIT DETECT

cBS CTRE
"8 B c D, b

PC, SUBCLR

24’

bcfitfnn

;SUBSYS CLEAR 8 GET STATUS

:CERR AFTER SCLR

;BYPASS CHECKING FOR ANY CERR IN GSTATI

;USED FOR VALID HALT

#PAT, RKMR1(RS)

R, RKDC(RS)
gésex HCS1

;PARITY & WORD O

38 &85 rsa &Efi Wi T BRD-PARITY
P,00CH0
18 st sopvo BOTTINGTRTORESe A" SRR e

PE-TSTATN

——
m—
O

Pt bt

28o

g &8.B

;BYPRSS REST OF TEST

?:532"58

“pr-o & N'Dvv- °*°k5 w E“%séEDTSET %s
WV'
!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al
63, 164, <a¢55 gsgéaée 287587’
0 u0

2o2550

AAAA

sSESS

R BDD NN EW—ODE
AT R B
BB IR

;DRIVE NOT UNLORDING ARFTER LIMIT DETECT

.LIMD,H.B1
oaom
£33
£
n

D
Pt B

cT
NOT FOUND BEFORE TIMEOUT

smzfi?fié’fi
MAY

Bt Bt (ot Bt s

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

s Bt Bt

ORIV
AU PV ULV PRI RUMUI VU

5%23 o8

8D SPOK!
D, CART
.DOOR!D. BRHM!D. SSP»,E.Al
110 l?i 146, 147, CRFTER SEEK WITH BAD PARITY,O, 0,0

:NEED FOR TH$ cn#an SEQ

Néfi Zéngo DETECT BIT SET IN Bl

:OTHERWISE

REPORT ERROR

CZRGHED UNIBUS RK& DR PRTI

25-JAN-78 12:00

3s:

s Pt Pt Pt

NNs B BLV
YV
ML R TVRUIYNYNINY U RO RN PV FUNY Y MU FUNY U FUNL Y FURY MY VTV RV VN Y
s B Bt s B e e Bt s s Bt B Bt Bt ot Bt i

AV SPRECRCESS
S £ 555 S38VERLER2EBBYRK 2

CZREBHE.P11

MACY1l 30A(1052)
25-JAN-78
APT PARAMETER BLOCK

CLR

CERR

s ot s B ot Pt s Bt s Pt

Pt et

s P

JSR
ERROR

e%:
.

et B Pt
e Bt ot s Bt Pt ot P

PC, TSTATN

;ALLOW CHECKING CERR

PC, SUBCLR
24

n§gsrouuo BEFORE TIMEOUT ~
%%;E?fi?s"m BEFORE TIMEOUT

*TN
MT roum BEFORE TIMEOUT

fim
§§¥$
MOV
kxm%ms:

°CLEM FLAG

<AT M'ISFK%&O@ING),7.R2,7.8B2,0
END

.ENDM

LIMIT

R=CYL#,

B=HERD#

HERDER

R,B
HERD B>,1

NEWTST <<WRITE & RERD HERDERS

MOV

#STRCK, SP

R
P
STK
?SESTORE
? CYL

JSR
ERROR

PC, SUBCLR
24

;CERR AFTER SCLR

INC

BYPFMT

;SET BIT 14 & 1S

MOV

8-66. , RKWC (RS) ;L‘a« COUNT.
sA, TolYL

MOV
MOV

HOTBL
MOV

TAB,RKBA(RS)

TolYL,0,0
A nggc!ns

;

;CYL®

R WORD TABLE

; SECTOR COUNT

MOV
RALLHD

#R, RKDC (RS)

;CYL #

e e B

SECNT

MUB

REPORT ERROR

E“HDH

IN GST ATl

CERR
%TER

CLR

§=Rl(i)§

"MACRO

;NO ATTN AFTER D LIHI}’ DE TE CcT

B, fowr
B o, e
EESOR P;i"»(:”E

;

SEQ 0042

v§

PRGE 42

NNN
DN

A R A AA 4A

JSR

ERROR

DO4

12: 08

IN HERDER

MACY11 30A(1052)

ot e Bt Pt Pt Bt Pt s Bt Bt

EO4

12:08

PAGE 43

SEQ 0043

;ALLOW CORRECT FORMATTING

CLR BYPFMT
.ENDM HERDER

ss K 410 10nLLYEYL-LcLéfix Tsn#q rsnP,o v,o.rho.otc.#c.xkc.Lc

.HQCRO

18:

000

e Bt P Bt Pt B Bt P

NN
N

o
]?Nmfngo—»—o—.—r—r—»—v—o—w
W-OVONON
L
-0
8

@25-JAN-78

APT PARAMETER BLOCK

RN
RN RN RNNN
PN

SURNRYmmmgSBIRARLIRLE3BIRRLERS %fi3

O_UNIBUS_RK& DR_PRT1
P11
25-JAN-78 12:00

2s:

SKoSC

A,B,C,D,E,F,G,H,I,J

MOV
MOV

R,FgSYL ;

LOOP
MOV

;

SETUP FROM CYL
TUP TO CYL

8108, SESCAPE

FRCYL, TEMP3
T YL,TEHPH
'CALDIF'

v
SKROY

TOCYL,RKDC(RS)
E

MOV
MOV

ERROR
toop
LR

MOV

HDCHK3

LOOP
MOV

MOV

SKRDY

4§:

TOCYL

MOV
gfig
MOV

SKATN
328

38:

8l
T

SCAPE
, TEMP1

CYLADD, TOCYL

337

'&"’

FRCYL

SCAPE

,RKDC(RS)

"cCcYL

oxss SESCAPE

SKATN
ggg

§§LRDD.FRCYL

50000, TEMPI

ERROR
5$:

;ERROR PRINTOUT
;GO TO CYL #

;SETUP

TIMEOUT

;CYL ADDR IN RKMR3 NOT=RKDC

10c5”'§x8c<nsx ;CYL #

MOV

; SETUP
:CYL DIFF

;RETURN TO CYL

: CURRENT CYL ron TRUERROR ROUTINE
;SETUP

TIMEOUT

;CYL ADDR IN RKMR3 NOT=RKDC

LOOP
CLR
ngv
CHK3

gs
CYL,
FRCYL,

CMP

TOCYL,H ;ALL CYL DONE?

DC(RS)

;CYL @

CZRGHED UNIBUS RK& DR PRT1

CZREHE.P11

25-JAN-78 12:00

MACY11 30A(1052)

25-JAN-78

APT PRARAMETER BLOCK

ssg;

BEQ

ge37

?"P

12ch

2221

B
108:

gs:s
S5u3
5322.'8

.Enbn sxo?é
.MACRO EOPGM
SCOPE

2242

2250
2251
aggg
2

128:

gggg

5555?

2258

2ess
2260

LENDM

PAGE 44

:BR_IF YES

'ELSE DO ANOTHER

BAM
1, 2%
STSWS
Y

TSTSWY

83,38

CLR
MOV
MOV
INC

SESCAPE
81,STIMES
sStAck, SP
SDEVCT

; INCR COUNT FOR # OF DRIVES THAT ARE CHECKED

JgP

NUDRV

:IF NOT , TEST NEXT DRIVE PRESENT

.NLIST

SE’S

FOu4

12:08

sop: an

2’55;’-;‘;3"5"‘”

EQSEIQL',;EQ”"ES PRESINT TESTED?

SEQ 0044

CZRBHEO UNIBUS RK& DR _PRT1
25-JAN-78 12:00
CZRBHE.P11

MACY1l 30A(10S2)

COMMON TRGS
.SBTTL

eebl

25-JAN-78

GO4

12:08

PAGE 4S5

——

COMMON TRGS

3 3 JIHIEIEE I

0 T

000000 0T

I I

iTHIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS

e
e
e
e

310
gl

1
31
2314
2315
2316

BF 2NSFERE TR EF EF SRR ENE R ENBr s R R 20RE8

rgfr‘gg

SICNT:

: sSTART OF COMMON TAGS

: Efl

ff°°"m{$§

_WORD

g
gfcoum

sz?rzn.; .WORD O
o o .WORD
v O
sem
’%;.

-w%

\léh.—.-g

::comn NS QE:L
rzcvso
e
':i Mpfi*
T ERROR msmucnou

44&m}g % f }82;%

m;% :EYTE g
o

B315p

::wg ggézuwfifisER
::
R STATUS REG.noonssg
’

srn.'is: Za%s g

n&;tofiz: ‘BY

g"'

TMPS:

.WORD

000377

204
ce0s
206

EE
:iRE -nor 10 s: USED

;&égnv:i.
igg ;g

LL:

.ASCI

ggconm ug F LER

< 3606063603

'88TTL

.ASCI

m§

i
]

: L

.gnx

USER

=§k&

<ao7><377><377> 4

scgur: .ascg<12>
SQUES:

rsgrngnzmn

T sr ITERAT on COUNT

}3 -- WORD E

e
o e

s Pt s Pt Pt Pt ot Pt Pt s s Pt Pt Pt Pt Pt

s P Pt (it (s Pt P Pt Pt s ot et s e

schTRg: | 100 :

Bt et Pt et Bt Pt et

888888888888888!
Bt Bt Bt Bt s Bt Bt s Pt Pt Pt Pt s Pt s Pt P et Pt Pt P s et P Pt ot et (ot Pt P P st P s P et Pt ot Bt P P Pt

SESRA RSHECHECRE
R

; ®USED IN THE PROGRAM.

CARIAGE RETURN

REQUIRED

(a'd"fin-fi-vss;

I;SBRTI

36 0606 0606 00 060006 06 06 0000 00000 00 0000 0000 0600 0000 0000000

APT MAILBOX-ETABLE

00 00000 0

3tcliillllllllllllllllllllllllll!l!ll.llllllllllillllliillilll!I»!

001210
001210

000000

snsc!Fv: .WORD

AMSGTY ::nessncs YPE CODE
:APT

CZRGHED UNIBUS RK6 DR PRTI
CZREHE.P11
25-JAN-78 12:00

HO4

12:08

PAGE 46

SEQ 0046

N
R

§§~

MACY11l 30A(10S52)
@25-JAN-78
APT MAILBOX-ETABLE

MSGLG

SRRy
SCPUOP:

§MaMs1: .BYT

ACPUOP

| :CPU TYPE,OP

stts ’s'iifi"ml"f/os-oa 11/20203, 114004, 114505

1 3;HIGH

" s BvIE

= optHIgH BYTE)

..HIG"LEEJflEgg*H'gBYTES, THIS WORD AND LOW OF “TYPE" ABOVE

;83R$$351

UNDER TEST

é?‘l’ém WORD#1
P

£
£
o

N
n
n
£
o

—

e BV

AR
e

£N

[

Www

?QTY§1: BYiE ARl fitfié?vre

;

WORD®2
80

AULT BUSS ADDRESS
;YcournoLLsn INTERRUPT VECTOR

:P-CLOCK STATUS REG

0 UNIBUS RK

SatR SR|

cfns:f”" P11

?m-re 5:00

PKSB:

D01

LKS:

001

D01

|
i

|
|

i§

;

CCYL:
PCYL:

CALDIF: O

AL
EXLABD: 8B

HZ:

60.

COUNT:

TIMUP: 8

i &
SECNT:

gec?bn: 8

001412

gaiis

14
M

2428

:P-CLOCK INTERRUPT VECTOR.

DRVPTR: O

100

CVEC: 104

ngorsr:

it i
T m§
.

CVEC:

177546

FTITLE:

ié

:L-CLOCK STATUS

REG.

INTERRUPT VECTOR

‘% g"§$ TART_AOOR
: goa ME
HECK

:L-CLOCK

.
i1

3330 mr uo DEFAULT *

,
“201

iFLAG

ING our 1ST PROGRAM TITLE

comn

NTER
RIS}T18, S
8

xu N
9?\5:
;2@
s
.caLc c

SEC
m&n TO?oCOUNT
COUNTTOoré1 FRACTIONAL
SECOND

;k m; TE TIME IS UP

%é.%fiu
:
nxcm JUSTIFIED FROM RKMR3

§st
TO 0sfé"m
10
TO SLPADR

T1;

.%x OUT CONSTANTS

T;ST

sg
Efi;

IVE FLAG
R
ev

£oin e
IN istie1ed
FHD
n?fls

LPFLG:

iSET TO

;o nen%n TO SLPERR

A
T
: §3ooi
T50000:

'r'ooéfm

001442

WOCNT:

FMT1:

S0000.

;P-CLOCK SET BUFFER

: P-CLOCK n;ng Ugurrsn

BYPT16:

538;

-Y7

172544

PARAM:

172542

104

12:08 PAGE 47

PKRB:

NEMBAS=- 173100
TRAPPC : 6

B
| g0
!

25-JAN-78

3827 ngu.aox-s RBLE

001

§;g 1332

(10S2)

2373

MACY11

u£$
rnon H.
gan}cm
JUSTIFIED
ORMATTER ROUTINE
iHE

?&mi
O

:SHIFTED FORMAT FOR FORMATTER ROUTINE
:WORD COUNT

CZRGHED UNIBUS RK& DR PRT1

CZRGMHE.P11

25-JAN-78 12:00

MACY11 30A(1052)

25-JAN-78

APT MAILBOX-ETABLE

Sl‘.g 001444

JO4

12:08

PAGE 48

SEQ 0048

DATARO: O

:ALL 0°’S

001452

WORD:

; HEADER/DATA WORD

Sg
Yl
z-wg
:ow

BSERR:

LIMERR: OO
YPCERR:
SYPFHT:

WHEN SET
(LIMI CAN OTofigrmNFO?an
;SET 70 1 T0
S CKCERR IN GSTAT1 ROUTINE
;amsg iomvg%%xm
HERDERS
;um&
; 0 HAS BEEN STORED.
(IF ra,ssx 14,15 = |

s:us

001466

CHKFLG: O

;WORDS TO BE CHECKED

2431
s:gs

001446
00140

DATADL: 5252
DATALl:
1777

% 001

HOWD:

1
1
1
000000

10101 PATT
ALL 1°'S

:HEADER WORD FROM RKDB
;

aw::? 001470
000102
%sn -,-,-

HDTAB:
.BLKW 66.
RHTAB: .g}:xu 66.

g%g 002304 000400
2u
2233 003304 000000

BSE22H: .BLKW 256.

S:"’S

augo

100

0001

augs
003306 000000
2457
S8
23

003310

000000

HEADER WORD
TABL
og
R C

SRTTAB: .BLKW 66.

; 880V mw

UNLD: O
BADHDR: O

ARE k°°8‘°
§§§rrfirr
1@25 TERED
ISET T 6 F FORMATT

HPEND:

246

:ss '1r,
:OVERLA
Essvi To ré&r
£

;gg T
:SET TO

F HALT
IF HALT

; THE

ABOVE

;gv

*STOP’

INE

TING FORM

'?{;8

PENDING
PENDING

ARE USED
TO BRING

:THE CPU TO A VALID HALT.

;iFCAL

003312
003315
003320

7g
;..

001
01
1

002
020
2

oO4
040

ATTN:

.BYTE 1,2,4,10,20,40, 100,200

;ATN 0-7 RESP.

.EVEN

:THE FOLLOWING ARE HOLDING REGISTERS FOR T
I THEY

HCSl:
mHBR:

AFTER RDY IS REC’'D FROM

g
s:g

HCS2:
$

O
g

548
3340
2484 003342

%2&':
uogz
8

;HOLD RKCS!
;ETC.
;HOLB RKC
;HOLD RK

nxsx* REGISTERS

WRDY ROUTINE.

PAGE 49

SEQ 0049

!nmmm- wews zz.x;;:.zxr- ey

; TEMPORARY STORAGE.

BEEREDER 3 S28RoDEE

soEpe

ORERSOLN

THE FOLLOWING ARE HOLDING REGISTERS FOR MSG A (0-3) & MSG B (0-3)
o

0
0
FOLLOWING ARE 'EXPECTED' REGISTER FOR THE ABOVE

;
j

§ THE FOLLOWING ARE IDENTITIES FOR DRIVE MSG WORDS TO BE TESTED
:TEST MSG A2 IF SET
i.gigiro
T.B2=
T

Té
T

gRLL THE FLAGS BELOW ARE CLERRED INITIALLY BY THE CLRFLG ROUTINE.
’

g
Stk
onxvée PREEER R
8
2
£

]
&

KO4

12:08

000000
00000

= NG

R
A

CZREHED UNIBUS RKE DR_PRT1
CZRBHE.P11
25-JAN-78 12:00

MACY11 30R(1052)
25-JAN-78
T MRILBOX-ETABLE

onxvo:

A%- Bo8 imfigi
A
- G
RN I
RS e
:CONTRINS THE NUMBER OF xvss PRESENT
TO
INDICATE
THAT A PARTICULAR DRIVE
B Thshe? MOIenTe
;FLAG SET TO 1 WHEN DRIVE O PRESENT

ES-§RN-7B 15:00

MACY11 32§§lg§fflao§§i¥ggfge

>> DI
0000000

CZREHE.P11

DR_PRT

SEEEebt DSUNMT

5282 003472 000000

LO4

12:08

PAGE SO

Ll
EEEEEES

0_UNIBUS_RKE

;L-CLOCK FLAG PRESENT FLAG
P

; SE

?L?EKEq#aSRPgEgEzTPSEggNT FOR_TIMING TESTS.

;SET IF DEFAULT DO SIZING IN TEST 1

SEQ 00S0

CZMO UNIBUS RK& DR _PRTI1
25-JAN-78 12:00
c ZREHE .P11

MACY11 30A(1052)

25-JAN-78

ERROR POINTER TRBLE
.SBTTL

2553

s22¢

12:08

PAGE 51

SEQ 00S

ERROR POINTER TRBLE

;ruxs TABLE cournxns
THE xnronnarxou FOR EACH ERROR THAT CAN OCCUR.

¢L n#xoflnstrs rnnfi#ég U? "?ssuui
H ITEH“35R752”¥%951S PERTINENT.
ng?
"?#
*i
g
*ug
Sflk
?NENT
A IS (SERRPC)
unorsa
Each ITEM IN THE
CONTARINS 4 Poxnrsns EXPLAINED RS FOLLOWS:
¥

o¥

; s POIN rs T0 THE :nnon MESSAGE

;;POI S T0 THE DATA HERDER

5238} ¥§ ¥8 ¥=E Bs¥a FORMAT

SERRTB:

003474

;ERROR 1

;DR # IN RKCS2 CANNOT BE READ BACK CORRECTLY IN RKMR2

DT1
DF1

;ERROR 2

§n§

;DETECTED MDS

DF1

;ERROR 3

Efl?

;DETECTED UFE

DT1
DF1

RROR 4

Sfli

sDETECTED DRA & NED RESET (WRONG PORT SELECTED?)

DT1

ERROR sDFI
Bfi?

;DDT NOT SET IN MR2

DT1
DF1

ue BE37E)
003552

003562

ERROR

555?
DT1
DF1

066076
066744

it
066744

;DR NOT PRESENT BUT SPECIFIED BY OPERATOR

;ERROR 7

§=i°
T1

OF1

:ABORT TEST, COULD NOT REFERENCE CONTROLLER REGISTER

gy
50
G
g

e
087070

it I8
eL
ii
i1 B
i

§§;1

80370e BEAICA

—

[ Syt

PAGE S2

;DRA & NED BOTH SET

; CONTROLLER NOT RERDY

;AFTER UNLOAD CMD.

et ot P

;NO_RATTN
; AFTER UNLOAD CMD

;WRONG ATTN

;DRDY NOT CLEARED

fad il

;ERROR 1

FIERITIVRIZIV R oOOM-Ko0
—~“~IX
-“IX

; ERROR lg

12:08

Gt Pt Pt Pt Pt Pt Pt Pt Pt ot

8%#9#39%¥9fl¥3@fi§
NN LEWN—-O fi

CZRBEHED UNI BUS_RK& DR_PRT1
CZREHE.P11
25-JAN-78 12:00

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

;DSC NOT SET

;MSG AD_ERROR
; IN UNLD

;MSG BO_ERROR

; IN UNLD

;MSG Al ERROR
; IN UNLD

;MSG Bl ERROR
; IN UNLD

;MSG A2 ERROR

; IN UNLD

SEQ 00se

ORG}
R 0R0} R 0%
S
2
3838328%g§gg§gg
8
SRR

UNIBUS RK&
DR _PRT1
P11
25-JAN-78 12:00

¢ sl BES3%Y
14
061504
71

ERROR 24

3?%
DF1

;RLS DID NOT SET CERR

1ERROR 2823

063767
066076
066744

066076

762

067070

Q03764

060260

DH1
DT1
DF1

;ERROR 27

’

Enau

otig

EM2S

EM26

DHI
Tl

;ERROR

usg;z7
76

066744

;ORIVE TYPE SET IN MR2

;DDT SET IN RKDS

DF1

;DTYE SET IN RKER

EM28

;DTYE NOT SET IN RKER

DT1
DF1
JERROR 34

B
et B

004032

;VOL _VALID NOT SET
;R-TER PACK CMD

DT1
DF1

;ERROR 31

;SACK SET AFTER RLS SENT

- 3gr10

;MSG B2 ERROR
!IN UNLD

;CERR_SET
;AFTER SCLR

003744 0BO1SY

355735
7;2
555745 552944
3746
750

PAGE 53

bHe1
DTJ

DF10
;ERROR 25
.

Bt et

s Bt s Pt B

8 DO NN LEW—-0O

e,
BFa2

067070
s

BOS

12:08

DT14

fi”
“WZSK%‘
7§
76

bF22
ot agnq7

Gl
B
003788 0es3id

B B

MACY1l 30A(1052)
J
ERROR POINTER

OF1

;ERROR 35

;OTYE DID NOT SET CERR

CZRGHED UNIBUS RK6 DR PRT1

ES-JRN-78 12:00

dedg

Pt Pt P Pt
Pt Pt Pt Pt
Pt o Pt Pt
Pt ot Pt et
ot ot s Pt
Ot Gt Pt st

nn
NN

PASRAE

AN SEER AREREPEERRARIS

Bt e

2732

REFE KEFE H58E RERYE RBs: noR? R8

0&376?

2 3393 5593 9558 9993 9593 9998 89

2722

H
5%%%@

CZRSHE P11

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

;ERROR 3

COS

12:08

SEQ 00S4

PAGE SH4

sfl?o

;C~D PARITY ERROR SET IN MR3

EM31

;D-C PARITY

EM32

;FAULT NOT SET IN MR3

DH1
DT1
DF1
;ERROR 37
DH1
DT{

; ERROR HBF

52?3

;ERROR 41

EM34
DH1

SET IN CS1

;C-D PARITY ERROR NOT SET IN MR3

;D-C PARITY

NOT SET IN (CSI1

;ERROR 4

M3S

DH1

;DCPAR DID NOT SET CERR

Tl
F1

;ERROR 43

EM36

Tiu

;ERROR 44

;CYL ADDR_IN B2 NOT = RKDC

{AFTER SEEK WITH BAD TPARITY

Fe2

Efl?z

;CYL DIFF IN A2 NOT=RKDC

T14

;ERROR 4

Ea?&

DF6
;ERROR 46

Eflfg

874

DFe
;ERROR 47

;CYL ADDR IN RKMR3 NOT=RKDC

;CYL DIFF IN RKMR2 NOT=CALDIF

823;
1

CY# EIFF/OFFSET IN RKMR2 NOT CLEARED
C
AFTER RECAL

EMY0

;CYL ADDR IN RKMR3 NOT CLEARED

DT14
DF22
; ERROR SO

UL LR RRRRPEREPRPEER R

CZRG6HED UNIBUS RKE DR PRTI
CZREHE.P11
25-JAN-78 12:00

e
e

PAGE SS

SEQ 00sS

;AFTER RECAL COMD

B
Eh B
458
i

EQPTEER.S&D DATA CMD

004172

067314
"1

7e40

067240

00ugze
00423

061 314
06y476
SO
350

234

057661
064540

085180

804588
O0uEe

;ERROR S

; HERD DECODE

; AFTER RECAL

; ERROR 54

B3 NOT CLERRED

;83 HEAD DECODE INCORRECT

;NO_RTTN
;AFTER RECAL CMD
;ERROR S6

; MSG B3°=SRO REG NOT CLERRED
; IN UNL

; ERROR ng

;ERROR b1

;MSG_AD_ERROR
;AFTER START SPINDLE CMD REC’D BY DRIVE

;MSG BO ERROR

;MSG Al ERROR

;MSG Bl ERROR

004314
004316

;B0 ERROR

; ERROR

i ——————

DOS

12:08

884158 Beeedl

7350

MACY11l 30A(10S2)
25-JAN-78
ERROR POINTER TRBLE

064250

;AT END OF HERD LORDING

[}

—mp [1)]{7V}=m
L—wE= ..——-pl_l-MmT{7][«SSS
i
SIE E ETREntERED
eE-4E--[+ &a-o ms=o63)z R &oe£2.g—l S5LB[W-+m&NZBila2-S¢ “Am5z
a3(P=o&1t] 4-[(-o-&Y)] "=|=7] TQo( [=3vT]4 .
3

MACY1l

RRég POINTER TABLE

R(1052)

; ERROR

25-JAN-78

- &S

; ERROR

("]

12:08

B 2

CZREHED UNIBUS_RK
DR_PRT1
AN-78 12:00
CZRGHE.P11

EOQS
PAGE Sb

SEQ 00Se

;ERROR &

0o—m

[Vownw
[ty a;WMo

m
p= 4

OwwN

o
WWHO

; ERROR

29e

; ERROR

X-=MN4IIOMN
L
Li 1V [T
= b b
nNELM NNELEN

; ERROR

;FROM OUTER LIMIT TO CYL O DURING LOARDING

AR
S99
2 moenPaa 8%

; ERROR

;FWD NOT SET WITHIN 4 SEC IN RTZ PORTION
;OF START SPIN CMD.

—

; ERROR

PR
IEbRO RT3
(U
s s e ;-

; ERROR

—

e 4 44 4 44
7

[V L

; ERROR

79F20

QO9TS259

; ERROR

PAGE S7

—

i 5

; ERROR

FOS

12:08

—

067240

B 5

0Q44s2

MARCY11 30A(10S2)
25-JAN-78
ERROR POINTER TRBLE

CZREHED UNI BUS_RKE DR_PR Tl
25-JAN-78 12:00
CZRBHE.P11

EK WITH BAD PARITY
SERROR
{RFTER
RROR
EK WITH BAD PARITY
R
SE
TE
RP

SEQ 0057

(1052)
B
e-JAN-78
8]
;ERROR 112

;AFTER LOADING HERD REGISTER & SEEK CMD

B e

171
m
r

;AFTER START SPINDLE CMD

;AFTER SEEK WITH BAD PARITY

Pt
e

—

(=]

£n

b
b b

—
e

; ERROR

s Bt

—

; ERROR

nNoo
nM-

N
(=]
N
(=]

;NO DRIVES FOUND

;

; ERROR

;AFTER SUBSYS CLEARR

—

; ERROR

—-n

e 1 L

Pt
et s

—

OOM.- (=]

.g
FR

; ERROR

3999 g399 9908

SRR
Y

; ERROR

;81 ERROR

T o=

; ERROR

SEQ 00ss

Sg?gggguNtIR D%SEINAIZdom om0
3SISERRR

;:ERROR

PAGE S8

;A1
_ERROR
;AFTER READ DATA CMD

M-

;ERR

12:08

EM1S
8??3

MACY11

0_UNIBUS_RKE DR_PRT
GRS
B0 o

GOS

;AFTER RECAL CMD

MACY11l 30A(10S52)

004772

067070

778 884539
65078

DT1

12:08

PAGE 59

SEQ 0059

IR0 SEEK WITH BAD PARITY
;NO DRVS FOUND IN DEVICE MAP

;CYL DIFF/OFFSET IN RKMR2 NOT CLEARED

RFTER SCLR

;CYL ADDR IN RKMR3 NOT CLEARRED

DF10

3019

3018

; ERROR lgsm?
2

§i§1 gifi*; Efié"

EM39
DH21

064647

063640

061111

Sgi%
i10
;ERROR 1
RAEE: @R

3005 80473 Beqase
749 Be3078
004794

@25-JAN-78

ERROR POINTER TRBLE

;g'.i

25-JAN-78 12:00

CZREHED UNIBUS RKE DR PRT1

CZREHE.P11

ERROR 105 ’
gaég

; NO_RDY
;AFTER
SEEK CMD

:NO ATTN

DT1

Emv

;ERROR 1

%
3

30-45:

fiz

fiz1

3052
3083

3823

3056

:ERROR 1

gg
o
f

M18
DH2

ERROR 13520

;MSG AD ERROR
;MSG BO ERROR

;MSG Al ERROR
:MSG Bl ERROR.

:ERROR 1 720
.

EM39
DH2S
3; q

:ERROR 140
.
EMYO0

;CYL DIFF/OFFSET IN A2 NOT CLEARED
;CYL ADDR IN B2 NOT CLEARED

CZREHED UNIBUS RKE DR _PRT1
c ZREHE .P .P11
25-JAN-78 12:00

gsgg
| 4

gé

;

77;

ixg
3
g

DOS 1

DOS11

DOS112

;ERROR 142

ENMS3

SEQ 00e0

;20 SECTOR FORMAT NOT SET IN RKMR2

:SECTOR O NOT FOUND WITHIN SG MS

DTl

DF1

DOS 1

DOS 1
DOS1

%15172

]

;MSG_B3
ERROR
;sscroa
Esc
UNSTABLE

—xg

1517

00S1

{

jue

DOSINY

00 ig

pOS 1

00 {s-c

{

1
1

5146

110

060041

E;;zs

314

H0E ig

1
;

;

179

DT1

M48
Suau
gl

ERROR wsm
Snue

Tgs

lggla
M19
113

Braa

;ERROR 147

;ERROR 1

’

gfla

ix
.
14
311
3112 B%esie 880800

i
-

snsl'.a

PAGE &0

A 12354
DH1

066744

:ERROR 141o
Bl1

I10S

12:08

71 00S114 %og
3o7§ D051 1
76

MACY11 30A(1052)
2S-JAN-78
ERROR POINTER TRBLE

;BETWEEN SECTOR COUNTS
;MSG Al ERROR

:AFTER SEEK WITH BAD PARITY

"f.‘,'

;MSG Bl ERROR

ng;

;MSG Al ERROR

M s

:NO ngv

ei3

N
ERROR 1 110
T1

DIFF SECTOR NOT FOUND WITHIN 3MS

ERROR 12210

M30

ERROR 1 :41

IAFTER

CLERR CMD

;DDT NOT SET IN RKDS

CZREHED UNIBUS RKE DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

MACY11 30A(10S2)
@25-JAN-78
ERROR POINTER TRBLE

JOS

12:08

PAGE 6l

SEG 0061

113

119
118

;ERROR 154
MSS

118
117

H22
DT1
DF1
;ERROR 155

xxg
1
1

ne;

DF10

;ATTN NOT CLEARRED

IDRE_NOT CLEARRED

{AFTER RECAL CMD

§11i

,snnon.xsg
2
Euéx
DT1

CONT NOT
iAFTER
SEEKREADY
TO SELF

11{

;3
. 4 5u§1

; ERROR 120

2“

DT1

NO ATTN

DF10

;ERROR 1

e o 8%(AT
o~

EMNHIZIWMNHI
X

;ERROR 1

o8w SCwd

;ERROR 1

XM~

BUEhELR=ESE
SRR 2L 855 S

i 2 48 48 R

W Oot

)

Q090QOPTTROP

MS9

£7%2

;LIMIT DETECT NOT FOUND

;MSG_AD ERROR
;AFTER LIMIT DETECT

;MSG BO ERROR

;MSG Al ERROR

;MSG Bl ERROR

;NO ATTN

:HERADS HOME NOT FOUND

DOS3E

067070

DOS3SE

DOS36¢

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

; ERROR IBF
Bras
i

12:08

;LOAD HEADS NOT FOUND

;ERROR 170

TR# ERROR

Pt Pt et Pt ot s

s Pt Pt P

s Pt Pt Pt

Fi g

g 18

SEQ 00e2

PAGE &2

MIT

DETECT ERROR ON PREVIOUS TEST

NO_RDY
AFTER READ HEADER CMD

;CY# DIFF/OFFSET NOT CLEARED
;AFTER READ HEADER CMD

;DLT SET

00S3s2
£

s Pt Pt Pt Pt P P Pt Pt Pt Pt Pt Pt P P

DR_PRT1
CZRBEHED UNIBUSRK?
AN-7 8 12:00
CZREHE.P11

;CERR SET

8
83

g8 FRER

Sggfirm: co8s

8¥LED
FF_NOT
£L Rg?m

;CYL ADDR NOT CLERRED.

{COULD
NOT READ B3E. INFO
;&TE WRITE HERDER CMD
3

;CERR SET

25-JAN-78lé'OO

0_UNIBUS_RK&

b
76

MACY11

R(wgoxflgé
;ERROR 202
EMES

12:08

PAGE 63

SEQ 00e3

; READ HEADER ERROR

134

;MSG_AD ERROR

8egn6e
88735
g“%

;MSG BO ERROR

;MSG Al ERROR

;MSG Bl ERROR

ADDR_IN RKMR3 INCORRECT

RF ER SEEK CMD
;CERR SET

(=]

——

3
R

iDURING SEEK CMD

3
2

;READ CYL O HEARDERS ON CYL 1

3 g -“:fil"’

;ERROR 2

cm.ru

;CYL

!Susx

DIFF_IN RKMR2 NOT = CALDIF

sséx CMD

iBERING RECAC CMD
BO ERROR
;MSG

;ERROR 215

52136
7044

060007

Bess

;MSG Bl ERROR

nag

; ERROR 220

EM21

Egi?
;ERROR 221

gfi

;CYL DIFF IN RKMR2 NOT=CALDIF

;CERR SET

nFTER RECAL CMD

M1?7

;MSG RO ERROR

£53

;ERROR 222

sm;

;MSG Al ERROR

;CYL DIFF/OFFSET IN RKMR2 NOT CLERRED

060041

DF6

Y 2%

So'd-

osxouoq

;ERROR 2

PAGE &4

;MSG Al ERROR

%2‘08

12:08

EMIS

s
20
;ERROR 2

065364

;ERROR 2

E?’

;CYL ADDR IN RKMR3 INCORRECT

&%g

H?;

;READING CYL 1 HERDERS ON CYL O

i NPTER READ DATA CMD
;CERR SET

3522

@2S5-JAN-78
ERROR POINTER TARBLE

e
Seestd
oossag g;

%@@@@@3@@2@3%

;

MACY11l 30A(10S2)

&ggz

3
¢

;
i

R
RR R

CZRBEHED UNIBUS RKE DR PRT1
c
P11
25-JAN-78 12:00

MOS

MB7

;CANT READ BSE INFO

SEQ 0064

c
C

0_UNIBUS_RKE DR_PRT1
P11
25-JAN-78 12:00

MACY1l 30A(10S2)
@25-JAN-78
ERROR POINTER TARBLE
HS3
Tl

0
;ERROR 232
EM36
DH25
T

;ERROR 233
MB7
42

oT1
gF17
;ERROR 234

;ERROR 2

PRAGE 65

SEQ 0065

;ON SECT 10,12,14,16,18,20

; ERROR 281

;ERROR 2

NOS

12:08

;CY# ADDR_IN RKMR3 NOT=RKDC

;AFTER SEEK CMD

BSE

; CANNOT READ

iON SECT 0?2,4,5,5

INFO

R N YPRS PORMATB ALL R/W TESTS
;?NEXP MEM PARITY TRAP
;TEST 8, TRAP PC

;DSC SET

iAFTER DRIVE CLEAR CMD
:READ CYL

HERDERS ON CYL O

;nsrea nkan"Eno

;axnas NOT = RKDC
iAFTER SEEK WITH BAD PARITY

;CYL DIFF IN RKMR2 INCORRECT

;CYL ADDR IN RKMR3 INCORRECT

0_UNIBUS

P11

DR_PRT

25-JAN-78 12:00

RROESSOIN R TABLE
Tg

M74

: EEEDE3 NITT REPY KBFE £50Y REDY

-JAN-78

[

FEEEET

;ERROR 245

BO6

12:08

PAGE 66
;AFTER SEEK CMD

sRTZ NOT SET

DURING RECAL CMD

EM13

HiB
DF10

sNO_ATTN

Sl-flg

DT4
DFB

'AFTER SEEK TO INVALID CYL

IDRE NOT SET

;FAULT NOT SET

Suzg

;PIP SET

su&g

;DSC NOT SET

;MSG A0 ERROR

ks ks

411
7070

;MSG BO ERROR

EM20
H4

;MSG Al ERROR

;MSG Bl ERROR

061040

Shons
13331SIBLERZLRE
&

(1052)

Y79y

b b
]
o=
BRSO
DTN £ w0889

MACY11

; ERROR 256
EM38
DH48

;CYL DIFF IN RKMR2 NOT='CYL DIF’

. 0066

CZRGHED UNIBUS RK&E DR PRT1

CZRBHE.P11

25-JAN-78 l2:

MACY11 320(1

)

-JAN-

INTER TRBL

CO6

12:08

PAGE 67

SEQ 0067

DT4
DF6

briis
Y

;CYL ADDR IN RKMR3 NOT=RKDC

DT
DF6

{RPTER DRIVEECEAR cmo
IN RKMR2 NOT=1

IN SEEK TO SELF

SEEK WITH BAD PARITY

;AFTER WRITE HEADER CMD

;AFTER READ HEARDER CMD

|——

Srrsins

;MSG Bl ERROR

c
c

0_UNIBUS RKE DR _PRT1
P11
25-JAN-78 12:00

B
i
B
gerie:
GEAED
g
G372

PAGE 68

; ERROR 2%20
; ERROR 2%M17

GEEe!2

:MSG_AO_ERROR
AFTER DRV CLR CMD

:ERROR 2

;MSG Al ERROR

Enxg
DTl

;MSG_BO_ERROR
;AFTER RECAL CMD

;MSG Bl ERROR

: ERROR

EM1?7
DH39

3E§§g

;MSG_AD ERROR
;AFTER WRITE HERADER CMD

;MSG Al ERROR

;AFTER READ HEADER CMD

et
006S14

EM39

;CYL DIFF/OFFSET NOT CLERRED

gosses

EM41

;CYL ADDR NOT CLEARRED

fiees?

e ot ot Pt Pt
Bt Pt

D06

12:08

DTég

NN
L£ W0

067240

MACY11 30A(1052)
25-JAN-78
ERROR POINTER TRBLE

DH3

;AFTER WRITE HERDER CMD

SEQ 00e8

3616

Boeees
00eeb2

12:08

PAGE 69

SEQ 0069

5
[=]

——

K22

[

Sy
067070

;SPIN NOT SET
;AFTER START SPIN CMD.

;RTZ NOT SET
; DURING RECAL CMD

[= I

..“""ée - é\l

ooome
- 00 Mg
&H 77
76

;READ HERDER ERROR

coomE
M ooome

K32
Sy2R
:-—o—\, o 8 P
e
£ O Of ~O
N
- ——
(=
=] o

; ERROR

m—go Jfl'g

062657

; ERROR

o
N
XN~
b pape ] Pe e
o
-0
O

3614
3615

—

; ERROR

&5 & S5 Si

; ERROR

N
[=]

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

IBUS_RKE DR_PRT
25-JAN-78 12:00

Troe g

SS ?

P11

; FORMAT NOT SET
;AFTER WRITE HERDER CMD

;AFTER READ HEADER CMD

:WCE AT CYL 411,TRK 2,SEC 21
s SPOK_NOT CLEARED
!AFTER UNLD CMD

ATTN

:UNEXP
En??sn
START SPIN CMD

;AFT SPIN CMD &

FWD SET

CZREHED UNIBUS RKE DR_PRTl

CZREHE.P11

25-JAN-78 12:00

MACY11l 30A(10S2)
25-JAN-78
ERROR POINTER TARBLE

FOB

12:08

PAGE 70

SEQ 0070

S
oo o[OT z K2gmitecomiiooo RS
N-B
Swer R
=

; ERROR 320

;AT INNER LIMIT FROM ST SPIN CMD

(=]

——

;FROM OUTER LIM TO CYL O DURING LOARDING

R
Re9d

NYs——
neoo

;MSG B2 ERROR

;ERROR 327

; ERROR 330

; ERROR

;MSG Bl ERROR.

;MSG A2 ERROR

;ERROR 3

;MSG Al ERROR
;AFT LD HEAD REG & SEEK

[
LN

; ERROR

4TR
e e e b AL

P s b bms
owow

s s

; ERROR

;CTO

SET

EHH?LE WAITING FOR OR REC’D CONTR RDY. MSG R3B BRD
;NED SET

;MDS SET

CZRGMED UNIBUS RK6

DR PRT

MACY11 30A(1052)

CEReHE
p ) TBUS B 76 12:00

CLR
CLR

grR
001340

BYT16:

gbn

CLR

BR
1
331338

b7
%

BYT16R:

001342

00711
1

1 881342

33 Qi glene G

3699

;80

007154

004737

052156

CLR

MDTSTA:

7%
7

YPT1

MODTS

PARAM

#1,BYPT16
PRGSRT
MOOTST

81’ BYPT16

nobgr

PRSRT

CLR
LR

RTI
By
JSR

;SET FLAG TO BYPASS TEST 16

81, PARAM

CLR

Hov

;SET FLAG FOR 220 START
:START PROGRAM

PRGSRT

BYPT1b

PRGSRT: © MOV
REser
18:

81 PARAM

CLR

MOV

START:

1 8?29& 001100
ig %xg
*2 7i

MOVMOV

CLR
MDTST:

PAGE 71

PROGRAM SETUP

001336 PARSRT: MOV

688

12:08

ERROR BOINTER- TRBL.
.SBTTL

3689

GO6

25-JAN-78

#1,MODTST

81’ HODTST

smm

;CLEAR FOR 200 START

o7 SP
#STACK,
.

AR ALL
ENABLE & INIT
Egfiw
g!fkcxINTPOINTER
5t é L INT
TS

YPTé?

PC,STKINT

:SETUP KB

VECTOR RDDR,

8 TURN gu KB INTERRUPT

PRIORITY 4

; #u% CPU PRIOR%TY LEVE&NOH AT O *xx

704

; #%% ANY DEVICE

§7§

;

; ##%

WHICH

SETS ITS

R &TERR&PT ENABLE BIT WILL
SERVICED.

##x

111

733
;i?

; CLOCK NTEWTS H*t CHANGE CPU PRIORITY TO &EVE# 6_(IN 'STS’)
TS WILL CHANGE CPU PRIORITY TO LEVEL 5§ IN ’SETINT’)
C T O#E R N
iRKOB
:KEYBOARD IN Snu;rs WILL C
CPU PRIORITY TO LEVEL 4 (SEE ABOVE)

g;ig

;ALL "SYSMAC’ TRAPS WILL CHANGE CPU PRIORITY TO LEVEL 7 (SEE BELOW)

3714

3718

3716

3717

3718

.SBTTL

007160
00716eM

012706
00S026

001100

: SYSMAC 'SETUP’

INITIALIZE THE COMMON TAR&S

:3CLEAR THE COMMON TAGS (SCMTAG) ARER

MOV
CLR

#SCMTAG, R
(RE)+

;;FIRST LOCATION TO BE CLEARED

: iCLEAR MEMORY LOCATION

<©O—-42
@®

668:

67S:

MEMPAR:

38:

Fflll.ll! VECTOR

SWR

"“a&%ss

%
%

~;;SAVE

BERRVEC,-(SP)

Ia;hgznéscéaRER

SWICH REGISTER

T _TRAP OCCURRED
IS NOT = -l

658

SET

865S, (SP)

OR TRAP RETURN

POINT TO SOFTWARE SWR

.3“5&?‘“15&;. sRESTORE ERROR VECTOR

(SP)+, aotanvsc

;

’P“$§xzs SENVM
4

.&3 ERRVEC

.ssr TIMEOUT VECTOR

onsnaas R1

;ADDR OF nsnngsn
:SEE IF CAN
REFERENCE

? ,ERRVEC+2

aézséE 5E§Ton IF NO TIMEOUT
.1 figl)
;
rth% 5 'EEZDEnsnfisv
cfi
RI, oncnans+uo

000004

VECTOR FOR TRAP CALLS

“
QESRESS FOR SCOPE
3@
G 3 0 il ggan IS
BASLPERR

(SP)# (SP)+

000006
000006

VECTOR FOR SCOP
;;10TL7

Egggbvscron FOR ERROR ROUTINE

82,

172140

-.< mesome......‘i;

G
65S:

; sLOOP BACK IF
TUP THE STACK POINTERROUTINE
ISE
E

ot et
et freafrms o o
=t

: WIEEE
o

88888

PERETERRFEY,
o
£
[NTN]
NNN
NNN
FAAL

64S:

SEQ 0072

le]

xuxtxggzsg a '%isgggé
SHIOTVEC
3 s NP N3333523 SRR RaERES

5 §§§

PAGE 72

osun R& ;;DONE?

007}

e R 1?58

e e

3719
0

EEREE P 1 * 2 5aR" 78" 1200

HOG

;ADJ

: TRY n;xr cgn

sss 1F

SERRVEC+2, ERRVEC'

ERRVEC+2

TRIED ALL

:RESTORE TRAP CATCHER

§m-n 13:00

CZREHED UNIBUS_RK
CZRBHE.P11

106

MACY11

JSR

801920

CLR
CLR

0O01ecee

SEQ 0073

oo Tl 7 7
PC,CLRFLG

SOEVCT

;CLEAR DDUMP THRU SIZFLG

SUNIT

:FIND OUT IF XXDP, ACT, APT; CHAIN OR DUMP MODE
3

START1:

000042

737

3116

JSR

CMPB
BNE
e
vp;

000013

HAL

Efl#&%%%fi;i?;?fi;
P
zh

18:

8£8

007704

sre:

;

1ST

BNE
JMP

TYPE

JSR
TYPE
¥sn
YPE
JSR

:BR IF nuro

,TITLE

: MANUAL
XXDP ID
BY PROG
13:Lonbeo
EE
P¥nc
Pncx u/scnatcn 8 DO<CR>

ui,uxa
2
PR
,MSG2
T
T

INC

""A
001336

JMP
JMP

éi:

;SET ACT/APT/PTP DUMP MODE FLAG

e ARR
T

DEFAUL

RATED BY

TED.

oaxvzs T0 BE resrso-

PARAM

STy

PC
M&GY
AC,GBA
MSG
#g GINT
313

x ,2,4¢

xu xnpur
<cn

a
ggoxr

on;vsg

anocuc

T & SIZE THE BUSS

rssreo

i r an
:CONT INT VECTOR
iGET INT VECTOR

;nuTgKnogsL
BY X ORTESTHSNLY
OTHER HOSE
T FLAGS
& NOTHAT
INPUT
;§§Fgflk¥as§§”958nnersng.
DRIVES
ARE DIALOGUE
READY
’

ST3:

3N
LN

[Sreterefeterweree

DONCNLEWNN~-0O

=
e

peztae

®
8

TST

BNE

18:

STH:

CMPB

41.013

JSR
TYPE

PC
T;TLE

?fl%

?fic

MOV

?gx

gcrxx

#177440,8BARSE

oaxgtnxvsc

; 13=LOADED BY XXDP

;SET RKO& CHAIN MODE FLAG

:SET ACT AUTO FLAG.
;DRO NOT TSTD

;DEFAULT VALUE

:DEFAULT VALUE

25-3AR-78

CZREHED UNIBUS_RK
CZRBHE.P11

L2:00

MACY11

JOb

2§-JRN-78 1$
:08
(1052 )
INITIAL 1ZE

STS:

001346

SIZFLG

;D0 "SIZE THE BUSSTM TEST

gNLD

s INITIALIZE sLngs,ST

STHMFY
ooasvg.onvprn

.gkn RKOE IND.
up
:

RPEND
s;scnrs
I

81S, ERRVEC

aLkS

LCL

LCVEC,RO

828, ERRVEC
§

000004

18:

38:

HR VAL
1D PROGRAM HALTS

;

.s E

.PRE
; VE

FLAG

NT onv¥NDE

anon vscroa

Lgc

;SEE IF P-CLOCK THERE

PCLKF

sgvsc.no

i VECTOR

(SP)+, (SP)+

;L-CLOCK NOT THERE, CLEAR STACK

ousssknvsc
Scu(r
PCV%C.RO

DOTIM
SCLOCK, (RO)+

#PR6, (RO)

022626
005037
104401

SEQ 0074

PAGE 74

: PRESENT

T FLAG

P-CLOCK THERE

,§§s£
st?crmc
; VECTOR
DR
,INDICGTE
; SERVICE

TIMING TESTS CAN BE DONE
INE FOR
CLOCKS

TST1

;G0 TO NEXT TEST

5§P)+,(sp)+

;P=CLOCK NOT THERE, CLEAR STACK

(SP)+,(SP)+

DOTIM
,MSG13

:NEITHER CLOCK THERE, CLEAR STACK

i TIMING TESTS CANNO BE DONE.
;ALL TIMING TESTS BYPASSED

ZRGHED UNIBUS RKB DR PRT1

ZRBHE . P11

25-JAN-78 12:00

MACY11 30A(1052)

31 363636 36 36 36 36 36 3 36 3 36 36 36 36 36 36 36 36 36 36 3 36 36 3698 96 36 36 36 36 36 36 36 3 3 36 3 3% 36 36 3 3 3 3 3 36 3 3 3 3 3 3 3 3 3 3 3 % 3% % % %
;iresr 1
REFERENCE ALL CONTROLLER REGISTERS

374g

§ o DUSIRLYERIEIES
[T A T TR MSG,BEGhSTERS
'$m°S rf"‘ u’fnm
ANY

4
‘u
H

10134

181-40

18144
010146

TPsg

TING ALL OTHER

S’

MOV

#5S, - (SP)

;8 MAKE IT LSI COMPATABLE

MOV

818,

15T

nxféams)

72 00000Y

1
101

MOV

RTI

MOV
TST

1 f

15T

#PRO, - (SP)

ERRVEC

R
cSILRS)

RKWC

(RS)

15T

RKDS(RS)

15T
15T
15T

(RS)
RK
(RS)
RKDC(RS)

1
i

15T
15T

RKMR1(RS)
(RS)

18T

1
1

000004
000006

810274

010276

MOV
22"

18:

042722

CMP

ERROR

JMP

RKDB(RS)

nxffp (RS)

id
‘e

3923
3924

‘x
‘¥

%é

——

—

;sRESET

T0 PRIORITY O

;SETUP TIMOUT Rsnaon VECTOR

:SETUP
INDEX
iREFERENCE
ALL

.
THE

; CONTROLLER REGISTERS
:T1

ogr

: INDICATE
iREG 'f’
;r;
SUNTIL

¥n THIS SECTION

THAT THE CONTROLLER
CANNOT
READ.
D NOT PROCEED

THIS IS REMEDIED.

#BADTMO,ERRVEC
gm7,:nhvsc+a

;SETUP TIMEOUT HANDLER

(SP)+,(SP)+

;RESTORE STACK POINTER

sT2

SEOP1

$3 Pyt 2 2121222222232

33180

e —————————

gluouxn%uu

3219

WILL %

00 1 ITERATION
Eh:sroné
Erx TR

5S:

ggxé 010272
39{5

JUMPING

J—
os‘tacx.sp

10210
10214
1

914

N THIS TEST

-~ o
MOV

3913

ESTS

%i 1: ooc1 001174 LALUII

i 146

{

;

S lllll»llIlllllllll»lllllllHllllll!lillllllllllllllllllllllllll!l

: 8181
ofofg

.SBTTL BASIC CONTROLLER TESTS, SIZING & SETUP

g?
;%

2:08 PAGE 75

BRSIC comsgu.sn zgsré. SIZING & SETUP

ugg

888

KOG

-JAN-

THIS TEST

THE BUSS

IS ENTERED

sx*usa Y &mmc N

;360 TO NEXT TEST

:ABORT-COULD NOT REFERENCE CONTROLLER REGISTER

22222232222 2222 TR XSS R )
Y IF *DRIVE

SELECTION’ IS DEFRULTED

AUTO no& o?‘n 200 START IN THE

"'v'e' nu'v'Loa“xcvsnE’rnon 0 THRU 7 IS ADDRESSED.
EONTROLLER ERROR (CERR) IS 2xanm:os§m IF NOT SET, THE

CMO UNIBUSRK?RN-??Té:OO

LO6

MACY11 3?fl(1052)51§2 {M-?G 12:08

390

3335 818383 Sfi)ggg;000001 001174

gg gi831E B€23%BBid
oioaaa

132737

000200

1 010336
g:;g Ei 1’}

104401

055732
003442

333;

81570 O8Taee

@ 818@ %fi; 010452
8{8&3

ggg
g

10400

337
7
3974
g:,

373
3980

01004
1044

158:

——

168:

—

737

0472

895550

000010

003360

104120

Bima
R oo
0502 104401 055732

DTYE, THE DRIVE WILL BE TESTED RS AN RKO7.

figv

:00 1 m:mnon

BYPCERA-

,"5NOT-TECT
CERR IN 'FROY’

9-'5

123

'Eflsé DO NORM SIZING OR VERIFY

#BIT7,SENVM

; SEE ;I-F Ygst APT SELECTED DRIVES

TYPE
gt.g

MSG10
BRIVS

sWILL TEST DRIVES
; 8 OF DRIVES PRESENT

HOv

SOEVMAS'

'APT DEVICE MAP

EEZ

g;m.na

sss ;rDRV IN DEVICE MAP

MOV
TYP

RO, -(SP)

§a
HH

Ls;g

.!,.5“*

ngcv PoimsnTO NEXT FLAG

e qn,
:Efls 6

5 spgedgminsch
o
.rweour
ASCII

::?finésgLEN??NG ZEROS

TST
BEQ
JMP

DRIVS
189
VERIFY

;SEE_IF MORE DRIVES PRESENT
;BR IF _NO
;ELSE EXIT TEST & SETUP FOR RKO7'S

188:

ERROR
HALT
IMP
IMP
MOV

126
s

208:
12§:

ngv

JSR

ERROR
_

ox,{snnzs

178:

0i112e

13 80 ,g
137 0111
1575;

In-

§§L§SY%I"NXT BIT OFF DEVICE MAP

8
003442

SED

BITB

148:

000001

s OT0 NeD & Onn AESET
E ErgPon?:iACC
%AT:GNPhe:

l'llllI'!E'll.lll!!illl!lI'I“Illlllll!l!llllllllllllIlllllllllllll

001231

1] 15 005721

RER

000

=
5

00000000000

3963

0OVDO

000

%2 gafis

270

T smgcnm WILL BYPASS
OB L YENG ThaTDRIVE ONLY TF 7,25 mfia 355

ga‘

SEQ 0076

10520

PAGE 76

B
TYPE

;NO DRIves FOUND IN
;: !r
cn.v 3 PRESS * CONTINUE®
08RY
“?" GO TO NEXT TEST
oscua axcsacns) swsvsfl-:n CLEAR

nfi

,MSG10

FIND RDY

;nov NOT SET BY END OF SCLR

et
iWILL TEST DRIVES

CZREHED UNIBUS RKE DR PRTI

CZREHE.P11

25-JAN-78 12:00

MACY11l 30A(10S2)
12:08
25-JAN-78
Te
SIZE THE BUSS

§§ L7
m
s
e
iggég 1
0
10S14

012701

003444

18:

;RESTORE STK PTR

MOV

SUBSYS CLERR

SE(R?)

rxb
Rgnpx

7
11
ngRR,HCS1
[

4S$:

DRIVS

§¥é&4 (R1)

SCRLF
RO, -(SP)

b
3%:

044236

;FIND RDY

;NO RDY AFTER SELECT DR. CMD

*;SEE IF XXDP CHRIN HODE
; INC DRIVE
C

350 RRIVE pgs§enr FLAG
SAVE RO FOR TYPEOUT

fG0TYPE-20CTAL ASCII
SUFSRéngGERD?NG ZEROS
i TYPE BYPASS DR _#

; SELECTED DR # DOES NOT MATCH RKMR2 DR #
flDVRNgEPTR TO NEXT DR. FLRG

ot Bt Pt ot Pt Pt P

000040

;D0 DELAY TO CATCH MDS

;CLEAR RKO7 FLAG FOR NEXT DRIVE
;MORE LEFT.
;NO_DRIVES FOUND

5t Pt P

032737

82? g?T
IF RKO?

TEMP1
TSK), TEMPi
o U1
;S/B SAME

e
ps e
52
HER
B0 mun
40
1;37 003442
s
4033
e
010760

1ROV 1T S v ENg 0F ScLR

2
:

Pt i

#STACK,
SP

R a%gfii
i"g'

Pt Pt s Pt Pt Pt Pt et P
Pt Pt Pt Pt

FERRRSS
£

SCOP1
MOV

BOV

3
3 iE
%}9 b2 IRy wu

4036

;ORV ADDR
DRV FLAG

T 833

DRIVS
RO
SDRIVO,P1

;8 OF DRIVES PRESENT

CLR
CLR
MoV

ERROR
MOV

& ?_:;ssg
B

PRGE 77

STS

003336

2%:

#DTYE,HER

iSETUP CORRECTLY
;8 PRESS ’'CONT’

SE@ 0077

1
1
1
1
1
1
1
1
1
1
1
1

IO =N

11
11
11

11
g
8

§11062 600720
011064
11072

032737
1676

11100

010046

11102

104403

fiifze M

0111
Ol1le2

0701
CO0137

BEQ
MOV

001170

003324

138:

003324
003334
003324

6S:

o44236

25-JAN-78

S1 ZE THE BUSS

78:

044236

010000

003324

8s:

056153

12:08

138
#CDT,STMPY
3
#MDS, HCS2
b5
SUFE, HCS2

JHP
BIT

an;
BI
BNE
BIT
B
BI
BEQ
BR

78
#DRA, HDS
8%
SNED, HCS2
93
13

JSR

PC,BYP

snnon

JSR

PC,BYP

]

BIT

ogso,HCS2

MOV

RO, -(5P)

Mscis

Tvsgs

:E;T

ERROR
BR

610

;ADD COT
:TRY AGAIN

:TYPE BYP DR #

iMDS DETECTED
;UFE DETECTED

;08Y

§evz

.FOR TYPEOUT

::go

--0CTAL ASCII

gggsnégg énoxucZEROS

5§

o44236

9s:

JSR

PC,BYP

011520

108:

JMP

NUDRV

gnon

PAGE 78

;NO DRA 8 NO NED = OTHER PORT SELECTED

VERIFYz

011126

s ll!lllllllllll!llilllilllll!IlllIIllllIllllll!lllilllllllll!lil

_&Ts

4081
4082
4083
4084
4085
4086
4087

5;21
v

0
000004

T ) {3 ENTE

i%fii. fi

;«
011126

IFY OPERATOR DRIVE SELECTIONS

tx¥

P; ##

4088
4089

4090
4091
4092

§11182
i o
3067 811110 000705
406
11112
004737
48?0 §111£8
Hggfl

4071
90?5
407
4074
4075
4076
4077
4 72
407
4080

MACY11l 30A(10S2)

2c
g

serteRaRanaRRss
s
O

OO0

NOG

CERR ous 0 orvz

x§: si§522§$g§§§
NOT

xs“s INED
ae

kxos
SET OR OFBOTH
‘; % ; A RESULT

xnr

INPUTTED INFO TO

xve WILL BE TESTED RS AN RKO?Z.

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 36 36 36 36 36 36 36 36 36 36 36 36 36 30 96 36 36 36 36 36 36 36 36 36 36 36 36 36 26 2 2 2 X X 2% %

t&T3:

SCOPE

]—e

95N8N13m8@2e8y5ot5NSel4-M%@>.0&BmE-@opMmES&wiWREwi.wOhm@§E&f=geinGwa.

o&fl&mRezMSMTee=TmSeElmneeHe=eSS%WL%&JT?E3bWF-»mWeMsfmEl
fi%?gz %% 001170

bL|onl 348

25-3AN-78 12:00

[Y) &

000040

003336

28:

001000

003324

13%:

000400

003324

000001

003334

B SiBEIY 5 Efusne § Bk

032737

REDERE

0_UNIBUS_RK

.P11

g-g )S &o ge% g

00 0 0 0 0 0 0 0 0 0O

YTYIotToIoIoIoIo]tIoeIloIeoToloeI]lIeo&&IoIetoIoIogIoOIoI]o]roIdoroeo¢gIetIo)Ioy=y—mgdIooyStoIeoyootIoyeoolIo)yo)IoyoIoto)ototyol4o8ooA4o.oete
mTeu-TlswonRnoNno-e0nBvxBVyumNeTsOCS2,D8eT£ofAnCbEgnRaRcaxn)amB-noT bTosSng5NtuBnSeaAOlonT5s]eXcey.BAbbm>- 3@o45£B 5
& 88c oji 0t
c
c

MACYLl 30A(1052)
2S-JAN-78

BIT

BO?7

12:08
PAGE 79

SEQ 0079

. CZREHED UNIBUS RK6& DR PRT1
. CZRBHE. Pll
25-JAN-78 12:00

s
:'u

4157

CcO?7

MACY1l 30A(10S2) 2S5-JAN-78 12:08 PAGE 80
T3
VERIFY OPERATOR DRIVE SELECTIONS

010200 003324 8S:

171
?

044236

g3{ Biided
1
IRiok

3}5

gflgg

004737

044236

6S:

4165

011500

737

044236

78:

qxgg 011510 004737 044236

9s:

:i 3

-4169
3f5

turé

417

11478 633925
ugg
11

011514

011516

104004

000714

e
4175

BR
Egr

%61

SEQ

n?o,HCS2

BEQ
PC,BYP

: TYPE BYPASS DRIVES

J%m

gcm

-'T‘Dvgsoem{zgsgomxvso

JSR

PC,BYP

JSR

PC,BYP

from &
128
E«

sgnoa

ERROR

128

3
128

; UFE DETECTED

;DRA 8 NED RESET - OTHER PORT SELECTED

128

5m}s PART sgf THE PROGRAM WILL BE REPERTED FOR EARCH

:gg

:DRIVE PRESENT

cu;g

: "SUNIT’ g?nmms THE ADDRESS OF THE DRIVE CURRENTLY

;UNDER TE

uxg? 011520 00S037 001462

:'uaq
4188

011524

00S037

NUDRV: CLR

001170

CLR

418S

BYPCERR

STMPY

,ENTER HERE FROM LAST TEST
RKO7
IND IND FL
18 EARTRRTRKDD
FLAG'

3 llllllllll&lllllllllllllll'II'l'llllllllllllll."lllllllllIlllilll

:ig

:'dee

FIND NEXT DRIVE TO BE TESTED

THIS TEST FINDS THE NEXT oaxvzsgsmm5 xr

it
§
e ER Al
ol Rl
T
15
S
i*
MEL
:igg 11
: s:lllllggglllllllll!llllll“lll!l!ll!l!lllilllllflll!llill!ll!ll
uxg 811?32 81”2”%7' 000001 001174
unnss
;
oflérsmnon
41
11540
01
ggv
kssr
STK PTR
41
11844
0127
6
v
m- gm
:}”
4200

11852
011560

420

115

01
00S737

135

0
z

q 8% §fl s fié%fl

ho1102

003442

MOV
1ST

TM-1,
DRIVS

2722

JMP

$E0P1

6271

"Mscio

IVES PRESENT?

RLL “VES TESTED

CZRGME.P11
26-JAN-78 12:00
4205 011576 013701 001346

MACY11 30R(1052)

TM
ys:

:& fixiifi m 001220

=y o e =
Pt Pt Pt Pt P Pt P PP
e

0000000000

o01222

18:

2s:

:225

355;

b?
:%
:a§

..§

L
S
Pt Pt P ot Pt s Pt

0000000

u§§
Y

%2%;

002000

1%7
1

61010046

L
Profe Pt

“

1082

oii

000

: i?

85 JSTERRE AakK

WS
e
:
B3¢ EE 001222
3;§

001170

3s:
6S:

122

guns 1

&vcr'

; ;(gérx

1ST

(R1)

; éfsggx

?fi

MOV

TYPE
éfsfé

012052
%&1 012054

MOV

“
:

Vv
11

55
Qe
wEE
mm
mmm1
Y
1
i
D01
4

Y249
4y2s0

Q12012
0l

Ol
1

000400
001

012070
01

127

40017

012

:es-c oxzosg
B

it
205E
1206
wgg §1 5062

78:

: INCR

ADDR TO NEXT DRIVE

PRESENT?

?flx.o
18

fixn

'Efs! FIND NEXT DRIVE PRESENT

&T
8CDT, (R1)+
8CDT, STMPY

M5G1S
$UNIT,RO
RO, -(5P)

DRIVE

DRIVE BEING CHECKED

NEXT ] DRIVE

ESEm
TEL Fxgo IT DRIVE 0?

;SEE_IF DRIVE UNDER TEST IS RKO?

;BR _IF NO
: %sg RKO? FLAG

!g:! IVETM INTER TO NEXT DR FLAG.
;;Sfl\IIE ng FOR TYPEOUT
”gg
1y T A e
Essfr?saésg CAoTAe zeros

Efizé Fzggw UNDER TEST

RI gkvpm

, SCRLF

#632,LC

#631,LCM1
40 ,

RKO& PARAMETERS

TSTS

: ;GOTO NEXT TEST

814

:LORD RKO? PARAMETERS

My
MOV

M
g
81457’
LCP1

MOV
MOV

#0.00%,E.DDT
#1000,
MC

MOV

TSTS

LCM1:

S: :
REi -

PAGE 81

i
BE

001170

12:08

FIND NEXT DRIVE TO BE TESTED
MOV
DRVPTR,R1
:ADDR OF NEXT DRIVE FLAG

MOV

DO?7

25-JAN-78

23383 543

CZRGHED UNIBUS RKG DR PRT1

#140017, MASK1

: ;GOTO NEXT TEST
:LC-1

i} on
'MAJ CYL + 1 SHIFT
;
IMAJ
CYL

CTED DRIVE TYPE TO E.ARO

1kTEST S

UNLGAD DRIVE TO BE TESTED

THIS TESE b’éfivfigg’%fi;ggs 3N THECORRECT DRIVE.

PROCEEDING TO THE NEXT

17 nfu WAI

;

TEST

OW BEFORE

i§¥gllllgssggllllillilllllllllllllllllllllillllillllIlIllllllllll

000001

12
001100
005237 003304
og%gz o4sHa4

001174

MOV

273;
7

o44012

104012

CMN?7

o4sY24

013737
737
104315

001414

xouogz

048460

tack,
UNLD
PC, SUBCLR

MOV
JSR

SUNLORD, HCS1
PC, DOCMD

JSR

PC, TSTATN

JSR

24’

ERROR

003322

ERROR
ERROR

ERROR

003362

'.'é snnesg

MOV
INC
JSR

MOV
JSR
ERROR

;300 1 ITERATION

;USED TO CHECK VALID HALT
:CERR AFTER SCLR

;D0 UNLORD gw 8 GET CONTR READY

:RDY NOT SET

;NO ATTN AFTER UNLOAD CMD

PC, SUBCLR

;CERR AFTER SCLR

710, TEMP2
315
PC, FSPOK

AFTER UNLOAD CMD.

;SPEED NOT DOWN BY TIMEOUT

8‘%‘&JL:&JL‘CJLCSJLBSJL:&JL‘&JLSSJL‘SJLGJ
W A
~
~N
SERE R SRR
RIERSS
JolJo'i
oo 2W

S—

:Ex§ cYL
F&b,
F
;-llIlllllllll!llllllllltil&lilliillllll!lll!!illlllllllilIllllli
E.DD

PFSRT:

.SBTTL STATIC & CYCLE UP TESTS

rrrrr

MASK
:
msx*

-=0000

HOYLl 30RCI0S2)
BB RENT DRIVE TO BETESTED

LfLLLLL
L

oSN
7e 18:00

EO?

;ENTER HERE FOR POMER FAIL RESTART

;-Il!&lll&llill!l&lllIllll!lllll!llllllllll!llillllllllllllfiillll

;grssr 3
y

REFERENCE 8 CHECK ALL STATUS BYTES IN RKMR2 3 RKMR3

CHECKS

LITY TO REFERE

onxvf &:cfirggg &o THAT ncv"tc:&%h CORRECT STATUS.

:'l!lllllllllllllli!!lllll!llllllllllllllllillllllll!lillllllllll

892997 000001
012706
001100 001174 t51e:
004737
104024

045424

ROT oéfacx.sp
u1.STIMES
MOV
JSR
ERROR

PC, SUBCLR
24

1 ITERATION
5A2‘s’ron£
STK PTR
:CERR AFTER SCLR

003412

18870

127.

o442s2

1231

i 14 i

iIBe

1362
e B

1401

{

001364

Bu4S:

e B

1
12364

000026

000001

1401

b5S:

"WV, HMR2

gg.oan.s.ao

: LORD

#<D.DRA!D.VV> ,E.RO

Eig?ugunzo.anun!bs

s1,E.81
E.R2’

15 CRRT>
5. A1
gg

E &t

BCAS
88, . gy FOHECK
MOB ngggagfigéigéso HERE
19
§E§§
Ennon OR DRIVE UNLORDED
ERROR

iMSG B1 ERROR

82, RKMR1 (RS)

PC 8§rnr

seL

MDD

140

CYLDIF

;SELECT WORD 2

;SEE_IF MSG R2=0

64S

iBR IF

sgs
]

'BR
x} vsgNOT CLEARED FOR DRIVE UNLOARDED
:MSG B2

HERDA. ¥

YES
EEEE ng ggz s§§ga£o FOR DRIVE UNLORDED

ki “flx?'r%? i YES
{HEAD

REG IN

B3 NOT O IN UNLOAD

o o 36363636 36 36 36 3 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 38 36 36 36 38 6 36 36 36 36 36 36 36 36 36 36 36 36 36 36 6 36 36 36 36

ETEST 7

PRINT DRIVE SERIAL NUMBER

1s‘v§n§§ ONLY

RIAL & FROM MSG R,

; WORD 11

!-I!IlllgglIllIlll.llillllllllllll’ilIllilllllllllilililllllllill

oo1216
o4s4aY

001174

045074

MOV
MOV

TST

ERROR

PPE
¥
8he =

80716

égagg o

ON T
IN'BcD 8 15PERFORMED

[S O

(8]
NN
N

<AeL

F3 §§2§§2£§ §§§§§§ 330350

1?3

SEQ 0083

PC,GSTAT

g 3%Erq
=%

000040

003350

cuscx RLL“ggfi?US BYTES IN RKMR2 8 RKMR3

REFERENCE

L Lt

7
e GOy

LLrL L
L
LL

1221

igie

MACY11 30A(10S2)

—-<4MD

DR PRTé

ERerE
P11 CUo2en]AN-78 12:00

FO?

12:08

000026

TYPE

MoV
JSR

Bl
24

'CERR AFTER SCLR

WIBiBRI(RS)

iSBLEETBVIE 3

PC.GSTAT

eis
'GET STATUS

EBREIE”'i""’“seE"Sagf .o
4373
: 749

012434
01

}

Y
H
Y
:

4388

MOV
nox

000003

1
1

i
0l

18:
20

177760

12520

001205

12514

ROL
ROL
MOV
gxg

1 32
1

1021

Y409

o4y

Sgga

;gtn

§L

TYPE

' SCRLF

HARS NOT DONE

NULL TERMINATOR

SET W WITH PACK CMD

‘

BIT

:Stw.m
TST11

..co TO NEXT TEST IF WV SET

MOV
JSR
ERROR

SCOP1

#STACK, SP
PC, SUBCLR
24

;RESTORE STK PTR

;CERR AFTER SCLR

JSR

PC, DO&MD

;00 PACK CMD 8 GET CONTR READY

it
27

BNE

0.i2606

104116

ERROR

4y §15§12
Tob1
ugé 12620 104027

BrE
ERROR

INSER

sl sn
sstac

::i

1261

F ALL

MOV
MOV

2737

““55

000003

.sér’c.g

;

IF VW IS RESET, THE PACK CMD IS USED TO SET IT.

012574

737 043434

22232 2222222222222
232223 2222223333222
232

Y415

q-m; Jgaa

g
x Ixrs

*s¥:alil;gg;glll!lllllll!ll&l!lllll!IIlllllilIll.llllllll!llllill

100 003350

-‘mo 815&&2 612765 001100
mué 1
737 0OMS424
fiiu 31252533 104024

;GET NEXT 4 BITS

Mscn o“gfl *8CHAR BUFF

8l? msa,no

%am?' ———

§§?tm)+

:303

R1
Rl
Rl 17!9

3:9?

géga

hssr 10

3;0% §11% m
1
gi mt:E1 001174

:INITIALIZE BIT POSITIONS

3 s Y

58'(

:GET SERIAL #
gcp Wxagrr .

Rfa
83,

TYPE

uma Rl
&*

BNE

001205

SEQ 0084

MOV IPUOSBLTRTIORIE SERIAD AORGER"

003350
053660

:fi

GO7

003322

MOV

737 000100 003350

#PACK , HCS1

116

VWV, HMR2

i
RATION
!hesroaggrx
PTR

:RDY NOT SET AFTER PACK CMD

;360 TO NEXT TEST IF W NOW SET
#ncx DID NOT SET

, 2222221223222
2222 Y Y R T S
Y
P ST S S P
LY

:325

firzsr 11

RELEARSE DRIVE

:;:g;

4428

;;lllllll.ill!llillIlll!lllllllllli!ll§lll!l!llllliillllllll!i!ll

TESTS THE ABILITY TO RECOGNIZE THE RLS BIT AND NOT RAISE SACK

’

CZRGHED UNIBUS RK®&
DR PRT1
CZRGME.P11
25-JAN-78 12:00

HO7

MACY1l 30A(1052)
25-JAN-78
12:08
T11
RELEASE DRIVE

33 Bi%B38
ooooo: oconize TSN 389"
w:n
012632 BY99%3
012706 001100

HE pim®
WK o
flxg m 000400 003324
::g {s2eq
W40 015686

1044

Y443
Y444

012664
012670

004737
104024

o S EEE CO0

§J ?é: 8§f~§é

4ise

018716

786

737

1040

000400

003324

:0
1 ITERATION
kesroa:
STK PTR

ROV

$STACK, SP

;RESTORE STK PTR

JSR
ERROR

PC, SUBCLR
24

;CERR AFTER SCLR

REMERCOS g S o o s

Esg

TSTI2

e SSUCLR
BUFE . HCS2
R 3
%

OYS42Y4

3332 012704 032737 100000 003322
qugi 015718 98Aq%s

#1,STIMES
sstack, cp

géa

mg 815888 473788 001100

28:

PAGE 85

oP1

BIT
BRRoR
17

SCERR, HCS1

SUFE HCS2

10 USRS CLER G& ET STATLS
sUFE SET AFTER SCLR

;CHECK FOR CONTR ERROR
:RLS SET CERR

gg TO NEXT TESTgrsg
;5ACK SET AFTE

SEQ 008S

DR_PRT
0_UNIBUS_RKE
25-JAN-78 12:00

ERerE .P11
4455

MACY11 39?{1052)

107

12:08
-JAN-78
RELEASE DRIVE

PAGE 86

SEG 0086

czasuso uuxaus RK6 DR PRT1

CZREME . P

25-JAN-78 xz 0o

MACY11 :muosa)
T12

L L]

o
s ¥

;:
0127

1
1

wr%

Yy7,
-o;g
yy7c¢
HH

w?
4y
Y481
Y482

12706 001100
737 045424

1414

0130

THIS TEST g

WRONG CDT

000400

003334

2%:

MOV
SR

S ?RI&
TYPE

RKCS1

NT &

N MSG A AGAINST

000400

003350

18:

000400

003334

B8S:

’
TMPY

5“? ?nfibfi

sStAck, sP
PC, SUBCLR

.DDT, HMR2

BR
17
gr:

ERROR
17

'R‘hon

T,HDS

-kssr
Y

STK PTR
AR

:DDT SET IN RKDS

:DR TYPE NOT SET IN MR2

3
#D.DDT, HMR2
8%
.
ggor,uos

152

BIT

#DTYE, HER

ERROR

;DTYE SET IN RKER

BEQ

12706

001100

MOV

#STACK, SP

;RESTORE STK PTR

737

0OMS424

JSR

PC, SUBCLR

:CERR AFTER SCLR
:SEE IF RKO?7
:BR IF NO

ug 81%& M
HH
1
wg 13064
433
“

i
1

13104

1311

-4589

131

3?8‘5'

131
131

} f

101

000000

ggg

003360

002001

ERROR
1ST
BEQ

001170

000001

000000

9%:

108:

001170

000400 003350

SCOP1

usaxao
013138 & 2 000400 003334 5§ :
4511 013146 001414

24’

TMPY

f LDRV, RKCS1 (RS}

MOV

T10, TEMPI

MOV

#<CDT!SELDRV> ,RKCS1(RS)

JSR

PC,FRDY

en;

118

RROR
ST

axo

TATUS
UBSYS
CLEAR

;DR TYPE SET IN MR2

§1fi 604«15

34533

IN RKDS.

TERATION

'DDT’

ERRORS ARE VERIFIED.

81, STIMES

BEQ
RROR

ERROR

: 93sé 000040 003336 3%:
140

ScoPE

MOV

aanE

1
&mxa
1
1%14‘
8%87

DRIVE TYPE TEST

; STOR

? 000400 003350

001174

t&t12:

001170

1401

000001

1
1

1
}

4483

4ugs

o 363636 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 26 36 36 36 3% 36 36 3 36 36 38 36 36 36 36 36 36 36 3 3 36 3% 3% 3% 3 3 3 3 3 36 3 3 3 3% 3 3 3 3 % 3% % % * % %

-ws?
:

::;E
m,

DRIVE TYPE TEST

;iTEST 12

uEs

y46S

12:08 PAGE 87

R II22222222222323233223232222322333
222222222223 222222222222222222222 3

yug

Y464

JO7

25-JAN-78

“7
MPY

80.DDT, HMR2

gxrm
%oor HDS
BEQ
68 '

;GET STATUS WITH CDT SET

;FIND ROY

:ROY NOT SET BY END OF SEL DRV CMD

IR TS WT W e

SEQ 0087

30A(1052)

CZREHED UNIBUS RK& DR _PRT1
CZREHE.P11
25-JAN-78 12:00

Ti2

SehEEaA,

4S1

3
sz

DRIVE TYPE TEST

ESROR

4213 Bi3ied 8ot
1
1
1

KO7

25-JAN-78__12:08

118:

1 i
1
13164

128:

131

131
1

1
1
1321
1
1
1

RROR
IT

6S:

78:

g
1

SEQ OCes

;ODT SET IN RKDS

OQ‘DDT,WE

PAGE 88

7,HDS

YE,HER

ocrf'm.ucsx
7ST13

;DR TYPE NOT SET IN MR2
T _NOT_SET_IN RKDS

D YE=DDT (NOT) #CDT

;OTYE NOT SET AFT WRITING WRONG CDT
20 TO NEXT rgr

;CERR NOT SET

AFT WRITING WRONG CDT

33 l!illlllllllllllllll!llll&lllllllllllllllillllllllllllllllllll«l

C-D PARITY ERROR DETECTI

rférs
T km-

n: Em s RESET WITH THE CLERR CMD

m:oam T&Dfi‘fl EVEN PARITY SENT BY

u;m

v THE

#ERROR’

CONTROLLER WHICH IS NOW

roa: n: CONTROLLER SHOULD DETECT

: o 3636 36 38 36 3 36 3 36 36 36 36 36 36 3 36 36 36 36 36 36 36 6 36 36 3 36 36 36 36 36 36 3 36 36 36 36 36 36 36 36 3% 36 36 3 3% 36 3 3¢ 3 36 3 36 3 3% 3 3¢ 3 3 ¥ % % %

813258

347
O3Eeh
g

001174

teris: oy
MOV ©
ZRROR
gg

0033s2
003322

2s:

ERROR

BIT

$TI
oéfncx'.g
PC, SUBCLR
24
og.m.mna

#DCPAR, HCS1

'kssv&n‘. TERATION
5
TATUS
Y
i 2RT ERNORAF TER-SUBSYS CLR
;C-D PARITY ERROR SET IN MR3

0 UNIBUS RK& DR
%.m
2s5-3:&4 7815:00
4S50
Y4 2%

81:2;8 001401
132
104036

13274 612762 001100

:ssa

013300
013304

4Sel

013314

004737
104024

MACY11

0M4S424

uégg 013306 012765 000020 000026
045074

913uasa:

LO?

-JAN-7
PARITY
ERAS#OSETE

-’ ooes

BEQ
ERROR

33
36

:DCPAR SET IN CSl

ngv

#STACK, SP

;RESTORE STK PTR

JSR
ERROR

PC, SUBCLR
24

;CERR AFTER SCLR

JSR

PC,GSTAT

iGET STATUS

MOV

#PAT,RKMR1(RS) ;SELECT BYTE O 8 EVEN PARITY

CZRBHEO UNIBUS RK6 DR PRT1
CZREHE.P11
25-JAN-78 12:00
4Se2

4563

013320

013326

032737

001001

000200

MO?7

MACY11 30A(10S2)

12:08__PAGE 90
25-JAN-78
C-D PARITY ERROR DETECTION

003352

BIT

T13

BNE

#D.FLT,HMR3

SEQ 0090

s P
s et s Pt

273t

ot Pt

93;

Ot P

3366

10404

T13

C-D

-JAN-78

NO?7

12:08

SEQ 0091

PRARITY ERROR DETECTION

001000

003352

4S$:

ERROR
ng

37
gg.m,maa

020000

003322

5§:

ggcm,ucsx

;C=D PARITY ERROR NOT SET IN MR3

100000

003322

6$:

s OR

"é

;DCPAR NOT SET AFT WRITING PAT IN MRI

sn'%on
17

ERROR
,firssr 14
‘%
i:
¥

::
3404

737 0OMS424

3410

335

3657

Pt Pt e

000

[=]=)

[lenland

3378 015706
019997 001100
3906

3424

737
104121

#CERR, HCS1

TSTIY

;FAULT NOT SET IN MR3

::G0 TO NEXT TEST

;CERR NOT SET

BY WRITING PAT IN MR

000011

043434

Pt Pt ot Pt

3444
s2

ot Pt s Pt s Pt

337-#

0t Pt Dt Bt Pt Pt Pt Pt Pt ot

3534

3542

'roa?%sa'én“§ uf % 03 THE SEQUENCE.

JSR

ERROR
003322

MOV

2737
7
29

014642
044012

001176

13%:

0101-143

003412

15%:

003420

% 003416

0Ol

THE sn
T m: &mr SEQUENCE, 1E::
cl'isog
v vsnx
~$ }F&'S&nggxr |=o:t.E Engssn SEQUENCING.

001174 FeTia: NVOE eisTI
BAHALK
SR

3502

JSR

PC,GSTAT

MOV
gnsn

8258, SESCAPE
PC‘TQTQT

X
;SPIN NOT SET AFTER START SPIN CMD

EIET
ERROR

ERROR

; TEST FOR ATTN

MOV

sl,E.

MOV

TST

012765 100000 000000

:WORD 0

E nsmn-o.VV!D.DRR> ,E.RD

003470

1S:

o§;s§m,mna
5

gox

737

:
001176

#SRTSPL ,HCS1

; SUBSYS CLEAR a GET STATUS

;CERR AFTER SCLR

;00 START SPINDLE CMD & GET CONTR RDY
:RDY NOT SET AFTER START SPIN CMD

. WORD
ERROR
ERROR
RROR

014666

PC, DOCMD
121

0OM4252

PC, SUBCLR

PABQrbRE TETR PIN

JSR
ERROR

737

11
812737

VERIFY START SPINDLE CMD

: o 3636 36 3 36 3 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 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 3 36 36 36 3 36 36 36 36 3¢ 3 3¢ 3 3% % %

33..53 83%73% 8'1‘3300 003350
33»2 ?gu%s

s Pt

00000000
0000000000

DONCNEWN-O

§E5EEEEEEE
b

MACY11 30A(10S52)

53o 363636 36 36 36 36 36 36 36 3 36 36 36 3 36 36 36 36 3 36 36 36 36 36 36 36 36 36 36 36 36 3 3 36 36 36 3 36 36 36 3 36 36 36 36 3 3¢ 3 36 36 36 36 3 3 3 3% 3 % 3% % % %

0000

ummfi@fib A

Hhhnnhnnhn

£rrr

AN-78 12:00

3364

frrrr
N

S
S S S EEEEEEES
N
PR AR PARN

i oS

1BUS RK? DR PRTé

#<D.CART!D.DOOR!D.HDHM!D.BRHM>
,E.Al

gb'
67
60
bl

JSR

PC, CHKMSG

RROR

BNE
MOV

#30$,

MOV

;LOAD IN EXPECTED VALUES

HECK
2
n§o“9“?8
,
TER START SPIN CMD REC’D BY DRIVE
.
;ngc
nnon
;

:MSG

ggnn

SESCAPE

occ:.hRKCS1(RS)

ERROR

;BRANCH IF P OR L CLOCK PRESENT

1415

003362

MoV

003412
gaés

gsx
MOV

E‘ .0SC!D. SPIN!D.
uo sPox-o cmv-b

003424
003430

MOV

i%
i
}
1
i
1

§1
1

014004
1M010
1
0140
014036

1041

1401

001364

7 1

ow4012

1
1041

003322
Has

0349' 003412
7

183555

000137
01
7
737
012765

%g:xs
20
3424

Eznon

154

82,E.
MOV
#3,E.
JSR
PC, CHKMSG
énuga
bhan.aazo
ERROR
2465
RROR
RROR 66cvknoo
TST
Q
1;5
ERROR 1

JSR

1374
e oidls B 047206
MR74 IR

000026

T ltfl.l‘l’

w.DRA> ,E.AD
s .s;r

%9‘?

:MSG

OR
MSG
E
;58
E%
; CHE
.
s#:ctggso
usns
:
;
;
;: ngc B2 =0
;CYL nor 0 AT END OF HEAD LOAD

338
%v"&?l;fi“&?@& 8R CRDT ROY
:TEST FOR ATT
;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD

'D.SPIN!D. oaov-o
w*Ebm" .RO

;EXPECTED MSG RO

PC, CHKMSG

;CHECK MSGS RO,B0,A1,B1

RROR

sss

iMSG

IMP
MOV
MOV
JSR
MOV

.3, 35

273

T.A2!T.B2!0

;EXPECTED MSG RO
;EXPECTED Al

CYeD’ nsc sx

JSR

ERR
3s:

;

.SPOK!D. cmr.81
;E
oé )
: MSG

014462

‘rsmm

se0 cos

MOV
E&y
MOV

MOV

0OM4252

000001

E bg

12737 000003 333430
737

o
)]

1
1
{
11
11
1
i

MP2

322

TR, BB

0000000

" RO

1
1
1

BENN S e wfim

jggfifigfi##fi-&#fi#iifiégfii
b2
967
7
4674
4675

'j';'fi 33

I
B IR

mmm

CTRE

808

i MSG Sron

.SSP>
,E.Al
¢ eo MSG Bl
CTED MSG B2

CTED

;s EXPECTED Al

MSG B3

:
CIFIED HERE
;MSG A0 tfingi‘;%rfii
%afvg CLEAR CMD )

Bl Enaon

128
CLR, RKCS1(RS)
#60. , SEC
PC, CLKON
;TURN CLK INTR ON FOR 60 SEC MAX
#1)RKMR1 (RS)
:SELECT WORD 1

CZREHED UNIBUS RK6

DR PRT

MACY11 3%(.1052)

25-JAN-78 1

CM Pll

.FWD, HMR2

?nur
.

:&&xg:
5

141

41449

000026

6S:

141

014210

7e0

012737

000001

003416

003420

;TURN CLK INTR ON FOR 5 SEC MAX

:WORD 1

S AR

E PIP!D.SPIN!D.%F&fi) E.RO;EXP"E%TEb
TTN_RFTER 1

IM DETECT

O(DER;Z!D.REV!D.SPG(!D.CMT'D.DOOR!D.BRHM!D.SSP> ,E.Al

gg‘%’ggggg;&wglmn DETECT

8 81 Enon

pe.cso:?g'FN‘bRSD ) 588"0 CLK INTR ON FOR 4 SEC MAX
et

—

MUP

8 92
5

o137
<3=

1
1
1
1

CLKON

%(RS)

HZ
gg
, gfl

°;

L£LLLLLLL

g8 i

R2aes 2
549 R

CS1(RS)

CMD.

:TURN OFF CLOCK INTERRUPT

G owon o

HERROCH §

.sr T SPINDLE

;;cjcmflsc

i
g g
;gg 014532 104187
i B

.xsws&x:g
DELAY UP?
- B
:Fw'
5 ICHT u
T fm
N 60 SEC FROM

TIMUP

3§§
Blilbe
Rrsr
Bais
o
{90 00312 178:
:% §i3i%

w HMR2

001376

e o

SEQ 0093

VERTFY START SPINOLE CHD
PC,GSTAT

31Ei%fi@fifzm"
!

cos8

0O3412

88346

18S:

E&MTorTEE'IEO WITHIN 4 SEC IN RTZ PORTION OF

NTR OFF.
cL
?um
CLKOF
PC,
; TEST FOR ATTN
PC.TSTATN
52%
;UNEXP ATTN RFTER OUTER LIM TO CYL O
3‘80""0.SPIN!D.VV!D.DRA> ,E.RD ;EXPECTED RO
K

:iDEREZ'D.FWD'D.SPOK!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

082 BTTaRT 4B1RBLE"CHD
; CHECK

5:33

ERROR

LrLreg

o B

£ %fiim

PC, CHKMSG

)

s B

[=/=]

s b

aan

0 b

003350

o B

§ RN i W

000000
003350

JMP
CLR
MOV
CLR

r; D’ HE

OUT

LIM TO CYL O DURING LOARD

.ggm
Y,

107e

"TSTATN

’

; TURN SLK INTR ON FOR 1 SEC MAX

:SEE IF DRIVE READY

v9381185To WITHIN1
Pg;s..*m
TLA PSR&
Nss arTH

TTN AFTER START SPIN CMD

;CHECK RKMR 2 8 3 WORDS 0 & 1

ggf?ixcsuns)
E§; IN, HMR2

RKMR ;fl )

gg n& g
AFTER ST. SPIN CMD

PETHTMST

° Is set
Rt 1E8
5854
URN HERE IF su 14 1S SET OR
su a WITH SWR <7:0> APPLY

JSR

PC,SUBCLR

?géoa

38'158''fioHCS1

;D0 UNLOAD CMD 8

éifioa

sNO ATTN AFTER UNLOARD CMD

JSR

ERROR

003362

ll((%)

MUP

e..

R0,B0,A1,B1

ou4s424

E% gi ERROR

imoa

ERROR

o4y012

o4s424

gfim

ERR

éfi

003322

7% B8Lidd

128:

—

oYsu424

148:

047430

afi

ERROR
A

B
s

Pt
Pt

gg
S

0'd'o

001372

ERFBRRR3

LSS

JSR

LLrrrrrrrrrrrrssLL
s

D08

-JAN

1300

(1052)

85%35v

MACY

MOV

ettt

PC, SUBCLR

T10, TEMP2

JSR
ERROR

PC, FSPOK
318

JSR

PC, SUBCLR

;CERR AFTER SCLR

'ROY NOT SET

AFTER

GET CONTR READY

UNLORD CMD.

:CERR AFTER SCLR

:SPEED NOT DOWN BY TIMEOUT

0 _UNIBUS RK&

cm.ru
3%

014616

h 14

3 j
4798

25-JAN-78 12:00

164

177 184594

BUD

303

O14

3 o1wve2

5
g-: :

MACY11

MEE
1368

164260
164234

3?‘1'-4

-JAN-

v:firv START 51%.:’8%

ERROR

;CERR AFTER SCLR

ssgcan:

PERR

658:

JWP

258:

JSR

.SBTTL

SEEK/READ

osu%.asm

LPFLG

, 3SR

HERDER/WRITE

481

THIS

:gw
15
ugx;

33{3
3%0

¥
14712

14714
012737 000001
4 é §w7
2 m
oouotlz 001174
n&
147
359 814753 81n257°3°9 100000 003370

14736
147
14
147494

60% g

737

814750 104024
Y4
33:1
4842

14
14
14
1N

1
1

7
7

1S000

1041

015002

001100
0MS424
100000
ezs

18:

MOVv
CLR
MOV

000001

000026

2SS RS2 RIS SRS S LS

%sécg rgl‘sT
"“’LS
;#
tiok
IF

-gm.

gr R r% %&Esis “'57
&Y,
1
”EF
RKO?7)
WITH EVEN PARITY SET.
1A
GISTERS 3 mbous FOR CHECKING.

ICABLE STATUS

THAT

HEADS

BITS’'8 REGS.

oéfzcx,

EkssronggrxRATIONTR
:CYL # REGISTER

MOV
JSR

#STACK, SP
PC, SUBCLR

;RESTORE STK PTR

MOV
MOV

#CCLR,RKCS1(RS)
suuér RKCS2(RS)

SCOP1

81,371

ggms.rsms

MOV
JSR

SREo&“ HCS1
PC
0

MOV

Pé csm#

ERROR

4843 015010 ooaw:5? 045074

i é#:gIllséggllllllllll'lli“lillllll!l“!llllllllllll!llllll«lllll

ERROR

000000
wo

STATIC CYL DIFF AND CYL ADDR REG TEST; PART 1

fis eT

ta
H

EtRN.
1O RATNCING | VE
TEST

32 P22 22T 2222222222232 32332222
;iresr 15

;&?fim
LOOP g ONDITION
sm?m DRIVE

SET.

; SuW 14"0R 8 uAs SET

:SW 9

FADR

smf*

EOS

:a{é

———

(1052)

104024

4799

DR PRT

JSR

;200 1

;CERR AFTER SCLR
;D0 RECAL CMD & GET CONTR RDY

124

:ROY NOT SET AFTER RECAL CMD

#1,RKMR1 (RS)

:SELECT WORD 1

‘

DID

4899

Ei 4
015274

~
=N

004737

104415

044252

2 §§§§a§
P

2332
-ty

n
-

~
b

puDR

o44012

@§§%§ =

Ll and

et P
e
B
—

Ei% @
i

SRR
san

_12:08

PAGE 9%

8D.RTZ,HMR2
64S
gzjta fia

SEQ 00%

gwguum RECAL CMD

no RTTN #YER RECAL CMD

osc-o SPIN'D.

ngvDRA’ ,E

¢ srox-o cmr-b

;EXPECTED MSG RO

»,E. m

%‘%‘e""‘"fi? - %.?
fi%m&

gggfifl

En‘fl‘l’

H?:ahf
T- RE ;

fi@fi%@www

ERROR

'1’24

gex

2‘5&0.SPIN!D.DRDY!D. VV! om> E.RD

{Fon
51‘rsmm
ags

128
BBIVESHESATR B ERK ERTTTM
:TEST FOR ARTT

;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD

003412

%ggés

éihss:?(lb.CART! %9:? g?ED 'E'églal

803430

eSS

JSR

PC, CHKMSG

Efig ézsan.aa!o
ERROR
SCOP1

; EXPECTED Al

MCKFSGSNNRIBI

ERR0R

1041

25-JAN-78_

STATIC CYL DI}F AND CYL ADDR REG TEST; PART 1

9%R
£ L
2
£

001364

1‘3 81 257

4898

0g3412

883450

BF£59% ¥NBezs B

oiaisnistaliat

ot alamiad et ad

bI
b b e B e LWnwWN
t-u-o-o-o—:i bbb
ob e o B b B e oB

%L1

TiS

BYS:

§h~

4895

MACY11 30A(1052)

883426

Lol
ed oot

L
R S A

23N

5:00

FO8

374

266

;EXPECTED MSG RO

;EXPECTED Al

inSe 1B £oR

BXCECTER et B3

;

¥2£%5}5‘:) 'CELESR cMD

jCHECK MSGS RO,B0,A1,81
1

MSG

iMSG Al ERROR

iMSG Bl Bl EERROR

015276 012706 001100
1
ousY2Y

3915(1082) er?xccYLox#i
AND ch noon REG TEST; PART |

813%

4910

93]
4¥314

gggg

15310
8314
|
L
O
|
1
01

BYPCERR
8PAT, RKMR1(RS)
RKDC(RS)
1

MOV

o
Rov

eb
o e bos b

;CERR AFTER SCLR

;0
_NOT rfir CERR IN GSTAT1
;EVEN PARITY
;CYL
;D0 %EK CMD & GET CONTR RDY
"‘2
Y rnon ssz WITH BAD PARITY
:TEST FOR ATT
iNO ATTN rnon SEEK & BAD PARITY

mg.ggove
,E.

VW!D.DRA> ,E.AD

;EXPECTED RO

8< .s#oxzo.cmho.ooon.o.meo.ssm,:.m
.

ROL
ROL
MOV

.
.
.R2,E.B2

JSR
LWORD
RROR

T.
110

;ADD MSG ID

CHECK
!;: MSG
' 5.23

;:gg
:
1
iMSG Bl

11
1
14

A
s°8¢séx?iso
HERE
AFTER SEEK WITH BAD PARITY

ERROR
ERROR

,CYLADD

e
b b

{q
5553

TSTATN

8< gssf"-g
8<D.FLTID.PAR)

RROR
RROR
RROR

001362

bebebe

000

P bbb
b b

0000000

— 0097

;RESTORE STK PTR

BIS

1
000000

INC
MOV
MOV
W
JSR
ERROR
SR
RROR
MOV

MOV

18414

000

#STACK, SP
PC, SUBCLR

gmon

s o

MOV
SR

MACY11

001462

003370

es:

CMP

3s:

OR
CLR

012062
137

014736

ROL

c
Ys:

23 503

Y
v

DR PRT
25-JAN-78
12:00

P11

0 UNIBUS

é?:&i%éi%iifiéifiégfiié?‘Jh‘gl: L£LLL L

GOB

;CYL ADDR IN B2 NOT=RKDC

,CYLDIF

YPCERR

2§m=s

R ,MC1
r%ns
1

:CYL DIFF IN R2 NOT=RKDC
.m.#ou CHECKING FOR ANY CERR IN GSTATI

,guggmxgn.v &uctg'“

H
o"fi mflons
5E.co ?o r:"? TST

3 lll!lllllililIllllllllllllIl!lllllll.llllllilillllIlillllllllll

STATIC CYL DIFF & CYL RDDR REG TEST-PART 2

TEST

KS T

ITY OFT

fi i vsss 3‘? nu. c
Z!g xmc?.S
Smmen RS THE naovs TEST.
Psnroanso IN THE

T THE CYL

CZRGHED UNIBUS RK& DR PRTI

CZRBME .P11
n

MACY11 30RA(1052)

25-JAN-78 12:00

T16

4
4

§x
§E§98'7' 000001 001174
15534 012706 001100

15540

M
w

{ ue
|

Y
Y

l
1

33;5

{

1561

MOV
MOV

81, STIMES
sstack, sP

1ST

BYPT16

vgs
JMP

TE
YPE

138 9
lgc

BYPASSING TEST 16

0S5646

158:

?R
YPE

lgg

:,:

168:

r@m

;FROM CYL

;RESTORE STK PTR
;CERR AFTER SCLR

CLR
CLR

fis'fl

)

138:

001354
D01356

SEQ 0098

;
ITERATION
hesron: STK PTR

001170
056600

cch

;SEE_IF RKO?
:10-12 MIN TEST
;2-4 MIN TEST

cuns:m cYL

MO
JSR
ERROR

SCOP1

#STACK, SP
PC, SUBCLR
24

MOV

8CCLR, RKCS1(RS)

sgg

i&fo ?&h’a’

MOV

E?E

Eé.mrua*msn

ERROR

“; Z,HMR2

; SELECT WORD 1

fi:&t‘r‘;fia

;RTZ

e«goosc-o.SPIN!D %&%w"gcom>,E.AR0

s e

003350

1414 003362 6MS:
003412

w»og

m 000026

—0
£

o
PR

%E ég?«

BENNS fouce
giéu- RACSS

-0

——

2009

Bt et et Gt et

s s Pt Pt

4
33

]

‘3’%

s s

P Pt et P

ot Pt s P

s
q 7 QiEiY4 Bl
5 ; foleR
onaq:ln BOGO0

833428

0058 gazue

o4M42s2

Ry STLRER
N
ooct'o“' .
AL CMD
T TR RDY
éigon 754
588YR§81’ SET a!rfs RgggL c:8
ERROR
O

81&58 612?6? 001100
1
737
045429
4%é 81&%
M

MOV

3,e7%1

JSR

rha-raa-raa

R
+

;¥D
2

S
8?5;22

PAGE 98

STATIC CYL DIFF & CYL ADDR REG TEST-PART 2

*sgrllllllg;gllll!l!lll!lllllllllllllll!llllllllllllllllll!lll!0!

001340

12:08

;

737

HOS8

25-JAN-78

SET

ING RECAL CMD

:NO ATTN AFTER RECAL CMD

#<D.SPOK!D.CART!D

HKMSG

NOT

E ; “; rséou?m

#g' ( 'xgfipo

;EXPECTED MSG RO

E. m

o 18Esa"fifisxss &

CDECK HSGS R0, B0 Rl Bl

IED
HERE

;EXPECTED Al

mmm

ClWDe
MOV

3333 § 333 3 5%
% §§§§§
go-o

:
e

Pt P

mmmm:-

016!

Ha
H1eg
i
1

of
s
011
sos;

O
Ly
)

s e
o b

nEF £

s e
o o bt e

oo oo oo

737

S067

ERROR

s s B

Pt P Pt ot ot Pt Pt Bt et

000000000

ot Pt Pt P

ot Pt s

0000000
000000

Bt Bt et ot Pt Bt

33333833

161

_25-JAN-78 12
16(1052) STATIC
CvL DIF CYLPRGE
ADDR99REG TEST-PART 2

o Pt P

000000

Bt Pt

e B

NN LW

St Pt P

The

8121& M
4

MACY11

016272

7
104122

004737

gégfifio

R,RKC

T,
Slfl RKC

1 ERROR

“;ESSME

) ;ORIVES

110 DY Be SERDRIVE CLERR CO

&sTSTRTN

TEST FOR ATT

154

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

uo-o SPIN'D.DRDY!D. VV!

.SPOK!D. cmr-b

.B1

%‘fB

om»

. RO

@ 3‘?& STERS8 B2
Bl

SCOP1

#STACK, SP

;RESTORE STK PTR

0454

ggon

a4’

PC, SUBCLR

;CERR AFTER SCLR

MOV

mr axmu

BiE 4 E
83% T
D01

.‘n7 003328
UL

044012

2s:

R
m283

SuB
apk
NE

MOV

Hov

)

N PARITY

{BeR eBCry aoom
CSCYL 1’2YLRSS
k
ot
5 Em

;BR IF TEMPY IS POS

rzmcm.oxr

51
?gn
8‘Soe“m?
ERROR
JSR

;EXPECTED Al

égs"’figw ;EE?Wthhep 1m0

MOV

;EXPECTED MSG RO

' .g?o 552181

001100

SEQ 0099

5 E?u .

an‘
‘07
T - RE ;

DR_PRT
25-JAN-78
lé:00

.P11

—4Cy

0_UNIBUS_RKE

;

108

PC TSTATN

:D0 SEEK CMD & GET CONTR RDY

:NO RDY AFTER SEEK WITH BAD PARITY
:TEST FOR ATTN

CZREHED UNIBUS RKE DR _PRTI
CZREHE.P11
25-JAN-78 12:00
1

MACY11 30A(10S2)
Ti6

{1 Lk

25-JAN-78

PAGE 100

STATIC CYL DIFF & CYL ADDR REG TEST-PART 2

ERROR
MOV
MOV
JSR

eg
#CCLR, RKCS1(RS)
TOCYL | RKDC (RS)
YL
PC

,uo mm ggn SEEK & BAD PARITY
;CL
i
ron
AFT CCLR

Q
ERROR

:T’gen.cvmoo

Essz va#o CYL ECHOED OK

;MR3 NOT=RKDC

JSR
CMP
BEQ

PC
YLD
anE?S.cnoxr
43

DIFF CORRECT
SEEISY%YL

;CYL DIFF IN RKMR2 INCORRECT

MOV
MOV

#CCLR, RKCS1 (RS)
T nxcgamS)

;ORIVES

Ssm

%%%%wxmw

JO8

12:08

ERROR

4s:

ii
1

11
B

1641

16M1

1641

i
7

.
e

et Bt

s Bt

3WO NN
L W

s e e Bt

B Bt s e s e e e ()

B
B

e b

e B
e B

nn
w

#D
S
;51

J
5
SR
Ea

oYy012

678:

oYY

o454

ovsue

;

Ss:

1
1
1
1
1

16320

16566
18258

MOV
JSR

#STACK,
SP
PC, SUBCLR

;RESTORE STK PTR

MOV
MOV
MOV

)
8PAT, RKMR
oé Rg) P EYTRETORN CYL ADOR
FRCYL,
FRCYL

MoV
3R
Ssa

6% :

eP
75,0000
TSTATN

55%

;CERR AFTER SCLR

;BR IF TEMPY IS POS

'%%E"ng?nsgfi ST 8RO PARITY
FROM
NO_ATTN

SEEK & BAD PARITY

nog

me acs% '('sns)

Q
ERROR

X
241

;MR3 NOT=RKDC

TOCYL,FRCYL
108

;DO NORMAL TEST IF NO

g
g‘m
001350

R
T 35. EMPY
m:i§ TEMPY, CALDIF
MOV
ERROR

1
16554
16
16564

TEST FOR ATT

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

ERROR

1
1
1
1
1
1
1
1

C, TSTATN

67¢

;D0 DRIVE CLEAR CMD l GET CONTR RDY

Ng RDY AFTI R DRIVE LEAR CMD

1S¥

RROR

SCOP1

6127& 001100

{eds8 fQuadg
1

D199 003322
000010

CMP
BNE

e RBAYL
Fnévt..cvmoo

aé&on
RKDCQFT CCLR
iSEE IF Tuan CYL ECHOED OK
; SEE IF TO=FROM

SEQ 0100

801382

801528

=34

001362

108:

603322

FF/WF

DID NOT REMAIN
=

;CYL DIFF IN RKMR2 INCORRECT

;DRIVE®S

DO DRIVE CLEAR CMD & GET CONTR RDY
RDY nn;nDRIVE CLEAR CMD
TEST FOR ATT

,RTTN NOT CLEARED AFTER DRIVE CLEARR CMD

TOCYL

;:mo ALL CYLS

sscvt..t.cm

012056

i N TH S EST

154

68S:

FRC;L LCP1
TR$1§'

012056

FRCYL, TOCYL
18

0013s2

12%:

%x"?“?
sES%o
KHRYS = OR > TOCYL

,ELSE REPEART

o 3630300030 0600 0000 06 000600 0000 00 0000 00 0000 00 0000 00 00 00000 000 00 0030 000 3036 00 0 300

-e

:ires
T 17

;CYL DIFF IN RKMR2 INCORRECT

DIFF OK
REE ISYEYL

#C TSTATN

O44012

5
55

;CYL DIFF S/B O ON CYL O

3
;?asr&m

AR, HCS1

NN
—

;SEE IF=0

;;Lfi??sl,

000001

L2 2

—
[

ggvc“?m"
;«a

fe=y

—

fi 03 Juon

TOCYL

SEQ 0101

—

801382

Lol ad

SRtk b 13353240
£

—

o !;gsg
oo

KO8

25-JAN-78 12:08 PRGE 101
STATIC CYL OIFF & CYL ADDR REG TEST-PART 2
TST

001352

Pt Pt

30“(1052

000000

s Pt P

0000000

Pt P
e Bt Pt Pt Pt Pt

000000000

0 Pt P

e B0 Ps e s ot e o

MACY11

000D
s e Bt e

2R S DB U R EOR- BB S
BB

000000
Bt s fmt B e ot

LR 85D S

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

2§
FSASEZBYERPEREBBYRRY

s B P Pt Pt Pt Bt P P Pt o et
s s P Bt s P Pt (ot (Bt Pt ot . o

TN
WA NNV

IBUS_RKE DR_PRT1
25-JAN-78 12:00

HERAD REGISTER TEST

30 00 00

R BRI IO
S UEE0E: Balef v

TH ST&Tc&&

3 IS CHECK

ALONG WITH
K m‘éfis&
xn' 'E s%THAT
%g";
T,THIS MEANS
CHANGING HEAD ADDRESSES

%‘”Ei**
70855

D TO

SEEK

CMDS

P11

25-JAN-78 12:00

T17

0 UNIBUS RK®6 DR PRT1

MACY11l 30A(10S2)

gi% 00S000

104415

017012

004737

Sig 017006 012706 001100
1

017016

104024

12:

SR 11221222222222223:3223121233:3233221231222222222222222222222222222223

ElEl
1
gz
1
o
1
000001 001174 iy MOV
i
016776 012706 001100
MOV
i

LO8

nsg REGISTER ?;E? PAGE 102
-JAN-78

04S424

CLR

#1,STIMES
sstack, sp
RO

;300 1 ITERATION
:RESTORE STK PTR
;HEAD #

MOV

#STACK, SP

;RESTORE STK PTR

;CERR AFTER SCLR

SCOP1

JSR

PC, SUBCLR

MOV

000026

MOV

8CCLR, RKCS1
%
T nxcgam ()RS)
0 RECAL
CMDa?rgs
& GET RE(Q.RL
CONTRcRDY
TSQ- el
;RSY
NST SET

ERROR

{

1
i01

557371

i1
117102

017106

}
1

1040SS

gi;u

i; 171 i
1

1714

1
55

;

1
3;“
1414 003362 64S:
73; %oo-w

17
iu Ei;

aé

044N

7174

; i

gggo

]
17216

DO3430

MOV

000026

:NO ATTN AFTER RECAL CMD

v‘z: .gve .DRA> ,E.AD

;EXPECTED MSG RO

JSR

PC,

Rngs
WD2

ng;
{

001364

SET
ING RECAL CMD
T
iou?u“
ar*n

#<D.SPOK!D.CART!D.
j
»,E.Al
gx
.81
‘2§: fetigl
; ' fiEo’nsc
Bl

. 'namgg

;

NOT

gggv

MOV HR

658
01276

:RTZ
:;?%

#¢D.DSC!D.SPIN!D.

gon

4
?1'0
TEMP2
PC,PR‘TI

cnovm

;SELECT WORD 1

'GSTAT

003412

g6235 b
HED MR BB
017240 004737 043434
17216

!
MOV
JSR

ERROR

#1,RKMRL (RS)

5§

DO3Y2Y

§n

ERROR

00
3353

7
171

J;L

MOV
o
éagon

T
OR

0 B
JSR
MOV

E.B

ihee 1B FoR é ETED Mag B3
:

CTED

CHK
; CHECK
MSGS
'r.ASeT'.'ggn.aa
¥
.
1
;
;

47,50, ¢<AFTER RE

og.

M*(RS)

PC.GSTA

%‘

:
;

;EXPECTED Al

MSG B2

A
g:gbsétpieo
ER RECAL HERE
CMD

SELECT n; MESSAGE

;
¥
:REPORT
:

5 mgg

c
THE

uL ?
ERROR

ELES
e
PC, DOCHD
;00 DRIVE CLEAR CMD & GET CONTR RDY
8CCLR, RKCS1(RS)

S-

CZREHED UNIBUS RKE DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

;

25-JAN-

MACY11 30A(10S2)
T17
HEAD REGISTER

ow4012
668:

003416
003420

égirsmm
1§u

MOV

LdlNae

000001

"32
Bl mon

55"5

g;non,u

:FOR HERD 0, B3=1

003322

003412

b:gglfl

D0 58

§§§

003424
003430

AFTER onxvs cuzan CMD

;RECAL DID NOT RESET HEAD REG IN B3.

:RESTORE STK PTR

ERROR

;CERR AFTER SCLR

MOV

ng.nxomns)

sHERD #

PC, SUBCLR

MOV

HCS1

o SROCORg
:

ARSI PP
8

GET

CONTR RDY

éfifi

rsmm

23.‘;’

uo DSC!D.SPIN'D’ DRDY!D. VW!D.DRA> .E.AD

EXPECTED Al

; nsmgges'gbsctg

¥STACK, SP

JSR

LI g

000
ooooooogggoogoooooo (= l==] 00
[
g S
S
NN
o
2
o
s (o B

SR
R
283

; CHECK

t.Agn. '0
73
55

ERROR
38:

;EXPECTED MSG AD

Emes

.SR
ERR
o

ERR
37,

ugbsrox'o cmr-bHggo;
wrg
Bo%":xgt'gigo
Eb nsc m

MOV

RDY AFTER DRIVE CLEAR CMD

TEST FOR ATTN
;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

D.SPIN!D.DROY}

W Wi

803450

SEQ 0103

B:sgm
ERROR

3‘65
gox

0o34i2

MO8

1;:8? PAGE 103

52;;3

ATTN AFTER SEEK TO SELF

,gflFORREERS
3

8 B Bl

;EXPECTED AQ

e
g;BIT9!3>,E.83LORsEXgECTED B3 FOR HERD O & MSG ID
6$

.SEE IF HERD O

o uuxaus RKE

DR_PRT1

AN-78 12:00

1
1
i

MACY11 30R(1052)

000001
002003

003430

004003

003430

CMP
BNE
SSV

ng.ox
: SEE }r HEAD 1
7
‘BR } NO
3;3:71093».:.33 ;B3 FOR HERD 1

gg:

MOV

#<BIT11!3>,E.B3 ;B3 FOR HERD 2

JSR

PC, CHKMSG

1i
000026

JSR

NN LW

678:

RROR
ST

1
1

81725
17

2255ERR0neaRRRE

W
n

—

017630

817535

17640

023737

175§g
17652

003360

001432

1401

0014

0001

9s:

017656

17656

;SEE_IF MSG A2=0
iBR IF _YES

CLR
MOVE

TEMP1
ATTN(RO),TEMP1

TEMP1, HEADA

.8
& SPECIFIED HERE
Ennon AFTER LOAD HEAD REG & SEEK CMD

s B0
;fl?c
Bl EEoRon
;nsc
: SEE

uor CLEARED AFTER LOAD HEAD REG & SEEK CMD
G B2=0

iBR xr ES

:MSG B2 NOT CLEARED AFTER LOAD HEAD REG 3 SEEK CMD
;BR IF HERD 3

;FOR RKDA=HEAD 0, HEAD=1 IN B3
:FOR RKDA=HEAD 1, HEAD=2 IN B3
:FOR RKDA=HEAD 2, HEAD=4 IN 83

ERROR

;HERD DECODE IN B3 INCORRECT

énp

ng #4

:0 THRU 3 DONE?

JMP

:ELSE REPEAT

BEQ

017004

cY(D
g;s

RO,
3

BEQ

000004

;SELECT WORD 2

CMP

104054

#2,RKMR1 (RS)

4
CYLADD
8s
5

BEQ

17642

1;244

; MSG

15T
BEQ

CHECK MSGS R0,B0,A1,Bl

T.A2'T.B2!T7.83
1i4

4l
geg

MOV

1
1

2322

RROR

ot
Ennon

SEQ 0104

6S:

PAGE 104

HEAD REGISTER TEST

1
1
1

NOS8

12:08

T17

i
W
£
No

25-JAN-78

108

iBR_IF YES

108:

012765

17664
1
81
1

0137
127
083
1041

‘017706

012765

177
177
0177
817733
1774

27
737
104151
004787
o401

17714 01376

100000

336523
1
043434

010
3322
000000

uuggg 000010

003322

044012

MOV

8CCLR,RKCS1 (RS)

MOV
MOV
JSR
ERROR

SUNIT, Rxcga(nsa
SRECAL , HCS1
Pg DOCHD
;D0 RECAL CMD 3
GET CONTR RDY
124
iRDY NOT FOUND AFTER RECAL CMD

MOV

SUNIT.RKCS2(RS) ;DRIVES

MOV

MOV
JSR
ERROR
JSR
BR

#CCLR, RKCS1(RS)

IEL AR, HCS1
PC,
DOCHD
151

PC, TSTATN
708

,oo DRIVE CLEAR CMD & GET CONTR RDY
NO RDY AFTER DRIVE CLEAR CMD

:TEST FOR ATTN

0 UNIBUS RK
Té
P11
26- m—n
:00
gxmq 104154

MACY11 3?“(1052)
~-JAN15:
17
MEAD
REGISTER TES
ERROR
154

800040 003352

wlu

gxg;g; 60 000000 69S:
1

001412 003362

Touasg
oMo
1

g&z
317
ERROR

MOV
MOV

ZRROR

B09

PRGE 105

go. I0AE.. HMR3
a5’
13’

.ccgfa
RKCS1(RS)

LFATTE

5’

sATTN NOT CLEARED AFTER DRIVE CLEAR CMD

DAE 1S CLERRED
ARE
NO cLsmzo AFTER RECAL CMD

ses ;r

;LOOK FOR ATTN FROM RECAL
;NO ATTN AFTER RECAL CMD

H !llllllllli!llllllllllllfll!l!lll!lillll!!lll!llll!l!llllilll&l

;fiTE
S

SEEK TO CYL O

*n:

ITY TO

vg*
u§ TE& umf' NEnogg symtf‘r:cgm ALL APPROPRIATE

iy
%

xrs vs Fl
a’_
C

10-1SUSEC.
oL$
HTE PACK TWEEN
MAY NOT
a: FORMATTED.

is#lllll;gg;glll&ll!!lliil"lllllll“lfllllllnl!iii!llllllllllllll

000001 001174
001100

MOV

o4SH24
%sow
1364

001100
m o4sH2Y
1

27
89::7

6 ;
12

737

104132
37
1401

17
3434

003322

012737

001720

;CYL ADDR NOT CLERRED AFTER SCLR

MOV
JSR

#STACK, SP
PC, SUBCLR

;RESTORE STK PTR

MOV

#SEEK, HCS1
PC,
DO&MD

003322

003412

003416

:CERR AFTER SCLR

;00 SEEK CMD

& GET CONTR RDY

MOV

131

85, TEMP1

;RDY NOT SE msn ses CMD

JSR

PC,FATT2

;FIND ATT

210

;CERR AFTER SEEK CMD

ERROR

0S0340
003414

ng
ERROR
SCOP1

JSR

OM4140

104210

2737
037

Pc SUBCLR
ggvua

!Asogrénpg
5”55 ars‘fgAR a GET STATUS
nsao CYL
xn RKMR3

ERROR

000005 003360
100000

#1,STIME
sStack
s?

MOV
JSR
ERROR
{sa

ERROR
BIT
BEQ

132
oc;m.ucsx
64

MOV
CLR

E.BO

ERROR

MOV

:SETUP 100US TIMEOU

iNO ATTN RFTER SEEK CMD

#<D.DSC!D.SPIN!D.DRDY!D.VV!D.DRA> ,E.A0
XPECTED MSG BO

;EXPECTED MSG RO

%<D.SPOK!D.CART!D.DOOR!
0. BRHM!
D. SSP> ,E. Al

;EXPECTED Al

gznsr:t.)’tl:xuwszsn_c mm;nPRI .00

l‘:fl:

El E.BIl

PAGE 106

SEQ 0106

;MSG_ID FOR EXPECTED MSG Bl

..rsa

wim

'f'?mr. '0

{REC" 18 PoRBxPcren oo g

fRroR
ERRGR
OR

130
[
655
1

iMSS 80 ERROR

T
1% e
i
1041

;MSG Bl ERROR

;CYL DIFF NOT CLERRED AFTER SEEK CMD

;DRIVES

.
003412
16
20

833453

JSR

PC, TSTATN

Beon 983

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

8<0!D.SPIN!D. DROY!D. VV!D. DRA)
txfisc’fgb
#<D.SPOK!D.CAR
F
01“5.51
E.A2

JSR

PC, CHKMSG

nov

o3kB8

T.A2!'7.82!'0

gmon g

RROR
ERROR
TST

001364

R0
_ROY B TERORIVE CLEAR GHD ="
; TEST FOR ATTN

MOV
CLR
MOV
MOV
CLR
w

$iEiiiiit iy ey
RESR

003420

pov—

—

by
RECRTSoa

£
13
i]

000001

ST BO%oR gone

012737

018

|1l

020142

—

S40Y

cOS

MACY11 %IOSE)SEE'%- g!EY't’E oxa:oe

ADD

E58s
1590

;EXPECTED MSG RO

6@%&%&@
inee 1B FOR

§K S

; EXPECTED Al

BXPECTER Mag B8

SPECIFTED MHERE

;MSG Al
;MSG Bl
;:G0 TO

H 7

NEXT ;ssr

NOT CLERRED AFT SEEK CMD.

3 ll'lll'!lll"lllll;l;l"ll'.l.!“llflllllgal’;a‘ll'llllllllllllllllllll

ghem 21

801168 apget:
o4s424

020472

001176

T SECTOR COUNT

< 363630 060 060000 0000 00000 00000 0 00060 000000 00000 0 0000 0000 0600 00000 00000 06 20006 6 0 0 0 2
$8121: SCOPE

BAHALKER

JSR

PC, SUBCLR

ERROR
MOV

828, SESCAPE

TETR TR
ABSriad

; SUBS YS CLEAR & GET STATUS

:CERR AFTER ;cua

!GO TO NEXT

TEST IF ANY ERROR DETECTED

CZRGHED UNIBUS RK& DR PRT1

CZREME.P11

25-JAN-78 12:00

MACY11 30A(1052)

121

D09

25-JAN-78

12:08

MOV
JSR
ERROR

8 AUY4 muce
% ooror s
BES BRS

sgugo::SE -~Ao ese
g
BT

4?2
47
S47Y4

ngx
J

;éés

;
:
;

BEQ

sss

ERROR

144

CMP

SECTOR,ESEC

fié

4y 8?573; 895& %1:83

;

gzg
023737
4
140
gzgg gfi?Y 6 337
lflé

001406

001404

:
65S:

SEQ 0107

;22 SECTOR FORMAT TEST
FIND SECTOR O
;SECTOR & NOT FOUND BY TIMEOUT

#21.,SECNT
PC,FS022
142

020402 012737 000025 001400
020410 004737 O4SSSY
gwo 020414 104142
sm

PAGE 107

TEST SECTOR COUNT REG. IN MSG B3

CHP

JSR

cie

SELTOR,

PSEC
Sss
c

nn»'l»'slizhtifséc%l‘TNOT
~ FOUND BY TIMEOUT
; PREVIOUS_SECT

PSEC

gr ,PSEC

;rs%v%fis
;READ
SECTOR

;BR IF READ SAME TWICE
aa

CTOR REG

TRBLE

-mv
Suuuc gcron PUL IME
;MSG B3 ERROR BETWEEN SECTOR COUNTS

66S:

DEC

Esaon

ézgCNT

:g 020472 00S037 001176

2s:

CLR

SESCAPE

, llllllllll!ilill!llllil‘l“llllIlllllllill!llllilllIlllll!llllll

g:g

020470

001354

001400

s:go

BNE

grs 22

;¥i ¥

495

DETECT OUTER LIMIT

Tmr
Sfi 913
ACTUALLY POSITION ON CYL O
CYL
JACENT
*
Eg*n
NDI TE

i¥

;BR IF SECTOR COUNT NOT DONE

AND/OR B.

HEADS WERE NOT ON
C

COULD NOT SEEK IN nsvenss DIRECTION.

'o 353636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 3 36 36 3696 6 36 36 36 36 36 36 36 36 36 38 36 36 36 36 36 3 36 36 3 36 36 36 3 36 36 3 3 3 3 3 3% 3 3 3 % %

220) %BE&
020808 815?82
012997 000001
001100 001174 teraz: HOV
MOV
1

737

gsos BSE;E M

-5-’4
gg
02085C
D20520

1
1§
g 1
14

8818

7
104122

oL
é’r

045424

JSR

ERROR

PC suacua

LR
e
INCG

PF
EYPCERR
UNLD

MOV
MOV
MOV
JSR

FCP1'RKDC(RS)

141

8?%53 %
83005-70
M

003322

.ERROR

24’

#PAT, RKMR1(RS)
#SEEK, HCS1
PC, DOSMD
122

5k2°T&é TERATION
57« PTR
:SUBSYS CLEAR 8 GET STATUS
:CERR AFTER SCLR
;BYPASS
CHECKING FOR ANY CERR IN GSTATI
:USED FOR VALID HALT

;PARITY & WORD O

;D0 SEEK CMD & GET CONTR READY
:NO RDY FROM SEEK WITH BAD PARITY

083
%

ow4012

30A(1052)

3?22

737

04M252

i H
1 m§
10414

567 Oc ig
<3

021474
070140

RROR

;co:cx

SCCLR,RKCS1(RS)

154

0
e apeLeR 8o B
; TEST FOR ATTN
;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

16
20

b
1 .SPOK!D.CART!
.81

~
~

py
RROR
nov
ERRoR
s'x%

ERROR

18:

MOV

om» RO

;EXPECTED MSG RO

gzig"” 3?50nsc ax

:s: B i g

J::uo&.Tflsg.o
I3R

ER SEEK WITH BAD PARITY

SUNIT RKCS&(:E)
;DRIVES
HC

e *0.SPIN!D.DROY!D w

MOV

ag
mo‘
gg

; 5?
EEE
1 moa
:
Bl ERROR

MOV

021556

ii
11M

| i and ond ool

;

;EXPECTED RO

GH )

003412

sx uxm BAD PARITY

JSR

§ O O

Lol

—

B s

; TEST ron ATT
iNO ATTN
r:sg"DROY!D. w-

:1 JE.
ést?isb.cmflbsgooa-o BRHM!D. ssm E.AL

o HOCET
&‘TSTRTN

GETe g
% 000000

TSTATN
ps;;g

?fl

021008 %7
1%
i
104160
26
ggi g2t
040000 003350
0

EOS
PAGE 108

MOV
MOV

o44012

JSR
ERROR
"ngx

12:08

DE sc’f oufin Lfn??

RROR
RROR
122

25-JAN-78

;EXPECTED Al

figg%s&iivgCLERR CMD
e
?
vsa

26-JAN-78 15:00

MACY11

332

CZRBME . P11

DR PRT

D<<<<D

CZRGHED UNIBUS

emoE
;DO SEEK CMD 8 GET CONTR READY
&l’
SCCLR RKCS1(RS) NO RDY AFTER SEEK CMD

160
;g;uto,m
308

8208, SESCAPE

,annBETECT
NOT FOUND BEFORE TIMEOUT

ngsT UNLORDING AFTER LIMIT DETECT
ESCAPE TO CYCLE UP DRIVE 8 TEST SWR

#<D.DOSC!D.PIP!D. épxn-o VV!D.DRA> ,E.A0

;EXPECTED AD

FO9

MACY11 QR(IOSZ)
-JAN-78 ? q
DETECT OUTER LIMI
ee

g ng§§£ figfl fia&s ;
I

1t
=
003362

883430

R
MoV
no

mwosfi

‘S‘FLW

P§°?
hT‘H’?

%T rouo BEFORE TIMEOUT

FOIM BEFORE TIMEOUT

TNI'QT FOUND BEFORE TIMEOUT
{CLEAR FLAG

ls“"
.DSC!D.SPIN!D.DRDY! Hgfiom»,E.R0 ;EXPECTED MSG AO
8 ss?mocnm'b%i : m
;EXPECTED Al

B4S:

,coccx

ErEB 232

HERELOADING
xEHERD
E&or

’88

0088§

-+
000026

UP_TIME

Hov :S?E:ES
RROR
RROR

32 012765 100000 000000
ssa“a? 35340
013765 001222 000010
Pt pe

.y '3%1222'"

CLR

1
%wm§ 000002
7
045074
%57
001364
14

Ef“?-

83353

ted
<<

003412

SEQ 0109

803438

1416

o4eMl2

[edas

s
o

RENNGS FERENY TN

Gt h

s s et P

Pt Pt Pt Pt Pt Pt

Pt Pt Pt Pt Pt et Pt

Pt Pt Pt s 0 e Pt P P Pt P P

311

PRGE 109

g Dé‘rmgc:x?ér:::zzso TM
%cx *Efifiwosm#
OB

i oy

°’§§§§§§§

CZREMED UNIBUS RK& DR l'flT
25-JAN-78 1
CZRBHE . Pll

ERROR
CuWD2
MOV
{ga
T
BEQ

(’95
>
lg <AT Ew ri
1
82,
RKMR](RS)
;
g !!
PC.GSTAT
:
TATUS
AND MR2,MR3
cY(LRDD
i RECAL
FUL ?
£4%
:BRANCH IF SO

MOV

#CCLR,RKCS1(RS)
SUNIT.RKCS2(RS)
;DRIVES

ERROR

MOV

: REPORT

|
|

0_UNIBUS RKe

DR PRT

MACY11

003322

EOREHE I BUS B
78 1200
1

00000S

3;3 gfiu

043434

1
1

o D825 RISNa8N N3

104154

012737

w0y

—

010340

003412

-JAN-

MOV

e G0

;D0 gsxv: ctsngatl:@ ngg goflgm RDY

ERROR

154

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

#<0'D.SPIN!D.DRDY!D.VV!D.DRA> ,E.AD

;EXPECTED MSG RO

gox

#<D.SPOK!D.CART!D.
'0.BRHM!D.SSP> ,E.Al
5B
S
gx .81
;
FOR
CTED'MSG B1

MOV

#3,E.B3

nbv

o
ERROR

gasa

ERROR

047430

SCLEAR, HCS1

PRGE 110

Pcloocho

2 145Ee

GOS

Jggm

003430

12:

FRcT DuTEr LTATY

MOV

7
003416
o
003420

{

RR BRRRRS BRESERR KR

fi%fi%fi%fi%fifififiE&&w‘*fi*mm“fifififlfim

E oI

0841058

1052)

#2,E.82

566

;g’ggrsr

fisc D FOR

;EXPECTED Al

CTED MSG B2

:MSG ID FOR EXPECTED MSG B3

:““3’;;%%‘%:5%2!@ e oo
81 ERROR

555 ;r
SW

14 oa ] :: SEngr -

Hlmm <§u0> 42
021464
ggw;g

00S037
000177

001176
157412

108:
—

ig?o ?83533 P

85&??8 865;3; 89335}4 —
021514

104121

Biel BTy
021530

i
gxg
1
831?&

104067

:«;
000137

021214

157370

SESCAPE
JSLPADR

Eagon

g.suecm

;CERR AFTER SCLR

?SX

33"gggt.mucsx

:D0 START SPINDLE CMD & GET CONTR ROY

ERROR

gum oo

77 20110
1068

CLR
JMP

121

:RDY NOT FOUND AFTER ST SPIN CMD.

ERROR

the
E'f?
BNE

UPFlc
#SWS, ISWR

;LOOP
ON ERROR?
:YES, RECONDITION DRIVE

JMP

108

:NO mm arr:n ST SPIN CMD.

iRETURN TO MAINLINE

EERRERRFRRRERERFRRERERRERRRRRRRRERRRERERERERRR R ERERRRRERRRACRS

CZRGMED UNIBUS RK& DR PRT]

CZRGME.P11

25-JAN-78 12:00

MACY1l 30A(10S52)

123

25-JAN-78

; ¥TEST 23

3¥

233

5694

¥
21

§;§ g2iete 802537 B5ia%0

?a 1258 &m 8 001100
gfié i& ?83533 .
giiq gitfi §?§§ W» 809830 1S:
16 &

322

001444

183
B e
4
021750
%ggg;

86 3-103

BYS:

003412

8737 oaé% oxa;';y; 001760 QO3416
5732 831772

EE
EE’." ;on LIMIT ERROR
i
"Snon
iagséf Em.
OF TESTS

#STACK, SP
;RESTORE STK PTR
ss,suacl.n
;CERR AFTER SCLR
SOTAB*RRBATRS) iREAOCRHORDTeaLET InnielT
8-66. ,RKWC(RS)

Eg,n«mm& ;SETUP HEAD ADDR
-

; DOUBLE RO

TAO(RO) ,HDTAB ;SETUP HEADER WORD FOR RKBA

BCEAYERD' TM! 00 patA XFER cMD & GET CONTR ROY

SeRT Pczw
AT
ggsgs,ucsx

EQTR%Egch%%TE
cpm
)

dee

ERRSE
PR
;

EEK

a 6o.spxnso.onoysg“vg;fgboa"gé.sfino

CLR

e.aS

Hov

;EXPECTED MSG RO

"i°'55?“’°'°“""?,‘,82°?’°¢5'§”"§8¢§¥26 AL
Eexnc?so nss A2

|'
|

L Rs

;WORD COUNT.

1”33800 003322

817

gsi

HEADERS

ROV
gRSSOR
RIS

E;g

TR £ b e R

CTOR

iHERD TR 'LID HALT

g 00

1;§ m —

051
02 ;

0’'S_FOR

&k RERB

MOV

753

TRACK O:

B
NAUT
TST
gxnsnn
mon ‘E;&

001470

1.E.

Flov_

D2l

BASIC WRITE/READ HEADER 8 HEAD SWITCHING TEST

BUBMRTRECH
SO Bl R
UNIQUE. 22 SECTOR FORMAT IS USED

000002

3;;9’ gi& %g iug 000006
7

SEQ 0111

i é:;5!!!;lllllllllllllll!l"!ll!ll!ll!lllllllll.llllllllllillllll

£9
Bl 0%
g oum T
5598 -‘
l7
001460
% Ei@ &}‘gfi 042662
-

;xs

PAGE 111

BASIC WRITE/READ HEADER 8 HEAD SWITCHING TEST

5688

HOS

12:08

;EXPECTED Al

;

109

7
7

1401

7
727

1254

S074
1362

000026

001364
%xuao
1430

J
I5T

6SS:
aa
000003

0337

1 03-7.

o4sH24
D014

2s:

DO1Y

1“% 100000 003322
1041

6001
1
1
1

fi‘e&'z

75;

100000

737

045074

140

000010

?'3}

ng
T CLERRED AFTER WRITE HEADER CMD

MSG B2=0
--sn IF YES
:MSG B2 NOT CLEARED AFTER WRITE HEADER CMD

%sp :

HERD

#STACK, SP

;RESTORE STK PTR

ERROR

JSR

PC, SUBCLR

;CERR AFTER SCLR

MOV

SWAB

:E ,RKDA(RS)

;SETUP HEAD RDDR

233
J
RROR

SRHTARB,

8<
AD>
,HCS1 oo TA XFER CMD 8 GET CONTR RDY
P;
MD
: 38 ERE HERDER CMD
1
RR, HCS1

YPE
JIMP

MSG18
$e

678:

53
cvknoo

;SELECT WORD 2
' Bss F MSG R2=0

HEAD
m"no,oa

SWAB

%
003322
34

oz.axm#msa
PC,GSTA
cYLDIF

jCHECK nsgs A0,B0néi?io e

INS
MP

MOV

001100

% xug 000006
1

Stt

0333:" 001430

;mon

BC,CHKMSG

§§§

ISR

P B

o442s2

o’tfiuwsag
7B1a:00 HCYIl 3OB0S2) B TNTE /READ HEADER
& HEAD SWITCHING TEST
3553"3 8%5733 800005 093430
nov
8588
inee 1B FOR EXPECTED
mee 83

fimmammmmm&mamm

MOV
MOV
MOV

RK (:2),(80)0
RKDB(RS)
| (RQ)+
RKDB(RS). (RO)+

BIT

#DLT,RKCS2(RS)

JSR

PC,GSTAT

BEQ

;HEAD CTR

'35831“75%5%'?:572 e
: ABORT
ADE

;-sruongrnon SILO TO RHTAB
38 WOR
;3'RD
WORD

0 UNIBUS RK& DR PRT1

25-JAN-78 12:00
55?6 104173
g; 835235
1
2662
7

MACY11 30A(1052)

PAGE 113
723 -C BREIC WRITE/READ HEADER
& HEAD SWITCHING TEST
RR
173
:DLT
AFTER READ HEADER C
$YPE
MSG18
§%omm5
BALANCE TEST
-y
JMP
$§eoP
;ABORT DRIVE

003412

750 003-458

g<géo spxmo.onoyéo.w

555

Eé#3,E.B3
E.B2

PC, CHKMSG
T.A2!7.B2'0

MOV
JSR

o44as2

11
;

1401

MSG B2
D HERE

; SELECT WORD 2

TST
OR
SWAB
MOV

1
;v ADD
n
AD
AD,RKDA(RS)

001674

MOV

SRHTAB,
R1

izg

nt':"ao

DOIYYY
003360 3s:
001454

23%
MOV

TAO(RO), TEMP1 ;READ
;
(R1)+, HOWD

——

gsngon

Eoc-

HERD

001364

DO14SY

003360

DOIM42

000003

D014

15T

69S:
—
’

’

CMP

g'rz

o
JNP

gfio?r

’

, YEmP1

ggcm,oa

TereaTM

;EXPECTED Al

MSG B3

kz,gx?g%msa

Sl 022122
TRR, —

000137

;fis .

i MSG
;C

?osg

0014

.SSP> E.Al

iiMSG
MSG Bl
2‘1’

izao 000006
012701

:io.ssgx-o cmn@.

272

1362

% Qi3

;EXPECTED MSG RO

RROR
RROR
figg% 000026

;

12:08

gfix

ggz

é 003430
003424

JO9

25-JAN-78

;eyfi:x;rch R2=0

‘MSG A2
NOT CLEARED AFTER READ HEADER CMD
: SEE ;r
B2=0
iBR IF YE
'MSG B2
NOT CLEARED AFTER READ HEADER CMD

;RESTORE RKDA
;HERDER WORD COUNT

R'?suouua
BE’ DATA
HEADER WORD

;READ HEADER MISMATCH
;D0 ONLY 1 SECTOR

PP 3o RRT o To IF vES

:ELSE REPERT

33 6363363 3 3 3 3 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 3636 36 36 36 36 3 36 36 36 3 36 36 36 3 36 3 3 3 36 36 3 36 3 3 3 36 36 36 3 36 3 3 3% 3 % % ¥ %

;firesr 24

BASIC WRITE/READ HEADER TEST; ALL 1'S, 20 SECTORS

MACY11

Bie7 govons
1

CZRBEHED UNIBUS RKE DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

(1052)

%¥

USING HE

%.2
RS HE

firfnfin?ozg

rmomc 0’

oam rnon

001174

MOV

#-60. ,RKWC(RS)

1
003322
8-09%

MOV

o<crm~umeno> HC
! ;35
PC,DATC
sgb
:NO

Brev

JSR
Enaon

6907

2722

104415

c'ro
vx

MOV

001000

003350

Efim
OR

2 003412

BN
TERAT

"8§

ucsx

512

_RDY AFTER WRITE HERDER C

STATUS

EERRT
NG BACANGE OF TESTS
523857 &xvs

og.rom.umz

TA XFER CMD & GET CONTR RDY

:GET FRESH

3{;"5’8&'.05&"“‘"
ncs1

003322

:GET 20 SECTOR STATUS

C' i'an SELDRV CMD

;FORMAT NOT SET AFTER WRITE HDR CMD

gfx

2‘86°.SPIN!D.DRDY!D.VV! °§§,’;' .AD

gex

gx £.81

003416

MOV

838% 003424
003430

MOV

oé?g.gg
#3.E.

JSR
.uogg
ERR
EQS%
ERROR

PC, CHKMSG
o!f geo
27
§sg
0

iEsssg
nnon
:
naon

CLR

SECNT

:SECTOR COUNT

#STACK, SP

;RESTORE STK PTR

1 003320

MOV

048252

001400

001100

29
t ax vsnxrv

;WORD COUN

CRacis
t:og

15032.1.

012706

nenosns BY WRITING ALL

y ;E%’“
OEEROB&
.Sg*hxRKSKSSR?ES)
1
?N.Y INCR INHIBIT

Spe"
JMP

18:

00S037

022724

SR
axs
b4S:

022632

5;52

000002

833523

{
7
104270

WIS
&

Pc SUBCLR

SEQ 0114

i g¥!I'll!llsgzI!I!§!!lll'il&“lllillllll!lillllllllllllillllll!llli

0338073
1
003322

{
1§

737

PAGE_
114

BRSIC HRITE/RERD HERDER TEST; ALL 1°'S, 20 SECTORS

10
% 888304

KOS9

12:08

ousH24

25-JAN-78

’

SCOP1

MOV

%¢D.SPOK!D.CART!D.

.BRHM!D.SSP>

;EXPECTED MSG RO

,E.Al

EFOR EXPEC ED MSG Bl

; EXPECTED Al

CTED
MSG B2
CTED MSG B3

m ax
sn uane HERDER CMD

0_UNIBUS_RK

.P11

25-JAN-78 lé:00

104174

MACY11 3?2‘('1052)

ou4s4a4

e s
bettat

BOT

100000

LOS

12:08_ PAGE_115
25-JAN-78
BASIC WRITE/READ HEADER TEST ALL 1°’S, 20 SECTORS

ZRRoR

PC,SUBCLR
a4

SEQ 0115

;CERR AFTER SCLR

o«crn?'E§n£Ao> 80 DATA XFER CMD & GET CONTR RDY

003322

.CéRRHCS1

003322

;iNO RDY AFTER READ HEADER CMD
CERR AFTER READ HERDER CMD

;QSORT

BR3EE3

ANCE

OF TESTS

é
ST %RS FROM SILO TO RHTAB

658:

;3 RD WORD
T,RKCS2(RS)

000010

GSTRT
Hgglfl

66S:

;DLT AFTER READ HEADER CMD
ABORTING BALANCE OF TESTS
; ABORT DRIVE

#<CFMT!SELDRV>, HCSI
DOCMD

003322

#D.FORM, HMR2

0033s0

SOY AFTER SELDRV CMD

;FORMAT NOT SET AFTER RERD HDR CMD

68:

340

003412

003416
003420

883450

DRfl)
D.SPIN!D. DROY'D W'E

u<§6590x-o CART!D.sxgs
xfissf?FOR

.Shéfi

CHKMSG

r.eazr.aaeo
1

:
g

G757

000026

82,

BRHM!

nzsfsFoR EPECTER
he B2

RKMR1 (RS)

; EXPECTED Al

ggg ag g§§§§°§r§§5°irHERDER CMD
;CHECK
MSGS RO,BO.A

;MSG Bl ERROR

Pg'csrn%

;EXPECTED MSG RO

g?Efi'fiéglax

,HSG Al

272

104272
|=]
N
£

227

Nene RSFE v 8Rooieo

T5222
SIS

Pevpesreny o-o-o—o-

MM-O\D

zfi 88733

NNV

DR_PRT

;SELECT WORD 2
; SEE IF MSG A2=0

iBR IF YES

CZRGHED UNIBUS RK6 DR PRTI
CZREHE.P11
25-JAN-78 12:00

553 L

005737

001364

012701

001674

8isesr BBlue
gshse BBl
BR144S

0623174

023176

S964
5965

MACY11 3?2&1052)

67%:

ans
003360

3s:
-

003360

000003

;

25-JAN-78

PAGE 116

BRSIC WRITE/RERD HERDER TEST; ALL 1'S, 20 SECTORS
ERROR

172

;MSG A2 NOT CLERRED AFTER READ HERDER CMD

Esaon 523

fi Eevfigr CLEARED AFTER READ HEADER CMD

TST

CYLADD

MOV
CLR
Hngv

SPHTARB,
R1
WDCNT
l()RTni,TEHPI

BEQ

M
§

MO9S

12:08

innon

:SEE_IF MSG B2=0

BhOTHRET

Efig

BNE

u; %3

,usnozn WORD COUNT

iGET 'snou.g BE’' DATA

;RS%.."SQ‘?‘ p—
iBR IF YES

;READ HEADER MISMATCH

;JUST 1 SECTOR AND 1 HERD

3 iiIlll!l'lll!lllll!lllllllll!llllll&!illlll!lillliil!illlllllll

:£

WRITE & RERD

llll!l&llllllllIl!lllllllilllll!llllll!l‘lllllllllllll!l!llllll

001174

‘rSTas.

SCOPE

MOV

81, STIMES
sP
sstack,

1 ITERATION
;
STK PTR
kssvone

Esgon

Scfl'

;CERR AFTER SCLR

012706

5 BE

?Bzagz

ousu4a4

023300

005237

001464

INC

BYPFMT

geaite Bis7Ee D9ic7

TRB, RK
)
R WORD TABLE
PRICMRNE (ST

WO NCNE WM

SaeRaoRRR T

023266

000001
001100

023320

0013S2

ki
623355

||1

737

046534

o
i
023424
023432

IN HEADER

196 FILL

MOV
JSR

000020

MOV

%0, RKDC (RS)

"°¥
éanon

P omifl%’mm ;00 DATA XFER C
b
8 Bov AFTER WR
"?Tf SEAOERONTR_RDY
CHD

003322

1% BRSEE3
0340
003414

'S%AS‘“‘”

;SET BIT 14 & 1S

D14
001436

003322

00S037

SUBCLR

B4S:
oo3412

B
JMP
MOV

CLR

FHD'RB

GSTAT

e
!‘5133

;CYLS
T FRESH STATU

288; 33

#<0!'D.SPIN!D.DRDY!D.VV!D.DRA> ,E.RD

E.BO

sxpzcrso MsG' B0

:EXPECTED MSG RO

SEQ J116

EBEE
0_UNIBUS_RKE DR
.P11
25-JAN-78 12:00

una§£ READ HSnggnsPAGE
cYL 6117HERD O

3%50
)
083430

MOV

125

Hov
TH0RD
ERROR
RROR
ERROR

300
270

nsc
RROR
iMSG ax ERROR

001400

gégpl

SECNT

;SECTOR COUNT

001100

#STACK, SP

;RESTORE STK PTR

o4s4a4

JSR

e
e e
s s

[y
B =]

§ &

RROR

PC, SUBCLR

MOV

#0,RKDC(RS)

;CYL #

001674

MOV

SRHTAB, RO

5852

003322

MOV

onoucno HCS1

100000

003322

JSR

ERROR

000010

oarcho

gga

02 RR, HCS1

e
JMP

"33

) (n01+
nx

SEE

ogLT,RKCSE(R57
C,GSTAT

grsez

JMP

$§eoP

CMP
BNE

RO,

RROR
YPE

061958

002100

004737

047056

JSR

001442

CLR

BiEvee 801470

MOV

1454
454

68%:

003360

R
e SO Fer
52385 321

MOV
MOV

JSR

678:

;D0 READ HERDER CMD 8 GET CONTR RDY

iNO RDY AFTER READ HEADER CMD

Tse

MOV

o4s074

388
:

g3 B5§ &

ARk KRR B RR
SRE:
& &

000020

100000

557

;CERR AFTER SCLR

66S:

8588(=]
EFSAN

.S
:EXPECTED Al
xgs
?Po
nsc
B1
;
sxr:§
g
IH2C 1D FOR EXPECTED Med B3
— nscs
“°§F§#§ctgf
D HE
WRITE Hsnosa CMD

65%:

173
MSG18

;1°ST WORD FROM SILO TO RHTAB

)+
;s gg uosg
T
WO

;SEE IF DATA LATE

;DATA_LATE ON READ HEADER
:ABORT BALANCE OF TESTS

:ABORT DRIVE

66 WORDS DONE?
sgt SRHTAB+132. ;ALL
!gk ?
ORT RHT INTO SRTTRB SO THAT IT
PC, SORT
HH SECTOR O
gsgsfl

WDCNT

#SRTTAB, RO

sHDTARB, R1

MOV

(RO)+,HDWD

CMP

HDWD, tEMP1

MOV

#<D.SPOK!D.CART!D.DOOR!D

ERROR

gscds

015037
0l2137
023737

12:

01 .81
.SEES
E?ggzr.aaso

3416

o44as2

127

-JAN-78

NOS

MACY11l 30A(10S2)

(R1)+.TEMP1

ACTUAL HERDER TABLE

CRLC HEADER TABLE

; COMPARE ACTUAL WITH CALCULATED WORD

0 _UNIBUS RKE DR _PRT1
P11
25-JAN-78 12:00

Tes

001442

INC
CMP
BNE

3726

00S037

001464

CLR BYPFMT

12:

333

PAGE

118

WDCNT
WDCNT, #66.
68$

SEQ 0118

;nsas HEADER MISMATCH
sALL uonos DONE?
iBR IF NO

:ALLOW CORRECT FORMATTING

H !llillllll!“l!lll!lllll“llllllllll«lllllllll!llllllllllllll!ll

¥
H;:

Py
E:
S
20

| edas fi | il et z

fl!lil?g

TM
xaz

%
ns:%;

mF OR CORRECT STATUS US ARFTER
AFTER RD RDY

'éI
ch DIFF IS 1.
“"ER
"i{go m 25"1‘503203 3 CYeROOR"
mngcES"is VERIFI

RERD mon SECTOR, HERD OHEADS
THAT mev
ARE
MOVE.
DID ACTUALLY
CYLO TO SHOW THAT THE & VERIFIED
"f'rrsgm'" Fnon

(7}

001174 féras. MOV
r"zocv:J "
JSR

1
1
11

003322
140

I&nl

003412
3416
3420

o4u42s2

023727
001401
104212

ERROR
CLR

MOV
MOV
MOV

001362

000001

T1 '53
oéfac
PC, suabua

fnc

srx
'ksog'roné

;CERR AFTER SCLR

.r
"'Sx
u
(RS)

;SET FOR CYL 1

Pg‘506%S1

;00 SEEK CMD 3 GET CONTR READY

. WO
ERR

T.A2!'Taa203

;
gsM-: ig ED HERE
:MSG RO t
ING SEEK

g:"'o'

cl:;unr. #l

ERROR

212

MOV

JSR

ERROR

ch
MOV
MOV
JSR

ERROR
ERROR
ERROR

§ 1
104308
024070
024076
024100

FROM CYL O TO1 & READ HERDERS

: . % lfilll!lIlllllllil“lllllll»llll!’lll'lllllll’l!ll!llll!ililill

Bl Yoy

oo o

aoo

ERROR

3712

AN A AN LA A AN

S AN

BBBVRR OB o0 o0 £ wh0B8 IRR ZoR=8

gggg %27 001442 000102 69%:

25-JAN-78

WRITE & READ MEADERS CYL O, MERD O
BEQ
:BR IF COMPARE

131

:NO RDY AFTER SEEK CMD

2‘30.PIP!D.SPIN!D.VV!D.DRA> ,E.AD ;EXPECTED AO
#¢D.FWD!D.SPOK!D.CART!D.DOOR!D.BRHM!D. SSP> ,E.Al
#1,E.BI
PC, CHK
; CHECK nscs
Al

204
205
206

iMSG BO snnon
:MSG Al ERROR
:MSG Bl ERROR

:CYL DIFF INCORRECT DURING SEEK CMD.

——

3933A2
mgae.eaAR
as

MACY11l 30A(1052)

c
c

CZREHE.P11

25-JAN-78 12:00

CZREHED UNIBUS RKE DR _PRT1

T26

MACY1l 30A(1052)

Eig
024102
012737 025006 001176 1S:
gi
024110 013737 001422 003360

MOV

737

fl
gig
siu
i
273
Eigg @ii ?8-0216
144

6145
sm;

136 01
194

1s0

'
0894140

100000

1720

003322

003412

003416

21
6l

12
14

(31
31
1
}

21%

024230

1041
10M1
1041
;
So3!

104137

siw 024232
165

§i1
gb 0

ggg

2174

51;2

sifl

Ziifl

618l
1

gfi 11

WSS
%

Exs;

2;;
M
1 o44012

figg?fl
003412

gsgi m 003416

% 883665 883450
044252

#12$, SESCAPE

12500, TEMP1

;SETUP TIMEOUT

Eason
BIT
Essoa

PC,FATT2

;usNRrQN AFTER SEEK CMD
;CERR AFTER SEEK CMD

152
oszm.ucsx
13

CLR

#¢D.DSC!D.SPIN!D.
s.go

MOV
JSR

#2,E.B2
#3,E.B3
PC, CHK

8<D.SPOK!D. cnm-b

T133AS!T. '0

TTN

v'n w-o onm E.A0

sgr

;EXPECTED MSG RO

; EXPECTED Al

1D
CTED
ne
iMSG ID FOR EXPECTED MSG
B
;s CHECK
B0, A

i.nscmmarsasssxcno
||sis"gs #‘xé ED HERE

E
ERROR
RROR
RROR
sz

134
éxgg
E'},rkmr

;MSG B0
i
m

ERROR

137

;CYL. DIFF NOT CLEARED AFTER SEEK CMD

MOV

8CCLR,RKCS1(RS)
SUNIT
nxcsatsg ;DRIVES

?2?4
3°
“fiho151
ERROR
ggn
EE;TS""N

;D0
GET CMD
CONTR RDY
RSDRI VSF%E?@ 8CLEAR
TEST FOR ATTN

ERROR

154

;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD

MOV

CLR

#¢0!D.SPIN'D. oaov-o VV!D.DRA>,E. RO
E.
fgo 50

Hov

eSE: SS

MOV

86%1'3

2}% oauggg
183522
024352 104274

65S:

—

104154

737
HE g g
B187

001362

Cl0

MOV

6150
1
1
003424
fi
024176 012737 000003 003430
1
737
044252

12:

SEEK FROM CYL 3 ?3 1';"%:56 HEADERS
_@2S5-JAN-78

fig

R
e

:EXPECTED MSG RO

u:s
SPOK!D.LCARTID.
"%)anoor 's?%s%EAL !
PC

TS0

53335 ess
274

ERROR

128 I8 ESR EXPECTER
net B3

; CHECK

O0E e oo

Réc
B0 Enn P FR. YR, Shaen
:MSG Al ERROR

;EXPECTED Al

CZRGHED UNIBUS RK®G DR PRT1

CZREHE.P11
2{8

25-JAN-78 12:00

024354

MACY1l 30A(1052)

T28

104266

6190

737

1364

6191 85:‘.% ”37 %13&4 000091
Eig 8533;3 ?8-038
sxg

024374

12
001100
m %7 045424

85333:

]

g::'uo 005037
14 012765
1

19
1

266

1ST

CYLADD

000020

100000

003322

SCOP1

;CERR AFTER SCLR

CLR
MOV

SESCAPE
81,RKDC(RS)
RO
SRHTAB,

;CYL #

IMP

0se235

gzg
165¢

fig

016eS0

BIT

67S:

sag 854200 Bora0? 100000 000010

;CYL ADDR INCORRECT AFTER SEEK CMD

104401

042662

CYLARDD,
#1
537

;MSG Bl ERROR

#STACK, SP
PC, SUBCLR

383
ZRRoR

0001

PAGE 120

MOV
JSR

15339
003322
9] ouwe
4

iéig

ERROR

001176
000001
74

D10

12: 08

SEEK FROM CYL O TO 1 & REARD HEADERS

CMP
Efiaon
2s:

60% 5

25-JAN-78

;RESTORE STK PTR

8< ao&hm ,HCS1
5
1310ATCMD
108
RBY aFTER RERD HEROER CHD OY
o%m.ncsx

e ?7113013
$eoP

CEORT
BALANCE
OF TeoTs O
:ABORT DRIVE

MOV
MOV

“‘%’-‘%”
. (RO)+
RKDB(RS)

;é’ST m FROM SILO TO RHTRB.{
:2’

oou RKCS2(RS)

RKBBiR2)'(RD): i5-RD WoRD

BIT

gg iS ‘fig;’ —
Doy 1§ g 491 gseass
2559

L3R
P? —
?;2“
.é

T AFTER READ HE ER CMD
Rhoan
(BBLANCE OF TESTS

gacfr

;CHECK 1°ST WORD ONLY:CYL#®

§ 0 gg
gggg

53;
&é
6243

68S:

1? 7 001674

104211

74
001454

4ysy
003360

ke 81%3; %301 5320
3737
1401

004737

024570

000516

047430

grsima

3§:

ERROR
MOV
MOV
CMP

ERROR

202

JSR

PC,SWTST

BEQ

211
RHTAB,
HOWD
81, TEMPL
ngto TEMP1

;CYL O HEQDER ON CYL 1

;READ CYL WORD MEADER ERROR

1sta7

SEE IF SW w on 8 IS SET

;29
10 o'i ;
iR
REIF SW 14 IS SET
OR
1SW 8 unu SWR ¢7:0> APPLY

SEQ 0120

0 UNIBUS RK

P11

PRT

3m-15:00

MACY11

gs:ggs 03:'0033 oYsS424

(1052)

392&
6S:

ELOD

25-JAN-78

SEEK FROM CYL 5 ?8 13

m HERDERS

ERROR

—" S

JSR

PC, SUBCLR
24

;CERR AFTER SCLR

27
m %
§; 8390547

003322

MOV

K,HCS1
33550610
131

;D0
SEEK CMD 8 GET CONTR READY
iNO RDY AFTER SEEK CMD.

1M
%0153

003360

;gngug,{TEMPI

100000

003322

MOV
JSR
ERROR

;FIND
ATT
INO ATTN nrrsn SEEK CMD

axa

ogim,HCS1

JSR

PC, SUBCLR

g 003412

novcm

s .DSC!D.SPIN'D.

MOV

cl'En'

El82, E.-~

JSR

PC, CHKMSG

cm:ox

o4sH2Y

£98:

Egnoa
ERROR

MOV

o442s2

,
E

RROR

ERROR

001364

11
00 wfs

xg-ues
184120
0014

274

137
37
77
1264
0137

D01

024102
001410
001000
024374

708:
108:

154140

154120

w. .DRA> ,E.A0

.SPOK!D. cam-b.

T.A2!T.B2'0
1
1

'E fgzp
OR

g;r

;EXPECTED MSG AO

Efs%fictg&o
HERE
SEEK CMD

ngg

iMSG Al E

136
%Lnoo

iMSG Bl

RROR

:CYL ADDR IN RKMR3 NOT=RKDC

R
%T

APE
5 LG

BEQ
JMP
IMP

0s
SLPERR
asLP

INC

u'rgc

BNE
>

;CERR AFTER SCLR

;mon
233

BIT

;CERR AFTER SEEK CMD.

JMP
INC
BIT
BNE
JMP

#SW9, ISWR

1
LPFLG
- #SW9, ASWR
sg
2

ERROR

:SW 9 WAS SET.
:SW 14 OR 8 WAS SET
;LOOP ON ERROR?

:YES, RECONDITION DRIVE

IRETURN TO MAINLINE

;LOOP ON ERROR?
:YES nsgommon DRIVE
:RETURN TO MAINLINE

s EXPECTED Al

CORRERRRES 1

SEQ 0122

IIlllllll!lllllllllllll..ll'.lllllllllli!llllili!llllllllllllll

’h

WRITE 8 READ HEADERS CYL
1

AD O

llllll;g;;g!!ll!lll!lllllli!!I!l!lll!il!illllllllIlilli!llll!!l

001174

NOU
£ W

[S{erwretwtetwred

l12:
MACY11 30A(10S2)
25-JAN-78
e 08 PRGE 122
T2
SEEK FROM CYL 0701 & READ HERDERS

tarz7.

001352

831138

DO1436

003322

MOV
JSR
ERROR

PC, SUBCLR
24

;CERR AFTER SCLR

INC

BYPFMT

sSET BIT 14 & 15

MOV

sHDTAB nxantRS)

;HEADER WORD TRBLE

om0

MOV
MOV

-s? RKWC(RS)
81, TObYL

MOV

JSR

Pc rnnrne

-TnaLE

MOV

#1,RKDC(RS)

;CYL®

MOV

o<unn§no>,HCS1

003424
003430

ALADD

ggr

ax;

HCS1

Efiaoa
YPE

003416
003420

TERATION

{REST

ERROR
JSR

bY4S:

;figo

sstack, SP

JSR

003322

003412

#1,.STIMES

MOV

nscxe

STK PTR

IN HEADER

;WORD COUNT.

:D0 DATA XFER CMD & GET CONTR ROY

:NO RDY AFTER WRITE HEARDER CMD
:GET FRESH STATUS

;“555 RFTER unxr us

; Txgg

IMP

$e0P

gfx

MOV

< .spoxeo.cnnr-

MOV

82,E.

JSR

PC, CHKMSG

.cuecx MSGS A0,B0,A1,Bl

ERROR

267

ERROR

270

;
;
:

iMSG Bl

ERROR

IVE

zo.stneo.onov-o !oan»,

gfx ex .B1
nov e3'E85
_WORD
ERROR

}ABOR

R CMD

ESTS

T.A2!'T.B2!'0
277

390

.RO

,EXPECTED MSG RO

83| 3¥Eonsc a .
% EXPECTED med B3

:EXPECTED Al

CTED

MSG B2

gflggcs ;#scirrz
RO E
AFTER WRITE HERDER CMD
E
ERROR

51 feeacd

001400

g%gpl

SECNT

;SECTOR COUNT

L. 266

005037
04415
127

001100

MOV

#STACK, SF

;RESTORE STK PTR

025272
025276

004737
104024

o4s4ay

JSR
ERROR

PC, SUBCLR
24

:CERR AFTER SCLR

E’

CZREHED UNIBUS RKE& DR PRTI1
CZRBHE.P11
25-JAN-78 12:00

012765

000001

012700

001674

000020

go%e72

003322

100000

003322

i gsgs

NONE

G10

MACY11l 30A(10S2)
25-JAN-78
12: 08 PAGE 123
Te7
WRITE 8 READ HEADERS CYL 1, HERAD O

65S:

668:

1
1

#1,RKDC(RS)
SRHTAB,
RO
SPDHEAD, HCS1
PC,CATCHD

IMP

35"33

oY
MOV

REE. o
thgg):(%n 55'

BIT

#DLT,RKCS2(RS)

ER’TM
mm HCS1
Béo
825 ;

4801%

§15

MOV
MOV
MOV
JSR

000010

0470Se

68S8:
003360

R
5%
555
3
2 5%

susq-

001464

ggv

(RO)+

0ooo102

;ALL 66 WORDS DONE?
;BR IF NO

2 IR, ST
(BT COUNT
;

0 e 1T

;ACTUAL HERDER TABLE
;CALC HEADER TRBLE

CMP

HOWD, tEMP1

ERROR

202

; COMPARE ACTUAL WITH CAL.CULATED WORD
;BR_IF COMPARE
; READ HEADER MISMATCH

WDCNT
WDCNT, #66.
68%

;ALL WORDS DONE?
;BR IF NO

BEQ
69%:

sHDTAB,
R1

(g?n'r

;SEE IF DATA LATE

;DATA_LATE ON READ_HEADER
;
;
eélCE OF TESTS

'o'gSrma RO

MOV

001470

’

RO, SRHTAB+132.
65
PC,SORT

nbv

CLR

88144

CMP
BNE
JSR

;D0 READ HEADER CMD & GET CONTR RDY
;NO RDY AFTER RERD HERDER CMD

;1’ST WORD FROM SILO TO RHTAB

sol
I
JMP
u"fig

678:

;CYL »

'3321
owfixvs
5

SEQ dJ123

INC
CMP
BNE

698

CLR BYPFMT

;ALLOW CORRECT FORMATTING

TEST RECALIBRATE CMD 3 READ HERDERS
THIS T
%T VER
EST D

gg}sog:?rfinfiififigfiéognsmgfism
1 FROM THE PREVIOUS
HERDERS
HERDERS

AN ERROR IN THIS TEST INDICATES THAT HERDS:

CZREHED UNIBUS RKE DR PRTI
CZREHE.P11
25-JAN-78 12:00

MACY11l

s o

£ "g:EgHEg?PGWPGWPGWP
£Lrrrrrr
REBREBBBNFRESR Co®None

.‘*t.

p4l12
B413

30A(10S2)
25-JAN-78
12:
T30
TEST RECALIBRAT

MOVEC TO A CYL OT

B. onorcsr&c

ot Ben

001174

t&t30:

PIR
'ETRnd
ABSri

p—
F

APE

u,nxlln#mS)
.fim

*0:
L=

,E.

oN L

gm. IP!D.SPIN'D.VV!D.DRA> ,E.AO ;EXPECTED RO

7.R2'0!'0

2s:

38:

003412

003416
003420
003424

Al,Bl

nsc Al
:MSG Bl

5?7

;CYL DIFF INCORRECT DURING RECAL CMD.

812S, SESCAPE

8-1 f;mx
PC,FATT2

ggem,ucsx

003322

s g Ew&a*f {3RS
; CHECK MSGS RO

15
16

YLDIF

goune
fl]?éo

.scu:cr WORD 1

sRTZ NOT SET DURING RECAL CMD

PC, CHKMSG

003360

GET comn RDY

:i éngeo.REV'!D.SPOK!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

s
e

18:

883426

001176

ERROR TYPEOUTS

Z,HMR2

307
003412

nr R SCLR

mzmckg
E%Q
RS RECLeFER Belhl&
CLR, RKCS1(RS)

003322

v
\4

201130

nmmx

2223 2222222222222 222222 222222222222 22 2tlldd

SCOPE

JSR
ERROR

001350

SEQ Jl24

SETLP nnsour
Nsng

nu msn RECAL CMD

;CERR AFTER RECAL CMD

220

#<D.DSC!D.SPIN!D. DROY'D v!D.
DRG),E.ARD
TSD
go
E.

SPOK!D.CART! booon-

u E.Bl
E.A2°
#2,E.82

;EXPECTED MSG RO

.SSP> ,E.Al

MSG I
Expscrso MSG Bl
EXP CTEo
:MSG ID FOR EXPECTED MSG B2

;EXPECTED Al

0_UNIBUS_RK? DR_PRT1
.P11
s -JAN-78 12:00

c
c

025760

012737

000003

o442s2

l12:
2:08 PAGE 125
TEST RECALIBRATE CMD & READ HERDERS

003430

MOV

#3,E.83

;MSG ID FOR EXPECTED MSG B3

JSR
émuogs

PC, CHKMSG
T ?an.aaeo

xR
Emoa
MSG
;iiy,
;MSG
Al
ERROR

MOV

BYS:

65S:

owM012
bbS:

(V1

2
Bee

1
1
1

[
b

1
1
1
1
1
1

652%
6523

883428

MOV

0Oc2be24

N
s s Pt P

4s:

001176

§§3H72N

003322

100000

003322

; SELECT WORD 2
;SSE

cvkaoo

£5

#CCLR,RKCS1(RS)
SUNIT RKCS2(RS)
8CLERR, HCS1
DOCHD
PC,
#gl
TSTATN
668
154

;BR IF YES
;MSG B2 NOT CLEARED AFTER RECAL CMD

;DRIVES

;D0

;ATTN NOT CLERARED AFTER DRIVE CLEAR CMD

;EXPECTED MSG RO
i <oso.snme.onoveo.vx- .oggé, .RO
; EXPECTED Al
1
v
&TED’
HSe 81
#1,E.B1

MOV

og: :35

PC, CHKMSG
T.A2!'T.B2'0

ERROR

3
79

JSR

PC, SUBCLR

CLR

SESCAPE

MOV
MOV
JSR

SRHTAB
omgg;hm,msx
c
PC

snnon
I7

BEQ

ERROR

CLEAR CMD & GET CONTR RDY

DRIVE

:
Y AFTER
DRIVE CLEAR CMD
TEST FOR ATTN

E.BO
#<<D.SPOK!D.CART!D.

ERROR

F HgG A2=0

I} YE

; MSG Rg NOT CLERRED AFTER RECAL CMD
MSG B2=0
;SEE _IF

CLR
MOV

JSR
Rugg

ow42s2

NNe e g §g~N

026170

ERROR

MOV

o4sH24

IRY

6514
6515
651
g 1
1
b

ERROR

g
fie e

BEQ

3
b
651

003412

b b

[

—

£
£

OZ.RKM%(RS)

SEQ d12S

ERROR

;MSG Bl

_320
535
47
RROR
MOV
MOV
MOV
JSR
Snnon
SR
BR

—

25-JAN-78

e o

1
1
1
1
000026

Y
[
[

MACY11 39261052)

266

17&

#CERR, HCS1

67§

174

{56 10 FOR

Eagg gs

RROR

EXPECTER Meg g2

agfigclztg%so HERE

ER DRIVE CLERAR CMD

iHSC 81 ERROR
;CERR AFTER SCLR

;D0 DATA XFER CMD 8 GET CONTR RDY
;NO RDY AFTER READ HERDER CMD
;CERR AFTER READ HEADER CMD

&&m

oo
oo oo

MACY11

30A(10S2)
T30

26
MD & RERD HERDERS
e

B9 oo
§s5s Ooeoss D00ISF Ousces

; ABORT BALANCE OF TESTS
; ABORT DRIVE

gET Sl ik

678:

é:
ST HORD FROM SILO TO RHTARB
3’

000010

8DLT,RKCS2(RS)

"gGSTRT
GlB

gbo AFTER READ HEADER CMD

RBOS;I"G BALANCE OF TESTS

68S:

g B8 B

000001

6S:

RHTAB,
81
5§
240

;CYL 1 HERDERS ON CYL O

RHTAB
6%
202

;READ CYL WORD HERDER ERROR

PC,SWTST

1st31

E574

5§75

“§§
4

Ak
L

12?7

€577 GeCuiE oisrs

6579

026462

012737

g2
7

ITH

BEEBE”
131

%8 SEPTR
EL R e

003360

gy
e

;FIND ATT

003322

oo3412

1 863428

000022

14 IS SET OR
'kgggag Eg"?u&(SH
4 OR 8 IS SET

003322

69%:

CYL ® ONLY

;n555n8§¥¥5nsfikcx TO CYL 1

RR,HCS1

;CHECK WORD O,

PC, SUBCLR
24
#1,RKDC(RS)

000020

SEQ 0126

80330
003424

PC, SUBCLR
24

iNO ATTN RFTER SEEK CMD

;CERR AFTER SEEK CMD.
;CERR AFTER SCLR

o«soo.SPIN!D.DRDY!D. VV!

.nnn>,sfino

:EXPECTED MSG

%2
,E.B2
%3 E.B3

iMSG
iMSG

;EXPECTED MSG RO

#<D.SPOK!D.CART!D.
j .anuneo SSP> ,E.Al
81,.E.B1
; MSG xg FOR
CTED'MSG BI
E.AE
: EXPE sg ns
#<BIT4!2> ,E.B2

ID
FOR
ID FOR

CTED MSG B2
xpecr D MSG B3

;EXPECTED MSG B2
& ID FOR CYL 1

;EXPECTED Al

1
MACY11l 30A(10S52)
e5-JAN-78
T30
TEST RECALIBRATE

0_UNIBUS_RKBE
25-JAN-7.
.P11

PC, CHKMSG

; CHECK

RROR

T.R2'T.B2!0
1

;

85"3

1
136

g;moo.u

iMSG Al
ERROR
:
Bl ERROR

ERROR

;CYL ADDR IN RKMR3 NOT=RKDC

CLR

SESCAPE

e
IMP

PERR
SSLPADR

smf‘

LPFLG

)

Igg:
)

152364

mf‘

’

152344

i MSG

S A0,B0,A1,B1

-52 MSGS SPECIFIED HERE
RROR AFTER SEEK CMD

RROR

PFLG

#SW9,

ISWR
3
[
LPFLG

, 3SWR

;SW 9 WAS SET,
:SW 14 OR 8 WAS SET
:LOOP ON ERROR?
:YES,
RECONDITION DRIVE
IRETURN TO MAINLINE

% EmonT;w

'Yng?.fim ?8 .é‘ xturgn

;'lll!llllll!lll!!lllll!&llllll"l!!lll!lllllllllllillllIlllillll
;firssr 3l
SINGLE INCREMENT SEEKS TO LAST CYL
%

nqs r;sr ooeia fln«.&xmmm

¥
H

‘

12 61578 B804

WITHOUT ANY
DESTROY DATA.

WRITING OR READING

Sgs

NOT

T TO THE

]

001174

MOVv

81,871

o§f x?g;

TERAT

‘s
§n< 3%
;Aggr&é

PC, SUBCLR
4
RCYL
81, TOCY!
#1,CALDIF

;CERR AFTER SCLR
:FROM CYL
;TO CYL
: CALCULATED DIFF.

MOV

SCOP1

#STACK, SP

;RESTORE STK PTR

B BEH =

JSR
ERROR

PC, SUBCLR
24

;CERR AFTER SCLR

MOV

TOCYL,RKDC(RS) ;CYL TO SEEK TO

026702

001352
001360
18:

012706

001100

1176
765 0B13es %oozo
737

027442

37
0047 37

000017
O43434

026646

001350
000001
000001

003322

LAST CYL

TO INADVERTENTLY

ié:stl!llzssgliilllllllillllllllllllll!lill'!!llllll!llllllllllll

SR
RROR
LR
MOV
MOV

n
Y

;3 o

1
BNE
JMP

127

TST

NN LW+

Loal ad s al ad ad '

FEEEEEEEES5EREEERE]B0 00912,0.000

o4sH424

g
4

RROR

RROR
ERROR

000001

SEQ 0127

JSR

Load ad ol ad al al ad ad '

c
c

MOV
JSR

%108 ss.s(.cm:

¥SEEK , HCS1
PC, DOLMD

:D0 SEEK CMD & GET CONTR RERDY

CZRGHED UNIBUS RKE& DR PRT

OpT BUS K AR 78 12:00

ssa;

g638 006

833419

MACY11

30A(1052)

3085

ERROR

£.80

TH0RD

;chg"Esi0

ERROR

206

§SPP

%;LDIF,N

738 BRdnds Ovese

A
A
R85 ¢

chE
104206

fi%

ssg
g2
2222

%zzgz

001362

Hov

131

000001

(g,

8%3‘00

003412

uo<FUD!D. SPOK!D. CARTD. DOOR!D. BRHM!D. SSP, E. A1

003416

v
gggon
17

BEQ
ERROR
MOV

g nsgs80s°2s8ttPieD Here
G Bl ERROR

;CYL DIFF INCORRECT DURING SEEK

11E305525PTE
PSaFATTE
¥CERR, HCS1

64§
2I0

LseTue TimeOUT
PROMRTTN HFTER SEEK CMD
:CERR AFTER SEEK CMD

gODSC'DSPIN'D DRDY'

Wg.DRA> ,E.AD

;EXPECTED MSG RO

CLR

g270sh
Bees
g ooavzy
gggg 027062 012737 000003 003430

gog

'E" £.Bl

&;g
“7-4

. WORD AS
Esgon

!it Egnsg
ngfls'?.psé:Piso HERE
Eggon AFTER SEEK CMD

E aon

13;

;CYL DIFF NOT CLERRED AFTER SEEK CMD

MOV
My
MOV

8CCLR, RKCS1(RS)
EARAGHOR
o
8CLEAR, HCS1

is;

M
i iaa

737

NO RDY AFTER SEEK CMD

.PIP!D.SPIN!D’ WV!D-DRA>, E.AD ; EXPECTED AD

1401
104210

BE O mmeeet

8239-‘3 Qig737 BETuss
BiAZE 2%
7%7 1
100000 003322
1

SIRCLE INCREMENTBEER T0 1 LAST CYL

003412

Eaa 852;& R1s742 mfl Q03418

22"5

L10

AN-7

0 1

MOV

003420

MMOV

044252

JSR

i
g2
RIS
R
66
gzh
oofz:i? 001362

% 027116
&
BHE
6685
132
225

7i~oo

?84134

658:

01
T
MO gas
012737 000005 003322
737

043434

% oa;}
004737
6690 857154 104154
6691
7156

044012

; ;

oé?f.aa
#3.E.B3

PC,

CHKM c

|
T§T
gwsrwxr

#<D.SPOK!D. cnm'

ROR

66S:

Bga
ERROR

PC,

151

DOCHD

:‘c"rsmm
154

XPE

8?"
,E. m

; EXPECTED Al

?o pon xficrzo MSG B2

nsc ID FOR EXPECTED MSG B3
; CHECK

MSGS

BRE
’

.oo 2'""5,?

AR CMD
DRIVE

& GET CONTR RDY
CLERR CMD

TEST FOR ATTN
sATTN NOT CLERRED AFTER DRIVE CLEAR CMD

CZREHED UNIBUS RK& DR SRT 1

CZRBHE.P11

25-JAN-78

12:

M10O

zés %{5& 012737 0103‘:3 oo3412

gfg

BE Bl BT BUS wus
gk AT B emm
3

737

85;353 883085
7

104266

§;8§

gggggg

§§z§§;

7xé
271

6714
71

71
s;i

044252

027264
7270

7e74
76

001364

001352

7 001352 012054 3§:
85?337
37

4
1

001350
001352

RROR

5;12
0Ou737 Q47430
§7§g 857308
ES;SS§ 8834;5

ERROR

266

§gg

§;LROD,TOCYL

ROR

CMP
BEQ

TOCYL,LC
43 y

INC

FRCYL

geo
MP

4;
1

ING

026644

T.R2'T.B2'0

JSR
BR

TOCYL

PC,SWTST
15132

g;ga
6725
67
;

027310

045424

;gg

001352

000020

027316

013765

6734

027324

012737

737

2;§§ 85;332 98:153

0434934

000017

003322

7340

013737

001426

003360

740

5383 AFTER DRIVE CLEAR CMD

ERROR

iMSG Bl ERROR

;CYL ADDR IN RKMR2 NOT=RKDC

:LAST CYL DONE?
;5n IF YES

{ELSE DO ANOTHER
;BR IF YES

SEE *oIF uEx+
SW 14ngr
OR 8 IS SET
5-05
{RETURN
HERE IF SW 14 IS SET OR

‘

6S:

7310
737
; : 357314
?83034

:8 MSGS SPECIFIED HERE

:SW B WITH SWR <7:0> APPLY

67,

;EXPECTED MSG RO

CHECK MSGS R0,B0,A1,B1

004737
;

sgzg

;

2737

;:q

027364

104210

4737

2742 837392 ?84034

044140
100000

045424

67%:

ggnon

PC, SUBCLR
24’

;CERR AFTER SCRL

MOV

TOCYL,RKDC(RS)

;CYL®

MOV

ésnon
MOV

698:

151

750000, TEMP1

:D0

§5vSEEK nf?gn8 SEEKGET CONTR
MD. READY

JSR

PC.FATT2

eés

ggsnn,ucsx

ERROR

210

;CERR AFTER SEEK CMD.

PC, SUBCLR

;CERR AFTER SCLR

RROR

003322

¥SEEK, HCS1

PC,DOEMD

ganon

13%

24’

;FIND ATTN

:NO ATTN AFTER SEEK CMD

SEQ 0129

g,
‘e

é;%?fi?““"“‘","?g%g; (RO
s, P
im0
EBMBEMmE

PC, CHKM

efO!D.SPIN!D.DRD?&D.W%DE)D%E,E.M

JSR

_WORD

s;i

M)
0 B

g;g;

MACY1l 30A(10S2)
25-JAN-78
12:08 PAGE 129
T3l
SINGLE INCREMENT SEEKS TO LAST CYL

CZRBHED
UN

11
P 528 AN 78 12:00

MACY11 30A(10S2)
25-JAN-78
T3l
SINGLE INCRE

B
027412

000000

CZREHE.P11

g;gg

7-.83
7410

027416

re Bon

2759 ;333
g;go 357435

i
0001
000177

3
677

000

0
1000

151464

128:

151444

BEQ
DEC
BR

68$%
TOCYL
67%

JSR
ERROR

PC, SUBCLR
24

CLR
TST
BEQ
JMP

SESCAPE
LPFLG
708

9SLPERR

INC
BIT
ens
J

LPFLG
#SW9, ISWR
b
2

uI«f-

l'.PFLG

JMP

IMP

SEQ 0130

;BR_IF YES

;ELSE DO ANOTHER
;CERR AFTER SCLR

SLPADR

g«e
.

130S
000137

108:

sf' Sy

DRIVE
RECGROTT1ow
Ii%88"
RETORN-70
MATNCINEO

;¥ 346 3606 3600 3000 3036 303 0036 0000003 00360000 3600 3006 0000 00360000000 0 000000000 0600000000000 0600036 000606 600 6

TEST 32

RERD & SAVE BAD SECTOR INFO & TYPE PACK SERIAL #

THIS
VER S*Ng THRTSE
T
TH

bl
0 MASK FU

ACTORY

RT THIS

CONTAIN

SECTORE10-12"74° 16,18,
H
i ZSED§TE
QNNOT

" 4Se FOR RKO?)

22"R OR DATA CRROR PRINTOUTS.
CH xs WRITTEN BY

YAIN TofNTIcAL TAFO

¥H§RN
BE RERD.

CTOR_HARDWARE
OR 22 SECTOR S

RE ;Tflf
Rnggl NG THE BSE INFO
IS USED,

000004
12737
12706

THE PACK SERIAL # IS TYPED IN OCTAL & FOR THE FIRST PASS ONLY.

004737
104024

000001
001100

o4s424

001174

THIS IS THE FIRST TEST WHERE THE READ DATR CMD IS PERFORMED

llll!llgsgglllllllllllllllllllllliill!lllléllllllilll!llillilil

féraa.

TECTED FOR BARD
TWARE DETECTED

INDIC
ruxgnfs DONE SgNBST $sag£L&NES 8;PRSSEEIGNHENT PACK BY WRITING

L
A

027476

708:

“.t*‘*.‘l.*..t‘.‘..’

677

277“

68S:

HéNT seszncgo
LAST CyL

TOCYL,O0 ;LAST CYL_DONE?

CMP

0013s2

737

e
'
5724
794,
gre
e B
gEnude guse3?

;Eg

001352

N1O

MOV
MOV

#1,STIMES

os?Scx, SP

{ABSTO
'STK RE
PTR

JSR
ERROR

PC,SUBCLR
24

;CERR AFTER SCLR

EEReHE P11} 3nn-7alé:00
857350 B0S337 BB33ES
0_UNIBUS_RK

—————

MACY11l 30A(1052)
T3

@25-JAN-78

TEMP2

[

; SECTOR crn

MOV

TEMPY, RKBA(RS)

TEMP3

18:

PAGE 131

:0=22 SECTOR
i 1=22 SECTOR sorrunas

2H, TEMPY

:STORE

) TEMPS

; TRACK 2,

'RKDA(RS)

LC,RKDC(RS)
8RKWC(RS)

TA, HCS1
TCHD

STAT

H
D)
Eé

; CHE
22
nggs
ERES

s s

renpg

ggnp , 45

00000S

803576
001456
002312

§n§g

:MSG

.SSP) ,E

ifi‘?g 81
1

; EXPECTED Al

Al1,B1
c?giES'Hékg
AFTER READ DATA CMD

ERROR

;CERR AFTER SUBCLR

sREAD ALL S SECTORS?

ggnpa

003364

003366

igo cteo’ HSG Bl

snsc

PC, SUBCLR

o4s4a4

;EXPECTED MSG AO

03:5255

113

003
0033

;CERR AFTER READ DATA CMD

EXPE

112

SECTOR O

:NO_RDY AFTER READ DATA CMD
:GET FRESH STATUS

PC, CHKMSG

ow4es2

003424
003430

22 SECTOR HARDWARE BSE INFO

;00 COMMAND

o<oss?x-o.CART! b

TECTED TABL
TECTED TABL

;LAST CYL
;LORD WORD CT

#<¢0'D.SPIN!D.DRDY!D

003412

SEQ 0131

SECTOR INFO & TYPE PACK SERIAL #

CLR
CLR

003322

l2:

RERD & SAVE

%E%fi% i
os

b
bs

52858
|

gga

; CANT READ SECTORS 0,2,4,6,8

ggo

:CANT RERAD SECTORS 10,12, 14,16,18,20

TEMPY,RKBA(RS)

000004
003370
000006

0 READ 2 sscroas FROM LAST

BSERR

SET BSE FLAG

BSE22H+6

,TEST CARTRIDGE TYPE

Ighp , RKDA(RS)
38:

;R
sron; TABLE AD

I Tg PS

TST33

;GO TO NEXT TEST

é%%%fi%fi%fififi%%%fifi%fi%fi%%@%fififi§

CZRGHED UNIBUS RK
DR_PRT1
CZRBHE.P11
25-JAN-78 12:00

030014

MACY11 3?351052)":88-

001404
0014S6

003364
003364

000001

9s:

B2em
108

INC

TEMP3

MOV

027564

2&4‘9& ERRORFLAG. Vot

TEMF3, 81

#BSE22S, TEMPY

MOV
JMP

>
i
,RKDA(RS)

;STORE 22 SECTOR SOFTWARE BSE ADDR

i}
T
18

;TRACK 2, SECTOR 12

TST
BNE

;360 TO NEXT TST IF NOT 1’ST PRSS

;CONVERTDBL BIMY WORD TO OCTAL

108:

0oi216

ABAVE oAGSBcTORCINMGs TYPE PACK SERIAL ®

% 003366

Cll

; REPEAT -

; TYPE SERIAL
#

"llIlllliiIll!ll}lll&lll!ll!.ll'!lllllllllllilllll!lllllllllllll

,firssr 33
‘%

T
H

DETECT INNER LIMIT
nm r

Efi
33
m;s

g‘#

E:ZT“gg
5&: no:acsm
CYL.
ON THE LAST CYL

g
E"f“xgg’%“&A ’r'fBTNT CARTRIDGE

taT33;

gsops

: CESRERBBEB LY EES PR ER LU SR BB UL YRR LB R NS E LB BN BB LR R LB R SRR F R R LR RS
v

#1,STIMES

;

1 ITERATION

ou4s4a4

JSR

PC, SUBCLR

;

ggm 8 GET STATUS

3 33luel

‘fuc

bwtgm

;BYPRSS CHECKING FOR ANY CERR IN GSTATI

012706

784635

000001
001100

001174

ERROR
LR

003304

§*§§§§
004737

6""45?

012737

O43434

o44012
0S0340
001200

MOV

003412
003414

INC
MOV
MOV
MOV
JSR
RROR
ERROR

MOV
MOV

sstack, sP

r,axmuns)
CM1 DC(RS)
SEEK, HCS1

ooéno

rsmm

kesrons STK PTR

:CERR

AFTER

SCLR

:USED FOR VALID HALT
;PARITY 8 WORD O

SEEK CMD & GET CONTR READY

i TEST FOR ATTN
;
:NO

RDY FROM
SEEK WITH BRD PARITY
ARTTN
rnon
EK WITH BAD PARITY

o .DSC!D.SPIN'D.DRDY!D.VV!D.DRA> ,E.AD
#<D.FLT!D.PAR> ,E.BO

;EXPECTED RO

SEQ 0132

CZRGHED UNIBUS RK6 DR PRT1

CZRGME.P11

tzi,

25-JAN-78 12:00

81533;

6918

044252

MACY11l 30A(1052)

133

%vv

JSR

869340 003412

SEQ 0133

MSG

RROR

{39

MOV

8CLEAR, HCS1

181
§23

;

'iE%fifi: ER sssx WITH BAD PARITY

nsc 91 :aaon

o ABe

JSR

fRRor
ERroR

PC‘TSTRTN

R8 RB% VR YER"BRTUR BERR &°D
;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

MOV

<0!D.SPIN!D.DRDY!D.VV!D.DRA>

;TEST FOR ATTN

,E.AD

;EXPECTED MSG RO

H6Y eigosmx-o cnm-é
ExpeCies ot
B -;ggzzezgmsmm

;

044252

JSR

PC, CHK

MOV

LC,RKDC(RS)

JSR

PC.FLIM

t% 5?32"’ 000020

gfis? 003322

PAGE 133

uoéssoxeo.cmno.ooomo.mso.ssp»,:.m

éfi “8%

044012

750 0034
Gy es

D11l

12:08

DETECT INNER LIMIT

3353

8389,83 003322

012054

25-JAN-78

cr:cx

; EXPECTED A
o

RROF agégé&at%ECLEAR CMD

8SEEK §sx

B
15
108 SEEK 10,5 G5 SauTR ReRoY
?gx
ggc&g?g%(csunm ;

6905893 000000

ERROR

160

;r*no an%r ggrscr
:LIMIT DETECT

'NOT FOUND BEFORE TIMEOUT

—
Eas§ 030506
Sfié" 012737
127 031260 001176
003412 1S:

;o%avgsuggs o;°“?é"° AFTER LIMIT DETECT
gfa:gon %
MOVv 8208,
SESCAPE éP
MUSTN!'D.VV!D.DRA>
ESCAPE TO CYCLE
DRIVE 8 TEST
#<D.0SC!D.PIP!D
,E.AD UP ;EXPECTED
AD SWR

6971

CHECK

040000

003350

ggg
30530 8{5;% 30%38 3‘&%4
£970 330535 815737 33005? 3323

;

BIT

MOV
MOV

.UNLD, HMR2

3582%%'%3'5é'éox-o
CART!D.DOOR!D.BRHM!D.SSP> ,E.Al
o«g.u zs.mov ;
1B1,162,163,
164,
¢AFTER INNER LIMIT DETECT»> 0,0,0

0 WI&.IS Rl(

EIREE. Pll

o442s2

Ell

OETECT INWER LIATT oo o

SEQ 0134

; CHECK MESSAGE RO,BO,R1,B1

JSR

MACY11 3?2:(31052)

RROR

; MAY
1oy B 80 fe

RROR
RROR

&}Hg %é‘f gi? SET IN Bl

.LIMD,H.B1

003400

061235

PC, TSTATN

ow4012

OTPERHISE REPORT ERROR

001462

égscem

T
NW INNER
NORT

oYs424

PC, SUBCLR

Sl.BS
Ysg

?'
TEMP2
B FHOHM

00141
o4eMl2

gu?&

750

’

SCAPE
UNLD

,CLEM FLRG

l?FOUND BEFORE TIMEOUT

mr FOUND BEFORE TIMEOUT
W) E.AD

.SPOK!D.CMT'

;EXPECTED MSG RO

)ERI

; EXPECTED Al

EB
MSG gg
~SpEctPienD HERE

,CFECK

o442s2

TECT

T FOUND BEFORE TIMEOUT

.DSC!D.SPIN:D.

m CERR INéSTR

R
ME

AF
T _UP

i;‘.’&fi'fe

1416

;ALLOW CHECK

T END OF HEAD LOADING

RET STATUSCFAND MR2,MR3
I;REC

000026

001364

6u4S:
1

T i

101
101
1022
031024

7
7
104151
004737

00000
34

044012

H
T

;DRIVE®
;D0 DRIVE CLEflR CMD & GET CONTR RDY
;NO RDY AFTER DRIVE CLEAR CMD
TEST FOR ATTN

MACY11l 30A(10S2)
T33

ERROR

~t L) tatatatat

MOV

ot et o

#<0!D.SPIN!D.DRDY!D.VV!D.DRA>

:3.2,E..55
PC, CHKMSG
T.R2:T.82'0
sgg

MOV
JSR
.uogg
Enn

274

5&5

?g?ggTST

3 59

003322

012084

;MSG 8 rSS
CHECK MSGS
.s;:gg
.8
gg
;
iMSG Al

RROR

iMSG Bl ERROR
;?ES *5 EEx%“72§r° el
:RETURN HERE IF SW 14 IS SET OR
:SW B8 WITH su% <7:0> APPLY

;CYL#

K, HCS1

3EE§o¢no

PC, SUBCLR
24
SESCAPE
LPFLG

131

TEMP1

ATtz

RR,HCS1

10
PC, SUBCLR

GET CONTR READY
;D0 SEEK CMD &SEEK
CMD.
:NO RDY RFTER
;FIND ATTN

:NO ATTN AFTER SEEK CMD

;CERR AFTER SEEK CMD.

;CERR AFTER SCLR

TOCYL,LC

:LAST CYL

gs '’
oCYL

;EXPECTED MSG RO

:EXPECTED Al

CTED
MSG
crEg
MSG
E§
R0O,B0,A1,B1
;fitci?zso
HERE
ER DRIVE CLEAR CMD

TOCYL,RKDC(RS)

678

-0 §x

003360

: MSG

;CERR AFTER SCRL

gHgO me m
303 2% 3 Ao2ud 283
3
g 8
3

003322

PC,SUBCLR

,E.AD

MSG
0. BRHM!D.SSP> ,E.Al
¢ FOR
CTED'MSG BI

My
oum

000020

—e s

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

MOV

ERROR

154

-0
urr

BRBESS

66$

E.BO0
:E
#<D.SPOK!D.CART!D.
gth.ax
1.

RROR
ERROR

33333333938 o NN
N
AEFFEARA

%
.

003424
003430

PAGE 135

CLR
MOV
ggx

;
.

28 oL
Fzho

[

883428

12:

-JAN-78

DETECT INNER LIMIT

DONE?

zbnsér DOv&sANOTHER
:ELSE
:CERR AFTER SCLR

Bkoo
4

"I RO, il P 1
BEQ

JMP

OEERR

JSR

27
86-473;
gaqc541 003322
104121
BT MU oo
?83057

ERROR

24’

;CERR AFTER SCLR

JSR
ERROR
Gy
ERROR

pocmd
1l
.
ponggwR
9

;D0 START SPINDLE CMD & GET CONTR RDY
:RDY NOT FOUND AFTER ST SPIN CMD.
e,
e ST SPIN CMD.
:NO ATTN nnsn

001000

BIT
B

LPFLG

199 1476

BREREZ e
1

;% 031260
?

737

fi ?83033

83 93
fig 031300
;% BINE
83 314
71
21
318
71
71

g“

7182

031342

718?

;i 10

045424

03304
2 001410

1274

208:

MOV

147604

000137 030656

A4t

7114
7

1342

;{g Sgum ouuxg%? 000001 001174

PC, SUBCLR

osarsn HCS1

#SW9, ISWR
129

;L 2':' ERROR?
.vz; gomxr DRIVE

iRE

0 MAINLINE

63}36 ris‘r:FORMA
.émr:u'fiENT n: PACK IN 22 SECTOR FORMAT BY

10 saa 1456
R
F

MOV

naé 031352 012706 001100

MOV

;ies

?\Erps

1364 1

001342

1 056321

;i 7

83{3;“0

001460

;i%

1317:3

mtmg

oawis

68"0}37

)

TR nx e 7) u THeWRITE HEADER CMDS (ALL TRACKS).
T

*s#5:llllg&l’glll‘llllllllll"llllllllllllllllIllllliliiill!ll!llll

712

;i%

9 WA
BNk«

3‘Illlll!illllll;%#l;&?l!l&lllll!lill!ill!!lll!lllllllllllil

;{{S

;ig gi?

70$

7111

;{ i;

sto o1

22%:

#1,STIMES
#STACK, SP

;;00 1 ITERATION
.acsrons STK P

TSE

ggg'rsr

;

; 5

flnenn

;CHECK IF FOUND LIMIT DETECT ERROR

Egon

128',

rnm. ERROR

,MSG20

SEE } MODULE resnuc

:RUNNING MODIFIED VERSION OF TEST
.

{m %fig; 331455

18:

igg

égzm

cnscx F rgfmo 352 INFO OK

;ig
1420
0O4737
045424
;ige 831459 muogza

JSR
egnon

PC, SUBCLR
24’

:CERR AFTER SCLR

;i 33

7139

031426

104401

0S6021

;

gggon

TYPE

,MSG12

:FORMAT TEST BYPASSED-BSE ERROR

:FORMATTING PACK, PLERSE WAIT

¢
0_UNIBUS_RK
PRT
P11
ESREVE”
25-3aN-78
18:00

MACY11

FORMAT PACK
BE(10S2)_25-JAN-78

7140

;i:_é, 031432 00S037 0013S2

;iw
7148

Y
7143
712t

831

737

831482 Bis7ee
83t
899%ec

;ig 031512
7

]

3
Y

7o 803882 % :
001438 00000s

:I; 36

:} 28 i 50 1 056235

100000

7
)3 E;g
;igg i 2
7170

1574

;Jg
7]

031614
1

00S237

001430

7
4
'-i'uoaa T
737

00S037
7

v
BT

046

Jgg

U31

D31

003322

;i 3 i§23 oomg'f 042662
71

. S

001436

7183
71

;!
7187

031640
8312

6?“62

031646

004737

164

7195

1570
2737
167
737

1?08 815725

DATCMD
GSTAT

RROR
'f.vps

INC
CMP
BEQ

HEAD

3s:

001100
04SY4

033352 001176
3056
76

G18

$e0P

HERD, #3
118 '

FHDTAB

FORMAT
#1.CALDIF

RS
¥

;{g 031652 xouogw
”
3ig igg @‘gz o
;fq e
7194

HERD'
o<mao>,ucsx
ncgm HCS1

CLR
MOV

1360

ALADD

JMP

18%:

1366 836628 133:

SCOP1

PRAGE 137

: TABL
{HEAD 0,1 8 2

;DO %m XFER CMD & $r CONTR RDY

:CERR AFTER WRIT

;nsonnuc BALANC 5‘5"9& rgMD

’

ABORT DRIVE

:BR IF ALL HERDS DONE
:FHDTAB ROUTINE
:SETUP

- CYL 1 TO 410 HERE
55798? QSannnc

¥STACK, SP

:RESTORE STK PTR

ERROR
I

JSR

24’

PC, SUBCLR

;CERR AFTER SCLR
:SEE
IF MODULE TESTING
PBRCIF NO

MOV

nbaaxocmsm :CYL ®

SSV
MOV

:‘x;gs, SESCAPE
uos

Femw

;&
Y AFTER WRITE
iGET FRESH STATUS

MOV

TST

SEQ 0137

;SETUP

TRB, RK
) ;THI
aRRIRB,RKRORES’
i0HTRoBECTION
R nesan IR ERP
T PIOGNS

fire
7 53 LR Begy Bs O

7188

Pc.ruoma

045074

;i 53

712;

JSR

5 OR
SR -

%37 043472 ———

TOCYL

SWAB
MOV

:% 1%
031
D31

CLR
MOV

001430
000027

71
71

12:08

0 wmus RKE_DR_PRT

M P11
ne;

71
;x
?

B;
7

;

72l

7el
7el

D317

MACY1l

D014
DO1Y

000006

0014

0317
D31
D317,

(10582)

393..

003322

Bie Y s
143 003412

-3:
031
D31
1
I

1;33

1779

37
7

o44252

;gi

%15

MOV

; xg
7

1
104208
37,
14 5

001362

000001

7
7

001342
ys:
033372 001176
3076

001176

1
1 216

—

20%:

;s
7
;

83533; 8,5;3; Sg-mn 003353 218:
?
"
4
?’ e manaas

;

658

7
7
;
7

3-40ég 003412

;s:o

13 1091
144
1
1041

o442s2

154

001362

77 é
7
7

7
;S??

122
321

127

14 3;
1041

HCS1

#<D.FWD!D.SPOK!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

#1,E.Bl

58'4

;

T.R2'7.82'0

RROR
E

20s

CMP
BEQ

CYLDIF,
sl
49

ERROR

206

212

goorsr
o?’s.ssscms

MOV
J
?agon

eggb smx
PC,FATT2
gc s e

BR
MOV

Q
RROR

218
@

:
RROR
iMSG Al ERRCR

ciFIED HERE

ING SEEK CMD

:MSG Bl ERROR

;gg
MOV

65§
210

;CYL DIFF INCORRECT DURING SEEK

;gsslgrNgoom.e TESTING
1

:SETUP TIMEOUT
;FIND
A
:NO mm nrrsn SEEK CMD
;CERR AFTER SEEK CMD

ggx

ugoosc'D.SPIN'D.E%sgsw.g.uw
,E.AD

gox

MOV

003424

ooaugo

;HERD #

jCHECK MSGS A0,B0,A1,81

00341

ooaes

no,axonmm

PC, CHKMSG

ERROR

SEQ 013

JSR

;

10421

SWAB

12:08 PAGE 138

B,
050"
po scecom
s ey contm eeor
gex
ugopxp-o.SPIN!D.VV!D.DRA> ,E.RD ;EXPECTED RO

104206

7el
72l

-JAN-78

roSrsqa{ PACK

MOV
SWAB
MOV

]

; }..

;
7e

AN-7815:00

I11

uo SPOK!D. cmr-b

;EXPECTED MSG AO

.B1

c so nsc Bl

#3.E.B3

MSG B3

#2,E.B2

cr D MSG B2

PC, CHKMSG
Jsfigg
ERRRROR T.A2'T.B2'0
133
1

EgbscgfsoK Cnsne
g
nsc
ERROR

BEQ
ERROR

évLoxr

668
137

;EXPECTED Al

-cr:cx MSGS

;CYL DIFF NOT CLERRED AFTER SEEK CMD

MACY11 30A(10S2)
T34

032164

25-JAN-78

FORMAT PACK

12:08

PAGE 139

P ‘rsmm

:TEST FOR ATTN

ERROR

154

;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD

003412

28;

e<oso.snmo.onovéo.wgr§bm>,s.no

003416
003420

gsx

gxhs.m

MOV
JSR
_WORD
RROR

#3.E.B3
PC, CHKMSG
T.R2!'T.B2!0
7g

CTED MSG B3
; CHECK MSGS RO,B0,Al a*
-Ws fictr ED HERE
gg % E
AFTER DRIVE CLEAR CMD

cns

gvt.noo,cnmoo

ERROR

;CYL ADDR IN RKMR2 NOT=RKDC

MOV
JSR

SCOP1

#STACK, SP
PC, SUBCLR

;RESTORE STK PTR

;CERR AFTER SCLR

EEEB

gsf'no"fne

;FILL HERDER TABLE

Pc' oa' §cno'

67S:

003424
003430

MOV

RROR
RROR

001364

001366

001100
ousua24

ERROR

1
14

Ros
7

PSR
056235

#CCLR,RFCS1(RS)

SUNIT.RKCS2(RS) ;DRIVES
8CLEAR, HCS1
¢
#D
;D0 DRIVE CLEAR CMD & GET CONTR RDY
si
:NO RDY AFTER DRIVE CLEAR CMD

gasn

oY4012

—

MOV
MOV
JSR
ERROR

§§3fl3fl

b
S

MOV

10?0%%

nwn
==

66S:

V\l\l\lgfl\l\l\lfl
PR

EEReHE P11 o %28 FaR-78 12:00

003322

MOV
MOV
MOV
MOV

?ga

oisespomo.cmnb.

og.s.ae
594

AD>

;ob

B
201

ERROR
TYPE

' .aamme .SSP> ,E.Al

é? FOR

::MSG
MSG }f?on
ID FOR

CTED'MSG BI

s EXPECTED Al

CTED MSG B2

1 2¢
ERROR
% R1
Bl Ennon

'fl?,nxoam)
;SET TRACK #
AB, RKBA(RS) ;
R WORD TABLE
RKWC (RS) 25‘638%1
:'25
CALADD, RKDC(RS) ;CYL #

ERROR
gin

;EXPECTED MSG RO

C,GSTAT

,M5G18

,HCS1

CONTR RDY
XFER CMD & GET
;D0 DATAARFTER
WRITE HEADER
:NO

RDY

iGET FRESH STATUS

;CERR AFTER WRITE HERDER CMD
‘ABORTING BALANCE OF TESTS

o UNIBUS RK6 DR PRTI

P11l
25-JAN-78 12:00
fi w 000137 042662

MACY1l 30A(10S52)

T34
-~

25-JAN-78

FORMAT PACK
IMP
SEOP

003412

MOV

731
7314

16
3420

MOV
MOV

731

2318
; iz
;

737

7321
7

1042
104267

104

;324

7327
7328

7329

PAGE 140

SEQ 0140

;ABORT DRIVE

731

7332525

12: 08

044252

104270
032534
032540

032542

005737
001402

000137

001342

033116

42y
333430

#<0'D.SPIN!D.DRDY!D.VV!D.DRA> ,E.RD

CLR

G50
MOV

ta
'SESS

1
;F‘éfi

JSR

.SPOK!D.CART!D.
81.E.B1
;

MSG

'0.BRHM!D.
FOR

Egon

SSP> ,E.Al
CTED'MSG BI

ERROR
RROR

:Hgg E

ERROR

270

1 MSG ax ERROR

ST
BEQ

MODTST
23%

:SEE_IF MODULE TESTING
:BR_IF NO

JIMP

300

14§

; MSG no tnn

RROR

sEXPECTED Al

58 :3.2 55

PC
Agr.«

RROR

; CHECK nscsg?fi

;EXPECTED MSG RO

gREuax E u:nosn CMD

‘ELSE RESTORE HEADERS ONLY

001430

000003

6S:

000137

LAST CYL

AST CYL HERD 2

AD, #3

HERD
CALADD

-t
33

STOP

KEEP FORMATTING
FOR FUTURE FORMATTING

52L¥°¥H8KCPU

CALADD
FRCYL

013765

000020

2;37

003322

1 lgi

69S:

o4su424

g%
Sa5

0013s2

o4su424

146076

;CERR AFTER SCRL

TOCYL ,RKDC(RS)

;CYLS

#SEEK, HCS1

003360

718:

LEAR e

;FIND ATTN

IC§RR,H051
71
210

;CERR AFTER SEEK CMD.

PC, SUBCLR
a4

;CERR AFTER SCLR

TOCYL,0
708
TICYL
698

000000

;BR_IF YES
;ELSE DO ANOTHER

;CERR AFTER SCLR

SESCAPE
LPFLG
JMP

72$

JSLPERR

;NO ATTN AFTER SEEK CMD

;LAST CYL_DONE?

PC,SUBCLR
a4

70$:

B ST PP
RR
’

132

0013s2

e
ST TS

PC,SUBCLR
e4

fifooém

003322

1402
000177

BADHDR

YTT

HPEND

24s:

ERLRDD,LC

BNE
JMP

033016

1 216

- ..--,.._-

gre

SEQ 0141

HERD
HERD, 82

012084

INC
CcMP

PAGE 141

nNnMoO

001366

238:

2 PR
P MDD

000137

000002

12:08

2
(=]

001430
001430

EEI i

sRegTirananRaRdddddiddarats

NNNNNNNNNNNNVNNNNNNNNNNNNNNNNNNNNNY

7 330
7 33
7
7

BUS2E55aR"78 12:00

MACY11 30A(1052) OSS-{RN-?B
PACK
FORMAT

EERENE

0_UNI
.P11

;SW 9 WAS SET.

CZREHED UNIBUS RKE DR PRT1
CZREHE.P11
25-JAN-78 12:00

;§§2

033012

000177

7
7389

033016

004737

ggag

033022

33026

146070

728:

JMP

0S0006

78:

JSR

000137

032640

004737

047430

000S6?7

MACY11l 30A(10S2)
25-JAN-78
FORMAT PACK
T34

0177
303177
148838

FRIIJJIIIIL
RIREIEZEXIRIRIIRT
(=] LR
I CHDD O £ o
N

001410

B B
fa o
032016
110
112

895532 8813

0012
0001

8%‘3’2’

: %1

146050

128:

1438 000003

& GE
i

012737
131

032322

15%:

700

737

9 WAoa asuhs
T SET
EguW ?q

I??
§g§

%Pzgcasua
ei
4 ’

ERR TiON
? nxvs
g’
fin nnqu

é"?

LPFLG

INC

SEP

nfgo.oa

1L00P O ENOITION DRIVE
;RETURN TO MAINLINE

; SEE ;rALL HE

uET

L BRalOr R RO 105

CLR

RKDA(RS)

TO C
?5EKnscouov513u
05§32 HERDERS

#SEEK,HCS1

001426

003360

MoV

003322

17
BEQ

003322

B3 s SWR

IF SW 14 IS SET OR
RE
uxrn SWR ¢<7:0> APPLY

W
MOV

001674
000025
043472

;SEE IF unLT NDING

g
LPERR
DR
3§LP

003322

03“

ZRRoR qglooéno

748:

7440 gg32§§ Oi 737
744

PC, HPEN

;SW 14 OR 8 WAS SET

G
Bfig
MP

000017
043434

4
19
03321

148:

SLPADR

SEQ d142

iEE%‘ ofES & EXIT
:
xu on 8 IS SET
5

BAE
JMP

146030

032322

108:

38 605057 887928

013737
0047

7439

73%:

PAGE 142

248
PC,SWTST
1st3s

goepsr GBI
005237

P
JSR
BR

MLl1

12:08

TS0000, TEMP1

03 RV AFTER SEEKCRD.T AOY

JSR
RROR

PC,.FATT2
136

;FIND
A
iNO RTTN nrrzn SEEK CMD

ERROR

210

;CERR AFTER SEEK CMD.

PC, SUBCLR

;CERR AFTER SCLR °

ignon
MOV

MOV

JSR

8CERR, HCS1
7498

#RHTAB, RO

u<noH£Ao> HCS1

PC,DAT

;D0 DATA XFER CMD & GET CONTR RDY

czasneo UNIBUS RK& DR PRT1
CZREHE.P11
25-JAN-78 12:00
7494

7
;33

ig
osse
2}
23

794

000024

794
7944

MACY11 30A(1052) 25-JAN-78 12:08 PAGE 143
T34
FORMAT PACK
171

;NO RDY AFTER RERD HEADER CMD

TR
JMP

ldie
$e0P

S eeIAfEe
:ABORT DRIVE

MOV

RKDB(RS),(RO)+

;1’'ST WORD FROM SILO TO RHTAB

000024

MOV

RKDB(RS), (RO)+ ;2’ND WORD
RKDB(RS)
. (RO)+

;3’'RD WORD

#DLT,RKCS2(RS)
778 '

100000

BIT
BEQ

768:

7w§oq 15 000024
;Jgu
7458

S 100000 000010
§§§30§

BIT
BEQ

7457
74

10
1

104173
683"3*

ERROR
TYPE

;35

;3g§

737

045074

266,

3737 001674 001352

33340

000137

032640

7470
7471
747

033344
033350

004737
000420

047430

7475

74
74

7478

33?5 005237 001410
3356
3364

D3336e

032777
1264

000137

001000

032016

168
145554

74§3
74
8333

?
8223?7 "100 145534

;:ga

000137

033404

033406

001254

;335
033412
248

$e0P

;DLT AFTER READ HEADER CMD
naonrxnc BALANCE OF TESTS

CMP

RHTAB, TOCYL

.cuccx uono 0 (CYL®) ONLY

ERROR

310

{READ

PC, HPEN

; SEE xr uaLT PENDING

JSR

’

;ABORT DRIVE

75%

CYL WORD HERDER ERROR

248

.ggs

JSR
BR

PC,SWTST?
1st3s
f

:ses F su %q
on e IS SET
"2
0
NEX ;
;
RETURN
SW 14 IS SET OR

INC

BIT
BNE

LPFLG__°

RE I¢

;SW 8 WITH

m <7:0> APPLY

#5W9, ISWR
158

; LOOP ou
RROR
i YES,
REC NDITION!DRIVE

IN
ax?

LPFLG
osuk,asun

;LOOP ON ERROR?

JMP

iRETORN TO MAINLIN

JMP

BNE

032322

PC,GSTAT

173
MSG18

BEQ

758:

7&29 8?3339 004737 0S0006

n;g

;3;3

778:

1401

104310

JSR

s ow

15§

RETURN TO MAINLINE

:YES,

RECONDITION DRIVE

138:

2489
7490

H lllllllllllllllll!lllllll!llllllIlllllllllll!llllllllllllllllll

7493

;»

;335

;:gg

7496

7497

;:
033412

000004

DECREMENT FROM LAST CYL TO O & READ HEADERS

THIS TEST V nxréflé MOTION xn THE NEGATIVE DIRECTION BY

SINGLE CYL

INCREMENTAL SEEK

o 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 36 36 36 36 36 36 36 36 3 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 3 36 3 3 3 3 % % % ¥

t&t3s:

ScoPE

7456

#CERR, HCS1
76$

;: 1

ERROR

003322

4
-

c
c

0_UNIBUS_RKi
.P11
25~

MACY11l 30A(10S2)

RN-?Blé:00

T35

.—.‘b.-g
s e e

NN
£ W

ARG

18:

JSR

o4s4a4

17
434

Hhhhg 5

SRepRs

140

104212

7543

i3
:g

243
10421

7523

3654 012737

7Bl o B
7883

o44ese

723

033674

012737

000001

000002
045074

000026

034450
004704

001176
003360

044140
003322
B4S:

050340
003314
0017
000001

003412
003416
003420

144

81,STIMES
sStack, SP

s$
MSG21
138
LC rang
LCh1, TOCYL

;2001 ITERATION
;RESTORE STK PTR
:FORMATTI
N
iSEE
IF
n
ggu.é
*5 5?:«:
:BR_IF NO
iBYP TESTS 36,40,41
;FROM CYL
170 CYL

#STACK, SP

;RESTORE STK PTR

fiflfi?%?

PC, SUBCLR

;CERR AFTER SCLR

MOV
MOV

cs SESCAPE
OCYL,RKDC(RS)

;CYL #

?8.‘4
ZRROR

'55556%51

8 GET comn READY
oo EK
&‘ AFTER SEEK&

gex

s .PIP!D.SPINID’ W' DRA> ,E.AD EXPECTED AO

mnovv

uo.nsveo.spomo.cmno.oooneo.meo.ssm,s.m

JSR

cuxnsc

. WO
RROR
RROR
ERROR
CMP
BEQ
MOV
JSR
@2$:

axa

ERROR

ERR

001362

100000

SCOP1

MOV

001100

12:

occm»:rsm’?non ngT
CYL 'r 0 & READ HERDERS

MOV
MOV
TYPE
15T
BEQ
TYPE
JMP
MOV
MOV

- 001174

034430
0013%e2

s bme b

—

’“32 33 BiF 867768

25-JAN-

gg"

T.B2

; CHECK nscs

$MS
nsc ao
1MSG Al
iMSG Bl

Al1,B1

NG SEEK CMD
nua

SECIFIED HERE

RROR
ERROR

;SELECT WD 2

ERROR

CYLDIF, #1
2
82, RKMR1 (RS)
PC.GSTA

212

;CYL DIFF INCORRECT DURING SEEK

MOV
MOV
JSR
ERROR
BIT
BEQ

1 2%, SESCAPE
#2500, , TEMP1
PC,FATT2
1
#CERR, HCS 1
213

;SETUP TIMEOUT
;FIND ATTN
INO ATTN AFTER SEEK CMD
;CERR AFTER SEEK CMD

ERROR

210

EE%

e<goosc-o.SPIN!D. oaov-o w!ID.
ong»,E.ARD

MOV
MOV

;EXPECTED MSG RO

#<D.SPOK!D.
cnm-b
ooon
5
BRHM!D.SSP> ,E.A
#1,E.Bl
:MSG ID FOR EXPECTED MSG 31

sEXPECTED Al

g @mg

EERereP11 " 2" AN 78 12:00

MACY11 30A(1052)

003422

00S037

L 8157’33 855553 M

JSR

PC, CHKMSG
T.A2!T.82!0

cr:cxnscsnoaomax
EW CiEJED

132

66S:

001352

001176

000020

154

;CYL DIFF NOT CLEARED AFTER SEEK CMD

10
IR W
SLERLETR £ 05t Eam
"gs'rmrofl'

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

'D.SPIN!D.DRDY!D.VV!D.DRA> ,E.ROD

;EXPECTED MSG RO

,E. nx
spox-ocmr-bwgs&?gme .gm

Ebh

cng

c;moo.rocn.

MOV

SCOP1

#STACK, SP

JSR

PC, SUBCLR

CLR

SESCAPE

MOV

TOCYL,RKDC(RS)

ERROR

HERE

#CCLR,RKCS1(RS)

gRR

‘F.‘é& IB FOR E&E%EB Hag

%&?fim&;DRIVES

'§ E 83

ESsoa
38:

o4s4a4

133

MoV
JSR

001100

2v|.oxr

g.gz

3424
34

001352

ERROR

Enaon

gex

003412

001364

ek
B8

{Son “‘TSTRTN
151
;2“

o012

g| ol el gl

88328

E.A2

MOV

608842

SEQ 0145

CLR

gIRA

ocficrg%’?L!r CYL
76"3 8 READ HEADERS

nov

1
-

Cle

ihea 1B FOR

; CHECK

;EXPECTED Al

EXPECTED mec ES

?‘Efimfis%.%se £ o0

M
RROR
F
1
ERROR
iMSG Bl ERROR

;CYL ADDR IN RKMR3 NOT = RKDC
;RESTORE STK PTR
;CERR AFTER SCLR
;CYL #

MACY11 30A(10S2)
T3S

OVONCNLEW

I5
DR5
5

CZRBEHED UNIBUS RK6 DR PRTI
CZREHE.P11
25-JAN-78 12:00

25-JAN-78

Dle

12:08

PRAGE 146

DECREMENT FROM LAST CYL TO J & RERD HEARDERS

HOV
£ARToR

003322

;D0
;NO

003322

DATA XFER C
YORFTER
READ

MEROER CMD "

800 SAERE S SR O

0001

,é'sr 5323 FROM SILO TO RHTAB

g1gesg

:3'RD WORD

016520

#DLT,RKCS2(RS)

000010

GSTAT

69S:

001674

0013s2
678:

$eoP

RHTAB, TOCYL
678
310
FRCYL
4ys
TOCYL

001350
0013s2
033464

4s:

047430

PC,SWTST

15136

;

Eag?unu

x%uTogTa IS SET

RE xF SW 14 xs ssr OR

1S B8 WITH SWR <7:0>

RpiA

6%:

7664
7665

o4suH24

013765

001352

000020

73 6R8%50

003322

001426
044140

003360

100000

003322

104131

708:

PC, SUBCLR
4

;CERR AFTER SCRL

TOCYL ,RKDC(RS)

;CYLS

32‘8&“ -

;00 SEEK CMD 8 GET CONTR READY

TEHPI

PC Ffl

OCERR HCS1

iNO RDY AFTER SEEK CMD.

;FIND _ATTN
;NO ATTN AFTER SEEK CMD

SEQ 0146

DR_PRT

25-JAN-78 12:00
C%E.Pll
7667 0332
104
0_UNIBUS_RKE

MACY11 3?3'-(;1052)

72%:
001352

012054

718:

DO141

738:

144464
144456

W
N

—

034106

72%
2IC

é&%oa

24’

PC, SUBCLR

;CERR AFTER SCLR

CMP

TOCYL,LC

;LAST CYL

ngvL

:ELSE

108:

128:

JSR

ERROR

PC, SUBCLR

DONE?

DO ANOTHER

:CERR AFTER SCLR

e
T
i
IMP
BSL;SDR
APE

INC

LPFLG

INC

LPFLG

BIT
BNE

144456

1BR sér

BrE
JMP

144476

;CERR AFTER SEEK CMD.

718

0C 11

88100

BEQ
ERROR

33°

oYs424

1410
1000

DECRENENT PROMLAGT CYL-T0
'3 & READ HEADERS

BEQ

0013s2

8838

ggg i m*g“" g

Ele

9 Was SET
;gfl 14 OR 8 WAS SET

1LO0P N ENDITION DRIVE
iRETURN $o HRINLINER

niue.asua
3

JMP

;L
;Y

iRETURN

?
TION DRIVE

TO MAINLINE

138:

33 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 3 36 36 3 36 36 36 3 36 36 36 3 36 36 3 3 3¢ 3 36 36 36 36 38 36 36 3 36 36 36 3 3% 3 3 3 3 3 3% 3 % ¥

;firesr 36
x

THIS

MAJOR CYLS ARE: 1

DO NN
E W

3§332‘.3332‘.33

TEST ssgxs FROM c;% 0 TO ALL THE MAJOR CYLS 8 READS HERDERS.

THEN SEEKS

Sy
e

(DECIgRL)

2o F BRI

$8136:

SCOPE

1 (OCTR%)
9

180

128

200

1000 (RKD?)

000004

RERDS HERDERS.

G
4
034470

CYL O 8

[

—

SEEK FROM CYL O TO ALL MARJOR CYLS 8 READ HERDERS

400

U006 060606336263 3 3 36 36 36 36 36 36 36 36 36 36 36 3 3 36 36 3% 3 3 36 36 36 36 3 36 3 3 3 % % %

SEQ 0147

0_UNIBUS_RK

3333 333333333333

SERZEREIBNRRECR7

P11

DR_PRT

25-JAN-78 12:00

83408 8178 831066
834ET2 81373 81887
M

30A(1062)

Fle

SEER FROM CvL 0 70 ALLRAJOR
CYLS 8 READ WEADERS

001174

MOV
MOV

001350
0013Se

MOV
MOV

FCP1, TOéYL

;SETUP FROM CYL

#STACK, SP

;RESTORE STK PTR

PC, SUBCLR
24

:CERR AFTER SCLR

Efiggt’fgfipa
TEMP3, &

013765

TOCYL,RKDC(RS)

;GO TO CYL #»

gt MD

% %EKé’?flSEET
CONTR RERDY

003412

1
1

083448

18:

001100

g% 9840 ousH24

GeriEs

yCALDIF
HCS1

SEQ 0148

ARAR

FC,FRC

;SETUP TO CYL

i 2%, DIFF

;ERROR PRINTOUT

.PIP!D.SPIN!D.VV!D.DRA> ,E.AD EXPECTED RO

s s

" tFlvaD'lI).SPOK!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

ST
§§

"ngasg
IO o
g
ING SEEK sese
CMD

145000, TERPT

;sETUP TImeOUT

NRR
WH
Jdnz

SRR LR L

o P

Re R

MACY11

8{3333 8142& T
O44140
100000

l& RR,HCS1

003322
£4%:

127
004737
000003

FATT2

;FIND

iNO

ATT

ATTN N’TER SEEK CMD

;CERR AFTER SEEK CMD

003412

ND DSC!D.SPIN!D%%W&W),E.AD

883428

's“iPRyEfis*sss 8

883450

SPOK'D CART!D

1Aa-r
B2'0

;EXPECTED MSG RO

S?P,E.Al
ED'MSG B1

ufiu(mmsnoaonx

MSGS sficctrxso HERE

;EXPECTED Al

¢-

0 wmus RK6

DR PRT1
25-3:«
78 12:00

P11

;;g1

779

7783

035004

;;

035010

035006

001401

03504

% w

T36

001362

R
?

100000

534 ov4012

000000

104154

go3uie

60%15

7833

035222

:CYL DIFF NOT CLEARED AFTER SEEK CMD

nox

SCCLR,
nxcs‘_x_z %)

AE TSTATN

"251FOR5

ERROR

154

sATTN NOT CLERRED AFTER DRIVE CLEAR CMD

664

£<oeo.SPIN'D.onovéo.VV!D.DRRA> ,E.RO

MP
OR

SCOP1

YLADD, TOCYL
7

g%@gfi
3
crsg
MSG aa

‘:":§§ g fiE T oni¥ e oo

;
iMSG Bl ERROR

:CYL ADDR IN RKMR3 NOT=RKDC

MOV

#STACK, SP

:RESTORE STK PTR

737

04S424

Ensgon

PC, SUBCLR

;CERR AFTER SCLR

CLR
MOV

$SESCAPE

"03

:'3’.4‘“%89 HCS1

BEQ

68%

723
G
BoME
DiNR2
7832 035214 6 535 100000 003322
00IN40S

24’

;EXPECTED Al

Al1,B
C Efings'gk:
irte

001100

15;%2 %n 003322

;EXPECTED MSG RO

:igzs:?x D. cnm-b 6'888 afiEZs2EAL

g
RR
K
ERROR
266

38:

1
37 001176
8%122
81“375055
001352 000020

;fi

12706

7 é 832150 ?3:0&

137

65$

¢ 5,
MOV
#3,E.B3
JSR
CHKMSG
_WORD PC,
T.A2'T.B2'0

15 D3S134 fiifi; 001364 001352
4 iz ]
154

:gg
Al Eanon

ERROR

0
1
Gkise
1
G
773{1 035132 104266
7

x;_‘;

énoxr

gox

12737 000003 e
003430
0351
12
% o44252

:gg & Ennon AFTER SEEK CMD

BSor M
EICU T b0 DIV SLERLLCTD § G57 GRS PO

000401

il
%
11

7 1

i 3

658:

@ 03506 m

1
1

SEQ

012737 oxo:ng 003412

17
7 13

25-JAN-78
PAGE
SEEK
FROM CYL O TO ALL
m§on149 CYLS & RERD HERDERS

Emgg

104137

7788 ossoxg 012765

7794

MACY11 30A(1052)

Gle

12: 08

TOCYL,RKDC(RS) ;CYL #

TR
ReiBATcR'"
! 00 pata are onp s cercons oY
17
#CERR, HCS1

014
e

[

—Ee)

QE3ug

8
[

b e e

888
§

104174
104401
000

D@
2

CZREHED UNIBUS RKE DR PRTI
25-JAN-78 12:00
CZREHE. P11

12: 08 PRGE 1 SO
MACY11 30A(10S2)
25-JAN-78
T36
SEEK FROM CYL O TO ALL MAJOR CYLS & READ HEARDERS

ERROR
TYPE

056235
042662

JMP
68%:

80004
000024
100000

001674

678:
SCOP1

001100

JSR
ERROR

NNNNNNY

;2’'ND WORD
;3’RD WORD

BR505

003322

888-%"9

003412

003416
003420

o442s2

044140
003322

:ABORT DRIVE
;é'sr WORD FROM SILO TO RHMTAB

;OLT nr'rsn REARD Hsnosn CMD

MSG18
$e0P

:ABORTING BALANCE
OF TESTS
:ABORT DRIVE

RHTAB, TOCYL
67%

;CHECK WORD O (CYL®) ONLY
;% n&‘ SAME

CYL WORD HERDER ERROR

310

;

#STACK, SP

;RESTORE STK PTR

PC SUBCLR

;CERR AFTER SCLR

PR
R sperum

fiode?

28
gEesRsas
23NSOPSL L

ous4a4

100000

RKDB(RS),
(RO)+
RKDG(RS)
) (RO)+

$§eoP
RK cg:,mon

'93GSTAT

056235
o42e62

;CERR AFTER READ HEADER CMD
:ABORT BALANCE OF TESTS

oou RKCS2(RS)

000010

04S074

174
MSG18

MoV

ZRROR

f§f§o¢=8

o o e courine

38 ESEKRSHBR‘SEET SONTR RERDY

PIP!D.SPIN!D.VV!D

E.ARD ;EXPECTED RO

l(D.RSV.D.SPOK!D.CRRT!D.DOOR!O.BRHH!D.SSP),E.Rl

MOV

81,E.Bl

JSR
. WORD

Pchsmnsc

; CHECK MSGS RO,B0,Al g

206

MSG Bl ERROR

T.R2'7.82'0

MOV
MOV

o 6%, SESCAPE

ERROR

PC,FATT

TEMPI

8CERR,HCS1

708

8 MSGS SPECIFIED HERE
ouamc SEEK CMD
? E

;SETUP
iF

ERR

TIMEOUT
ATTN

;Ns"grm AFTER SEEK CMD

SEQ 01%0

790
? 0

MOV

8CCLR, RKCS1(RS)

:CYL DIFF NOT CLERRED AFTER SEEK CMD

704
gnz
8‘51433
714

71:

035716

;&g 035720

012706

154

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD

883428
883450

HOV
ROV

JSR
Ean

RROR

001364

001100

001350

5$:

nxngg

cnzcx nscs RO
,:gg

274

iMSG Al E

ERROR
CMP

266
CYLADD, FRCYL

ERROR

243

BEQ

SCOP1

MOV

Hov

ERROR

104243
10441S

RROR

003412

mug

104
023737

Y #
rzsr FOR ATT

gf'g
*?

ov4252

’

PC, DOCAD
|
e TSTATN

.
g40

0 .oogg vsrg

J
goa
Ezn

*—'ré

OM34M
044012

1041

mé
7943

153

3;5

; ?

000000

222

! 737

T.A2!T. B2!
1§
135
évn.oxr

VEYS SR

i1,

;EXPECTED Al

718:

g%b
HSG o1

crccx
%c ?

.muogg
Emon
RROR
?s"r"o"
ESSOR

l#fl%'o

;EXPECTED MSG RO

EEE1ED M38 BS

SPOK'D CART!
e

1 "1'9

s OR’

0O4M252

.DSC!D.SPIN!D.%
W .DRA> ,E.AD

28 =

—

737

0000
1041
1041
: 39 001362

SEQ 0181

CYLS & READ HERDERS

;CERR AFTER SEEK CMD

JSR

83428

210

003412

ERROR

208

25-JAN-78 12:08 PAGE 1S5
SEEK FROM CYL O TO ALL MAJOR

o m&ng’ss

(1052)

MACY11

104210

iiren §§

0_UNIBUS_RKE DR PRTé
Pll
25-JAN-78 12:00

¥STACK, SP

:MSG Bl

8 GET CONTR RDY
CLEAR
CMD

. RO

;EXPECTED MSG RO

2?20 55218

;EXPECTED Al

ETED
MaS B3
m
on

s, eicLsm CMD

ERROR

;CYL ADDR IN RKMR3 NOT=RKDC
3

:RESTORE STK PTR

MACY11 30A(10S2)
T36

0_UNIBUS_RKE DR
.P11
ZS-JRN-7B 12 00

004737

83873

ou4s4ay

035724

035730

104024

000020

Jie

25-JAN-78
12:08 PAGE 152
SEEK FROM CYL O TO ALL MARJOR CYLS 3 READ HERDERS
JSR
ERROR

PC,SUBCLR
a4

;CERR AFTER SCLR

CLR
MOV

’ESC
RCYL

;CYL 8

SRR

003322

74S8:

.OET,RKCS2(RS)

000010

o4s074

P GSTRT

gregds

nggxe

RHTAB, FRCYL

0013S0
738:

0013s2

012060

1352
520

6S:

047430

i8R

IF SAmE

READ

TOCYL ,MC

CYL
,R&L

PC,SWTST

,SEE ¥ agx*fl 8 IS SET

S
oCYL
15

JSR
BR

;CHECK WORD O (CYL®) ONLY

738
311

Tsf§7

CYL WORD HEADER ERROR

ONE?

DO ANOTHER
E Sé
-

001674

75%:
O

100000

’ksrunu HERE xr su 14 xs ser OR
Sl B WITH SWR <7:0)

110

004737

o4s424

036116

013765

001352

000020

012737

000017
043434

003322

114

104024

7
0897

76%:

JSR
ERROR

PC, SUBCLR
a4

;CERR AFTER SCRL

MOV

TOCYL ,RKDC(RS)

;CYL®

S5sisistsdsdidiad

,RKDC(RS)

3§Rg=§h0>,HCS1

003322

RRRERRRN
RERRRFARN

¢
c

PC, DOCMD
131

R
ROR

#SEEK, HCS1

;D0 SEEK CMD 8 GET CONTR REARDY

iNO RDY AFTER SEEK CMD.

SEQ 0182

CZREHED UNIBUS RK& DR_PRTI1
CZREHE.P11
25-JAN-78 12:00

JSR
ERROR
BIT
EEO

0033e2

164210

g 8

788:

012072

TEMP1

;CERR,HCSI

sFIND ATTN
;NO ATTN AFTER SEEK CMD

;CERR AFTER SEEK CMD.

JSR

PC,SUBCLR
a4

;CERR AFTER SCLR

g
L

TOCYL,FC
778
TOCYL
768

JSR

PC,SUBCLR
24

ERROR

BR
778:

ngggg?e
el

RROR

ERROR

DONE?
;LAST CYL
;BR_IF
YES
;ELSE DO ANOTHER

;CERR AFTER SCLR

CLR

§ 8
z B
001410
001

128:
142644

148:
142624

001410
001000

3053

142664

108:

TST
BEQ
JMP
JMP

20-0

798:

035430

£
T

MOV

003360

52 3"a

IS EE KX~ 5 BEE

SEQ 0183

g
7

Kle

12: 08 PAGE 153
MACY11 30A(10S52)
25-JAN-78
T36
SEEK FROM CYL O TO ALL MARJOR CYLS & READ HERDERS

168:

142604

035716

33 llIlllillllllI"IIllllllllIll'lIlll'II'liilllllli’liill;lllli‘llillll

1 kTEST 37
2 2 B30I I

37
06

000001
001100

001342

001174

t5137:

000

ggeps
MOV
TST

BEQ

SEEK TO ALL CYLS FROM O & READ HEARDERS

06 00 00 06 000 06 00 06 0000 00 00 00060000 3600 00060

%1, STIMES

0 I

03000

::00 1 ITERATION

sStAck,
SP

{RESTORE STK PTR

MODTST
DOSEEK

;SEE_IF MODULE TESTING
;BR IF NO

CZRGHED UNIBUS RK& DR PRT1
CZRBHE.P11
25-JAN-78 12:00

000137
313;37

13737

Lle

MACY1l 30A(1052)
25-JAN-78
12:08 PAGE 154
137
SEEK TO ALL CYLS FROM O 8 READ HEADERS

04216M
12072

012074

DOSEEK:

001350

18:

dEz B B
BN MPE B BIR
§ 036456 013765 001352 000020
Y

g
8085

1
036520
34

0127

1
012737
737

gig
81

§f

000001
044252

0146

737

044140

273

100000

10-0216

SCOP1
MOV
JSR
ERROR

#STACK, SP
Pc.suacua
24

;RESTORE STK PTR

ERROR

001176

003322

343 003412

2%:

ossex HCS1

g potMD
1 |

;00 %sxnfi'? 3SEET
CONTR READY
TER

MOV
MOV
JSR

8 .rwso.spomo.cmno.ooomo.mso.ssp),s.m
#1,E.B1

??AS?%’.‘i&o
203

E.RD sxpscrso AO

; CHECK

MSGS
'
si
nSSsBSpsé:Piso HERE
;MSG A0 ERROR DURING SEEK CMD

ERROR
ERROR

508
206

1138
iMSG B0
Bl LRROR
ERROR

MOV

150000,

;SETUP TIMEOUT

8128, SE cnpe

JSR

Pgérnna

aéz

og;:m.ucsx

s ROR

ERROR
B

loowm .
RODE s e
TOCYL,RKDC(RS) ;GO TO CYL #
:§bpxpso.spm-o

MOV

;CERR AFTER SCLR

ggx

. WORD
ERROR

1426 073360

;SETUP FROM CYL

iSETUP TO CYL

JSR

003416
003420

FC,FRCYL

;ELSE BYPASS TESTS 40 8 41

FCP1,TOCYL

MOV

1-09 003412

w0127

gg Sfiésa 815733

g 003322

CYLINV

MOV

0B
0 A
MOV

104203

809
5§ 1835%
104508
% &Efl
8097

3934“

MOV

001352

04415
12706 001100
004737 0Ou4S424
104024

IMP

SEQ 0154

r ND ATTN

ATTN AFTER SEEK CMD

;CERR AFTER SEEK cno

gsx

g<§oosc-o.SPIN!D.

17§o 003416

MOV
gex

E' As
.Bl

sxpsé
ron

CTED MSG Bl

003424

MOV

82,E.B2

nsc

CTED MSG B2

JSR

PC, CHKMSG

cuscx nscs RO, B0,A

8}{?
8112

8113

003420

o44252

003430

MOV
LWORD

#3.E.B3

T.A2!'T.B2'0

BRHM!?

;;EXPECTED MSG RO

%<D.SPOK!D.CART!D.

gswfig.onm
,E.A0

%8 E

,E.Al

CTED MSG B3

& MSGS sfiscimo HERE

:EXPECTED Al

CZRGHED UNIBUS RKG& DR PRT1

CZRGME.P11
8114

8115

B
i

25-JAN-78 12:00

036654

036656

i
81

036674
74

8130
]
|

036730
&7
7.

MACY11 30A(1052)

137

104133

104137

65S:

100000

000

S‘% Bin
“905 81373; %355 ggtmC 1I3
1 ggg
;1 @;g;
14 043434 §L§
J
?
o44012
|

000401
104154

oasnm 012737 mgqaue 003412

8 1 § 8&742 8‘1’393;
17§o 003420
003416
7

1
1
gmfl

ué

036774

rd
1
012737

ud w13 ;&@;
81ds
194572
1'4;
149 183574
i:

amg

8150
gi
81
8154

gigg

oY4252

023737 001364 001352
001100

004737

O4S424

gigg 833839 1
81

8164
8165
eu:;
816
8168

8169

674

001405

100000

153

;CYL DIFF NOT CLEARED AFTER SEEK CMD

MOV

SUN T'nxcgemS) ;DRIVES#
30"588&5«:
T CRD
CONTR RDY
;g: TSTATN .
RBY"EF?g
BRIVE
SLEAR
TEST FOR ATT

BR
ERROR

MSG BO ERROR

8CCLR, RKCS1(RS)

664
1S4

;mm NOT CLERRED AFTER DRIVE CLEAR CMD
.

gox

g 0!D.SPIN!D.oaovéo w;n.DRA> ,E.RD

MOV
CLR
MOV

81,E.B1
E
#2,E.B2

JSR

PC, CHKMSG

SCOP1

00117

g%fl 818739 B0082¢ ooasez
70
004737 043472
83707 6%575
037106

Ennon

CMP

§i§ 83;832 8?3925 0C 1553 000020
1

iE8 B ERRRR

BEQ
ERROR
38:

012706

;MSG AD ERROR AFTER SEEK CMD

003322

&«

;EXPECTED MSG RO

ugosPOK!D.CART!D."33:
’5553ggroa
5 egrsnc-sossp
,E.Al
CTED'MSG BI
e

iE
g MS
nsc D FOR
CTED MSG B2
MSG ID FOR EXPECTED MSG B3

#3,E.B3

cuecx nscs

:RROR
Qo
RRORRR 36s?q

001401
104207

4415

133

MOV

104266

37034

8157

000003

003424
003430

SEQ 0155

134

MOV

PAGE 155

ERROR

MOV
s
g&"%oa
SR

66S:

Mle

12:08

SEEK TO ALL CYLS FROM O & REARD HERDERS
ERROR

104134

012765

25-JAN-78

; EXPECTED Al

1 Bl

? CLEAR CMD
ingg
Hag l ERRRRORoR arr:ndr}s
RROR

CYLADD, TOCYL
3s
207

;CYL ADDR IN RKMR3 NOT=RKDC
'

MOV

#STACK, SP

ERROR

JSR

PC, SUBCLR

MOV

CLR

%cvm..ixocmm ;CYL #

MOV
MOV
X8
RROR
17

unousho) HCS1
DATCMD’
;00 DATA XFER CMD & GET CONTR RDY
é
:NO RDY RFTER READ HEADER CMD

BEQ

24’

;RESTORE STK PTR

;CERR AFTER SCLR

ESCAP!

oc RR, HCS1

CZRGHED UNIBUS RK& DR PRT1
CZRBHE.P11
25-JAN-78 12:00
170

7110

104174

8175
gi;;

037126
037132

016
016520

Nle

MACY11 30RA(1052) 25-JAN-78 12:08 PAGE 156
137
SEEK TO ALL CYLS FROM O & READ HERDERS
RROR

%g 7
1% Gasees
817
8174 037122 016
000024

mee
68%:

000024
000024

817

9173 037136 032765 100000 000010
8180

037144

81
8184

7154
837150

8%52

;i9§

gies

8}33

7164

;i;z

1407

737

045074

104401
000137

056235
042662

104173

?z I 001674 001352

104310

sboe'®

}ABORT
DRIVE = O TESTS
+AB
;1°ST WORD FROM SILO TO RHTAB

RKDB(RS), (R1)+

RKDB(RS)
|
(RU)+
RKDG(RS), (RO)+

BIT

#DLT,RKCS2(RS)

JSR

PC,GSTAT

TYPE
JMP

MSG18
$E0P

:ABORTING BALANCE OF TESTS
:ABORT DRIVE

ggg

E;Ine,roch

;ggscx 2852 0 (CYL#) ONLY

ERROR
69S:

CERR AFTER READ HEADER CMD

MOV
MOV
BEQ

8191

exgs
81

MOV

174

ERROR

a'uo WORD
;3'RD

:DLT AFTER READ HEADER CMD

310

:READ CYL WORD HEADER ERROR

’

012706

104415

001100

SCOP1

MOV

#STACK, SP

;RESTORE STK PTR

Si§2 33;393 004737
104

0O4S424

ERROR

PC, SUBCLR
24’

;CERR AFTER SCLR

MoV
MOV

2&3&‘5&88755) ‘RETURN TO CYL#
FRCYL, CCY
:CURRENT CYL FOR TRUERROR ROUTINE

MOV

B
gex

ose K,HCS1

10 sbcCms
gm ey
EOU0
.PIP!D.SPIN!D.VV!D.DRA>,
E AD ger
sxpscrso
AO

MOV

#<D.REV!D.SPOK!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

JSR

_WORD

PC, CHKMSG

ERROR
ERROR

205
206

MOV
MOV

150000, TEMPI

JSR

PC,FATT2

BIT
BEQ

#CERR, HCS1
708

Sigg

gg? 76

8200 037 §§ 015782 Dol4c8 BoBOZ6
gsgé
2
1373? 001350 001354
UL

G0y
gsg;

017

720

003416

Goby
O
% BN
833&?3 003412
12737

ggl

127

0001

737

044252

883035

003420

B8215 g
e
O 731g 104205
ggi
g2l

eaég
3521
8222

8223
8224
8225

SEQ 0156

037312

104206

314 012737
040206 001176 4S:
013737 001426 003360

7322

037330

004737

044140

037336
037344

032737
001401

100000

037334

104132

MOV

003322

ERROR

#1,E.Bl

s CHECK MSGS RO,B0,A1,Bl1

T.R2!'T.B2!0
#16%, SESCAPE
132

4
'

-8 MSGS SPECIFIED HERE

50 89 foRoR BuRING SEE Cro

nsc Al ERROR
iMSG B1 ERROR
:SETUP

TIMEOUT

;FIND ATTN

:NO ATTN AFTER SEEK CMD

OI.HINSRK

TS|

M-?Blé:00

MACY11 3?3;1052)

Bl3

12:08 PRGE 157
-JAN-78
SEEK TO ALL CYLS FROM O & READ HERDERS
210

;CERR AFTER SEEK CMD

.DSC!D.SPIN!D.m'

.528

A
T é' ES
1
001362

I;oxr

ow4012

8CLEAR, HCS1
PC, DOCHD
|
4

TSTATN

boooos
Ot
o44as2

001364

—
e e

001100

c so nsc Bl

528}8.: E ETED et B3

;EXPECTED Al

s CHECK

80, Al

sb:ct?fso HERE

;MSG
; MSG

RROR

:MSG Al
ERROR
Bl ERROR

AFTER SEEK CMD

iMSG

;DRIVES

oo gs vsrg
Y

TEST FOR ATT

.1 .sgox'o.CART! b
E.

AR CMD& GET CONTR RDY
onxvs CLEAR CMD

;nrrn NOT CLEARED AFTER DRIVE CLEAR CMD

g<u-o.SPIN!D.DRDY!D. VV!

.onn»,

.AO

;EXPECTED MSG RO

s EXPECTED Al
g

H R

PC, CHKMSG

; CHECK nscs A0, BO, Al ax

T.A2'T.82!0

228}8 .
;

TED

MSG

858 S

§F§#s FIED

s MSG

274
266

iMSG Al ennon
:MSG Bl ERROR

154
)

;;EXPECTED MSG RO

;CYL DIFF NOT CLERRED AFTER SEEK CMD

SUNIT.RKCS2(RS)
O43434

—

vv! .onm E.AD

#<D.SPOK!D. cnnt'b
x s Bl

8CCLR, RKCS (RS)

SEQ 0157

i MSG

DRIVE LERR cMD

g;LRDD,FRCYL

243

;CYL ADDR IN RKMR3 NOT=RKDC

¥STACK, SP

:RESTORE STK PTR

004737

0O4S424

0‘000&%

JSR
ERROR

PC,SUBCLR
a4

;CERR AFTER SCLR

CLR

PROVL, RKDC(RS)

;CYL &

SEQ 0158

R REVAHER RSRS TM

003322

:CERR AFTER READ HEADER

; ABORT BlfMCE OF ESTS
s

%:7

000010

B3935

748:

1401
104311

040010

SEER 70 ALL
CE cYei%From
8 5 READ HEADERS

MOV

003322

056235

Gustee
001674

758:

001352

001352
036404

%;37

047430

012054

TST

F&ra8T>

013765

001352

000020

012737

000017

003322

O43434

76S:

THER

sss ; tix*qT &‘:Te -

HERE IF SW 14 IS SET OR

.SHGHITHSM <7:0> APP

8s:

045424

£AD CYL WORD HEARDER ERROR

;READ

TOCYL,LC

6S:

004737
104024

%:7 7

;CPEC!F( WORD O (CYL#) ONLY

001350
738:

37.

5o BREERRRARARRREE
8334

Cl3

MOV

ELF EL

MACY11l 30A(10S2)
137

Ll el eleniand

S TR §

CZRH{O UNIBUS RKE DR_PRT1
.P11
25-JAN-78 12:00

PC, SUBCLR
a4

;CERR AFTER SCRL

TOCYL ,RKDC(RS)

;CYLS

8SEEK, HCS1

PC, 0o&MD
131

SEEK CMD

& GET CONTR READY

'°ESY ar?gn SEEK CMD.

CZREHED UNIBUS RK6 DR PRT]
CZRBHE.P11
25-JAN-78 12:00

Boir3r SIS
“;Z

100000

D13

MACY11 30A(10S2)

25-JAN-78
12:08 PAGE 159
SEEK TO ALL CYLS FROM O 8 READ HERDERS

003360

EEo

137

003322

o4sH24
0013s2

012072

77S8:

.fl;qzs

10S8:

141000
128:

PC,SUBCLR
24

;CERR AFTER SCLR

TOCYL,FC

,LRST CYL DONE’

PC,SUBCLR
a4

;CERR AFTER SCLR

140740

168:
140720

ERSE
DO RNOTHER

29 RR
33LPR5R

WA T
8 92468
8las ser

'
grme

OSH&.OSHR

148:

YTN RFTER SEEK CMD

;CERR AFTER SEEK CMD.

LPFLG

140760

iNO

SESCAPE
LPFLG

D011

E EEX
FFIFFEIIIIIIIILP

’SERR,HCSI

;6 YL

0013s2
oYs424

SEQ 0159

TION
o g$0eme
;R§$ZRN
MAINLI

DRIVE

&??8'?&}.’8':‘ e

- PR

lil'lI!Ill'lli!!lllilll'II!II!llIlllllll!lllll.lllIillllilllll!

i
H

HeR fPE mm
B mEE g e

SE!EK TO ALL CYLS FROM LAST CYL & READ HEADERS

!!llllll!l!l'il|l!lllllllllll!lllllllllllll!llll!lll!llllilllll

001174

taTuo:

SCOPE
MOV
MOV

JSR

ERROR

os?acx?gg

5#2873&@7.(SR

PC,SUBCLR
a4

;CERR AFTER SCLR

013765

012054

000020
003322

18:

32737

100000

003322

55'

SUBCLR

;CERR ARFTER SCLR

tghx',‘?o%n

FRCY|

TUP FROM CYL
TO CYL
TUP

#STACK, SP

;RESTORE STK PTR

.
é'S'
flg’vffiP

;CERR AFTER SCLR

nra c o?r

:ERROR PRINTOUT

SUBCLR

TOCYL,RKDC(RS)

ggetu'

DIFF

;GO TO CYL #

T CONTR READY

af
sx

=§:Eocms1
K

r < EPIP'D SPIN!Dw-o m

:i &

Exbre

;EXPECTED RO

Y!D.W'D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

?W TERPT

;SETUP TIMEOUT

mmmm:

Qupsss fouiZe O

;CERR AFTER SEEK CMD.

Bofd

;E' RR,HCS1

—

guosis iF7%

T
1
RTTN QFTER SEEK CMD

883428
<y

—

SR 1 g gz 3g

io35 B1%7% Bis6E: 301322

003412

CONTR READY
%EK‘E'?RSEGET
00

6YS:

001100

g&%Sl

33
3@

003322

Bug3 e O

;QUICK SEEK TO LAST CYL

ie 104210

100000

LC,RKDC(RS)

—

003360

MOV

3‘5 o=3o 38

0 o

040250

ELl3

12:08 PRGE 160
25-JAN-78
O ALL CYLS FROM LAST CYL & RERD HEARDERS
SEEK

MMy

CZREHE.P11

MACY11 30A(1052)

FATT2

8CERR, HCS1

;FING QTN

INO

ggxm Pl s

ATTN AFTER SEEK CMD

SEQ 0160

CZRGHED_UNIBUS RKE

DR PRT
P U B 78
12:00
m %‘02“?6

MACY11 m&xosa)

6SS:

28:
:83

.DSC!D.SPIND.
$:0,SP 'D. cnm-o

JSR

;C“Sw%.o

1091

RROR

o442se

1;i

8504

8505

1041

CO'ECK

§%
Sg
Egnon

1%
éYLDIF

MoV

SORYT RKE2A(R2) .oRrves

?3;

;CYL DIFF NOT CLEARED AFTER SEEK CMD

66S:

—
678:

33 9 §

8% 8 &

1041

oM4252

104274
183355

766
040772

023737
mo;

001364

012706

.CnggfiSCS1
1€l
5 TSTATN

BRIVE&L y § CONTR RDY
00 BSY"SF%

RROR

154

;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD

JSR

.
ERR
EES&
RROR

001352

CMP

BEQ

10420

104415

i
RROR
?fl

ERROR
3%:

001100

SCOP1

MOV

TEST FOR ATT

'D.SPIN!D. WY'D vv!

SPW'D CMT'

3 B8 =

34
i7. 1 oNv01e

2823353

SBSA RSO0 SRR PRI EREAIINIIN

001362

w'o DRA> ,E.AD ;EXPECTED MSG AO
so néc ;EXPECTED Al

E% T bt

1041

SEQ D161

SEER 70 ALL CYCEFROM CASTCAVL & READ HEADERS
figw 2?3
;CERR AFTER SEEK CMD

g 003412
7
83358

1
7

F13

c
Tzga
A
aa'o
29-4
565

CYLADD, TOCYL
3s

;EXPECTED MSG RO

Fgfll g?‘lz’o 'E'sgl

fies“fia

CTED st 82

.cr:cx MSGS AQ aoAl

nnoa
ax RROR

;EXPECTED Al

csfl ED HERE
CLEAR CMD

207

;CYL ADDR IN RKMR3 NOT=RKDC

#STACK, SP

:RESTORE STK PTR

O NIBUSBk R BN 14,00

Gl3

MACYIL 30RG1052)
BB YONALL CYis FROMCRSTOSYL 8 READ MERDERS

8506

83?33 ?83533 y—
{ B
HSE B oo

é%flon
W

SS'WLR
;CERR AFTER SCLR
R o s

MOV

WRHTAB,RO

i3 i
I8
4

8233

8535

22727 P727222

g i
B1uilie
1

i 831132
§~w
H

1 :32 e

’

e¥

8?:7-0
016520

00002Y4

27 100000
000010
5074

43319 BRsel
37
o
10431

001674

127

001100

04415

63s:

70S:

001352

£555
gg

O4¥116M
1
1
1
i 3

013737
27
7
04131

essg

091226

8S61

041234

anS(Ei):&). 25'

MOV

BITEE PC,GSTAT
;m.r,axcsamm

RHTAB, TOCYL

ERROR

MOV

#STACK, SP

JSR
PC, SUBCLR
ERROR
24’
v

g‘%wg 003412

012737

000001

MOV

#1,E.Bl

004737

044252

éo 003416
003420

MOV
JSR

jCERRAFTER READ WEADER CMD

{A0RT AL
’

;1'ST WORD FROM SILO TO RHTAS

588

;28827 BR10E
: CHECK

0 (CYL®) ONLY
gy CYL
oWORD
HEADER ERROR

;RESTORE STK PTR

;CERR AFTER SCLR

flcv{.“fl.8”55) :RETURN TO CYL#

3‘Soc:g

8983&.

001354
003322

! NO
.Do DATA
XFER CMD & GET CONTR ROY
RDY AFTER READ HEADER CMD

RKDB(RS)
, (RD)+

MOV
MOV
JSR
ERROR
gex

12737

350
7

SCOP1

114
?
ousH24
esgé Sfimi
M

ggg

3‘%%
i

CMP
68%:

8223 83H§2 Bi 723 8312

ERROR

§n§2n :85 :

10 gesess

}

s ool OB DGR

277 772PP2T2RT

gi;

041016 012700 001674 e

FRCYL. CCYL
¥
Sl

; CURRENT CYL ron TRUERROR ROUTINE

;D0 SEEK CMD & c:r CONTR READY

:NO RDY rEn K CMD
PIP'D SPIN!D.VV!D.DRA>
,E.RD EXPECTED AO

#<D.FWD!'D.SPOK!D.CART!D.DOOR!D.BRHM!D.SSP> ,E.Al

PC, CHKMSG

:CHECK MSGS ARO0,BO,Al,Bl1

-—

CZRGHED UNIBUS RK6 DR PRTI

as-.rm-n 12:00

ERROR

100000

1401
104210

003322

FATT2
RR, HCS1

1Rt o B
;FIND ATTN
INO

ATTN AFTER SEEK CMD

MOV

m 003424

uo DSC!D.SPIN!D.DROY!D.VV!D.DRA> ,E.AD ;EXPECTED MSG AO

BOSE?" " °,,@§Tsofij:§§go

MOV

#3,E.83

m 883448

000003

a6y oéAEaa

003430

og-o 1

g
g

FCast"820
1;5

;CERR AFTER SEEK CMD

fisc?ooncrsonscaa

;EXPECTED Al

;MSG ID FOR EXPECTED MSG B3

— "sfsnflsagbtétpiso HERE

nfig g Efig AFTER SEEK CMD
;MSG Bl ERROR

;CYL DIFF NOT CLERRED AFTER SEEK CMD

728:

m s

ovM012

104154

238

N
IR

gectRmKCSIRS)

JSR

PC,TSTATN

88 BB1Se REBRTUR BLEEE
68ONTR RDY

RROR

154

RTTN NOT CLEARED AFTER DRIVE CLEAR CMD

003412

gex

12737 000002 003424

H(L)V

§i§ g;:s* 1 ;37
1474

;& MSGS SPECIFIED HERE

;MSG AO ERROR DURING SEEK CMD

012737 0S0340 003412

mi%

8614

T.AR2!T7.B2!0

203

718
210

Il: 8 @2;
18

SEQ 0163

BEQ
ERROR

—

[adad

408 izzes oooog oocaop

PAGE 163

L
044140

[y Sy S

BEEE

258

041

R BONSIEREY FLUlER FRNE B

? P2277227F 2727777 727TR?

H13

12:08

SEEK TO ALL CYLS FROM LAST CYL & RERD HERDERS
.WORD

10‘0203

R
i

7S
3578

T40

@25-JAN-78

8563 0‘012"2

gfio—o—o—o—
R

AL 2

CZREHE . Pll

MACY1l 30A(1052)

17, é 8&‘:&8

&i;

091502

012737

000003

86l

O41S10

004737

0D4¥252

003430

ggg

.CLS%“’)”.

734

TEST FOR ATT

8(860.SPIN!D. DRDY'D
W'Eboflfl) .AD

;EXPECTED MSG RO

EiESSBPOK'DCMT'b
gooa¢FW}(&?}PDHSG Bl
#2,E.B2

8E’(PECTED MSG B2

MOV

#3,E.B3

HSG ID

FOR

EXPECTED MSG B3

JSR

PC, CHKMSG

;CHECK MSGS RO,BO,RA1,Bl

;EXPECTED Al

0 UNIBUS RK&

CM P11

1514
1
1
1
1

DR PRT

?m- é:00

MACY11

(1082)

1
1
1

s:fs
0 ALL
cnsogm:mss*CYL & READ HERDERS
“°§2
RR
RROR
RROR

T.R2!T7.82'0
72

;
1
;

MSG

ERROR

266

CMP

YLADD, FRCYL

MOV
JSR

#STACK, SP
PC, SUBCLR

001176
86 36 83;1554 8?393; DO13S0
000020

CLR

MOV

SC
?gcvn..
DC(RS) ;CYL ®

36.3%

1674
%g;g
003322

MOV
MOV
JSR

100000

BIT

oc RR, HCS1

I13

3337 001364
1

10424

001350

:
g

11
1

737 0MS424

i“xlx

ERROR

g
gg

1644

104173

1
1

19
2

“;é

8673

023737

001401

1704
1712

3737
4
3
1
004737

1714
i;

041724

o4S074
001674

Bgngga

75%:
000010

BIT

768:

001350

104311

748

001352

831355
034

047430

JMP
MOV
MOV
MOV

ERROR

; 056235
1
042662

100000

ERROR

003:22

gg 1643 1 ggse%
86
ax
§1§ 20 %
1
E
1§~00 16520
1682¢
8654

EESRM

;CYL ADDR IN RKMR3 NOT=RKDC

i1 g
127
001100
8:1

CIFIED HERE
mon nr ER DRIVE CLEAR CMD
RROR

012072
’

;CERR AFTER SCLR

Ao» HCS1

;DO %m
XFER CMD 8 GET CONTR RDY
:NO

17-4

RDY AFTER READ HEADER CMD

cmansn&_u; R CMD

$E0P
a0
|: a80RT @'f S
RKDB(RS), (RQ)+ ;1°ST
FROM SILO TO RHTAB
Rk(g)
(§)+
g
58%
RKDB(RE) ' (RO)+ | 'RD HORD
ook'r,nxcsams)

173

GSTAT

:DLT AFTER READ HEADER CMD

TYPE
JMP

MSG18
$e0P

CMP

RHTAB, FRCYL

;CHECK WORD O (CYL®) ONLY

ERROR

31l

;READ CYL WORD HEADER ERROR

CMP
BEQ

TOCYL,FC
&3

L CYL DONE?
an
sérvegflo

JMP

BEQ

DEC

;RESTORE STK PTR

JSR

:ABORTING BALANCE OF TESTS
:ABORT DRIVE

748

TOCYL

PC,SWTST

:BR IF SAME

;

THER

:SEE IF SW 14 OR 8 IS SET

—

CZREHED UNIBUS RKE DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

041730

as;g
gng
gg?
17

000515

012737

869

1
1
1;;5
1779
776

104131
137
gowg;
;3;

2006

10421

gsgm

86
gg

000017

737 043434

140

001426
044140

100000

737

045424

3737

001352

go
MO
g% o
3853 %;ua

§8

001352 000020

;85
7{

né
71

714

8728
8729

012054
788:

%un
1410

80%

108:

137042

MOV

TOCYL,RKDC(RS)

;CYL®

137002

;D0 %EK 92"2 3 GET CONTR RERDY

131
T
TEMP1
Pcsngnurnia
132
8CERR, HCS1

ERROR

210

JSR

PC, SUBCLR
24

;CERR AFTER SCLR

CMP

TOCYL,LC

:LAST CYL

ERROR

£
BR

79%

B
778

JSR
ERROR

PC, SUBCLR
24’

CLR
TST

CAPE
LPFLG

INC

LPFLG

?Eng
IMP
BNE

#SEEK, HCS1

PS potMD

ERROR
MOV
JSR
ERROR
BIT

BIT

136762

;CERR AFTER SCRL

BEQ
79%:

137022

HEREIF SW 14 IS SET OR

PC,
SUBCLR
24

MOV

003322

lx
177 1133832

::60 TO :Ext TEST

'RETURN

JSR
ERROR
JSR

003360

§§i

7
;
75-.
87
8725
g;

77%:

003322

34
8358-.0
‘1’8353 o4s42Y

TSTYI

1S B8 WITH SWR <7:00 APPLY

8s:

737 045424

1746

1754

é‘t%
8690

104024

041740 013765
-

MACY11 30A(10S2) 25-JAN-78 12:08 PAGE 165
T4O
SEEK TO ALL CYLS FROM LAST CYL & READ HERDERS

s
8

8674

J13

%5 RR
3&:5041

oguq,asun

:NO

ROY AFTER SEEK CMD.

;FIND
ATTN
:NO ATTN AFTER SEEK CMD
;CERR AFTER SEEK CMD.

DONE?

Bt
d
. ;CERR AFTER SCLR

1SWW 91YWAS03 3SETWAS SET
;LOOP ON

ERROR?

:YES, RECONDITION DRIVE

JMP

;RETORN TO MAINLINE

INC

LPFLG
#SWS, ISWR
gg

:YES,

LPFLG
#SW9, ISWR
g
43

;LOOP ON ERROR?
:YES, RECONDITION DRIVE
‘RETORN TO MAINLINE

BIT
BNE
JIMP
INC
BIT
BNE
JMP
INC
BIT

LPFLG
#SW9, ISWR

:LOOP ON ERROR?
RECONDITION DRIVE
IRETURN TO MAINLINE

:LOOP ON ERROR?

SEQ 0165

O_UNIBUS RK& DR_PRT]
.P11
25-JAN-78 12:00

Bu1gs 808157

K13

12:08 PAGE 166
MACY11l 30A(10S2)
25-JAN-78
T40
SEEK TO ALL CYLS FROM LAST CYL & RERD HERDERS
:YES,

RECONDITION DRIVE

;RE?ORN TO MAINLINE

BNE
JMP

041540
CYLINV:

o42164

nnnnnunnnuluuniiuuuunuulnulunuuunu

'LTE

e
‘¥

e
tx

819937

012706

000001
001100

737

o4s424

043434

001174

SEEK TO ALL INVALID CYLINDERS

THIS TEST VERIFIES THAT 'INV ADDR’ & 'SEEK INCOMPLETE®’ IS

PRODUCED & THAT HERDS DO_NO T MOVE OR UNLOAD IF AN ILLEGAL

CYL IS SPECIFIED IN A SEEK.

INVRL D CYLS nflg £33 THRU 777 (8) FOR THE RKOG&

8 1457

MOV

MOV
JSR

ERROR
MOV

003322

JSR
ERROR
MOV

JSR
ERROR
BIT
BEQ

003322

ERROR
BYS:

Jgg

5
g

BE
042336
O4234e

FOR THE RKO?7.

0013s2

1%:

8l srrnss
sStac

PC,SUBCLR

#SEEK , HCS1

PC, DO&MD
131

750000, TEMP1

PC,FATH2
1

ocgnn.ucsx
4

PC, SUBCLR

;
1 ITERATION
STK PTR
hssrone

;CERR AFTER SCLR

;D0 SEEK CMD & GET CONTR READY
:NO RDY AFTER SEEK CMD.

:FIND ATT
:NO ATTN nrrsn SEEK CMD
;CERR AFTER SEEK CMD.

;CERR AFTER SCLR

CLR
MOV

FRCYL
LCP1, TOCYL

; FROM ch 0
17ST INV CYL

SCOP1
v

#STACK, SP

;RESTORE STK PTR

PC, SUBCLR

ERROR
CLR

THRU 1777

: o 363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 36 36 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 3 3 36 3 3 36 36 36 3 36 3 2 3 3 3 3% 3 3% % %
t&T41: SCOPE

003360

O42264

ERROR
MOV

MOV
MOV

JSR
ERROR
JSR

ERROR

;CERR AFTER SCLR

TOCYL,CALDIF

, RKDC (RS)
TOCYL
osesx HCS1
¢, 0otMD
131

;D0 SEEK CMD & GET CONTR RDY
:NO RDY AFTER SEEK CMD

245

:NO ATTN AFTER SEEK TO INV CYL

PC, TSTATN

SEQ 0166

0_UNIBUS_RK
Té
.P11
25~ M-?B
:00

L13

MACY11l 30A(1052) 25-JAN-78 _12:08 PAGE 167
41
SEEK TO ALL INVALID CYLINDERS

figgé m 000040 003352
000200

$
37 020000
1 1)
037 o4

1001

003352

2%:

003350

4S:

003350

S§:

104251

3353“ gog;g;
20
f 4

1462
0340 oogis

6S:

§ §1S73;
8?;%31 003420
DO3416
12737
1
1

8814

gg{;

104
3037

i’zox

ggie

2510

8819

0M2512

001362

001352

001364

001352

8827
SRR
!

40
042542

7
1041
012765
1

78:
8%:

000000
01

00332

66S:

o42602

Esgifi
eblb

32737
[
104155

045074

000040

003352

ERSOR
Bl
RROR
BIT

247
#0.PIP, HMR2
3
og DSC,
HMR2

sFLT NOT SET AFTER SEEK TO INV ADDR

ERROR

251

;DSC NOT SET AFTER SEEK TO INV ADODR

INC
ggx

BYPCERR
;BYPRSS CHECKING FOR CERR IN GSTAT1
:§°-°§‘f58-§f§'.‘-°i°"°"'2.W'D.DRA> ,E.A0 ;EXPECTED RO

JSR

PC, CHKMSG

BIT

BNE

:g.ru,uma

sPIP SET AFTER SEEK TO INV ADDR

ugigpox'sb.cm?ioobsfiok'bagmmo.ssm,E.m
81,E.B1
; CHECK nscs no
BO, Al ax

.
ERR
ERROR

T.R2!T.B2!0
ng3

ae"g

?;LDIF,TOCYL

ERROR

256

:CYL DIFF IN RKMR2 NOT=CYL DIF

ERROR

257

sCYL ADDR IN RKMR3 NOT=RKDC

MOV

#CCLR, RKCS1(RS)
SUNIT.RKCS2(RS)
SRECAL , HCS1

genz

MOV
MOV
JSR
ERROR
MOV
MOV
MOV
JSR
ERROR
Jgn

3434

100000

: IDRE NOT SET AFTER SEEK TO INVALID ADDR

ERROR
Emon

104257

8
25
1
100000 000000
3;
zsés 8157732
001222
000010
27
830013 003322

BIT

MOV
MOV

042450 004737 044252
8810
1

gson

02. 1DAE , HMR3

SEQ 0187

Ennon
JSR

BIT
ERROR

254
5

g;moo,mcn

CHD

;PEFIED
;MSG
AD
tnno
AFTER SEEK o mv cYL
iMSG B0
E
iMSG Al
:MSG Bl

RROR
ERROR

38 RECAL CMD &
GET CONTR RDY
Y NOT FOUND RFTER RECAL CMD

occn.R,RKCS1(R
s Hg 2(R .oaxvsc
1
;00 onxve CLEAR CMD 3 GET CONTR RDY
Ecgrsmm

12..

PC,GSTAT

ggsIDQEyHMR3
155

NO RDY AFTER DRIVE CLEAR CMD
rssr FOR ATTN

;ATTN NOT CLEARED AFTER DRIVE CLEAR CMD
SEE F %ERE IS CLEARED
IDRE NOT CLEARED AFTER RECAL CMD

CZREHED UNIBUS RKE DR PRTI1
CZRBHE.P11
25-JAN-78 12:00

8844

042620
042626
sasgaa

012765
013737
737

100000
001412
044044

ggqg g42642 005237 001352

MACY1i 30A(10S2)
TM1

000000
003362

65%:

MLl3

25-JAN-78
12:08 PRAGE 168
SEEK TO ALL INVALID CYLINDERS
#CCLR, RKCS1(RS)

T1, TEMP2

Pg.rarrx
3

023337

—

001352

012064

TOCYL
TOCYL
, MASK
oP

;LOOK FOR ATTN FROM RECAL
;NO ATTN AFTER RECAL CMD

SEQ 0le8

CZRGHED UNIBUS RKE DR_PRT1
CZREHE.P11
25-JAN-78 12:00

MACY1l 30A(10S2)
@25-JAN-78
END OF PASS ROUTINE

§§SS

.SBTTL

SEQ 0169

END OF PASS ROUTINE

33 SN

I I

000 00 0

;#TYPE "END PRSS #XXXXXTM

0 0

(WHERE XXXXX IS A DECIMAL NUMBER)

;#IF THERES A MONITOR GO TO IT

8325

;#IF THERE ISN'T JUMP TO STSXY

gggg

SEOP:

EERS
8866
8867

001176
000001

55?0
.§§;é
56574
!Ers

003442 001220
ggg
011520
-~ %ESP:
D011
" CLR
D011
CLR

eesg

001100

SCOPE
CLR
MOV

001174

001216
100000

001216

—
P

043027
001216

§§§2

3024

SERBITINI

INC
c

8308

043072

000137

$DOAGN

nag

ipc)+,atpc)+

000

SGETH2: MOV

Js42 nb

SENDAD: JSR

PC, (RO)

(PC)+

SD0RGN: 0

$PASS
o;goooo.spnss

NOP
NOP

TSTNM
gr?nss

8891

o42412

ggggf;goevcr
SDEVCT

. MOV
¥$QECT §PASS,
SENDMG- (SP)

0042

377

sStAck, SP

INC

8880

EEES

SESCAPE
81, STIMES

MOV

001220

]

830

PAGE 169

: kKINCREMENT THE PASS NUMBER (S$PASS)

8860

890S

N13

12:08

ggrnno:

NULL:

JIMP

.WORD

.BYTE

0S1501

042116

020123

SENDMG: .ASCIZ

000001

001230

STSXY:

000002

001216

CMPB

18:

007730

2s:

: ; INCREMENT THE PARSS
;;DON’T AL
A NEG. NUM

; ; LOOP?

;s YES

: iRESTORE COUNTER

T
:iSA

“END FORS TYPEOUT
"
s$nss

g o A NULL CHARACTER. WITH SIGN

;:GO TO MONITOR

; ; SAVE ROOM
::FOR

BINCESS

; s RETURN

=-1,-1,0

. :NULL CHARACTER STRING

<15><12>/END PASS’ 8/

SAPTENV, SENV

: RUN guosn APT ?

28 -

;BRANCH IF NO

BHI

;BRANCH 1F NoT

INC

JMP

A(PC)+
STSXY

;

:iGET MONITOR Sooness

BNE
CMP

001102

; INCR COUNT FOR % OF DRIVES THAT ARE CHECKED
;naengengxvzs
PRESINT TESTED?
;?? NOT , TEST NEXT DRIVE PRESENT
:s
TEST
R
255558 THETflf Nunasuugggxrsnnrxons

82, SPASS

STSTNM
§Ts

: TWO PASSES DONE ?

;CHANGE THE TEST NUMBER

;LOOP WAIT FOR LOADING THE NEXT PRG

JEXIT

CZREHED UNIBUS RK&6 DR PRT1

CZREHE .P11

25-JAN-78 12:00

MACY11 30R(10S52)

suaaofi%msss

-JAN-78

814

12: 08

PAGE 170

.SBTTL

; SUBROUTINE TO CLEAR ALL FLAGS FROM DDUMP THRU DOTIM

8914
15

3076
1

012700
701

003432
177757

SUBROUTINES

CLRFLG: MOV
MOV

18:

8DDUMP, RO
#-17.,R1

CLR

(RO)+

éuc

R‘

RTS

114

' TYPE PROGRAM ID IF FTITLE=0
ggiég

ia'i

333

112737

000001

Efi{

gm.z

.SBTTL GET vm.ut"?o& SOF TWARE SWITCH necfgm
;sr

001134

g“gs

1§:'

ag:e

60‘“66

126

§
3246

043252

012701

6-1'

81 703

012704
mé
7

GDRVS:

177770

177400

18:

003444

gsgv,u
Egg,osunsc
-

;o mf:‘u Wr«: UNDER APT?
::ggrwr‘cA Fsuvficn REG SELECTED?
;3GET SOF -sm SETTINGS

MOVB

#1,SAUTOB

; ;SET AUTO-MODE INDICATOR

RTS

1
us
00102
020127
001426

177770

ROLIN

MOV
MOV

MOVB

(SP)+,RO

;GET STARTING ADDR OF ASCII STRING

(RO)4,R2

8-8. Rl

iSET UP COUNT

BIC

ugmgo R2

iGET RSCII CHAR
iMASK
HI BYTE

CMP

RY,R2

;WAS TYPED CHAR O THRU 7?

CMP

RY, #70

MOV
2s:

7 000070

DRIVE NOS.. TYPED IN & SET
DRIVO-DR V7 REGISTERS APPROPRIATELY

MOV

000060

:.ms WE Rgmgc UNDER XXDP/RCT?

8559
SN"E
g;sm
ROUTINE TO INPU

‘DRIVS,

TITLE:

005737 000042

317-4 000207

8964

001344

ig 3593 001230 000001
i
7 7 001140 000176
§{§§
a2

8961
8962
8963

oo%gz

—~3

BEQ
},s«r:

BNE
TST
BNE
CMP

BEQ

#DRIVO, R3

#60, R4
3s
553"

2s
R2
4§
R1,#-8.
X

;DRIVE FLAG ADDR
:BRANCH IF YES
iNO, INCREMENT DR FLAG ADDR

;S/B 0-7 OR TERMINATOR
:DEFAULT ALL DRIVES

SEQ 0170

cm?PfixmasafgmognmIéop

MCYil 30A(1052)
2s-IAN-78

8965 043254 00S037 003472
043260 000207

7::

CLR
RTS

SIZFLG
PC

832233 ooawwe
L
o,
56538

INe
e
Ene

?59

1001

ClH4

12:08PAGE
171

oé-oflngo'g,

BNE

855134

“S:
5S:

003472

6S:

PRCERT

g!'i‘

.‘.i

&?g

;?fic&n’r“'f% "&MS T0 BE TESTED
gL el
§xssx
;rg xgox;n'?cm'm?om
-roum te

T
INC

sBYPASS TEST1 (SIZING)
: FOUND Temxmron EXIT

géZFLG

SEQ 0171

mron sxxr

R AL bVER
D"

Tmu 8 DIFF

?#‘KSR:"%«ERROR.
:231‘{557 1 (SIZING)
’

ROUTINE TO INPUT RKBAS OR DEFAULT.

m
0014

177440

rs¥

aee
001264

18:

g?s

égnm,ao

:GET LOW ORDER FROM STACK

’1‘3

;BRANCH IF DEFAULT.

3‘1:77wo.saass

;DEFAULT VALUE

Pg'“"“

ouMle
1

043416

RDOCT

§¥

(SP)+,R0O

2s:

7 000210 001314 1S:

ON341Y

MOV

, RKVEC

g?‘g

gc, SETINT

MOV

O%lO,RKVEC

;GET LOW ORDER FROM STRCK

;BRANCH IF DEFAULT

;DEFAULT VALUE

EROUTIPE TO SETUP INTERRUPT VECTOR & PRIORITY
(=]
n
O

W
£
e
o

b bt e e (e B
b

GINT:
001314

OONCNLWN—-D

88888585588

EROUTIM TO INPUT RKVEC OR DEFAULT

SETINT:

MOV

oxmsh (R0)+

RKVEC

; INTER ADDR TO RKVEC

‘

Swoptfiflmas"f
AN-78'13:00
013719

*&a1ch REa1STER

001316

chPRI,(RO)

H?S

SEQ 0172

;PRS TO RKVEC+2

THIS ROUTINE SETS C?T
IN H(CSI IF DRIVE UNDER TEST IS AN RKO7.

fes

141

2888

g‘fl

bocmo: ¥§

gg&w&gum

003322

’5 (SP)

MOV

HCS1,RKCS1(RS)

]

[

;DO CMD

(SP)

T ER READY (RDY) DURING A DELAY

,ROUT NE_TO FIND

:ELSE SKIP OVER mon

égéggfiém ;FIND CONTR RDY

EW?a

RTS

flw Ig
&T%fifiq‘%&wO&ITMR CRSE

ENTE

HITH A C

#nov.

SRDY, RKCS1(RS)
MP1

003360

gudtia
18

b4
12

CONT

1 EEYOUERE
TF NOT RD

mxs ROUTINE IS SIMILAR TO THE ABOVE BUT IS USED FOR DATA TRANSFERS
.s REQUIRES A LONGER TIMEOUT
;ADD CDT IF RKO?
STMPY, HCS1
BaTcMp: BIS

003360

000000

;880gor IF RKO?
ND

gqg

2222222

Z222222

Stosks

IENTER WIT H COMMAND

:}35

:s:cx RR

Pc,cx AR

P ”3§2

GS.
I ZNOCK FOR SpeclaltCerA" HOLDING RE
ERROR
:N IPOSVER

; CHECK FOR SPECIAL CERR

£0N

FROY1:

—

§ ROUTINE TO FIND CONTROLLER READY & STORE DRIVE REGS ONLY

Ar
s

§§§%§§?jfi8@§§%éfififififi?2§%%%m

g?’?&

D14

M-?B
MACY11 322419&2.) ;8“1

64012

003350
003352

BIT

BNE
DEC
BNE

JSR
RTS
MO

#RDY,RKCS1 (RS)

15
T rm

FOR SPECIAL CERR CONDITIONS
;CHECK
RER ;NO
RDY, EXIT

RKHR3(

PIT

ElY

B3R
S0F THARE SHTTCH REGISTER

MACY11

REE
T 290

Eg @ @ g53383

iEhs)
ez

:CC,CKCERR

HOLD:

; SKIP OVER ERROR
;CHECK FOR SPECIAL CERR CONDITIONS

MOV
MOV

MOV

noiv

MOV
MOV
MOV
MOV
MOV

n“?s
10

1
i
gllg

911
9114
911

911;
3t
i

NE TO_cHEC

;:¥
IF ATTN
(Evgg'%n
ION)
TURN +2
IF ATTN m'géms (SKIP
884512

fsmm: MOV

18:

sl
g
&
1

3 g

m¥a
géov
§g

003341

ngv
s

RY, -(SP)

;SAV RY

THAHR? msoru
H xr ATTN NOT PRESENT
.
(SP)+,.RY
Ng
, (SP)
: INCR nsr ADDR TO JUMP OVER ERROR.

(SP)+,RY
’

:RESTOR RY

’

% rr}
ATTN WITHIN
scn:msnrmuxszc
¥£“i’
T
IN
F ng ATTN
(
xr ou
c#
us I TAINED
THE RETURN FOR EITHER CARSE
+

SISt A
465

77777

003360

000017

003360
003362

33 mm

rnn :

18:

RY,

118

(SP)

:SAV RY

s”E

g’rmhm.nxnsonuna :FIND CORRECT ATTN

DEC

TEMP2

MP1

SEQ 0173

et et etwtwtuteted B

s Pt s [
s ot Bt Pt ot
s Bt ot ot
ot Bt ot
o o P
Dt Bt B

—

e Bt Bt B

FREXBF

ol ad el ad ad ol ot X

FEE3333830

£
BIRR2OV2B33
2NN SSE G HETRT
AN
A A TS SFHESHEEIBLRRLE

mmaom“m:oum
e e B e e B Pt Bt e

e ed eladadadad
o ¥ =)

[

O©

DO DD DD WD WD DD DD DD DD D DD DD 00D DWW DD DD D D DD D

mes”—‘?ngg#fioo

MACY11 m(xosa)

goo;s

2s:

S0
000002

F14

-JAN-

SEQG 0174

OR SOFTU&&SHITCO:“%GISTER

mmm§)

JSR
MOV
m

GSTA
82, (SP)

(SP)+ . RY

s,
%’ gflarus AFTER ATTN SEEN
iSKIP OVER ERROR

} '? ATTN
TTN F(

gnrusI WTQI'CD BEFORE THE RETURN FOR EITHER CRSE
wg

1222

f%
{5

%:me 000017
003360

16M

%3&

1;0
179

18:

000002

yel

MOV

BITB

RY, -(SP)

IT,RY

MR1(RS)

n v

(SP)+,RY

GSTAT

cLi

nxmims)
GSTAT

gga
Vv
A?o

(SP)+,RY
82, (SP)

RTS

;msnumn%mrf
u'f DS

737 003360

Guigss BN3

Buue3s 008205

003360

BLy:

is:

‘f

Ris

:SELECT WORD O

; cE'r 527 ST STATUS.
iREST

;RE?TOR RY
;SKIP OVER ERROR

7 US/ rsnmxon +

N COUNT IS O.. anée
1ST

;SAV RY

TN(RY) ,RKASOF+1(RS) ;FIND CORRECT ATTN
gnm

gggzs
74

1
1

FATT2:

2s:

TEMPI

13MP1

PE'

117/08S.
;5.6

Y244 104403
ue«g

001

4250

000207

Yoy

000

0S6130

BYP:

TYPE
MOV

MSG14
RO,
-(SP)

.BYTE

TYPOS
BYTE

RTS

g
;6.8 US

15:8 U

i THIS ROUTINE TYPES BYPASSED DRIVES.

04401
8::533 6100%

12 US TO EXIT

ENTER WITH DRIVES IN RO

: BYPASS
:,snvs
RgnrXS TYPEOUT

"coP§E--ocm. RSCII
$TYPE| DIGIT(S)

: 'SUPPRESS LERDING ZEROS

Rl OR SOFT

ES-§RRE7SRIé:OO

UNIBUS_RK

R 883745

@Efi 3
1t

044326

001466 EHKMSG: MOV

013746

@g
1
1

13737

013737
7.

38:0 TAT1
(SP)

UNIT,E.R3
.DDT,E.RO
TEMP1,-(SP)

TEMP1,E.
RO

HEE

R
E
B e

013737

TEMP1,E.AL
TEMP1

TEMPL,E.R2

37.

003372

003412

O44S46e

001176

O44556

062716

000u02

o44se2

023737

003374

134364

cSmg STATUS

;ADD EXP.

DRV TYPE

sSAVE TEMP 1

;GET PARITY FOR MSG RO

;GET PARITY FOR MSG Al

;GET PARITY FOR MSG A2

;GET PARITY FOR MSG BO

;GET PARITY FOR MSG Bl

;GET PARITY FOR MSG B2

(SP)+,TEMP1

;RESTORE

TEMP 1

'SAVE ESCAPE

; TEST MSG AO

18:

2%:
003414

sEE'T'mL gg}‘um.“mon” IVE

sGET PARITY FOR MSG B3

SESCAPE, STMPS

000207
001000

; PASS RngcT;s 10 BE ngrgoT

2fi§??2683

023737

BUdESS 831107

TEMP1

£.B3,TENP1

001172

OH4SHY

TEMP1

TE 1,E.82

griEte 815737 BOII%E

gEs e

.B1,

.B2,

37
7
137.

TEMP1

TEMP1,E.B1

2
BN BE g

[T,

.B0,

EE 1,E.80

7
i
gy
013737

SEQ 0175

;SET UNIT @

37
g87384
BT
G 013737
003360

36H737

12:

d(SP) ,CHKFLG

017637

Gl4

SE?TCSQSEGig?ER

-JAN-78

THIS ROUTINE READS ALL MSG ASB WORDS & CHECKS THEM RS REQ’'D

oY4as2

28888
8;0-»-0—
SRRRN

o
b
o
o b
e
b
B

ROROR RO TOR RO RO RO PO POTO P ROTOTD
SERZER-=EIBNFRES
ummflg;.—.—.—.—.-.—

(1052)

;

e b

DO DWW WD O DD DD D

LlSBIRR L83

EERENE"

MACY11

v
RTS

81$,

'8 RETURN TO MAINLINE ERROR

IT
BN

afig .

#SW3, ISWR

i3 aa"fr LOOP

CMP

H.BO,E.BO

;TEST MSG B0

ADD

SESCAPE
(35,-( )

82, (SP)

.RET

TUP
HERE FROM

ESCAPE

éghsn
ONMAINLINE

ERROR

BUMP RET RDDR TO NEXT ERROR

CZflSHEO UNIBUS_RKB DR PRT1
12:00
P11
25-JAN

fi*‘§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§fi§§§§§§§
3
:
R
Wi ¥8
5%

"53 ;ugfigg

£3 ELJ% Sl
062970

Hl L

l2: 08 PRGE 176
MACY11l 30A(10S2)
25-JAN-78
GET VALUE FOR SOFTLARE SWITCH REGISTER

o44604

001176

001000

134326

gai SESCAPE

BIT

#SW9, dSWR

MOV
RTS
4s:

82, (£°)

Ss:

000002

sP},-(SP)

003376

003416

He Al,E.Al

O44e42

001176

.sg’SFaCflPE

Bkt

001000

134270

i
i

003400

003420

044700

001176

Efié%

032777

513

714

134232

001466

79%:

#SW9, ISWR

8s:

82, (SP)
H.B1,E.BI

%éfis.sescnps
(SP),~(5P)

118:

o(5P

001176

;COPY RET ADOR
:8 RETURN TO MAINLINE ERROR

;RETURN HERE FROM MAINLINE ERROR

:8 BR

IF LOOP ON ERROR

:BUMP RET ARDDR TO NEXT ERROR
; TEST MSG Al

BR IF OK

; TEST _MSG Bl
R IF OK

128:

8T.A2,CHKFLG

’

001466

2235& sg¥up ESCAPE

#SW9, ASKR

108:

,RCYLD

159%:

MO
RTS

20s:

MOV
MOV

BUT INF8 IN CYLDIF, DO NOT CHECK

#T.B2,CHKFLG

TEST MSG B2?

oriaa,cuerc

; TEST MSG B3?

,RSEC
PC, RHERD

;PUT INFO IN HERDA, "DO NOT CHECK

$STMPS, SESCAPE

;RESTORE ESCAPE

BSrevLa
148:

SST
MSG R2?

o;rncx sp

$TMPS gsscaps
JSLPER

gfiT INPS IN CYLRDD, DO NOT CHECK

;PUT INFO IN SECTOR,

DO NOT CHECK

;RESET STACK PTR

;RESTORE ESCAPE

: THIS ROUTINE CHECKS FOR CERTAIN ERROR CONDITIONS ONLY

RIS n
8 SBEIR #

RoY

SEQ 0176

IE:

005737
00102S
032737

IF NED,

AKCERR: TST
003322

BNE
BIT

CTO OR MDS SET, MSG A3B ARE INVALID
BYPCERR
#CERR, HCS1

C%‘O
UNIBUSRK? DR_PRTI1

AN-78 12:00

9301

@25~ JAN-78 12:08_ PAGE 177
GET VALUE FOR SOF TWARE SWITCH REGISTER

001001

BNE

335030 000207

‘7083

RTS
004000

003322

BIT

Foin
RTS

fi%

010000

003324

2§:

géz

”iq

ES&O

%:‘00

001000

003324

3§:

géa

i B

04S072

4s:

RTS

8CTO,HCS1

;BR_IF NOT CTO

ggb

;CTO ERROR, MSG A3B INVALID

8NED, HCS2

33
327

BR IF_NOT NED
NED ERROR, MSG R3B INVALID

:gDS,HCSE

330

;MDS ERROR, MSG R3B INVALID

HEN WAI

LFS DRéVECMD TO GET STATUS

BRN=RE

F RDY NOT RECEIVED BY A TIHEOUT AN ERROR IS FLAGGED

glgggg Exgg% 000010
003322
3

000207

csrar:

3434

003360

MOV
MOV
MOV
JSR
ERROR
MOV
RTS

TEMPL,-(SP)
SUNIT RKCS2(RS)
8SELORV, HCS1
PC,DOCMD
11?7
(SP)+, TEMP1
PC

: THIS
ngu *

ol el ol ol ol ol o

*SFRLFELE

;

651n11= MOV
JSR
MOV

MOV

MOV
Jga

ERROR
MOV
MOV

GIS

;Enp

;SAVE _TEMP1
;CURREN onxvs 5

;DR SELDRV <srn7u5) CMD & GET CONTR RDY
: RDY
é‘ END OF SELECT DRIVE CMD
RESTOR TEMP1

OF ALL DRIVE REGISTERS (MSG AD-A3, BO-B3)

-(SP)

;SAVE TEMP |1

,gsr ALL cgnrn REGS

.c¢% +RKCS1(RS) ;CLERR CONTR

SUNIT RKCS2(RS) ;CURRENT DRIVE #

83,

RKAR1 (RS)

GSTAT2

unag,u.na
HMR

:SELECT WORD 3

ngv
nor ser BY END OF SELECT DRV CMD

;
: STORE nsc aa

8CCLR,RKCS1(RS)

MOV
MOV
JSR

ggu Tnxcga(RS)
% 5)
;SELECT WORD 2
csrn 2

MOV

unna H.R2

MOV
MOV

ochnRKCSé(RS)
UNIT.RKCS2(RS)

ERROR

045264

TATUS

ONTROLL. n

MOV

Qggfl
935S
9356

000207

Fhon

;BR IF CERR

THI§ ROUTIIsSD%g
oBRT

—

9317
9313
931

SEQ 0177

MACY11l 30A(10S52)

MOV

HMR3,H.B2

01
nxfinx(nsa

Y NOT SET BY END OF SELECT DRV CMD
MSG A2

:STORE MSG B2

;SELECT WORD 1

CZMO UNIBUS_RKE DR _PRTI
ZRBHE .P11
25-JAN-78 12:00
045360

% T
1 003352 i
i
813737 gazaso 883378
04

i
WM

=
e

A RRR AR &8

MOV

HMR2,H. Al

2 B

117

,RDY NOT ssr BY END OF SELECT DRV CMD

HMR3. H.B1

:STORE MSG ax

MOV

11 o 5 o

hnuazuiao

§?ERE°TSEETOBY END OF SEL DRV CMD

ggg

égpa+,rsn91

;RESTORE TEMPI

MOV
BIS

s
[

:ADD CDT _IF RKO?

¥?011hxcsxtRS) iGET STATUS
PC, #novx
;FIND CONTR _RDY & STORE DRIVE REGS ONLY

sgg

35,(591

PC’

5 EY e7 G
10058073

89'0003

9410
9411
9412

%1"006
1406

04SS4e
045546
045Sse

THEN
;;Egusgulgue
000010
003360

000207

4UBCLR: ggx

cunnsn

003322

18:

END OF THE TIMEOUT,

AN ERROR IS FLAGGED.

STATUS & CHECKS FOR CONTROLLER ERROR (CERR)

OSCLR nxcsetRS) ; SUBSYS CLEAR

JSR

#as

gl
JSR
gés

Y
o
PC
csrnr
'cs#
STATUS
:CHECK FOR CONT ERROR
rgtan,ncsx

RTS

ERROR

000010

ggg

3%,(59)

;rxuo
RDY
:RDY NOT SET BY END OF SCLR

;SKIP OVER ERROR

:RERD THE SECTOR COUNT IN RKMR3, RIGHT JUSTIFY IT & STORE IT IN 'SECTOR’
000026

g 4 B8146€
mEr miw
006237

vgo BY

iRETURN +2 I ceas CLEAR

000002

a
S04 01
g
g
g

:RET HERE IF NOT RDY

iRET HERE IF

§Tuxs ROUTINE DOES A suesvsrsn CLEAR & WAITS FOR CONTROLLER READY

;3% 4 1576 40
9391 HYY %7 5550
3401

LDRV ucsx

:STORE MSG BO

ggz
J°R

: IF_RDY ¥s NOT REC

:STORE MSG
A

8CCLR, RKCS1(RS)

suuxr RKCS2(RS)
gstat2

RTS

Geocts

017
—e are

PAGE 178

MOV
JSR

sgson

37.

9383
9384

$2
ER

PC,GSTAT2

MOV

GSTAT2:

12:08

JSR

MOV

003360

25-JAN-78

ERROR

000000
000010

812637

J1Y4

VALUE FOR SOFTWARE SWITCH REGISTER

MACY11l 30A(10S2)
GET

RDSEC:

MOV
JSR
MOV

#3,RKMR1 (RS)
PC’ csva
HMR3,
SE

ASR
ASR
ASR
RTS

SECTO
szcton
SECTOR
SECTOR
PC

sgcR

;WORD 3

ofcchssc7> SECTOR
;RIGHT JUSTIFY
::SECTOR
:

CZREHED UNIBUS RKE DR_PRT1
CZRBHE.P11
25-JAN-78 12:00

2
gt
gt

L
H 1 1
TM

737

TM é
g:sg

1§§§

gzgz

3329

S433

Quses?

£
£

1406
04SS0o4

003360

2s:

003360

3s:

000002

40 | 01

0456

3338

37,
37

571

3325 045730
459
7
ol

01276
73;

S5 g
mev
g:h?
046004 001002
9464

9468

BNE
JSR

[
PC, RDSEC

IST

gsér

SECTOR

;LOOK FOR SECTOR O
;BR IF SAME TWICE

BEQ
DEC
BNE
ngv
RTS
MOV

18
(SP)+, TEMPI
P
(SP)+, TEMP1

RTS

ADD

;SAVE_TEMP1
:SETUP TIMEOUT
-READ SECTOR

MP1

82, (SP)

; TRY AGARIN IF TIMEOUT NOT UP

;ELS$ RESTORE TEMP1

;EXI

; SKIP OVER ERROR

1402

’

003360
001406
001406

003360

046006

005037

FNS22:
18:

3s:

(SP)

MOV

TEMP1,

JSR

CHP
oea' 5

Pstg?gcron
MP1

MOV

ggg
J

2s:

S5 e B 0%

4SS
456

TEMF1,-(SP)

75000, TEMP1
PC, RDSEC

iFIND NEXT SECTOR IN 22 SECTOR FORMAT

g::;

3330

18:

MOV

IN 22 SECTOR FORMAT.
IF NOT OUND BY TIMEOUT

MOV
JSR

TST

12637 003360

Deo7le

fso22:

001406

g GRS
3::2
6 lggé 835504
44

003360

FLAGGED

:ERROR FLRGGED IF NOT F OUND BY TIMEOUT

3:33
443

:ERROR

TEOO t n?f

Egtc,

CTOR
c

BNE
MOV
RTS

18
(SP)+, TEMPI
PC

RDD

82, (SP)

MOV
RTS

(gp)+ TEMP1

; SAVE T%HP 1
TIMEOUT
;SETUP
;READ SECTOR
;BR IF SAME
;ELSE TRY READ DIFFERENT TWICE

17 1FE LEFT
1Blst"TRY RGAIN
;RESTORE TEMP 1

:RESTORE _TEMP 1
'SKIP OVER ERROR

:RERO THE CYL DIFF/OFFSET IN RKMR2, RIGHT JUSTIFY IT & STORE IT IN ’'CYLDIF’
000026

RDCYLD: MOV

001362
001362

MOV
BIC
ASR

012064

JSR

ASR
ASR
ASR
CMP
BNE
CLR

82, RKMR1 (RS)

PC.GSTAT

;WORD 2

HMR2, CYLDIF
MASK] ,CYLDIF
CYLDIF
CYLDIF
CYLDIF
CYLDIF
CYLDIF, MASK
1S
CYLDIF

IGHT JUSTIFY

;

YL DIFF/OFFSET
INFO

;CHK TO SEE IF RET IN COMPL.
F_NOT
;CLR IF YES
—

432

1363

§602

SSO4

*FIND SECTOR

SEQ 0179

-0

943?

K14

7
12:08_
PAGE 179
MACY11l 30A(10S2)
25-J AN-78
GET VALUE FOR SOFTWARE SWITCH REGISTER

FORM

CZRGHED_UNIBUS_RK
12: 00
P11 U528 ane78
CEREHE

25-JAN-78 12:08_
180
REGISTER
SOF THARE SWITCHPAGE
Qe 'VACUE FOR'

MACY11 30A(1052)

9469 046012 000207

18:

g:'é

000026 ADCYLA: oy

046062

ilo

132-4

37 001364
006237 001364

ASR
ASR

CYLADD
CYLADD

001364

Gs;‘n*(m

MASK i cvmoo

Q43737

012066 001364
D01

9%1

MOV
BIC
ASR

flf

RTS

SEQ 0180
:

iREAD THE CYL ADDR IN RKMR3, RIGHT JUSTIFY IT & STORE IT IN ’CYLADD’

:3ggg gfigz
46034

364

ASR

000207

HMRS, CYLAD
svt.

RTS

nsn

CYLDIF

;WORD 2

,nxcm JUSTIFY
,cv ADDR

: INFO

fig
! READ THE CYL DIFF/OFFSET IN H.AR2, RIGHT JUSTIFY IT & STORE IT IN ’'CYLDIF’
4
01
1
RCYLD:
H.A2 CYLD F
3488
81373
e 081388
"?v
nhsxl
9487
046100
006237
001362
#
sRIGHT JUSTIFY
BE
104
DOE
00
flgfi
YL
F
0

g:%

9y
bl
3:3-45 o461
ag;
wg

D06C
00E

001

D01

3737 001362 012064

001362

046

001364

Eré

9503

CYLDIF, MASK

évwxr

;cgn Toflgss IF RET IN COMPL. FORM

:ELSE CLEAR

18:
RTS
PC
! READ THE CYL ADDR IN H.B2, RIGHT JUSTIFY IT & STORE IT IN ’CYLADD'
001364

o046

cauaE

YLDIF

RCYLA:

0M6

MOV

BIC
asg
ASR
ASR

o46

RTS

H.B2, CYLADD

masnd CYLADD
Lgfib
Evm 8

;RIGHT JUSTIFY

CYLADD

! READ THE SECTOR COUNT IN H.B3, RIGHT JUSTIFY IT & STORE IT IN 'SECTOR’

3209
Ouesna ousy3, 293319
1 fig%
wfis Qoiuge RSEC:
3215 832553 38253; 381»05
éig

?Nfi

3&9
9518
9519

096230

046232
Q46240

fpsgs
6
6256

000207

013737
042737

sgg'i
000337
0207

003410
170777

wgs

0014

hOY
géfi
ASR
RTS

001432
001432

NiCeh
ESECTy, SECTORRIGHT JUS‘I‘?AR
FY UNWANTED INFO
CTOR

! READ THE HEAD ADDR IN H.B3, RIGHT IT & STORE IT IN 'HERDA’
RHEAD: MOV
H.B3, HEADA
BIC
#4C<M.HEARD>,HEADA
.CLEAR UNWANTED INFO

ASR
SWAB
RTS

H 33
HERDRA
P

sRIGHT JUSTIFY IT

gFIND LIMIT DETECT ON SEEK IN RKMR3 BEFORE TIMEOUT

CZREHED UNIBUS RK& DR_PRT1
CZREHE.P11
25-JAN-78 12:00

HORC0E FOR GOF TRtS?Tc“gfcig*sn

MACY11l 30A(10S2)
GE

;RETURN IF NOT FOUND:

9525

SEQ 0181

ERROR

iRETURN+2 IF FOUND: SKIP OVER ERROR

005037
e

001460
?777{
)
020000

03360

026

0033s2

FLIM:

335

%ITE?EMPl

18:

JSR
317

PC.GSTA
#0.LIMD,HMR3

DEC
BNE

TEMP1
18

003360
001460

2s:

000002

MOV

2&3

RTS

Ol,kKHR%(RS)

gIHIT g;;gca ERROR FLAG

SRBP

;EXIT IF SET

LIMERR

:SET LIMIT DETECT FLAG

O%,(SP)

;SKIP OVER ERROR

HE
HO
N RKMR2 WORD 1 BEFORE TIMEOUT
EE¥E£H%THTlng
“ggc
N TEHPS
;ROUTINE TO F

;RETURN+2 IF FOUND
- SKIP OVER ERROR

b feeend
032737
001367

062716
000207

EHOHM:

808228 18:
0033s0

003360

R
BIT
v

2s:

000002

csrn
HDHM, HMR2
(RS)

BE&

?!m

BNE
E

003362

8-1 TEHPI

ADD
RTS

“hh 1's
D1

18
TEMPR

82, (SP)

:SKIP OVER ERROR

LOAD HEADS IN RKMR2 WORD 1 BEFORE TIMEOUT
F*NP
gyTa“E ;0

RETURN+£
IF FOUNO SKIP OVER ERROR

éé????

3360
0026

010000

003350

2894

FLORD:
18:

003360

MOV

Péhxnn*(nsm

§§T

g'LORD, HMR2

E
BNE

JSR

ROD
2% ‘R

000002

#-1.T

MOV

:SET

:WOR

Tznsour

; SKIP

OVER ERROR

MP1

oS (SP)
&

ROUTINE TO FIND SPOK BEFORE TIMEOUT

EEBfiu+2 N?CLkERéETO SKIP OVER ERROR
TH APPROX TIME IN TEMP2

Q46460
O46466

012737
012765

177777
000001

003360
000026

FSPok:

MOV

#-1, TEMP1

81, kxnnxtns)

sALL 1°'S

:WORD 1

N14

MACY11 30“(1052 )
25-JAN-78
12:08_
PAGE 182
GET VALUE FOR SOFTWARE SWITCH REGISTER

003360
003362
000002

es:

PC,GSTAT
.g.SPOK,HHR?

EMP1
$
EMP2
FSPOK

RTS

PC’

R?g

;SEE IF SPOK CLERRED

82, (SP)

; SKIP CVER ERROR

FILL HERDER TABLE WITH E6 WORDS OF VALID HERDERS
NTER

uzno IN "HEAD’

{ENTER uxru ronnnr IN 'FORMAT’

FHDTRB: MOV
MOV
MOV
CLR

001434

MOV

ASL
ASL
MOV
SWAB
ASL

88
<8NENSINEY
OUVQOOS

001440

18:

2%:

003362

5%S 83

MOV

MOV
BIS
BIS
TST

000026

3%:

RO, -(SP)

R1.-(5P)
sHOTAB, RO
R1

HERD, HD1

;SAV RO

,snv Ré
:HEADER WORD TABLE ADDR
:SECTOR COUNTER

HD1
HD1
FORMAT,FMT1
FMT1
FMT1

;SETUP FORMAT FOR WORD 2 OF HEARDER

CALADD, (RO)+

;HERDER WORD 1-CYL ADDR

R1 (ngi
HD!, (RD)
FMTL, (RD)
BYPFMT

;SETUP HEAD # FOR WORD 2 OF HEADER

iHEADER WORD 2-SECTOR NO
;
~-HEAD NO
;
~FORMAT

BEQ

:BR IF TRUE FORMAT

JSR

PC, SECFLG

;GET

MOV

annog rsnpx

g&s

003362

2
3

JSR
gég

DEC
BNE
DEC
BNE

003360

Ron RER
RRE

0033s0

SEQ 0182

ENTER
NITH CYL& IN "CALADD’

SFns 28

FEERRRRRERE ERREREE BRRARRRRR
FRLDH2

1
1

1000
Goi000

3 7.

Vgfllfl

K
5

- CZREHED UNIBUS RK& DR _PRT1
CZREHE.P11
25-JAN-78 12:00

MOV

5<axrxu-arrxs> (RO)

;SET GOOD SECTOR FLAGS

SECTOR FLAGS

EMP

BIC

cnbnbo TEMPE

MOV

TEMP2, (RO)
+

;HEADER WORD 3-HEADER CHECK

INC
CMP
BNE

R1
R1, s22.
15

sscron CTR
ga
SECTORS DONE?

MOV

(SP)+,R1

RTS

BIC
BIS

MOV

(RO)+ tsnpx
TEMPL, TEMP2

(SP)+ 'R0

nesron Rl

:RESTOR RO

(66 WORDS)

0 _UNIBUS_RKE DR_PRT
.P11
25-JAN-78 12:00

c
c

%‘0

SECFLG: MOV
TST

SETS BITS 14
BNE
MOV
JSR

3eu4s
r

18:
b

§ APPROPRIATELY

§P)
ORMA

; SAVE R2

oas eau+a.,ne
LG ST

;BR IF 20 SECTOR FORMAT

BIS

cai TRO)

;GET HARDWARE DETECTED FLAG

"ov

JSR
BIS

PEEE5?5? . ,Ra
oatrxu (RO)

Gt§55§THRRE’%E$ECTED
FLQG
RETURN HERE IF GOOD SECTOR

MOV
RTS

(SP)+,R2
-y

,ELSE RETURN HERE

MOV
RTS

(SP)+,R2
PC

;RESTORE R2

;RETURN HERE IF GOOD SECTOR

SECTOR TARBLES

UAL SCANN N

: 5:¥2R
W THN§HE°SSDRE
S OF TRBLE (BEH BS 22S, ETC) IN TEMP1
: RETURN +q?9

292 299992
2997 9292 2

g72 392558
BRRS SS88 B

010346

177?277

001366

THIS

FLGTST: MOV

R3,-(SP)

; SAVE R3

CMP

(R2), 8-1

;SEE_IF ALL 1°S
;BR
NO
;RESTORE R3

18:

2%:

000002

001430

ROUTI

3%:

BNE
MOV
RTS

(SP)+,R3
PC

CMP

(R2)+,CALADD

;SEE IF
= CYL 8, & ADV PTR TO TRRCK/SECTOR WORD

oa,aa
18

;GO TO NEXT CYiL WORD IN TRBLE

MOV

usno R3

;GET HEAD % FROM FHDTAB ROUTINE

CMP

éé)+ R3

sscron/m:no COMPARE?

BEQ
BR
000004

ys:

MOV

ADD

RTS

(SP)+,R3

84, (SP)

ADD_SECTOR & FROM FI"DTRB ROUTINE

LACcyL

& INCR TO NEXT CYL WORD

; TRY fix
;REST

; INCREMENT RET ADDR

THIS ROUTINE SORTS THE RHTAB_TABLE FROM WHATEVER SEC TOR_IT BEGINS

WITH AND RE-WRITES THE INFO IN SRTTAB TABLE TO BEGIN WITH SECTOR O

o4
047060
o4

iee
R

NNN

SEQ 0183

IHIS ROUTINE GEIS INFORMAT ION FROH THE BAD SECTOR TRBLE FILLED BY A PREVIOUS TEST

2 rchREc1STer

OR SOFT

9637
%

PRRRPRRRL LRARR
As I A
3
W

B1lS

MACY11 300(1052)gS-JAN-78

éonr.
045504

MOV

MOV
JSR

RO,~-(SP)
R1,-(SP)

PC,RDSEC

; SAVE RO

:SAVE Rl

CZRGHED UNIBUS RK
25-JAN-78 12:00
CZRBMHE.P11

ot 382{loszE ESRJggF;SQRéQSB?TCnflaEG{E?ER
001406

£0

881906
1674

001406

1674
100
002100

001674
001406

18:

MOV

29:

MOV

s ot s B

SRR

JSR

000001
047164

b
=

SRR PRRRR
RRLD

DR_PRT

ClS

s o

RTS

MULTE:

047164

#
5 il

975;
97

047204

;MULT SECTOR BY &

géfimflao

;RO-SECTOR TO RO = INDEX

onfiraasecron

; SAVE INDEX

osnrtnéR1

; INDEX TO BOT HALF OF RHTAB
; INDEX TO TOP HALF OF SRTTRB

(n0)+ (R1)+

;PUT BOTTOM OF RHTAB TO TOP OF SRTTAB

(R0)+lnau
RO

;PUT TOP OF RHTAB TO BOT OF SRTTAB

1s
0, SRATAB+132.
SRHTAB
,
S

(SP)+,R1
(SP)+,R0
PC

;RESTOR Rl

;RESTOR RO

MOV
A

RTS

SECTOR
CTSR.-(SP)
TOR
(SP)+,SECTOR

;2 X SECTOR
4 X SECTOR

(4 X S)+#(2 X S)= 6 X SECTOR

*ROUTINE TO TURN L OR P CLOCK INTERRUPT ON
4

74
97%% B
047226
9734

ASL

ADD

81,SECTOR
PC MULTE

IMULT BY 6. ENTER WITH DESIRED # IN 'SECTOR’

e Bt b

9720

SEQ 0184

047230

SLKoN:

8853
000100

132100

177777

132064

198:

ggg
BNE
MOV
RTS

MOV

TéHUP
PCLKF
13
#100, ILKS

;L-CLOCK, ENRBLE INT

#-1,3aPKSB

;P-CLOCK,

; BRANCH IF P-CLOCK PRESENT
ALL 1’S

CZR6HED UNIBUS RK6 DR PRT1
CZREHE.P11
25-JAN-78 12:00

E.,g

97"01

9742
9743

8:73‘.35

77?

00S037

0472S6
047260

001010
013737

00013S

MACY11 30A(10S2)

12:08

PAGE 18S

SEQ 01858

GET VALUE FOR SOFTWARE SWITCH REGISTER

132054

MOV

RTS

#13S, IPKS

;ENABLE INT,

001376

001372

DEC

COUNT

MoV

HZ,COUNT

BNE

CT UP, REP INT

:LINE FREQ & RUN

{KW1l-L & KW11-P INTERRUPT HANDLER
&Lock: CLR
TIMUP

7?5.3 005337 001372

001370

25-JAN-78

MACY11l 30A(10S2)
GET VALUE

001374

7§7‘0

001376

DEC

18:

RTI

ELS

@25-JAN-78
1 e: 08 PAGE 1 186
FOR SOF TWARE SWITCH REGISTER

S¥
ne

\lma\l

DD DD

IBUS_RKE DR_PRT1
25-JAN-78 12:00

SEC

%?HLP

;

; SORRY, TIME IS UP*

'ROUTINE TO TURN L OR P CLOCK INTERRUPT OFF
302

737

LkoF:

132012

003466

0207

131776

18:

TST

PCLKF

B
cL

1§
aLks

;BRACH IF P-CLOCK PRESENT
'L-CLOCK, CLEAR INTERRUPT

CLR
RTS

aPKS
PC

;P-CLOCK, CLEAR INTERRUPT

RTS

SEQ

0186

cznsueo uuxaus RK&6 DR PRT1
CZREHE . P
25-JAN-78 12:00

MACY11 3ontxosa)

-JAN-78

F15

12;

187
sfl?rc&'gscxsrsn

T VALUE FOR SOFT

SEQ 0187

3757

9758
9789

§ruxs ROUTINE

761
9762
9763
g?&u
;ss

Rl IS xugaeneur . AT THE $ND OF *7 ROTATES ( TEMP1 BACK TO ORIG),

729

9770
3;;;

81819&

3;75

;

37
672§

;

9790

97?5
3;

18:

7m
73
7372
7374

ROL

2s:

00000
o
e
12601 .

003360

12600
07

TEMP1

i 2AVE A1

:SHIFT COUNTE

;cognv % OF 1’'S IN TEMPI
:CLEAR CARRY

BCC
INC
DEC

2s
R1
?g

;BR IF CARRY CLEAR
:COUNT 8 OF 1’S
:SHIFT COUNTER

BIT

#BITO,RI

o B Go8

Rgz

cgp)+'RO

535

3s :

M)
s1?. RO

?"ggaklsnpx

& T A0

3§EETSGEIRI
:RESTORE RO

ROUTI?E TO ENABLE LOOPING_ON INTERMITTANT ERRORS
iWHEN SLPERR SET BY OTHER THAN SCOPE ROUTINE

7376
7404
[y

777 00

;

-y

001103

001110

9;%
3900

7422 011637 001110
7426 000002

373
7

9801

CLR
LC

333

9794

Seam: v
MOV

000021

omppenp—

G2
9782

2700
1

E?a‘8

£NE

INDICATING AN ODD # OF 1°S,

;égr INI¥E=SI gsr, 1 xcgsxnc AN EVEN # OF 1°S ,THE PARITY BIT IS

Q47
7

PARITY FOR THE EXPECTED MSGS

En%ugx;ngl¥$ sxgnggco.Txr ; I'x‘sase ,

3;23

9;§§
97

GENERATES

:ENTER H}TH
CTED WORD IN TEHPI
: “TEMP1
ROTAT! 8 Lsr
17 TIMES.
EACH TIME THE CARRY BIT IS SET

760

131534

1E:

MY LOOP MACRO

8coP1s:

BIT

3éo
7578

BEQ
MOV
RTI

18:

ggy

1? %

aSWR

P ON ERROR?

b IF NO

ssanc
5

:HAD ERROR?
:BR IF NO

(SP), SLPERR

:SET LOOP ADDR FOR TIGHT SCOPE LOOP

LPERR, (SP)

3503

,RE URN IF NEITHER SET

3608

THIS SUBROUT INE }s geo AT THE END OF ANY TEST THAT REQUIRES
DRIVE BEFORE LOOPING ON AN ERROR OR TEST
:RECONDITIONING O

.CHECK FOR SWI4 (LOOP ON TEST) OR SW8 (LOOP ON SPECIFIC TEST)

980S
98

RETURN +2 IF EITHER SET

980

gi? 047430 00S037 001176
9812

047434

00S037

001410

&uTST:

CLR

SESCARPE
LPFLG

131472

000400

131454

18:
2s:

000002

7469
a9

047476

131446

001102

3%:

BIT
Q

82, (SP)
PC

BIT

#SW8, ISWR

gfiga
BEQ

SEQ die8

;LOOP ON TEST?
iBR IF NO

#SW14, JSWR

RDD
RTS

RTS

;LOOP ON SPECIFIC TEST?

'SR05§ ¢o T? SWR <7:0»>
:a& IF vEg ;
’

F] STSTNM
1?““'

THI? ROUT%N? 1S
EN1EREE
BY TYPING CONTROL-C.

ATOR TO HALT THE CPU WHILE INSURING

W
N

LEsbEbEs bl R

e e

s e

DOV
N LW

DLBD DD

CZREHED UNIBUS RKE DR_PRTI
CZRBHE.P11
25-JAN-78 12:00

GlS

12:08 PAGE 188
MACY11l 30A(10S2)
25-JAN-78
GE T VALUE FOR SOFTWARE SWITCH REGISTER

LOADED & Fonnnrrxnc 1S VALID BEFORE ACTUALLY HALTING

ruz cpu.

&toP:

022626

(SP)+,(SP)+

ggfl

PC, SUBCLR

:CERR AFTER

1ST

UNLD

; SEE

Q
TzPE

18
égscn

:BR IF MANUAL MODE
:PGM ABORT PENDING

ROR

005537

001403

fa e
047536

047542

003304

000042
056640

égz

0S6667

aw—

012;3?

000011
043434

003322

001420
O44044

003362

164131

ERROR
MOV

Jgn

ERROR
MOV

003304

Qurees GBI
7612

012765

000001
045074

PC, SUBCLR

#SRTSPL , HCS1

PC,

121

DOCMD

1500, TEMP2

CLR

UNLD

TST

BEQ
MOV

?°§
ESROR

000026

,MSG7S

PC FATT1
&7

010

JSR
ERROR

INC

003310

01375 000613
043434
104124
012765
004727

3s:

003306

100000

?vps
JSR

004737
104024

:RESTORE STACK FROM INTERRUPT

CMP

MOV

JSR

BADHDR

HPEND

rfigsnos UNLORDED

:SEE IF MANUAL OR AUTO MODE
:HALT PENDING

;CERR AFTER SCLR

& GET CONTR RDY
;23 START SPINDLE CMD
:RDY NOT FOUND AFTER ST SPIN CMD.

:SETUP

_TIMEOUT

:FIND_ATTN
INO ATTN AFTER ST SPIN CMD.
;SEE_IF HERDERS VALID

:BR IF YES

8CCLR,RKCS1(RS)

suuxr RKCS2(RS)

ogEfiOCS1
P54

#1,RKMR1(RS)

PC,GSTAT

T CONTR RDY
CMD
0DYRECAL
NOT SET nrrgs RECAL cng
,SELECT WORD 1

CZREHED UNIBUS RKE DR PRTI1
. P11
25-JAN-78 12:00
CZREHE

003350

001414
044044

003362

8%5322 407802
%83

000000
000010
003322

004737
1040SS

9873

ng“TZ,HMR2
BYS:

ERROR

;

PC,FATTI
33

MOV

'CLEnkfiBCSI
1

e R

nor SET
qunxnc RECAL CMD

:FIND RTT
:NO ATTN AFTER RECAL CMD

gcsrsrnru

RIVSr?ki?"2CLEAR
GET CONTR
RDY
08
go
CMD
:TEST FOR ATTN

FORM

sWRITE VALID FORMATS

1?4

031342

4S:

001176
o42722

58:

JMP

007730

;ATTN NOT CLERRED AFTER DRIVE CLEAR CMD
F MANUAL OR AUTO MODE

sgs .

g xr MANUAL MODE

SESCAPE
SEOP1

;naonr PROGRAM

,MSG?7

;CPU HALTED

STS

:START OVER IF CONTINUE PRESSED

tsogc?

Bas7td
0Se727

;RT

ISETUP
T

#CCLR,RKCS1(RS)

66S:

000042

10, TEMP2

SUNIT RKCS2(RS) ;DRIVES

o44012

12:08 '}’RGE 189

GET VALUE FOR SOFTWARE SWITCH REGISTER

020000

Bafaai

385
387

25-JAN-78

MACY11l 30A(10S2)

E" ugEos TO EXIT TO MONITOR

——

RAR

iRET IF YES
iRET+4 IF NO

0024

HPEN:

003306
003310

£:8:8:8

BADHOR
HPEND

,CLR VALID HALT FLAG
;SEE_IF HALT PENDING

#4, (SP)
PC

ELSE BUMP RET RDDR
RET
;&

000004

18:

.SBTTL

;BR IF_YES

UNEXPECTED TIMEOUT HANDLER

THIS ROUTINE ISENT;RED IF THERE IS
A.
B.
C.

DO NN LWh—-0O

WSRS5588885558SR

CHECK IF_HALT PENDING

BADTMO:
020000

05710S

131100

MOV
TST

BIT
B NE

TYPE

NON
E flgT MEMORY
BOUNDRY
STACK oveanou

(SP),RO

sl
:§u13,asun
,EM3

(NO SSYN)

nvs PC uusn: TIMEOUT OCCURRED.

TvYPOUT"
S1°ERAOR
?
ggxaxt
RRO
PEY ouT?

naokr TESTS uusxp T.0. @ PC=

SEQ 0189

CZR6EHED UNIBUS RKE DR_PRT1
CZREHE.P11
25-JAN-78 12:00
9925

0S004

35
3
9338
93939
9340
9941

(0S0104

&
O

LEROING ZEROS
2
Sfigsflg

JMP

JSLPADR

BIT
EQ

#SW14, ISKR
33

RE roas STAC
?oioca
ARTING no Rgr TEST
VE BAD TIMEO

TYPOS
.BYTE

18:

131014

032777 040000
1401

131040

2s:

.BYTE
BIT

3%:

000000

#SW9, ISWR

CMP
JMP

3349
3950 0SO114 012737 050130
3321 0201s3 01363, 001339
§352
9954
9955

9959
§30

050126

10423

(0S0130
134
142
144

00S037
032777
001001
000002

001176
001000

(0S0I14
05012

012706
000177

001100
130732

9367
9368
9
9970
9971
93972
337
9974

2
3573
378
79

9980

00S7uD
104401
01004

(0S0170
050172
(050173
(080174

104403
006
000
000002

MEMERR:

MOV

oxg SESCAPE

2s:

1 YES

REST
STACK
Enaon%“%ssrs

ERROR

(5P}, TRAPPC

236

;Lono ESCAPE
PC

CLR
BIT
BNE

SESCAPE
c;ue,asun
2

; YES,

MOV

osvncx 5p

MOV

JMP

IF EOOP ON ERROR

FORCE

STACK AND TRY AGAIN

SLPERR

_SBTTL RKO6 INTERRUPT HANDLER

3963 0S01S6 011600
050160
0162
050166

MEMORY CHECK ENARBLE TRAP

RTI

332
5

(SP)+, (SP)+

SEOP1

.SBTTL

18:

ON TEST?

no aaaucu

;AS_INDICATED. YOU CAN LOOP ON
;ERROR, LOOP ON TEST OR INHIBIT
; ERROR’ TYPEOUT BY SETTING THOSE
; SWITCHES.

3343

042722

PE--OCTRL RSCII

; UNEXPECTED TIME OUT OCCURRED

HALT

99y

394e
0s0108
022626
334
050110
000137

SEQ 0190

,,SRVE RO FOR TYPEOUT

104403
006

131086

PAGE 190

RO, -(SP)

MOV

1403
2626
177

1
1

I15

25-JAN-78
12:08
UNEXPECTED TIMEOUT HANDLER

30A(10S2)

010046

882999 001000

MACY11l

INTER:
055573

MOV

(SP) RO

TYPE

nscs

TST

.BYTE

.SBTTL

(RO}

RO, -(SP)
b
0

;SAVE PC WHERE INT OCCURRED.

GE;
PC BEFORE UPDATE.
AT PC=
:INT
:;SAVE RO FOR TYPEOUT
i TYPE

G0 _TYPE--OCTAL ASCII

:1TYPE 6 DIGIT(S)

! 'SUPPRESS LEADING ZEROS

POWER DOWN AND UP ROUTINES

; POWER DOWN ROUTINE
0S0176

050204

050206

012737

000000

000776

0S0210

000024

SPWRDN:

MOV
HALT

#SPWRUP
, PWRVEC

:SET UP VECTOR

‘-a

;HANG UP.

MACY11

25-JAN-78
12:08
OWER DOWN AND UP ROUTINES

3gfl(1052)

PAGE

SEQ 0191

s
i
4 e

050256

04401
000S
000137

050262

000000

00554

198:

CLR

INC

SPWRCT

?:HRCT

#$PLRDN, PWRVEC

000024
000026
000036

#PR7
, PWRVEC+2

#PR7 | TRAPVEC+2

#STARLK,
SP
,MSG11

055761

LOOP_FOR _TTY
FOR THE INCR

$PWRUP:

050262
0502be

Bege1q
0208

; POMER UP ROUTINE

LR TR

)

L8280 sesegganet |

CZRBEHEO UNIBUS RKE DR_PRT1
CZREHE.P11
25-JAN-78 12:00

HER7DOHN VECTOR

ALL _INTERRUPTS FOR TRAPS
ZE_STACK
OWER FARIL

PFSRT

012170
SPWRCT:

;WARIT COUNT FOR TTY

.SBTTL

0
~N

B:5
a8
R 2243 222255 Rnonn R ANB5888888888%Sonaaas|

CZREHED UNIBUS RKE DR_PRT1
25-JAN-78 12:00
CZREBHE. P11

K15

MACY11 388(1052)
25-JAN-78
12:08
OPE HANDLER ROUTINE

TROL

#ggP

ST R(s

nnoong ; Pk

iTHE SWITCH OPTIONS
¥SWIY=1

ey
Ty

777

040000

130644

LOOP ON

18:

TESTS. IT WILL INCREMENT

HE DISPLAY REG.(DISPLAY<7:0>)

BY THIS ROUTINE ARE:

.:ggeg:x

$SCOPE:

INTO

RFLG) INTO DISPLAY¢15:08>

5nuxa?¥ I?ERRTIONS

H
104407

ovx

NM)

f¥aWll=1

; ¥5109=1

DONCNLWN-O

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

SCOPE HANDLER ROUTINE

iTH 5 a837¥us ?

LOOP ON ;nnon

SCOPE
CKSWR
BIT
BNE

TEST IN SWR<7:0»

; s SCOPE=10T
#BIT1Y4,3SKR

SOVE

;s TEST FOR CHANGE IN SOF T-SWR
; ;LOOP_ON_PRESENT TEST?
:YES IF SWi4=

. s484¥START OF CODE FOR THE XOR tESTERswsss

§XTSTR: BR
0000
324

st et ot Pt Bt Bt Bt P

5%:

000400

130576

130570

oo1102

Bt Pt Bt Bt s
e Bt B

00111S

001103

001000

130540

001110

001106

001104

0S0476

1052
113737

001104
001174
oo1214

MOV

S8ERRVEC,~(SP)

"oV
BR
CMP

SERRVEC
455;

;;§§T F

(spg+
C ;500
iRECTORET
SSVLRO
iL
(SP)+, (SP)+
(SP)+,38ERRVEC
7

;;
"E

rsn n TIME OUT
acx
fi
senr TEST
o«

ggxroa.asua

”fin

r%spsc TEST?

BEQ

SOVER

:iBR

_IF YES

MOV
BR

CMPB
;gza

ugugu THE_"XOR"TM rssren CHRNGE

;3 THI
;;SA

TRUCTION TO A "NOPTM (NOP=240)
ONTENTS OF THE ERROR VECTOR

THEu;
ERR?:;VECTOR

FOR THE XOR'? oosno

ISR, STSTNM

5532 *HE RIGHT TEST?

SERFLG

.;ggsxgfl ERROR OCCURRED?

SWR<7:0>

gnga

3§Rnax,searLc

78:

BEQ
ggv

Y
gbcssn,stnon

:3BR_IF NO
::SET LOOP ADDRESS TO LAST SCOPE

&Re
BR

TS
18

OF ITERATIONS TO MAKE
33 ZE R T e EROMBER
:Eggcnpe #5 THE NE é5
:; INHIBIT ITERATIONS?
08
i31F FidS
FIRS e
PROGRAM

BIT

3s:

e e

130506

;;*r

6S:; ¥88¥8END OF C

2s:

001103

MOV

000004

Pt s ot s s P

B Bt s

SEQ J192

3 l&llllllllllilllllilllIll!lillllllil!llllilllllilll!lllll!l!ill

B Bt Bt e s
Pt Bt B

PAGE 192

18:
$SVLAD:

BIT

#BIT09, aSKR

#BIT11,3SWR

oASS

S
BEQ
INC
CMP
BGE

MOV
MOV

INCB
MOVEB

18
SICNT
grxnss.sxcnr
OVE

#1,SICNT

SMKCNT,STIMES
STSTNM
STSTNM,STESTN

:EggxiFegfions FOR THIS TEST OCCURRED?

::LOOP ON ERROR?

i
xnux ;Taarsnnrxons
..xncns
UNT
.;cue
sn gr
IT nnrxons MADE
:iBR
T
QUIRED

,,ne*nxr
H;
ssan xou counren
;;SE
e ATIONS TO
D

: s COUNT TES
;;SET TEST NUHBER xn APT MAILBOX

CZRGHED UNIBUS RK&

CZRBHE .P11

26-JAN-7812:00

1%5
8?.8?}4
mosg 050520
10057

}m
10060
ioogé

DR PRT1

050526
8383433
0S0S42

MACY1l 30A(1052)

SCOPE HANDLER ROUTINE

u;a 001115

CLR
MOVB

1127
013777
863563
003720

000001
G01102
001106

25-JAN-78

130406 SOVER: MOV

sg\xf
SMXCNT: 2000.
.SBTTL

L1S

12:08

PAGE 193

SEQG 0193

sfp&

,,cu:Y ALLOW
THE EONE(1)
CGPE ERROR
rnon ERROR
ADDRESS
ON NEXT TEST

SLPADR, (SP)

EEF
TURN ADDRESS
: iMAX. NUMBER OF ITERATIONS

srsmnaoxsmv : ;DISPLAY TEST NUMBER

ERROR HANDLER ROUTINE

iggsg

Hi#;lll!il;llll:;llll%llili#l;;glg;;llllllll;:fil#:&li;;g;l!gafi;*

ioow

;35 sulmcu on'x‘gfi mo

v??% Efi 'f'rrlnm FE ABORES OF TrETERROR CALL

130023
10070

%SW13=1
; ¥5W10=1

{oon

:gggg-x

ififi
10075

100;9

H
0S0S44

iw
1%;3

SERROR:

104407

22 d0r5ys
LCoMOs 130360 o
157735 001102
77 002000 130350

1%0
10081

iooeo
1%
1

001230

ifi%

1@%

1
10100

ggn

00S777
1

130244

{oma

032377

001000

{ iog

050;13

ooszg;

001176

igigé

1§i8§ 8.5.8;13 3957
18189 8?87

001110

8?5715 001176

; ; ERROR=EMT AND N=ERROR ITEM NUMBER
.,rs§r
FOR C

IN SOFT-SWR

&2RTIC
83?«97“?‘
NUMBER
OF ERRORS
(sm SERRPC
..cer ADDRESS OF ERROR INSTRUCTION
fiPcxrsna ;STRIP_AND snvs mc emon ITEM CODE

’

TYPE
CMPB
BNE

sc
cmreuv SENV

22s:

22s

—

2s:
130230

CKSWR

INGE
MOVB

050664

DOQ

ERROR

LOOP ON ERROR

%RFLG
oon T LE TEST
R?%NUMBER
thg GOANDTOERROR
ZERO FLAG
$TSTNM, 3DISPLAY ,.oxspmv

BIT
BEQ

i%
% gfig;?d
B01502 i 18::
i :
11;37 001116
1008¢&
?;73;
831114

; 92‘7'

mua?'r‘ Emoa TYPEOUTS

BELL ON ERROR

5238
MOV

1402

fo0e!
1

BY THIS ROUTINE ARE:

3%:
4§:

'5'85

B
JSR

?gxa

TST
aPLT

#BIT10, 3SR
18

:BELL ON
snnom
iNO
-

'samSR
m-ena

RS
TR
,.co T0 USER ERROR ROUTINE

rsng ?axs

;RUNNINGIN APT oos

.,no SKIP mr enno

,,ggm&;spn

;anga NUMBER

; ;APT_ERROR_LOOP

aSWR
33

i HAL on ERROR
..sxn; Egmmus

axz

:gnoe,asun

.,LOOPFON ERROR SWITCH SET?

ggg

sgscnpe

"SSE?F ;3&: AN ESCAPE ADDRESS

CKSWR

RSV

MOV

SLPERR, (SP)

§sscnps, (SP)

;i TEST FOR cfigflce IN SOFT-SWR
Pfio& ggrunn FOR LOOPING

: 'FUDGE RETURN ADDRESS FOR ESCAPE

CZRGHED UNIBUS RKG& DR PRT1

CZREHE.P11

25-JAN-78 12:00

MACY1l 30R(1052)

ERROR HANDLER RMJTINE

ifli?fl Bgfigfl 022737 043010 000042 —

10111
1 us

l H

0S0736 001001
§§§73§ 000000

iofig

000002

CMP

BNE
HALT

MLS

12:08

PAGE 194

#SENDAD, 3842

RTI

.SBTTL

181 17

25-JAN-78

TYPE ROUTINE

SEQ 0194

;;ACT-11 AUTO-ACCEPT?

: ;BRANCH IF NO
::YES

; sRETURN

$2lllllllllllllll!llllllllllllill!ill!llllll!Illl!ll!lll!illllll!

{18153
{19
10121

n
noum?ls
WILL
mSE
nr Axw'?fiz MksfiTER"IMTEF“""
A9
avgséo
'?
m
ro
E
gs
U
S
}
ES CHARACTER.
morseSFILLS cong:g :Enasc
LLER CHARA TERS nzoumeo

10124
10125

%CALL:
m USING A TRAP INSTRUCTION

10158

:“'
;:

igfig

:norsa.

xong

%gig
10131

101
18135
ioian

1§1$
101

1101133

} i:o

794 1057
3?3750
1
050753 000000

001157

m
1
000002

37
000001 001230
5

STYPE:

18:

000100 001231

1814& gx% 8%385 051014

Lan

1§13§
ig
10148 G

2s:

0S1
DS1

101

iox

101

igigé

A RX

10154

1§i

igfi

1050

giosu

10163
10

021100

o
£

ifix

1892

0511390

000040 001231 62%:

000002

122716 000011
1430

2716
1

ges:

4s:

000200

001205

001156

TSTB
BgL

1$TPFLG

msas A TERMINAL?
::ég
IF YES

MOV

38 —(SP)

i:L'fivz
$iGET nooa:ss OF ASCIZ STRING

YPE

5‘3‘-7

MOV

gnpa
NE
.‘%Sv

Ss:

wrsn@SENV

623

,;mu HERE IF NO TERMINAL

SAPTSPOOL
, SENVM ; ;

,b1S

NxAPT
gg; CONSOLE
ron

5522?@

AGE T APT

mfi%&?‘ioa APT

Jagm

PC,SATY3

. BNE

MOVB

'(’33»
-(SP)
43

;5&&
cumg'r’fiano
:iBR
IF IT ISN'T THE

slT)D

, (SP)

,;,’P SAPTCSUP, SENVM 5§§ggs“cousoc.hsgp
TST
MOV

cn&e
BEQ

SCRLF

6S:

ILL AFTE

nssnoa

TYPE

051156

TER 'ro

; sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING

O0S1ee2

, MESADR

cRPa

SRaae

10149
101

LEE
1

TYPE

axga

fgi:?o gigig % 051460

i ius ; { 16 1

SFILLC CONTA

( P)+
J+.RO

oHT,(SP)

nsncm.r,(sm

(SP)+

8kRB

ggflflRCNT

JSR

PC,STYPEC

BNE

CMPB

sFiLLc, (SP)+

s§° APT

R SSED

wpso omo STACK

TERMINA

::IF_TERMINATOR POP IT OFF me STACK
i
§
R?

ug; RETURN PC

ANCH IF <HT>

; ;BRANCH IF NOT <CRLF>

:sPOP_ <CR><LF> sauxv
;:TYPE A CR AND
L

::gtsflfl CHRRflSRSc ESUNT
;3G0 TYPE THIS
C

CTER

;31S IT TIME FOR FILLER CHARS. ?
;3
IF NO GO GET NEXT CHAR.

CZRGHED UNIBUS RK& DR PRT1

CZREHE.P11
25-JAN-78 12:00
10165 0S1106 013746 001154
10166
10167 0S1112
10S
000001
xgxgg “58
7
101
0511
4737
051156
10170
igi;é

051124
051130

105337
000770

MACY1l 30R(1052)

TYPE ROUTINE
MOV
78:
DECB
BLT
JSR

051222

DECB
BR

igi;’a
0S1132

112716

101

05114

632737

10180

1154

0007;;

101

moa;;

{

05037 051222

101;2
101

1018

101
iSig

{oias

131%

mxgg
101

10191

;gigg

12:08

SNULL , -(SP)
1(SP)
63

PC, STYPEC
SCHARCNT
7s

PAGE 195

SEQ 0195

:3GET 8 OF FILLER CHARS. NEEDED
::AND THE NULL CHAR.
;:DOES A NULL NEED TO BE TYPED?
::BR IF NO--GO POP THE NULL OFF OF STACK
::G0 TYPE A NULL
::D0 NOT COUNT AS A COUNT
; ;LOOP

;HORIZONTAL TAB PROCESSOR

10175

101;9

N1S

25-JAN-78

0511

11
11

u‘s,g
1164
i

737

1;72
005726

000040

051156

000007

1057

127766

1166
:i:

000002
00001S

gs:

0S1222

MOVB

9§:

1252
12
1224

93’
(SP)+

.,ma STOP
POP smcs OFF STACK

$TPS

: :WAIT UNTIL PRINTER IS READY

105227
000000

BPL

MOVB
CMPB

87, SCHARCNT

TYPEC

2(SP),aSTPB
'1' R,2lsSP)

r:EkneE

gtr:;mgm

BEQ
INCB

STYPEX
(PC)+

gma

$CHARCNT: .WORD

000207

,.REPLRCE TAB WITH SPACE

BNE
TST

STYPEC: TSTB

121
612% 000012 000002 18:
1216 001402

,(SP)

Pc, $TYPEC

BITB

127760
000002

8’

JSR

ILFPS(SP)

;i TYPEA SPACE

: :BRANCH iF NOT AT

: 3GET_NEXT CHARACTER

; iLORD CHAR TO ae TYPED INTO DATA REG.
1
cmmxagrfig CARRIAGE RETURN?

;.v§s--c|.snn CHARACTER COUNT

fs cmmcren
A LINE FEED?
H IF YES

,,coun ms CHARAC;
; ;CHARACTER COUNT STORAGE

$TYPEX:

RTS

}3{33

.SBTTL

CONVERT BINARY TO DECIMAL AND TYPE ROUTINE

10196
10197

3 lll!llllllllll!lll'll»lI!Il!lllilllllllllllll!!Illiilllililllllil
lm-us
Rogg uss? TO CHANGE
A ? IT gx Y NUMBER TO A S5-DIGIT

10199
10200

munasa
nasr

10203

10198
i%gé

10206

‘¥

051226

81 32

1§1é gx

§‘§¥

mgxg gx

figucosn

osi M

}oafu

1021

1254

10217

051262

10219

051270

10220

051264

051274

DEPENDING ON WHETHER THE

;vs NEGATIVER SPACE OR A MINUS SIGN WILL BE TYPED
HE FIR
GIT OF THE NUMBER. LERDING ZEROS WILL ALWAYS BE

MOV

TYPDS

SPACES.

NUM, -(SP)

,,PUT THE BINARY NUMBER ON THE STACK
:GO TO THE ROUTINE

$TYPDS:

ioaio

maxg

c;mu. (RSCII) mmen auo YSE IT.

gg& ED WITH

135%

oioa%

766

012703

112723

00S002

MOV

ngx

200

MOV

0020
0000SS
0S1442

000040

Bngz
000001

NEG
18:
2%:

MOVB

é:-(gm

na,-fsg;

ogbeog,-(sm
SP),RS

%’-,1(SP)

CLR

MOVB

MOV
CLR

#SDBLK,R3

,(R3)+

;59335 né 8“ m

,.gusu R3 ON
S

sg"i"gfzm&fgn
nflo SIGN

“aGET an I P

HH é 8 Ngv
nuneen POS
,,mxs T

: s 2ERO

R NEG

s moex

..serupTHE ouwur

PiSET T

NTER

IRST cunnncrsn TO A BLANK

; ;CLEAR THE BCD NUMBER

CZRGHED UNIBUS RK& DR PRT1

CZREMHE.P11

25-JAN-78 12:00

1022

‘553 0

i 0

{

102
1
1

1023
1
1

051432

Ys:

1318

1
1

102
18538
113530

1
1
11

1
1

bbb3

1022
720

1
1024
iwoau

1
136M
}

0s02
b4
i 7

1
1

1
14

xgssa
13

1024
1
1
1
10251
1

1
1
1
141
141
1914

10254

12616

i
wasnasg

ii! ooolum
1-133 000012

10260
ioasx

10263

10264

%oass

000001

830050

0040

177777

6%:

000010

177777

1
1
1
12601
12600
10440 831442

1
1

3s:

1
1
1

0002

177776

ADD

R1,RS

g;c

TST

ang

TST8
BMI

112737

(SP)
7%

(%P)
6
1(SP),~1(R3)

TST
CMP
BLT
BGT

(RO)+
RO, #10
2%3

BIS

BIS
MOVB

MOV
MOV
MOV
MOV
MOV
TYPE
RTI

#'0,R2

1830'
10.

.BLKW

;;GET THE CONSTANT
H

BCD DIGIT

;E?fic&nse“ 5»: BCD DIGIT BY 1
;0

;;RDD BACK THE CONSTANT
; ;CHECK_IF BCD DIGIT=0

;;Fflfl. THROUGH é”' 0

:38T L# egmc LERDING 0’S?
;3BR 1
S
; ;MSD?
:3BR_IF NO
::YES--SET THE SIGN

%' .Re
R2, [R3)+

: iMAKE THE
ogcxr RSCII
.
;;mxf
IT
A
é‘
NOT
ALREADY
A
DIGII
:IPUT_THIS CHARACTER IN THE OUTPUT BUFFER

RS,R2
gpn

;;GET
kS?
;G0
0 ASCII
;;mms”[m LSD THE FIRST NON-ZERO?

;;vs§--§ THE SIGN FOR TYPING
1iSET T
TERH%NRTOR

(SP)+,RS
(SP)+.R3
(SP)+.R2
(SP)+.R1
(SP)+ RO
SDBLK

(SP)+. (SP)

10000.

; ; JUST INCREMENTING
; ;CHECK THE
TABLE
X
;360
?8
THE
NEXT
D
'c'fi
::G0 “Exxr

:;POP STACK INTO RS
: iPOP STACK Imo R3
::POP STACK INTO R2
::POP STACK INTO RI
: iPOP STACK_INTO RO
; : NOW TYP; Tu;; NUMBER
: JADJUST

THE

STACK

; sRETURN TO USER

APT COMMUNICATIONS ROUTINE

o o 363636 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 6 3 36 36 36 3 36 36 36 3 36 36 3 36 3 36 3 36 36 3 36 3 b 36 36 2 3 3 % % %

$ATYl:

SATY3:

MOVB

ggvs

i8%3§
Q21206
OQtusg Coi7MM
}8‘5;.. osigis 6§%§I 000001 001230

gr
gnga

10276

BEQ

001425

sgp

é(g ),chm

ggwsa

051526

ASLB
BCC
MOVB

MOV

.SBTTL

10275 321520 132737 000100 001231

MOV

$DBLK:
051714

sg,ns

-1(SP),-2(R3)
(R3)

000004

000001

$DTBL (RO),R1

3._"?

MOVB
CLRB

000004

O0S1716

MOV

9s:

1442

&gzgs

PAGE

8s:

$DTBL:

osfl&

Blb

12:08

MOV
BR
ggza

3"753

000001

2S5-JAN-78

CONVERT BINARY TO DECIMAL AND Tvpé OUT INE

131

1
1

MACY1l 30A(1052)

BITB

#1,SFFL

;:T0 REPORT FATAL ERROR

#1,SFFLG
RO, -(SP)
R1.-(5P)

:;TO ONLY REPORT FATAL ERROR
::PUSH RO ON STARCK
:;PUSH R1_ON STACK

3‘1; hs{grl.c

1370 TYPE A MESSAGE

B
ggnenv.ssnv

;2?2558;1140 gnosn APT?

THORGY. TR ¢ MMESSAGE?

::IF NOT:

$APTSPOOL
, SENVM ; ; SHOULD SPOOL MESSAGES?
BR

SEG 0196

CZRGHED UNIBUS RK& DR PRT1
CZRBHE .P11
25-JAN-78 12:00

Clb

MACY11 3onuose) 25-JAN-78 12:08
T COMMUNICATIONS ROUTINE

ifl&?? osisao 017600 000004 Sasane

igfi -fi “2 g%;z 88?2?8
1
001224
i e
]

| IS

ioaeu

1§§§

}

10289
i

1%
i

xgg
1

}

1 g 1533

001224

gge

1&3
1

1636

1416

i 35

6507%
37 051716

q.l? 001230

000004 001865

18% 1;§ 86520"06
6?2887

10308 05171

10315

10316
10317
iggx

0S1712

051714
051715
051716

000
000
000

i) 67
000200
000001

000100
000040

MOV

gs:

13&.

1031
10314

i3sug START OF m;flR

000004

o mios R BBE
xggm
10311
waxg

$MSGARD, RO

i 1

118:

10309

SUB

n'Bngv
8v"

001210

ioam

: ;GET MESSAGE RDOR.

12737 000004 001210

o4 051626 3$:

$MFLG:
SLFLG:
§FFLG:

SEQ 0197

amsm RO

ig%
i
1§

197

MOV

18:
ans‘T‘g?
MOV
w1

001226

PAGE

ffis&?fi%
RO, SMSGAD
B
58
$MSGLGT
o:) SMSGTYPE
54(59:4g

%;;?’(sp)

,.sssxr owWRETHEY RR78s10n?
RS & m
reune
5;351
'f TM m"' 'ms ILéOWe
;3 TELL APT TO TAKE MSG

;;PUT MSG ADDR IN JSR LINKAGE
aunP RETURN ADDRESS

JSR
#c,srv#s
.WORD
O

;;c'gf't.' *YPEmggo

TST

:;ng«

T1STB

?5?

SFFLG
128
SENV

;.?aou.g
mom FATAL ERROR?
i
n APT?

GTYPE

:gfiflzgo#o Ln§r MESSAGE?

0 DLGTYPE

TAK ERROR
;;c&wz
£0 1%

MOV

MOV
S

.BYTE
.BYTE
.BYTE
VEN

nprgxzz:

gg(&l(’égmm.

(SP)+,R1
(SP)+.RO

O
O
O

uasen

:;GE

35s1'§K INTOkl

.,POPuguncx INTO RO
;;fiT

:
iMESSG. FLAG
:3LOG FL
:iFATAL FLAG

APTSPOOL=100
APTCSUP=040
.SBTTL

BINARY TO OCTAL (ASCII) AND TYPE

103

, o 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 36 36 36 3 36 36 3 36 36 36 36 36 36 38 36 36 36 36 36 36 36 36 36 3 3 36 3 36 36 36 3 36 3 % 3% %

iggsqaaaa

;&T'L
os—--su*sa usu'REEE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE

igaax

10356
10327
18353
igggcli

10332

figg%& n?ggéus)xs useg ;go %gsxg 16-BIT BINARY NUMBER TO A 6-DIGIT

Tk
%

Wopgg
NUM.-(SP)
g;;g N
’

i i e R oROTYPEOUT

::n-i sg 3 FOR NUHBER OF DIGITS TO TYPE

; 1=TYPE_LEADING ZEROS

..o-suppnsss LERDING ZEROS

' ¥§TYPON----ENTER MERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST

CZREHED UNIBUS RKE DR PRT1
CZREHE.P11
25-JAN-78 12:00

MACY11l 30A(10S2)
;

1
1
1
1
1
1
1
1
i

B %@fi%‘%@%fi@%fi%

MOV

TYPON

MOV

TYPOC

$TYPOS: MOV

MO
MO
gso

$TYPOC: MOVB

MOVB

NUM,-(SP)...
.,

;;NUMBER TO_BE TYPED

,,CflLL FOR TYPEOU

000002

000004

ILL

: sPICKUP THE MODE

:;LOAD ZERO FILL SWITCH
;;NUMBER OF DIGITS TO TYPE
: ;ADJUST RETURN
ss
:sSET THE ZERO FILL SWITCH

ggfioos+1,aq

:3GET THE NUMBER OF DIGITS TO TYPE

33,nq

“333;““?’
17 532 MAY. ALLOWED

égfgb):ns

L suxrcu
::Sfcxup TfiER?TP#
uoao

sgt

,,ronn THIS DIGIT

ROL
MOV

Rg
RS,R3

ggx

33"?°"I

SOFILL,RY

sgL

RO%B

E%t

::Shgnrs

NTO “C”

,,$$;§L$fi gr0}2§§’oxcxr

F
"Eg Tnxo
OF JUNK

Sop

33'*'5 ‘.22"'%"°"5E?T
SCEASCIIRE e

wfim&“ Puts o2

78:

R3,8%

BE}.

6S:

ggc
MOV

§u
(§P)+,Rs

MOV

2(SP) 14(SP)

MOV

RY4

3§77770,n3

TYPg
DEC
MOV

MOV

:3SET Tgs ITERATION COUNT

RS -(5P)

MOVB

O
4s:

légP):SUFILL
(SP)+.SOMODE+1
g¥‘(§§)

MOVB

3%:

d(SP),-(SP)

RY,-(SP)

2%:

; sNUMBER TO BE TYPED

;;CALL FOR TYPEOUT

:3SET FOR SIX(&) DIGITS

18:

NUM, -(SP)

86, SOMODE +1

$TYPON: noga

[

sP
et et et Pt Bt Pt ot Bt Pt Pt Pt Pt Pt P Pt s s s Pt e Pt et ot Pt Pt P

000
W

8328

SEQ 0198

,lgTYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER

PRRESEEIN)

s s| ol el el ol el ol ad el el ad ol ad el ol alatad ot ot ad e

8338

§§

PAGE 198

#$TYPOS OR STYPOC

: gRLL:

D16

12:08

BINARY TO OCTAL (ASCII) AND TYPE

1833

332
ifié

@2S5-JAN-78

S NT

(S5P)+.RY

(SP)+,R3

(SP)+. (SP)

,,ggzzvpgaruxs
o?crr
i
T
1
:BR IF MORE TO DO

:: Nsunsufigglflg¥cgzc§§n'r A BLANK
:
8REHSS
iRESTORE RY

;;RE TORE R3
:1SET

THE STACK FOR RETURNING

e
25-JAN-78
TO OCTAL (ASCII)

SEQ 0199

e be

00000

e e

55458

MARCY11l 30A(10

-000

ot ot Bt Bt Pt P

2R
R nR R R R R R P PR PR 2PP EEEREE oooc
rrrrg
o
LWh-0O SEYRRZCR=EBBVRRY NS DD TN £ W
O.BB IR DO

it s Bt Pt P Pt Pt Bt Bt Bt B Pt Pt e B

0_UNIBUS _RK& DR PRT1
P11
25-JAN-78 12:00

T TY KEYBOARD INPUT T QU

Bt B

URN ON THE KEYBOARD INTERRUPT

osrxgav ANTK
ofiaotxvsc

asSTK
#100,3STKS
PC

19Y TEOLIG
PuIF *ue cnn325¥fh

: %UPON RETURN EXIT IS

RRRR

nono

s Bt e

&TkSRv: Move
BIC

THE

TTY KEYBOARD INTERRUPT

R¥é8EFRg§ THE INPUT BUFFER AND PUTTING
STKINT
IS
CAL LED
AND
THE ~CONTROLC* RESTART
AGORESS (STOP)

“CONTROL-CTM

RADECTO

(#C)

MADE TO THE

#1C177,(SP)

;3P CKgP THE CHARACTER
:;STRIP
THE J
;;1S IT A gOQOROL c?

i3 YP; A

053354
052156

CONTROL-C (1C)

052270

000176

001140

$SWREG, SWR
6%

THE K;YBORRD
;;IN&
; ;CLEAN UP STACK
; ;CONTROL C REETRRT
G?
IT A CONT
:s
; ;BRANCH IF NO
;3 1S SOFT-SWR SELECTED?
;3GO TO SWR CHANGE

052300
052300

000001

0S2146

#1, STKCNT

;1S THE QUEUE FULL?

s et (et Bt Pt Bt Bt Bt Bt Pt Pt s ot et et
e Bt Dt Bt B
e

STKQIN, Stk

; ¥TK_SERVICE
ROUTINE
s ¥THIS
\ u; WILL

126714
657500
0003

COUNT OF ITEMS IN QUEUE
T
NG R?DRESS OF THE
HE INPUT & OUTPUT POINTERS.
HE KEYBOARD VECTOR

STKCNT
#STKQSRT, STKQIN

FEnn

S2R

s Bt P Pt Pt ot s s Pt B

PC, STKINT

7500

CZR6EHED UNIBUS RK& DR_PRTI

CZREHE.P11

25-JAN-78 12:00

1
1

i -

001200

000023

126612

1
1

126604

}0‘4

)

3s:

318:

&17)821
000100
146
835148

10468
i ¥
15453

im_%

16473

126556
328:

ys:
052155

0s2154

052150

10478

(SP)+

; ;CLEAN

387KB.-(SP)
'%3‘;’
(5P)
(SP)+, k21

OO T L RACTER
H
?5 Sah‘4:nsc;x
::1S IT A CONTROL-@

nc THE

,,EXIT

TTY BE

unnncrsn orr OF STACK

;IS ITA EONTROL-S’
;;WH IF
_NO
::DISABLE TTY xevaonno INTERRUPTS

CHAR OFF STACK

T;Ta

gstxs

BNE
MOV
RTI
INC

318
#100, 3STKS
STKCNT

H
gr NO
H
ENRGL
TTY KEYBOARD INTERRUPTS
; s
RETURN
; ;COUNT THIS
CHARACTER

BLT

BGT
8IC

4§
840, (

i
IF
:iMAKE 1T

INC

TKQIN

Hove
gxc
MP

CMP

(SP), #140

cspm,ox7s

MOVB
BNE

CHAR

$:IS IT up$§n CASE?

::1S

(5Pi+asrxoxn

TKQIN, 8STKQEND

; ;GO OFF

MOV
RTI

;iWAIT FOR A

IF_YES

SPECIAL CHAR?

YES
R CASE

T IT IN QUEUE

THE

POINTER

THE END?

; s BRANCH _IF NO

#STKQSRT, STKQIN .;=E§£T THE POINTER
33

8nftach_Pon
?““"?S»
i

igz;g gg'fl 02%’{37 000176
iggg?
gs }05{21 126464
1 gs
117746 126460
10484
bb
042716
0S2472
76

021627
001300

001140

au;
TST8

{8:95 0525{0 H;" 052156
wug? 835?15 005077 126422
{8‘0“3’@
0Sese2
0S2530

000001

104401

053366

T-SHR SELECTED

i xxr

BPL

$§¥

,,xr nor EXIT

BIC
CMP

#$C17?, (SP)
(SP), 87

BNE
NI

x; -(SP)

2%
20 3

una HRITING’

i3 YES

iMAKE IT 7-BIT ASCII
.,x IT A CONTROL-G?
:IF

NOT,

.,nno extr

PUT IT IN THE TTY QUEUE

000000000 000006 00 3600 3600 00 06 0000000 0 00 00000 000600066 06 0 0006 0600000 00060066 006 0

: kCONTROL IS PASSED TO THIS POINT FROM EITHER Tlfi TTY INTERRUPT SERVICE
; #ROUTINE OR FROM THE SOF TWARE SWITCH REGISTER
T
A RESULT OF A
000001

112737

AND WILL

ITCH REGISTER TRAP

5;;

MOVB

£ e smrer oouo

suggG,INSWRTTY xurs551

tcsufi

177600
000007

1044

'ssnv
HEPEEE

10490

10S00

TST

(SP), 823

3 Illlllll!llI“lll!lllll!“I&lll"lll!.ll!lllllllllllilllllil!!l

ifl‘i??

1bdge

tsp)+
13

CMP
3'%
c

,.saué

; kSOF TWARE
!ROUTINE
;

10475

10485
imgg

SEQ 0200

1ST
BR

$BELL

CMP

Ss:

PAGE 200

CMP

42359
052%558

FL16

12:08

BNE

TYPE

1
i
i
@g
1

MACY11 3??( 1052)
25-JAN-78
Y INPUT ROUTINE

001135

; #CONTROL-G_BEING YPEDMRN) THE SOFTH&RE

ts:

IT%IIQEG‘I‘&}TERBSENG SELECTED

CMPB

$AUTO

TST

(SP)+

.CLERR c ?L-G
orr STACK

BEQ

ANCH

JSR

PC,STKINT

astks
#1,SINTAG

naLs
vaonno INTERRUPTS
.,SET xursnnupr MODE INDICATOR

T QUEUE

TYPE

,SCNTLG

; ;ECHO THE CONTROL-G

(1G)

CLR
MOVB

CZREHED UNIBUS RK®& DR PRT1

CZRBHE.P11

xggo

25-JAN-78 12:

OY40i

MACY1l 30A(1052)

25-JAN-78

TTY INPUT ROUTINE

053373

$GTSWR: TYPE

gfi figj 053404
m } 75 126

HWee®
ggza

PAGE 201

SEQ 0201

$MSWR

: s TYPE

smnew
;gtxs

3 B T FOR NEN S (ALL DIGITS)
§§g
’?lfiRE?
;3 IF NOT TRY AGRIN

MOVB

a$TKB, - (SP)

:;PICK UP CHAR

CMP

(SP), %3

i MH";E“"-?“’C?

8UWREG, -(SP)

igié 3?5??0 642715 177600

126356

%gzg 000003

ig517
G [OMOT osaes
igy gfig 9537
001135 000001
1iosao18 052630 000137
1 000100
126314 8%:
047500

e
Sownc
gnga
gfi'mc,u
MOV
#100, 3STKS
JMP
STOP

{osaa 052634 oaiw 000025

qg:

CMP

{sm,cas

208:

ADD

$CNTLU

"1133mx‘a‘ nlgomgouu’

ke, SP

E;vscabngcuo
cl'§~TROL-U (tu)
) ¢
PREVIOUS INPUT

CMP
BNE

(SP), 815
168
’

1S IT A <CR>?
: BRANCH
IF NO

10510

iosiu 052574

117746

7%:

BIC

18?2

x%
fifi &egfi
3351
1
7
DO0006

iosa7

052652

000737

1
%tégis

D21
000015
gg;g fisz% 000004

108:

?Sszg; 1205

1%
10531 %S%& 1355
1635
1%39
i g5

]

%gfi

10541
i :g

10844
10545

10546
igw

1 38
[t
13??&

les7

ooogoe sesevz |
148:

37,

001135

737

0S1156
000060

000001

0Ol 999 000100 126220 .

168:

000067

ggg

178:

10555 8?%33 %3531 001204

18%:

10556

0S3004

osssx;

000720

177776

ggz

CT 3

fiip)

SWREG FOR TYPEOUT

iiMAKE IT 7-BIT ASCII

{165,
olo ChurRoL-c c10)
Encu an KEYBOARD INTERRUPTS?
:; ;CONTROL-C
PALLOW riv KEYBOARD
INTERRUPTS
RESTART
:;LET'S TRY IT AGAIN

1Y gflc’x‘slpvzgz FIRST CHAR?

MY
jmame
TYPE
SCRLF

:TECHO <CR> AND ¢LF>

2‘7”1’

i g;sms '#Y KBD INTERRUPTSTM —

gma

ggmc,n

JSR
CMP

PC, STYPEC
(SP),

BIC
5 5

%60, (SP)+
f;%'b’

S,{S

;g(SP),(SP)

208

Bhp
BGT

15
2726 000060
m 000002

1
Beore moeste 000002

igg 0s2

?'455

#1C177, (SP)

: JSAVE

CURRENT CONTENTS

MOV

1
1{

82%3% 5137% 000176

Glb

12:08

#100, 3STKS

188).
we?
188 '

i iedsm

;;%mxg mTr KBD INTERRUPTS?
: ;ECHO CHAR
;iCHAR ¢ 07

iR
H

3%
YES
IF YES

: ;STRIP-OFF ASCII
H ;s m’x‘snr_rg r—s'msr CHAR

ASL
(SP)
=&
INC
2(sP)

:Eno?"gum Psessm
g:IKEEP COUNT ROF CHAR
Lot

TYPE

PiTYPE ?2<¢CRY<LF>

$QUES

;;gg %5: u%xgugze

: ;SIMULATE CONTROL-U

CZRGHED UNIBUS RK®& DR PRT1

CZREME.P11

25-JAN-78 12:00

MACY1l 30A(1052)

25-JAN-78

TTY INPUT ROUTINE

H1G6

12:08

PAGE 202

SEQ 0202

xggg

.DSABL

rggxs ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

LSB

lllIlll!II'll!llllllI»llll!l!lllilll!!lll«lllllillll!ii!llilill!ll

iossq
{ggz

;'T

SE%N HERE

10567

{ee58
i 4

BUIE% 33000-4
oooooy oooone O I8Y
8:':2

1§7§
%os;-o

% 053032

iosrs

% 052146

§os7a

117739

18359

052146
655{25

85&“ CHSR?S.TERT"5139“8OFF
he SThcK CuE
::unnRSns;Tv

(%L
«ogg’g;'

i
::cfi READY FOR
g gcmnncrsa

MOV
RTI

18:

rsz

STKCNT

; sMAIT ON A CHARACTER

rxagga

as;x 0 T, N8P

;

000004

i%;g Efi %?%27 052152 052155

Bgc

8648, - (SP)
KCNT

::PUT
;Eu SE 85STACK
:iPOP NEW PC AND PS

; ,o:cnzrtm THE COUNTER
“T&““%'%%En

a;xoourosrxosno'z- 10 IT GO OFF OF THE END?

xgggé 0S3074
8?.3055 ox?vg;
052154 052152 2s:
MOV
#STKQSRT, $TKQOUT'
; n; s“'E“ *mPOINTER
000002
RTI
::
l@
,iggfif
l!lll!!lllllllilll!lllll!ll!I!iilli!lilllllll!l!lll*ll!ll!lllll
f’n
ROUTINE WILL INPUT A STRING FROM THE
T
10583

ios 8
iggg
1059
76 010346
1%2%
g‘g’?oo
3
105
102 012703 053332
igg ¢ i?g 0 fzgg 053354
10596 05311
Pos 118 10441
ue;xa

10597

':
T

S%len HERE

SRDLIN:

CLR
MOV
gLngs

-(4p)
#STTYIN, R3
cgnvxnlaa R3

novg

(SP)+, (R3)

"%gum
RERD.
AD ONEERCHARACTER FROM THE TTY

za'gr
MOVB
TYPE
gg\cf

égm
$'\,98
9s’
g-x (SP)

,,xg TPI'%O THE FIRST RUBOUT?
::9pé A BACK SLASH
1351
THEnugggr KEY

BEQ

18:

23:

}ggg gi

000177

108:

10606
10607
i&gg
10610
10611

020327
103434
i&‘.& Z
000746
005716

053332

f%
i g0s 06‘7’
msoé 323132 112737 000134 053330
10603
140
104401
053330
iggg
}g
?é 177777
-

10612

053152
128
}su
053170
0853172
053174

1406

8?3333
5%:

MOV

ROCHR

anE

CMP
BLO
?932
BR
TST

R3,-(SP)

#8177, [R3)

R3, #STTYIN
Y
(gg),es
2%
(SP)

ik
5’“‘"855"8%2%7“
;:“285&2:%
WILL BEA BYTE OFWILL
ALL BE0’SON THE STACK
;
+cu.;m
?ue RUBOUT KEY
;,aurrgargx.u
nuaour

..smcx snprw
iBR_IF YES
.,sstugP Eo TYPEOUT THE DELETED CHAR.
:GO READ ANOTHER CHAR.
,,nuaourKEY SET?
:iBR IF NO

’

OO0

ZREHED

UNIBUS RKG& DR _PRT1

ZREHE.P11
10613
10614
1061
1061
1061
1 1g
1061
10620
1
1

25-JAN-78 12:00
000134
053330
000025
053361
000022

113252
1

02353

1
10630
1
1
1
106
1
106

053330
15
77777
1206

053330

001204
053330

1
1

MACY11l 30A(10S2)

000004

053332

106
10640
1064
1064
1064
10644

25-JAN-78

4s:
3%:

000002

000004

IYPE
BR
TYPE

'STIVIN
ég
SQUES

TYPE
CMPB
BNE
CLRB
TYP
TST
MOV
MOV

kisS, (R3)+
-=1(R3)
LF
tsP)+
(5P)+,R3
(5P), ~(SP)

BR
MOVB

,,cLsm m: BUFFER nno LOOP
: JECHO THE CHARACTER

g
22
/1C/<15>¢<12)
/tU/<15>¢12>

<15>¢12>

iosur

0S11

$MSWR:

.ASC

}3233

0"2368

020127

SMNEW:

.ASCIZ

SCNTLG:

is
(R3),9%

RTI
.BYTE
.BYT
.BLK
.ASCIZ
.ASCIZ

000
000012

nscg

aSTTYIN,
S (SP)

ng/ 1? <§a>

SEQ 0203

i IVPE xcxup
THE 53INPUTu?:n
E;oo
cmcrsn
:TYPE
A

4(SP},2(SP)

MOV

PAGE 203

;s TYPE A BACK SLASH
; ;CLEAR THE RUBOUT KEY
;3 IS CHARACTER A CTRL U?
H Pér NO
;3 TYPE A CONTROL “U”
::GO START OVER
,-xs HARACTER A "tR"?
:BRANCH_IF NO
;,cu:m rrs cmmc :

MOV

00S015
006525
013
0063340

ogg

12:08

TTY INPUT ROUTINE
MOVB
#’\,98
TYPE
9g
CLR
tsp)
78:
CMPB
#25, (R3)
BNE
8
TYPE
SCNTLU
BR
3
8s:
CMPB
822, (R3)
BNE
38
CLRB
(R3)

9s:
STTYIN:
SCNTLC:
SCNTLU:

1%::2

I16

/SR =

,,cnscx ron RETURN
¥ ogp NOT RETURN
; ;CLEAR n:rum (THE 15)
3 IYPE A LINE FEED
CLEAN RUBOUT KEY FROM THE STACK
.,RES ORE 52
.,RDJUST THE
STACK AND PUT ADDRESS OF
FIRST ASCII CHARACTER ON IT

RETURN
TORAGE FOR ASCII CHAR. TO TYPE
1: TERMINATOR
nssnvs 22 _BYTES FOR TTY INPUT
.,cou
&G~
,,coumo e
:CONTROL "G”

NEW = 7

10650

.sv;n

10653

H 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 36 36 36 36 36 3 36 36 3 36 36 36 36 36 36 3 36 3 3 36 36 36 3 36 36 3 3 36 36 3 3 3 3 3 % %

SBTTL

}&Eé

10654
10655
10656
10657
10658

imxs noutme WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND
:#THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL
:%0CTAL DIGI s. IF AN ILLEGAL CHARACTER IS READ
A 7" WILL BE TYPED
: %FOLLOMED BYA CARRIAGE RETURN-L NE FEED. THE COMPLETE NUMBER MUST
i ¥CHANGE 1T 70 BINARY,

iosse

::T:REE BE RETYPED. THE INPUT IS TERMINATED BY TYPING R CARRIAGE RETURN.

wsmsaxu

i%fi

‘¥

10662
D

10665

10666
10667
10668

READ AN OCTAL NUMBER FROM THE TTY

‘¥
3416

053420
0S3426

053430

011646

016666
010046

010146

000004

000002

RDOCT

; sREAD AN OCTAL NUMBER

RETURN HERE

$RDOCT: MOV
MOV
MOV
MOV

::LOW ORDER BITS ARE ON TOP OF THE STACK
: SHIGH ORDER BITS ARE IN SHIOCT

(SP), -(SP)

; ;PROVIDE SPACE FOR THE

:PUSH R1 ON STACK

4(sP},2(sP)
RO, -(5P)
-(5P)

::INPUT NUMBER
::PUSH RO ON STACK

J16

CZREHED UNIBUS RK& DR PRT] °
CZREHE.P11
25-JAN-78 12:00

10669
182 0
10671
105;5
106

010246
6
66
126
37
1

18:
053544

{067“ §§g=§§
096
132;2
66?323
10677
4
27

000060

122716

000067

132;8
1

1
1
1
1
1

23
1
102
1
102

10685

177770

1069

1 139

000012

18299

1
726

106

10694
10695

osaszg

10701

053546

10703

053554

ig;gg

053552

4s:

10501
633301
104401

000730

=
001204

ASL

AD
TST

000000

$HIOCT:

.SBTTL

‘

4g
$'7,(SP)

$1C7, (SP)

égp)t,
(5P)+

MOV

R1, 12(SP)

MOV

(SP)+,R2

MOV
RTI
TST
CLRB

75850
TYPE

.WORD

R2' SHIOCT

(SP)+ RI
(SP)+.RO
(SP)+
(RO)

SQUES

SEQ 0204

; ;PUSH R2 ON STACK
:READ AN
ASCIZ LINE
:GET ADDRESS OF 1ST CHARACTER
¥
SAVE 1T
: ;CLEAR DATA WORD

PICKUP THIS CHARACTER
;;:2
ZERO GET OUT
: 'MAKE SURE THIS CHARACTER
s s %2
L)

;%8

; ;STRIP THE ASCII JUNK

;;Ego IN THIS DIGIT
; ;CLEAN ;Eanxnnron FROM STACK
:1SAVE THE

RESULT

; ;POP STACK INTO R2

::POP STACK INTO R1
::POP STACK INTO RO

; ; RETURN
;;chnn PARTIAL FROM STACK

:3SET A TERMINATOR
::TYPE UP THRU THE BAD CHAR.
:3"?" "CR” & "LF"

: $TRY AGAIN

::HIGH ORDER BITS GO HERE

DOUBLE LENGTH BINARY TO OLTAL ASCII CONVERT ROUTINE

{gggg

=:g§f{°"‘° OCTAL ASCIZ NUMBER.

*4THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN

10710

MOV

ig;ig

10711

10714

S¥

o4413

10716 053228 615501 000002
10717

1o7xg
10719

3564

RETURN

$DB20:

SAVREG

MOV

2(SP),R1

: sSAVE ALL REGISTERS

MOV

#12. ,RY

::D0 ELEVEN CHARACTERS

MOV

(R1)4,RO

012703, 177770

MOV

gggs
b

365101
002

0536

10723

053606

0S3610

000014

012100 TM..

110245

18:

010002

—

10724

‘¥

;3CALL THE ROUTINE

053574

012704

———

; ;POINTER _TO LOW WORD OF BINARY NUMBER

PC, 340820

MOV

3570

812705

#PNTR, - (SP)

JSR

053675

10720

10755
107

::1S AN OCTAL DIGIT

33 3636 36 36 3 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 3 36 36 36 3 36 36 36 36 36 36 3 36 36 36 36 36 36 36 36 36 3 3 3 3 % 3% % %

10715

10706

10707

4s
R1
R2
R1

MOV

0002
5728

}8933

BLT
ASL
ROL
ASL

BIC

053554

(SP)+,RC
RO,5S
R1

(SP)
v 7§o-+
%'0, (SP)

ROL

3%:

R2,-(SP)

5553
BEQ
CMPB

BGT
CMPB

12601
12600

1%3
106

MOV
ROL IN
MOV
MOV
CLR

ROL

i
10690

10702

10698

MACY1l 30A(1052)
25-JAN-78 12:08 PAGE 204
READ AN OCTAL NUMBER FROM THE TTY

MOV
CLR

MOVB
MOV

#$0CTVL+13.,RS
#1C7 R3

(R1)+.R1
R2
R2,-(RS)
RO.R2

::THE ADDRESS OF THE FIRST ASCIZ CHAR.

1 iPICKUP THE POINTER TO LOW WORD
;;POINTER TO DATA TABLE
i

; s LOWE

:
iHIGH WORD
: : TERMINATOR

:1PUT CHARACTER IN DATA TABLE
::GET THIS DIGIT

IS ON THE STACK

K16

MACY11 30A(10S2)
25-JAN-78
12:08_PAGE 205
DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE

P-4

2%
33

802000
SOCTVL:

053660

.SBTTL

L
x

18
14,

:3G0 PUT IT {N THE DATA TABLE
: :RESERVE DATA TRBLE

ADD

s’0,R2

: MAKE THIS CHAR. ASCII

SINGLE LENGTH BINARRY TO DECIMAL ASCIZ ROUTINE

MOV
JSR

RETURN

NUMBER, -(SP)
PC, 388582D

§SB2D:

MOV

2(SP), 1%

053676

6637

0S3714
053720
3724
053720

062716

ADD

000207
000000

RTS
. WORD

)

LA
D

; sMASK OUT ALL JUNK

R3
R1

1
'

;:ngEGNED DECIMAL RSCIZ NUMBER.

S oiototolatsiotot uiJS FY.

R3,R2

;%THIS ROUTINE WILL CONVERT A 16-BIT UNSIGNED BINARY NUMBER TO AN

00000

ps372

18:

0OOOOO

.SBTTL

Q%ODQQOOQ

DN
SoEITHIORT

000000

::BR IF
NOT THE
LAST DIGIT
1iBR IF IT IS
LAST DIGIT
;;RL%
13553
-ADJUST POINTER FOR FIRST
: JASCI
. &
IT
ON THE STACK
; ;RESTORE ALL REGISTERS
:JRETURN TO USER
;;Posxtion THE MASK FOR THE LAST DIGIT
: ;POSITION TnE BINARY NUMBER F
¥
THE
NEXT OCTAL DIGIT

R1
RO
R1
RO

BR
.BLKB

"COUN} THIS_CHARACTER

3%
23
RS
RS,2(SP)

5 3 JE3 06006 06036 00 0006 06 036 30 0006 06 0036 00 3636 00 0090 066 36 06 06 30 300 36 30 30 36 306 36 30 36 0636 3606 636 30 6 36 00 6 00 30 06 00 20 0 20

3 5 I

; ;PUT BINARY NUMBER ON THE STACK
::CALL

: ADDRESS OF THE 1ST ASCIZ CHAR.IS ON THE STACK

; s SAVE_BINARY NUMBER

MOV
JSR

818 -15P)
PC, a#$DB2D

:iSET POINTER
::CALL
E LENGTH CONVERT

MOV

(SP)+,2(SP)

#5’ (SP)

PC
2&2

:ONLY ALLOW FIVE CHARACTERS

: ;PICKUP POINTER

; ;RETURN

DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE

0000600 06 26 0000 00 0606 0600 06 00 060 06 0030 3000 0606 366 36 00 3006 306 363006 36 3036 360 3

300 0000 0

;4THIS ROUTINE WILL CONVERT A 32-BIT BINARY NUMBER TO AN UNSIGNED

; ¥DECIMAL

000000

(ASCII) NUMBER.

MOV
JSR

#PNTR, -(SP)
PC, 3880820

$DB2D:

SAVREG
MOV

2(SP),R2

RETURN

MOV
MOV
MOV
000012

0S4030

THE SIGN OF THE BINARY NUMBER MUST BE

tx
4
‘¥

j=]=]
N

ROR
ROR
ROR
ROR

BIC

74S

e e e e B Bt e B

BGT
BEQ
INC
MOV
RESREG
RTS
ASR
ROR
ROR

000002

40 gig fi% 000060

000000000
NN

s Bt sttt Bt Bt Bt P P Pt e (ot s e B B B Bt ot s e Bt Bt st s s Bt s Bt Bt Bt Pt Pt Bt P Bt —

QQQOOOOQQ 000
\l‘l\l‘l\l\la\l\ls ~
SERECR=EBS

DEC

SEQ 020S

MOV

; ;POINTER TO LOW WORD OF BINARY NUMBER
;; THE FIRST ADDRESS OF ASCIZ
:31S ON THE STACK

; s SAVE ns§xsrsns
::PICKUP THE DATA POINTER

#SDECYL , RO
RO,2(SP)
(R2)+,R1

:iGET ADDRESS OF “SDECVL" STRING
:'PUT ADDRESS OF ASCIZ STRING ON STACK
:IPICKUP THE BINARY NUMBER

#10.,4¢

:3SET UP TO DO 10 CONVERSIONS

(R2)+ R2

CZREHEO UNIBUS RK&

CZREHE .P11
10?7

107
io;gqs

377-0

1401

s Pt P

DR PRT1

25-JAN-78 12:00

g:fi

786 q&
=

s et

B Pt ot Pt Pt Pt ot s s s s Pt s s s s Pt s P

iio

3s:
000060
4s:

40
40
41

0S4102
0S4104
054106
0S4110
054112

PAGE 206

ogmpua RY

; ;ADDRESS OF TEN POWER

CLR
ggg

R3
fa’a“”m

: sCLEAR PARTIAL
: ;SUBTRACT TEN POWER

BLT

MOV

SUB

égc

ggg
ADD
CMP

DE
éHORIJ

S
R$
R

8STNPUWR$2,
RS

(PS),R2

égtm,m
(R4)+,R
(RS)+' (RS)+

:3BR_IF TEN POWER TO LARGE

;;fgo 1 TO PARTIAL

; iRESTORE SUBTRACTED VALUE
; sMOVE TO NEXT TEN POMWER

#'0,R3
R3, lRO)+
6 &)+

: ;CHANGE_PARTIAL TO ASCII
;iSAVE IT

;;BR_IF NO

‘ ey

: :DONE?

i RE?URN
R ONE REGISTERS
i

g
32690
332

STNPUWR: 5;2%20
2765

éég&flo

;;1.0E07

oot%?g

?;1 100

:;1.0E0B

ioaaqf

;;1.0E05

1750

::1.0E03

12
0
1
0
.BLKB

;;1.0€E01

160400

054072

12:08

TO DECIMAL ASCII CONVERT ROUTINE

MOV

BIS
MOVB

5 gg

10814

iggsg

18:
2%:

765

10818
10819
10820
10825
10822

1357

%ig
10815
108 19
1081

4ouY

414

;

0S2703

25-JAN-78

DOUBLE LENGTH BINPRY

ggwoue

203

- 0;53 §38‘1’8 ggwm
ggggs:

MACY1l 30A(1052)

L16

;:1.0E08

ga4z )
001750

000012
000000
000001
000000
000014

;5 1.0E04

0
144
0

SDECVL:

.SBTTL

:;1.0E09

;;1.0E02
:;1.0E00
12.

. :RESERVE STORAGE FOR ASCIZ STRING

TYPE NUMERICAL ASCIZ STRING SUPPRESS LERDING ZEROS

1082S

- P2 Y2222 2222222223222
T RN I XS 2222222
S IS 3

108

i§§

: %CALL

10831

{oaag

: Hg‘x‘g&gu;agss 53 USED TO TYPE AN ASCIZ NUMBER SUPPRESSING THE

{ggag
41
01004
megu 8?-4153 015503 000004
10835
10836

054134
0S4i3e

105710
001403

?SX

$SUPRS: " MOV
MOV
18:

TSTB
BEQ

’
ggugeggfi;égm

RO,
-(SP)
4(5P) RO

(RO)
2%

; ;FIRST ADDRESS OF ASCIZ STRING

SAVE RO
1 iPICKUP THE POINTER

: ' TERMINATEOR?
:iBR IF YES

SEQ 0206

: CZRBEHED UNIBUS RK& DR PRT1
. CZRBME.P11

25-JAN-78 12:00

’ {0837 os:{:g 122;;0 000060

MLlG
MACY11l 30AR(1052) @25-JAN-78_ 12:08 PAGE 207

TYPE NUMERICAL ASCIZ STRING SUPPRESS LEADING ZEROS

i% Efilgg fi%ggg 054156
o8
Y
imé
gwiéfi

»$:

.SBTTL

{oe-w

823}2‘3

#'0, (RO)+

;318 £a$ ssm ASCII "0" ?

ggg

égpu,(sp)

: RESTORE THE STACK

'715;50 RO, 38
. WO
0(SP;+,R0
MOV

3s:

mas‘x]g

{%98

§m§a

ioa%

SAVE AND RESTORE RO-RS ROUTINES

;fi(s:g\LrE RO-RS

xt.'te“ssiJ

10928
10856

}% #4---RS

10858
10859

1% +8---R3
; %+10---R2

igg

1% +H---RY

megé 0S4166
0S4166
0S4170

;4+1a----n6
; ¥+ 14---R

3553553

86““3

MOV
MOV

oY
MOV
MOV
MOV
MOV
MOV

000022

RO, -(SP)
R1.-(5P)

; ;PUSH RO ON STACK
::PUSH R1 ON STACK

REIEl
R’
- (3P)
RS -(SP)
22lsP), -(SP)
sgtgm,-(sm
(5P)
. -(SP)

i
tipUBH ne
RY o o
TACK
:PUSH RS ON STACK
:Egfl
Pé OF MAIN FLOW
H: 1SAVEmég PPS 8; MAIN
FLO
CALL

MOV
MOV

(SP)+,22(SP)
(SP)+.22(SP)

; ;RESTORE PC OF CALL
: TRESTORE PS OF CALL

29\{

22(SP) | -(SP)

::SAVE PC OF CALL

: Y)RESTORE RO-RS

; #CALL :

10879

]

18835

4234

1
10881

$SAVREG:

010046
010146

{8
iz §1§§3§
oo
1% gu&
1
Yy
10546
10870
4202 01664
‘%}é
gusog
812232
1
Yol
1
10878

1
i

10&1“75
108
105:39

" SAVREG

E:upon RETURN FROM $SAVREG THE STACK WILL LOOK LIKE:

10857

ioen

nye
i v%r°§vTYPING
!!SS
PBOINTER GOES HERE
iiR &46READ

3 E s s Y e e 222220222 22322222222 2222222222222 23222

10864
10865

tiBAc

ugg
Y

‘¥

012666
012666

012666

000022
000022

$RESREG:

000022

RESREG

MOV

(SP)+,22(SF°

: TRESTORE PC OF MAIN FLOW

ioees

:53: 012604

MOV

(SP)+.RY4

s;ncx m;o RY

4254

MOV

(SP)+'R

::POP

STACK

01260

i§§§§ gaggg §6§88é
}8335

E(T“r’

.SBTTL

(§P)+:Rfi

TRAP DECODER

INTO R

1:POP STACK INTO R

SEQ 0207

gMOPflIBUS
RK Ne'-'?:nlém

MC'YII ?&0&)

EE-JM-N

BO1

12:08

PAGE 208

YSEO 0z208

““'lllll“.llmllll“"lmm'l!l“'ll!lll

1089¢

Yoy

000002

0S4316

i 824
i1

1
{

smnp.

MOV

RO, -(SP)

MOV

RYe R0

e
ASL
v

;; "%vz

iHH ngu
ngRPAD(RO),RO0
F mexmc
;;1

;;THIS IS USE TO HANDLE THE "GETPRI"TM MACRO

10911
B2u30e
Bittee
oo000M 000002
:
ig
0S4314
000002

STRAP2:

MOV
RTI

iggi;

.SBTTL

TRAP TABLE

ifiiz

s ¥THIS

;

ROUTINE

1091

116

1
1

4
Yy

s sMOVE

THE

PC DOMN

Y304
Y

17494

ONTAINS THE

$TRPAD: .

STARTING ADDRESSES OF THE ROUTINES CALLED

;

STRAP2

§T

; sCALL=TYPE

TRAP+1(104401)

TTY Tvpgour ROUTINE

TYPE

: :CALL=TYPOC

TRAP+2(104402)

(WITH LEADING

TRAP+3(1
TRAP+H4(

0S4332

052534

SGTSWR

; ; CALL=GTSWR

TRAP+6(104406)

GET SOFT-SWR SETTING

052444

SCKSWR

; ; CALL=CKSWR

TRAP+7 ( 104407)

TEST FOR CHANGEIN SOFT-SWR

109

05-4348

4344

054350

1226

%9‘

3
3416

054166

054224

047376

TYPDS

;;CALL=TYPDS

: : CALL=RDCHR

LINT ;;CALL=RDOCT
:;CALL
IN

SAVREG

;;CALL=SAVREG

RESREG :;CALL=RESREG

SCOP1S

:;CALL=SCOP1

TRAP+5(1

)
)

TYPE OCTAL m

;;CALL=TYPOS
;:
=TYPON

“Y342

; iMOVE THE_PSW_DOWN
: IRESTORE THE PSW

§TYPOS
TYPON

1
1093
1

(SP),~(SP)

1720
1760

4(sP},2(sP)

MOV

: 2BY ?r: -‘#&S—. INSTRUCTION.

1031

2(5p), ao

OCTAL
R (NO
TAL NUMBER (RS

CIMAL NUMBER (WITH

rmfloumm) TY ngu

TRAP+11(104411) TTY TYPEIN
STRI
rnnpnguwug) gs
AN
r%"
TRAP+13(104413)

RO-

rsgu

TRAP+15(104415)

SIGN)

INE

“gusu
R FROM TTY

TRAP+14(104414) RESTORE RO-RS ROUTINE

INTERNAL LOOP ON ERROR

ZEROS)

ING
ZEROS)
PER LAST CALL)

(

W%s
.EeE;L

25-JAN-78

COl

12:08

SEQ Q209

PAGE 209

SERVICE MSGS

BSE22S: .BLKW

SO.

;22 SECTOR SOFTWARE INFO

MSG1:

.ASCII

<CR:<LF>/UNIBUS RKO6-RKO7 DRIVE DIAGNOSTIC--PART 1/

JASCII

<CR><LF>/CZRBHED/<CR><LF>

.ASCII

<CRX<LF>/

.ASCII

<CR><LF>/THIS PROGRAM SHOULD BE HALTED ONLY BY TYPING CONTROL-C/

.ASCII

(CR><LF>/0THERWISE,

.ASCII

<CR><LF>/MAY BE LEFT IN AN UNDETERMINED STATE/<CR><LF>

#%% CAUTION #%%/<CR><LF>

OU =b
L0

Bt e

ffiigZ;: B

—

?
=0
=

—

-=5e

| ZODENR .;g 2

RZZZRR

—
—

o-mo-o-

eB
oB

Sac

§9

K2
-~

)

CARTRIDGE FORMATTING AND,OR THE DRIVE/

“

.ASCII

<CR><LF>/INITIALLY, DRIVES TO BE TESTED SHOULD HAVE:/<CR><LF>

.ASCII

<CR><LF>/A..

HEADS MANUALLY LOARDED~/

——

MACY11

25-JAN-78 12:00

22
REES
AR

CZREHE .P11

DR_PRT

CZRGHED UNIBUS RKE

30A(1052)
@2S-JAN-78
SERVICE MSGS

CZRGHED UNIBUS RK6 DR PRTI

{

PAGE 210

.ASCII <CR><LF>/B. CORRECT PORT SELECTED/
.ASCII

@ 027{0‘1!
flgéggf :
% 1104 05311;

<CR><LF>/C.

WRITE LOCK DISABLED~/

.ASCII <CR><LF>/D. DRIVE READY INDICATOR ON/<CR><LF)>
.ASCII <CR><LF>/DRIVES NOT TO BE TESTED MUST HAVE BOTH/

<L
2
ikl i
T
;
11

.ASCIZ

<CR><LF>/PORTS DESELECTED/<CR><LF>

.ASCII

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

.ASCIZ

<CR><LF>/CLEAR LOC 40,RESTRART PROGRAM/

MSG3:

.ASCIZ

<CR><LF>/DRIVE(S) TO BE TESTED: /

MSGH:

.ASCIZ

<CR><LF>/BUS ADDR (177440): 7

MSGS:

.RSCIZ

<CR><LF>/CONTR ADDR (210): -

MSG6E:

.ASCIZ

<CR><LF>/INTR AT PC=/

RNENNE
OO0

E&l

®
#8

i
£

104

R
o
£
0

Bt s e
B
e B
s B
B
s B
B
B
B
e B

12:08

101

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

= ol nR13

2
A

B Bt Pt ot Bt Pt Bt ot Bt Bt Bt 0 Bt Pt s e P

sP P

280"z

Pt e

194

o-o-o-o-;!

25-JAN-78 12:00

ORR—S

CZREHE .P11

SEQ 0210

<CR><LF>/DRIVE O WILL NOT BE TESTED/

MSGB:

.ASCIZ

<CR><LF>/TEST 16 TAKES 2 TO 4 MIN./<CR><LF>

.ASCIZ

<CR><LF>/BYPASSING TEST 16/¢CR><LF>

MSG10:

.ASCIZ

<CRX><LF><LF>/WILL TEST DRIVE(S):/

MSGll:

.ASCIZ

<CR><LF><LF>/POWER UP RESTART TO TEST 1/<CR><LF>

MSG12:

.ASCIZ

<CR><LF>/PACK BEING FORMATTED/<CR><LF>

RONA

MSG13:

.ASCII

<CR><LF>/NO L OR P CLOCKS/

.ASCIZ

<CR><LF>/ALL TIMING TESTS BYPASSED/

MSGI4:

.ASCIZ

<CR><LF>/BYPASSING DRIVE /

MSG1S:

.RASCIZ

<CR><LF><LF>/DRIVE /

MSG16:

.ASCIZ

<CR><LF>/DRIVE SERIAL &/

108

PAGE 211

.ASCIZ

MSG17:

.ASCIZ

<CR><LF>/CARTRIDGE SERIAL NO.~s

MSG1B:

.ASCIZ

<CR><LF><LF>/RABORTING BAL OF TESTS/<CR><LF><LF>

MSG19:

.ASCIZ

<CR><LF><LF>/ALL DRIVES TESTED/<CR><LF><LF>

1
1

EOL

12:08

MSG7:

103
104

3g2(1052)HS§§-JRN-78

4
1
W-lINUNURO
U
nu ’. e T

Bt Bt Pt Bt Pt Bt et Bt Bt s Pt Bt s P Pt Bt Bt s P Bt Pt Pt Pt Pt Pt et Pt Pt P s Pt Pt Pt P Bt et Pt P e s Pt P Pt Pt Pt Pt Pt et P P P P P Pt P Pt
Bt 5t Dt Pt Pt Pt Bt Pt s Pt et Bt P Pt Pt o Pt Pt s s Pt Pt Pt Pt P Pt P Pt et Pt st Pt (. P s (s Pt P Pt Pt o Pt ot P Pt Pt Pt Pt P P s s Pt (ot Bt

CZRGHED UNIBUS

8&161

0S62S6
0S6264

0Se271

882106
Se3

01S

e
101

04eS24
00s012

00S012

0S2123

046101

SEQ 0211

| €

0 UNIBUS
DR PRT
.Pl1l
25-JAN-78 12:00

111
fi{l

l}ii
llllg
1111

MACY11l 30A(10S52)
25-JAN-78
SERVICE MSGS

FO1

12:08

PAGE 212

1104

Bebio Riis
SOM

b4 1
2¢

2163 MSG20: .ASCII <CR><LF>/MODIFIED VERSION OF FORMAT PACK IEST FOR MODULE TESTING/
16

11118
1111
1111
1111
Lh 1

JEHL

.ASCIZ <«CR><LF>/T0O RESTORE HERDERS ON CYL O & 1, ALL TRACKS/

11]

111

?Li

MSG21:

.ASCIZ

<CR><LF>/BYPASSING TESTS 36,40,41 FOR MODULE TESTING/<CR><LF>

i}i

MSG22:

.ASCIZ

<CR>XLF>/FORMATTING FINISHED/<CR><LF>

niiq

MSG23:

.ASCIZ

<CR>XLF>/TEST 16 TAKES 10 TO 12 MIN./<CR><LPF>

MSG74:

.ASCIZ

<CR><LF>/PGM ABORT PENDING...”/

046101
832116

MSG?7S:

.ASCIZ

<CR><LF>/HALT PENDING...”/

MSG?6:

.ASCIZ

<CR><LF>/PGM ABORTED/

111
111
111
111

Lfli

41142
1114

111ds
111

111
11151

i}{gz
11154

it
111§2
111
11159
11160
11161

SEQ 0212

17 020115
029154
1
042520

027107
1

7056

i
831962
832520
MSG77: .ASCIZ <CR><LF>/CPU HALTED/
6101
2524

0_UNIBUS_RKE DR_PRT1
.P11
25-JAN-78 12:00

MACY11 30A(10S2)

ERR MSGS

PAGE 213

SEQ 0213

EMI:

.ASCIZ

(CR><LF>/ERR,

EM2:

.ASCIZ

/SELECTED DRIVE # IN RKCS2 CANNOT BE READ BACK IN RKMR2/

.RSCIZ

<CR><LF>/RABORT TESTS.. .UNEXP TIME OUT AT PC=/

.ASCI1

/FATAL ERROR/<CR»><LF>

.ASCII

/ABORTING BALANCE OF TESTS/<CR><LF>

.ASCIZ

/HEAD POSITION CANNOT BE DETERMINED/

EMS:

.ASCIZ

/MDS SET IN RKCS2/

EMG:

.ASCIZ

/UFE SET IN RKCS2/

EM7:

.ASCIZ

/DRA IN RKDS & NED IN RKCS2 RESET;

e oewf S o) o) ol o=l

GOl

12:08

ERR MSGS

RB aR

RS3

25-JAN-78

.SBTTL

)v))e))))oo)]o))ov)))))o])]e)]]))]))ee]eeS]])R]]oe:]]To]]B0f ]eB)]oL)]RTeoe-ooo))e!o))L]5LBeeLaoene]ehL]0Doe0eleeLeoellSR0lLeeDeKvDeoRD)oDoBoelOoollDRoolb)oNDoolDCooellAoooBoee2oboDob2oobo84l%R4

c
c

ONLY O THRU 7 ALLOWED,

TRY AGAIN/<CR><LF>

PRI

BT o1

Lot)

WRONG PORT SELECTED?~

/DRV TYPE NOT SET

EMS:

.ASCIZ

/DRIVE NOT PRESENT BUT TYPED BY OPERATOR/

EMIO:

.ASCIZ

/ABORT TESTS...CANNOT REF CONTR REG/

EMI1L:

.RSCIZ

/DRA

EM12:

.ASCIZ

/CONTR NOT READY

EM13:

.ASCIZ

/NO ATTN IN RKASOF~/

EMI1Y:

.ASCIZ

/WRONG ATTN IN RKARSOF/

EMI1S:

.ASCIZ

/DRDY NOT CLERRED

EM16:

.ASCIZ

/DSC NOT SET

EM17:

.ASCIZ

/MSG RO ERROR/

u—oio-o-o—o—o—u-o-o-v-o-o-o—o—o-o-pu»-oRRIRIEEYSR AL
BN PR SR

s B o et P P

e B B

ezl
e7e
273

O
WL WSQO-

0e00Se

012
051515

IN RKMR2/

IN RKDS & NED

IN RKCS2 BOTH SET/

IN RKCSl~/

IN RKMR2/

et
e e
o Po

nhoT g

b pa
e

: et TBl :6» u-(.l}.:
?

SRR

sgs

PAGE 214

.ASCIZ

s sP
s s s P o P o ot s s s s s o ot ot ot s s P P P

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

s Pt et Pt Pt ot o ot ot B ot

s s Bt P

Bt Bt Pt et et et o

Bt Bt Bt B B

051040

12:08

EMSB:

el B sl B

25-JAN-78

wWwooe

30A(1052)
ERR MSGS

NOL£0

CZREHED UNIBUS RK6 DR PRTI1
CZREHE.P11
25-JAN-78 12:

OSlle2

020

030102
0s1117

EM1B:

.ASCIZ

/MSG BO ERROR/

043s23
051105

040440
047522

EM1S:

.ASCIZ

/MSG Rl

ERROR/

020107

030s02

EM20:

.ASCIZ

/MSG Bl

ERROR/

SEQ 0214

CZRGHE 0_UNIBUS_RKE DR_PR Tl

CZREHE.P11

25-JAN-78 12:00

ERR MSGS

25-JAN-78

101

12:08

PAGE 215

EM21:

.ASCIZ

/CERR SET

044440

EM22:

.ASCIZ

/RLS IN RKCS2 SET CERR IN RKCS1/

EM23:

.RSCIZ

/UFE IN RKCS2 SET (SACK) AFTER RLS IN RKCS2 SENT/

EM24:

.ASCIZ

/VV NOT SET IN RKMR2/

EM2S:

.ASCIZ

/DRV TYPE SET IN RKMR2/

EM26:

.RSCIZ

/DDT SET

EM27:

.ASCIZ

/DTYE SET

EM28:

.RSCIZ

/DTYE NOT SET IN RKER AFTER WRONG CDT IN RKCS1/

EM29:

.ASCIZ

/DTYE IN RKER DID NOT SET CERR IN RKCS1l/

EM30:

.ASCIZ

/7C-D PAR ERR SET IN RKMR3/

EM31:

.ASCIZ

/D-C PAR SET IN RKCSl~/

IN RKCS1/

e Bt Bt Bt s Bt B @ ot Pt s P

=E0

020122
7115

s e Pt B Pt s Pt e P

0s1117

—

et P Bt Pt Pt o P

o-f:o-o-o—a
N
2:\-;.—
—
() ow?m—m-—ow—

IN RKDS/
IN RKER/

B8 RS

[SRS
W
Ny

WWWwWWWwwWww

ot Bt P
s s Bt Bt Bt Bt s Bt Dt s Bt Bt et Bt Pt s B
s Bt Bt s B
e D
eB

MACY11 30R(1052)

060532

051101

SEQ 0215

MACY11l 30A(1052)
ERR MSGS

25-JAN-78

JO1

12:08

PRAGE 216

ou4ssez

SEQ 0216

um..n..smwmowmmw=:»wmwm%o4,o—

e]eee oe))el]])]]]e)e])])]oo]))e))e)o]))])o)o]))]o))]o))ooe)eoeolSolo)leeoleooe))goololoolololololtolo0
oo=ddo)eR

CZRBEHED UNIBUS RKE DR _PRT1
CZREHE.P11
25-JAN-78 12:00

7516

EM32:

.ASCIZ

/FLT NOT SET IN RKMR3/

EM33:

.ASCIZ

/C-0 PAR ERR NOT SET IN RKMR3/

EM34:

.ASCIZ

/D-C PAR NOT SET IN RKCS1/

EM3S

.ASCIZ

/D-C PAR IN RKCS1 DID NOT SET CERR IN RKCS1/

M36

.ASCIZ

/CYL ADDR IN B2 NOT SAME RS RKDC/

EM37:

.ASCIZ

/CYL DIFF IN A2 NOT SAME RS RKDC/

EMG

.ASCIZ

/CYL DIFF IN RKMR2 NOT SAME RS ’'CYL DIFF’/

B
i
n
t
d
§
i
c
f
s
z
3I3 8 i S 3

-0-t——y44oo

=o4)£tfl

EM39

.ASCIZ

/CYL DIFF & OFST IN R2 NOT =0/

EM4O0

.ASCIZ

/CYL ADDR IN B2 NOT =0/

EM41:

.ASCIZ

/CYL ADDR IN B2 DID NOT REMAIN =0/

CZREHED UNIBUS RK& DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

MACY11l 30A(10S2)
ERR MSGS

25-JAN-78

KOl

12:08

PRAGE 217

SEQ 0217

EMY2:

m m m mmw
111

EM43:

EMYY:

EMYS:

EMMG:

EMN7:

Ez*
i

EM48:

EMSO:

1040

m m 5a SNN &-.

o< Oma0oo o ooo.oTlo

RRERERETMRBRESARSRRRARSRES8Romm

—lYR¢lIt‘ol1Sold1oe1m‘eRdom.edt1oeo1ooVe1eoeo1oeoo1teo1oo8Ioe.oo)1geoI1oooo1Rool141obb41olL‘.e1oooo1eoolol1eol1oR1oooo1oot1votto1Aoooo1oolo1otoeo14t
anN2[(Wo[A'=N=3]}} vNagowac8xNavOWonT¢W9xa.u 1NN a) ((ax¢mmaN47=11} [<4971e[[]++ [NNN 3¢ woQ 8=-—N N- &N11[]+

020116

.ASCII

/DRIVE READY IN RKMR2 NOT SET BY 1 SEC FROM FWD/

<CR><LF>/IN RTZ PORTION OF START SPIN CMD/

.ASCIZ

/FWD NOT SET IN RKMR2 IN RTZ PORTION OF START SPIN C MD/

=Q N
I - [ o — - (5]b

.ASCIZ

/FWD NOT CLERRED IN RKMR2 BY S SEC OF MOTION FROM START SPIN CMD/

ReANNgang2RNT
SAALEERL

m8gn]N3wIdeFeOwgeON.%feemeiemLmeme¥£b efLLgiee&e%eWWW %ueLfLiLLw2b emeDmD§LfD2mD33D—8LWW i&DD2mD8gDD£o£ gfLDlDeq8DmL&Dd-DTz%eE&LLWWW i¥ moeZs-D3L3FLi0bZbeTk
OQ EQ NN OQ w= =4= vN Q-N ENN xz® QQQ NN [QO o- NN }
4[ 4 n TM un xo

L0—m~]M—7HNw-a[ow3a<—=)—E4XoN~nbob1WRI0-LTNr2LOm0eOL~[=1m(Ya-'w(>oi=W—E-b=e=]7N]]nSo:}LLLL4ow-oN(&aQ=]=4[T--N=n—]M[+LLeH.LlL5.e0.TD5(%Nn-oa4ww(ox4oNzv~—l5=R'l~[)]]+DDIeFouDm-W -w(4D—N@w4xNaQX—[wQ>o-187o])D]-,eoDa[QL£N-Dwxw=oxox4o-1.'[[]++DOLoLODTIr.bow[-N'4([(oazW-w——7N=—n1=1[S3f&]]«kl—L1T7o-4N—owQmm@ToQT-=>oM)]TM-leM[SMLoblae[|1Om-Nwm[o4QomwW>=7}])g[4OOqTP-tFU1f&—NoaWmW=-sm[z4~]i)[z+I—.OI.M—ltlUlN‘bOlLllN‘
CZRBHED UNIBUS_RK

.P11

25-?“1-78 12:00

DR_PRT1

i 2

104
020060

MACY11 30A(1052)
ERR MSGS

04211

25-JAN-78
12:08

LO1
PAGE 218

SEQ 0218

4S0e2

1
1

0s4S0e2
0S1S1S

= w o2 - N
o [++] > - -}

CZRGEHED UNIBUS RK6 DR PRTI
CZREHE.P11
25-JAN-78 12:00

E
0S1440

—

§§§§

EMEY:

.ASCIZ

/MSG B3 HERD REG NOT =0/

.ASCIZ /READ HEADER ERR/

.ASCIZ

/READING CYL O HERDERS ON CYL 1/

EMEB:

.ASCIZ

/READING CYL 1 HEADERS ON CYL 0/

EMES:

.ASCIZ

/ALIGN CART USED/

EM70:

.ASCIZ

/UNEXP ATTN/

EM71:

.ASCIZ

/DSC SET IN RKMR2/

EM72:

.ASCIZ

/FORMAT TEST BYPASSED/

821040

EM73:

.ASCIZ

/CTO SET IN RKCSl/

§§§

EM74:

.ASCIZ /RTZ NOT SET IN RKMR2/

047040

EM7S:

.ASCIZ

/IDAE NOT SET IN RKMR3/

82?858

EM76:

.ASCIZ

/PIP SET IN RKMR2/

Ty
L£0OD
e

o=
| ol
ON=—=L£=

el S

282

NVON

—

e R2ER B2

T=T

042501

042{ 1

B3R

063006

NE=L£N

/DLT SET IN RKCS2/

EMB7:

S04

i%g

.ASCIZ

/CYL ADDR IN RKMR3 INCORRECT/

(ol o
—

PAGE 219

.ASCIZ

-4

097 i

EME6:

e
s e b P

o NEWN-

e s

AR
RL LSS AL S

85?;2"

LR
R

5:%

12:08

EMB3:

EMBS:
&0@
11

—

g 10,

BroNeRe

SYE2

Lie”L )

@25-JAN-78

o
=W

S02

—

e Bt Bt B B B
s P o s ot s B o B o Bt Bt B0 o s s B Pt s i ot ot s s P P ot ot ot ot Pt P
P P
e
Bt Bt e et et Bt Bt Pt Pt Bt et Bt Bt Pt Pt Bt B Bt ot Pt Pt ot Bt Bt ot (ot P Pt P s Pt Pt Pt Pt Bt ot Pt P Pt P P Bt Pt Pt Pt P Pt Pt Pt Pt B P P

MACY1l 30A(10S2)
ERR MSGS

000

SEQ 0219

MACY11l 30A(1052)
ERR MSGS

0_UNIBUS RK? DR_PRT
25-JAN-78 12:00

NO1

12:08

PAGE 220

EM77:

.RSCIZ

/FAULT NOT =0

IN RKMR3/

EM78:

.ASCIZ

/CYL DIFF

EM?79:

.ASCIZ

/NED SET

EMBO:

.ASCIZ

/UNLOAD NOT SET

EMBI1:

.ASCIZ

/SPIN NOT SET

EMB2:

.ASCIZ

/RTZ NOT SET

IN RKMR2 DID NOT REMAIN =

IN SEEK TO SELF~/

| slaienad

MR R

IN RKCSz2/
IN RKMR2/

IN RKMR2/

IN RKMR2/
L4

EMB3:

.RSCIZ

/READ HERDER ERR

WORD O

(CYL#)/

EMBY:

.RSCIZ

/FORMAT

EMBS:

.RSCIZ

/ILL ADDR IN RKMR3 NOT =0/

EMB6:

.RSCIZ

/WHILE WARITING FOR CONTR RDY OR AFTER CONTR RDY REC’D~/

EMB7:

.ASCIZ

/CANNOT REARD BSE

SaRese
/.

Eiieh O

e Pt Pt Pt Pt Pt

OO
—LENE-0

—
P
B

—

8‘

—20

Bt pme b
——

288

-0

REE
(=)
~N
@
Ro

R L

("]

RAE

Bt Bt Bt ot ot ot s B

s P ot Pt Pt s ot s ot s s s s s P Bt Pt ot s s s (s s P ot ot s s s s P o

s s

B P ot s s P Pt P

s ot s P P

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

EEReNE .P11

25-JAN-78

IN RKMR3 NOT SET/

INFO/

&R9=|>S3zXLR%:-Oa5PbiADTRmSQmRN3ELPEROERe.ESyIS./2l+A-DRBLMmNR/RSgFpoE3dmEQRUY&etKsTSfRNBvBw-£iUS-KERRIQCR-eSRREtRR7SLeGSSRtEyt%oE']-W-|

SRSMLm
| CZRGHED UNIBUS

| CZREHE.P11

q_qqumwmw

253

DR PRT1
AN-78 12:00
MACY11 30A(10S2)
ERR MSGS

461

DH2

DH3:

g ove

25-JAN-78
12:08

3*T.
EReE
s A.|
SRS

LI, R

1mo)1egme1)e1)m(§e=1wl))mle‘).m9le&)lemel&e]mlewlSmm9el&)wle)mle.e&leg1o)&1Ni 0lme1O&o1mSof1ei01om'o&o1)f1Wo1io)1o1m)1@o1l1omv1lg)11olm1e&1o1wom1t
g
g
t
o
T
.
.
eo-IWLD(Wz=]ST-LZOveoleSTl-ePRPetRyAITRoSRWmSoeRIWAAAEYaEeEZSvRREAyIRoanEsS&BnBIB.-NCRE»iOTB8W*SOSRREtTZWoe=4TT[+RBolnAl.RR-B Te=(ce-v-~LGRYSnNRWCReSyIAZSS(GRsBlSlRRezR-N RB|e)-TSRATRSMRTeRGhO|-OL0-e"(ZoWULAiLy1=.zsNR1]
e
egyovSKTN,-.W WSR - O9[42'T. %
I

BO2
PAGE 221

SEQ D221

eRY)0wt

|
-

CZR6HED UNIBUS RK6E DR PRTI1
CZRBHE.P11
25-JAN-78 12:00

MACY1l 30A(10S52)

2S-JAN-78

DATA HEARDERS

coe

12:08

PAGE 222

11689 BEMEBE BR8MBY ouesew oce0122 oOme:

.RSCIZ

/AFTER START SPIN CMD REC’'D BY DRIVE/

DH10:

.ASCIZ

/AT END OF HEARD LOADING/

DH11:

.ASCIZ

/AFTER START SPIN CMD & FWD SET/

DH12:

.ASCIZ

/AT INNER LIM FROM START SPIN CMD/

DH13:

.ASCIZ

/FROM OUTER LIM TO CYL O DURING LOADING/

DH1Y:

.RASCIZ

/AFTER SEEK WITH BAD PAR/

DH16:

.ASCIZ

/AFTER LOADING HERD REG & SEEK CMD/

DH17:

.ASCIZ

/AFTER RECAL CMD/

DH18:

.RSCIZ

/AFTER UNLOARD CMD/

DH19:

.ASCIZ

/AFTER PACK CMD/

DH20:

.ASCIZ

/AFTER SELECT DRIVE CMD/

DH21:

.RASCIZ

/AFTER SUBSYSTEM CLEAR/

11668

06M212

11673
1674

064

“

116

116
11
11
11
11

11
11684

11
11
11
11
HE

11837

11652
11693
11694

ixgég

11
11698
11699
117
11
11
11

i
11788

11707
11708
11709
11710
1171
1171
1171
11714
1171
1171
1171
11718
11719
11720
11721

4
4
4
Y

0S2123

05;101

020124

2440

042116
19

&8 E§§¥§§
B

SEQ Ocez

MACY1l 30A(1052)

2S-JAN-78
DRTA HERDERS

CZREHED UNIBUS RK6 DR PRT1

CZREHE.P11

25-JAN-78 12:00

A
471

.ASCIZ /AFTER DRIVE CLEAR CMD/
/TEST NO.

DH2S:

.ARSCIZ

/AFTER SEEK CMD/

DH26:

.ASCIZ /AFTER READ DATA CMD/

DH28:

.ASCIZ

;“0

DH29:

.ASCIZ

ACTUARL~/

741

DH30:

.ASCIZ

/AFTER READ HEARDER CMD/

DH32:

.ARSCIZ

/R0

DH33:

.ASCIZ

/DURING SEEK CMD/

DH3Y4:

.ASCIZ

/SECTOR REG UNSTRBLE~/

DH3S:

.ASCIZ

/BETWEEN SECTOR COUNTS/

DH36:

.ASCIZ

/FROM SECT

DH37:

.ASCIZ

/SPEED OK NOT =0 10 SEC AFTER UNLORD~/

DH38:

.ASCIZ

/AFTER LIM DET/

DH39:

.ASCIZ

/AFTER WRITE HERDER CMD/

124

g& DHe2:

SEQ 0223

.ASCIZ

zfi Q% :f 6

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

73S
7

064776

;

o
794

;:;

o4211s

TRAP PC/

EXPECT/

1
11

It ERARRR

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

o g e K DI ST

e s

- 6
fil‘i

PAGE 223

DH23:

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

&
b

Pt Pt Pt Pt Pt P Pt Pt Pt Pt s

;?
17

12:08

0653

TO SECT/

B3/

CZREHED UNIBUS RKE DR_PRT1

MACY11l 30A(1052)

004443

25-JAN-78 12:00

DATA HERDERS

EO2

12:08

PAGE 224

HEADER WAS

SEQ D224

DH40:

.ASCIZ

/WORD®

SHOULD BE~/

DH41:

.ASCIZ

/DURING RECAL CMD/

DH42:

.ASCIZ

/ON SEC 0,2,4,6,8

DHYY :

.ASCIZ

/FORMAT & ALL R-W TESTS WILL BE BYPASSED/

DH4S:

.ASCIZ

/BECAUSE OF LIMIT DETECT ERROR ON PREVIOUS TEST/

DH46:

.ASCIZ

/COULD NOT RERD BSE INFO ON PREV TEST/

DH48B:

.ASCIZ

/AFTER SEEK CMD TO INV CYL/

DHYS:

.ASCIZ

/MSG R3B IN RKMR2 & RKMR3 RESP.,

DHS1:

.ASCIZ

/AFTER SEEK TO SELF CMD/

DHS2:

.ASCIZ

/EXP CYL#

elly4

3516
101

CYL 410 TRK 2/

peo =

—

NonEe

s s e bt

000D 0D CDCD (D CD D

Pt s s B P

M
W

Bt bt Gt Pt Pt Bt Bt Bt et P Pt Pt Pt Pt Bt Pt Pt s Pt P 5t Pt B

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

et Pt sBt e Bt Pt ot ot s Pt P

ot Bt Pt P

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

s s o

s s Bt Bt B Bt s Pt Bt e s B

s Pt P Pt Pt Pt Pt Pt Pt

SR-538SHUREE
P RO AN PRSI LR
R

- CZRBHE.P11

25-JAN-78

CYL HERDER WRS~/

ARE INVALID/

CZREHED UNIBUS RK& DR_PRT1

CZRBHE.P11
11
11
11

25-JAN-78 12:00
14

118

i
11851

Ligse

11
11

fl%
11

DATA HEADERS

m?123
1

003352

s
gt

11E7E

/ON SEC 10,12,14,16,18,20 CYL 410 TRK 2/

.ASCIZ

.SBTTL

ERR OUTPUT DATA

DT1:

$TESTN, SERRPC

DT4:

DT6:

833334

o330

001116

%33&!
3
003330

STESTN, SERRPC,PSEC,ESEC
HMR1,

HMR2, HMR3, HER, HDS , HCS1 , HCS2

HWC , HBA, HDA, HASOF , HDC , HPOS , HPAT

o330

STESTN, SERRPC,FRCYL, TOCYL ,CALDIF

HWC , HBA, HDA, HASOF , HDC , HPOS , HPAT

83332

g3z

HMR1, HMRZ , HMR3, HER, HDS , HCS 1, HCS2

HMR1,HMR2,HMR3,
HER, HDS ,
HCS1, HCS2

001116

11889

PAGE 225

HWC, HBA, HDA, HASOF , HDC , HPOS , HPAT

11881

1188
11888

FOe

12:08

DHS3:

093320

001442
11
11

25-JAN-78

68822

g
its*g
llg
g
lls:z
11

MACY11 30A(1052)

DT7:

STESTN, SERRPC, WOCNT , HDWD, TEMP1

003352
003322

HMR1, HMR2, HMR3, HER, HDS , HCS1 , HCS2

003332
003354

HWC, HBA, HDA, HASOF , HOC , HPOS , HPAT

0o13s2

DT8:

STESTN, SERRPC, TOCYL ,FRCYL ,CALDIF

803328

HMR1, HMR2,HMR3,
HER, HDS
,HCS1, HCS2

003332
003354

HWC, HBA, HDA, HRSOF , HDC , HPOS , HPAT

o
003332

0T9:

STESTN, SERRPC, TOCYL ,RHTRB
HMR1, HMR2,HMR3, HER,
HDS ,HCS 1, HCS2
HWC, HBA, HDA , HASOF , HDC , HPOS , HPAT

SEQ 02es

SeAgRetEeiTRaa3a3si &

IBUS_RKE DR_PRT1
25-JAN-78 12:00

MACY11 30A(10S2)

25-JAN-78
ERR OUTPUT DATA

PAGE 226

s s Bt Bt o Pt ot Bt Pt s P

003354

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

0013s0

DT10:

STESTN, SERRPC,FRCYL ,RHTAB
HMR1,HMR2,HMR3,HER,HDS
,HCS1 , HCS2

3352
003322

HWC, HBR, HDR , HASOF , HDC, HPOS , HPAT

STESTN, TRAPPC
$TESTN, SERRPC,E.ARO,E.BO,E.AL1,E.B1,H.A0,H.BO,H.A1,H.B1

HMR1,HMR2,HMR3,
HER,HDS ,HCS1,HCS2

@ NO U E W

)

HWC, HBA, HDA, HRSOF , HDC , HPOS , HPAT

e e e

DT14:

el o

STESTN, SERRPC ,E.ARO,E.BO,E.R]1,E.B1,E.R2,E.B2
H.AOD,H.BO,H.A1,H.B1,H.A2,H.B2
HMR1,HMR2,HMR3, HER,HDS,HCS 1, HCS2

[

s s s ot Pt Pt s o

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

O DD DD
0 DO

Pt Bt Bt Bt et ot s Pt Bt s P B B P ot s s ot et s s s s B Pt ot s st ot Pt ot o

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

GO2

12:08

HWC, HBA, HDA , HASOF , HDC , HPOS , HPAT

DT1S:

STESTN, SERRPC,E.RO,E.BO,E.Al1,E.Bl1,E.R2,E.B2,E.B3
H.ARO,H.BO,H.A1,H.B1,H.A2,H.B2,H.B3

JO0

HMR1,HMR2,HMR3,
HER,HDS ,HCS 1, HCS2

DD DD

HWC, HBA, HDA , HASOF , HDC , HPOS , HPAT

000

.SBTTL

ERR DATA FORMATS

DF1:

3
.BYTE 2,0
bH2
.BYTE 7,0
DH3
.BYTE

7,0

SEQ 0226

CZRGHED UNIBUS RK6& DR PRT1
CZREME.P11
25-JAN-78 12:00

11946

066760

00000S

0667

06376
002

HoE e osl®
530§
ueug EE

11950
| 11951
|

11952

066774

H
11957

11958
11959
ugo
11 qé
fiesa

007
067004

11967
11
11
11
11971
11972
11973
11974
ug
11

000001

067006
002
7012 000003
;81
14 084
7016 0“007

figg &;852
11966

064004

067024

067026
067036

067040

067042

33‘7'

000004

000
053785
8m
064
007
064054

11
06
119;8 06
119
067054
11980

063767
002
0B4125
003

0B40SY

flgé

.BYTE

000
000
000
000
000

067076

000

11990
11991
ugg
11
11994
Hggg

7074
&7100
7102
&nm
7106

11997
uegg
119
12000
12001

067110
&7112
7114
067116
067120

063767
00
064004
0o
D&4Y054
0
06376
002
065174

DFY:

DFS:

DF6:

2,0
2,0
7,0

7,0

.BYTE 0,0
.BYTE 2,0
DH2
.BYTE
7,0
DH3
.BYTE
7,0
5
_BYTE 0,0

DH..
.BYTE 2,0
DHE
.BYTE 3,0

Dgsre
DH3

.BYTE

7,0
’

7,0

DF10

Y4
.BYTE 0,0

DF12:

S
_BYTE 0,0
DH1
.BYTE 2,0
DH36

000
000

000

.BYTE
3
.BYTE
DH2
655":

7,0

DH1

000

.BYTE

000
000

000

007

DF3:

PAGE 227

SEQ 0227

DH2

000

3z
Heee
7070 000004
11989 §m7a

067066

SEAE
00
.BYTE 0,0

000
000
000
000

12:08

000

067064

DF2:

DH1
.BYTE 2,0

oswoouw

11984

O
000

MACY1l 30A(1052)
25-JAN-78
ERR DATA FORMATS

DH1
.BYTE 2,0
DH2
.BYTE 7,0
DH3
.BYTE
7,0

CZREHED UNIBUS RKE& DR PRT1

CZRBHE . P11
25-JAN-78 12:00
1
7122
000
[0 BUE ool
{
;}as - ooz
000

ig &7132

000

15%
%l?g
12010
71
065330

000

15011
1 015
1581
12014
12015

067142
067144
&71;3
71
067152

003
osugm
07
064054
007

12018

067154

000004

{2815

1201
1
12021
15355

71
71
71
067164

06376

0
0B4004

1%53 &71;3
1
1§§§ 7174
1
1%
1
12031

13333

;508

1535"5

7el2

1
1
1
12041

0B40SY

7214

&751
06

75
722
;sa-o

065445
000
063767
002

12044 g fi 064054
1

15043
000
1204
gg:z 063767

iao-og ;
158?? Eg
1eos§
7
065055
1205
12054
12055
12056
12057

grgs
004
7
06S017
&m.a
7264 D&Y
067266

DF14:

000

000
000

DF15:

7,0

.BYTE

2,0

DF16:

DF17:

7,u

7,0
0,0
2,0

.BYTE
4

7,0

.BYTE

7,0

.BYTE

7,0

0,0

.BYTE 0,0
DH1
.BYTE 2,0
DH2
DH3

000

3,0

.BYTE
.BYTE
DH2
DH1

000

.BYTE

DH40
.BYTE
DH2
.BYTE
DH3
.BYTZ

000

000
000

25-JAN-78

ERR DATA FORMATS
.BYTE 2,0
65575
7,0

000

7176
09
06376
7
002
064004

MACY1l 30A(1052)

.BYTE

000

DHYY
.BYTE
DH1
.BYTE

000

.BYTE

7,0

DH1

2,0
0,0

000

000
000

000
000
000

OF20:

7cvre

.BYTE
c- a' Ev?s
DH32

.BYTE
DH29
.BYTE
DH2
.BYTE

0,0

2,0

0.0
:

4,0
4,0
7,0

12:08

PAGE 228

SEQ 0228

25-JAN-78 12:00

P —

0o080
(=]
3
FPRLSR

e e Pt B Bt P

gfi‘d FEin flfl\lg

£N0O

e
e

AR
NN

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

e e e e

e P B

e e

‘

RK&6 DR PRT1
064054

"'837

000004
992
06S
002
064004
007
064054
000

063767

06
065928
06501
06
007
064054
007
000007
000
063767
002

065000

msggg
0558?7
7

064
007
0640SY
007

000

000
000
000
000
000
000
000

MACY11 309(1052)

ERR DATA FORMATS
DH3

DF21:

DFe2e:

000

000
000

.BYTE

4
.BYTE
DHS2
.BYTE
DH2
.BYTE
DH3
.avre
avrs
DH1
.avre
DH28
ma‘;rs

.avgs

000
000
000

000
000

JOe
as-.mn-7e 12:08 PAGE 229

DF23:

DH29
.BYTE
DH2
.BYTE
DH3
.BYTE
7
.BYTE
DH1
.BYTE

055%:

7,0

2,0
2,0
7,0
7,0
0,0
2,0
0,0

6,0

6,0
7,0
7,0

0,0
2,0

0,0

Dg%s 7.0’

DH29

.BYTE

DH2
.BYTE
DH3
.BYTE

7,0
7,0

7,0

SEQ 0229

CZREHED UNIBUS RK& DR PRT1
CZREHE.P11
25-JAN-78 12:00
{

i i%

067404

104413

12108

7406

113700

{ “o

773

791

1511$
74
igiii Efig

’

2s:
3s:

1 067660

1 836883

121

igi:e
12149
12150

121582

067570

ASL
nosoL

Hov
TY
TWORD
MOV
BEQ

TYPE

TYP

MOV

B
MOV

108 ’

404
1002
044
0120

104401

76
75

MOV
I

SITEMB RBO

;ENTER ERR

:FORM INDEX

8177400,

RO
':gemra RO

(RO)+,24
, SCRLF
O
(RO)+,4S
Sg
, SCRLF

?Rou R1

((RO)+,
)+,§g

:CLEAR SIGN EXTENSION

FOR ERR TABLE

F
S
ERR ENTRY
GeT
snm%:ffisg'
ard
E? "”fiam&' Esfim LINE FEED
F N BOTNTER COES MERE
EEET éx@
:
1
RE ISN’'T ONE
;

ca-kr

‘DHT

i 'I‘

DolT
iGET
u?s‘

;
n,‘sn
R Wy

—

e o
0o

118:

m'5§
tgg')‘%rna
TST
(RO)+'
B
Qev
5(m)+,-(sm

TVSE

éfisSCRLF

ggg
BNE
TYPE

133
15%
SPACE2

;}rss-flaamc” H BYPASS INDENT
NO-BRANCH
;EE;-WP; Smcss

1403

1514s
xgx

—

BIC

79474
74

151
12140
igwg

" MOVB

177400

001205

igi
xg1
121
i1
27315
iaig E

12151

001114

067446
001205
067464

121
12l

ifi;:ll;gmalllllllll!Il'llllllll!llll!lillllllillllll!lIllllll!

003474

lells Doz
1§119 Ewfi
15119
xgxég ;-.7:§§
12121

121
H

SEQ 0230

15:5{‘2;"}m;o
STHS SOVTINE
UBER
THS “ 70, SRRk PYTEoe ARITRID).
T9 DETERAINE MMICH
oerxg WHAT INFORMATION IS TO BE REPORTED CONCERNING

isi$

s
1512

PAGE 230

; 'SET" JSR
PC,TYP ERR
¥ TURN RTS PC

iSigg

i i

KO2

12:08

2 l#;:il?%lg;&l;&ffi:;Elllllllll!llll*l!l!!llll!llllilllllllil!l

1
f ioo

15109

MACY11 3onuos§) 25-JAN-78
ERR DATA FORMATS

15%:

occ::
BEQ
;;Ps
TST

MOV

TYPE

R3
148
?;ncza

2(R0O)

tRO)Y+, 168

.cer 3Pasr?a;ORMAT
wngsnWORDOF DATA WORDS
HTEST 1 e Dt £08°TwIs menoes
;;ur rfisr DATA WORD ON STACK
:

;
TA WORDS
: NO~- %
; EgSE TORS

;NO: BRANCH

;ONLY A DH IN THIS REQUEST?

;

: TYPE DH

DH POINTER

0_UNIBUS RKE& DR PRTé
25-JAN-78 12:00
.P11

¢
c

HE oo B
121

12156

067600

062702

MACY1l 30A(1052)
TYPE

ERR ROUTINE

168:

M go

000002

BlE o ?834 1 001208

218:

178:
i2ies 7RIS §§§§§§ 067660
208:
1816y G7Ee 1654
111304
iglee 7R&
000024
18163 ocreud 05
882777
410

l8ll Gerese

07
40

010000

001103

000

25-JAN-78

LOe

12:08

caR )

SR
oa RO

ADD
R
YPE
TST
gus
YPE

ESREG
BIT
BEQ

CMP
BNE
nov

SEQ 0231

PAGE 231

?n PO

T?R GOES HERE

mcn;nsm or PS;NTER
iSEE

IF END OF

BLOCK

SCRLF
Ry
108
SPACE2
i0s

;
INDENT?
: NO-BRANCH
i YES-TYPE SPACES

#SW12, ISWR

;ABORT DRV AFTER 20 ERRS?

SERFLG, 820.

ELSE SEE IF 20 ERRS

25%

25%
#STACK, SP
ggop

ggaéee ngcxz/ 7

:LOOP

:BR_IF NO

IF NO
:ELSE RESTORE STK
nuo DROP DRIVE

;2 SPACES

CZREHED UNIBUS RKE DR PRTI1

25-JAN-78 12:00

12177

SEQ 0232

12178

121
121

12181

DIG
sougpntm CORPORATION
;: mgfi
ssgs 01754
E

7664

12182

- N

067744

T=.460

iglg
1
121

12188
15139
12190
iaiex

1t:u
§§
lile

/.é
%

RS
SP
PC
ST

E
=
=
=

%5
%8
%7
177776

.TVEC

1
1553?

convsmxons

“3

8.575 =
ghpt =z
RTT s

12199

00000S
000006
0007
177776

1§1§
iaies
fgig

;STATUS REGISTER

5'00
§§8882

5 §x - STATUS REGISTER
;7- ME&; §zmus REGISTER
PRYI"ré
-rm VECTOR

; RS IS USUALLY or&g
DERED
g

; BE USED EXCEPT FOR JSR’S AND

122

12205
15339

0.RDB

177560
7566

0.RCSR
0.TDB

177564

{£2as

0.TCSR

1e
12210

:
:

os"muq

177562

177864

=
=

177560
177566

LOCATION

NT
%
AK
9'
§
0
Y g?m:b sfixss Rghom

:; RESI
IT. IT
osgngfiousIN LEAVE

igsgg

iaa{s

PAGE 232

; DEC-11-UODPR-A-LA

12176

ig {é
i g iu

MOe

12:08

0DT-11 =-- VOOSA

;

———

rurorurn

CZREHE.P11

MACY11l 30A(10S2)
@2S5-JAN-78
TYPE ERR ROUTINE

;R onm aurrzn

aoon:ss POINTER(

;R
C;R
;71 gaA BUFFER

INITIALIZE 0DT

: HSE '§§¥+F°¥ N
AKPOINTS
: ug .00T+ 8 -ENTERST
(1.E. uxP}msoflT agtkkgo

ooo-u;

b.o07:

o.grgt

15519
gnss
8937%7 600077775
067724 O.ENTR: MOV
iaaxa
7756 013; ;
_”15 177776
MOV

3é‘rgec+a.sr

nf-smsn
§nvs
-STATUS
Fs,sxEuw“E
cA

1222

#0.URO

; T ur

{ggé? &77;93 868137 8911
7774

i85
E0o0e
i
1§§
122

12228

070024

JMP

b.STRT: MoV

%7780
TRE
17
7
0.RST
?sn
Sxfl
&94
177716~
MOV
113704
77
MOVB
106004

RORBE

g'r 3.usr

ENTRY

0.8Ki

BAGE
.gsg‘xm

"UiN,
30.RDR1
-PRI.RY

PR
AVE RE afSle sracc

35:5?ré§g§m’oxm

CZRGHED

UNIBUS RK& DR PRT1

182
155

ég%g

%-m

CZRBHE

25-JAN-78 12:00

{aa

MACY11 3onuosa)

25-JAN-78

TYPE ERR ROUTINE

177776

NO2

12:08 PAGE 233

SEQ 0233

ROR
novg

Ry
RY,ST
3"5%’

PiSTORE
T 1TIoN
IN STATUS

0.RALL’

:CLsm aaenxporm TABLES

0.RST1: anP

12240

égé

; 853%%5%' ;'QLExPLxcxr ORDER OF THE TWO TRBLES 0.TL AND 0.URO

i 5

[
mEE
MOSE OBIE
{gg:;
}&3 68?3?3

SRR
0.RSP: ggga

{ 24

{‘1’2

i1§§§

f:fl
7'“ 071766
140 &87%

}

i 4

072003

cnp

0.SP1:

067704

e e el el et S S S e S S S

070152

737

071676

n
nn

e e el e

280

g8B3

Ll el

;;

579
279

e e e e e e

2274
z

RASL

R4’

‘1‘82

"3},’

ASR

#0.UROD, R4

265‘7:{'"7
RY
0.5p1 '
PC,0.TCLS

gg s

2,R2

O
iy
JMP
0.0P2

3%7%0,RO

0.0RPC: JSR

£x RIS
=
ol
e
ssgg 70164 33' 070436
7

8onn.+o.LGRY

R
ot oo
5}a‘;fis;EHE connscr CHARACTER?

;IST : sschH DONE?

§m'sx'" :orOCTAL

;gsgfgms
aoonsss

;conséc'é‘#gmunmcrsa

: + HANDLER - OPEN INDEXED ON THE PC

1;§ fi"

RO,

o
RO, (R&4)+

§‘xw

0.SP
BfiaR
k-

gsgg

177770

;
;

nzm ADDRESS IN R2
TE

:MOVE ONE BIT TO CARRY

RSB
e
SR
Jhcagren ey 1o
:GO FINISH UP

! B HANDLER - SET AND REMOVE BREAKPOINTS
-

gl
geTiee
0174 006204

b.BKPT: TST

ASL

BCS

0.DCD

Bl
ASR

3410

|
8;3510
16

304

03:1’5
012737
000406

067736
072012

067736

38"
O.RALL: MOV

Beu
RY
0.ERR

gubgonom
80. TRTC,0.RDR1

§ CMD DECODER - ODT11
’

;

REGISTERS RO-RY4 MAY BE USED,

R TY

mc'e*gggm

ns 7

a§

nsnxpo NT
;cu:nn BREAKPOINT

MACY1l 30A(1052) 2S-JAN-78
TYPE ERR ROUTINE

{

;

1
1

0.ERR:

1
1
1
1
1

1930
71730

1i1

123

an"g

000067

12
12303
1231
1231
1231
1231

;

103355

000014

171

070334

égx;
12314

1231

071761

%3’5?3
4

1231

12318

]

BIS
MOV

JSR
0.0CD: JSR
DCD1: CLR
CLR
0.SCAN: JSR
CMP

15
1

#1,.RS
o'?.ag

8'0,R

BLO
Eéf

8'7, RO
0.clGL
3'1477770,110

ASL

RY
RO, RY
R2
0.SCAN

INC
CMP

Ri
R1,%0.CLGT

0.LGL2: BR
ASL
JMP

g.Lcu
i
90.LGDR(R1)

0.LGLI: CMPB
BEQ

BHIS

O.REGT

;

15323

72
g;%so

12325

0360

070170

1
1%%
15
12334
12335

15539

<LF>

07037

070410

042705

8§ K

CLOSE,

ReELATED,

vxsus

0.BKPT

;

BREAKPOINTS

0.PROC

TWO

R ROUTINE

;
;

E
P

PROCEED

'-0.LGDR

OPEN NEXT

INDEX - PC

CTIVE ADDRESS

;LGL MUST EQUAL 2X CHLGT ALWAYS

MOV

R2
0.WRDA
RY,RS
RS
0.ERR
RS
aRS, RO

IF R2 IS NON-ZERO
sGET V
:SKIP
%fiim:s&;
: 7 "PUT VALUE
IN gno
iMOVE ONE BIT TO CARRY
;JUMP IF
ADDRESS
CARRY BIT
THE
{REST
:GET CONTENTS OF WORD

0.WRDA: BIC

#1,RS

:CLEAR CLOSED BIT

ASL

000001

O0PS!

OPS

;

TST
BEQ
MOV
0.WRD1: ASR
0.ERR2: BCS

115

0.WSCH

0.uWRD:

%'fq:
1”3
10405
Soszos
10371

;Re-;f
: MUL gPLCIY
:G0 TO

OF ngn
gf CH uggg

0.EFF

0.LGL

: PROCESS / - OPEN WORD

12340

;

0.BARCK
;; O¢
0.0FST

iggeag

: ge'r NDEX FOR NEXT SEARCH
1S THE SEARCH DONE?

071034

:CLEAR INDEX

;go T coggs MATCH?
;JUMP IF Y

0.ERR

0.0RPC

0.0P1

000030

0.CRET ; cmgé ns% CLOSE

0.LGDR: 0.

;
RY
}PACK THREE BITS IN R4
iR2
RIC FLAG
;
T
N

070362

Witu

LEGALITY IF NON-NUMERIC

WITH
;x 7
::CHECKCONVERT!rscm.xrv"sg
NOT OCTAL
TO BCD

RO o.géccmnn
0.LGL

12320

:
:

ASL
ADD
INC
B8R

0.CLGL: CLR

:CHECK
’

12324

: OUTPUT ?
iTYPE <CRYCLF)>#
: RY gu'm
THE cg«vzlm:o OCTAL
; ag
R FOUND FLAG
:
TURN su RO

o.gtcl.

0.GO

12
335
12

SEQ 0234

;cn.os; egkgmrm NG
;i ?TOBE
T

g,o.r YP
0.CRLS
RY
R2
s,s.csr

1231

PAGE 234

177770

1
1
123
1

12:08

Np—|

1
2:00

BO3

CZRBHED UNIBUS RK?MDR PRT1

CZRBHE.P11

000766

Fsoa9dSaepnenRaaiiaa

12:08

PAGE 235

0.WRD1

SEQ 023s

;GO BACK TO MAIN-LINE

: PROCESS CARRIAGE RETURN

Gex mol S
;37

sS4

1270

b.CRET:

PC,0,TCLS

ook
0.0cC

1SLSE LoRATION.

RETURN TO DECODER

' PROCESS <LF>, OPEN NEXT WORD

071676

0.0P1:

071722

0.0P2:

Qoooss

JSR
75T
JSR

PC,0.TCLS
(ngu
ig .CRLF

i I S,0.FTYP

JSR

071630

0. WRD1

CLOSE PRESENT CELL
-((BEIERRTE NEW ADDRESS
RH%T

ETY;ER/ S—
;GO PROCESS IT

: PROCESS t, OPEN PREVIOUS WORD
W

8;737

000762

74S

071676

0.BACK:

JSR

ig'r

PC,0.TCLS

-(RS)

olw

; GENERATE _NEW ARDDRESS
;GO DO THE REST

: PROCESS 0, COMPUTE OFFSET

JSR

gso.rrvp

BEe
RoVY
MOV
JSR

071466

071466
070240

3.£Rna

HOY

000040
071630

0.0F1:

BCS

MOV
ASR
BCS
JSR
JMP

&% ,RO

O0.EFF:

G By S

067732

AS A_SEPARATOR
OMPUTE

R4
m'gg

5,0.CRDV
Rg.no
R
0.0F1
S,0.CADV
0.0CD1

! GEARCHES - SMSK
:
:

LOW ORDER BIT
IF CLOSED

3A5

b.0FST: ASR

b B

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

L¥AT

15345

070414

78 12:00

co3

-78

12341

25~

MACY11 3?‘#&023& RSE;I

18 BIT OFFSET

;

SAVE

R4
R IN RO - WORD MODE

T
H
IF
NUMBER IN RO - BYTE MODE
VI

ALL DONE

HAS THE MASK

$MSK+2 HAS THE FWA
SMSK+4 HAS THE LWA

INC

0.WSCH BRR
oiuggz'
?57
0.ERR1: BEQ
MOV

MOV

COM

;SET EFFECTIVE SEARCH

g.uos
né
0.ERR

T
ARCH
séficcQUPSRSSBJScT
FOUND
:ERR IF NO OBJECT

0.MSK,RS

:SET MASK

0.MSK+2,R2

‘§ET ongcxu

;AND COMPLEMENT IT

CZRGHED UNIBUS RKG DR PRT1

CZREHE.P11
:

15397

12398

1”51“2217

, i
|

25-JAN-78 12:00

MACY11l 30R(1052)

TYPE ERR ROUTINE

067734

0.WDS2: CMP

E&c

1
11241

0.WDS3:
071722
7 %9

12411
1241

1841
15418
1519
1241
154
i

071466

BIC
noga

1
1g§
1
12435

BL
0 RY

{:18

ieq

b.c0:

7722
28

177776

17737

176742

067742

MOV

03
17 067724 0.TBIT: ’ S'rc
CLRB
90393;
8&5538

18429 gnuoo-oE
gi3z0p 07012 176732 ) T
oa. MoV
MOV
1006 012601

o
Fanby é’&&%"“'m

5 (X)4X+42
1S
(X)+X+2=K?

8177400, RO
RO, RO

iWIPE
EXTRANEOUS BITS
:EXTEND SIGN

RO
RO
R2,RO
RO, RY

iADD TWO
:ADD PC
1S THE RESULT A PROPER REL. BRANCH?

0.WDS3

7
mg;ar
M g;

ng
R3,RY

CLRB

H IF EFFECTIVE SEARCH

;:
P
17
;G
i REe CCONTENTS
1882
;xucnsrztm TO NEXT CELL AND
:
Joke
;T%S,E(x'_)_fl(aum

0.FTYP

ASR
BCS
ASL
MOV
MOVB

E;gt.

%
2csSs'I",‘Su
RRov
(R2)+
N
4

RO
s,b. ADV

; PROCESS G - GO

13333 070726 10S037 071751

GET OBJECT

:;gAND
T WITH ngx
F NO MATCH
HTvgz <CR,LF>
R2,R4, AND RS ARE SAFE

I
INC
ADD
CMP

igg

12452

SgfiY
-(SP)
O.CRLF

177400

0.EFF}

1
{

IS THE SEARCH ALL DONE?

. YES

®OBE
INC
R3'

1
1

15443
xafig

E’f
MOV
JSR

e
J
T
nS's'}
0.WDS4: TST
0.EFF1: &h
Plo’

124

1244
1
1244
12944
1

BIS

;

SEQ 0236

0.0CD

ao.éésm

MOV
JSR

PAGE 236

sazl ,RO

MOV

DO3

12:08

R2, 0. MSK+4

BHI

10046

25-JAN-78

0.P

RY
0.ERR2
R4
RY,0.UPC
80.STM §T

90.A0R1,0.UIN

S'Q'RS?
80.TBT,0.UST

;GET READY TO TYPE
i TYPE
se

W
;

;

IF E

;nuu;m.v BY TWO

;DISALLOW PROCEED

- $CHECK LOW ORDER BIT
‘Es IF _ODD NUMBER
:RESTORE
WORD
iSET UP NEW PC
:SET HIGH PRIORITY

PeLEnR
BoTR-C
e
i T-BIT FLRAGS

;SAVE INSTRUCTION

?gE?I°n8°
Ut 1ERNEg
(SP)+.RI1
: RO

S
E
E
E
R
T
E
I
E
R
I
lRSRaNlog eiPvafiRE]aiwafiaoiMAaiao) iaoliYeol B6E526Z5RU6A5R6E5 S58 laiaiaiaiaiaieie

LSNNTIAoyReeReLAeB LRLeAeReARLPDTeOONG,LRLLDDLLDDRDDDDDLDDDDLLLblR

CZREHED UNIBUS RKE DR _PRT1
25-JAN-78 12:00
CZRBHE.P11

MACY11 3?A(10S2)
25-JAN-78
ERR ROUTINE

EOQ3

12:08

SEQ 0237

PAGE 237
THRU

656568

: AND SP

AND STATUS
AND PC

' CHANGED TO RTI FOR 11,20 AND /0S

ONLY ALLOKED SE $2R A BREAKPOINT

PROCESS P -

CK_LEGALITY OF PROCEED

PUT
HI

o
i
-BI

SAVES

o8 9RITRALI WAS LEGAL,
CODER

gm. wop w m>

2%
614

PROCEED
c
OUNT

wPBS*gagZd

-4

Euns

-"0SINI&TG
000 17)] O -

g8 £5 E

ofizégé
1

b Jo

;B
5 5
& SR

oe)v]

I
M
T
S
u
s
c
s
o
c
o
o
o
x
k
- -|

gPeE=08eOL0~on»EmtiwyReCEyMlfimefRi.TmPWP5

;

NBRBBIRRSES
G

56665868

7724

067742
067726
067724

176574

STRT&?

PRIORITY

Yo55
VAR

fim

JUMP
REMO
c
CK I
IS AS
PICK up Us
AND DON

Wwo

oa - - >

CZREHED UNIBUS RKE DR _PRTI
CZRBHE.P11
25-JAN-78 12:00
12493

071156

113705

067726

MACY11 3?&(1052)
25-JAN-78
YPE ERR ROUTINE
C.BK2:

Move

FO3

12:08

0.PRI,RS

PAGE 238
; OTHERWISE PICK UP ACTUAL PRIORITY

SEQ 0238

CZRGHED UNIBUS RK& DR PRT1

CZRGHE.P11
1

1
1 g;
1
Rk

1
1
1

1
{es%

1251
1251

1251
i i;
12514

{ i

1 8
12550
1

1
iasafl

25-JAN-78 12:00

116
11
11
11

1179
i

1
1
1
1

0.BK3:

772

1
131

071
1
1

071466

0.B3:

070234

ias%

1%4

1264
1534
12544
12845

xg-o;
1254

12548
12549

BIC

o32737,o.usr

JunP

;OUTPUT "BETM FOR BAD ENTRY

;CLEAR
OUT ANY POSSIBLE FAKE T-BIT
: AND CONTINUE
; JUMP_IF REPEAT

;RESET COUNT 10 1

%35

%,g.gn

:gkvg"fl:'52%52 STATUS, R4 IS SAFE

gsa

3 0.cAadv

; wsnng%e

JSR
MOV
LR

MOV

1
iasasaae

0.82

Hop:

NTS TO THE TRT

:SAVE TELETYPE STATUS
;ERR, NOTHING FOUND

012637

1
12534
152

ESeT

'3' vTT
.CRLF
ob. RY

1330

1334
1339.

T THE imPgi AWAY WHERE 37 BELONGS

}gfi
R
MOV

067740
0 f

16
067736

;

'rnon

o.a;
0.C
0.C1
upo.cr

;

RE. 0.

BR
DEC
BGT
?gva

067740

,su{rrLOW ORDER BITS
:
;
utcn oaoen
;

nov

#0.BD}1.R3
8.0
¢

0.B2:

SEQ 0239

S,0.FTYP
0.ADR1,RO

5
0.0CD

;s TYPE
.cs noonsss OF BRERK

;C
:G0 TO DECODER

: SAVE REGISTERS RO-R6 IN INTERNAL STACK

1
1

0.UFC,RS

RS,ST

MOV
gose

igg
1

ngv

1755
071614

000020 067724

PAGE 239

;CLEAR CARRY

RS
RS
RS
RS

MOVB

GO3

12:08

RORB
RORB
RORB
RORB

BEQ

71
1
8;17?

{

cce

7727

121

25-JAN-78

TYPE ERR ROUTINE

1
1
i

MACY1l 30R(1052)

1
1354
1

1
071364

071746

b.svR:

010637 067720
15§
067720
1

om;%

732

Mov

sP,0. (ISP
3g.usp SpP

,-tgm

MOV
Vv

MOV

071746

TST
RTS

000200

(SP)+,0. XXX

MOV
MOV

,=(SP)

R3.-(3P)

R2,-(5P)
RI.-(SP)
0. kxx, -(SP)
-(SP)

: SAVE TELETYPE STATUS

1393 113737 177560 071752 O.SVTT: MOVB

1
71402
071406
(071412

071416

1137
1
1
004537

177564
177560
177564
071722

071753

MOV
cuag
CLR
JSR

:
;

RTS

0.RCSR,0.CSR1

0.TCSR,0.CSR2
0.RCSR
0.TCSR
S.0.CRLF

RESTORE TELETYPE STATUS

;PICK nscts'rsn FROM

TACK AND SAVE

: SAVE us%n STACK ADD ESS
:SET_TO INTERNAL STACK
:

SAV

: REGISTERS

: "THRU
5
:PUT SAVED REGISTER ON STACK

;

;SAVE R C/SR

snve C/SR
CLEAR ENRBLE AND MAINTENANCE
i
"BITS IN BOTH C/SR
:TYPE <CR,LF>
t

£2
g

5&§§§§§§2
-

PAGE 240

SEQ 0240

sWAIT nshov ON PRINTE

TSTB

0.RCSR

EKTP
READY k& fF RoTB
;WAIT REN)Y

MOVB

gécsna.o.rcsn

~N
W

SER N

177SE 0
177564

[A]
N

—

12: 08

S,0.CRLF
0.TCSR

JSR

TSTB

177560

0.RSE1l: %'\79
RTS

072011
000060

CR,LF)> ecrons RESTORING

. ~4

0.CSR1,0.RCSR

,REST
;
THE STATUS REGISTERS

IN RO

b.cRov: MoV

MOV

nog

177770

-(SP)

25'

+6,RY

aag

;

1C
ADD
MOVB

(sP)+,R0
R ,-(h:g -

;C
.fuo PUT IT

5.0.

TYP
STRING OF CHARACTERS
B

CHARACTER

J
R
RAL

no’

RIS TE

?38

°-§§§'
8177776,R0

: GENERAL

THREE WHOLE PLACES

:'GET NO
LAST BIT

RT TO ASCII
AWAY

TINE

0.RCSR
=4

S'HF?f#B

sWAIT FOR
;

rln

T FR a gzvaonno

:Efno CHARACTE

ggg

3lzz§oo,

:STRIP OFF Egnxrv FROM CHARACTER

ggg

ggétr

: IGNORE THEM IF FOUND

ggga
CMPB
:

071620

T1STB

a’ba

nrcggg?grs
.
gur

GHT*uxs MESS

’

: SRR RGBS R

610
ble

;CONSTANT ASCII O

8127770,R2
;%'-?541

0.GET:

§fi¥§enSTART ADDRESS

300 -(SP}

g?c
“%59

ggg

5503 o7161y
560‘0 871616
e60S

RN R KRR KRR RRRRR
B
R IR T 33

R
L
SRRLSD

s Bt Bt s ot B

es
es

s B

0.RSTT:

071722
177564

;

RARRRRRRRRR

B
B
ot o & B
P

ot s P

@2S -JAN-78

TYPE ERR ROUTINE

MARCY11l 30A(10S2)

§ % Og‘l’ CONTENTS OF WORD OR BYTE WITH ONE TRAILING SPACE

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

s Bt Bt Pt Bt Bt s Pt P

Pt P

Pt P B

SRRARRRRRN
SRERRERETS

CZREHED UNIBUS RKE DR PRTI
CZREHE.P11
25-JAN-78 12:00

8“3:?0
8: RO

.cnscx rogLspncss
5éfl£éxsr
MI-COLON

CHARACTER OUTPUT ROUTINE

ADDRESS OF FIRST BYTE IN R4,

RADDRESS OF LAST

b.TYPE: SES

MOVB

BYTE IN R3,

53,5;1

(R4)+,R0

(R3)>(RY)

.cgsg¥ FORcggp ETION

:GET A cuznncrzn

DR_PR T

0_UNIBUS_RKE
n

25-JAN-78

TYPE ERR ROUTINE

JSR
BR

071630

12:08

PRGE 241

SEQ 0241

; TYPE ONE _CHARACTER

5,0.FTYP
0. TYPE

{LOOP UNTIL DONE

RoY
coee
BNE

000044
177564

N
Lo
'

reswres O
e
e
b

S ERGE ERES
oL£NO

000137

aouq -(spx

0.708

osca

:YES, INIT THE COUNT

8.TCSR

TYP2

; GENERATE NULL FILLER

JSP

; POP STRCK

CLOSE WORD OR BYTE AND EXI T

UPON ENTERING, R2 HAS NUMER}C FLAG,

b.TCcLS: ASR

Sl1: ggv
Ts§
°'$5:1'
0.

PC
-(SP)

.gg CHAR TO BE FILLED?

e
N

BCS

070220

; CHECK STATUS
{WAIT UNTIL READY
: TYPE ONE CHARACTER

,0.T
58
-.2“
0.t

MOVB

0.TYP2: TSTB

177566

0. TCSR

s Pmo

O.FTYP: 1STB

B66B%E

177564

”~~

8r-00

o836
\&R\l

o Bt fomcs oo

ot o Bt
B
s B
s e Bt

Pt s Bt Bt Bt P
P
o ot ot e B
s B Bt s

RY HAS CONTENTS

!?5np gfgfnov CLOSED
; IF NO
R WA TYPED THERE IS
s OINeSS
10 D12
<GET LOW

R BIT

;POP EXTRA CELL FROM STACK
;AND SCREAM BLOODY MURDER

0.ERR

¢ R LF>

; 8§ts - TY;E RILF)>#

——

ol ol ol ol ot

X M3 Fvem

k99 99999

605557
000205

0.CRLF - TYPE

071757

0.CRLF: gsv

%0, g+x,n3

;LWA <CR,LF>

071760

0.CRLS:
0.CRS: nov
JSR
RTS

#0.CR+2,R3
#0.CR, R4
S.0.TYPE
RS

;LWA <CR,LF)>#*

71756
71614

PROCEED FLAG = O IF PROCEED NOT ALLOWED

0.CSR1:
0.CSR2:

SQVE CELL - R C/SR
iSAVE CELL - T C/SR

~N NN
u

@
£

—

b.cR:

'fls S

0.BD:

—B

:TYPE SOMETHING

XXX
.HORg
g.T:
.BYT 8O
0.P:
'BYTE

’

(=}
N

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

MACY11 30A(1052)

! TYPE ONLY ONE CHARACTER (CONTRINED IN RO)

OO
NN
LW -

RO CRORG R O%

004537
800772

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

07162
b2b

ot o

s Bt B

25-JAN-78 1

—

Cm P11

.BYTE
.BYTE

O
O

.HXSD

“BE

.BYTE

"BYTE
.BYTE

015

012
'

EHPORQRY S ORAGE
T-BIT FLAG

= 1 _IF PROCEED ALLOWED

;

T
3

(CR>
*

nn
NN

$me Bt Bt Bt s B Bt e Bt Bt ot Pt ot B

MACY1l 30A(1052)
25-JAN-78
TYPE ERR ROUTINE

JO3

12:08

PAGE 242

0.LGCH: .BYT

.BYTE

015

o4y

.av'rE

il 4

1;23

8?5

'S$

1;22
1;30
1775

l.;i;
136
157
127

.BYT
.BYTE
.BYTE
YIE

e
°°*

S
Pt
)
N

1
8;1;&

1767

172
8;1773
1774

105
102
120
000014

é"’

115

177;§
7%5

890
1

000006

072003
072011

0?2016

072012

000003

: CARRIAGE RETURN

0.CLGT

.BYTE
.BYT
.BYT
=

'
:
’
:
’
:
.=0.LGCH

b.1L:

.BYT

.gvr

’

;DO

BYTE

i NOT

:CHA

BYIE
.gvrf

:IORBER
E

.+6

0.LG
b.BUF:
.

.BYTE

.EVEF

wesw .~

.=0.TL

E
g

; TRBLE LENGTH

;6 CHAR. BUFFER WITH
: TRAILING BLANK

°}

O.TRTC: TRT

; TRACE TRAP PROTOTYPE

:THE ORDER OF THE FOLLOWING ENTRIES IS CRITICAL
-

0.URD:

Bt ot B Bt s B

CEEEEEEo&

Bt Pt Pt s Bt Pt Bt s P P

e PP

Bt B

Pt s B B

s Pt e e Bt Bt P

s Pt Bt Bt Pt P

0 UNIBUS RK& DR PRT1
P11
25-JAN-78 12:00

0.0DT-40
;USER RO

R
R
R3

0
0

:
:

0.UPC: 8

USER 35

0.UST:

0.PRI:
0.MSK:

8
0

{USER ST

;0DT PRIORITY
: MASK

PLOW LIMIT
(HIGH LIMIT

: BRERK POINT Lx§rs, ADR1 = ADDRESS OF BREAKPOINT,CT = COUNT,
!

77
77%
067742

00
0000
000001

fi%w

T UIN = CONTENTS

)
1: 0
0.CT: 0
0.UIN:
O
.END

SEQ D242

[+ ]

p—

——

(=]
W
—

£
DD

w
—

WWww
S b b e
L LWE NELE
®

s s Bt B Bt Bt Bt e e e s e P Bt Bt B Bt B B Bt e s s Pt s st ()

S RBLLN

s s e Bt s B Bt P Bt Bt B

S‘C&g‘-‘& & R ELE L L L L L L L L L L L L L L L L L L L L L L L L L LS LLLEL L LS
[y

25-JAN-78 1

P11

NNQUQSNN

atletetatat

+=¢
++

T S S S S

Yot
PP
+.'a

AN nRnn

0 Becn s s s

S
RK& DR PRT
0 UNIBU

+.4.4

1047474

AR ARRRRRRRRERR)

—

nnn

A AALEEEEEE
gll 3333
c

12:08__PAGE 244
MACY11 30A(10S2)
25-JAN-78
CROSS REFERENCE TRBLE -- USER SYMBOLS

KO3

235
2369

10138

10316%
10273

10315s

9109
9128

9154

S704#%

7349%

9857
9905*

SEQ 0243

LO3

SEQ 0244

EREHE e N TBUS B G RR BRI, 00 MACY!! IRRGARSRr
eRENLE T ABLE 2 Pk ETMBOCs

gt&:f
Jias

iggs 1323
.
19858

1268

fT =
108 =
g]"l’l =

{ 8
f%:
1 ]

1523
1585
iggg

BITOM

BITIO =

igede

i :

1328

{18 =

BITIH =

(Agyse

1337

1332

135

1374 2523 397 9780

1805

10103

138

1337

|135

11385

lvo1

1370

138
1350

Lues

10080
529

10042

Q9IS

10087
1466

W17

1386

1402

9B4S

1414

BIT4

1seSs

1389

138

1331

1u9

(%2

13\

1408

3937

oumouwmou
eY0i*
38l

9298

i%g
ige2e
:

137

s
1%

6317%
s077

1398

1457

7195

7279

W21

S108%

5138

6110%

B426%

8779%

gie?

@
£
L
[V+]

7173%

7143%

3691#%

[0}
[N
£

3687%

[eed
n
e}
w

gss ;

B it

B3¢ B M A we
3

1. = G0eo0

SRR5Esihe

001354

182

£rr

CCYL

B
i

38
[3s

[+]

g
£z 3

’

I30

—

Efr
17

vowomom

%49

8821

9300

CZRGHED UNIBUS RK6 DR PRTI

MACY1l 30A(1052)

CFMT = 010000

sses

= DOD

EYRoD- 001369

CYLDIF 001362
CYLINV

042164

DATADL

0D1446

005.:%

066744

DF10

067070

DF12

Hoo7
iig%g

11858

é 7

7938,

Iioce
728"

067110

4672

338"

4718

4750
4781

4eBHE

10156

10194

BlN8

832
@,

Ho1s
ii
Eigg

930"
oisd
ga
%

;98§

4478x

283

19333¢

10194

138250

10184

[]

113

£92°

28283

DDT

G028

1848

001444

BATCHD O93u7e

4697
4

775 97408
€314

g%;

DAT

4683
4674

00137

= 0000

1253&' 10056
£828

1 3

COUNT

063

1029
ii1qg
wes
ceis
e0n

4713%

10944

593

3566

4
97298

4739

10952

HGe8
1987

£988
849

o137

35"
20
els

s8ier
M
eAx

008
B7P8

SEQ 0245

w733

4S9

4831

492

5007

503

Y
3348
4803

34
e

423
BE7

&5
3378

2.8

8%7

&M
8293

10968

10977

10984

10992

10997

11002

#®

9741

10954

9751w

9743

10958

MO
NP3

MBI
H%es

1%
1%

1i%oa
11188

ese
BE1C

sg72

&9
S47Ss

g
Meux

8
eSe

Y
5743
4GS

08
EETR

6325

si3
3R
Medr

ead9
9uZ6x

288
GuF7E

11938
119

11010
1148

11120
11358

11i%e
1%

311

W46

5621

@l
G478

343
9479%

9
QUEO*

383

949

7
3337
Medr

819

glld
I4eSy

592
8RS
Sgee

5129

6362
S3%S.

6519

6816

7156

7301

ebl4
2749

2682
2859

2688
2884

2699
2909

2704
2934

2709
2994

8iEs
47w

5835

;ggfi
4

4483

318

4s18

9
ggaé

2596
2734
41

gg’:

1?‘9438.

g‘OOS

3084

11997%

CEET

H0E3
1988

OCK
047546
CLRFLG_
Eg?ggs

ot B

047302
047206

3059

L T

KOF
CLKON

uea3

s34

£ E
[T, 147)

CLERR = 300092

Gei0

o -

045012

PAGE 246

7o
oM oB oA
DR
B
py
oHE® b
M M e
0 G0: 4 B OB B W
444
833 8% booe
9i91s

CKCERR

432"

ses0

(]

T938s

12:08

CROSS REFERENCE TABLE -- USER SYMBOLS

N
E

GHkRES BR4Zes

25-JAN-78 12:00

BatRaa

| CZRGME.P1L

MO3

25-JAN-78

109

3470

B335

608
73

é;;

11939

2804

2854

2969

2974

2979

2984

3566

3571

3576

3591

3596

3606

3611

3616

S
—
e

8271

S6
2651
2864

067240

3219
12027%
12036#

3224

3334

120188

067024
7044

063767

DH10
DH11
Dfilg
DH1

064250
064277
8243
43

Dfllg
DH1

064476
064540

DH18
DH19
DH2

064560
064601
064004

DH20

:Ssg

DH1Y4

BEL

OB4446

DH23
DH2S

0472
064744

DHe9
DH3

0
11673%

2824
2904
3144
3309
3525

2829
2914
3149
3430
30

3054

3059

3089

3410

3415

3420

34eS

3450

2680
2857
S84
12085

2686
eB8e
3599

2697
2907
11641

2702
293¢
11950

2707
2
11968

2987

3002

3087

3092

338¢

3387

3473

3644
3297

11700
3302

3307

3312

3317

3322

3377

12022

12031

12042

12056

® B
\‘DU

067010

S
DF&

11709

11970

11992

12003

12012

'5a3"

3513

3518

11723

3o42

30s2

3057

3a2s2

3257

3262

3347

3393

3327

11733

12044

120S8

§: .oflgégWY B

067350
067004

DF23
DF3

’-.‘:

067314

=
-N

DF21
DFee

Ll ol o

£
£

DF20

l??gsl

®
2

| DFI?

71;:

SEQ 0246

nnsw

82713“

2:00

NO3

12:08__PAGE 247
25-JAN-78
CROSS REFERENCE TRBLE -- USER SYMBOLS

MACY11 30A(10S2)

W
n.c—o

- DF1Y

| DF1S

CZREHED UNIBUS_RKE& DR
- CZREHE.P11
25-JAN-7

065017
064054

11972

11983

11994

120058

12014

12024

12033

065027

3478

3503

3508

3543

3548

3594

11741%

DH33

osgiga

3267

11749%

DH37
DH38

S174
065217
065263

3162

3167

3172

3564

117718

Dflgg

065055

3157

———————

BO4

' CZRGHED UNIBUS RK&
DR PRT1
' CZRBHE.P11
25-JAN-78 12:

;‘.

DHY
DHE3

118198
3337
9y

116588

3’1‘9

06M4

: 12.

o§spk2

332

i;g

‘}'.. e:

DLY
o4Y4220
DMD
= 000040
DOCMD
043434

3997
13928
Y
514
sgx
4

BL?, = 100000

1:re'e

Ivs
gw‘)
BRIV
DR%VS

DRIVY
DRI
DRI
DRI

DROT
=
DRPAR =

DRVMSK=

3498

3533

3538

3398

3413

3418°

3423

2654

2659

3750%

10057%

91728
45
52
g
1
7;3

9175
YeM7
5274
%se
94
ggg'

3827,

3282

117928
117998

12038

Hagge
1194

ue;s.
Y

119

2822

N110
4y
1

L
1

3856%
4094

395;.;
414

4616

..:#
.,é.
438

3339o

49%
3344

3966

13798
1333.

13388

4004

3838%

4205

DSWR
DTE

1199.
13678

2288

37yl

uo;g
25

4138
2584

3574

11783s

3589

11774

3428

3433

3438

3443

3448

2664

2669

2807

116638

10079%

6374 6532 7454

7626 7843 7968 8179 8304

4839

4987

3292

2982

3983

4775

3569

3609

3453

5390
490
361
ges

S424
6557
7424
8335

S514
6635
7520
8397

40l1%
8952

4030

Y134%

4200

8870

8969%

2601

2607

2625

2630

5344

923

3981%
4096

8204

9028

4876

932

11814s

11667%

’
S024 2 S06S
6533
6558
6686
9735
7573
659
8430
8477

5338
gsue
01
ggg?

3553

4909

98498

986M

9879

5086

5629
6910
7744
8554

5111

SkbS
£929
7791
8602

25448
4ySs
490
&
fasgg:

DTYE
DT1

2827

.8
:

%gfln‘

=
=

3287

3558

ésagékS *§7gagi 5928 6057 6221

SOREEt B
DOTIM
003470
my:
1

3493

SEQ 0247

13608
2572

26
274
599
10
3198
3348

2681
2748
geg
i
3213
3353

4117

2687
11
3383

3218

4223

4486

93
ogg
1
3373

4521
2695

sgee
58
goxg
12
3258
3378

2703
708
2883
908
goxg
3
13
138
3263 2 3298
3399
3404

2613

2753
2933
3028
3163
3313
3469

2619

2718
2298
gosa
168
3318
3565

2723
297
30
173
323
3570

728
78
73
3178
3328
3575

2635

2733
2983
73
3183
3333
3530 2

2640

2738
2988
319
338
3535

|E——

MACY11l 30A(1052)
25-JAN-78
12:08 PAGE 248
CROSS REFERENCE TRBLE -- USER SYMBOLS

CcO4

YL 0RUIOSE). REIBNTE 12:08 PAgE 20,

DT10
D71l
DT13

0664
066474
066

DTN

066560

DT1S
OTY

066650
066136

CZREHED UNIBUS_RKE DR_PR
CZREHE.P1 1
25-JAN-78

u&os.

3610

3615

3620

3625

3650

2 oam oo oo om aw
S
$R

o5
i

P
==

B8
&

By
&

4607

‘i&??

4656

4703

‘lg;fl

e
ig: 3394 3474 118768

3655

2848
3508
3519

153124

s
TR
%R

%065
ggg

5283
4718

8519
4730

5572
6119

4914
ggg?

—

Gy Bg
AN
-

—

[

WENN

g437

i; L

6915
6639

o
I
g Bx

4883

3 R

£l ;‘;g 3

4701

4654

oh [¥+]

as;

ugel

ici

% 0

iégi z§ % %
3

3505 E359

®
SR
3858
B Qe

mEnE

£
]
£n

BERRRE

000200
001000
002000
000200

k-1

D.FLT =
D.FORM=
D.FWD =
D.HDFL=

'E'E""EEE 2!

D.DRDY= 000200

£L

D.DRA = 000040

F D

D.DDT = 0DO400
D.DOOR= 000200

D.CART= 000400

TS 358 R T

4326

£
JO

118848

SoEe

6970

6978

9532

)

1:1?:

6970

lu4378
ys
14538
Y2hbs
PR

N a5
M
VB

3§§§
-7
PR

4914

51
211

]
2453

6637 1 6967

7872

G889

3278

wze0

(

Sol o o

PIP =
PLO
E
=

SECT=

1:“6:

14798

540

s51

wes

8556

8579

8609

8801

5565

S573

524

8432

gHs
4627

B:7Y8°= 832888

14288

D.VwW = 0001

4994
5801
2

D.WLE =
D.WRL =

53f§

8269

8432

3725%

3726%

594

14398
14128

14518
14008

MTVEC=

EM11

;Eg

. XERR=
SCH
=

8581

8§

§8
25

14298

£L
£
L
(1]

D-UNLD= 040000

13618

0S75eM

ebll

112368

G228

sarg

5210

D.SPLS= 010000

D.SPOK=

sgh
.
Y40
W9

BBOE

557

47,

gggg

699

4e0s

B4S4

B48Y

8556

sa§ S901
;él" sfig
I

ggga

5431
Bl
8830

28579

7522

7746

uesa

wer3

4654

5518
;§§§
78

8603

.
7870

8082

wes:

S04

ssg;

470

5540
6338
792

4gS1

8801

5571
438
8883

5031

4?7

228
g
BB E

6%I

daas
6055
g

7203

5604
462
&4

5889

22“19

4883

491

S
95932
1M

gg?to

14558

JOO!

8839

[

8802

h
®

Y
3?99

3383

BE
W B

PAR

3353

SEQ 0249

y
g:xi

o o

PAGE 250

CROSS REFERENCE TRBLE -- USER SYMBOLS

;L@:= m '

DO4

12:08

25-JAN-78 12:00

25-JAN-78

CZRBHE.P11

MACY11l 30A(1052)

SEE BiE

CZRGEMED UNIBUS RKE DR PRTI

<7
gr2
a3

CZRBEHED UNIBUS RKE DR PRT1
P11
25-JAN-78 12:00

EO4

MACY11 30A(1052)
@25-JAN-78
12:08 PAGE 2S1
CROSS REFERENCE TRBLE -- USER SYMBOLS

2966

. 2‘4 -

;

238
i3
=

EMSB

3026

2986

2996

3402

3101

112478

3126

3181

3216

3326

3161

2831

2861

2886

2911

2936

2956

3031

3141

3231

2876
3527
3256

2901
3633
3296

2926
11273s

3046

3091

3156

3246

3286

3442

3331

2951
.
112768

3346

3381

3392

3452

113S4s

3386
3186

3447
3201

11366#
3311

3552

11373s

3131

113328

L
2
3603

3021

1 3236 3Bee 15828“ 2916 2941
& 4 e8?
sgss
1126%! 25,
294 3041
o
#
9

3291
3081

11&4 , li2o2s

4
Ob2e226

3001

2981

% . 1
3206 11378s
A i
L
2

nm-oo gl
Bl
Bl g
g
i %z?;

s
TRTEAREIRER
G B8

EM39

2851

1%52. 1

Damt

FEPORT REEE AR R

2801

usgél

2976

éseg

2971

SEQ 02S0

11479

2961 3036 3146 3236 ::7:
3086 309 3151 3241 3281

MACY11

(10S2)

-JAN-78

FO4

12:08_PAGE 252

CROég SEFESENCE TRBLE -- USER SYMBOLS

SEQ 02s1

4
o
o
f
e
l
o
)
o
o
o
n
f
o
l
o
n
f
o
o
n
d
o
n
d
o
o
d
r
d
o
d
o
d
o
d
o
d
o
d
o
d
o
d
—
~
T
M
N
=
=
4
)
o
—
t
=
S
N
E
T
N
E
T
E
T
E
E
E
E
S
L
I
E
E
E
I
ufim 8 o
OH O bt

ooeoleol)ol)o]ol -l o=o)o)vlolo)o)ol

S"."“2“"%1”TM RRee

CZREHED UNIBUS RK& DR _PRTI
CZREHE.P11
25-JAN-78 12:00

11522

11531

11598s

3908#%

003416

E.R2

003422

< ¥

E.Al

003412

Y62 %

?H 4

3759

AIIE
E
T
&R ok e o ieo o M

“.% m

m“Il."m

—t

3623

s FUNON TM

3618

GO4

SR O TBUS B R B 1800 oY R RGA
S REreRENCE

ThBLE o: Tl SYMBOLS

E 138

ugss:
Zi76s
SN

E.DDT

012070

044140

FHDT
FLGTS
FLIM

801328

FRO;x

043530

cxms

B8E

qgfi

3564

85
13598

W b
K

44BYE

108s

giste
7ZiM%

3973.

381

= sussss U

: 477

ugfi

5074

0320
'fi
6956

9&
9
95288

4739:
*
aE

4867

7291

7175%
B0sy B]AT* IidR*% ZiTR*
7178%
7342%
7353%
95.
sézg x?gég 1?§§é 1%93

gfi

g‘l

cmu: sooo:
£agox ;93.
g
g
48ice ‘8000

2lsan Sion
fi, 150"ge l @%Zgar *%,Z
.
gige
geer

8109%

8139%

N MR

599

3995

7098

3Y
7725%
831

82bY %

GRS
Qi

84y

75;7

8572

egsg

cieox
7736
gYlls

sie1
7924
8422

91258

BUE9#

9873

754

91528

7663

90S4s

5163
72?3
8

90S7

blos
7339
8551

eueux
7950
8624

6620w
797
86

10934

10935

1739

4843

95978

/%%7

7639%

4112

4503

9031

o42

10922

10923

10924

10925

10926

10928

10930

10931

10932

10933

4340

4372

Y405

Y447

4561

4596

4676

4690

4717

4743

4991

8Y459%

8234#

4103

S032% S211%
o
e o

Wi M '

G A R

90053

-oesa: uea-o:
E338% pdo3e
O
gE

95638

S5, 2 e
.,’28..

GNS

GSTAT

5] 36

046260

0014

. ‘%32: "

G Rm sl
Y2638
1%?3:
Y
3

44
ssgg

FRove'
F

PR
%1 .
Y62l

Bopdoos

FORMAT

Y702#
33

8182

FLOAD
(046412
FMTE
= 000020

%as:
Z?Si:
R
:

;;ms g?é;s fi:

044044

FATT

oli

%os:
oriek
e

s;s!!15:" gagts 5&‘ %5@5P g goi:: 213SEl

(E.B3 003430
. FATT

35325
ehids
y

l§0—\l

2155
%
It

8833?3

NS -

798

S01S

9587

s20e

s226

8307

§3se

SSel

5620

s727

9330

§7se

5795

sels

%fio

HPEND 003318
|(WY
HPOS. =
9
11

.
ggsg.
11828

| HiC

24788

HVRC

= DOOY00

003326

13638

Hg?9

3
16339
10194
9088 11849

11894
4480

11870
11897

734pk
59%
1Bes" (Teeet 11893

11sel

11897

11857

1188l

11897

11865

11873

S
b

BB
i
Lol ond

Sthses
i B

R
b

SR
&0

i
11862

UWN
£ v
oL

e
b

el9

11643 11857 11865 11873 11881
.

183
7

11846

Ll ond

.:.f::; %gé BHNER
P

11854

§§§

11817

3#o

—

i
w"”kfi Bo336e

PE=R

-+
A

s
-

228

REE2 3 8
3

i 873

3 o5 BN &

ggs

11857
11

B33

11849
11857

9109
11849

93738

364

RS ..§:§§§.Swa
3s
S3% @55

2poEE
£

9357

BBBB

& i sas

HASOF

O
9405

Lad o

3TM

SEQ 0es3

L Lr=

G gHR =

9193

045360

O
93248

045130

OBE
916

GSTAT1

OB
9159

)

12:08

Bae

BB
a
7

G?TRTE

HOY4

PAGE 2S4
CROSS REFERENCE TABLE -- USER SYMBOLS

25-JAN-78 12:00

2S5-JAN-78

atE

CZRBHE.P11

MACY1l 30A(10S52)

8 ?tplt

CZREHED UNIBUS RKE DR PRTI1

8830
9581

O3—-%uNMTWN3viemM..“BRBoSm2g8sEa7n%*9B*¥“@a3i¥"57siSayY9R{:Eu0Ry
-

~4ZOXO

)

qfié.

oe
4 g ol

42578

]

3770

3765#%

3673%

110648

11091s

N T~ —

CROS

_12:08 PAGE 255
25-7AN-78
REFERENCE TRBLE -- USER SYMBOLS

)

“J-N7\@8Y 1“otN @@

B3 som

MACY11

R
]P
i
ot
ot
ot

ES-SM-?B 15:00

DR_PRT

3724%

hal L. ]]Pe o—

]LoelaLe] de4d ge o4 deedtod
ot
g

H" mH H H HI ‘I-IL

“g..fl... Q.TIQ.lmlmam.el'mmlog]o-aotE0lwo -oa..0O TT5Me.t.——.t!—7e—.too.ti]SL.EgN)tve'S
bT~~M f 4¥J.@]_[“O+.IRNJ>@ Ie—m.tIE.I—.t: &“~~N —D~
N~ ilgm8" 0éosy ®3@

m4motmoomm&w~33xmm:w@&mfio—wmmw”mMBbN.So@DTmf3-paeuR3fs88%5m“4-~R8:T7}g ~i—T—UwBNnDtMi=)—
CZREHED UNIBUS_RK
CZREHE.P11

104
SEQ 0254

m sg &

-ev—-5oB0mo
$ozop[2y&}R7]gf37&m2]—553g5o4y0e&E0%f.li.l.gI..}...lgeeSozR%meeaN2ok®gm
@_

———

5339

MACY11 30A(10S2)

CZRGEHED UNIBUS RKE DR_PRT1
25-JAN-78 12:00

--4— -—
-3— —2

T @

mWotwmgwomootWoWo.otoW4umBmmNg%o=oo%M—aT)Io,l.l.fl.l.il.l.&l.lw. l1T.ofl.5olmi3ol.1alo.1ln1lo.1l%o1l..1l.m1l.o1lo1l.%o1lo1.lo111s1e—1l
2@ R-VN] €2 £——— 8[—E§ =Bo@ ;A BouEmnG gL ON4[+EL-R
2 o—oL3Ny7)~] -J0—ke—2O3OCZRBHE.P11

JOY

(47]+1]

& a

o.._.Jao

& wn

0_UNIBUS
.P11

25-3aR-78 12:00

MACY11 30A(1
CROSS

)

25-JAN-78

KO4

12:08

ododod drdrderdododododedodod

PAGE 257

SEQ 02%6

FERENCE TRBLE -- USER SYMBOLS

Q1@ gigR 8 im (B

c
c

12636
12606

12587

12611

Pt oot Bt Do) ot Bt s o

Q4s

=
=

b
=
<N
:

PSEC
PSW

12645

lglao
12483%

12500

12617

12502%

12701

9
15392- 12484# 12491
1

12Sl1lx% 12702%

12436

3681%

3686

3690%

S100

ss11

6907

9730

9751

S063%

S104

9735%

9755%

3679

3684

3689

36938

3765

3909

9388

9989

Eubb#

s459

SY71%

9443

Y4 E

3847%
384

H4975#

3671%

38SM#*

gesg

3885

1210
121

2407
1187

12237%
19607

12611

126488

. B oo

151
15

15268%

;

PRY

izszes

12358

PRI

;2%

15567

3676%

:
8

lae

02s
——

788

X2 gzve
33338"
L

)

e B ps Bs e o o

e e Y e

#3558

B P

Bt Gt P

12511

B e

{ BKR

1 ]

15226

& W

3 3§rwr
RDELE

#9999

C =t

gL,

{

30A(10S2)
25-JAN-78 12:08 PAGE 258
RS
TS R reREniE
ThbLE - O0sER SYMBOLS
12475

" TVEC= 000014
;

}

7122‘

TESR= 177564

igwg

—

MACY11

[

Te ggogeg

[

0 UNIBUS RK& DR PRT
REHE
P ] BUS K AR 78 12:00

LO4

S109%

8979

11860

3802

{
| RKCS2 = 000010

#*
ig33e

8985+

4ses

6207

6361

109358

12163

Jak3

- %e%7

6518

7440

7612

7829

7954

8165

8290

583
9708

11884

58%

11892

Bfed

B33

e .
S03F

SRR

3
&

240

lz.

U738
5137

ol < pgral

B BB B BN O B O o o
8%

887

915

833"

= DOOO1Y

T B G BEBR
5 B 0
12358

Y742%

gg . %

%g%g %& 90:95 S012% 9019

088

863b%

B682%

B8780%

Bdnde

GeEA"

28e3.

o B B BN
E3

OB G S0 &

wn
(=}

£
L3

—

o
[+ 4]

—

o
w

[14]
O
0
N
B

- O g:g % %“gf g go o
£

b o

RKER

—

g9ad"

SemomomopoEEEEE
RN K

n
~

oo
woaEms

5378
S13e2

A
It

[} ?g

10730.

- 35

SEQ 02s8

q46Ss

S91Y

PAGE 259

CROSS REFERENCE TRBLE -- USER SYMBOLS
9986%
9987%
9978%
3730%

R
3

9276

046064

RCYLD

729%

§i58

MO4

12:08

;

788

WA c BeeDse

2S-JAN-78

BBRw

25-JAN-78 12:00

ik v

CZRBHE.P11

MACY1l 30A(1052)

CZRGHED UNIBUS RKE DR PRTI1

4758

4BY2%

4BEE*

1;3

' CWBI : 10441

SCOPIS: 2::3:& u
-R
Sl B
SEEK = 000017

mowe gy
SPRC

7660

§RRCK=60112%

13398

9?6%0
?ég;:
s

4899

S047

422
9699

174
658

247
867

7284
8543

b2S
B841S

8068

H714%

S904*
06%

11%

9326

lSlé

11
4410

29057
310
15189

gr&nh 227793

11 é:

215

0075%

04
045424

3792
3804
2843
; 2‘5

SUBCLR

4440

1214

007120

gg7704

SEQ 0259

97684

START

814

gggg

e
it

NO4

25-JAN-78
12:08__PAGE 260
CROSS REFERENCE TRBLE -- USER SYMBOLS

MACY11 30A(10S2)

3%3?

| =$é°

0_UNIBUS_RKE DR PRT%
.P11
25-JAN-78 12:00

CZRE
CZR6!

12471#%
3986
4545
[
8544

1481

5591

449y

26!

£
£

8s07

S674

7696

12:00

SEQ 0260

8719
9930
10479
10502

8724
9935
10534*

8729
995 S
12165

9270
10042

7047

7392

7470

9811

§§§§

8898

6603

5%53:

HO04®

godas

813k

680S*

6844

6865#%

son

-no"
wnn

—

T2 3

233

111

L
ROZRRNBSO

BOS

12:08__PAGE 261
E TABLE -- USER SYMBOLS

is
N

£0

——

oS B

Eeed

R 323
mNE

o
W

oL
[AlY)
L|
W
[A]
0 R LS

—

Lol oud

Nogs

@yse

A
(A A

nEwn-—-o0

EESFREEREEELEEY

Ro48 RereRENC

MACY11

L
Zrormn nO0V
[V V],
W
o-o-u—.—v-.—o—o—o—o—o—o—oéom-r-o-h—u-.-u—h-o-o-o-o—
RO
Lo NeS NSNS
I S
—-Un

CZREHEO UNIBUS_RKE DR
25-JAN-7
CZRBHE.P11

6000

7058

CZREHED UNIBUS RKE DR _PRT1
CZRBHE.P11
25-JAN-78 12:00

MACY11l 30A(1

gSSéFESENCE TABLE -~

sng$nsgfs

7076%

| TPVEC

758%
8770

TRABBC. 001394

gl
(782

Bidl
0ERE

TIST1

6518

soss

8682

8698

7517

3727%

| TRAPVE= 000034

TSTx§N

goss"
gedd

7507%

B7e4

ges

e
T Tig
IST1

B1
1

TSTI1Y

TSTIS
T Tl,
T Téo
ST
ST
ISTel
; T

0I1v71e
1
1
0203Se

gess
188

10922s

1
1

s
s

AiRee3
3

000
LN]

-<un

At:B3g

i
feri
o

15137

——

15“

i
ST
e

011126

;S;
i,

Es 50 S5

i
ST

50
i
B8 18
1

12118

12122

CZRGHED UNIBUS RKE
DR PRTI
CZRGME.P11
25-JAN-78 l2:

TYPERR 067404

TYROC'= 104402

1.82
°

1.83

12132

12141

12150

10563

103238

12138

gfi;- -flég 4633

ufi Jg52 3%3 9368° soug s219 s2s1 s300 s4i0

4
o5

'
25
E350"
47

E’g'

1
T

5
19

1500

Sg:

UNLD
ORD=
:

uee

(24288

libko "

43
8844

g
Ggas
9
B
eb7e

s945

gfi

4l02

7037

941

98sI

4l09

8490
4y
4Zbls

6251

6560

13188

1320s

g0ss

8113

8l43

e2le

4783

4ew7

S206

5593

°"§§
9y
47E9%

6738

8570
5509

7084

8688
Se02%

736

8758
S672%

9041
6I0S*

7427

7662

7759

7884

8002

6998

7101s

9835

9@SSH

606

607

60B0

63Bes

63%s

63V

SG4OX

SG4l

SIx

SWE

S724

5869

6007

634

7155

7300

1%3?

1%@'

8998+

10115

10446

108M3

10177

10186%

10191s

Sy T

7902

4S02

S3%

10170%

7009

G
7
8113
814
410
23 1 703
gk3 7ev31 7oy] 234
7320

4233

40748

[T SR

10924s

4Ll

3973

SRR
TG
fi‘

13200

12161

Bt B Bt Bt B Pt oo s e s fn o B

n:g.
41y
.y
42BN
w74

13208

WOCNT
WRDATA=

'
I3les
13938

VERIFY

15%

Tio

UFE_

18135s

12152 / 12158

SEQ 0262

12146

P RSB

T.Re

e e b

MACY1l 30A(1052)
25-JAN-78 12:08 PAGE 263
CROSS REFERENCE TABLE -- USER SYMBOLS

MACY11l 30A(1052)

REFERENCE TRBLE -- USER SYMBOLS

3717

3725

3731

3732

3733

2301s

23028

2303

2304s

10618

152958

W—

10644s

4YO14

4391

6881

isy?.

12122

12132

12145

3839%

4206

8869%

8870

6882

12158

10090

10115

10159

10194

10S36

10823

+
olelatatatat=talis

12:08_PAGE 264

CROSS

18;30

EOQS

2S-JAN-78

BLE v mweow s

8647

31%

1116

1
1

10085

10086

BESR

87888

oPz®

punnn
mDA

SERTIC
001118
sascnb OOU;E

SERRPC

.IN

SEEXEEESESS

£N
BES

RFLG

OPCT

%‘:‘

1
1

10115

10061

10077%

10115

12167

11845

11852

11860

11868

11876

8659

88S1

11884

11892

11901

i g% gl gdis ofdh FREEE
e feer eroeo4}

10106

10108

10115

6 DR_PRT

M 78 15-00

MACY11 38“(10

« .

)

~-JAN-78

FUD

12:08__PAGE

265
ROSSSSEFEEENCE TABLE -- USER SYf%OLS

. -4

10194

10928

10047
10517

101

10704

m%.x.l
7]

1
1

10310%

10306%

7400

7684

8024

8360

100S4=*

708S
10060

7385
10105

7399

7683

8023

8359

8709

10092

10138

i
b
;

“A

]

106468

10284
10287%

10299

10303#*

10194

10858

'.-.-

DOOOC

>—-0-9-9

UDJ3:

3753

7386

TR
IR L

'§

23158

10037

5 g
P B i3

:.:

9960

7086

1527

9799%

6760

UNMN- RN

;

888S

8898

10643

10701

10704

8904

10044

10061

smepflmesfim"fn’%w

el CLIE ' T8 o

GOS
Il

SEQ 02eS

mmfw
|

3725
10438

1157

11860

11876

10833

1158

oo o

TMPO
TMP

001174

TMPS
0J
TM
=

STNPUR
$TPB

11868

IS
42764

i%’

10810

10459%

10481

11884

0S4042
oo1152

10781
22938

10183%

10194

11892

case

10497%

10507

10519%

4122

4125%

4140%

1
1

STl R

THP

1214

S I

STIMES

glsaz

wfl%

TESTN

| SSWREG

z§$

723

181 10

Y o ON -

eit§ S1 BgE s

xi %fimm%um%muwnMm¥mwm

e dedodod

"é: 16935

IBUS

RK& DR PRT

103108 10321

109198

25-JAN-78

SEG 0266

IR SR reRENCE ThBLE = OlsER SYMBOLS

e Be

10914

10i7e

109254

10922

% 3840% 4208+ -osxs

4225

10925

10i8Is

2§§ E_ig

10393

e L)

—

P
=

—

103s8

e s

[P<
N
£

——

»”
»”
E3
=—
- L
L

001000

10927s

1081

1234

o asm: Eeuues U
| g

109268

10182

10292

e bme be b o

| ITH 1010

10d2ys

10928

109298

10930

10931s

109328

10933s

109348

4%
* 98
1
10029 100S1* 10052 100S7 10061 10079 1011S
g
gorw
g
s
lgooe
s 10926

veoN =01igg
iT";?s

103238

109218
& 4198

e et D

" "

HOS

12:08 PRGE 267

]

TRPRD
TSTH
TSTNM

s e

)

¢ 101
Ioi8l 101
18134

s b

TRP

30A(

rmpa

10011

e Bt

' TPFLG

:om

GOREHE
Cp T LS K 78 12:00

MACY1l

4837

437-0

4985

soz;

;oaw

5195

§§$ ?58 §é§§ §S§ gg §Z§; 9%3 9?32
»

ZRErE.

§aR=78"12:00

0_UNIBUS
_RK
P11
25

R RS R 2

105

SEQ 0287

T %m T

@ NN DODOD oDe e e PR

¢
(>

O—~

8287 8si2 8637

*‘gg

Zg,:z

uE S

SN MR M

2 ¥R

WS RS

8288

8513

G418
4

eel4

6798

10933

10934

1093

82
704

8163

5 &

8395

10936

SR SR M RS

;

(fié

;

OB S

.How.uofi.zlo:.w%nl.;a%o
$E

S-FI

191s

—
%

Sig2as
e

]

Tatati¢

’

".
BEEE RS

= ot

s
e

—

NREAREBETERRS

M
e

8162

S GL G R e R R AL oe oA i 5 & o

: &
v

st
# Fogl
e

;?sg 7951

PRe

s oo

;ggsré’fi%%s,éa’%?fi%fis‘%%fi%

; g

‘01:

Ll ?.o;msz-m-aasmm&

CEEER

e
833

"mfi%’fifis’“

p—

OO0

=
X

NBRI,
3SO
6113
6633
e jus
2
1497
1

He33

SEQ 0269

7199

7518

7742

7866

8078

8sse

1510

1517

23l

2313

3917

Sy
lgés
1
6239

53
1
121

6547

6719

¢l
1039

104

70847

7392

owmy

18235

4015

461

4226

9182

992%S

§723

5868

6006

6323

7154

7299

£ess

2299

2300

2301

2302

2303

B
83%2

8383
5}

7644

8579

6412

6717

4833

7474

7479

7109

494
74

8727

8585

T =L Sy Sy S

—
e

9967

1§2§ 10926 10928 10930 10931
W

o8N

]

10932

10923 1

D
T

ARV LESLLERELEIREBES
AR

B
B

S6S1

Bt s s e e e e B
B

s e e B

Bt P

e Bt Bt B

WWWWWWWWWWWWWWw—

|lalialolaliatelieiaiaoiaiaiaiaiad

L
d

.—.—.—.‘;
&um«mu
e

—

fl?fis.

1 ]
l%

PAGE 27

12:08 PR NAME

25-JAN-

& 8 B 8 3= b

i 3

’

12:08

MCVIL 0GOS Zsan-re

10933
44

704

10934

10936

764

494s
8324

GRS
B A oo " SRR
R
ThE
.87
.

RABS.

i3 e
ugu 1 12
072014

ERRORS DETECTED:

23(‘3*

ooc

Dglng&( gEO/SOL/CRF/N.:TOC/DOCsDSKH:CZM.PU

DOCUMENT PRGES:

270

LOS

R RS

s oo