Digital PDFs

AH-9114B-MC

March 1978

184 pages

Original

97MB

view download

OCR Version

138MB

view download

Document:	CZR6EB0 RK611 DISKLESS CONTROL PART 5 MAR 1978 bw
Order Number:	AH-9114B-MC
Revision:	000
Pages:	184
Original Filename:	CZR6EB0__RK611__DISKLESS_CONTROL_PART_5__AH-9114B-MC__MAR_1978_gray.pdf

OCR Text

R K6 1 1

;

DISKLESS CONTROL PART5

CZR6EBO

AH-9114B-MC

copvricHT276.78

MAR 1978

FICHE1OF1

SOEERED
MADEINUSA

BO1

.REM

POP10 411
ESHDR1CZREEBSEQ
MACY1l 30(1046)
02-DEC-77
10:43

AC-Sl112B-MC

PRODUCT NAME:

CZRGEBO RK611 DSKLS CTRL PRT S

DARTE:

FEB 1978

MAINTAINER:

DIAGNOSTIC GROUP

AUTHOR:

MARV TEGROTENHUIS

HIS DOCUHE IS SUBJECT TO CHANGE WITHOUT
T BE C ONSTRUED AS A COMMITMENT BY DIGITAL
DI GITAL EO I PMENT CORPORATION ASSUMES
HAT MA Y APPEAR IN THIS DOCUMENT.
ANY E RRO

A 5833

3333

N T_THIS DO""UMENT IS FURNISHED UNDER_A
NLY BE USED OR C UPIED IN ACCORDANCE WITH THE

Xxm
NIZVL
nuc+4

—t

e5 3

PAGE 1

IDENTIFICATION

PRODUCT CODE:

ZHO
o
—
o

Wwrury
n
TUNUTUTUIUIUNITIL
(U S e et e Bt s Bt Bt ot e
Owm ~No N LW~
DWW IV £ WM
0O W00 WU LW

00010
780223
SfRSEBD RKB11 DSKLS CTRL PRTS

c ORPORATION ASSUMES NO RESPONSIE ILITY FOR
%%EE OF ITS SOFTWARE ON EQUIPMENT THAT IS

1976,

1978 BY DIGITAL EQUIPMENT CORPORATION

00010000

780ge3

500 IFREOR

CZREEBO RKB11 DSKLS CTRL PRTS
CZRBEB.PI1
02-DEC-77 10:21

MACY1l1 30(1046)

02-DEC-77

10:43

COl

PAGE 2

TABLE OF CONTENTS

1.0 ABSTRACT

2.0 REQUI REPI!ENTS

3 BRELTRINARY PROGRAMS

oG PRoctoune

R LORCE DD

£l

3.0 OPERRTING

OP SHITCH SETTING

9.1

9. 2 CONTROL
H

SWI

REGI

(fC) OPERATION
RRTI

S.0 PROGRAM DESCRIPTION
6.0 ERROR REPORTING

RAT

SEQ 0002

CZR6EBO RKBl1l DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

MACY1l 30(1046)

02-DEC-77

10:43

DO1

PAGE 3

1.0 ABSTRACT

hd !'"OO@D

THE RKbll DISKLESS CONTROLLER DIAGNOSTIC: PART 3
.

TESTS MULTI-SE OR DATA TRANSFERS.
T§§T§
E&OiTRRNSFER

CHECKI NG.
gzssP#SH

TESTS ECC ERROR DETECTION RNO CORRECTION, BOTH

. igITR“ZHégKBééSEQOSOTH 16 AND 18 BIT MODES AND FORCES

NO RKOB DRIVE IS REQUIRED FOR PROGRAM EXECUTION.
2.0 REQUIREMENTS

2.1 EQUIPMENT

PDP-11 svsren (1sx CORE MEMORY)
CONSOLE TERMI

DECTAPE

PRPER TQPE READER, OR DECDISK

RK611 CONTROLLER
2.2 PRELIMINARY PROGRAMS

(C
RK611 DISKLESS CONTROLLER DIAGNOSTIC:
RKb11 8¥§KLE§§ OLLER 8%RGNO§T{C PART S (C%RBB)

AGNOSTIC: PART 3 (CZR6C)
CONTROLL
KL
RKb11
PART 4 (CZ
DIAGNOSTIC:
CONTROLLER
RKb11 DISKLESS
3.0 OPERATING PROCEDURES

3.1 LOADING PROCEDURE

THE PROGRAM CAN BE LOADED FROM PAPER TAPE USING ABSOLUTE LORDER

=000 b—v—o—av-o-o[
000000 WVOD
HOQOV?U‘IUN'—
D\DQM*

OR FROM XXDP MEDIA SUPPORTED BY XXDP.
3.2 STARTING PROCEDURE
LOCATION 200

- START PROGRAM

LOCATION 204

- RESTART PROGRAM

LOCATION 214

- 95?35§;v9330?9955§?buvscTOR ADDRESS, AND

3.3 OPTIONAL SWITCH SETTINGS

WiS
Wl4
SW13
SW12
SWil

HALT PROGRRH
LOOP ON TEST

INHIBIT ERROR TYPE OUT
ABORT AFTER 20 ERRORS
INHIBIT ITERATION COUNT

SEQ 0003

MACY1l 30(1046)

02-DEC-77
SW10 SW3

—

NONLZWN=-DDONOCNLZWNN—-0OVONCNLZWNL-0OVONOCNLW
oo
oo
E L L L L L L L L .5waUUUUmUUNNNNNNNNNN'—b-b-t—o—t-v= ODONCNLWN—-OVONCNLEW n

SW8

10:43

PAGE 4

SEQ 0004

BELL ON ERROR
LOOP ON ERROR

LOOP ON TEST IN SWITCHES 0-7

3.5 RUN TIME

FIRST PASS
SUBSEQUENT PASSES
4.0

1:40 MINUTES
3:40 MINUTES

OPERATING PROCEDURES

THE PROGRAM IS EXECUTED BY STARTING AT THE APPROPIATE ADDRESS.
*SOFTWARE® SWITCH REGISTER

*VUVHVDDO~

F THE PRO?RQH gs SEING RUN ON A

R 11/34)

THE

HITCHL;SS PROCESSOR (I.E.,

WILL DETERMINE THAT

THE HARDWARE SWITCH

AN 11/04

EGISTER IS_NOT PRESENT AND _WILL USE A 'SOFTWARE’ SWITCH
THEOESET NG? OF THE 'S?FTHRRE’ SWITCHES ARE CONTROLLED
EGISTER.
{ug WHICH IS CALLED BY TYPING cCONTROL G’.
RSOUGH A _KEY
=

s e Bt e Bt Bt Bt B Bt Bt Bt Bt Bt Bt Bt Bt Pt s Bt P —
s Bt Bt et Bt Bt Bt Bt Bt e Bt B
e Bt e Bt B Bt Bt B Bt Bt Bt Bt Bt Bt Bt Bt Bt
Bt e e s B

02-DEC-77 10:21

CZREEBO RKB11 DSKLS CTRL PRTS

CZREEB.P11

EOL

EACH TIME SWITCH

SETTINGS

ENTERED,

BE ENTERED.

THE ENTIRE SWITCH

LEADING ZEROES ARE NOT REQUIRED.

'RUBOUT’ AND 'Cg?TgaLER;R$UNCTIONS MAY BE USED TO CORRECT TYPING
S

WITH HARDWARE SWITCH REGISTERS,

INT
' SOF TWARE’
FOLLOKWED.

4.2

BE USED.

OSITION.

THE ’'SOFTWARE’ SWITCH

IF THE PROGRAM FINDS ALL 16 SWITCHES

ALL SWITCH REGISTER REFERENCES WILL BE TO THE

GISTER AND THE PROCEDURES DESCRIBED RBOVE MUST BE

CONTROL C (tC) OPERATION

IF ¢C IS TYPED_AT ANY T}H; DURING THE PROGRAM EXECUTI ON THE
PROGRAM IS HALTED IMMEDIATELY. IF A MONITOR IS PRESEN T (XXDP CHAIN
ACT,
APT) THE PROGRAM RETURNS CONTROL TO THE MONI;OS. IF NO MONITOR

IS PRESENT, THE CPU IS HALTED. DEPRESSING THE CONTINU E KEY WILL DO
A PROGRAM RESTART.
4.3

CONTROL S (tS) OPERATION

IF 1S IS TYPED AT ANY TIME_THE PROGRAM WILL GO INTO A STALL LOOP

UNTIL A CONTROL @ (tQ)

IS TYPED.

‘.4

OPERATION

CONTROL @

(tQ)

THE

O02-DEC-77

10:43

FO1

PAGE S

SEQ@ 000S

IF A_1S _HAS BEEE IEPED TYPING THE tQ CANCELS THE STALL
INIT IATED BY
5.0 PROGRAM DESCRIPTION
#%¥MULTI-SECTOR WRITE OPERATIONS

TEST

MULTI-SECTOR WRITE (PART 1)

CLEAR THE RKG11 CONTROLLER WITH A CONTROLLER CLEAR.
PUT THE CONTROLLER IN oxncuos IC MODE.

CYL

AND
TWO

SECTOR

MESSAGES.

GOOO HEADER.
ECC_WORDS.

THROUGH

SEEK-

_SIMULATE A SESTOR PULSE

CLOCK THROUGH 400

AND THE

HflfiE SURE THE NEXT HERDER RECOGNITION

CYCLE ETRRTS AND
THE PROPER HEADER IS SERRCHED FOR.
SQOREEDER SECOND GOOD HEADER AND CHECK RECOGNITION

TEST 2

MULTI-SECTOR WRITE (PART 2)

TEST 3

THR

ruc

CONTRO LER HITH A CONTROLLER CLERR.

RK611

ONTROLL n xu

onrn OF3

CYLI

s: TOR

AND onxvs &Lnn
ancs

ocnc
R.

TWO ORO ECC

TEST 4

ATE A SECTOR UL
400 WORDS AND
THE
XT uc ADER RECOGNITION
R I SRE HED FOR.
CHE CK
RECOGNITION

MID-TRANSFER SEEK (PART 1)

CL AR THE

3 3 g

GOOD usnoegAK

5258
:
i

DRIVE CLEAR MESSAGES.

ghmo

AND

Z—X

CLEAR THE RK611 CONTROLLER WI T A CONTROLLER CLEAR.
xssus A WRITE
PUT THE CONTROLLER IN DIAGNOS T C MODE.
26 SECTOR FORMAT
DATA OF 401 uoggs T0 AN nxog I
CLOCK THROUGH SE
tx
0, SECTOR 23.
CYLINDER O, HERD

e04

o
PUNU NN = st bt s s Pt Pt Pt Pt e
W—-DWwoNCCNLZWN—-0

ISSUE A WRITE

DATA OF 401 WORDS TO AN og IN agcszgron FORMAT

e
Amo

0000WODD

[

o
=
WO WVONCNLEWN=-ODVONCN
L MOOMNINN
WN-=0OWmD \:33}'36.\-’3
0

168

MACY1l 30(1046)

8
g

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZREEB.P11

CLOC

ISSUE
A WRITE

as secroa FORMAT

CLOCK

THROUGH SEEK

nrs A secron PULSE

WORDS AND THE

AN IMPLIED SEEK T
MAKE SURE THE NEX

RIGH HERD
CYLINDER.
HERDER RECOGNITION PROCEEDS PROPERLY.

MID-TRANSFER SEEK

(PART 2)

CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLERR
PUT THE CONTROLLER_IN DIAGNOSTIC MODE.
ISSUE
A WRITE
DATA OF 401 WORDS TO AN _RKO6 IN 26 SECTOR FORMAT
CYLINDER O,

HEARD Es SECTOR 2S.

AND A GOOD HEADER,
TWO WORD ECC.

CLOCK

ouU

CLOCK THROUGH 400 WORDS AND THE

MAKE SURE THE CONTROLLER ISSUES

CZREEBO RKS511 DSKLS CTRL PRTS

CZRGEB.P11

224
552

02-DEC-77 10:21

MACY1l 30(1046)

02-DEC-77

10:43

GOl

PAGE &

SEQ 0006

AN IMPLIED SEEK TO THE nécnr HEAD AND
MAKE SURE THE NEXT HEADER RECOGNITION

227

ggg

TEST §

CYLINDER.
PROCEEDS PROPERLY.

MID-TRANSFER SEEK AND 24 SECTOR FORMAT

230
231
232

CLEAR RKB11 CONTROLLER uxru A CONTROLLER CLEAR.
PUT CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE DATA
DATA OF 81 52"95 TO AN RKOB
IN 24 SECTOR FORMAT

235
236
237

g H%flDER. CLOCK THROUGH o? 68 BéT ugnos
nno THE 32 BIT ECC. CHECK THAT IMPLIED SEEK
I
ISSUE TO NEXT TRACK. CHECK FOR PROPER HEADER RECOGNITIO

233
234

chxuoen
AD 0, SECTOR 23. CLOCK THROUGH SEEK
o onxv: ALEAR MESSAGES. SIMULATE A SECTOR PULSE

238

OCCURS.

S:é

TEST &

243
gzg

CYLINDER OVERFLOW (PART 1)

RKG11 CONTRO
WITH A CONTR
R CLEAR.
PU rHSHEONTS$LL£S
IN b&%auog
8 °§§§
unxrs
CLEAR THE

szg

Sflbx"gfgatnEEfiESSAGEE ExfifiRTE 3§£c7R3U55L§EE

250

NOT SET.

246

249
251

525

ruo uono s
c

ggg

TEST 7

256
257
258

264

522

sgg

%
271
5?
Ve
274
s;g
277
278

273

nnxz suns chxnosn ovsanou snnon ooss

CYLINDER OVERFLOW (PART 2)

CLEAR THE RKG11 CONTROLLER WITH A CONTROLLER CLEQR
PUT THE CONTROLLER IN DIAGNOSTIC MODE.
ISSUE
A unxrs
DATA OF uoiauonos TO AN RKOG IN 26 SECTOR FORMA

259
260

261
ggg

CYLINDER
b HERD 2, SECTOR 25. CLOCK THROUGH sgsx
AND DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE

AND A GOOD HEADER. CLOCK THROUGH 400
WORDS AND
TWO ECC WORDS. MAKE SURE CYLINDER OVERFLOW ERROR SETS.
¥%NPR WRITING OF MEMORY

TEST 10 NPR WRITING OF MEMORY
AR

NTR

R WITH A

CONTROLLER CLEA

ST
SoRAL BRVTROB B xu
LT B0 OULERbR ourn
OF 400 WORDS TO
Es sscron
SEEK
s SIMULATE A T nouch
O HERD"Essncss
CYLINDER DR ve¢Lsnn
nno
SECTOR PULSE
A GOOD HEA
ARE unxrrsnPhopE
RLY AINWORDS.
MEMORY . VERIFY THAT THE WORDS
¥¥ECC ERROR DETECTION/CORRECTION TESTS

CZREEBO RKB11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

MACY11l

30(1046)

02-DEC-77

10:43

HO1

PAGE 7

TEST

SEQ 0007

11 READ DATA WITH NO ERROR

ST A B T

GhAYBRD,
B AR RecSRETEN OeyGhATE MERVBYSHFLce
g 817 Elc.
SS90 WEAPER, 120 DnTefonDe. Shp 0, oggp
TEST

12 READ DATA WITH ONE BIT BURST ERROR

(PART 1)

U7 CoRTROLLERIN BIAGNOLTTc WGOE. TSSle - Reho DT

Snblggfa°eHSQDHESSgggTOR §anL5?EAssc*ch EELSE
400 _WORDS

A GNE81T BURST ERROR.or“S"BSmSWsmuES%é"S““”““

§E§f§¥sg"5N8°¥fiEI"?ngf "§TESN nnS"Posxrxon INfonnnrxon.
MAKE SURE DATA CHECK AND CONTROLLER ERROR SETS
TEST

13 READ DATA WITH ONE BIT BURST ERROR

(PART 2)

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR.

PET SSNHOSngR IN
D§K820§Tlg Hggs*I?ggfinfl READ DATA

A 608“‘&5&5“"»6‘0-*‘8“?5%&%‘A EEE‘?noxsfiiac
CYLIND

GeRTEY"
*HEsgnfiflTi
NG OFTHE
fio
REGISTER AND_THE FINAL
P ERN gsa AON %NFORHQTION
MAKE SURE DATA CHECK AND CONTROLLER
TEST

RRO

14 READ DATA WITH 11 BIT BURST ERROR

Su0R¥86LLERNI§°b&SgT?cnnSSETR°&§§CBEQEAD DATA
OF 400 WORDS TO AN
R

3e4

IN 26 SECTOR FORHR

SNBISBCLESEOHESSSEEAN 11

TEST

15 READ DATA WITH

b?gkn558¥3nEEEE&G
NING OF

12 BIT BURST ERROR
CLEAR RKB11 CONTROLLER WITH A CONTROLLER CLEAR.

THE

10:43

I01

PAGE 8

SEQ 0008
ISSUE A REARD DATA
FORMAT

PUT CONTROLLER IN DIAGNOSTIC
OF 400 WORDS TO AN RK
os IN 26

CYLINDER O,

O,
SECTOR O.
AND DRIVE &LHEAD
Enn nsésncss.
S
GOOD HEADER,

400 DATA WORDS AND AN

A 12 BIT aufis
ERROR

OUGH
SEEK
EA sgcron
PULSE, A
ECC

INDICATING

VERIFY THE COUNTING OF THE

POSITION REG 3
MAKE SURE DATA CHECK, ECC HARD,
AND CONTROLLER ERROR SETS.
TEST

16 READ DATA WITH 23 BIT BURST ERROR

CLEAR RKG11 CONTROLLER WITH A CONTROLLER CLEAR.
PUT CONTROLLER IN DIAGNOSTIC MODE.
ISSUE A READ DATA
OF 400
WORDS TO nn RKOB IN 26 SECTOR FORMAT

chxnoen 0, HERD
O
TOR 0. CLOCK THROUGH SEEK
AND DRIVE CLEAR SSncs SIMULATE A SECTOR PULSE, A
cooo
noen Y
A WORDS nug AN ECC INDICATING
T BURST RROR. vsnxrv HE COUNTING OF THE
Posx xou REGISTER.

;RE DATA CHECK, ECC HARD,

AND CONTROLLER ERROR SETS.
TEST

17 READ DATA WITH 1 BIT ECC WORD ERROR

CLEAR RKb11 C?NTROLLER WITH A CONTROLLER CLERR.

ECTOR
OF 40 uoéos 0 AN RKO&
SECTOR 0. CLOCK
IVE

TEST 20

MESSAGES.
A

FORMA

THROUGH SEEK

SIMULATE A SECTOR PULSE, A
AND

ICATING

usnong

CYLINDER O

02-DEC-77

MACY11l 30(1046)

CZREEBO RKB11 DSKLS CIRL Sflgs
02-DEC-77
CZRBEB.P11

18 BIT NPR WRITING OF MEMORY

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR.
PUT CONTROLLER IN DIAGNOSTIC MODE.
ISSUE A READ DATA
OF 400 WORDS TO AN RKOG_IN 24 SECTOR FORMAT

CYLINDER O, HERD O, SECTOR 0.

CLOCK THROUGH SEEK

AND DRIVE

vsnxrv THAT THE WORDS

A GOODD

CLEARR ntssncss

HEADER,

SIMULATE A SECTOR PULSE

40 DATA onos.

ARE WRITTEN PROPERLY IN MEMORY
TEST 21

18 BIT READ DATA WITH NO ERROR

CLEAR RKG11 CONTROLLER WITH A CONTROLLER CLEAR.
PUT 80NTROL§ER
IN DIAGNOSTIC nog:
xssu: n READ DATA

RKO6 IN 24 SECTOR FORMA
SECTOR 0. CLOCK Haouch SEEK
o
HEAD
chxnosn
AND DRIVE CLEAR MESSAGES. SIMULATE A ssc7on PULSE

A GOOD HEADER,

400 DATA WORDS, AND A GOOD32 BITECC.

VERIFY THAT COMMAND COMPLETES WITHOUT ERROR.

TEST 22

18 BIT READ DATA WITH DCK

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21

CZRBEB.P11

MACY11l 30(1046)

02-DEC-77

10:43

JO1

PAGE 9

SEQ 0003

? A CONTROLLER CLEAR.

PUL

*Noxcnrxkc

AL PATTERN
TROLLER ERROR SE
TEST 23

18 BIT RERD DATA WITH ECH

CLEAR RK611 CONTROLLER HIT? 2] ONTROLLER CLEAR
ISSUE A READ
PUT CONTROLLER IN DIAGNNST
DE.
SECT
ORMAT
OFF 400 400 WORDS TO AN R

CYLINDER O
gno DRIVE CLE
GOOD HERDER,

400

DATA

SECTOR O. CLOEK HROUGH SEEK
S. SIMULATE A SECTOR PULSE
DATA
S AND AND ECC INDICATING

A 12 BIT BURSY ERROR.

VERIFY THE COUNTING OF THE

POSITION REGISTER.
MAKE
AND CONTROLLER ERROR S

SURE DATE CHECK, ECC HARD,

*¥SPECIAL RERD TESTS

TEST 24 PARTIAL SECTOR READ

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR.
ISSUE A READ DATA
PUT CONTROLLER IN DIAGNOSTIC MODE.
OF 103 WORDS TO AN RKOB IN 26 SECTOR FORMAT
CYLINDER O,

HEAD O,

SECTOR

AND DRIVE CLEAR MESSRGES. S
32 BIT
AND A GOOD
A GOOD HERADER, 400 DATA WORDS,
MAKE SURE ONLY 103 WORDS GOT TRANSFERRED TO MEMORY.
TEST 25 SILC UNLORD BEFORE HERDER ERROR

DIAGNOSTIC MODE. ISSUEMATA REARD DATA
PU% CONTROLLER INAN RKO
CL AR RK611 CONTROLLER WITH A CONTROLLER CLEAR.

OF 401 WORDS TO

¥**WRITE CHECK TESTS
TEST 26 WRITE CHECK OF 400 WORDS

CZREEBO RKE11 DSKLS CTRL SRE?
02-DEC-77
CZRBEB.P11

MACY11l

30(1046)

02-DEC-77

10:43

KO1

PAGE 10

SEQ 0010

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR.
PUT CONTROLLER IN DIAGNOSTIC MODE.
ISSUE A WRITE
HECK
OF 400
WORD:
AN
IN 26 s;cron FORMAT,

CYLINDER O,

HEAD O,

A GCID

SECTOR 0.

AND DRIVE éLEnn MESSAGES.

CLOCK

THROUGH SEEK

SIMULATE A SECTOR PULSE,

400 WORDS
WORD
TO BE£ WRITE EC CHECKED,

AND A GOOD 32° axr ECC.

MAKE SURE NO ERRORS SET.

TEST 27 WRITE CHECK WITH DCK

CLEAR RKG11 CONTROLLER WITH A CONTROLLER CLEAR.

PUT CONTROLLER IN DIAGNOSTIC MODE.

ISSUE A WRITE

CHECK OF 400 onos T0 AN RKO® IN 26 s;cron FORMAT,
CYLINDER O,
HEAD
O, SECTOR 0.
CLOCK
THROUGH SEEK

AND DRIVE CLERR
nsssncss
A GOOD usnE

AND A 32

gIHULRTE A ;Ecron PULSE,

00 WORDS TO a; WRITE CHECKED,

tccxuorcnrxnc A 1 BIT BURST ERROR.

VERIFY THRT THE POSITION REGISTER INCREMENTS PROPERLY
AND THAT THE FINAL PATTERN AND POSITION ARE CORRECT.

CHECK THAT DATA CHECK AND CONTROLLER ERROR ARE SET.

TEST 30 WRITE CHECK OF

18 BIT WORDS

CLEAR RKBG11 CONTROLLER WITH A CONTROLLER CLsnn
PUT CONTROLLER IN DIAGNOSTIC MODE.

ISSUE
A WRITE

CHECK OF oo oao
CYL INDER

TO nunxgs
xn 24
s;cron FORMAT,
OCK THROUGH SEEK'

A GOOD HE

400 WORDS TO BE WRITE

nno DRIVE
8&5““
neésncss SIHULRTE A

AND A GOOD 32’ axr ECC.
TEST 31

SECTOR PULSE,
CHECKED,

MAKE SURE NO ERRORS SET.

WRITE CHECK OF A PARTIAL SECTOR

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEQR
PUT CONTROLLER xn DIAGNOSTIC MODE.
ISSUE
A WRITE
CHECK OF
1 WORD TO AN RKOG6 IN 26 SECTOR FORMAT
CYLINER o, HEAD O,
SECTOR 0.
CLOCK uaoucu SE x

CLEAR MESSAGES.

SIMULATE

A SECTOR PUL

A GOOD HEADER, TAKE ONE WORD TO BE NRITE-CHECKED 377 WO
NOT TO BE WRIYE CHECKED, ANDA GOOD 32 BIT ECC.

MAKE SURE NO ERRORS SET.
TEST 32 WRITE CHECK ERROR

(PART 1)

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLERAR.

PUT CONTROLLER IN DIRGN STIC MODE.
ISSUE R WRITE
CHECK OF 1 WORD TO
AN RKOB IN 26 SECTOR FORMAT

CLINDER O, HERD 0O, SECTOR 0.

CLOCK THROUGH SEEK

LO1

PAGE 11

SEQ 0011

AND DRIVE CLEAR MESSAGES.

SIMULATE
A SECTOR PULSE

CifP8°cHECRED:
oATR 1500008
" MAKE SUKEUniTE Che 200988
REPEAT _USING
FOLLOWING CONFIGUR
AS WRITE CHECKED ORTR'

000002
000004
010
000020
.

vy iy
TUNUNUY 5= bt s s s s s st Pt e () 0000
N—-0OVONTNLEWN»-0OW NN

So4

MACY11 30(1048)

10:43

|(=]
|o

C%RBEBO RKE11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

02-DEC-77

000040
000100
0002
000400

001000
002000
004000
010000

TEST 33 WRITE CHECK ERROR

020000
040000
100000

(PART 2)

CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR.
PUT CONTROLLER IN DIAGNOSTIC MODE.
ISSUE A WRITE
CK OF 1 WORD
TO AN
FORMAT
E A SECTOR PULSE

CONSISTING OF 177777
WRITE CHECKED DATA IS 177776.
MAKE SURE WRITE
CHECK ERROR SETS.
REPEAT USING EACH OF THE FOLLOWING
G?

HEROER AND O

gRg OF DATA

CONFIGURATION AS WRITE CHECKED DATA:

177775
177773
177767
177757

177737
177677
177577
177377

176777
175777
173777
167777

TEST 34 WRITE CHECK ERROR

157777
137777
Q77777

(PART 3)

CLEAR RK611 CONTROLLER NITH A CONTROLLER CLERR.
PUT CONTROLLER IN DI
MODE.
ISSUE R WRITE
IN EH SECTOR FORMAT
CTgs
U
CHECK OF

YL
sscros ULSE
sCONSISTING
onxvs CLERRncésncss or onrn
ND

"
e B0 (RATR9SRRl DRI ooF
SIHULRTEO

TEST 35 WRITE CHECK ERROR

(PART 4)

CLEAR RK611 CONTROLLER uxru n CONTROLLER CLERR
;
PUT CONTROLLER IN ;

IN es ;cron ronna
AN nxgs
onoa g CTOR
400HERD
gr 0O,
CHECK
CYLINDER
HROUGH SEEK'
AND DRIVE OLSRR nsésncss SIHULRTE n CTOR PULSE,
A GOOD HERDE
25 GOOD
WORDS, AND A
Wo

gfiseeagngognx1s CHECK ERROR SET. CHECK WORD COUNT

CZREEBO RKB11 DSKLS CTRL PRTS

CZRGEB.P11

02-DEC-77 10:21

MACY11l 30(1046)

02-DEC-77

10:43

MOl

PRAGE 12

SEQ 0012

232121222 2222232222222 2233222222222 2222222222222 2222222222222 2"

DIAGNOSTIC MODE SECTOR PULSE

EXREEEERRRFRHERERERRRERRRRRERRRR
LR RERRRERRR RN R R R R R R R R AR R RN

THE SECTOR PULSE IS PROVIDED BY THIS ROUTINE
3636 36 36 36 3 3 36 3 36 36 3 3 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 36 36 36 36 36 36 36 3 36 3 96 36 36 06 36 36 30 06 36 2 %

DIAGNOSTIC MODE IMPLIED SEEK

30330 3 3606 0600006 0 20000 06 0200 00200 30 00 2 0

I I 0

THchgNTngh#Eg IS CLgCKEgITHR$UGH THE SEEK HES?RGES*

STEFENENT
COUNT FOR WRITE DATA
AND READ DATA/MRIIE CRECK
THE ROUTINE LOOKS AT THE COMMAND THAT WAS
STARTED (L.CS1) AND SETS THE CLOCK COUNT ACCORDINGLY.

AT _THE_END
THE IMPLIE
EK_THE CONTENTS OF CS1,
MRl
AND
HE3 23: OFCHECKE&
TO
VER?FY
THE
OPERATION.
ALL
DISCREP
ORDER LISTED.
ARE REPORTED IN THE
CALL:

SR
ERROR
RROR
RROR
ERROR

R4, DISEEK
;CS1 MISCOMP
M4

ERROR
ERROR
;MR1 Hi SOHP
RROR
;MR2 MISCOMP
;MR3 MISCOMPARE ERRON

S
&
7

3636 3 36 36 3 36 36 36 36 26 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 36 30 30 36 36 36 36 36 36 36 36 36 36 36 36 3¢

DIAGNOSTIC MODE READ SYNC PATTERN (PREAMBLE)
336363 3 3630 36 06 0 3630 060 200 3 000000 0000 0006 0000 000 300 36 00 0360 2 00

360 3 3 0030 00 060 0600 0 0 0

THE 255 “0" BITS AND 1 "1” BIT ARE CLOCKED THROUTH THE R

BID h‘Br 321 cumssfi.

’

CALL:
éaR

R4, DRSYNC

;MR1 CONTENTS IN ERROR

ERROR

;CS1 CONTENTS IN ERROR

ROR

FrePBaESERY 1RSYEIRCIER:
O6p BHPERHOA"Gs"
ey 7 P TO A
NEWwn—0Ouw

oo
oo
— pr‘b‘D—Q

608

3636 36 3 36 36 36 36 36 36 26 96 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 30 26 3 3

DIAGNOSTIC MODE HERDER READ AND COMPARE
Pt

e T T

e R R e

it a

it it

THIS ROUTIN; SIMULARTES THE THREE
HEADER WORDS READ AND
COMPARE THAT
IS PART OF ALL DATA TRANSFER OPERATIONS.
THE EXPECTED HEADER IS CALCULATED FROM THE CYLINDER,

TRA

Op?ffill DSKLS CTRL PRTS
02-DEC-77 10:21

MACY11 30(1046)

02-DEC-77

10:43

NO1

SEQ 0013

PAGE 13

gNBOSSCTOR SPECIFIED IN THE "L" REGISTERS. THE REROING
ONE AND MR1 IS MONITORED TO INSURE
I T DOES
REA
THE CONTENTS
HE END OF THE READ/COMPARE,

HE §"°§S"‘"TH2‘nR$°SEL AND_RKDA

vsnmié ?r’r“é“?uchs‘"&’
REGISTERS AR
“L"
» JHE
K_ADDRESS TN’ CASE OF MULT1-SECTOR

OPERQT ONS THE B
65 TESTED AND IF IT

CTOR
RROR DESIRED (BSEDES) SWITCH
NON2ND AND_3RD_HERDER

RDS_ARE _CHANGED RCCORDING TOQSERESCONTENTS. THIS

CAN BE USED TO FORCE HERDER TYPE
CALL:

JSR
ERROR

ERROR
ERROR

RH,DHDCHP
12
;ERROR IN MRI1

13
14

ERRO IN CS1
ERROR IN PACK ADDRESS

33636 36 36 36 36 36 3 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 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 30 36 36 36 36 00 6 36 36 30 36 36 2

DIAGNOSTIC MODE GAP READ AND SYNC WRITE
F3

006000000 06 000 002 0

2 0

200

0 0 0

THE READING OF THE GAP_AND WRITING OF THE SYNC (OR PREAM
IS HANDLED IN THIS ROUTINE.
THE FIRST GAP BITEHQINDEEOgsgSSD IN THE HEQDERTSEHPQRE
N
ROCESSED HERE
ROUTINE AND THE R

CHECK IS MADE THAT WRITE GATE CAME ON AND 255 "0" BITS

AND
A SINGLE *"1" BIT IS WRITTEN.
CALL:
JSR

ERROR

RQ,DHGPSN

;MR1 IN ERROR IN READ GAP

RROR
RROR

16
17

CSI IN ERROR AFTER READ GAP
HRI IN ERROR IN WRITE SYNC

ERROR

;CS1 IN ERROR AFTER SYNC WRITE

ROUTINE CALLED:

J SR

PC,

WRT
WRTBIT

RETURN POINT IF ERROR IN WRTBIT
NO ERROR RETURN

33636 3 36 336 36 36 36 36 36 36 36 36 36 3636 36 36 36 36 36 96 36 36 6 36 36 36 36 36 36 36 36 36 36 36 2636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 6 36 30 2 e

DIAGNOSTIC WRITE DATA AND ECC ROUTINE
P

e R e

e e e

e et Lttt

THE_DATA IN THE OUPUT BUFFER IS WRITE SIMULATED,K ECC IS
GENERATED AND WRITTEN, AND THE POSTAMBLE 1S WRIYTEN.
:
CALL

JSR

ERROR
ERROR

T;.DHRITE

;MR1 IN ERROR IN WRITING
;ECC ERROR IN WRITING

;CS1 ERROR AFTER WRITE
ERROR
@22
NO ERROR RETURN

CZRGEBD RKB11 DSKLS CTRL PRTS

CZREEB.P11

02-DEC-77 10:21

MACY1l 30(1046)

02-DEC-77

10:43

672

&7
674

BO2

PAGE 14

| SEQ 0014

ROUTINE CALLED:
JSR
PC, WRTBIT

IF ERROR IN WRTBIT
RET
FROM WRTBIT
RETURN
ERR'yORPOINT
NO

675

2;‘7’

678

Y 2222222222222 23222222222223223222322222222222322 2222222222222 2]

SYNC

DIAGNOSTIC MODE READ GAP AND DATA

£79
gg?

682
g{gg

2 2222222222222 22:22222222222222222222222222222222222222 23

THE READING OF THE
IS HANDLED IN THIS

£8S

THE FIRST GAP

BITS

ROUTINE AND T

RY, DRGPSN

Ennon

£87
688
£89

ERROR
ERROR

694

ggg

RROR

£97

ARE PROCESSED IN THE HEADER COMPARE

mmmf" GAP BITS ARE PROCESSED MERE.

15
16

:MR1 IN ERROR IN READ GAP
:CS1 IN ERROR AFTER READ GAP

;MR1 IN ERROR IN READ SYNC

:CS1 IN ERROR AFTER SYNC RERD

ROUTINE CALLED:

698

JSR

830
701

PC,RDBIT

W00 2303 0 36636 36 36 36 30 26 36 3 36 36 36 3 36 36 36 26 36 36 36 36 36 3 36 36 36 3 36 36 3 36 36 3 36 3 36 3% 36 36 3 3 3 % % % % %

702

DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE

;83

;89

AND READING OF THE SYNC (CR PREAM
ROUTINE.

THEN R CHECK IS MADE THAT READ GATE CAME ON
AT THE 129TH BIT OF SYNC.;#
cnkz.-

651
ggg

705

FEREREEBREEEE W335 63633262638 363636 366 30 36 36 36 3 36 36 36 36 3 36 36 3% 36 3 3 36 3 36 3 3 3 3 2 % %

THIS ROUTINE IS USED TO SIMULATE THE READ OR WRITE CHECK

OF DATA. THE ROUTINE WILL TRANSFER A FULL OR PARTIAL SEC

708
;?g

THE FIRST WORD AFTER THE CALL SPECIFIES HOW MANY WORDS
ARE TO BE TRANSFERRED.

711

IF gfzss THAN A FULL

THE ;cc AT THE END

718
716

EITHER 16 OR 18 BIT uong; CAN BE SIMULATED
DEPENDING ON THE STATE
CFMT BIT IN L.CS1.

;ia

EACH BIT IS TRANSFERED.

;ig

COUNT

;gé

726

727

THE ECC IS CHECKED AT TH

HE $°"7§27§ OF ;'ocang« ECPOSX MUST

720

;sg

CHECKED.

IF 18 BITS

ARE REQUIRED, BITS 16 AND 17 ARE ASSUMED TO BE ZERO.

719

723

THE TRANSFER IS NOT

SECTOR,

712

EXPECTED AT

THE

END OF

THE DATA

LOADED WITH THE

TRANSFER.

LOADING MUST OCCUR BEFORE THE ROUTINE IS CALLED.
o

ANOTHER LOCATION,

ECPATX,

THIS

IS SET TO O IF THE ECC IS EXPE

TO BE CORRECT AND SET T0'1 IF AN ERROR IS BEING FORCED.

A 3RD LOCATION,

ECCSRC,

SPECIFIES THE SOURCE OF THE ECC

WORDS TO BE USED IN CHECKING THE OPERATION. IF ECCSRC IS

CZRGEBO RKG11 DSKLS CTRL PRTS
CZRGEB.P11

;eg

02-DEC-77 10:21

;59

MACY1l 30(1046)
'

02-DEC-77

10:43

coe

PAGE 1S

SEQ 0015

h ;HE ECE uomlas FED INTO THE g:cogsn ARE mxgn FROM THE

ES?wOHBs PROR MRaRBUEE
e &7 RECBEL
TS O

;33

ISR .

m*onsnom

>34
735

ERROR 35

739

RROR Y4

THE COMPUTE

tEBSl33‘ — ,mx xu ERROR n:nomc oam OR ECC

3%
738

ERROR
37
RROR Y4

740

Eéé
EE"?‘s‘rES
i &QE%P?:B REaBEcc
E fNcc PAT
cu.c%mxon
RR

741

;33
745
746

EENSRT8‘?nmsrea
sMR1 IN ERROR WRITE CHK OR ECC READ

742

747
;:g

Egc

5
nnon :1

:CS1
;Egg

RRSS -.S

752

RROR

IN WRITEcr;c

ERROR AFTER IN WRT CHK OR ECC nsno
chsrsn uconnec‘rw?roggn READ ECC

iERn }N ESS8!I"!

ROUTINES CALLED:

755
756

;57

7?8

760

;gé

P Y s s st 22 2222222222222 2322222223222222322232222223 222322224

GENERATE ECC WORD

6330636 3636 36 26 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 38 36 36 6 36 36 3 36 36 36 36 36 3 36 3 36 36 3 36 3 36 3 36 3 36 3 36 36 36 36 36 36 2% 3 3 3 % 2 % %

;ga

EACHmtrmxs siounor%
1S gcTqu THE ccx%g g%cxfmgfo F

765
766

&no
85un?r?fu (STORED m#cu%“igLO) THE RESULTS
HE CALCULATION ARE PLACED IN ECCHI AND ECCLO. THE LOW O

767

*6 S}T gr ECCHI ARE PLACED IN E.ECPT FOR EASY COMPARISO

289
770

CALL:

;;é

773
774

JSR

PC,ECCGEN

RETURN: RTS

3636 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 36 36 36 36 3 3 36 36 36 36 3 38 36 36 30 3% 36 36 3 36 3 36 36 3 3 3% % %

SIMULATE ONE BIT OF WRITE DATA IN MAINTANENCE MODE

;;E

3636 36 36 36 36 36 36 36 36 3696 36 36 36 3 36 3 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 3% 3 3 36 3 36 36 36 36 3% 36 3% 36 36 36 36 3 3 3 3% 3% %

277

5835

778

280
782

783

BIT OF DATA IS WRITE
THE CONTENTS
OF
S“Fn
1S commeé Pné5:3 SIMULATED.
%“2
of AY, MAINTENANC

snc°?§°“RETE88""ORHECKED AT
smmfi?#xszu;?fomx
T AT ANYTRANSITION,

AN ERROR
IS SET

COTI HESSRGE THAT IDENTIFIES THE TRANSITION WHEN TH

ERROR OCCURRED.

CZRGEBO RKB11 DSKLS CTRL PRTS
CZREEB.P11

02-DEC-77 10:21

MACY1l 30(1046) “02-DEC-77

10:43

D02

PAGE 16

SEQ 0016

Sgkbéflz £§g

;EthTBIT

RTS

FOR NO ERROR RETURN

FOR ERROR IN MRI

e 2122222232222 222222222222 32 2222222232 2222 2222322222222 22 22222

SIMULATE ONE BIT OR READ DATA IN MAINTENANCE MODE
I e R R

Lt I

S e

e e e et i e

]

ONE BIT OF DATA IS READ SIMULATED. NO CHECKING IS
DONE BY THIS ROUTINE.

PC,RDBIT

JSR

CALL:

RTS

RETURN:

22222122223 2332 2233233323322 22 2222222222222 222222222222t td

MEMORY CHECK ENABLE TRAP

ERREREEEHRRRERERHRRRRRRRRRR
RR R RR B R R R R
R R R RRRRRRRRRE RN

I§ 7?EL’E€°E§38E£6" ?sis“fifiu??RE“uxEf“l&oc?’%‘9EAPS CAUS

E
BY MEMORY PARITY

(0D 0D €D 0D 0D D CD CD €D DD
N = e b b e b b bt e b
OO NOCNLEWN-0

- 888

363036 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 96 36 36 38 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 30 3 36 36 36 30 30 06 30 30 36 36 36 36 36 3 2 B

CLEAR INPUT BUFFER
33690

300606 30 3 30 060 200 0600 00 0000000 00 0000 00

0 000200 0

0 000

I R

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 36 36 36 36 36 36 36 36 30 36 30 30 36 36 36 36 6 30 36 36 36 36 36 30 36 36 3 3 %
BUILD DATA BUFFER
RN
R
R
I
I
306360 0606 30 0 00 000 000 0 00 00

CIFIED IN THE CALL
THE PATTERN
BUFFER.
THE ENTIRE BUFFER IS ALWAYS
330030603

60600 0

LORD "L"TM REGISTERS
F

0003
0

IS LOADED INTO THE DAT
LOADED (400(8) WORDS

I
I

E "L"” REGISTERS ARE LOADED FORM THE PARAMETERS FOLLOWI

16 UBOUTIE oSkl WFRCICE IGaRp, 1S SET N LoPR
CALL:

JSR
. WOR
.BYT

RY, LORDRK
cvtxnoen

ERgEERco“fi?RESS
:WORD

'EY;E
-WOR

- WORD

n;runn:
RTS

: COMMAND,FORMAT ,DRIVE TYPE,8UPPER BUS AD

CZRBEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

MACY1l 30(1048)

02-DEC-77

10:43

EO2

PRAGE 17

SEQ 0017

1222333222223 22 2222222222222 2222222222222 2222222222222 2222222222

START THE OPERATION

ERRRREETRRRRRRRREERRRRRRRERERERRRRBRER
AR LR B R RN R SRR RN AR RERRRRR RS

THE INFORMATION IN THE “L" REGISTERS ARE LOADED INTO THE
RK611 REGISTERS IN
A STARARIGHT TRANSFER.
1232222223222 2223232233222 2222222222222 2222222222 222222222222222

GET THE RKbB1l REGISTERS
P

ALL THE RKbll RgGISTERS
EXCEPT THE DATA BUFFER ARE
REGISTER
STORED IN THE
FREERERERENNNRRENNNENEEREE
R R RRERRRERRREREREREREREE LR
RERERR

"FIRST SHALL BE LAST,

LAST SHALL BE FIRST"” SUBROUTINE

llIllll!l!’lllllllil‘lllIIllllillllIlIlllilillll!llll!llllllliill
THE CONTENTS OF R3 IS SWAPPED END FOR END,

I.E.

BECOMES BIT O AND VICE VERSA,BIT 14 BECOMES BIT

BIT

1 AND VICE VERSA, ETC.

CALL:

JSR

RY, FSBLVV

WITH R3 LOADED WITH THE WORD TO BE SWAPPED
RETURN:

RTS

WITH R3 SWAPPED.

ERREEFERRRRRRE RN

ERERR R RN

RRR R

CHECK FOR MEMORY CHECK ENABLE

R R R R R R R RN B R EERRERE R R RN R RREE RN

EEERREERRRERRREERRERERRRRRRERRRRRRERERRERRRERRRER
R
IR RRRERRARERRR

CZREEBO RKB11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

MACY11 30(1046)
;

167400
000001

02-DEC-77

10:423

FO2

SEQ 0018

PAGE 18

%%% REV D04 *¥x

.NLIST
)
.ENRBL

$§SWR=

.TITLE

CND,MD,MC
ME
RBS, AMA

57400

czaseao nxsxl osts CTRL PRTS

:copvnxcut

4oxc1
MAY!

(C)

EQUIP

19 1977

¢onP

, MASS. 01754

;pnocnnn BY MARV TEGROTENHUIS
lTHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC
lPRCKRGE (MAINDEC-11-DZQRC-C3), JAN 19, 1977.
**!***#****

SBTTL

.SBTTL
001100

LWN—-ODVONCNLWNN~-0OW

SWITCH

BASIC DEFINITION

LEQU v

1100

MT, ERROR

IOT,SCOPE

CRLF=

200

.EQUIV

PS,PSW

177570

PIRG=
DSWR=
DDISP=

177772
177570
177570

000000

RO=

177776
177774

000007

OF ERROR CALL
;;ansxg BEFIN %Ofl

; 1BRSI

FINITION

SCOPE CALL

: *MISCELLANEOUS DEFINITIONS

000011

USE

lINITIR& ADDRESS OF THE STACK POINTER ¥#¥ 1100 #*x

&TAcK=

.EQUIV
DO WD WO O WD DD DD DO DDDD
PUNUNU 0= 0 s s s ot ot Pt s e (O

OPERATIONAL SWITCH SETTINGS

LF=
CR=

12
15

; ; CODE FOR HORONTRL TRB

,,co

rgz %

..c

FOR CARRIAGE RETURN-LINE FEED

xnce RE

177776

; }PROCESSOR STATUS WORD

STKLMT= 177774

; ;STACK LIMIT REGISTER

PS=

: : PROGRAM INT?RRUPT REQUEST REGISTER
SWITCH REGISTER
} ' HARD
DISPLAY REGISTER
; 1 HARD

; XGENERAL PURPOSE REGISTER DEFINITIONS

Rl=
R2=
R3=
R4=
RS=
Rb=
R7=

%1
%2
%3
%4
%5
%6
%7

,,EERERRL EEG¥§TER

REGISTER
RAL
5
: tGENERAL REGISTER
: ;GENERAL REGISTER
GENERAL SEGISTER
; s
REGISTER
'GENERAL
:
: 'GENERAL REGISTER
; ; GENERAL REGISTER

E%SB BO_RK611 BgfbécCTRL PRTS
bEB.P11
930
931

93
93
34
935
93
93
938
939
40
941
42
943
944

4S5
946

948

=77 10:21

SP=
PC=

0000
000040
8001
00140
000200
000240
000300
000340

PRO=

PRI=
Pngz
PR3=
PRY=
PRS=
PR6=
PR7=

100000

8W15="

Q40000

020000

010000
004000

002000
001000

953
954
955
956
957
958
959
360
961
362
963
964
965
96
9%
368
969
970
971
97e
973
974
975
976

000100
000040
000020
000010
000004
000002
000001

378

979
980
981
982
983
984

985S

000200

OE-QEC-??

ASIC DEFINITIONS

000006
000007

949
950

MACY11 30(1046)

10:43

%6
%7

GOe

SEQ 0019

PAGE 19

; ;STACK POINTER
: :PROGRAM COUNTER

: PRIORITY LEVEL DEFINITIONS

40
100
140
200
240
300
340

; ;PRIORITY LEVEL

: 'PRIORITY LEVEL
.;Pnionirv LEV L
; ;PRIORITY LEVEL

i PRIORITY
:'PRIORITY
;;anon§rv
:'PRIORITY

LEVEL
LEVEL
LEVEL
LEVEL

: ¥"SWITCH REGISTER” SWITCH DEFINITIONS

100000

SWi4=
SWi3=
SWi2=
SWil=
SWi0=
SW09=
SWo8=
SW07=
SWob=
SW0S=
SWo4=
SWo3=
SWoe=
SWol=
SWo0=
LEQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV

40000
20000
10000
4000
2000
1000
400
200
100
40
20
10
4
2

Sw09,SW9
SwWD8, Sw8
SW07,S5W?
SWO0&, SWe
SWOS,

EQUIV
EQUIV

SWOI,SWl
SWOO0,SW0

§§§“-§fi§
-gsfiiv
3: We
.EQUIV

100000
040000
020000
010000
004000

801000

000
000200
0001
000040
000020
000010

000004

-;?nrn BIT DEFINITIONS

15=

Ti4=

BIT13=
BIT12=
BITil=
BITi0=
BITO9=
BITO8=
BITO?=
BITO6=
BITOS=
BITO4=
BITO3=
BITO2=

188800

40000

20000
10000
4000
2000
1000
400
200
100
40
20
10

(BITOO TO BITIS)

CZRGEED RKB11 DSKLS CTRL PRTS

CZRBEB.P11

02-DEC-77 10:21

9§e
989

‘EQuiv

agooo149
838
000014
§§8850

1808
1010

30005
000064

1011

008853
0

000240

1014

1018

000250

177572
177574
177876
172516

’

BITOI.BITI
BITOO.BITO

BITO2.BIT2

BTVECS éo
14
?STVEE;

;105ax§OUT°p oTvER cRRORS,
!!5§§
NT TRAP
(BPT ¥%SCOPEx*
TRAP(I0T)
SU?PUT
::9%535POI

TROPVEC=)4
TPVEC= 64

i
,,rrv PRINTER VECTOR

4
ERRVEC:
E?TVEC-

sx80s1C “CPU* TRAP VECTOR

30
P“$355=

PIRQVEC=240

"SBTTL

ADDRES

EHULRTOR YRAP (EMT) ¥¥ERROR%x
Y KEYBOARD VECTOR

' PROGRAM INTERRUPT REQUEST VECTOR

MEMORY MANAGEMENt’DEF INITIONS

MMVEC=

250

SRO=
SRl=
SR2=
SR3=

177572
177574
177576
172516

; ¥KERNEL "I* PAGE DESCRIPTOR REGISTERS
172300
172302
172304
172306
172310
172312
172314
17231p

1036
1038
1039
1040
1041

"EQUIV
"EQUIV

. ¥KT11 STATUS REGISTER ADDRESSES

1028
1027
1028
1029
1030
1031
1032
1033
1034

BIT03.BIT3

;¥KT11 VECTOR ADDRESS

1018
1020
1021
1022
1023

PAGE 20

BIT?7

"EQUIV
"EQUIV

1885
1033
1802

igig

10:43

}g
;BITOY : BITH

. §u v

995
514

BIT 7

-EQuIv

99y

}88?

O02-DEC-77

BRSIC DEFINITIONS

-EQUIV
51109 BITS
.EQUIV BITO8.BIT8

990

939

MACY1l 30(1046)

KIPORO=
KIPDRl=
KIPDR2=
KIPDR3=
KIPDR4=
KIPDRS=
KIPDRb=
KIPDR?7=

172300
172302
172304
172306
172310
172312
172314
172316

¥KERNEL “I" PAGE ADDRESS REGISTERS
172340
172342
172344
172346

KIPARO=
KIPAR1=
KIPAR2=
KIPAR3=

172340
172342
172344
172346

SEQ 0020

1054
105S
1056
1057
1058
1059
1060
1061
1J62
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
109C
1091
1092
1093
1094
1095
i0%6
1097

177440

000
000002
000004
000006
000010
00012
000014
000016
000020
000024
000026
000034
000
000030
000032
000022

000001
000100
000200
000400
001000

SEQ 0021

PAGE 21

KIPRRH- 172350

KIPQRS= 172354
KIPAR7= 172356

MEMVEC= 114

MEMBRS= 172100
WR.PAR= Y4
PAR.EN= 1
AVECT1= 120210
APRIOR= S

; MEMORY PARITY VECTOR

{MEM_PARITY OPTION
iWRITE BAD PARITY
iENABLE PARITY ENABLE
iDEFINE RKb11 VECTOR_ADDRESS
R
; DEF INE RKSII PRIORITY
;DEFINE BASE OF RKB1l REGISTERS

.SBTTL

RK611 CONTROLLER REGISTER DEFINITION

RKCS1=
RKWC=
RKBA=
RKDA=
RKCS2=

O
2
4
&
10

RKMR2=
RKMR3=

34
36

;CONTROL AND STATUS REGISTER 1
'WORD COUNT
REGISTER
' BUS ngon;ss EGISTER
REGISTER
{DESIRED TRACK SECTOR
!CONTROL_AND STATUS REGISTER 2

12
§§gg=
RKASOF= 16
sfiggYL= 0
26
RKMR1=

onxgs STRTUSESEGISTER
Y AND OFFSET REGISTER
nrr;Tsou
NDER REGISTER
¢
'35?9
£ REGISTER 1
'MAINT

§§EEP¥= 33

PRT%ERN xnrogfig¢lég"
'ESE
! SPARE REGISTER

RKSPAR= 22
.SBTTL

000001
000003
00000S
000007
000011
000013
000015
000017
000021
000023
000025
000027
000031
000300

_10:43

N
~N
£
£
o

000114
172100
000004
000001
120210
000005

02-DEC-77

MEMORY MANAGEMENT DEFINITIONS

—

10583

172350
172352
172354
172356

MACY1l1 30(1046)

1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052

02-DEC-77 10:21

D
@
D
171
m

CZRGEBO RKB11 DSKLS CTRL PRTS

CZR6EB.P11

102

'MAINTENANCE
MAINT

DRIVE COMMANDS
01

; SELECT DRIVE

03
PACK=
CLEAR= 0S
UNLORD= 07
SRTSPL= 11
RECAL= 13

: PACK _ACKNOWLEDGE
,DRIVE CLERR
; UNLORD
:START SPINDLE
RECRL%BRRTE

17
SEEK=
RDDATA= 21

; EEK
;READ DATA

OFFSET= 1S

WRDATA= 23
RDHERD= 25
WRHERD= 27
WRTCHK= 31
300
INTR=

iWRITE DATA
;READ HEADER
HRITE HERDER AND DATA
WRITE CHECK
GENERQTE INTERRUPT TO CPU

.SBTTL

CONTROL AND STARTUS REGISTER 1 BITS

GO=

BITOD

IE=
RDY=
BRle=
BR17=

BITE
BIT?7
BITB
BIT9

;GO _BIT

: INTERRUPT ENABLE
;iCONTROLLER READY
:BUS ADDRESS BIT16
:BUS ADDRESS BIT17

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

SEQ 0022
|

002000
004000

cOT=
¢T0o=

BITIO
BITIl

: CONTROLLER
!CONTROLLER

000
020000
040000
100000
100000

CFMT=

BITI2

;conrnobLsn DRIVE FORMAT (0=26 SECTOR,

DI=

BIT1Y4

000007

SPAR=

—

BIT13

'DRIVE

:DRIVE INTERRUPT

‘CONTROLLER ERROR
!CONTROLLER CLEAR

.SBTTL

CONTROL AND STATUS REGISTER 2 BITS

DRVMSK=
RLS=
BAl=
SCLR=
IR=
OR=
UFE=
MDS=
PGE=
NEM=
NED=

7
BIT3
BITH
BIT
BIT6
BIT?
BITB
BITS
BITID
BIT11
BITI2

s MASK
DRIVE SELECTION CODE
'DESELECT OR RELEASE DRIVE IN BITS 0-2
:BUS
$ INCREMENT INHIBIT
!CLEAR CONTROLLER AND ALL DRIVES
: INPUT_READY
*OUTPUT RERDY
'UNIT FIELD ERR
'MULTIPLE DRIVE SELECT
! PROGRAMMING E
! NON-EXISTENT MEMORY
: NON-EXISTENT

DLT=

MeE=

BITia
BITIS

.SBTTL

ERROR REGISTER BIT DEFINITION

ILF=

BITI

IR TE CHECKERROR
BRROR

!DATA LATE

s ILLEGAL FUNCTION CODE

ESEEK INCOMPLETE

NXF=
DRPAR=
FMTE=

BIT2
BIT3
BITH

: NON-EXECUTRBLE DRIVE FUNCTION
:DRIVE osrscreo DRIVE BUS PARITY ERROR
'FORMAT ERROR

BSE=
HVRC=

BIT?
BIT8

Egzgz

BITS

EEQEVE TYPE ERROR

: BAD

COE=
IDAE=
WLE=
DTE=
oPI=
UNS=
DCK=

BITS
BITID
BITI1l
BITI12
BITI3
BITIH
BITIS

.SBTTL

STATUS REGISTER BIT DEFINITION

000001

DRA=

BITO

000004

cLo=

B113

DROT=

BITS

DRDY=
ODT=

BIT?
BITB

106000

SPDLSS= BITH
VV=

000400

BITE

chaC RROR
ERRROR

!CYLINDER ADDRESS OVERFLOW ERROR
ISK ADDRESS ERROR
1
{WRITE LOCK ERROR
: DRI
IMING ERROR
!OPERATION (SEARCH) INCOMPLETE
i RIVE UNSAFE
!DATA CHECK

:DRIVE AVAILABLE (CONTROLLER IS SET IF

: T

1=24 SECTOR)

BUS PARITY ERROR DETECTED BY CONTROLLER

BITIS
BITIS

BITO

DRIVE TYPE (0=RK06)
TIMED OUT WAITING FOR

"DRIVE RESPONSE

CERR=
CCLR=

SK1=

(=
=
o
o

ONNUNELL
L L L L £ £ L WWWWWWLWLWWWRAINININI
NN NI NN N b= b e b s s pe s e b D O O O

wmb-Dst\lfl‘U'lIWNFD\DQ\IU‘U‘IUNHD\DO\IU‘WIUNHQGQ\IO‘WIUNFD\Dm\Ifl'a

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

098
099
100
101
02
03
o4

JO2

MACY11 30(1046)
02-DEC-77
10:43 PAGE 22
CONTROL AND STATUS REGISTER 1 BITS

T 1S RESET)

ot Sl

SPEED LOSS

'DRIVE OFF TRACK
' VOLUME VALID

'DRIVE READY
'DRIVE TYPE (D=RKOB)

CZRGEBO RKG11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

004000
020000
040000
100000

1154
1155
1156
ii?g
iigg

KO2

MACYIl 30(1046) 02-DEC-77_ 10:43 PAGE 23
STATUS REGISTER BIT DEFINITION

SEQ 0023

sWRITE LOCK
:POSITIONING IN PROGRESS
:DRIVE STATUS CHANGE
:STATUS VALID

WRL =
PIP=
DSC=
SVAL=

BITLI
BIT13
BITIN
BiTIS

.SBTTL

MAINTENANCE REGISTER 1 BIT DEFINITION

iigé

000017

MESMSK= 17

;MESSAGE MASK

1163
1164
1165
1166
1167
1168
1169
1170
1171
1172

000020
000040
000100
000200
000400
001000
002000
004000
010000
020000

PAT=
DMD=
MSP=
MIND=
MCLK=
MERD=
MEWD=
PCA=
PCD=
ECCW=

BITY
BITS
BITE
BIT?
BITS
BITS
BITIO
BIT1l
BIT12
BITI3

:FORCE EVEN PARITY ON DRIVE MESSAGE LINES
'DIAGNOSTIC MODE
;naxnrsnnucs SECTOR PULSE
:MAINTENANCE INDEX
;nnxnrgunncs ELOCK
ENCODED READ DATA
:MAINTENANCE
:MAINTENACNE ENCODED WRITE DATA
i PREC
TION
: PRECOMPENSATION DELAY
‘ECC_WORD IS BEING READ OR WRITTEN

SBTTL

TRANSMITTED MESSAGE A

1173
ii;g

040000
100000

WRTGAT= BIT14
RDGATE= BITIS

ii;g

iWRITE GATE
:READ
GATE

1178

000020

S.SEEK= BITY

: SEEK COMMAND

1180
1181

000100
000200

§.5TSP= BITH
S.RTC= BIT?

:START SPINDLE COMMAND
;onxxs RETURN TO CENTERLINE COMMAND

001000
002000

S.FMT= BITS
S.UNLD= gxr:o

1179

000040

1182

S.RECL= BITS

000400

1183
1184

1185

4000

iigg
1188

;i CL

S.PACK=

BIT1l

:SET

iF
;un%ono

VOLUME VALID (PACK ACKNOWNLEDGE:

.=0

DISPREG:
SWREG:

000174
000176

000000
000000

1196
iigg

000200
000204

000137
8885?3

002400
002370

1199
153?

000214

000137

002360

.WORD
.WORD

O
O

.SBTTL

STARTING ADDRESS(ES)

.SBTTL

ACT11 HOOKS

; ; SOFTWARE DISPLAY REGISTER
:'SOFTWARE SWITCH REGISTER

mP
IMP

USTART ;; JUMP TO STARTING noon;sa OF PROGRAM
STRT
;JUMP TO RESTART
ROUTINE

IMP

PARM

:JUMP TO OPERATOR ASSIGNED PARMETERS

33 6363636 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 26 36 36 36 36 36 3 3 36 3 36 36 36 36 36 36 36 36 3 36 36 3 3 3 3 3 3% % % X %

1202

1203

1204

1205

ERROR AND DSC

BITS

; ¥ALL ENU D LOCATIOIS FROM 4 - 776 CONTAIN A *.+2,HALT"
: ¥SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS
;!LOCATIOngqCONTRINS 0 TO CATCH IMPROPERLY LOADED VECTORS

1193
1194
1195

xann;s Eonnnuo

S.CLR=

SBTTL TRAP CATCHER

000000

1189
1190
iigé

REC

000220

isgg

000046

1208
1209

0000S2

:HOOKS REQUIRED BY ACT11

$SVPC=.

:SAVE PC

8588%3

ssggao

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

000000
000220

WORD
O
. =§SVPC

::2)SET LOC.52 TO ZERO
: ' RESTORE PC

000046

. =46

cznssao RK611 DSKLS CTRL PRTS
CZR6EB.P
02-DEC-77 10:21
1210
1211
1212
1213
igig

000114
000116

000114
031726
000340
001000

1818

lalg

121

001000

1557
oooo24 000044
00000
1222

{553
e 88}888
1225
iggg

1228

1229

1230

001000

800000

1535 881813 838
30

MACY1l 30(1046) 02-DEC-77
ACT11 HOOKS

10:43

LO2

PAGE 24

SEQ 0024
;

. =MEMVEC
MEMERR
PR7
.=1000
APT PARAMETER BLOCK

.SBTTL

'sE#*t353#?3&%‘5&'5&6’5&‘5&'&&5&?&55‘#5&*5"*"‘*’**"*""***'*'
!I'lli&!lllll!llllllli!!llll!!lllll!ll!ll!lllllllll!l&illllll!ll
.§X=.

;;SAVE CURRENT
LOCATION

éES

EE?S.E
SS“‘smS“uP PRV o e e
: 'POINT TO APT INDIRECT ADDRESS PNTR.

snpggon "58%27 Lgcgg}ofiicéfiflrgko
303 0 I
I
000000
IIII III
; OR
Is;gsrggg ggggnsren BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC
APTHD:

§HIBTS: .WORD

:
g

,,TuoHIGH

BIT

ie BIT MAILBOX ADDR.

2 8“8 &E?tuo-shhleéslghcqu nnionE?E&LE(uon
s

CZRGEBO RKB11 DSKLS CiRL PRTS
02-DEC-77 10:21
CZREEB.P11

MACY11l 30(1046)
02-DEC-77
COMMON TAGS

.SBTTL
R

10:43

SEQ 002s

PAGE 25

COMMON TARGS

L bt bt bt bt St

bbb obbabe

b botedotadobbobotfotadot ot

ofbababoddtodedbototaiab bt Lt L L L 20

000000
UULU

ll?l
000000

SCMTAG: ';;100

s BR
317N

$SAUTOB: .
.

SINTAG:

0000000
000 000
OgOQOOO
=

001100

*_SPLRY
g

; ;START OF COMMON TAGS

| ERIEHE BfolcELares”

HERIAING SEBOE RelatPar Eonons
SRTANE 900 M g

L] Fakin,Tgraucrion
isssmra Fiodt
OF 'BRD’ DRTR
ig %§S

ONT

RESERVED--NOT TO BE USED

,,RUTOMTIC MODE INDICATOR
; s INTERRUPT MODE INDICATOR

; ;ADDRESS OF SWITCH REGISTER
::WN&QQ%PL“Y REGISTER

000000

$TMP10: |

{1 B
R
B, ngs
LLS
TERS REQUIRED
cm&LER ;mn
(i‘R*Ng
A "LINE
FEED"
11

OO0

RESS

0000000000000
0000

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

n
n

[

MUNONUMONONUNUNU
MU M0 b e e s bt e

-e

DC
888888888
8888
8888 Be880880688888
8; 888888588
e e e e w e e e
i
i e ey wi e e i wi st e
et
et e e st et et et e ust e gt e e ust e ud
e
e
e ae
-

—

00
00

SIBEITTRLD
DO~ "E L 82 ERERPAR

Ty
Y
Oy S S
T

n
0

[

Oo LRORZRO0 ZNOGER BUTN LROF £ Bon LRSS LR Se i £r o £ s 8

iTHIS TRBLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS
;%USED IN THE PROGRAM.

LAG " (BIT(07=0=YES)
"courn{ .abgs§§88r

: JWHICH N?SREEO) WA 1nNED
d
Eane (eet
(( 228)+q)
--8821912§
s ((SREGAD) +6)

JERIEHS HRERn
SOVAHS (REERIY
iDSER BEFINGD
..conrnxu

: 1USER DEF INED

in2ER SEFQQEB

sin DEF INED
I:u
: USER DEF INED
:!USER DEFINED

CZRGEBO RKB11 DSKLS CTRL PRTS

CZR6EB.P11

D2-DEC-77 10:21

MACYii 30(1046)

02-DEC-77

10:43

COMMON TAGS

NO2

PAGE 26

SEQ 0026

; ;USER DEF INED
: s USER 8Erruco
: 'USER DEF INED
: USER DEF INED
:3MAX. NUMBER OF ITERATIONS
; ESCAPE ON_ERROR ADDRESS

$TMP11: .WORD
§TMP12: .WORD
§TMP13: .WORD
§TMP14: .WORD
$TIMES: O
SESCAPE: 0

O
O
O
O

$QUES:
§CRLF:
SLF:

.ASCII
.ASCII
‘ASCIZ

/77
«<IS
2

iggg

"8BTTL

APT MRILBOX-ETABLE

}305

;éll!lllllliilllllllIlll!llllllllilllll!llilllil!l!illl!l*l*lllll

1292
1293
1294
1595
1296
1297

ggxaau
xagg
0012
!¢‘$§§
001
001236

000000
0
D000
DOOO
00000C

1
1300
1301

1244
001245
001246

077
015
000012

1532

1302

ggxgqo

1339 001250

1308
1309

001250
001252

177597

000000
000000

I
131§ e
0012 R
830000
{3
R
1315 e
331255 338000
1313 981578
000
1318
001271
000
1319
1320
;ggé

1323
1324

001272
001274
001276

oogooo
000000
000000

1325

1328

1329
1330

001300

001301

000

SC1Z

<207>¢377>¢377> ;;CODE FOR BELL

001302

000000

001304

000

1343
1344
1345
i346

1315
001320
001322

001305
001306
001310
001311
001312
1314

000
000000
000
000
000000
000

001316

000000

001324

177440

000
120210
000000

i3
ION MARK
: ;CARRIAGE RETURN
::LINE FEED

RN R R R R AR RR
I
R RN
;3 BR

$MAIL :

§MSGTY:
SFATAL:

.WORD
.WO

BRI
SDEVCT: CHS
.WORD
P
$MSGLG: R
.WOR
SENCE
ByTE
SENVM: .BYTE
.

§SWREG:
SUSWR:
sgpuop:
.

ix
;¥

.WORD
.WORD
"WORD

AMSGTY
AFATAL

ASWREG
AUSWR
ACPUOP

AMAMS!

SMTYP1: .BYTE
s¥

AMTYP1

§MADR1: .WORD
%
$§MaMs2: .BYT

AMADR1

.BYT
.WORD
.BYTE
.BYTE
.WORD
.BYT

SMTYPY: .BYT
$MADRY: .WORD
SVECT1: .WORD
SVECT2: .WORD
$BASE:

;;APT SWITCH
REGISTER
;;USER 5#{ gg;
éi?E“xé*xx'
A
:
-

1x/§u= 1,51/os=oa,11/ao=oa.11/%0:04,11/95:05
»PD@=07,0=1

Ré&/' 98
BIT 10=
IME'

§MaMS1: .BYTE

§MTYP2:
$§MADR2:
$MAMS3:
§MTYP3:
§MADR3:
§MAMSH:

; s APT MAILBOX

;;MESSAGE TYPE CODE
;;FATAL ERROR NUMBER

SRD
ADEVCT g
5;n£v§c§SE
OUNT
AL i g
e
em':gr:L
NG§H
1
NGENTT Byle OLE
AENVM ;;Efi¥in
BITS

.WORD

CLOCK

;;HIGH noggs S,M.S. BYTE

;:MEM. TY
MEM.TYPE BYYE

Ksi
-~

AMAMS2

;;HIGH
H?H.LQ
;;HIGH

K#l
BYTES, THIS WORD AND LOW OF “TYPETM ABOVE
M.S. BYTE

AMTYPY
AVECT1
AVECT2

;;nsn.rv ,BLK kY
;
;MEM.LAS
RESS , BLK #4
;::INTERRUPT VECTORK1,BUS PRIORITY#1
;;:INTERRUPT VECTOR#2BUS PRIORITY#2

1334
1335
1336

1347

SBELL :

1331

1337
1338
1339
1390
1341
1342

000377

(HIGH BYTE)

Sons:oox

.=3

AMTYP2
;;MEM.
TYPE,BLK
AMADRZ
;;MEM.L
SS,BLK#2
S3
;;HIGH
‘n S.BYTE
AMTYP
,;nsn.rv
,
BLK
AMADR3
;;MEM.LAS
SS,BLK#3
AMAMSY ; ; HIGH
SS.M.S.BYTE

AMADRY

ABASE

;;BASE ADDRESS OF EQUIPMENT UNDER TEST

CZREEBO RKE11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21
1348
349
1349
1350

001326
001330

000000

MACY11 30(

046)
gEC-??
MARILBOX~

SDEVM:
SETEND:
.MEXIT

10:43

ADEVM

BO3

PRAGE 27

; ;DEVICE MAP

SEQ 0027

CZR6EBO RKB11 DSKLS CTRL PRTS
CZReE B.P 11
02-DEC-77 10:21

.SBTTL

PAGE 28

SEG 0028

ERROR POINTER TRBLE

e
i
L
NFORRaYR
CATES WHICH ITEM IN THE TRBLE IS PERTINENT.
iLO‘ ION SITEM
RoR THER 1R Pud"aBlt"cORBANE" BOIRriRs BPCRtReD ns FoLLous:
ANGTER:

W
nwwn
NLEW

,,POINTS 70 THE ERROR MESSAGE

3 Re BI0E #142 RN8 8

THE BATA HEACER
T2 18
IN
00
1i
; ;POINTS TO THE DRTA FORMAT
WWw W

; UNEXPECTED PARITY ERROR

s Pt Pt

8888 8888 8888 888s
P

et Pt Pt

; UNUSED

Pt P

; UNUSED

s Bt ot

RROR ATTEMPTING IMPLIED SEEK
ERROR
S1 IN

;MR1

o 2nd

‘é-“
F2R8
oL£nNoD

;MR3 IN ERROR RTTEMPTING IMPLIED SEEK

———

[

8338
8888

——
b

£
n
o

—

o
o

IN ERROR RV1TEMPTING IMPLIED SEEK

;MR2 IN ERROR ATTEMPTING IMPLIED SEEK

WWWW

8888

s Pt et B P P (s Pt

WWWww

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

CcO3

HIS

WL
W
=0 VO

FEH
eSRR PATRLNES @ R B

———

1325

Bt b

10:43
02-DEC-?77
ERROR POINTER TRBLE

MACY11l 30(1046)

BF 0007
043163

RROR 10
MS010

;MR1 ERROR RERDING PREAMBLE

CZREEB.P11

02-DEC-77 10:21

MACY1l1 30(1046)

1407
Q014
48
8B1usS
8365

141

0Oi430
0014
001434
00143

Q43ie3
1
037600
040202

1418

001440

042243

l4ed
142

ODI4ud
001446

037562
OHOISE

;:gg

’

1419

B01ugs Ba3p]

Hgg
430

001454
001456

037600
Q40202

001460

043243

00l4e6

040232

001470
001472
001474
001476

043346
043034
037562
040156

001500

Q431

Y
"1

s Pt P

Y
1
Y

Y
Y
Y
Y

DFOO1
;

ERROR 11

;

ERROR 12

;

043316
037624

§§900

;

;MR1 IN ERROR HERDER RERD/COMPARE

Engfiila 13

53044

DT0011
DFOO11

ERBQR11 14

;€51 IN ERROR HEADER RERD/COMPARE

;PACK ADDRESS ERROR HDR READ/COMPARE

ERBOR,_15

MS01S
ESO048
DT0010
DFO010

ERROR 16
EMSO10

;MR1 ERROR READING GAP
.

;CS1 ERROR AFTER READING GAP

ESOQ4A

EMu:

Rles B
043462
043530
037662

£S0048

;CS1 ERROR READING PREAMBLE

DFOO1Y

001530
001532

EMS011

ESOL1A
DTO014

043015

000000

MS010
ESO04A
DT0011
DFQO11

070010
DFO010

20
%
RS

2
oL£nNoO

e
s e e

vwonn

et Pt et ot s

n
W
£

001502

DOC 8

BBB UGN £ LR OB B Vi E

[

oo
-

s Pt P

443

442

—

s Pt Pt Pt

s s Pt

43
437
438
433

001462
001464

o
[=]

DD SO LR

1431
1432
1433

e Bee o

514o

uss

1426
1487

4
570818

0156

1412
1413
1414
1418

sea odz29

1403 0014

02-DEC-77 10:43 PAGE 29

ERROR POINTER TRBLE

CZRGEBO RKE11 DSKLS CTRL PRTS

;ERROR _IN WRITING

;REGISTER IN ERROR AND CLOCK
; TRANSITION IS IDENTIFIED

ERROR 20

;ERROR IN CS1 AFTER WRITING SYNC

pragt}
;

ERR R 21
MS021
ESO21A
0T0021
-

;ERROR IN ECC WORDS

CZR&EBO RKGII DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

114}

FERS

FERD

tsuugm

b
e e

043560

ERROR 25
MS023

;CSL_IN ERROR
AFTER MULTI-SECTOR WRITE

040032

DF0O004

;MR3 IN ERROR

8888

;ERROR IN MR2

iDOING MULTI-SECTOR WRITE

EMSO21

;ERR IN CS1 AFTER WRITE DATA

ERROR 24
E

bt
e e

ERROR 22

o434e2
043015
037600
040202

SO04A

;NO COE ERROR

;OTHER ERROR WHILE FORCING COE

[ \F
<i]=]

oooo

ERROR 26
EMSO26
. WORD
DT0026
DFO026
ERROR_27

F0026

FER8

8888
5080
8888

:DOING MULTI-SECTOR WRITE

TO004

EHO2E:

EHO30:

037674
040326

EHO31:

RROR 30
MS030
. WORD
DTO026
OF0026

ERROR 31
Eusoax

; UNEXPECTED CYL OVERFLOW

; UNEXPECTED ERROR TESTING COE

;MR1 ERROR READING DATA SYNC

044672
040156

DFO006

837813

8888

ot e

8888

DF0021

040302

3505

SEQ@ 0030

PAGE 30

043560
043072
03 7552
040132

————

== 88

EO3

043560
043053
037542
040106

8888

DD SRR LB BB SRR LD B0
o ol 2o
DBB IR LI
DN £

Bt Bt Bt Bt Bt et Bt Bt ot

o Pt Pt et Bt ot ot

s Bt ot Bt Bt

s Pt Pt Bt it Pt

s o Pt Pt

s ot B Pt et Pt

s ot

nnnainnnnnaaaunninsm N

s Pt P

1474

£
FEN o

001536

8888

1463

10:43
02-DEC-77
ERROR POINTER TRBLE

MACY1l 30(1046)

DF0OO010

0 RKB11 DSKLS CTRL PRTS

DD S0
Ei

LW—0 v SRR L DR

BB 9T

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

s Bt (s Bt Pt et P

Bt Bt ot B

NNV
iy nnNUTNNINIUINNIAONOUVUIUINNNIUIUNIUIUY

A
EOR- S

s Pt s Bt Bt Bt Pt Bt

e Bt Pt e

P11

D2-DEC-77 10:21

001650
001662
0016SH
1656

Q44672
043015
037600
02

001660

044750

MACY1l 30(1046)

ERROR POINTER TABLE

09166d
O3750a
89ieee 8301
045015
04353
037662

001700
001702
001704
001706

Q44750
043015
037600
040202

001676

001710
001712
001719
001716

000000
000000

001730

gus132

001739
001736

037730
040406

001740

045217

001750

0NS300

001732

001742
001744
001746

045357

ERROR 34

.MR1 IN ERROR RERDING DATA OR ECC

EMS03Y4

.ECC ERROR READING DATA

ERROR 35

EM5035
ES021
070021

.CS1 ERROR AFTER READING DATA OR ECC

;

ERROR 37

:DATA COMPARE ERROR (1ST MESSAGE)

EMS03Y4
ESOO4A
670011
OF0O01

EMS037

DHOODA
070037
OF0037

;

.DATA COMPARE ERROR (2ND THRU 10TH ERR)

ERROR 40

)
0

DT0040
DFO0H0
"

ERROR 41

EMS04 1

.ECC REGISTER INCORRECT AFTER ECC RERD

DHDOOA

DTO041
DFO041

;

0N1932
037668
040426

001760

001784
001786

.CS1 ERROR AFTER READING SYNC

ERROR 36

041230

041232

ERROR 33
EM5032
ESO04A
670011
OF001
1

Q037722
040402

001782

PAGE 31

OF0021

041238
037716
040362

001720
001722

001784
001726

040308

045056

FO3

10:43

670010
DFO01

001670
001672
001679

02-DEC-77

ERROR 42

EMS042

DHODOA
DT0021
DF004%2
.

ERROR 43

EM5043
OHOOOA

037746
040446

.ERROR IN ECC PAT CALCULATION AFTER ECC ERROR

.ERROR IN ECC POSITION COUNTING AFTER ECC ERROR

DTO043
DF0043

ERROR 44

EMSO44

:ERROR AFTER PROCESSING DATA CHECK ERR

SEG 0031

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
s ot Pt Pt ot Pt

BBIRRE 88—BSB8SRR
LS E3BIRRE ittt
S AP

CZRb EB.P11

10:43
02-DEC-77
ERROR POINTER TRBLE

MACY11l 30(1046)

GO3

PAGE 32

DFO004

ERROR 45
EMSO4Y

;ERROR AFTER PROCESSING DATA CHECX ERR

DFO04S

; TRANSFER LENGTH ERROR PQRTI;L SEC READ

s Bt Pt

sioe

Bt ot Pt ot e Pt ot Bt ot Bt ot Pt et Pt

ERROR 46
EMS0046
DFO046

ERROR_47
EMS047

;BSE DID NOT PREVENT DA OR DC INCREMENT

ot Bt Bt B

;BSE DID NOT CAUSE CERR

ESOO4E
DTOO4S

s Pt Bt et ot s B

ERROR S2

oo G‘m

;DATA XFER ABORT TO SOON

;MR1 ERROR IN WRT CHK OR ECC RERD AFTER WRT CHK

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

;BSE FRAILED TO SET WHEN EXPECTED

DFO04S

oooororo
oo oo oo oo
[NV
VIV VI T U T e Bt Bt et Bt s Pt Pt ot s
OwoNonN
WOV
NN LWN—-0OW

s B Pt ot B

ERROR 51

EMSOS1

DTO010
DFO010
ERROR S4

002060
002062
002064

002066

DF0021

002070
002072
002074

ERROR S5
MS0S3
SO04A
DTOO011

037600

;ECC ERROR IN WRITE CHECK OP

:CS1 ERROR AFTER WRT CHK OR ECC READ IN WRT CHK

SEQ 0032

CZRGEBO RKB11 DSKLS CTRL PRTS

CZR&EB.P11

02-DEC-77 10:21

*Egé 002076 040202
1634

002100

044750

002110

046064

[t
16 BIE Aidald
1639

1640

1641
1642
ig:g
1645

1su9

164
1648
iggg

ggaxxa
2114
002116

43015
037514
040032

gggxao

046216

122
002124
002126

041232
037716
040556

1553

002130

0462

iggg

002136

040576

1651
1663

002132

MACY1l 30(1046)

ERROR POINTER TABLE
;

;

1290 ’g 122
1673
1274 885193
1676 835175
003174
1279

HO3

PAGE 33

SEQ 0033

EMS060

ERROR 61

:CS1 ERROR AFTER READ DATA OR ECC

:CS1 ERROR AFTER WRITE CHECK OR ECC READ

:WCE FAILED TO SET IN 16 BIT MODE

EMS061

: TRANSFER LENGTH PROBLEM - RKBA

DF0061

E:ROE
e
Esggu
DT0062

z TRANSFER LENGTH PROBLEM - RKWC

DF0062

lees
[ee5 Ris
BRlEl Bl
Bl
1669

ERROR 60

DT0046

;

046352

EMS0S3

ESOOYF

1663

002150

ERROR 57

DHOOOR
DT0037
DFO0B0

1664

EMS03Y4

ESOO4A
DTO00M4
DFO00M

1557
14 83514
27
12?3
885143
1660 002144
040000

0622

ERROR 56

BIReRA

043127

002146

10:43

DFOO011

1654 005134 037770

iasx

02-DEC-77

ERROR 63

EMS063

5eA%s
Ge3

sWCE FAILED TO SET IN 18 BIT MODE

ONTROLLER REGISTER
1..SBTTL
csx. TEHPORGRY
WORD O STORAGE FOR RKBII?
nub$us REGISTER 1
1.DA
:DES
%cron
TER
T. sé- -WOR
.figng 8
;85*RSE573
us REE?&‘E
T:2R: HoRB
: OR NTIiggl ER-RY AND OFFSET REGISTER
TissorZuong 08
5577

1678

§§§a§g

;.8ch-

'“°§§

‘85§3R§3r$

1681

002206

T.MR2:

.WORD

nnxnrsnnncs Recxsrsn 2

xggq
isez

14
16

iESZ

T.MR1: .WOR

T'§§P§§ W RE 80

T.SPAR: .WOR

INDER REGISTER

IMAINT Nnus REGISTER 1

EES
F8§}s§ POSHQT 3
: SPARE Recxsrsn

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21

I03

MACY1l 30(1046) 02-DEC-77_ 10:43 PAGE 34
EXPECTED RKB11 CONTROLLER REGISTERS

SEQ 0034

iggg

.SBTTL

EXPECTED RKG&11 CONTROLLER REGISTERS

16
16
169
16
16

E.CS1:
E.WC:
E.BA:
E.DA:
E.CS2:

.WORD
.WORD
.WORD
.WORD
.WORD

O
O
O
O
O

;CONTROL AND STATUS REGISTER 1
:WORD COUNT azcxsv;n
;aug
SS REGISTER
: DE
RACK SECTOR REGISTER
:CONTROL AND STATUS REGISTER 2

1696

Einsbrz WMORD

PATTENTI

1701
1702
1703
i;gg

E.MR3:
E.ECPS:
E.ECPT:
E.SPAR:

.WORD
.WORD
.WORD
.WORD

O
O
O
O

:MAINTENANCE REGISTER 3
:ECC POSITION INFORMATION
:ECC_PATTERN INFORMATION
:
REGISTER

.SBTTL
L.CS1:
L.WC:
t.gg:

“L" REGISTERS FOR COMMAND START
.WORD
O
;CONTROL AND STATUS 1
.WORD
O
WORD COUNT
;ggggn goonsss
O
'WORD

L.DS:

.BYTE

1638
1699
1700
1706
1707
1708
};?3

1711

1712

1713
1714
1715
1716
1717
i;ig

D5
"" HORD
E.MRi:
.WORD
E.MR2:
.WORD

002260
002262
§§§ggz
882257

K
002572
002
002276
002300
002302

000000

000

000000
0000C0
000000
000000
000000
000000

1720
1721

{;gg

L.DT

BYTE

L.CS2:
.WORD
L.ASOF: .WORD
L.DCYL: .WORD
L.MRl:
.WORD
L.MR2:
.WORD
L.MR3:
.WORD

OO
O

O
O
O
O
O
O

Y AND OFFSET REGISTER

1 DETA
BUFFER ocr
REGISTER
;nnquEHknce
REGISTER
1
;naxnrsuaucs Rscxsrsn 2

SECT

: TRACK

:CONTROL
AND STATUS
TATTENTION AND OFFSET
:DESIRED CYLINDER
*MAINT. REG 1
‘MAINT. REG 2
:MAINT. REG 3

.SBTTL

PROGRAM DEFINED VARIABLES

1725
002306 000240
1726 002310 000000

RKPR?:
"WORD
TRAPPC: .WORD

PRS
DO

‘RKb11
PRIORITY
:PC FOR MEMORY CHECK ENABLE TRAP

ERRCNT: .WORD

'ERROR COUNT FOR SWITCH 12 ABORT

R
L .WORD
BITCNT:
dECHT:
[0
BADPAR:
.WORD
ECCXOR:
.WORD

OS
8O
O

BT IBETRp{ruLATI
SRVIURITION
;e{r
O
0" IR A S
i BAD PRRETY LAG

1724

002304

000210

RKVEC:

.WORD

i;ss

002312

000000

SRTFLG:

.WORD

1731

002314

1732
1733

002316
002

3
17 e

000000
00

R
00

{73
Res
fe
1739
002334
000000
1740
3
000000
i741
1742

002340
002342

000000
000000

P1.BIT:
PR.BIT:

.WORD
.WORD

ECCHI:
ECCLO:

.WORD
.WORD

210

O
O

:RKB11 VECTOR

;srgnr 5580

INEXT a;r IN DATA SIMULATION
*PRESENT BIT IN DATA SIMULATION

:ECC XOR SWITCH
{ECC HIGH STORAGE
:ECC LOW STORAGE

1743

17494

1745
1746
1747
1748

002344

0023H

3?2
2356

000000

000000
000000
000000
ocooooc

10:43
MACY11l 30(1046)
02-DEC-77
PROGRAM DEFINED VARIABLES
ECCSRC:
ECPATX:
ECPOSX:
BSEDES:
HIBITS:
SAVSWR:

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

000000

CZRSEBD RKBll DSKLS CTRL PRTS
CZRE
B6EB.P 11
02-DEC-77 10:21

JO3

PAGE 35S

SEQ 003S

;ECC_SOURCE FLAG

EXP
CTED PATTERN ON ERROR

TED ROSITIO ON ERROR

,BRD SECTO

DESIRED
iSTORAGE FOR SWITCH REGISTER
;HI ORDER

BITS FOR 18 BIT_WORD XFER

C%RSEBO RKB11 DSKLS CTRL SRES
02-DEC-77

REEB.P11

012737
000406

5zgg; oo

10:43

.SBTTL

PROGRAM SETUP

KO3

PAGE 36

SEQ 0036

000001

002312

PARM:

SSV

g%hg¥IFLG

;LOAD START FLAG FOR PARMETER START

177777

002312

RESTRT: Egv

g;é*¥TTFLG

;LOAD START FLAG FOR RESTART

CLR
START:
START1: RESET

SRTFLG

;CLEAR START FLAG
IRESET THE WHOLE SYSTEM

CLRB
MOV

MOV
MOV

002430

RTI

JSR

18:

001100

:;CLEAR T
MOV
ghg

BFno £

035602

3343

NNNNN

s e B

s Bt e Bt s B

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

NNNNNY
Jo*
\l\l;\l;;\l\l;fl o
i
Q(’Dmmg\l\l\l\l\l\l\l\lz\l\l\l\l\l‘l\lfl\l\)\lfl\l
e
D T N RRR m}fl\l\l
wh—-0OWw 89&0‘:%-—8 0 nL nsLe A

001100

sS4

033160

st B

s B

=77
MACY1l 30(1046)
OE-DEC
PROGRAM SETUP

001140

.SBTTL

#PR7, -L5P)
#18,-(SP)

:LOAD STACK TO LOCK OUT ALL INTERRUPTS
:LORD START OF PROGRAM

:LOAD PSW

: INIT KEYBOARD

PC,3 srxxnt

xnrréanzETHE COMMON TRGS

BNE

TAGS (SCMTAG) AREA
#SCMTRG, R
,,rxnsv LOCATION TO BE CLEARRED
: iCLEAR MEMORY LOCATION
(RB)+

ogP

-6

::SE w T”E STQCK P
325?
A rga
xnxran?zs
sscops aoxorvsc ,txor v;cron FOR SCOPE ROUTINE
ggv

MOV
MOV

ggx

agv
MOV
e
MO

Bt Bt Bt Bt ot P

:CLEAR ERROR FLAG
:INITIALIZE STACK POINTER

SERFLG
#STACK , SP

agg

‘

nrvsc+':
,.Lv; CTOR FOR ERROR ROUTINE
Lt
c+

vscron FOR TRAP CALLS

“*g"; * POHER7FRILURE VECTOR
-Pnocnan COUNTER
sS:Se 035 1
LTSS
v-gm
&;&
982 gss
Egg
H
LoggP ogsggsron SCOPE
gg

?n IT 1

Bt s Bt Bt Bt Bt Bt Bt Bt et B

Pgulrcung R, IF
::SIZE FOR R unno
: 'EQUAL ;8vn 1;E

e Bt B

002656

Bt B

s B

MOV
MOV
MOV
CMP

002662

001256

su cu gfls ER.

cr SWICH REGISTER
Tugs
asSWRkflvsc ::25
osus
2
F%R
#DSWR,
xsLAY REGISTER
;;:AND Hnngunns
oooxs#DISPLAY ,.rnv
ro RE ERE HARDWARE SWR
#-1, 3SUR

668

Tngpflggcgnnfo
our

TIHEOU
annucu"i
RETURN
uP oa"?nnp
::ser

BNE

BYS:

BR
29¥

65
8658, (SP)

65S:

583

Doo ; ;POINT TO SOFTWARE SWR
:gxspntc

66%:

MOV

(SP)+,a8ERRVEC

;;RESTORE ERROR VECTOR

CLR

$PASS

: ;CLEAR PASS COUNT

CZR6EBO_RK611 DSKB? CTRL PRTS

CZR6EB.P11
1
1
1
1
1

02-DEC-77 10:21

002976

837

181
181
181

82787
1403

012737

714 88?559

ooa;xs

181

oe:leza

1818

0027

181

1820

%57

740

182

135

p0S737

000042

123727

001270

001012

001406

SAPTSIZE, SENVM
673

;;TE%T UgEER SISS UND%R APT
NON-APT SWITCH
3sY

CLR

RRCNT

;CLEAR ERROR COUNT FOR SWITCH 12 RBORT

112737

1853 002772
ieao -

000427

.SBTTL

000001

001134

mgitlzg

184

10-4411:1 040724

Dasag
001202
1407

gggigs

08?27

160000

1846
1
1847 003144
1848 003150
1849 003154
1850
1
1851
1

104401
01
13330
6
5
126

0732
001320
160000
040724
001202

1345 %3135

13735

CMP

;cl:g:

00i202

1202 001324

BEQ

vge

CMPB

gg‘g"*

158
Rl
e BB%
18% 003104
943408
{939

S$SSWREG, SWR

;;NO,fiSE APT SWITCH REGISTER

78:

68
gsenoao,awa

Egs

ssF E%HT{HE?

F NO

;;nc;-é'x‘? o

!!wps nséxz §§Rmc

%T vnt.ug rgn SOF TWARE SW ;su Ecgsrsn

BNE

g ggfigz 000001 002312 4§:

igg 00

{gza

NE
CEP

000042

11§§§ e
7 177777
-:%fi%
1
OC
104401 041004

1e~oaéfl

MOV

TYPE PROGRPAM NAME
.SBTTL
;s TYPE THE NAME OF THE PROGRAM IF FIRST PASS

853787 001140 000176

1854
005780 oooqo;
104406
1
i

I1TB
EQ

177777

85732 ?8«3? 002774

181

SEQG 0037

PAGE 37

001271

INITIALIZE THE COMMON TAGS

001272 001140 7S

023276

LO3

_02-DEC-77

00S037 002314

710

{ }

000200

10:43

MACY1l 30(1046)

Em
BR
MOVB

ARE

UNNING UNDER XXDP/ACT?

70$

: 1 BRANCH gr YES

708

: tBRANCH

SENV, 81

;un,csunsc

718

#1,SAUTOB

:IARE WE

RUNNING UNDER APT?

;i RRONGH

1 shR SETTINGS

H 32”

IF *‘f?

SWITCH REG SELECTED?

; ;SET AUTO-MODE INDICATOR

BR
seg
. :GET OVER THE ASCIZ
.ASCIZ <CRLF>/RK611 DISKLESS DIAGNOSTIC: PART §

N
éNE
YPE

cnz

8-1
EES
OPROODG

fi‘snmc

sTEST
IF PASSO
ENS - éxxg

355‘
TYPOC oPN00L
. ,,

i 20VE BBAS5CTRE ASCITCALL DIGITS)

MOV

ITYPE RCpI] U3 QODRESS ¢ ) #°
..

;5857

, OPROO2

BEQ

;CHECK IF <CR>

§TMPO, SBASE

;LOAD NEW BUS ADDRESS

(SP)+,$TMPO

gésoooo,srmo

TYPE
MOV
BIC
TYPE
RDOCT
MOV

oPROO3
$§VECT1, -(SP)
#160000, (5P)
, OPROO2
(SP)+,$TMPO

BEQ

i e 2ot

:CHECK IF IN I/0 PAGE

*TYPE "RKG&11 VECTOR ADDRESS (
:TYPE OUT VECTOR ADDRESS
;GET VALUE

108

;CHECK IF <CR>

817777, SVECT1

;LOAD NEW VECTOR ADDRESS

001412
a;g;

001000

001202

grcgs

%ooo,smpo

1856
1857

003206
3353

053737
684-4%

001202
040762

001320

BIS
TYPE

$TMPO, $VECTI
, OPROOY

s TYPE "RKB11 PRIORITY (

1860

003226

006216

ASR

(SP)

3 SHIFT

1855

1858
1889

0O
003222

&oé?

S04
113716

017777 001320
001321

108:

CZRGEBO/<CRLF>

:TYPE PASS TIME MESSAGE
;ggecné orlfr'xzuem ;53 START

w?;a

BIC

CLR
MOVB

-(SP)
SVECT141, (SP)

:CHECK IF LEGAL

§ BITS RIGHT

) ="

852258

83-52c-77 10:21

0 nxsxx

KLS

CTRL PRTS

003230

006216

5
866
867

00324

xoqaox

ol ol ] oy ST SNy Sy Wy Sy

1861

870
871

373

003264

7
7

003315

006337

’ggggs
883
§au ils

042737

ggg

2737

101347

874

882

040724
001202

000007

001202

000004

001202

T e e
e
Do

831

003400
003404
003410

000002

TYPOC
TYPE
RDOCT
ngv

, OPROO2

CMP

BHI

uli
00
001

001202

160000 002304
002306
801321
13737
4737
032652

012746
012746

(SP)

BEQ

001202

1324
37
egg
'lgg?o
gfisog;
381355
888 003374 804737
32516

889
890

143

ASR

CMP
BLO

000000
003412

(gp)+,srnpo

158

#7,STMPO
108

;GET VALUE

;CHECK FOR DEFAULT

:CHECK IF LEGAL

#4,STMPO

108

ASL

§TMPO

ASL

$TMPO

BIC
MOVB

RKPRI ;STORE PRIORITY
svsc71+lRKVEC

ASL
ASL
ASL

b e B .

003344

02-DEC-77

=
&

737
:17'5';

MO3

PAGE 38
Eg# SLus fos gorrunég SWITCH
REGISTER

MACY1l 30(104

T
TM
TMP

:SHIFT § BITS LEFT

I e o
JSR

CLR
JSR

NEWPAS: MOV

MOV
MOV
RTI

PC,$SIZE

:SIZE MEMORY

#PRO, - (SP)
#7157, -(SP)

LOCK OUT INTERRUPT

$BASE, R2
SESCAPE
PC . PARCHK

:SET RK POINTER
:CLEAR
ESCAPE
:CHECK OF MEMORY CHECK ENABLE

E
e
.

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

NO3

MACY11l 30(1046) 02-DEC-?7 10:43 PAGE 39
*¥MULTI-SECTOR WRITE OPERATIONS

.SBTTL

iggg
1894

SEQ 0039

#*¥MULTI-SECTOR WRITE OPERATIONS

H lll&llIl!!ll!lllllllllllllll!l!lll!l*lll!lllll!ll!lllll!l!lllll

MULTI-SECTOR WRITE (PART 1)

iggg

- 1898
1899
1900

Sy
s¥
L¥

PUTrg; °°"758kL§“IN oxncuosrlc MODE . oasgua WRITE
T
AN RKO6 IN 26 SECT
ORMAT
CYLINDER Henoflg secron 0. CLOCK THROUGH SEEK

1802
1903
1904

T
¥
s¥

n00D HEADER. CLOCK THROUGH 40O WORDS AND THE
uo c
WORDS. nafig SURE THE NEXT HEADER RECOGNITION
CYCL%
STARTS ANDTHE PROPER HEADER IS SEARCHED FOR.

1897

;;

1901

1382

1907

CLEAR THE RKG11 CONTROLLER WITH A CONTROLLER CLEQR

no DRIVE CLEAR

MESSAGES.

SIMULATE A SECTOR PULSE

sscouo GOOD HEADER AND CHECK RECOGNITION

iggg

003412

000OCY

igi?

003414

012737

000012

001234

MoV

igig

003422

012762

100000

000000

MOV

#CCLR,RKCS1(R2) ;CLR CONTROLLER

1914

003430

005037

002352

CLR

BSEDES

1915

003424

004437

!-#Tll!l;g;;;ll!ll!llllllll!llllll!il*lill!lll!lilllll!ll!!llI»l!l

023316

igi? 003440 004437 032

1918

1921

003447

1923

003452

1922

000

JSR

#10.,STIMES

R4, DSECTR

BYTE

OBUFF

LOADRK

;;00 10. ITERATIONS
;CLEAR

BAD SEC DESIRED

ECCH IN RKMR1 FROM INIT POWER UP

:SIMULATE SECTOR PULSE TO SET
“L" R

TER

TRACK O

003450

047636

1926
i%%%

003456
go3use

004437
080031

032014

{sn

R4, BLDDAT

gg gggho DATA

iggg

003464

004437

032274

JSR

R4, OPSTRT

;START THE OPERATION

RRoR

g Y 'DISEEK

177377

-401

iggg 003454 000023

WORD COUNT

WRDATA

1931

1335 003470
003474 004437
1ouogw Cooo3Y4

1339
003500 104008
iggg 003502 104007

aurrzn nooness OBUFF
-401

connnno unoaTA

ERROR
&7
ERROR

:MR3

SomPRRE© oK

igg;

003504

004437

023316

JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

1939

003510

004437

023740

JSR

R4, DRSYNC

; SIMULATE Henoen PREAMBLE

1943

003520

004437

02427

1945
1339

003526
003530

104013
104014

{3 Bl 18810
1942

o 1f

51 ERRTENEN e
T

ERROR
ERROR

13
19

cs IN ERROR nrrsn SEARCH
*RKDCYL OR RKDA IN ERROR AFTER SEARCH

970
97

865733 822263

:SET ME

FOR WRITE FAILURE

n§§“fis Ti DATA AND égc

#7%4 RO

ISSUE CLOCKS TO NEXT HOR COMPARE

iMR1
IN
N WRITING
DATA OR ECC
iECC IN Ennon uust WRITING DATA
:CSI IN ERROR AFTER
WRITING DATA AND ECC

$0MD
! MCLK , RKMR1 (R2)
#DMD, RKMR] (R2)

sCLOCK LOOP

RY, FSBL W
R3.E.MR2

L.OT,R3

40
Ss:

1998
1999

003766
3774

2001
2002
2003

004000

3776

004002

5 AREdRNa
8588 85

—

003752
3760

O
oL
oL

;;8

003744

63:

sGET
SIRE CYLINDER
:xnv53$
:STORE sxpscrso MR2

{GET DESI

rnncx SECTOR

#1774%00,R3

.ctgnn uug

89
L.DS,R3

DGR UNTIL
:msss#“sécvonNUMBER

#5,R0
R3

#CFMT,L.CS1

002260

Do3s0e
003706

{99
1338

2000

iMR1 IN ERROR IN RERD GAP
HH i"
AF TER READ GAP
iMR1
IN ERROR IN WRITING SYNC
:CS1 IN ERROR AFTER WRITING SYNC

:ST

L.DCYL,R3

3714
0037%5
0037
003736

1393

:SET ME
FOR WRITE FAILURE
ES?HULQ?EagSP
AND SYNC FOR WRITE

RY,DWRITE
17
1
2

18:

SEQ 0040

1985
1986
1987
1988

1993
1994

SEMS021, EMW

001510

000026

Q7€

1989

SEMS020, EMW
oucPs

001510

000026

i1979
378 003662
0036

1983
1989

BO4

10:4 ? PAGE
02-DEC-77
MULTI-SECTOR WRI E (PART

043462
025604

1974
1975
1976

1980
1981

MACY11 39{1096)

=
nd

B Bt Pt B Bt Pt Bt Pt s s Bt Pt s s Bt Bt e Bt Pt Pt P

ot Bt Pt P P

S R

RKb11 ggk S CTRL PRTS
C-77 10:21
P11

3
#BIT9,RJ

;S
cogu
oa sux
:SHIFT
TRACK FOR ucnosn ALIGNMENT

;TEST IF 18 BIT MODE

INO - SKIP
:SET FORMAT BIT FOR WORD TWO

EE'FSBLVV
ANVEE EggggTED MR3
RKfiSé(Rg),T.HR §:Es?ag

RKCCT
(RS 1. 081 ICETo
L.CS1,E.C51°
:GET
Exfiscrso cs1
T.C51.E.CS1
CHECK

3%
25

1YES P
.c51 IN ennon AT MULTI-SECTOR TIME

T.MR2,E.MR2

jCHECK IF MR2 OK

1512

002206

002246

3%:

2%
23

T5T2

002210

002250

23:

T.MR3,E.MR3

4s:

YES - SKIP
nna n snnon AT MULTI-SECTOR TIME
TEST

cuccx

IF MR3 OK

4$
24

YES
- SKIP
naa IN ERROR AT MULTI-SECTOR TIME

R4Y,DSECTR

;SIHULRTE 2ND SECTOR PULSE

TsT2

023316

;GO TC NEXT TEST

;GO TO NEXT TEST

004006
oo4012
004014

004437
104010
104011

023740

004016
88:022
024
004026

004437

024276

MACY11l

02-DEC-77

“..l-.'..l.

ae
—’ We WL WINL Br
R we W

001234

012762

100000

000000

00S037

002352

004437
000000
023
000

032230

5
77

SEQ 0041

RY, DRSYNC
10
11

; SIMULATE PREAMBLE
;MR1 ERROR
;CS1 ERROR

; SIMULATE HEADER SEARCH

ERROR
ERROR

1
14

:CS1
ERROR
:RKDCYL OR RKDA IN ERROR

tkTEST 2

000012

PAGE 41

RY, DHDCMP

3 CEBEBBELERRR

01293?

CcO4

JSR

ERROR

104014

000004

10:43

MULTI-SECTOR WRITE (PART 1)

ERROR
ERROR

OWwm

SRRSR

30(1046)

JSR

s P

s Pt Pt P

NN LWN—-0O

000 0606000

Pt Pt

%fi%

CZREEBO RKB11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21

iMR1

BTSRRI BIE BB LB L BRI

ERROR

R BB

BRFRERP B LSRR P EE TR PERE AR ELRS

MULTI-SECTOR WRITE (PART 2)

CLEAR THE RK611 CONTROLLER WITH A CONTROLLER
C

SRil i

% Do

SaSLioé’““sEcS'rS &%W“&éx‘&cfia‘u?nm

lllll!ggg;gllll.llIllllllillIlllllllIlllllilliilllll!llilll!l!l

4472

#10.,STIMES

;;00 10.

MOV

#CCLR,RKCS1(R2)

;CLEAR CONTROLLER

CLR

BSEDES

;CLEAR BAD SEC DESIRED

JSR

RY, LORDRK

.BYTE

ITERATIONS

; LOAD "L' nscxsrsns

ch;

OR a

6gY;E
’
-431

55?25n°
ESS OBUFF
Euono C “E? -431

WRDATA

004437
000002

032014

JSR

RY,BLDDAT

;GO

004437

032274

JSR

R4, OPSTRT

;START THE OPERATION

004437
104004
183005
104006
104007

023334

JSR

R4, DISEEK

:SIMULATE IMPLIED SEEK

ERROR
ERROR
ERROR

S
&
7

‘MR
i MR2
i MR3

004437

023316

JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

004437

023740

JSR
ERROR

R4, DRSYNC
10

s MULAT
nosn PREAMBLE
MR1 CONTENTS IN ERROR

104010

104011

ERROR

BUILD DATA

:PATTERN 2

;CS1 MISCOMPARE
-

csx CONTENTS IN ERROR

;

S8 SRR S0 438 T A IR S a o oo EOF FEA R
8t

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21

DO4

02-DEC-77
10:43 PAGE 42
MULTI-SECTOR WRITE (PART 2)

SEQ 0042

,SIHULRTE HEADER SEARCH

804138
884148 813

024276

JSR

Rfl DHDCMP

L st
IR {81

822263

En§8§
m

:SxSS“SQoa Ifieafiggcnrrsn SEARCH
i
Rfimf&ymgmsm .

2737

822485

437

i {48l

ste Bisoes 888330
012762

2{03

004326

2106

004350

004364
004372
004374

000040

esnon

001510

i
Q1270

001510

000026
000026

18:

MOV

cs:

i
i35

oono RKMR] (R2)
1

MOVB

ASL

ate

oeXA

BISB

L.DS,R3

&uscn*"sécr%%NUMBER

nna

TnacEXPE x/sscron
:: STORE

MOV

#CFMT,L.CS1

#BIT9,R3

T rnncx ron ncnoen AL IGNMENT

s TEST IF 18 BIT MODE

gg SKIP

T FORMAT BIT FOR WORD TWO

535
MOV

§”35£Expsgtso MR3
83;§?fik§V
RKHR2(R2), T.MR2
;

MOV

L.Sgi,E.GSL'

:Exfiscrso cs1

c51;N snnoa AT MULTI-SECTOR TIME

T.MR2,E.MR2

cnecx IF MR2 OK

3%:

.ggLK RKHRI(RLSSUE chcgg Toogsxr HDR COMPARE

sxnso CYLINDER
;GE
.xnvsn

BEQ

002246

EC
E uRT91Re Bath
E“é INEB%SH%:L‘
IN ERROR AFTER WRITING DATA AND ECC

L.DCYL,R3
RH FSBLVWV

ERROR
002206

§'&o“&t"7
Eim'fii“fixr?

MOV
JSR

CMP

023737

SRIETM
a§"8u8,

bBS:

e} 1 R TR

DEC

BIT

002260

,nn conrenrs ag
ERROR

AFTER HRITING SYNC

32
ERROR
ERROR

002274

032737

R B

BNE

Bies
5182 BB4sd2 giesy7
s
ED 160t
511
S0
108
2lll
elle
5113

MACY11l 30(1046)

CMP

BEQ
ERROR

T.CS1,E.CS1

813

2%
;3

813

0 NEXT TEST

YES - SKIP
nna*N ERROR AT MULTI-SECTOR TIME
0 NEXT TEST

EO4

CZRGEEBO RKB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21

116
117
aug

00YN00
0044
004410

023737
001402
104024

002210

%{Sé

OOM414

004437

023316

gxaa

333"

004437

023740

gig

004426

104011

axg

004430

004437

axgg
gi:n

004436
004440

104013
104014

124

004412

004434

MACY1l 30(1046)
02-DEC-77
10:43 PAGE 43
T2
MULTI-SECTOR WRITE (PART 2)

002250

2%:

104010
104012

CMP
ERROR

T.MR3,E.MR3
4§
;q

;CHECK IF MR3 OK
YES- SKIP
nna N ERROR AT MULTI-SECTOR TIME

JSR

RY,DSECTR

;sxnumrs 2ND SECTOR PULSE

JSR

RY, DRSYNC

; SIMULATE PREAMBLE

ERROR

:CS1 ERROR

JSR

RY, DHDCMP

Ennon
RROR

13
14

BEQ

000413

Ys:

ERROR

024276

ERROR

el3e

SEQ 0042

ST3

12’

;GO

TO NEXT TEST

iMR1 ERROR

sxnutms HEADER SEARCH
S1 ERROR
DCYL OR RKDA IN ERROR

llIll-llllllilllillll!lllllllllll»«l»lllllllllilllllllllilli!llllll

giga

firssr

2135

‘¥

RKG11

THE NEXT HEADER RECOGNITION mocssos PROPERLY.

1
2138

MID-TRANSFER SEEK (PART 1)

WITHA

CONT

LRCLEAR

2142

I
w«gfié&mfi”"”&fi?
iy MG sstx
T
¥
c
INDER
AD
TOR
H
A;b 32?
'ifi r&sfi%
ssc PULss
Y
m IHOR?EDSEEKr?e”“fim’fi
T
ueno"%su")‘f

2l4s

: X 1121221222222 222222222223233223232322333223222222222
2222222222222 22

2139
5133

2146 004442 000004

5{33

004444

012737

000012

001234

5{33

004452

012762

100000

000000

gigé

004460

00S037

002352

2153

004464

004437

032230

2154
2155

5%39

2158

gigg
216l
g{gg

004470
004472

000000
025

3;-30 owgg
177377

004476

00YS00
502
506

000023
oouq:a? oaamii'
0003 -~

gigg oous,la,‘oofifm 032274
2159,»163‘514
2ls
2168
2169
gi;?

usee
004524
004526

004437

104004
104005
104006
104007

023334

}aT3;

COPE

MOV

#10.,STIMES

MOV -

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

CLR

BSEDES

;CLEAR BAD SEC DESIRED

JSR

RY, LORDRK

;LOAD "L" REGISTERS

0
.BYTE

;;00 10.

ITERATIONS

:CYLINDER O
;EcOR 25

WRDATA
JSR
3

R4, BLDDAT

!COMMAND WRDATA
;GO BUILD DATA
:PATTERN 3

JSR

R4, DISEEK

o&?g
-401

JSR

R4, OPSTRT

ERROR
ERROR
ERROR
ERROR

4
S
&
7

afir“gsnonoonsss
OBUFF
WORD COUNT -401

;START THE OPERATION

;SIMULATE IMPLIED SEEK

;CS1 MISCOMPARE
'MR1
IMR2
IMR3
-

FOM

g;g 004530 004437 023316
2174 004534 004437 023740
104010
2175 835
1
1

ex;g
2l

SY4 004437 024276
sgg 104012

2180
Sigé

5 104013
S54 104014

2183

gxeu

185

axg;

2l
Sig

12737

043403

9 80'« 7 025204

2193
gigg

004614
004616

104021
104

2196

004620

012700

g:saw
6
8324
Y4
¥y
sgo
4

[

222

674

Sai é

513
14
sgis

2219
2218
2219
2220
2221
2222

2223
2204
2225
2226

eeae7

012762
0127
1
01
go‘m;
010
113703

706
7
714
14
;55 0527

000324

000440
000040

7
7
74
004746
004754
%37
7
004772
004774

10337
12537
16237
016237
013737
3737
402
104025
27

001510

000026
000626

18:

;sxnu.m;
gon Nr;
IMR1

RN Emon
SEARCH

002260
s
002206
002210
002160
002220
002220

ERROR

IN ESROE TER SEARCH
icS1
:RKDCYL OR RKDA IN ERROR AFTER SEARCH

$EMS020, EMW

JSR

RY, DWGPSN

:SET ns;

ERROR
ERROR

1
20

IMR1 IN ERROR IN WRITING SYNC
:CS1 IN ERROR AFTER WRITING SYNC

MOV

SEMS021 , EMW
RY,DWRIYE
17

MOV

21
22

:SIMULATE
:MR1

:CS1

FOR WRITE FAILURE

GAP ANDRE\mc FOR WRITE

ERROR IN

READ GAP

:SET ME

FOR WRITE FRAILURE
251&10?%175
DATA AND ECC
‘MRl IN ERROR IN WRITING DATA OR ECC

:ECC IN ERROR” WHILE mymc DATA
:CS1 IN ERROR AFTER WRITING DATA AND ECC

#53. ¥4 RO

#177400,R3

5, R0
R3

;CLgm

BISB

L.DS,R3

;xnssnwsécrgg NUMBER

BIT
BEQ
8IS

JSR

#CFMT,L.CS1
#BIT9,R3

RY, FSBLVV

DB T§
;ge
zf‘ogtmu'
¥sson
FTING
:SHIFT
TRACK FOR
HERDER ALIGNMENT

;TEST IF 18 BIT MODE
INO - SKIP
:SET FORMAT BIT FOR WORD TWO

; INVERT WORD

MOV
MOV
MOV
MOV
MOV

R3 S.ma
:STORE EXPECTED MR3
RKMR2(R2),T.MR2 ;GET MR2
RKMR3(R2).T.MR3 ;GET MR3
RKCS1(R2).T.CS1 ;GET CS1
L.CS1,E.C51
:GET EXPECTED CS!

BEQ

CMP

ERROR
R

T.CS1,E.CS1

25
TSTY

: ISSUE CLOCKS TO NEXT HDR COMPARE

#DMD
! MELK , RKMR1 (R2)
:CLOCK LOOP
#DMD, RKMR1 (R2)
RO
18
L.DCYL,R3
:GET
DESI
CYLINDER
RY,FSBLWWV
i1
ger
u8£8
R3 E.MR2
ST
E%crgg&ma
L.OT.R3
:GET
DESIRED
K/SECTOR

MOV
ASL

IN ERROR AFTER READ GAP

MOV
MOV
DEC
BNE
MOV
JSR
MOV
MOVB

BIC
5§:

00
0000
002260

RY, CHOCMP
12

ERROR
ERROR

77400

250
%

ERROR

JSR
ERROR

722 004437 032444

ERROR

2246
002267

010000
001000

:CS1 CONTENTS

ERROR

274

002266

: SIMULATE SECTOR PULSE
: SIMULATE
PREAMBLE
comEnu; RN Ennon
‘MR

MOV

10401
|

12737 043462
2191
%sa&
804437
025604
2192 004612 104017
2197
2198
2133
55::1
2
a?‘&S
2204
e

001510

10401

2190

RY,DSECTR
RY, DRSYNC
10

ERROR

104015

74
004576

JSR
JSR
ERROR
ERROR

104011

S42

SEG 0044

MACY1l1 30(1046) 02-DEC-77 10:43 PAGE 44
MID-TRANSFER SEEK (PART 1)
T3

iCHECK IF OK
:YES - SKIP
'CS1 IN ERROR AT MULTI-SECTOR TIME
::G0 TO NEXT TEST

»e

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

sns
¢

EBO Rxsu

2228

004776

33béc-:'? 10:2
KLS

CTRL PRTS

02?337

002206

002246

C-77

ggg

3%:

gg..

00S026 004437 023316

ug:

JSR

R4,DSECTR

ERROR
ERROR

10’
11

004437

023740

JSR

2244
2245

005042
005046

004437
104012

024276

JSR
ERROR

gg:g

00S0S2

104014

2246

005036
00SO40

005050

104010
104011

ginna,s.mz

ERROR 24
TSTY

005032

2241
sg:

10:43

o
gns zinna.s.ma

2O G o
aag 00S012 oa?zar 002210 002250 2%:
SSS‘s‘.
%2853 ?84025
agg; 00S024 000413

GO4

PAGE 45
mo
?Ennsrsn SEEK (PART
1)

MACY11l 30(1046)

104013

ERROR

cggcx érxgne 0K

(18 1 R grr-sevon o
; CHECK xr MR3 OK
nggINE
5Ron AT MULTI-SECTOR TIME

;G0 TO NEXT TEST

; SIMULATE 2ND SECTOR PULSE

RY, DRSYNC

; SIMULATE PREAMBLE

R4, DHDCMP
12

; SIMULATE HEADER SEARCH
;MR1 ERROR

:MR1 ERROR
:CS1 ERROR

;CS1 ERROR

;RKDCYL OR RKDA IN ERROR

2249

5 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 96 36 36 36 36 36 3 36 36 36 36 36 3 3 3 3 3 3% 3 X XX XX

2252

2253
2254

¥
;:

CLEARTHE RKG11 C
ER uxm A com
LER CLERR
PU$
THE
CONTROLL
8'"
Roh
A WRITE
83"1'gg
8
g
SEECTW
.

IR &sx"‘?'éLI

ggg

;fi

ggg?

MID-TRANSFER SEEK (PART 2)

Tuo

ROLLER

THE NEXT HERDER RECOGNITION Pnocssos PROPERLY.

;;:5liuEg;gl5uu|n'uuuuuuunnnuulnn"uinnuamr

sggg

—

00004

sggg

005056

012737

000012

001234

sggg

00SOed4

012762

100000

000000

gggg

00S072

005037

ss;

mg%g %qu%

MOV

#10.,STIMES

MOV

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

002352

CLR

BSEDES

;CLEAR BAD SEC DESIRED

032230

asn

RY, LOADRK

5099 NotREGISTERS

ae;a
oosios m7ooa
5575 %21?8 1773;?

6§5E§
gs
-401
.BYT

;;00 10. ITERATIONS

EE:S::
25 RESS OBUFF
iWORD C“09

2272

0051

gg;;

00S112

000023

2278
SSSB

005114
oosxéo

Y437
%oogw

03201 Y

gsn

R4, BLDDAT

ggrgg'xzhoqomn

5585

00S122

004437

032274

JSR

R4, OPSTRT

:START THE OPERATION

2eB83

00S126

004437

U23334

JSR

RY,DISEEK

;SIMULATE IMPLIED SEEK

WRDATA

,conmuo m

CZRGEBO RKB11 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21

B BEIE IR
ee
DOS1
104
10400
1'0
sggg
004437

00S146

[

2300

-‘-‘-

SRR

rorore
rornn

ggg

S FERe
=

00S142
-

ggw

m'fl?

MACYLl 30(1046)
02-DEC-77 10:43 PAGE 46
TM
MID-TRANSFER SEEK (PART 2)

feee
ERROR
ERROR
JSR

023316

104014
012337

538%
ggfl
0183015
230
204 imo ;
gi% %318 104020

$ggga

001510

00S232

012700

ggi; 005254

1370

g {2

0127

000324

000440

3§§ DOOO40

000026

1S:

Sl %25
ofekef olosy
ool
2323
2703 000005
177400
2327

agaw
2335

8336

005340
005344

2338

005360

2339

005366

004437
032444
010337 002250

—a—

11;537

000034

002206

016237

000000

002160

016237

013737

002260

002210
002220

[

RTEIENRB

RKDCYL OR RKDA IN smon urrsn SEARCH

no;

osnsoeoggnu

:gsr nfisncs
FOR WRITE rnngs%s

MOV

17
50

H.lg
F
m gsagsfl

;nfi'x'ukn n%&
émccng"
N mg &'TER u‘"?xr«:SYNC
;csx E
;c51 m ERROR AF ER

35"333%15""

;gsr n‘:.;sagFOR02'}',‘,7‘ rm%uns

{31 TN EmRoRInHRITING BiTa on cc

:CSI IN ERROR AFTER WRITING DATA AND ECC

¥53. l

8 |.|< RKMR1 (R2)

3:2:'

g" RKMR] (R2)

wssb

MOV
SEE

og,RO
Eo

BNE

5%:

; SIMULATE SECTOR PULSE

ERROR

o
17"
ERROR
22

s W

gggg 005312
005314 001375
153703 002266
2330 00S320 032737 O
2331
005326 001402 ——
gags figfi 0S2703 001000

R4,DSECTR

?"SO,DHDCHP

?ts);

S8
meee fouolh
Sgié 005230 104022
2313

ggg%

éznon
sssgs
RROR

2307 00s212 oxazg; ggzgs 001510

2314

5] miscareene
i MR2
-~=
i{MR3

e B

024276

SEG 0046

T
BIC 0197400R3

; ISSUE CLOCKS TO NEXT HDR COMPARE

:CLOCK LOOP

FTCRFSIoRp oviroeR

5059&ePecrep
a?gse
tf‘ogu r
mcx
r

HIFT 6g
HEADER AL IGNMENT

:
;ms:n?"secrgs
NUMBER
:TEST IF
T MOD
§Ngs.
xée
.
:SET FORMAT BIT FOR WORD TWO

BISB
T
géo
BIS

L.DS,R3
#CFMT,L.C
52
W ok NN
#BIT9,R3

MOV

srons EXPECTED MR3
RKMR2(R2),T.MR2;GET MR2

JSR
MOV
MOV

MOV

RY,
FSBLVV
R3)E.MR3

; INVERT WORD

RKMR3(R2) | T.MR3 .csr nna
RKCS1(R2).T.CS1

L.CS1,E.CS1

;GET CSl

IGET EXPECTED CS1

—0\

nn RN R
D WWWWWWw
W
NNNNN
DONCNLEW

3
ggs

£
L

g
:

CMP
BEQ

002246

002250

T.CS1,E.CS1
3

2%:

£
£
W
~N

DOS4SY
005460
005462
005464

DO4437
104012
104013
104014

023740

T.MR2,E.MR2

cuscx IF MR2 OK

;GO TO NEXT TEST

ERROR
CMP
BEQ

T.MR3,E.MR3
RE

YES- SKIP

nRe IN Ennon AT MULTI-SECTOR TIME
;GO TO NEXT TEST

cnscx IF MR3 OK
- SKIP
YES

ERROR

nna IN ERROR AT MULTI-SECTOR TIME

JSR

RY,DSECTR

-SIHULRTE 2ND SECTOR PULSE

SR
ERROR

RY, DRSYNC
10

; SIMULATE PREAMBLE
MR1 ERROR

JSR

RY, DHDCMP

ERROR

;GO TO NEXT TEST

TSTS

ERROR
024276

; CHECK IF ox
YES
- SKIP

c51 IN ERROR AT MULTI-SECTOR TIME

2%
23
15715

TSTS

CMP

3%:

4s$:

023316

104011

PAGE 47

002220

00S4Se

I04

MID-TRANSFER SEEK (PART 2)

002210

10:43

02-DEC-77

MACY11 30(1046)

ERROR
002206

£
£
£

RN
NN NNV

st
S& A0oE
NSRS
LA R A Rk A&¥d
20 T|

CZREEBO RKB1! DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

12’

ERROR
ERROR

c51 ERROR

; SIMULATE HERDER SERRCH

;MRi ERROR

;CS1 ERROR

;RKDCYL OR RKDAR IN ERROR

!!!llliilllilllllIl!llllillll&l!lllllillll!llillllillllll!lllll

firssr 5

MID-TRANSFER SEEK AND 24 SECTOR FORMAT

5 séL n W TH A CONTROLLER CLE

;%
¥

cour

CYLINOER

Hsgo

¥
;:

s£s¥35
uaxr: DATA

ocx c HROUGH se

ok
[ECET

qi
tmsfifi
H§
32 BIT ECC

15538 0 NEXT

CHECK THRT IHPLIED SEEK IS
TRACK. CHECK FOR PROPER HERDER RECOGNITION

‘¥
;s:;!lll;gg;;l!ll!illl!lllll!l!llllllllillllllllllll!llll!l.lilll

00S466
00S470

000004
012737

000012

001234

MOV

#10.,STIMES

005476

012762

100000

000000

MOV

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

005037

002352
002000

CLR

BSEDES

DEC

JSR

R4, LOADRK

00SS04

005510

14
5516

391
392
3

00Ss20
00SSe4
b

2395

005530

86%?00

300
001376

437
000
023
000
047636

032230

208:

MOV
BNE

.BYTE

OBUFF

;;00 10.

ITERATIONS

CLERR BAD SEC DESIRED

#2000, RO

:SET A COUNT TO DELAY FOR CLEAR

208

;LOOP UNTIL ZERO

"L" REGISTERS
;LOAD

:CYLINDER O

SECTOR 23
TRACK O

Burren ADDRESS OBUFF

CZRGEBO RKG11 DSKLS CTRL PRTS

02-DEC-77 10:21

CZRGEB.P11

;

PAGE
4

SEG 0048

177377
010023

seq

%gfi

%33;

032014

.;sn

RY,BLDDAT

331 E'x‘zfio?onm

00SSYY

004437

032274

JSR

RY, GPSTRT

;START THE OPERATION

004437

023334

JSR

RY, DISEEK

o
s
ERROR
b

;SIMULATE IMPLIED SEEK

ERROR

iMR3

gm 00SSeY 004437 023316
2412
570 004437 023740
2413
574 104010
g:ig 005576 104011

JSR
JSR
ERROR
ERROR

R4,DSECTR
RY, DRSYNC
10
11

; SIMULATE SECTOR PULSE
smuum: uenosn PREAMBLE
:MR1 CONTENTS IN ERROR
c51 CONTENTS IN ERROR

416

JSR

RY4, DHDCMP

sxnuun

ERROR

,csx msgn

MOV

osnsoao Enu

:SET MESSAGE FOR WRITE FAILURE

2404

R
te d
2407
005560 104006

-401
WRDATA!CFMT

g% 005562 104007

2417

00S600

005604

004437

104012

024276

ERROR

aug ggggos 104013

10:43

gggsaa
534

401

02-DEC-77

MID-TRANSFER SEEK AND 24 ssvron FORMAT

239;
5339

S..ES

[

MACY1l 30(1046)

JO4

géo

104014

2421

00S612

012737

ERROR

043403

001510

12’
14

sWORD COUNT -401
; COMMAND WRDATA!CFMT

Mg
a1
nna
”
-

nsaoen ssmcn

:MR1 CON (T)a INERROR

AFTER gfl

:RKDCYL OR RKDA IN ERROR nrren SEARCH

2454 -’- 104016
184050
gsas
2428 00S634 012737 043462 001510
2429 ggagz 004437 025604
g:ég %&2&2 104025
¥y
0127
0324
5332
,
815
00440
000026 18:
53% oosu;e &1357
000040 000026

ERROR 15
:CS1 IN ERROR rgsngzno GAP
iM3E IN ERROR AFTERIMATTIRG ‘Sync
ERROR 20
MOV
$EMS021, EMW
:SET
WRITE FAILURE
JSR
n
4, DWRITE
:gamfi? FORT om
mo EC
ERROR 52
:csx *n Ennon nrfis unfrfnc
DATA AND ECC
MOV
¥53. *
SSUE CLOCKS TO NEXT HDR COMPARE
MOV
oonomCLK
RKMR1(R2)
éLOCK
LOOP
ggg
ogno MR1 (R2)

5333

001370

BNE

2440

005700

013703

002274

MOV

.DCYL,R

%nu

13933 002259

MOVB

L.DT.R3

:csr

DEC
BNE
BISB

R3’
RO
5§
L.DS,R3

:DEC_COUNT
:LOOP UNTIL
: INSERT sscron

BIT

#CFMT,L.CS1

:TEST IF 18 BIT MODE

22332
oos;§
015388 6(735388
o4
005730 gggagg
2447
2448
gggg

005732
005734
005736

3
001375
153703

002266

2451

005742

032737

010000

5%:
002260

’

%3
ASL

:§7;3°°'R3

§Eo ’f'gncx/secron

'§'€$
OUNT
sgons?TING
:SHIFT TRACK FOR HERDER AL IGNMENT
NUMBER

——

CZRSEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P1

001402

24s2

052703

si23

gouu

001000

1033;
016237
1253;

250
M

3737
3735
14
104025 .

2260

2160

3737

002206

MACY11 30(1046)

02-DEC-77

006042

104023

006054

023737
001402

BEQ
BIS

6%
#BIT9,R3

:SET FORMAT BIT FOR WORD TWO

JSR

RY, FSBLVV

; INVERT

MOV

RKCS1(R2).T.CS1 ;GET CS1

’

206

MOV
MOV
MOV

002220

000413
066

B0€674
006076
006102
006104
006106

3%:

;cuecx IF MR2 OK

ERROR

nnz IN ERROR AT MULTI-SECTOR TIME

CMP
BEQ

T.MR3,E.MR3
4§

cuscx IF MR3 OK
YES
- SKIP

023316

004437
104010

023740

004437
104012
104013
104014

024276

4s:

104011

TSTe

YES - SKIP

;GO TO NEXT TEST

ERROR

nna IN ERROR AT MULTI-SECTOR TIME

JSR

R4, DSECTR

,SIHULRTE 2ND SECTOR PULSE

JSR
ERROR
ERROR

R4, DRSYNC
10
11

; SIMULATE PREAMBLE
;MR1 ERROR
:CS1
ERROR

JSR
ERROR
ERROR
ERROR

RY, DHDCMP
15
1
14

; SIMULATE_HERDER SEARCH
;MR1 ERROR
:CS1
ERROR
{RKDCYL OR RKDA IN ERROR

004437

;GET EXPECTED CSI
;CHECK IF OK
iYES - SKIP
:CS1 IN ERROR AT MULTI-SECTOR TIME

T.MR2,E.MR2

104024

L.CS1,E.C51
T.CS1,E.CS1
33
25

;G0 TO NEXT

2%:

_WORD

TST6

;NO - SKIP

R3)E.MR3
,STORE EXPECTED MR3
Rxhna(na),T.nRe
iGET MR2
RKMR3(R2), T.MR3 ,ggr MR

MOV
CMP
BEQ
ERROR

002220

002250

SEQ 0049

002210

PAGE 49

MID-TRANSFER SEEK AND 24 SECTOR FORMAT

02210
02160

002246

KO4

000427

1402

10:43

TST6

GO TO NEXT TEST

2 !lillIllllllllillllll!lIlllilillllllllllllillllillliill!lllll*i

;ir
1%

28 ne

7 55

006132
00e136

000012

00S037

002352

004437

032230

000632

THE CONTROLL n xn DIAGNOSTIC MODE.

S¥

AND A GOOD HEADER.

AN RKOB

ISSUE A WRITE

IN 26 szcron FORMAT

chxnoea 632
AD 2 secron S. CLOCK THROUGH SEEK
AND DR vs
CLEAR ssAcss. SIMULATE A SECTOR PULSE
;go ggao ECC.

CLOCK THROUGH Y00 WORDS AND THE

MAKE SURE CYLINDER OVERFLOW ERROR DOES

Py
: X 12222222222 22222:2222223222232223232333233222223232223 22223222222

012737

012762

nn THE RK611 CONTROLLER WITH A CONTROLLER CLEAR
on A OF 400 uosg

006

CYLINDER OVERFLOW (PART 1)

¥
‘¥

000004

100000

001234

000000

t&T6:

SCOPE

MOV

#10.,8TIMES

;;00 10.

CLR

BSEDES

;CLEAR BAD SEC DESIRED

JSR

RY, LOADRK

MOV

632

ITERATIONS
.

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

LORD "L" REGISTERS

CYLINDER 632

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

5211is

2514

LO4

MACY1l 30(1046)
02-DEC-77
10:43 PAGE SO
Te
CYLINDER OVERFLOW (PART 1)

025
ogs

m 600023
775

.BYTE
BYTE

25
2

o300
WRDATA

SEG 00S0

:SECTOR 25
:TRACK 2

g
- Rt
: COMMA -unomg

ggi;

006154

004437

032014

JSR

RY4,BLDDAT

asie

006156

004437

032274

JSR

RY,O0PSTRT

;START THE OPERATION

1
Y437
2523 %xg
104004

023334

JSR

sgnon

RY, DISEEK

4 '

ERROR

,ma

000001

251

esas 832174 104007

gu#.o DATA

PRT

IMPLIED SEEK
%1SIMULATE
MISCOMPA
h}.

sggg

006176

004437

023316

JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

2527
28

006202 004437
%gos 104010

023740

JSR
ERROR
ERROR

R4, DRSYNC
10

; SIMULATE Henoen PnsnnaLe
iMR1 CONTENTS *
ROR
:CS1 CONTENTS 1IN nnon

1
437
Sggé
%515
1u8~ooxa
2633
006220
104013

024276

JSR
ERROR
ERROR

RY, DHDCMP

;S
SEARCH
3
UE l.fi :5R éfin

ERROR

12’
13

.v YL on Rxon xn snaon arrsn SEARCH

MOV

SEMS020, EMW
RY,
DWGPSN

;SET MESSAGE ron unns FAILURE

25%
sggg

006222

104011

104014

12737 043403
5239 %553 80«»437
025204

2538

006236

2649

2550

gs
5
25
aeg g
sggg

gggg
60
b1
es 62
2563

JSR

104015

ERROR

Q0648 104a1s

§§:§
ngéo
2543 006246 012737 043462
2644 006254 004437 025604
2545 006260
104017
2546
gg:fl

001510

006262
006264

104021
104022

006266

012700

%g%s
006306
006310
&gxg

1
0OE324

006336
006344

015752
012762
005300
001370

000016

000440

000040

{MR1

SEMS021, EMW

H num.n?e

ERROR
13
RROR éo
001510

000026
000026

MOV

JSR

18:

: SIMULA?E“ AND SYNC FOR WRITE

n ,DWRITE

NE &
t-:no cnP

131
1N ERROR CATER BER2 908
ics1 IN 53282 &mn u&x‘?m«.SYNC
:SET ME

FOR

WRITE

ITE DATA

ax
22

:MR1 IN ERROR IN WRITING DATA OR ECC
{ECC IN ERROR WHILE WRITING
DATA
:CSI IN ERROR AFTER WRITING DATA AND ECC

MOV

MOV
MOV
DEC
BNE

#3%442, RO

#DMD ! MELK Rxnnuh.c’.) 53“
#DMD, RKMR] (R2
RO
18
LOOP uum. 0

:SET coum TO END OPERATION

032356

100000

002160

JSR

BIT
BEQ

RY, GETREG

;GET RKB1l REGISTERS

3327 7
1405
012737

001000
044253

002174
001622

BIT
BEQ
MOV

#COE, T.ER
8ES026A, EHO30

resr é” ;T 1S COE
ss "MESSAGE HEADER

104030

ECC

ERROR
ERROR
ERROR

Sgw 7

2737
001415

FAILURE

ERROR

#CERR, T.CS1
33
30

ITEST IF ANY ERROR SET
INO - SKIP TO EXIT
i "UNEXPECTED COE ERROR"

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZREEB. P11

s2es

2566
2567
2568
2569
e570
es7l
esze
2573

006346

000404

006350
006356

012737
104031

044253

MACY11 39;1095)

001632

SEQ J0s1

PRAGE S1

CYLINDER OVERFLOW (PART 1)

;EXIT

MOV
ERROR

#ESO26A, EHO31
31

SET HERDER
“UNEXPECTED ERROR TESTING COETM

CYLINDER OVERFLOW (PART 2)

;l
;l
;l

2579
S80

2583

0ooo12

001234

005037
012762

002352
100000

000000

004437
0006

032230

004437
000002

e fn Bt
Bt
e

t&17.

SCOPE

nosa

CL THROUGH 00 HOS D

300 00 006 006 00 36 00 06 000 0 00 00 6 00 0

ITERATIONS

MOV

#10.,STIMES

;300 10.

CLR
MOV

BSEDES
#CCLR, RKCS1(R2)

;CLEAR CONTROLLER

JSR

R4, LORDRK

;LORD "L* REGISTERS

OBUFF

;CLEAR BAD_SEC DESIRED

Cl
;i BUFFER flDDRESS OBUFF
HORO COUNT -401
COHHRND HRDRTR

-401

WRDATA

;GO _BUILD DATA

032014

gSR

R4, BLDDAT

032274

JSR

R4, OPSTRT

023334

JSR
ERROR
ERROR
ERROR
ERROR

R4Y,DISEEK
4
S
&
7

iMR2
iMR3

;PARTTERN 2

; START THE OPERATION

; SIMULATE IMPLIED SEEK

CS} MISCOMPARE
”

004437

023316

JSR

R4,DSECTR

; SIMULATE SECTOR PULSE

004437
104010
104011

023740

JSR
ERROR
ERROR

R4, DRSYNC
10
11

; SIMULATE HEADER PREAMBLE

JSR

R4, DHDCMP

004437
024276
104012~
10401
104014

e b

cooo

THO ECC WORDS. MAKE SURE CYLINOER OVERFLOW ERROR SETS.

e
:gYT

104007

00B474

B8 "EoNTRALLER"
TNBIRGNORTIc n6OE.
" 1550 AWRiTE
8¢L?n85n“25a“°fl880’2
aEEE‘B& ég ascffiEKOQHE SEEK

o 363696 3606 36 36 30 36 6 36 06 36 00 06 0606 06 00 00 00 000 00 30000 00 060 3600 0606 3006 3

000004
012737

047636
177377
000023

e e

DONN
LW -0

MO4

3 lllll!lll!llilllllll!llll{lllllllllll!lll!llilllllllI&l&ll!llll

e
RARRRRRRAR
gfu
A S 3&%8828&38%§3$3m
SRR LW

10:43

3%:

006360

sg?q
75

es:

02-DEC-77

012737

043403

ERROR
ERROR
ERROR
001510

MOV

iMR1 CONTENTS IN ERROR
;CS1 CONTENTS IN ERROR

; SIMULATE _HERDER SEARCH

HRI

NTs sFTER gEflR
ONT

1
1
14

RKDCYL OR RKDA IN ERROR RFTER SEARCH

$EMS020, EMW

; SET MESSAGE FOR WRITE FRILURE

3???333333#%%RRARRRRE oe
Bg

MACY1l 30(1046)

E .Pl11

02-DEC-77
10:43 PAGE S2
CYLINDER
OVERFLOW
(PART 2)

SR
ERROR
ERROR
ERROR
ERROR

000016
000440

000040

000026
000026

;SIMULATE GAP AND SYNC FOR WRITE
iMR1 IN ERROR IN READ GAP
:CS1 IN ERROR AFTER READ GAP
IMR1 {N Ennoa IN WRITING SYNC
:CS1 IN ERROR AFTER WRITING SYNC

SEMS021, EMW

sSET n§§snc£ rgn WRITE FAILURE

ERROR
ERROR
ERROR

17
21
22

:MR1 IN ERROR IN WRITING DATA OR ECC
:ECC IN ERROR WHILE WRITING DATA
:CSI IN ERROR AFTER WRITING DATA AND ECC

MOV

#3%4+2, RO

:SET COUNT TO COMPLETE OPERATIONTM

MOV

#DMD, RKMR] (R

JSR

18:

002174

032737
001402
104027
000404

100000

002160

012737
104026

044253

001e02

:SIMULATE WRITE

;s DEC_COUNT

:LOOP UNTIL O

JSR

RY csrnsc

GET RKb11 REGS

ccbe

BNE

BIT

BEQ
ERROR
BR
MOV

ERROR

DATA_AND ECC

sRUN THE CLOCK

DEC

BIT

2s:

RY, DWRITE

#DMD ! MELK Rxnnx(ka)

MOV

BNE
032356
001000

RY, DWGPSN
15
16
17
20

MOV

001510

Ya
FEb0 S3BYVRREOR-E

TEST IF COE SET

YES - EXIT TEST

#CERR, T.CS1

TEST IF ANY OTHER ERROR SET

$ESO26A,EHO26

:"UNEXPECTED ERROR WHEN FORCING COETM

$
27
3s
26

1P
NO
NO COE WHEN EXPECTED"
GJ T0 EXIT
;SET HEADER

3%:

.SBTTL

#%NPR WRITING OF MEMORY

BRI

LA LAT
1)
LB

**‘*R*t#*

iTEST 10

AR LA LA

c
c

NO4

NPR WRITING OF MEMORY

u:rn A CONTROLLER CLEAR
C MODE. ISSUE A READ DATA
Ecn
N as SECTOR ronnnr
CTOR0. CLOCK THROUGH SEEK
n o no
chx
ND DRIVE CLERRnss css IHULRTE n SECTOR PULSE
CL AR RKB11 Eg«055

CONTROL

GOOD HEADER,

40 DATA

ARE WRITTEN PROPERLY IN nsno

ERIFY THAT THE WORDS

?é¥:slllggsggllIiilllll*llililllllllllllll!l!&llllllllllll!l!l*ll

ooeb22
O0becH4

000004
012737

0ooo12

006632
006636

005037
012762

002352
100000

006644
006650
006654

005037
005037
004437

002344
02354
32230

001234

MOV

#10.,STIMES

;00 10. ITERATIONS

000000

MOV

CLR

BSEDES

;CLEAR BAD SEC DESIRED

CLR

ECCSRC

;CLEAR ECC SOURCE

CLR
JSR

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

HIBITS
R4, LORDRK

iCLEAR HI ORDER _BITS
iLOAD "L* REGISTERS

CZROEBO RK611 DSKLS CTAL PRTS
CZReEB.P11
02-DEC-77 10:21

2676

3 %
5

gégq

2685
2688

000000

4e63e

18UFF

06002

RDDATA

004437

031770

006676

004437

032014

Q06704

0OY437

03227

710

000CO3

004437

5638 Doe7ie
1oup0s
£633
006728
104006
g634
006722
104007
263

006724

0OW437

023316

2638

006730

0QW437

023740

740 004437
5703 ODE74d
104012

024276

2699
£700

006734
006736

104010
104011

2702
2704

g705

006746

006750

2708 006756 104015
2707

006752

004437

£703
2710

006760
762

104016
104032

2713

006766

012737

2715

007002

g711 006764 104033

000000

002346

g713 Doe77y 36273; 004066 002350
e7ig

007

004437

2717
007010
2718
007012

000060

2721

007020

104042

g7c6

007030

012701

012700

2728

007034

2730

007044

104034
104035

JER

R4, BLDDAT

;GO _BUILD DATA

JSR

R4, OPSTRT

;START THE OPERATION

ERROR
ERR
ERROR

&A
7

171 G e
iMR2
..
iMR3

ISR

R4,DSECTR

; SIMULATE SECTOR PULSE

JSR

R4, DRSYNC
10
11

;SIMULATE HEADER PREAMBLE

iMR1 CONTENTS
;CS1 CONTENTS

JSR

ERR

R4, DHDCMP

; SIMUL

ERR

RKDCYL

RKDA_ N ERROR AFTER SEARCH

ERROR
JSR

R4, DRGPSN

ERROR
ERR

,nm

“g
5"3:

ERROR

16
32

;Csl N

MOV

wbss ECPOSX

ERROR

026500

027176

;conmuo

;GO CLEAR INPUT BUFFER

ERROR
ERROR

104014

R4, CLRIBF

JSR

104013

RS0
%sgcnoonssgo IBUFF

ISR

023334

SEG 0053

:CYLINDER O

006672

006702

BOS

MACYLl 30(1046)
02-DEC-77
10:43 PAGE 53
T10
NPR WRITING OF MEMORY

MOV
JSR

R4, DISEEK

R4, DREAD

34
35

ERROR

i gl ik

g7ee

iSIMULATE IMPLIED SEEK

IN ERROR
IN ERROR

nm cou?sn'?nosn sfinon
iCS1
iMR1

80, ECPATX

ERROR
ERROR

;PATTERN 3

ARCH

ADING GAP

AFTERREADING SYNC

;LORD EXPECTED mm AN

iLOAD EXPEC

;GO SIMULATE

iNUMBER

nu% TE

iMR1
IN sm'on'c“géno
NG_DATA OR ECC
;ECC ERROR READING DATA

EE1 KON
OIC RERDING
DA

ERROR

;ERR IN ECC POS COUNT

047636

MOV

$0BUFF, RO

;SET POINTER TO GOOD DATA

2729 007040 00S037 001236

012704

000012

MOV

;SET

2731

005037

001220

CLR

SEScAPE

MOV

#40,R3

iSET COMPARE LIMIT

007022

2724

2725

00700

104043

012703

046632

000040

MOV

CLR

iERR IN ECC PAT CALC.

$IBUFF,R1
\

STHP?7

;SET POINTER TO INPUT DATA

:CLEAR

ERROR LIMIT COUNT

ESCAPE

;CLEAR ERROR REPORT SWITCH

EeC

cznssao RK611 DSKLS CTRL PRTS

CIREEB.P11

03-DEC-77 10:21

;gaa

0070S4

00S00S

;

7;3

DO7064

MACY1l

79
88787

745
?";
747

0071
1%
007110

30140987
18:

1424

7% D070
-‘-Szg g%fig?
771

e;u
74

30(1046)

304
881317

007132

007134

PAGE SY

;CLERR WORD COUNTER

§zg

é“

nggs

2s:

ER
D=C

18
RY

v
MOV
MOV

én.g

BEG

E 58"2 So%rms

5§

;DEC ERROR

(RO), SREGO

:GET
RD FOR REPORT
ngr
%0,‘380
;
WORD NUMBER

5?5 0 oReR1P LIMIT

smpr

B'rf
3¥np7
énson
.’47
BR
43

104040

3s:

ERROR 40
BR

%E &cSKIP
uons
coum LIMIT
T

(son,uuu

(m) gRES

157

000752

=0 SN

CLR

ago

1162
§111
Eg?
fiusw
010537
1166

COS

PR DRTTIRG P NEMORY

4s:

4 ;im
oowu7
001220
Sggé
ng
018-45337
_‘2,75375.' 0071
000754
5;29

142

énm, (R1)

57:w'g 007114 005737 001220

2755

-DEC-77

oecxos uuxcu ERROR REPORT TO USE

i5&3&?“"
K1
ngr
ERROR LINE
;nepom ALL OTHER LINES

;SKIP

g;gg 007136

5§:

532?

.SBTTL

S?Se

4 l«llllll!llllllilillllIll!llIlllllllllllllllflllli!lllllil*llliiii

2323

765

g;;x

577
774

000004

S;?S
2777
2778
277¢

007140
007146
0071
71

012737
005037
man;
%ggg

007174

%337

780
2781

E:e
H‘¥
NN
t4T11:

SCOPE

007136

007164
007170

s 7582

007

2787

007206

7
005037
0

53& %;5% ousggg
177400

000001
002352
100000
002344

002344
002354

032230
'

001234
000000

READ DATA WITH NO ERROR

R WITH A
T
CLEAR DATA
5 READ
ue
”%g
nSSE‘
nog
'fSc
m“ub
Vitcon'rs&.LEsN
§r
CLINDER
"85
;@not'EQ&%@E?ggnumEn'gofion”ECC.

5765
2768
278
2770

#*ECC ERROR DETECTION/CORRECTION TESTS

vsnxrv THAT COMMAND COMPLETES WITHOUT
E

MOV
CLR
MOV
CLR

NN NN NN

#1,STIMES
BSEDES
8CCLR,RKCS1(R2)
CCSrE

CLR
CLR

CCSRC
HIBITS

.BYTE

0JSR

igf»tg

-400

R4, LOADRK

NN EEREERE RN R REE R REE RN

;;00 1 ITERATION
;CLEARR BAD SEC DESIRED
,CLERR CONTROLLER
;
Eg gouncs FLAG

cu. m
¢
AR _HI ORDER BITS

chg&necxsrsns

aurrsn ADDRESS IBUFF
:WORD COUNT -400

CZREEBO RKb11 DSKLS CTRL PRTS
02-DEC-77 10:21

CZR6EB.P11

8789

2790
2791

007210

000021

oo7a212

004437

MACY11 30(

DOS

10:43 PAGE S5
02 -DEC-77
READ DATA WITH NO ERROR
; COMMAND RDDATA

RDDATA

031770
032014

887848

JSR

RY, CLRIBF

JSR

RY,

SEQ Q0SS

BLOORT

;GO CLEAR INPUT BUFFER
‘
gR0,

‘

b b

LW O—QS

o—o—§

;%3

RY4,DSECTR

023740

RY, DRSYNC
10

027176

1 MISCOMP

002346
0023s0

000440
000040

000026
000026

1%:

SIMULAT H;
1 CONTENTS

R PREAMBLE
IN ERROR

c51 CONTENTS IN ERROR

ATe,
H

RK YL oa RKDA IN ERROR nsrsn SEARCH

Tw,oncpsu

nn
nino REE@é

33
:RQEEPEEEOSX

:csx RROR nrr:n asnoxnc SYNC
:tgsg E%FE :8§££¥3N

R
n on ECC
e

S
3%

;:CS1 SgnoaAFTER nsnoxnc DATA OR ECC

#40. #37. RO

;SET COUNT TO EMPTY SILO

41
42
43
002710

; SIMULATE SECTOR PULSE

RY, DHDCMP

024276

0o ;gum»—
RREBYNY

s P

257i

SRR B

0oL
b taba(y)

rereted

NN £Wh

DBDDDD

n
DOD @
B BBBBD BBBED
3
SIBVERELR-S
n
@
L
w

anL ED SEEK
S§HULQTE

026500

007416

R4, DISEEK

023316

0000

sSTART THE OPERATION

RY,OPSTRT

032274
023334

’ECS
é ggnss AFTER ECC READ
iERR
IN ECC
ALC.
:ERR IN ECC POS COUNT

#DMD! MCLK RKHRI(RE)

#OMD, RKMR] (R2

;CLOCK CONTROLLER

RO
18

;DEC COUNT
:LOOP UNTIL O

002160

sxcsx*gzz.r.CS1

gg¥
cS1 .

02220
2220
002220

1.csl,E.Cs1

cS1
.coGE
#RDY,E.CS1

CLERS éo 5??

:SET RERDY BIT

:CHECK IF CS1 CORRECT

BO RK&11 DSKLS CTRL PRTS

EZReED. B. P11

0074

Til

T
L

852
63
854
2855
2856
2857
2858
2859
2860

007432

012737

000001

001234

g 00ruaa
ot
007452
gfigg 007456

872982
00S037
437

002352
100000

000000

a$7£

7464

e873
374
375

887H
74
007472

287

té T12:

002354
032230

SCOPE

;;00 1 ITERATION

CLR

BSEDES

;CLEAR BAD SEC DESIRED

CLR
JSR

HIBITS
R4, LORDRK

;CLEAR_HI ORDER g
LOAD "L* REGISTERS

0
.BYTE
BYTE
iBUFF
-400
RDDATA

7562
7593
75
7874
7576

37
Y437
004
104005
104006

2894
2895
2896
2897
2898
2899

007600

104007

: TRACK
i BUFFER noonsss 1BUFF
:WORD COUNT -400
: COMMAND RDDATA
;GO CLEAR INPUT BUFFER

032014

JSF

R4, BLDDAT

;GO _BUILD DARTA

#530, RO

sSET INDEX INTO BUFFER

MOV

RY,CLRIBF

177446
015457
00000

ch;ggen 0
i SEC

JSR

012737

ooougg
o427

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

031770

007512

007552
qgggsw

22 222 23
223222
2222 322222222222
432232

#1,STIMES

2884

:
2891

ac 1.

MOV

1
052760

AND Posxrxogexgronnnrxon

000S30

8827 0

" SIHULnn sscImlcnnf
OR PULSE«:

DATA CHECK AND CONTROLLER ERROR

012700

42
007844

R WI
RH
TH§§§7R0§§En
E"
e heRERD DATA
FORMAT
SEEK

y
W
mgz-&iwX
o

MOV

66
177400

READ DATA WITH ONE BIT BURST ERROR (PART 1)

TN
NROLLER

007506

2888
2889

; YES - SKIP

CL;RR

2881
gggg

2887

SEQ 00Se

;”CS1 IN ERROR AFTER READ DATA"

+ 36363636 36 36 3636 36 36 36 3 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 3 3

55;9 007474 004437
53;3 DO7500
437
2880 ?i7§ou 0007

;lillllll!llllllilllllllllllll i3 i3 3333333323233 3322232222222 2222

€830
e85l

EOS

RROR

iTEST 12

g& 007430 000004

10:43

READ DATA WITH NO ERR

104056

2848
ERE

sgga

02-DEC-77

001401

4s ’
4 0

#“*l.-fit.#.

02-DEC-77 10:

MACY11 30(1046)

MOV
MOV

000106
000100

000100

032274
023334

89?’

#177446,

:PATTERN 7

OBUFF +1000

;STORE ECC WORDS

815457, OBUFF +1002
,SET SOURCE TO xuoxcnrs ECC IN BUFFER
#1,ECCSRC
TIF BIT SET
#8176, 0OBUFF (RD) ;
SKIP
v
100$

BIT
BNE
gés

rg{Ts,oaurr(no) 'ELSE SET BIT

BIC

#BITe,0BUFF(RO) ;CLEAR BIT

JSR

R4, OPSTRT

JSR
ERROR
ERROR
ERROR
ERROR

R4, DISEEK
M
5
6
7

;START THE OPERATION

:SIMULATE IMPLIED SEEK
csx MISCOMPARE
MR1
nna
‘MR3

30(1046)
Tle

FDS

02-DEC-77
10:43
PAGE S7
READ DATA WITH ONE BIT BURST ERROR

(PART

007602 . 004437

023316

JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

07e0e

004437

023740

JSR
ERROR
ERROR

RY, DRSYNC
10
11

; HULnT§ u;
iMR1 CONTENTS
:CS1 CONTENTS

el
B97e3s

O
£
(= = ¥ o
B b e 5
LWV

MACY11

024276

ERROR
RROR
SR

RY, DHDCMP

RROR

12
13
14

iMR1
CON
?sfi3 nrrsn
fn ERROR
'°56
IN SR
SEARCH

ERROR
RROR

g’noreN
16

oR1
TR ERRO 1§
:CS1 ffl EEQSS “23 ssnoxuc GAP

MOV

bss ECPOSX

W o)

026500

o0L

t=tpipe

N
o

958

s s

0C ;214 164811

ERROR
ERROR

: SIMULAT,

R PREAMBLE
IN ERROR
IN ERROR

R SEARCH

:RKDCYL

N ERROR AFTER SEARCH

32
33

iMR1 IN asnoxnc
:CS1 IN ERROR AFTER nsnoxnc SYNC

#1, ECPATX

;LOAD EXPECTED PATTERN

n DREAD

:GO SIMULA

IATATA

£33
DR
EO NN N

2232227

o"-'o-

002326

MOV
JSR

400
ERROR

)
£N
oW

SSoERS
&8
BORRE W=
W=
-

5
o
R
2 ggggfiégflfififid
RRos

e
b

ooo
O—r
o [—y

LW
LO

O000000000

[eYestutt
et wtududedu

MOV

#20,BITCNT

MOV

002214
0oez212

177777
020000

MOV
INC

MOV

002252
002214

002326

CMP
BEQ

18:

2%:

002350

:LORD EXPECTED

:
iMR1

R
IN

:ERR

ERROR

POSITION
TR READ

T0 SIMULATE
noxgg DATA OR ECC

{ECC ERROR gsno NG
DATA
:CS1
ERROR
AFTE nsno;nc DATA OR ECC
:ECC REG_INCORRECT AFTER ECC
RERD
ERR }N ECC PAT CALC.
ECC POS COUNT

;SET BIT COUNT FOR connscrxon COUNT

5, RO

:SET COUNT FOR ECCPOS PASS THRU O

$THMPS

:CLERR

o*ég7a,n1

iSET cogur FOR ECCPOS TO O FIRST PASS

M
MOV
nntES??Sa),r.scpi

»~o

35
36
41
42

CLR

ooz2212

ERROR
ERROR
ERROR
ERROR
ERROR

——

NNN

8523838

e B

BERs

002346
002350

AR
9284

gf\l DB DB

Pt e e e Pt s

DONON EWN-0O

3E%%%%% 33

0 RKSII DSKLS CTRL PRTS
Pil
02-DEC-77 10:21

SWITCH

? Pnrrsnn

RKECPS(R2),T.ECPS
c;0SITION
CPOSX
;BUMP _POSITION EXPECTED

ECPOSX,E.ECPS

E.ECPT.T.ECPT
1
2

:SET FOR COMPARE

AND REPORT

;CHECK IF PATTERN CORRECT
:YES - SKIP

CMP
BEQ

E.ECPS,T.ECPS
$

;CHECK IF POSITION CORRECT
:YES - SKIP

INC
DEC
BNE
DEC
BEQ
MOV

BITCNT
1
33
RO
qs
-1,ECPOSX

;BUMP BIT cg
:DEC COUNT
TO ZERQ IN ECCPOS
"NOT YET ZERO - LOOP
:DEC_PASS THRU O counr
:IF 0 - SKIP
‘PRESET EXPECTED POS TO GO TO ZERO

ERROR

MOV

cenboo R1

iSET COUNT TO NEXT O IN ECC POS

:GO DO LOOP AGAIN

SEQ 00S7

ettt
et et

0000000

005737

GOS

MACY1l 30(1046) 02-DEC-77
_10:43 PAGE %
READ DATA WITH ONE BIT BURST ERROR (PART 1)
Tie

001214

?5962 005276
?999% 002350
815739
37 001214
16

04aT 835348

8520
?°0§az§§
%gzg
8
816
8%55 ?z 002160 002220

[yeerefereteered
ety

g:??

00000000000000

2956

N Efifififi

CZfibEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11

oiaa

104044

8{33

%%3;

4s:

§i$§ gogu%zég 000100 002174 68:
100000

002234

0156

TST

gfs%
583
INC
BR

=1, |

S$TMPS

.g276 R1
:-rl#’scposx
33

; TEST SWITCH

&RE%?ETOF ?ML POSITION
RFTER82%22?5917
i:ETSR”
35::0
SWITC
;GO DO LOOP AGAIN

SET READY
10 T
;QNE MORE BI

CERaon
EszCTSm
gET
.CS1
RR
Eoéggg s.RSCE
cggcx xrxcsx CORRECT
c§1 E c51
ERROR

§gg

ngon

;..

;gcu,r.sn

:gcx.s.sn

;'T«s)sr Sx_&ngcc HARD ERROR SET
:SET EXPECTED ERROR REG

78:

?.‘:l?

3 © 3636363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3636 36 36 96 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 36 36 36 36 3 36 3 3 3 3 % % % % %

2982

;»

aqe?

hssr 13

5333
2985

306
2989

tx
‘¥

Sg::g

CLEna nxsu comnousnxm A comnou.u:n
neno DATA
nCLEAR.
’ ER m D
PUT

‘CY
%1Dr¢ggn oé
“520S.

AN
1::31
Trc
COUNT
Imur:uztposxnon
cc
"%H MAKE
necxsvsn
AND
1¥£m
nvg
%
TION
CONTROL R
SURE DATA

2986

ggg?

READ DATA WITH 11 BIT BURST ERROR

llllllllllill“lllllllllllll!lllll!liIlll!l!llllllll
:
gl:5!ll;gsgg

010156

2994

010160 012737
000001
2935
810155
005037
802352
gg'g; 010172 012762 100000

MOV

CLR
MOV

%1, STIMES
;
RATION
BSEDES
AL
snfi
505
SEC DESIRED
#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

9
1
5037
2354
gg%
§i§§§
38'«37
ggaggo

gls'nR

HIBIT

R*Ia?Logonx

CLEAR HI ORDER
:cldytfa?
'&'I' gccxsrgfisS

BYTE

TRAC

3001

Ol 15
1021

ooo:
0

001234

000000

BYTE

ogg

ggg 010220 000021

RDDATA

:§s
TOR 0

conmno RDDATA

ggg?

010222

004437

031770

JSR

RY, CLRIBF

:GO CLEAR INPUT BUFFER

3009

010226

004437

032014

JSR

R4, BLDDAT

: GO BUXLD DATA

3010

010232

000007

'PATTE

SEQ 00ss8

CZRGEBO RKb11 DSKLS CTRL PRTS

CZRGEB.P11
%i

010234

3014

010240

02-DEC-77 10:21
012700

000S30

MACYll 30(1046)

T13

PAGE S9

SEQ 00S9

MOV

#530,R0

;SET INDEX INTO BUFFER

815737

012737

177446

457

(0S0640

MOV

#177446,

10262

032760

000100

047636

BIT

:eirs.oeurrmm:TEST IF an SET

818308

042760

000100

047636

BIC

#BIT6,0BUFF(RO) ;CLEAR BIT

012737 863001 002344

33020 giggg
825923 000100 047636
01
000403
1031

010310 004437 032274

3025 810314 004437
3026
010320 104004
3027 810322 104005
3052
10324 1gwoos
%30 010326 1PvAQ
gg
010330
*
3033 010334 00- ../
38% 818342 18~oom
3035
10342
104011
3037

10:43

10254

050636

02-DEC-77

READ DATA WITH 11 BIT BURST ERROR

oig:m

?044?7

?38
§1g§§g
183813
383?
10354 104014

MOV

mog:
1018:

023334

023316
023740
024276

04
1
437
gou
818333
1”8-4'015
gg::g nioasu iougxs
gg:g 813‘;’% 1 ogg

026500

3048

000001

E?E
BR
JSR

:STORE ECC WORDS

81,ECCSR

;SET SOURCE TO INDICATE ECC IN BUFFER
c 8

cB??s,oaurr(Rm
EL?E s§§ Exr
1018
R4, OPSTRT

:START THE OPERATION

JSR
ERROR
ERROR
ERROR
ERROR
JSR
JSR
ERROR
ERROR

R4, DISEEK
4
S
b
7
RY,DSECTR
RY, DRSYNC
10
11

:SIMULATE IMPLIED SEEK
;CS1 MISCOMPARE
.nru
i MR2
IMR3
.
; SIMULATE SECTOR PULSE
; SIMULATE HEADER PREAMBLE
,mu comEms
N RROR
:CSl
TENTS

Jggm

llw,ouocnp

,g'xu0;;
HERADER
SE

ERROR

JSR

RY, DRGPSN

RROR

Eanon
Essgs
ERROR

15’
53
33

;G
no
,n&”fn
iC i ;n
RROR nén
nr
nenomc GAP
:csx N
su&noxm SYNC

01037

3051

15737

010412

000400

JSR
400

3054
305s

010420
oimea

104036
iO:O:l

ERROR
Essgg

36
31

:CSI ERRon ms
nomc onm OR ECC
Esg Nc INC pmm
cT nnsa ECCREAD

oimao

oia;:a?

ggz

:gokancm

:SET axr coumrogpcongggnon cogm

4437 7176

002350

MOV

P HEd
16
1
e
3060

ogooeo

ggga

3183%
8157 1 81329?
010446 005037 001214

3065
3066

0104
010456

737
4737

£AD

wbss ECPOSX

RPOR
T

£ HBE 188
3059

%1, ECPATX

:csx
SRSEDA&'TER
i RKDCYL
IN ERROR nnen SEARCH

4066

MOV

3833

737

002346

OBUFF +1000

815457, OBUFF +1002

0316l
03046

002326

3067 010462 016237 000032 002214

3s:

;;

’58

o
EC

xmL
k]
L

mn;m

wamgfl

B IN ek PO

MOV
CLR

$TM

oxésga,m

gET
oum ronEScpgg T0 3
FIRST PASS
:CLERAR SWITCH

JSR
ISR

PC,RDBIT
PC ECCGEN

;GO READ BIT
GENERATE ECC

MOV

nxtcprme) 1.ecpt

:GET PATTERN

’

CZRGEBO RKG11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21

3068
gggé

307

3074
3075

33;3
3080

3081
3035

goaq

010470

1
i

01
i

000030

002212

MOV

13737
?zo

3
002254

002252
002214

MOV
828

ECPOSX,E.ECPS
gichr,r.ecpr

;SET FOR COMPARE AND REPORT
‘$E§°K g;x;arrznu CORRECT

002252

002212

CMP
gggofl

E.ECPS,T.ECPS
sg

;CHECK IF POSITION CORRECT
:YES - SKIP

Ssc

3§

010544
0105
105

105

010562

885338

002326

12701

0007

177777

020000

Oloesy Oortaie Coie
010572 315 1 005276

309?

Siosx

3094

%
3097

010576

012700

65{;{3

010616

004737

1616

01
01

013737
052737

002260
100200

é@ég 010614 000716
3098

2 004437 332355

01064

8i8§

2%:

oua7§7

35?305

000001

002160

002350

5§:

002220
002220

100000

BITCNT

;BUMP BIT COUNT

:DEC PASS THRU O COUNT

:GO DO LOOP RGAIN

e
MOV

a0
#5276,R1

ACREADY ST - SKIP
iSET coun?zro FINAL POSITION

?gg

g;%pgcposx

EEET sgzxgga TO GO TO O ON NEXT BIT

JSR

R4’ GETREG

PC,RDBIT

;

%GO,

:CLEAR GO

Jgn

ggg

002234

BIC

002220

:GET POSITION

;BUMP POSITION EXPECTED

:IF 0 - SKIP
;PRESET EXPECTED POS TO GO TO ZERO

MOV
BIS

002220

ECPOSX

4s
#-1,ECPOSX

MOV

002350

820000, R1

#1, RO

COUNT

TO NEXT O IN ECC

iSET RO _TO RETURN AFTER ONE PASS

503 DO LOOP AGAIN
MORE

BIT TO SET REARDY

;ézg '611 EISI TER

L.8SI,E.CS1
iGET EXPECT
S]
#ROY!LERR,E.CS1 ;:SET RERDY AND ERROR
E.CS1

T.C51,E.CS!

BRO%
7
géa
;ecu,r.sn

ngoa

ISET

:gcx.s.en

;sggc

g;lgsx CORRECT

;;zer{; ECC HARD ERROR SET

:SET EXPECTED ERROR REG

78:
53 P2 2222222223 22222322223322323223 3222322322223 2222222222222 222223 23

;frssr 14
i K K K K K K

010704

?65535

INC

MOV

U MU NN 0= 5t s s s s st s e =2 () O O

8}8?52

ERROR

BEQ
MOV

92 §igggg
010662 d00a1g
83?384 000100 002174 6%:

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

WWWWWWWWWWWWWWWLWWWWWWWWW

ot ot Pt ot ot Pt ot

3033

000001

86553;

ggqs 81

1§:

338

001406
815787

P9
3088

3089

INC

RKECPS(R2),T.ECPS

SEQ 00&0

016237

140

I0S

MACY1l 30(1046)
02-DEC-77
10:43
PAGE 60
T13
READ DATA WITH 11 BIT BURST ERROR

READ DATA WITH ONE BIT BURST ERROR (PART 2)

CLEAR RK6E11 CONTROLLER WITH A CONTROLLER CLERR.
PUT CONTROLLER IN
DIAGNOSTIC MODE.
ISSUE A READ DATA
OF 400 WORD>; TO AN RK
3n
N
SEC TOR FORMAT

CYLINDER O usso
A
DRIVE CLE
A

T
S.

.
CLOCK THROUGH SEEK
SIMULATE A SECTOR PULSE

CZRGEBO RKB11 DSKLS CTRL PRTS

CZREEB.P11
3124

02-DEC-77 10:21

T14

02-DEC-77

010706

012737

000001

3128

310714

005037

002352

100000 00000C

MOV

3131
313§

010726
13733

00S037
4437

002354
032230

313
3134

3135

3139
313

10720 012762

107
380000
010740
000

01079

PAGE 61

R 1112222221222 222222222222222223322233333222223223 3322222223222 22 233

010704

3{53

10:43

READ DATA WITH ONE BIT BURST ERROR (PART 2)

3125

3%59

000004

MACYLl 3ocxous)

JOS

001234

$&T14:

SCOPE

MOV

#1,STIMES

;300 1 ITERATION

CLR

BSEDES

CLEAR BAD SEC DESIRED

CLR
JSR

HIBITS
R4, LORDRK

-cLsnn Hl ORDER BITS
”L” nscxsrsns
?

0.BYTE

000

BYTE

iBUFF
-400

#CCLR,RKCS1(R2) CLERR CONTROLLER

ch
.scc on
: TRACK

10742
10744

046632
177400

3130

0107S0

004437

3%33

axwé D10754 004437 032014
010760

00000S

JSR

3%32

010762

012700

000530

MOV

¥530, RO

3147

3148

8107

012737

126073

050636

MOV

#126073, 0BUFF+1000

3149
3150
3151
3152

002344
000100 047636
000100

047636

MOV
BIT
BNE
BIS

CCSRC
:SET_SOURCE ro xnoxcnrs ECC IN BUFFER
lBiTB,OBUFF(RO)iTEST
IF ax
100%
:YES- SKIP

3154

011026

012737
0327
001
0S2760

000001

3153

011002
011810
811 16
011020
011030

042760

000100

047636

BIC

#BIT6,0BUFF(RO) ;CLEAR BIT

3}33 010746 000021

giss

RDDATA
031770

JSR

107?3 012737 151052 050640

011036

000403

31?9 gxxoas 0o4437 032274

MOV

100%:

1018:

eurrsn noonsss IBUFF
:WORD COUNT -400

: COMMAND RDDATA
RY, CLRIBF

R4, BLDDAT

;G0 CLEAR INPUT BUFFER

;GO BUILD DATA

:PATTERN 5

;SET INDEX INTO BUFFER

oxsxose OBUFF+1002

;STORE ECC WORDS

#BIT6,0BUFF(RO) ;ELSE SET BIT
101

3158
gxsq
160
3161
3{25

011042
11
011
011052
011054

004437
104004
00S
104006
104007

023334

JSR

JSR
ERR
ERROR
ERR
ERROR

RY, OPSTRT

;START THE OPERATION

3{23

D110Se

004437

023316

JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

JSR

R4, DRSYNC

10
11

; SIMULATE

iMR1 CONTEN g
:CS1 CONTENTS

HERDER PREAMBLE

JSR

R4, DHDCMP

; SIMULAT

ADER SEARCH

JSR

RY, DRGPSN

;GO RERD cnp AND s NC

ERROR
ERROR
ERROR

1B
32
33

:cS1 IN ERROR
AFTER nsnoxuc GAP
:MR1 IN ERROR READING SYNC
:CS1 IN ERROR AFTER READING SYNC

3166

3167
gigg

011066
011070

011062

004437

023740

3170

811072

004437

024276

3171
3172
3};3

011076
011100
011102

104010
104011
104012
104013
104014

3175

011104

004437

3177
3178
3179

011112
011114
O0111le

104016
104032
104033

3176

011110

104015

.
026500

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

RY. DISEEK
Y
S
b
7

‘2’
13
14

sxnULnTE IMPLIED SEEK
csx MISCOMPARE
IMR1
.
i MR2
:MR3
N ERROR
IN ERROR

iMR1 CONTENTS IN_ERROR
ics1 IN Sgnoa AFTER SEARCH
: RKDCYL
RKDA IN ERROR AFTER SEARCH
‘MR1 IN ERRg; G GAP

SEQ 00&1

E%RSEBO Rf&ll DSKLS CTRL PRTS

RGEB.P
3180

181

02-DEC-77 10:21

011120

012737

000001

i ME W 80 B
glgfl 811142

MACY11

(1 046)

MOV

002346
0023s0

011154

10404

01:156
011164
011170
011174

012737
012700
012701
005037

0000
00000S
013672
001

3198
3199
3200
3201
3202
3283
32
3205
3206
3207
3208
3209
3210

811200
011204
011%10
0llele
011
11
11
Ollev¥4
011
011
011
011
011

004737
73?
7
016237
37
1
g;
37
00140
394

031616
0304
000032
000030
3
350
254

3ele

Olle

3ell

811

134

0o02ese2

3216
ggig

011304
011310

012701
000733

020000

3219
3220

011312
011316

005737
001012

001214

127

17777

3e24
gggg

011336
011342

005237
000716

001214

39227

011344

004737

031616

3228
32%3
3e
3231
3232
3233
3234
3235

011350
11354
11362
811370
011376
011404
011406
011410

4437
3737
737
€737
3737
001402
104044
000410

002326

ERROR

032356
Ogg
200
000001
002160

;CLEAR SWITCH

JSR
JSR

PC,RDBIT
PC.ECCGEN

42
43

#S, RO
#13672,R1

{ERR IN ECC
anc
‘ERR IN ECC POS COUNT

:SET COUNT FOR ECCPOS PASS THRU O
:SET COUNT FOR ECCPOS TO O FIRST PASS

;GO READ BIT
: GENERATE E?C

RKECPT(R2),T.ECPt

)
| T.ECPS
RKECPS(R2

CPO

;GET

PATTERN

:GET POSITION

Poéxrxognsxpscrso

cposx,g.scp§
.ECPT, T.ECP
1$

AND REPORT
:SET FOR_COMP
:CHECK IF PATTERN CORRECT
:YES - SKIP

CMP

E.ECPS,T.ECPS

POSITION CORRECT
;CHECK g;

523
BNE
DEC

E}TCNT
33
RO

c;gzsno
BU"PcPIT
- xu ECCPOS
v@*"é;no
;n5$
:DEC PASS

MOV
BR

820000, R1
3s

iSET COUNT TO NEXT O IN ECC POS
:GO DO LOOP AGAIN

BEQ
ERROR

TST

42
2%
43

4s
#-1,ECPOSX
$TMPS

;;r 0 - 2x
RESET EXPECTED POS TO GO TO ZERO

; TEST SWITCH

{ALREADY SET - SKIP
:SET COUNT TO FINAL POSITION

BNE
MOV

53
csa7s Rl

INC

$TMPS

JSR

PC,RDBIT

BIS
BIC
CMP

AND ERROR
;SET READY
£.CS1 :CLEAR
.nov-cenn
GO
E.CSI
:CHECK IF CS1 CORRECT
csx E.CSI
:YES - SKIP

MOV

002220
0022
802220
002

T0 SIMULATE

§TMPS

BEQ
MOV

Ss:

ERROR

CLR

INC

0023s0

:SET BIT COUNT FOR CORRECTION COUNT

MOV

4s§:

READING DATA OR ECC

820, BITCNT

002252
002214

002350

iMR1

;

MOV

cs:

POSITION
DATA nsn?

noanc DATA
ECC Ennon
:CS1 ERROR
AFTE n:no' 3 DATA OR ECC
CT AF . 1 ECC READ
{ECC REG_INC

MOV

18:

C;Eg PATTERN

:LORD EXPEC
:G0 S
ATE

35
36
41

002214
002212

ooz2z212

;LOAD EX

ERROR
ERROR
ERROR

MOV
MOV
3%:

002326

3215 311275 8?é7g? 177777

322§ 811330

#4066, ECPOSX
R4, DREAD

ERROR
ERROR

3190
3191
3192
3193
3194
3135
gigg

81, ECPATX

MOV
JSR
400

I gl
i
olilE 1EaX
em

1401
3;

KOS

_10:43 PAGE 62
02-DEC-77
READ DATA WITH ONE BIT BURST ERROR (PART 2)

JSR
MOV

BEQ

ERROR
BR

o-l ECPOSX

1,R0’

:SET RO _TO RETURN AFTER ONE PASS
EXP POS TO GO TO O ON NEXT BIT
:SET

:GO DO LOOP RGAIN

RY’ csrnsc
L.8SI,E.CS1

s
44
7%

iBUMP SWITCH

:ONE MORE BIT TO SET READY

iGET 'bll REGISTERS
iGET Expscrso Cs1

SEQ 00e2

csESO RKG11 DSKLS CTRL PRTS
P11
02-DEC-77 10:21

§§g§

ii:§§

0114

3239

011430

3%35

011432

3240

oaa7§q
104045

LOS

MACYLl 39(1045) 02-DEC-77 10:43 PAGE 63
14
READ DATA WITH ONE BIT BURST ERROR (PART 2)

000100

002174

100000

002234

3247

3252

4S5

TEST IF ECC HARD ERROR SET

SET EXPECTED ERROR REG

256
3257

011432

000004

012737

000001

011442

00S037

002352

011446

012762

100000

011454
0
265 811uso
883433

02354

011434

264

000000

32230

66
3267
3268
3269

011464
8114
01146
011470

000000
000
000
046632

35;3

011476

004437

031770

011472

001234

CL;RR
nxsxx CONTROLLER WITH A courn

x¥H

1Hgfvz
gogos
12070
"2
ron §°
SECTR ToROL
Sflb
eL
n8$sasgs.
ginULk?E
558¥ ss
A GOOD
400 DATA WORDS, AND AN ECC INDICATING

011506

011502

004437

032014

gg;g

011510

012700

000530

3280

011514

012737

126073

3582
300001 0503:3
3585 og}saa
811§ oiagag
845720 832886
83 636
324 011594 052760 0S0100 047636
3285
ggh

011552
011556

062700
0S2760

000002
000001

3288

011564

004437

032274

3290
3231

011574
01157

104004
104005

011570

004437

MOV

#1,STIMES

;300 1 ITERATION

CLR

BSEDES

;CLEAR BAD SEC DESIRED

MOV

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

CLR

HIBITS

;CLEAR HI ORDER

0
.BYTE
'BYTE
iBUFF

ch RO
§Scron 0
ACK 0
aurrsn nooness 1BUFF

JSR

RY,CLRIBF

;GO CLEAR INPUT BUFFER

JSR

R4, BLDDAT

:GO_BUILD DATA

MOV

#530, RO

;SET INDEX INTO BUFFER

MOV

#126073, 0BUFF +1000

5
050636

023334

047636

ssus n READ DATA

: .o 36363636 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 36 36 36 3 36 36 36 3 36 36 36 36 36 3 3 36 36 36 36 3 3 3 3 3 % % %
$&T15:
SCOPE

R4, LORDRK

288
BIC
BIS
ADD
BIS
JSR

JSR

ERROR
ERROR

BITS
bno “L“ REGISTERS

WORD COUNT

RDDATA

gg;g

LER CLERR.

AN i E
aua T ERROR. v;aér nns
OUNING OF THE POSITION

-400

011474 000021

00000S

OLLER IN o
AGNOSTIC MODE

JSR

177400

READ DATA WITH 11 BIT BURST ERROR

3253
§5§g

3289

#DCK,E.ER

ERROR

3549
3250
3251

3275

MOV

firssr 15

3246

3270

;ecu.r.sn

Y Y Y 1 111212222222 222222222223:323223233121222222222222222222 223

3533

gg;

gés

7%:

3243

gggg

68:

-400

: COMMAND Roonr
’

:PATTERN 5

; STORE ECC WORDS

'151°sah°BUFF*—
TO INDICATE
ECC INERROR
BUFFER
.é:#ezé gxx oaurrtao) SOURCESenrs
11 BIT BURST
oaxrseaxrxa'axt1q OBUFF (ko

#2,.R
;BUMP TO nexr WORD
#8170, OBUFF (RO)
R4, OPSTRT

:START THE OPERATION

:C51 MISCOMPARE
‘MR1
.

nq DISEEK

:SIMULATE IMPLIED SEEK

SEQ 0063

02-DEC-77 10:21

T15

10:43

MOS

PAGE 64

SEQ 0084

READ DATA WITH 11 BIT BURST ERROR
-

;MR2

ERROR

iMR3

JSR

R4,DSECTR

;SIMULATE SECTOR PULSE

104010
104011

ERROR
ERROR

10
11

:MR1 CONTENTS IN ERROR.
:CS1 CONTENTS IN ERROR

3302 oflsa io:oig

EES“

.mu CONTENTS ;‘NTESR
M.

104006

,Ega 011602

3292

011600

104007

'gas

011604

004437

3298 011614
3§§3 011616

ERROR
023316

39 011610 004437 023740

JSR

3 1 011620 004437 024276

33833305 .811238 184814
1
437 026500
33§9
§hg§
1”84015
3308 oiigza ig:gég
éé i:o! 011644 104033

xé 011646 012737 000001 002346

3313

011654

012737

1
3317
3318

11
011672
011674

1040
104035
104036

10404

004066

3314
011662 004437 027176
ggxg gug% ooougg
%‘353 811%'8
3

J%é
3

011702

012737

000020

3329

011726

004737

031616

333¢

3.3-4
3335
3336
3337

3ag§

334

3341

8“735
117

3346
3347

:Sficv SaSfim IN ERROR AFTER SEARCH
:G
AD
5gfl {
1R§N
Ea%a n31
IN ERROR AFTER READING GAP
:cS1 i EM fi?%' '&301:«; SYNC

MOV

JSR
400

#4066, ECPOSX

R4, DREAD

ERROR
ERROR
ERROR

RROR

34
35
36

RROR

MOV

$20, BITCNT

BORML
CLR
s* s '

(R
ogfi BT s

JSR

PC,RDBIT

co RE

?gg

RK'E’CP;.-‘;(REJ,T.ECPS

#1,ECPATX

;LOADEXPECTED PATTERN

?TEBJ’RSEAS"
)
xru.”ls
3 r? N&‘E@‘#‘“E
;
R

iMR1 IN
A OR ECC
1ECC
READING
:CS1 ERROR AFTER REROING DATA OR ECC

;Egs REG énc
IN ECC

PAT

ST AFTER ECC READ

iERR IN ECC POS COUNT

SET

OUNT FOR CORRECTION COUNT

002214

u;?i
8?3; 53&8 002252
11794 3537 7 002254 002214

MOV
CMP

Egpggx,s.chs
E.ECPT,T.ECPT

28'!
r&S éons
E NSEPORT
cugcx gr
PATTERN CORRECT

ggz

S.Ecps,r.scps

icugcx grPOSITION CORRECT

xgc

gncm

gunpchtrncguuzmo

,o
mnu o co
UNT
i IF o 2«;9
iPRESET
ECTED POS TO GO TO ZERO
:SET COUNT TO NEXT 0 IN ECC POS

011772
011774

1401
104042

000030
UL

§i 776 gfiiz 7

002252

oiaoiq

002326

1 ogé

ooseo

e
BisRl
el
344
01
3
3345

3s:

; SIMULATE _HERADER SEARCH

JSR
MOV

onw

7
xgg

002326

RY, DHDCMP

; SIMULATE HEADER PREAMBLE

14
RY, DRGPSN
15’
16
SS

ERROR

11704

RY, DRSYNC

ERROR
ggson
55582
ERROR
MOV

002350

1833H£

3
Giifle Bie7Rc GRGRRS
359 8117%5
861214

—

02-DEC-77

gxaosz

012024
012032

805’09

012737
012701

177777
020000

002212

1$:
2s:

002350

BEQ
ERROR

ERROR

PC ES? N
: GENERA E
RKECPT(R2),T.ECPt
18
42

5
DEC
RO
BEQ

MOV
MOV

#-1,ECPOSX
#20000, R1

Pnnenn

én n

xpz

Re¥SOYICIS 250l

. e

TSN

ZRG6EB.P11

MACY1l 30(1046)

CZRGEBO RKB11 DSKLS CTRL PRTS

oo1214

1ST

$TMPS

002220

JSR
MOV

000100

002174

100000

002234

BEQ
ERROR
BR
BIT
BEQ
MOV
ERROR

gy oot

EFS8EREroRn

JSR

BIS
BIC
CMP

o S

" 00ce20
002220
002220

g S
S

n
o

MOV

002350

104045

6%:

SEQ 00eS

;GO DO LOOP AGRIN
; TEST SWITCH

5§
#5310,R1
#1,R0

; ALREADY ;ET - _SKIP
;SET COUNT TO FINAL POSITION
;SET RO _TO RETURN RAFTER ONE PASS
:SET_EXP_POS TO GO TO O ON NEXT BIT
;BUMP SWITCH
;GO DO LOOP AGAIN

PC,RDBIT

EET RERDY
ONE MORE BIT TO

#-1 EcPosx
$TMPS

GET ’'611 REGISTERS
RY’ csrnec
GETEXPECTED CSl
Csx Sl
ERADY AND ERROR
RDY csnn .CS1
CERR GO
E.CS1’
;CHECK IF CS1 CORRECT
c$1 E.CS 1
i YES - SKIP
s

44
78
8ECH, T.ER
7%
#DCK,E.ER
45

;;gsv §; ECC HARD ERROR SET

:SET EXPECTED ERROR REG

7%:

[

NOS

PAGE &S
02-DEC-77
_10:43
READ DATA WITH 11 BIT BURST ERROR

MOV

o
o

[{eretwteteted
el totudyuetet ettt

0000000000000

(1 046)

4s:

1) €0 ) (0 (W W W W
L I W w
W WWWWGL
e WWW
000D N
N
N
o PO
N
W

—

(=]

MACY1l

000733

0000000

CZREEBO RKB11 DSKLS CTRL PRTS
CZR6EB.P1
02-DEC-77 10:21

o 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 3¢ 3

00000000

RNOsnLNeR 20 RO

n
n
n
£

—

NN R R

*I#******#*

’irss 16

RERD DATA WITH 12 BIT BURST ERROR

WITHRHOSETROLLER CLERR.
ISSUE A READ DATA
og
sxcn
06 IN 26 SECTOR FORMAT
CLOCK THR oucfi SEEK
A SECTOR PULSE, A
S, SAQULRTE
s A WORDS
AND AN ECC xnoxcnrxnc
VERIFY THE COUNTING OF THE
on.
gOS?T?ON REG?STER MAKE SURE DATA CHECK, ECC HARD,
CLEAR RK611 CONTRO
PUT CONTROLLER IN
WORDS
00

AND CONTROLLER ERROR SETS.

o 3636 36 36 36 36 36 36 36 36 36 36 36 36 96 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 6 36 36 36 36 36 36 36 36 36 36 6 36 36 36 6 36 36 3 2 %

000004
012737

000001

001234

005037
012762

002352
100000

000000

005037
004437
000000
000
D00
046632
177400
000021

002354
032230

004437

031770

tit1e:

SCOPE
MOV

#1,STIMES

;;00 1 ITERATION

CLR
MOV

BSEDES
#CCLR,RKCS 1(R2)

;CLEAR CONTROLLER

CLR
6SR

HIBITS
R4, LORDRK

CLERR_H; ORDER_BITS

.BYTE

i ECTOR O
; TRACK O

.BYTE
IBUFF

=400
RDDATA

JSR

R4,CLRIBF

;CLEAR BAD SEC DESIRED

LOARD

LTM

REGISTERS

CYLI
NDER O

; BUFFER RDDRESS IBUFF
-400
:WORD COUNT
; COMMAND RDDRTQ
;GO CLERR INPUT BUFFER

CZR6EBO RKB11 DSKLS CTRL PRTS

CZRGEB.P11

02-DEC-77 10:21

MACY1l 30(1 046)

Ti6

3404

_10:43

BO6

PAGE 66

SEQ 0066

READ DATA WITH 12 BIT BURST ERROR

;GO BUILD DATA

JSR

R4, BLDDAT

gg 012236 012700 000530
10 01224
12737 126073 050636
0S0640
127
1
1
11 112264 1 60 1052
344
636
3414
xagg
100 047636
1S 01
1 047636
7
1? 1

MOV
MOV
MOV
MOV
BIC
BIS
ADD
BIS

;SET INDEX INTO BUFFER
%530, R0
#126073, OBUFF +1000
;STORE ECC WORDS
8151052 OBUFF+1
36 i ;ccghc
TO INDICATE
ECC INERROR
eusren
11 BIT BURST
:CREATE
) SOURCE
(RO
0BUF :SET
9!BIT11, OBUFF

3-450
3421

JSR
ERROR

0S 012230 004437 032014
012234

00000S

i
1 gxua 2
000002 047636
:mg 012320 004437 032274
81533-4
012330

004437
104004

023334

453 015334 104008

iPATTERN 5

$B1T6:BIT12!BIT14, 0BUFF (RO)

#2,R0
; BUMP TO NEXT WORD
881 TG, OBUFF (RO)

BIC
JSR

#BIT1,0BUFF(RO) ;MAKE IT A 12 BIT BURST ERROR
;START THE OPERATION
R4, OPSTRT

ERROR

R4, DISEEK
Y4

:SIMULATE IMPLIED SEEK
:C51 MISCOMPARE

iR
i MR3

%‘aag 3123% mwoo“?

ERROR
JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

12344 004437 023740
3353
§15350
104010
33::3«11
12352 104011

JSR

R4, DRSYNC

JSR
ERROR
ERROR

RY, DHDCMP

AT
R PREAMBLE
“”%
5"?“”;
N ERROR
csx CONTENTS IN ERROR

g;:g; 012340 004437 023316

ERROR
ERROR

3432

012354 004437 024276
3433
§xaaso
104012
3434
012362 104013
gwqg
M

012364
12

104014
004437

3439

012374

10’
11

12
13

;
SIMULAT
n SEARCH
iMR1
CON
r'fi
N ERROR
icsl INE
AFTER SEARCH

ERR
JSR

14
RY, DRGPSN

mwo:x‘s

ERROR

:cS1

3443 012402 012737 000001 (02346
3444 oxgm 012737 004066 002350

MOV
MOV

81 ECPATX
uOss ECPOSX

; LOAD Exrsc PATTERN
:LOAD xpsgr D Posgxofl

ERROR

:NUMBER

:ECC REG mconnscr AFTER ECC RERD

‘ERR IN

3438 81233?3 104015

3440

026500

ERROR

oxeagg 1330
3335 0124
104033
3445

3446

012422

47 012424

004437
000400

133034

027176

ERROR
JSR

48 0l242e
104035
012430 104036

ERROR

3449
4S50

012432

104041

ERROR
ERROR

g:gg

124

104043

ERROR

3451

3454

3455
3456
457
3458

—_———

02-DEC-77

gxsu'g

312%0
12422
0124
012456

mugqa

012737
015700
012701
00SO

ERROR
000020
000005
013672
001214

002326

MOV
MOV
MOV
CLR

:RKDCYL OR RKDA IN ERROR AFTER SEARCH
;GO RERD caP smc

iMR1 xNE

IMR1

DREAD

35
36

#20,BITCNT
#S, RO
#13672,R1
§TMPS

:cs1 ININ

NG GAP

Rn:nomccnp

nenomc SYNC

;GO SIMULATE DATA_READ

iMR1

T?
smu#ms

ADING oa A OR ECC

ECC
mgn EADING DATA
:CS1 ERROR AFTER READING DATA OR ECC

ERR IN Ecc
PAT CALC.

ECC POS COUNT

i e BIT oum FOR CORRECTION COUNT
1SET COUNT FOR ECCPOS PASS THRU O
:SET COUNT FOR ECCPOS TO O FIRST PASS
:CLEAR SWITCH

CZRGEBO RKB11 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21
3460 oiz%a oow;
1616

37% Ei
8153

3335; oiasas

.fczg%

g:“

002214

%8 002212

3&9 8855515 -

3:.'28 Blfig M 002252 002212 1S:
75 i
002326
2s:
3%;‘3'

MACY1l 39(10%) 02-DEC-77 +o=u
1k
READ DATA WITH
3s:
}gg

01§§

3:0'75 Bf
3%;;
_;’378 i1

g:;g
g::

woosao
wo;

15;8
% 002350
12701

012¢
000733
E{ 74
5?5 001214

634685 gloias oxa;g
glel pioow
:lnqu 002350
ggz gxfi 16
3489
990
3491

4s:

CO6
P
BIT

aerSfie;
T :cp'r
cE? m T
RKEC
v

gens

ET ron c
P
Eo3X,E.
552:? :guecx
xr 82' Rfinnuo
CORRn c

E QROR
inc

a
z.scps,r.scps
BITCNT

; BUMP

BEE
BEQ
MOV
MOV

S
4s
#-1,ECPOSX
#20000,
R1

;
o COUNT
:
,Aa;
CTE POS
T0 GO TO ZERO
i SE oun
T O IN ECC POS

DEC

BR
ggg

Ré

3s
g;ms

MOV

:SET EXPECTED ERROR REG

gggé

012712

ERROR

012714

104045

100100

002234

N ECCPOS

;sc Xp POS
FoS TO GO TO O ON NEXT BIT

gs
3“33
3-439
333%

012737

gg zfim
ro zsno

LT
o-lgcposx
5R

PC,
RS
EE%EG
L.8SI,E.CS1

012704

P
cuscx IF POSITION CORRECT

;GO
TEST SWITCH

0n&fiflafie&*s
-Eo“”ooI LSoSAGAIN

nong

]
R
MOV
g{sggg
sgnon
E,Ié

3500

SEQ 0067

MOV

?gg
MOV

01
7
$:
013632
OO4aTr
O3e3ee
.
012636 013737 002260 002220
12644
737
2220
1
7
1
2220
oi
0017
160 002220
§ies“;g“
0
oi‘g;u?g omgéz 000100 002174 6S:

7
ST ERROR
ag A

TT
T RERDY
i:GET
OFF "Bl
Eécxs?ss‘
EXPECTED CS1
ongvcsnn s cS1 ;EsrEARm»:ng
AND ERROR
G
csxE.CS1
%fs:cx gugsx CORRECT
w
;gcn,r.sn
, TEgT IF SEcI:g HARD ERROR SET
ogcmecu.s.en

78:

3508

; nuinuuuiuuiuulunnnnnnuulnnuninuunln

508
2%

5«

m A
BA

3511
3512

¥
S
5:

cvunozn
AND onx
Lsm
ns

gogg
HeA

3515

‘%

POSITION REGISTER

gggg

ggia

READ DATA WITH 23 BIT BURST ERROR

A uoaos

CLEAR

?C
sgw. si
PULSE A
mcgfifir
Noxcmmc

mxs sune om cm—:cx scc Hnno

CTRL PRTS

EEREERTPTT®! B2%bEc -77 10:21

MACY11

;;

EREEHgfl¥ 3%
82 W
&z

00000000

000001

001234

0023sSe
100000

000000

10:43

AND CONTROLLER ERROR SETS.

*5717

SCCPE

MOV

#1,STIMES

;300 1 ITERATION

CLR

BSECES

;CLEAR BAD SEC DESIRED

MOV
CLR

0023S4
032230

JSR

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

HIBITS

R4, LORDRK

;CLEAR HI ORDER BITS

:LORD "L* REGISTERS

:.BYT
BYT

031770

JSR

RY,CLRIBF

;GO CLEAR INPUT BUFFER

032014

JSR
g

RY, BLDDAT

_BUILD DATA
;GO
:PATTERN 5

MOV

#530, RO

;SET INDEX INTO BUFFER

K 0

1BUFF
-400
RDDATA

E)(JE:

PAGE
READ DATA ux*u 23 BIT
auasr ERROR
02-DEC-77

!illlllllllllllll!ll!!llllll!!!Ill!!llllIlllllllllll!lll!illlll

MOV

002344

MOV

050640

MOV

aurrsn
ss 1BUFF
i WORD
C
connnuo noon n

73,

osa

0BUFF+1000

UFF+100a

;STORE ECC WORDS

:SITss3}¥{§|8?9F¢(gguhsr senrs 11 BIT BURST ERROR

TO INDICATE ECC IN BUFFER

;MAKE IT A 23 BIT BURST ERROR
'SI;?;°885§}“8&)
T WORD

R4, 0PSTRT

nq DISEEK
s

ROFN Orro RZ8

Ww
WWww
WWWWw

Pt wtedagetad et

ety

000

v
un

ettt

0000

013074

0000

RABRRRRRRRAR
L£E
L
FhE W SBBYRRE

000004
012737

;; ar—uu»—uw-h [

351

3915

30(1046)

104011
1 4012

184813
004437
104015
104016
104032

026500

STRRT THE OPERATI

nx I"fihéeo sssx
3&1

;nn

RY,DSECTR

; SIMULATE SECTOR PULSE

?3'°RSYNC
11

QEBLE
n&"utFs#$“°§~ER
ERROR

STSR S

iCS1 CONTENTS IN

8360 SERSRDgFIEREREORAFTER SEARCH

o8 .¢ coe
REBING
IREEion
=
RROR READING SYNC
iMRI IN

R4, DRGPSN

MACY11l 30(1046)
T17

ey g

002346
0023s0

EXROR

LbY,

81, ECPATX

?gsg

18:

002326

737

001214

010041
0001
1777277
001214

8 2R

Pty

§33§§u

£
=]
n

SRS

W
NNNE
[

104044

808
=1=1
S0
—-00

177777
020000

482

§éo73
701
733

2%:

002350

0023s0

;CS1

IN ERROR AFTER READING SYNC

CTED

PATTERN

ERROR
ERR
ERROR
ERROR
ERROR

34
35
36
41
42

;nnx
N
ADING DATA OR ECC
1ECC ERROR RERDING DATA
:CS1 Egnoa AFTER READING onrn OR ECC
1ECC
REG INC
CT AFTER
ECC READ
:ERR IN ECC PAT CALC.

;

R 2:

T0 SIMULATE

:ERR IN ECC POS COUNT

MOV

#20,BITCNT

;SET BIT COUNT FOR CORRECTION COUNT

CLR

$TMPS

:CLEAR SWITCH

JSR

PC,RDBIT

MOV

RKECPT(R2),T.ECcPt

%35
CMP
Eggon

cpo3x5 E
E
2

’ggT
FORIF 532#¥EEN
e ExgfigTEEPonT
:CHECK
CORRECT
:YES - SKIP

CMP
BEQ
ERROR
INC
DEC
BNE
DEC
BEQ
MOV

E.ECPS,T.ECPS
2%
43
BITCNT
R1
38
RO
4s
#-1, ECPOSX

;CHECK
1YES -

:BUMP
BIT COUNT
:DEC COUNT TO ZERO IN ECCPOS
iNOT YET ZERO - LOOP
:DEC PASS THRU O COUNT
iIF 0 - SKIP
;PR;SET EXP$CTED POS TO GO TO ZERO

:GO DO LOOP RGAIN

$TMPS

; TEST SWITCH

#10041,R1

:SET COUNT
TO FINAL POSITION
iSET RO _TO RETURN AFTER ONE PASS

JSR

1ST

%S, RO
#13672,R1

PC . ECCGEN

#20000, R1

5§

MOV
INC

s-1 EcPosx
P

JSR
JSR

PC,RDBIT
R4’
GETREG

MOV
MOV

:SET COUNT FOR ECCPOS PASS THRU O
:SET COUNT FOR ECCPOS TO O FIRST PASS
;GO READ

3IT

-csnengge Ecc

sGET PATTERN

nx cpscna)'T.ECPS

BNE

002220
00ee20
002220
002220

SEQ 0069

838
E§$§c158 POSITION
GO SIMULATE DATA READ

MOV
4§:

PAGE 69

#4066, ECPOSX
R4, DREAD

MOV

§§§§§§ 002es2

EOBE

IV
JSR

MOV
MOV
38:

o
28

ot ot Pt ot ot

§:

et s ot s P

Pt| el el etaiaicicicicliaiaietai

O00D000O00000OOOO000000

002326

10:43

R f) DATA WITH 23 BIT BURST ERROR

s o

0000000

-DEC-77

400

2
NOC EROTRES

WWwww
[NINIA]
o——-o—o—&-’&-’gnnh

0000000000

027176

0000

[yeretweretetuteoed

Hgg

b 2]
£ 880

W
N
n
w

ZORY

DONCNLWN—-O

35t

ot ot e

e 5t Bt B B

3576

00000000

!fifiigFERERFFRESHadan F‘g3

357,
357

o ;

CZRGEBO RK611 DSKLS CTRL PRTS
02-DEC-7 7 10:21
CZRBEB.P11

iSET

Ecgv

ITION

IF POSITION CORRECT
SKIP

COUNT

TO NEXT O IN ECC POS

: ALREARDY §er - SKIP

:SET EXP POS TO GO TO O ON NEXT BIT
;
SWITCH
:GO DO LOOP AGRIN
;ONE
iGET

MORE BIT TO SET READY
’611 REGISTE

MOV
BIS

L.8SI,E.CSI
{GET EXPECTED CS1
#ROY!LERR,E.CS1 ;SET READY AND ERROR

CMP

T.C81,E.CS1

BIC

ERROR

%GO, E.CS1

:CLEAR GO

:CHECK IF CS1 CORRECT
:YES - SKIP

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6 EB.P11
3628

013426

£
ooy
§1
363
36
13:46
3633
3634

MACY11 3? (1046)

0004
°3f739 000100 002174 68:

100100 002234
8?2957
104045

SEQ 0070

PRAGE 70

BR
gfig

: TEST IFsgc HARD EPROR SET

73
;gcn,r.sn

#DCK'ECH,E.ER sE?sxpscreo ERROR REG
MOV
45
ERROR

5 «lllIIlllllllillllllll!!ll«lll!lll!ll!ii!lll!llll!lll!lilliillll!

CLEAR RKG11 csnrnthsnugrn
A CONTROLLER CLEAR.

OF gge

CYLI
AND DR

%
H
012737

000001

013460
013464

005037

012762

002352

0{3472

00S037
883335

002354
032230

3660
01350S
362é
8135
36
1351
3663
013512
3664
013514
S
bb
3667
013520
3668
013524
3669
3670
3671
013526
3672
01353¢
3673 013540
3674
013546

o4 E3s

013554
1
13564
013572
813574
013602
013602
013606

ISSUE A READ DATA

szcroa FORMAT

» CL?SK THROUGH SEEK
A SECTOR PULSE, A
IHULR

aoflgsszss

GOOD u;

?o En

ECC xngxcnrxnc

VERIFY THE
SURE DATA
nsotos Té g§§n. nnxs
counrxnc
CHECK AND CONT
c?RE

: Y I 2211222 2222222222222 22233222322323222322232222222222322 22222 27

000004

000

PUT CONTROLLE

¥
x

£
HiEe
3659
013504

READ DATA WITH 1 BIT ECC WORD ERROR

;;
¥

452
3651 81

3675
36;9
36
3678
3679
3680
3681
3682
3683

_10:43

READ DATA WITH 23 BIT BURST ERROR

7%:

013450

3638
3639
3640
3641
3b4e
3643
3644
364S
3646
3647
3648

3652
3653
3654
3655
ggsg

02-DEC-77

FO6

100000

001234

t&t20:

SCOPE
MOV

#1,STIMES

;300 1 ITERATION

CLR

BSEDES

;CLEAR BAD SEC DESIRED

CLR
gsn

HIBITS
R4, LORDRK

cLEnn HI ORDER
B
azcxsrsns
ch ggt

MOV

000000

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

.BYTE 0

i 5;5 ’
-400
RODATA

179338
21

UFFER
SS IBUFF
u
U?'E
connnno noonrn

004437

031770

JSR

RY,CLRIBF

:GO CLEAR INPUT BUFFER

004437
0000

032014

JSR
g

R4, BLDDAT

:GO_BUILD DATA
:PATTERN 5

MOV

oxas
?3,oaurr+1obo
#151052. OBUFF +1002

001002
012737
126073
012737 151052

063
0S0640

327
001
gggzgg

0127

812747

000001

0001
000100

76
047636

042760

000100

047636

004437

032274

023334

MOV
MOV

002344

MOV

BIT
BNE
: S&S
i8?§:

BIC

JSR

ISR

é ; CSRC

T INDEX INTO BUFFER

;STORE ECC WORDS

;SET_SOURCE TO xuoxcnrs ECC IN BUFFER

#8176,
OBUFF (RO) rssr IF BIT SET
1oo¥
YES
- SKIP
rg{ss.oaurr(RO)ELSE SET BIT
#BIT6,0BUFF(RO) ;CLEAR BIT

RY, OPSTRT

R4, DISEEK

:START THE OPERATION

:SIMULATE IMPLIED SEEK

cznsseo axsu DSKLS CTRL PRTS
02-DEC-77 10:21
CZR&EB.P11

GO6

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 71
READ DATA WITH 1 BIT ECC WORD ERROR
Tz0

3e8e Siéii‘.‘ {8‘-388‘;‘,

ESSQ.E

ggg%qo 013622 004437 023316

383 013658 104003
3535

1
3%
gggg 013634

pO4437

104010
104011

023740

;C 1 MISCQMPARE

;

ERROR 5
JSR

RY,DSECTR

JSR

RY, DRSYNC

JSR

10
11

RY, DHDCMP

‘MRl CONTENTS IN ERROR
:CS1 CONTENTS IN ERROR

1214

COMTENTS
E%OR AFTER SEARCH
Sn ngTNINERROS._
RKDCYL
:[nRl

ERROR
ERROR

437 024276

SEG 0071

; SIMULATE SECTOR PULSE
:S1 nuuar; HEADER PREAMBLE

ARCH

$% 8135%
Bixi iowle
18301-4
ggg

Rron
ERROR

Dk B3
o
013662 104033
3;

= 33L
ERROR

8] fu1 Efi'fig
R grd
pib n:nomc
e SYNC
o
iCS1

MOV

:LOAD EXPE

00 piem sou omeoo

o LS

] 4

3706

013664

012737

000001

002346

0{3572 oxaza; gg;?;g 002350

g3710 81%
%-4
0l
104034

aqbggtsgposx
34
35
36
42

3712 013712

104036

OR
ERROR
ERROR

714

104042

ERROR

3711 0137:'1 1u3 104035
3713

813?1-0

g;ig

013720

3717

3718

013716

0137

xoqg:;

ERROR

104043

012737

000020

3719
3137%5 012700 000005
3720 013734 01270;
13672
3;55 013740 00S03
3723

g?g

3726

3727
7
3729
3;30

013744
1

13784
01

13770
13774
014002
§i~mig

031616

152

oé

37
00140

14014 6239"

339
Olu0sq 109093
3735 014026 005237
3739
373
3738
3739

814035
140
014036

014040

385305
134
0053
001406

PATTERN

,néoono EXPE?: Pgsgxon

:ru&n
iMR1 é"
ECC
;ch

:ECC

“? ATE

noxuc onm OR ECC
RROR onS:29% gnm OR ECC
REG éuc

‘ERR IN E ¢ PAT

CC READ

:ERR IN

ECC POS coum

MOV

%20, BITCNT

COUNT FOR CORRECTION COUNT

CLR

#S.
RO
#13672,R1

.SET BIT

§TMPS

:CLEAR SWITCH

JSR
JSR

PC,RDBIT
PC scg N

;GO READ BIT
:
GENERATE égc

MOV

38:

ERROR

MOV

1214

004737
7

012

002326

81 ECPATX

?g;

G0
G e SNE

1SET
coung FOR ECCPOS PASS THRU O
:SET COUNT FOR ECCPOS TO O FIRST PASS

002214

MOV

RKECPT(R2),T.ECPt

ggg
002252
264 002214

MOV

INC
CMP
aggm

Ecposx
CPOSX,E.ECPS
E.ECPT.T.ECPT
&g

;
sgéénon XPECTED
OMPARE
AND REPORT
;CHECK IF PATTERN CORRECT
:YES - SKIP

e
.
INC

&
BITCNT

Js.
=e
-BUHP BI7 COUNT

BEQ

4§

002212

MOV

002252 002212 1S:
002326

2%:

Enp

DEC
BNE
DEC

RKECPS(R2) . T.ECPS

E.ECPS, T.ECPS

Rl
33
RO

;

PATTERN

:GET POSITION

;cuscx IF POSITION CORRECT

, cogm
T0 ZERQ IN ECCPOS
‘N
LOOP
,osc PASS mnu "0 COUNT
‘IF 0 - SKIP

CZRGEBO RKb11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

3740
374

014042
14050

012737
8687%5

177777
020000

014
737
3;:5 quSES
33?012

001214

3794

243 814853
Bis784 BABBAT
78 fue
Gists
§?51 fat
¢
g?gg

1u1ia

3754
3755
3756
3757

014120
814125
014134
01414

013737

g?gg

3350
3761

14114

141

042737
3737
14

i:isu 6003?3

014156

032737

MACYIL1

30(1046)
Te0

02-DEC-77
10:43
PAGE 72
READ DATA WITH 1 BIT ECC WORD ERROR

MOV

0023s0

ogoboo R1

.szr COUNT TO NEXT O IN ECC POS

ggg

g;nps

TEST suxrcu

203
énc

#10G16,R1

.fHPERécposx

§E¥gg:qs
§§HP
?85£2¥3&:25$02§ 028N22$Saxr

73RR

EE?AEG

MOV

002350

S§:

MOV

BIS
gfi;
Esg

2
100200
1
002160

000100

6S:

Eizi 8 8?5;3; 100000

sPRESET EXPECTED POS TO GO TO ZERO

MOV

BR
Ys:

#-1,ECPOSX

SEG 0072

BR
BIT

aso

:GO DO LOOP RGAIN

POSITION

:GO

DO LOOP AGAIN

i Obe MR

RiliifeRs T READY

onov-cE
RR, s cs1 iGET
;se EXPECTED
Enov ANDcs
ERROR
Ggéf E551 HE
c cx §x SS1 CORRECT
69
44
73
8ECH, T.ER

#DCK,E.ER
45

T IE isc HARD ERROR SET

EXPECTED ERROR REG

3;22

014174

3766
3767
3768
3769
3770
3771
3772
3773
3774
3775
3776
3777

014176

3780

014176

000D

gxuaoo 312737 000012

001234

MOV

#10.,STIMES

;;00 10.

3783
3 g

014206
014212

005037
012762

002352
100000

000000

MOV

CLR

BSEDES

;CLEAR BAD SEC DESIRED

814253 005037 002354

142

00S037

002344

oi:eao

004437

032230

CLR
CLR
JSR

ECCSRC
HIBITS
RY, LORDRK

CLERR ECC SOURCE
Lsna HI ORDER BITS
niflg&
necxsrsns

814237
014240
014242
014244

000
046632
1774900
010021

.BYTE
BYTE

O
O

3778

378

3;99

3739

3791
3792
3793
3794

ERROR

104045

78:

, X223 232222322332323232323232222 3323222233322

firssr 21
;.

‘¥

°°°988

22 2222222222222 2

CLEAR RKG11 CONTROLLER uxru A CONTROLLER CLERR.

PUT conrn

LER xu oxncuo

ISSUE A READ DATA

X
x

1 uogbso
cron rnnr ol
nnb "05"En r2
uonog
m sscron PULSE

aas uaxt EN

0l4s%

18 BIT NPR WRITING OF MEMORY

Y THAT THE WORDS

RLY xn MEMORY .

glsrll!ggaggllIlllllll‘lilllllllll!lllll!llll!l!lllll*llll!!il!il
:

iBUFF

-400

ITERATIONS

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

RDDATA! CFMT

eurrsn noonsss IBUFF
WORD COUNT

-400

connnno RDDATA!CFMT

CZREEBO RKB11 DSKLS CTRL PRTS

CZReEB.P11

02-DEC-77 10:21

MACY 1 30(1046)
T2l

106

SEQ 0073

PAGE 73
10:43
02-DEC =77
18 BIT NPR WRITING OF MEMORY

4;9

014246

004437

031770

JSR

R4Y,CLRIBF

;GO CLERR INPUT BUFFER

3798

014

004437

032014

JSR
3

RY,BLDDRT

;GO_BUILD DATA

032274
023334

RY,GPSTRT

;START THE OPERATION
; SIMULATE IMPLIED SEEK
;CS1 MISCOMPARE

3799

014

000003

3802
3803

014260
014264

004437
004437

390;

014274

006

3804
3805

014
014272

104004
104005

sfl,DISEEK

;PATTERN 3

; MR1

;MR3

iMR2

éé%% 014300 004437 023316

R4,DSECTR

; SIMULATE SECTOR PULSE

12 014310 104010 o0
3g}§ xuaxg 104011
:

R4, DRSYNC
10
11

; SIMULATE HEADER PREAMBLE
;MR1 CONTENTS IN ERROR
;CS1 CONTENTS IN ERROR

3807

014276

S
]

104007

HEADER SEARCH

3816 gwaao 104012

024276

RY, DHDCMP

; SIMULATE

0143
3821 814
1 437
o?s
£
s e
3824 3»4333
133033

026500

R4, DRGPSN

15
16

:GO
READ
YNC
GAP
Sgon“gnsxm
Enmgfu
AFTER READING GAP
:CS1 IN ERROR

:CS1

ERROR

#0,ECPATX

;L% E

TED

3815

014314

004437

3817
ggig

gxuaaa
14324

104013
104014

3820

37
Bliih Blery GOCE
3859 01436
3826

014342

12
13
14

012737

002346
002350

RSO
’

£ gl ey
3935 143?8 gwoas
3833
3834
3835

014372
814374
014376

3841
3842

014410
gxuwzu

012704
037

014432

021011

18:

3848
3850
3851

014436
014440
014442

005303
001424
005205

4$:

auc SYNC

READING SYNC

PATTERN

3
T0 SIMULATE

ADING DATA OR ECC
ngsonm
ADING DATA OR ECC

#0BUFF, RO
#IBUFF |RI

:SET POINTER TO GOOD DATA
:SET POINTER TO INPUT DATA

:ECC REG_INC
:ERR

CT AFTER ECC

IN ECC POS COUNT

;SET ERROR LIMIT COUNT

;CLERR ESCAPE

§THP?7

;cgm ERROR REPORT SWITCH

(RO), (R1)
2%

;COHPQRE DARTA

#40,R3
RS

3847

3848 gwm 001005

AFTER

:ERR }u ECC PAT CALC.

SESCAPE

343 014459 012903 000590
%:‘s’ 014430 oésoog

2nun§="%r
IMR1 IN Ssnon

$10. ,RY

000012
001236

g
1ECC Em
AFT
:CSI ERROR

=
3838
014400
012700
04763
33333 014404 01273? 0%533

:MR1

34
5
6
41

104041
104042
104043

:MR1 CONTENTS IN_ERROR
AFTER SEARCH
icS1 IN E
:RKDCYL OR RKDA IN ERROR AFTER SEARCH

COMPARE LIMIT
:SET
:CLEAR WORD COUNTER

; SKIP IF
NOT EQUAL
;ELSE DEC WORD COQN; LIMIT
0 - SKIP TO EXI
;IF

;BUMP WORD COUNT

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21

3852
gggg

DIYY44
14446

3855
ggg;

0144
144

3esg
385

1M454
14460

JOb

MACY11 30(1046)
02-DEC-77
10:43 PAGE 74
T21
18 BIT NPR WRITING OF MEMORY

022021
000771

304
1417
011037
011137

386?

014464

010537

3863
3864
3865
335

014479
014476
014502
014504

001004
005237
104037
000754

3868
gggg

014
014510

104040
000752

e;é

014512

2%:
001162
001164

001166

55&3 014470 00S737 001220

CMP
BR

(RO)+, (R1)+
18

:BUMP DATA POINTERS
:LOOP

DEC
BEQ

RY
3

;ogc ERROR LIMIT
:IF 0 - SKIP

MOV
MOV

(RO , SREGO
(R1) SREGI

:GET GOOD WORD FOR REPORT
:GET BAD WORD

MOV

RS, SREG2

iGET WORD NUMBER

BNE
INC
ERROR
BR

33
§TMP?
37
4s

:SKIP IF NOT O
{ELSE BUMP STMP?
:REPORT FIRST ERROR LINE
1SKIP

1ST

001220

3%:

SEQ 0074

STMP?

ERROR 40
BR
ys

; DECIDE uuxcu ERROR REPORT TO USE

;REPORT ALL OTHER LINES
1SKIP

5%:

3873

i U U006 0233

3876

3880
3881

sg SgnzgéL
E B&§

3879

CYLINDER O

3882

VERIFY THAT
cbnnnnoCOHPLETES WITHOUT ERR

gg;g

firssr 22

gg;g
§“EI|§"0

3885

3eag

-t
Sx
014512

000004

012737

000001

001234

14553

86275;

100000

00000U

391
3892
3893
3894
gges
96
3897
3933

gxqsua
014544
014550
014554
gxwgs;
01455
014560
8145be

005037
005037
004437
000000
000
000
046632
177400

002344
002354

338%

014566

004437

031770

3903

014572

004437

032014

3907

014600

004437

032274

5559 814522 005037 002352
3890

3300

gggg

0145

14564

014576

5037

002344

032230

010021

000004

CLEAR RKB11

CONTROLLER WITH A cour

0 2

LER CLEAR.

:%ssucRsno DATA

HERO
TOR
LOCK
AND
DRIVE
CLEQR
n
sSsncEs
gIHULRTE
A ss on
gfiLSE
A GOOD HE
A WORDS, AND A GOOD

: R 2222222222222 2222222232323333323222323222223223 232222232222 22 22222 3 2

014514

3889

0606 0600 36 200 00 06 0606 06 00 0606 30000 6 06 06 0606 000000 360030

18 BIT READ DATA WITH NO ERROR

t&T22:

SCOPE
MOV

#1,STIMES

;;00 1 ITERATION

#CCLR,RKCS1(R2)

;CLEAR CONTROLLER

CLR

BSEDES

CLR

ECCSRE

MOV

CLR
CLR
JSR
0
.BYTE
BYTE
1BUFF
-400

ECCSRC
HIBITS

R4, LOADRK

RDDATA!CFMT

;CLEAR BAD SEC DESIRED
:CLEAR ECC SOURCE F 3G

:CLEAR ECC SOURCE
,cLEAR HI ORDER BITS
LOAD "L* REGISTERS
chxnoen 0
sec OR O
TRACK O
aurrsn noonsss 1BUFF
:WORD COUNT
-

connnuo RDDATA!CFMT

JSR

R4, CLRIBF

;GO CLEAR INPUT BUFFER

JSR

RY, BLDDAT

;GO BUILD DATA

JSR

R4, OPSTRT

; START THE OPERATION

:PATTERN

CZREEBO Rxsxx DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21

3908

014604

004437

910

014612

104

3909

14610

104

023334

391
ggi

814514
14616

104C
10400

ggig

014620

004437

023316

391;

014624

014630
014632

004437

023740

3920

814534

0044

024276

3925
3926
3927
3928
ggga

014646
014652
014654
014656
014660

004437
104015
104016
104032
104033

026500

014662
014676

012737
004437

000000
027176

3921
3922
ggga

3931
3932
3933

3934
3935
3936
3937
3938
3939
gg:g

014640
gxusqa
146449

104012
104013
1040149

014716

000400
104034
104035
104036
104041
104042

3335 014720 012700 003100
0147

%44? 014740

012788

3942

014742

001370

3950

014744

004437

3358

3%3885

3951
39
3
3954
3955

014750
014756
014764
014772
015000

012762

00S3

013737
042737
052737
023737
001401
104056

ERROR

000440

000040

000026

1§:

032

JSR

R4,CSECTR

;SIMULATE SECTOR PULSE

JSR

R4, DRSYNC

;SIMULATE HEADER PREAMBLE

JSR

RY, DHDCMP

12
13
14

:MR1 CONTENTS IN_ERROR
:CS1 IN ERROR AFTER SEARCH
nxoch OR RKDA IN ERROR AFTER SEARCH

JSR
ERROR
ERROR
ERROR
ERR

R4, DRGPSN
1S5
16
32
33

;GO RERD GAP AND SYNC
iMR1 IN ERROR READING GAP
:CS1 IN Eanoa AFTER READING GAP
iMR1 IN ERROR READING SYNC
:CS1 IN ERROR AFTER RERDING SYNC

MOV
MOV
JSR

0,ECPATX
R4, DREAD

; LOAD E
CTED
;LOAD EXPECTED
;GO SI
TE

10
11

osbas ECPOSX

‘-

iMR1 CONTENTS IN
:CS1 CONTENTS IN

ERROR
ERROR

; SIMULATE HEADER SEARCH

PATTERN
POSITION
DATA
READ

ERROR

34
35
36
41
42

iN
i
TO SIMULATE
iMR1 IN
ADING DATA OR ECC
:ECC ERROR
READ NG DATA
:CS1 sga TEE
gg;nc DATA OR ECC
:ECC
REG_INCOR
ER ECC READ
:ERR IN ECC PAT anc

MOV

#40. ¥40. ,RO

;SET COUNT TO EMPTY SILO

MOV

DEC

JSR

002220
002220
002220
002220

c51 MISCOMPARE
;nna
‘MR3

BNE

0022
000001
000200
002160

;

400
ERROR
ERROR
ERROR
ERROR
ERROR

394

014724

;SIMULATE IMPLIED SEEK

ERROR
ERROR
ERROR

104043

3945

RY,DISEEK

ERROR
ERROR

002346

SEQ 007%

JSR

ERROR

014670 012737 005066 002350
814702
014704
014706
814710
014712
014714

KOB

02-DEC-77
10:43 PAGE 75
18 BIT READ DATA WITH NO ERROR

ERROR
ERROR

3917
ggig

104010
104011

MACY1l 30(1046)
T22

MOV
BIC
BIS
CMP
BEQ

ERROR

:ERR IN ECC POS

#DMD * MCLK nxnn1<na)

#DMD, RKMR1
(R

;CLOCK CONTROLLER

; DEC_COUNT

RY, GETREG

;GET B11 REGS

L.8SI,E.CS1
oc E.CSI
#RDY E.CS1
1.¢8l,E.CS1
2%
56

:LOOP UNTIL O

IGET EXPECTED cS1
iCLERR GO BIT
:SET READY BIT
iCHECK IF CS1 CORRECT
,vss SKIP

:»CS1 IN ERROR AFTER READ DATR"

3958

, llllllllll!ll'Ii!lllIllllllilll!llli!lllll!Ill!lilll!ll!ll!lill*

3%61

3963

: %

gggg
3962

firesr 23
H°

18 BIT READ DATA WITH DCK

CLEAR RKG11 CONTROLLER WITH A CONTROLLER CLERR

PUT CONTROLLER IN DIAGNOSTIC MODE.

ISSUEA READ DATA

OF 400 WORDS TO AN RKO& IN 24 SECTOR FORMAT,

0 RKB11
ESREERCp
T L D3RRDSKLS

S TR B ot

CTRL PRTS

MACY1l

LO6

3Q(1046)
43 Pnc 75
3944
18239$ c-7
READ BATAWITH

3964

3967
3968
3969

“"8088 ".&&E»5‘8‘8"?5mfi&"“hm EES ?mEh‘%?

35;?

‘¥
s%
T

CONTROLLER ERROR SETS.

: : ‘e
3973

:Y
t&723:

111221221122 2222:22223222323322222223223222223222 222222223
SCOPE

5#?3

015004

000004

)7/
15014
§§;§
81?8&0
8?3922? 0183835 000000
39801 012038
&&g D043z
%w& 035330

CLR
nbv
SR
0

BSEDES

ggga

BYTE

3990

000001

001234

010021

015050

004437

031770

JSR

RY,CLRIBF

;GO CLEAR INPUT BUFFER

JSR

RY,BLDDAT

;PATTERN 7

MOV

ssoag
oeurr+1ooo
), OBUFF+100

177400

032014

3994

015062

012700

000734

3997

015102

012737

000001

000100

047636

:ooo 0}5%20 osazso

000100

047636

4005

032274

34
gl015074 81012737
737 006030
050636
399
045070 050640
§7

002344

qofié
§ 151
§1§§ 892723 000100 047636 100%:
:ooq
1018:
Y

4008

015136

14
1

0151

004437

Y437

104

:SECTOR O
RACK O
,aurrsn ADDRESS IBUFF

-400

004437

8 ?iig

:WORD COUNT

RDDATA! CFMT

015054

SEC DESIRED
#CCLR,RKCS1(R2);:CLEAR
LE BAD
TSELLER
I’.
RALRork
1&Hmmo
CbRDs RECTOTCRS:
:

015046

813080 880007

5333

.BYTE
iBUFF

::00 1 ITERATION

000
000
046632

015044

023334

104

MOV
MOV

: COMMAND RDDATA!CFMT

:GO_BUILD DATA

;SET INDEX INTO BUFFER

;STORE ECC WORDS

MOV

01 ; 3aur

ags

caxrs OBUFF (RO) ELSE ser axr

JSR

R4, OPSTRT

fi}

JSR

ERROR

F(RO)

§ sounc;
T0 %noxcnrs ECC IN BUFFER
gr

o ?5 OBUFF (RO) ;CLEAR BIT
nq DISEEK

;START THE OPERATION

g MULATE IMP éso SEEK
1 MISCOMPA

ERROR

&
7

nna
:MR3

015152
015154

:gig

015156

004437

023316

JSR

RY,DSECTR

; SIMULATE SECTOR PULSE

4014
4015

o;sxgs
0iS1

004437
104010

(023740

JSR
ERROR

RY, DRSYNC
10

s MULATE
HEADER PREAMBLE
MR1 CONTENTS IN ERROR

c51 CONTENTS IN ERROR

4018

015172

004437

024276

JSR

RY, DHDCMP

: SIMULATE HEADER SEARCH

4019

015170
015176

ERROR
ERROR

4009
:3%?

:819

104006
104007

104011

104012

CLOE nTuanJ

015040
8‘2835
1

39¢

39493

or THE SECTOR.
vs xr TH$
ouu NG OF THE Posxrxou REGISTE AND HE
FINAL PATTERN AND POSITION. MAKE SURE DATA CHECK AND

#1,STIMES

3985

012737

MOV

3982

015006

CYLINDER O

ERROR
ERROR

‘MR1 CONTENTS IN ERRO

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRGEB. P11

818282

MACY11 30(1046)
Te3

104013
104014
¥§§fl37

026500

000001

886537 827058
1

18483

104042
10404
ot ot ot Bt
ot s et Pt Bt ot Pt B

O00000000000000000000

002214
002212

016237

002212

202
2o80 Polnnn
=
O

177777
020000

18:

0023s0

HS:

001214

810272
00001
177777
001214
031616

LTI
oo
TER READING GAP

it EXPEC

Pnrrsnu

'
;RH''E§ 8&88' 'fin&% IMULAT
MI‘ En ECC

?:g

Eié EE"°?~co£§Ec$‘294F!8 e reRo

ATA_OR ECC

ERR xn scc Pos couu
T BIT COUNT FOR connecrxon COUNT

gsr
COUNT FOR

$THPS

:CLEAR SWITCH

PC,RDBIT
PC

ECCPOS PASS THRU O

COUNT FOR

ECCPOS TO O FIRST PASS

Rsn?

csne E

thES?c 2),T1.ecPt

cE?ECCPfiTTERN

gcg

xpscr

B&POSX £.EcPs BETFOR éonS“mg BEPORT

c2s:

8} {N ERROR BFORAMACAYNSG svwc

Rxgcpscna),r.scps

002252
002214

3 £L0O0NV

#S
3%:

s s s s s P
o Bt ot ot ot

1 MO

$12672,R1

Bt s et Pt

00000

—

ORI

#22, BITCNT

002326

004737

Ees

;RKDCYL OR RKDA IN ERROR AFTER SEARCH

012737

015444

;CS1 IN ERROR AFTER SEARCH

osbssesgposx

035

18438

#1, ECPATX

002346
0023s0

SEQ 0077

ERROR
ERROR

ERRGR

184838
012737

MOG6

02-DEC-77
10:43 PRGE 77
18 BIT READ DATA WITH DCK

E.ECPT.T.ECPT

PATTERN connscr
; ugcx gr

Siscps,r.scps

POSITION CORRECT
.cuccx gr

gxrcnv

IT COUNT

:DEC
COUNT TO ZERQ IN ECCPOS
INOT YE zsno - LOOP
,?gcopnss gnu 0 COUN

#-1, ECPOSX
#20000, R1
33

i PRESET EXPECTED POS TO0 GO TO ZERO
iSET COUNT TO NEXT O IN ECC POS
:GO DO LOOP AGAIN

$TMPS

s TEST SWITCH

;RLRERDY §E

#1 RO

:SET EXP
POS TO GO TO O ON NEXT BIT
SWITCH

o-l scposx
Ss:

BUHP

1
33
sg

#10272,R1

002350

PC,RDBIT

:SET COUNT

SKIP

TO "FINAL POSITION

:SET RO TO RETURN AFTER ONE PASS

'BUMP
:GO DO LOOP RGAIN

:ONE MORE BIT TO SET READY

P11

02-DEC-77 10:21

CZRGEBO _RK&11 DSKLS CTRL PRTS
CZRGEB.
4076

015450

004437

:oex

o} So4

1335

4084
40
4086
:835

8‘??58
1
015522
015530

3383

015532

407
Y ;g
40
4080

8124 4
1
154
015476

8%37 7
7
S?
737

qBSS ox§§?3 633410
332737
1404
012737
104045

032356

MACY1l 30(1046)
Ta3

002260
100200
000001
002160

002220
002220
002220
002220

000100

002174

100000

002234

NO&

JSR

RY, GETREG

:GET ’611 REGISTERS

iYES - SKIP

BIT
BEQ
MOV
ERROR

78
#DCK,E.ER
4§

#ECH, T.ER

:TEST IF ECC HARD ERROR SET
N
1P
:SET EXPECTED ERROR REG

MOV
BIS
BIC
. CMP
6S:

,
SEQ 0078

10:43 PAGE
WITH DCK78
BIT READ DATA
1802-DEC-77

BR "

L.8SI.E.CS1
:GET EXPECTED CSI
sROY!LERR,E.CS1 ;SET READY AND ERROR
#G0,E.CSl
;CLEAR GO
T.C81,E.CS!
iCHECK IF CS1 CORRECT

78:

4091

3 36363636 36 36 36 36 36 36 36 36 36 36 36 36 26 36 36 6 36 36 36 36 36 36 6 36 3 36 36 36 36 36 36 3% 36 36 36 36 36 36 36 3 36 36 3 36 36 36 3 36 3 36 36 36 3 3 % % X %

4094

4035
096

CLEAR RKG1l

4098
4089
4100

8
tx
%

CrINOER O, UERD O, SECTOR
9, "gho
CLOCK
THROUGH
SPE:
"
Suo
ECC
INDICATIANG
A 12 ng BURSY ERROR. VERIFY THE COUNTING OF THE

:ggg

;firesr 24

‘¥
x

4101
gisg

4104
4105

‘¥
H

:}39

015532

015534

000004

012737

000001

4108

015542

00S037

002352

4111

015554

00S037

002354

4113
4114
4115
4116
4117

‘015564
815 sg
015
015570
015572

015574

000000
00
00
046632
177400

010021

3{59

015576

004437

4122

015602

4126

4128
4129
4130
4131

3%?3

4112

3}{3

3}53
4125

4127

TROLLER WITH A CONTROLLER CLERR.
Pu?
couTSOLLEg"qu5§ncuo§Txc
MODE. ISSUE A READ DATA
OF 400 WORDS TO AN nggs IN 24 SECTOR FORMAT

POSITION necésrgn.
nnx; SURE DATE CHECK, ECC HARD,
AND CONTROLLER ERROR SETS.

: s 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 3 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 3 36 3 36 3 3 3 % % %
t8124: SCOPE
MOV

#1,STIMES

CLR
MOV

BSEDES

CLR

HIBITS

.BYTE
‘BYTE
IBUFF
-400

O
O

031770

JSR

RY, CLRIBF

;GO CLEAR INPUT BUFFER

004437

032014

JSR

R4, BLDDAT

:GO BUILD DATA

015610

012700

000734

MOV

#734,R0

;SET INDEX_ INTO BUFFER

015622
015630
015636
O015eMM

012737
012737
042760
052760

071720
000001
00S000
0S0100

MOV
MOV
BIC
BIS

871720, OBUFF+1002
#1,ECCSRC
“SET SOURCE TO INDICATE ECC IN BUFFER
#81T9/BIT11,0BUFF(RO)
:CREATE 11 BIT BURST ERROR
#BITEIBIT12!BIT14,
OBUFF (RO)

015546

015560

015606
015614

012762

004437

00000S

012737

100000

001234

18 BIT READ DATA WITH ECH

000000

032230

JSR

;CLEAR BAD SEC DESIRED
#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

R4, LORDRK

RDDATA! CFMT

004020

5
050636

0S0640
002344
047636
047636

MOV

::00 1 ITERATION

#4020, OBUFF+1000

:CLEAR HI ORDER BITS

:LOAD "L* REGISTERS

:CYLINDER O
;sscron 0
:TRACK O
:BUFFER ADDRESS IBUFF
:WORD COUNT -

; COMMAND RDDATA!CFMT

:PATTERN S

;STORE ECC WORDS

i
B

;23

437

7636

3334

2
—

e e

SREaE8228 B8

BENRY NdiEs

0000
00000
0000000000
0000

10:

BO7

SEQ 0079

18 BIT READ DATA WITH ECH
;BUMP TO NEXT WORD
¥
ADD
#8170, OBUFF (RO)
BIS

#BIT1.0BUFF(RO) ;MAKE IT A 12 BIT BURST ERROR

JSR

R4, OPSTRT

JSR

RY,DSECTR

JSR
ERROR
ERROR
ERROR
ERROR

RY)DISEEK
4
S
&
7

RY, DRSYNC

;START THE OPERATION

:SIMULATE IMPLIED SEEK
;CS1MISCOMPARE
.
,m
;ma
; SIMULATE SECTOR PULSE

n PRERHBLE
; SIMULAT
E
CON
iMR1
:CS1 comsms

023740
104010
104011

JSR
ERR
ERROR

i
104014

e
ERROR
JSR
ERR
ERROR

14
R4, DRGPSN
15
16
32

,co READ cnP
‘asnomc GAP
IN
iMR1
N
;;:31
iMR1 IN §

MOV

%1, ECPATX

JSR

004437 024276

[etespetuuy
e
ey ud it etug e

02-DEC-77

BIC

0044

00000000000

2R S5
2ORRE I3

1
1
1
104
004437 023316

sb
e ot e

Mo
N0

TeY

37 ggea

e
e o P
e
s e
e

fLfrrfrrrrrLLLLrrssrrrrrrrs
s

o o e oe

MACY1l 30(1046)

02-DEC-77 10:21

NG h E LR S B Ir R DR B 56 S h £5R S S8 LERZER

DSKLS CTRL PRTS

004437 026500

104015
104016
104032

104033

315737

12737
004437
000400

00S066

027176

RY, DHDCMP

RR 33

ERROR
000001

10
11

002346

002350

MOV
JSR
4

#5066, ECPOSX

R4, DREAD

13:034

ERROR

104036

104043

104035

ERROR

104041
104042

012737

000022

012701

012672

012700

000005

002326

004737 031616
3s:
016237
002214
g; 000030 002212
002350

004737 oaoqgs
13737
737
wné
10404

3737
001401

832350 002252
2264 002214
002252

002212

18:

%a"“f’*""*"eonAFTER SEARCH
£1)
: 52“%9%

ics1 IN m TER nsmxm SYNC

iL
i60
;

iMR1

r?Ngx

n on ECC

ERROR

ERROR
ERROR

:CS1 sgnon

ERROR

41
42
43

:ERR

MOV

%22, BITCNT

;SET BIT COUNT FOR connscnou COUNT

MOV

812672,R1

:SET COUNT FOR ECCPOS TO O FIRST PASS

CLR

JSR
JSR
MOV
MOV
INC

MOV
MP
EQ
ERROR
CMP
BEQ

%5, RO

{ECC

mm m

MOV

uosoz# 001214

R SEARCH

SIMULAT

ERR

NG DATA OR ECC

:ECC REG mcoa&cr
ar ER ECC READ
{ERR {n Ecc PAT
IN

ECC POS coum

:SET COUNT FOR ECCPOS PASS THRU O

§TMPS

:CLEAR SWITCH

scposx.; ECPS
PT.T.ECPT
42

;SET FOR COMPARE AND REPORT
:CHECK IF PATTERN CORRECT

PC,RDBIT
;GO READ BIT
PC.ECCGEN
: GENERATE égc
RKECPT(R2),T.ECPt
:
PATTERN
:GET POSITION
) T.ECPS
RKECPS(R2)
;BUMP POSITION EXPECTED
ECPOSX
E.ECPS,T.ECPS
2%

:YES - SKIP

;CHECK IF POSITION CORRECT
1YES - SKIP

CZR6EBO RK 611 DSKLS CTRL PRTS
CZR6EB.P11
C-77 10:21

Oe41
16114
'flg 816116 &.2;; 002326
3190

MACYl1l

30(1046)

3?2“
2s:

filglg

016144

000733

016146

005737

001214

0127

177777
001214

M
§i2i§ §?§93
1041
4201 161
1
86000

4202
4203
4

16164
016172
16176

4206
4207

016200
016204

004737
37

421l
42l2

1
016240

001402

:EOB 8{6212

37
16

13737 002260 002550

111

3213

0l6242

5%:

016266

1ST

$TMPS

-1
oxxggx.nx
51

INC

§TMPS

s-1 EcPosx

SEQ@ 0080

;BUMP BIT COUNT
;D g COUNT TO ZERO

iNOT

YET

iDEC_PASS

ZERO

= L
0

IN ECCPOS
COUNT

'éfig
POS03IN
TO cc
GO TOoZERO
:SE 2§$§crs
T
:GO DO LOOP RGA

; TEST SWITCH

SET Y
:
iSET C
T0 FINAL POSITION
:SET RO TO RET
AFTER ONE PASS

:SET EXP POS TO GO TO O ON NEXT BIT

‘EE"P SWITCH

:GO

JSR
JSR

PC,RDBIT
RY’ GETREG

;ONE MORE BIT TO SET READY
iGET '6l1
REGISTER

AGAIN

??851. ésx

::YES
HEC- SKIPCS1 CORRECT

I!CH,T.ER

TEST IF ECC HARD ERROR SET

.gCK!ECH,E.ER

SET EXPECTED ERROR REG

L.8SI, E.CS1
iGET EXPECTED
CSI
Yé¢§§“-5 csl1 ; Erngeggv AND ERROR

BEQ
EEROR

68
;H

BNE

ERROR

BIT
ng

DO L

YES
-

SKIP

78:

.SBTTL

#x%SPECIAL READ TESTS

ll!llllll!lll!lllIllllllllI!lililillllillll!lllll!li!l!llilll!i

'&TE .S

PARTIAL SECTOR READ

34
H

R WITH A
Su'icomS&ER“
”b;
Sric”MoBE.CONTRO SE0E CLEAR,
B-READ DATA

x
tx

SB?
nskflsnEgsgéggs HULb?EKA gES*““ sfiLss
cooo HE
Hoflog

WOR

26 SECTOR FORMA

0NL9 103 WORDS GOT fnausrsanso ro neno

;s!Illllliszglllllllllllllllllill!lllll‘llllflllllll!llllililllillll

66
6270

000004
012737

000001

001234

:g:?

6276
6302

00S037
012762

002352
100000

000000

4Ye4e

6310

00S037

002344

4243

BITCNT
R

BNE
MOV
MOV

104044

MOV
Bi;

:’
POSX
026088.81

MOV

usis 8125:2
7
000100 002174 6S8:
:e{g nOi&F.’S"I gjégg; 100100 002234
ngig 81252& 16“045
4220
4eel
4eee
4223
Y224
4225
4226
4227
4228
4229
4230
4231
42
4233

INC
DEC

002350

031616
032356

ERROR

353
MOV
4s:

10:43

ge ?§ RERO DATA WITH ECH
BE%

4148 Biel
3193 0151% oowo; 77777 002350
414 Bields
Bi5781 426600
:iz

C-77

CO7

6314 005037 085354

#1,STIMES

:;00 1 ITERATION

CLR

BSEDES

;CLEAR BAD SEC DESIRED

CLR

ECCSRC

MOV

CLR

#CCLR,RKCS1(R2)

HIBITS

;CLEAR CONTROLLER

;CLEAR ECC SOURCE

:CLEAR HI ORDER BITS

CZREEBO RK611 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR&EB.P11
w24y

437

MACY11 30(1046)
Tes

JSR
0

032230

.BYT
YT

B
BIBRE
ul0
3§§§ 016336 004437 031770
MY

ugys

Qle3se

458

RY, LOADRK
8

SEQ 0081

;LOAD “L" REGISTERS

:CYLINDER O
:SECTOR O
:
SK 0

iBUFFER ADDRESS IBUFF

;WORD COUNT -103
:COMMAND RDDATA

-103
RDDATA

17767

5 B

DO7

02-DEC-77
10:43 PAGE 81
PARTIAL SECTOR READ

JSR

RY4,CLRIBF

;GO CLEAR INPUT BUFFER

m o

gSR

RY4,BLDDAT

170

JSR
JSR
ERROR

R4, OPSTRT
R4, DISEEK
4
S
9

;START THE OPERATION
:SIMULATE IMPLIED SEEK
:CS1 MISCOMPARE
IMR1
&
{MR2
i MR3

JSR

RY4,DSECTR

; SIMULATE SECTOR PULSE

4958
4259

016350
(016359

004437
004437

4ob2

016364

104006

4265

016370

00437

023316

4ob7

016374

004437

023740

JSR
ERROR
ERROR

RY, DRSYNC
10
11

HEADER PREAMBLE
; SIMULATE
iMR1 ggarsu 3 ¥n RROR
IN ERROR
TENTS
:CS1

4271

16404

DOW4I7

024276

JSR

§q,ouocnp

;ggnuLg;ziaigoZE SEARCH

4g74

016414

104013

ERROR

:RKDCYL OR RKDA IN ERROR AFTER SEARCH

4S76

016416

004437

JSR

P4, DRGPSN

;GO RERD GAP AND SYNC

4280

016430

104033

ERRSS
ERROR

55
33

:CS1 IN ERROR AFTER READING SYNC

MOV
JSR

#0,ECPATX
ECPOSX
#4066,
RY, DREAD

:L
S%FES;EB POSI‘ION
;L888
TA nsn?
;GO Inubgrz

ERROR
RROR
RROR
ERROR
ERROR
ERROR

34
S
3
41
42
43

MOV

T.BA,RO

BEQ
MOV
ERROR

1YES - SKIP
4g
$IBUFF+206,E.BA ;SET EXPECTED BA
:REPORT XFER LENGTH ERROR
46

016366

104007

s HER TR
4578 BiEdiS 184818
4877

Dlgued

ERROR
ERROR
ERROR

104015

026500

e 0004
e

4S8s Oleuss

127

4986

016484

104034

4589

016462

104041

016470
Dlgu7y
016500

013700
1g2700
028700

164

(=)
n
wWw

53385

4ge3

104008

4561 016368

032274
023334

00235

400

S HEE g
45
32

4593
4234
4835
4236

MOV

002164
O4ee32
000206

4598 016206 015737 047OM0
453 Oleers D8%03%

SuB
CMP

002224

#1BUFF RO
%206, RO

Ecsi N

TMR1 IN 5588

TEflRggRRCH
ING SYNC

PATTERN

;

:MR1
;Ecc
:CSI
{ECC
‘ERR
iERR

TO SIMULAT

IN ERROR READING DATA OR ECC
DATA
a
Enaon
ADING DATA OR ECC
AFT
ERROR
REG INCORRECT AFTER ECC RE
IN Ecc PAT CALC.
IN ECC POS COUNT

;GET ACTUAL BA

A
;SUB_START Vfi%”?
:TEST IF CORRECT NUM OF WORDS XFER

cznssao RK&11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21
4300

E
4303
4304

:ggz
4307

“382
4
4310
4311
4312
4313
4314

glsgég

16
016530
016

016542

xsgus
16554
016562
016570
016576
016600
016602

81570

1
004437

013737
Q42737
052737
023737
001401
104056

000014

000440
000040
032356

002260
000001
000200
002160

EO7

MACY1l 30(1046) 02-DEC-77 _10:43 PAGE 82
125
PARTIAL SECTOR READ

4§ :

000026
000026

3§:
18:

002220
002220
002220
002220

2s:

SEQ 0082

MOV

#3.%4. Rl

:SET COUNT TO CND OF OPERATION

DEC

BNE

;DEC_THE _COUNT
UNTIL ZERO
;LOOP

JSR

R4, GETREG

;GET 611 REGS

MOV
MOV

MOV
BIC
BIS
CMP
BEQ
ERROR

#DMD! MELK, RKMR1(R2) ;RUN THE CLOCK
$DMD,
RKMR1 (R2)

L.SI,E.CS1
#G0,E.CS1
#RDY E.CS1
1.csl,E.CS1
SB

iGET EXPECTED CS1
3CLEAR GO BIT
;SET _READY BIT
cuecx IF CS1 CORRECT
YES
- SKIP
i»G31 IN ERROR AFTER READ DATA"

4317

3 !lllll!lllllIl&lllll!liillllllllllll!lillliilllllllllllll!lll'!

4320

;;

CLEAR RKG11 CONTROLLER uxrn A CONTROLLER CLsnn.

4322

OF 40

:gig

4321

‘¥

4359
325

e
¥

4326

‘¥

4327

1w
H

gggg
4330
4331

016602

000004
(12737

000001

001234

:ggg

016612

012762

100000

000000

336

016620

00S037

338

gxss

005037

:435

4337
4339

016604

oxssgg
016634

005037

004437

4340
4341
4342

016640
oxssqg
01664

000000
000

33:2

016650

000021

4343
4344
4 qg
4349

r; A READ DATA
FORMAT

Sszonx
n?gkn HRO?G“
a8§i‘82?5S.uon3§
gg §5§§£
BIT ECC.

nrrenoHE
ECC nflLagE vggggnsscronANDATSBADLOADED
SECTORINTOERROR.

nsnonv BEF

AND CONTROLLER

;CLEAR CONTROLLER

002352

CLR

BSEDES

002354

CLR

HIBITS

002344

032230

CLR
JSR

BYTE
.BYTE

004437

031770

IBUFF
-401

ECCSRC

R4, LOADRK
O
O

RDDATA

000002

004437

032014

4353

016664

004437

032274

4355

016674

104004

023334

ERROR SETS.

: o 363636 36 36 36 36 3 36 36 36 36 36 36 36 36 3 26 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 3 36 36 36 3 3 3 3 % % %
t&726:
ScoPE
#CCLR,RKCS1(R2)

016652

004437

CTOR

MOV

046632
177377

016670

MODE .

;300 1 ITERATION

016662

4354

o;x

#1,STIMES

4350

4322

PUT cou

MOV

016644
0lbbYe

016656

SILO UNLOAD BEFORE HERDER ERROR

;CLEAR BSE DESIRED

;CLEAR ECC_SOURCE

iCLEAR HI ORDER BITS
; LOAD ”L” REGISTERS

i CYLINDER O
i SECTOR O
: TRACK O

:BUFFER ADDRESS IBUFF
iWORD COUNT -401

;COMMAND RDDATA

JSR

R4, CLRIBF

;GO CLEAR INPUT BUFFER

JSR

R4, BLDDAT

;GO _BUILD DATA

JSR

RY,OPSTRT

;START THE OPERATION

JSR

ERROR

nq DISEEK

:PATTERN 2

:SIMULATE IMPLIED SEEK
:CS1 MISCOMPARE

cmseo RKG11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRGEB.P11

FO7

MACY11 30(1046) 02-CEC-77 10:43 PAGE 83
SILO UNLOAD BEFORE HERDER ERROR
T26

i i o
:359 815
1330009

e
ERROR

:gg? 016704 004437 023316
Y

127‘0

:332;
uasg
436

16716
167
167

104011
004437
104012

024276

4371

016732

004437

026500

437

167

133053

4368

: 9
437

16714

437

104010

016726 104013
016730 104014
167

U3
Olerud
4376
4377
016746
4378 812754
:379 g{g;&g
43391
815770
4382
016772
4383
016774
4384
019775
4385 81 000

104015

023740

T
iMR3
-

JSR

R4,DSECTR

; SIMULATE SECTOR PULSE

JSR

RY, CRSYNC

: SIMULATE

ERROR
JSR
ERROR

11
RY, DHDCMP
12

:CS1 CONTENTS
;s SIMUL
I MR1 c
T m g; Em

ERROR

Ennon
IN

:cs1 IN mos

JSR

RY, DRGPSN

;GO RERD GAP AND SYNC

ERROR

ERROR
ERROR

HEADER PREAMBLE

iMR1 CONTENTS

ERROR

:RKDCYL OR

ERROR msn SEARCH

iMR1 IN ERROR gkgnoé
;gix i"

RROR

AFTER

GAP

READING GAP

ERROR
MOV
MOV
535
ERROR
RR
ERROR
ERROR
ERROR

33
‘90, ECPATX
#4066 , ECPOSX
RY, DREAD
34
35
36
41
Y42

iMal
IN ERROR AFTER BEADING SYNC
)
:LOAD EXPECTED
PATTERN
:LORD
Exggcr%msfixou
;60 sxmn
ngsgtI)
ol
Emuxafu
ERROR READING onur"n OR ECC
:ECC ERROR READING DATA
:CS1
§£moa
AFTER Rsnoy«;
DATA
OR ECC
:ECC
REG
mcoaSEcr
AFTER
ECC
RERD
:ERR IN ECC PAT CALC.

ugg 017004 012701 000040

MOV

28, *

SET COUNT TO END OF SECTOR

4392

DEC

:DEC_THE_COUNT

BIS

#BIT15,BSEDES

;SET FOR BAD SECTOR ERROR

JSR

RY,DSECTR

; ISSUE SECTOR PULSE

JSR

R4, DRSYNC

;RERD SYNC

ERROR

:C51 CONTENTS IN ERROR

:ggt_;

17002

104835
012737 000000 002346
313737
004066 002350
oowgs 027176
18300:4%
104035
104036
104041
104042

§
7

SEQ 0083

104043

ERR

4390
017010 012762 000440 000026 6%:
4331 017016 012762 000040 000026
:gga

017026

017024

00S301

:3953*

017030

052737

100000

:ggg

017036

004437

023316

4399

Q17042

004437

023740

:’.1‘.85

017050

104011

017

004437

4400
4403

017046

001370

104010

Y404 mmnge.E 104012
4405

3389

017060

017062

BNE
002352

ERROR

024276

JSR

104013

::?3

:
0170eM

005037

002352

'ERR IN ECC POS COUNT

aonn-nax
RKMR1 (R2) ; RUN THE CLOCK
#DMD, RKMR1 (R2)

10’

:LOOP UNTIL ZERO

iMR1 CONTENTS IN ERROR

Egnon

RY, DHDCMP

’nm“it::omsms IN ERROR

:EXPECTED RETURN (NO DA INCREMENT)

ERROR

000411

4408
4411

MOV
MOV

IF THIS CODE IS EXECUTED,

:D0

HEADER

COMPARE WITH BSE ERROR

:cS1 IN ERROR AFTER SEARCH

THE CONTROLLER oxo uor INHIBIT

THE ADDRESS INCREMENT BECAUSE OF THE BSE ERR
CLR

BSEDES

;CLEAR BSE DESIRED SWITCH

czassao RKb11 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21
Y412

81;414

013737

:gig 017104

104047

4413

Y416

::17

0170

017106

017114

013737

016237

032737

002274

002266
000014

000200

GO?7

MACYil 30(1046) 02-DEC-77 10:43 PAGE 84
T28
SILO UNLOAD BEFORE HEADER ERROR
002240

002226
002174

002174

uuig
Bi?ififi 895995
000200 002234
Y420 017132
104051

:zgé 017134 000453
4y

Y424
44
Yy

4427

17136

017142
17122
171

017160

004437

013737
8837
14

017162

000440

017164

012701

‘7é53

Y434
3:35
Yy

Y438

Y439
Y440

17170
17

Y450
Y451

3:55

1616

4s:

817 2
017

737
3737

1002
002220

002220
2160

047632

002224

17 g
17
17

000001

3
é
1 os

uuexpsc so ADDRESS INCREMENT

RKER(R2),T.ER

;GET ERROR REG

MOV

BIT

002224

002164

017264

L.DA,E.DA

gassT.ER

TED

SEC/TRACK

:TEST IF BSE SET

TsT127

s§E§
sxfiEégso ERROR REG
"ass DID NOT SET"

JSR

RY, GETREG

;csr 611 REGS

MOV
CMP

MOV

:GO TO NEXT TEST

ésxE.CS1
.CS1,T.CS1

:SET EXPECTED CSl
i CHECK IF CS1 OK
iYES - SKIP

:*CS1_ERROR RFTER WRITE CHECK"

1:G0 TO NEXT TEST

Tst2?
#278.%16. ,R1

;SET COUNT TO NEXT ECC FIELD

CLR

PR.BIT

JSR

PC,RDBIT

JSR

RY, GETREG

BIS
CMP

#RDY'CERR,E.CS1
E.CS1, T.CS1
cuecx xr csx oK

CLR

DEC
BNE

M1.BIT

Rl
4%

#G0,E.CS1

Bsgon 4
B
Ferer
7%:

ssr EXPECY

iSET

RSS
ogse.s.sn
ERROR
51

BIC

A%NES

012737

BEQ

3%:

Sgsg

032356

017244

2%:

010540

004437

ERROR

017210

017214

L.DCYL,E.DCYL

ERROR

005301
001374

iBl7E8
Y445

002220
002160

017204
017206

3:31 0};235 Poaaee
Yyy
Yy
:::g

002260
002220

104056

:3§§
4y

032356

MOV

18:

SEQ 0084

MOV

S"P
EQ
ERROR

;

:CLEAR PRESENT AND PREVIOUS BITS
; SIMULATE READ BIT

:DEC_COUNT
:LOOP UNTIL ZERO
:GET 611 REGS

*SET UP EXPECTEC CS1

i»CS1M_ER

R READ DATA"

oraurr+1ooo E.BA ;SET EXPECTED BA

E BA,T
i

,ngT IF ?n CORRECT
Y
SKIP
1BUS ADDRESS INCORRECT

5%:

.SBTTL

#*WRITE CHECK TESTS

H4E5Y

3 BRI

4939
44e0
4461
qug

cLsnn RKB11 CONTROLLER HITH A CONTROLLER CLERR

H
tx
¥

En?
u288°8 8:‘% 8" ca’szx"'? GHOGEEK
nuo
onxv:
CLERR
A SECTOR PUL
coo
5
uoo uonos TO Ee ung 5 cuccx
AND A oo 2 axr ECC. MAKE SURE NO ERRORS ss

::ss

irssT 27

::1q

"N-:ng
44

4467

017264

017266

000004

012737

000012

001234

60626063606 3636 36 26 36 26 36 36 96 6 36 36 26 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 6 3 36 36 3 N 2 X XX X%

WRITE CHECK OF 400 WORDS

: CRRBREERBRBRRRERERRRRERRRRRERRRRRERRRLERERRERRRERREERRR XL RREERE
tat27:

MOV

%10.,$STIMES

:;00 10. ITERATIONS

CZRGEBO RKEB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21

MACY11l 30(1048)
T2?7

4488 Bi735d 0BeB¥ BBS3E:

ey B
7
437

10:43
PAGE 8BS
02-DEC-77
WRITE CHECK OF 400 WORDS

BiBbEE

ELEAR BleBRETREETM

ECEERE
R4, LORDRK

S8UREE
EEC REGISTE
jELERR "L"
R

JSR

2230

1B Tr
-q¥§

WRTCHK

::81

017332

004437

031770

437

2014

3 nmm g o

55 gz pim mpe
::
i; Y 8157
8“?636
5
frm Bl
::gé

017364

001375

35 pz wers oo
Y493

017

4495

017400

Y437

0C00

:ggg

17412

104007

328&

017414

004437

:503

01;323

4507
Hggg
4
:g{?

017430
174
174
174940

451

17494

8 fom
4498 §1791 e

000000

110%:

gggcm .

R4, CLRIBF

;GO CLEAR INPUT BUFFER

R4, BLDDAT

; GO BUILD DATA

oxautrRl
#0BUFF
|R3
(R3)+,ln1)+

i1
novgg??%fin ?S ?aurr

RO
758

RKCSI(RE)
OCCSR

Rw DISEEK

023334

ORD

4
;PATTERN
TA

T FOR BUFFER SIZE

LOOP UNTIL PATTERN IS MOVED

#QRT TRgELER

SIHULRTE IMPLIED SEEK
;CS1 MISCOMPARE

iR
i MR3

023316

RY,DSECTR

; SIMULATE SECTOR PULSE

?0“4?7

023740

R4, DRSYNC

SIMULARTE HEADER PREAMBLE

004437
10401
10401
104014

024276

Tq,ouocnp

437

026500

B RO (RS

75%:

SEQ 00es

:gig

017454

104033

4S18
4S1
452
4S21
4522
4523

017456
8174 4
17472
017476
017500
017502

012737
2737
4437
0004
104053
104054

1
14

RH DRGPSN

52
0100000
004066
027176

002346
002350

%0,ECPAT X
CPOSX

ouOss E

RY, DURTCK
53
54

{08} GONTENTS 1N ERRoS

MULATE HERDER SEARCH

}gonTgnts T Eron
i
DC YL OR RKDA IN ERROR AFTER SEARCH
°x"fERROR READING AP
Elg A
5al 1) EeRR AFTER
RE AD
CSl IN ERROR

GO SIMUL E HRIT CHECK

HORDS TO_SIMULATE
N WRT CK OR ECC RERD
HRI IN ERROR
HRITE CHECK OP
ECC ERROR IN

C%RbEBO RTBII DSKLS CTRL PRTS
RGEB.P
02-DEC-77 10:21

MACY11l 30(1046)
T27

107

02 DEC-77
10:43
PAGE 86
WRITE CHECK OF 400 WORDS

SEG 008e

017504
017506
17510
017512

1040SS
104041
104042
104043

ERROR

H1
42
43

:ECC REG_INCORRECT AFTER ECC RERD
'ERR IN ECC PAT CALC.
{ERR IN ECC POS COUNT

:gg?

017514

012700

MOV

#40. *37. RO

:SET COUNT TO EMPTY SILO

:ggg

0{7520

012;62

:ggg

017536

001370

4537

017540

004437

4s3 Qlzesy

000026
000026

003

45
1;§44 13737
qsgg 817552 84274
4S40
0S2737
023737
001401
104057

002220

#DMD!MCLK,RKMR1(R2)

#DMD, RKMR] (R2)

DEC
BNE

RO
18

MOV

JSR

Csx .CS1

BEQ

GETREG

oc E. c51
#RDY,E.CS1
1.¢s1,E.CS1

ERROR

e -,

tkTEST 30

556

:§§? 17600 000004
4562 817602 012737
b

4Se4

:CS1 ERROR AFTER WRT CHK OR ECC RERD

;DEC_COUNT
:LOOP UNTIL O
;GET B11 REGS

iGET EXPECTED cs1

iCL ERR co ax
:SET
R
cuecx c51 connscv
S -

SKIP

~cs1 IN ERROR AFTER WRITE CHECK"

017610

005037

002352
002354
032230

001234

Pb$a80=¥611 EgflT:OLLER ux;?cn CONTROLLER CLEfiSIT

“850

GDRIVE

CYLINDER

tLEAR

*“m'usnxosN 26 §$s¥5n 5

nTOR
Es ACES n&k?mlfiwch%se

eggrrv3$ua¥thcpsg?;?nrxggcls*sgxnguafiznss
oPROPERLY
g=ECK THRTHSR
CHECK RNOCgfi?ROLLéR
ERROR RRE SET.

363636 36 36 36 3 3 36 36 36 36 3 36 36 36 3 36 36 36 36 36 36 36 3636 3 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 3 26 36 0 3 2 2

fsrao-

SCOPE
MOV

#1,STIMES

;300 1

CLR

BSEDES

; CLEAR BRO SECTOR_DESIRED

JSR

RH LOADRK

CLR

HIBITS

Dl?fiég
0176
017624
017626
017627
817630
017632
017634

000
046632
177400
000031

4574
4575
4576

017636

004437

031770

JSR

R4,CLRIBF

017e46

00000S

004437

032014

JSR

R4, BLDDAT

4579

017650

012700

000400

MOV

#400,R0

017642

005037
004437
000000

000001

WRITE CHECK WITH DCK

4565
4See
4SE7
4Se.
4Se9
4570
4571
: ;

:g;g

;CLOCK CONTROLLER

3 © JH 63636363636 36 36 36 3 26 36 36 36 36 36 36 36 36 36 36 3 3 36 36 36 3 36 36 3 3 3 36 36 36 3 36 3 36 36 3 36 36 3 3 3 3 3 3 26 3 3 3 3 3 3 3 % % % % %

4557
4558
4559

4563

MOV

BIC
BIS
CMP

WMiwIws
Rt e

45y
454
4S43
4S44
4S4s
4YS4b
4547
4S4g
4549
4550
4551
4S5¢2
4553
4S54
4555

017560
81?566
17574
017576
017600

18:

4529

ERROR
ERROR
ERROR

l!i*********

4S24
4SeS
45
487

.BYTE

.BYTE
IBUFF
=400

CLERR HI ORDER _BITS
LOAD "L*TM REGISTERS

CY INDER O

SECTOR 0

; TRACK O
i BUFFER RDDRESS IBUFF
;WORD COUNT

WRTCHK
S

ITERATION

-400

; COMMAND HRTCHK

;GO CLEAR INPUT BUFFER
; GO BUILD DATA

iPATTERN S

;SET A COUNT FOR BUFFER SIZE

2 X%

CZREBD RK611 DSKLS CTAL PRIS
$7oEB.P11
02-DEC-77 10:21
4S80
4381
4S82
4Se3

4S84

017654
017660
Oi7ped

Qi7ees

017670

012701
012703
01232

17672

001
01

001

017746

017746
017759
017760
017764

012762
009437
OQUu37
104004

022274
023334

00437

023316

4607
4608
4603

020000
020004
020006

004437
104010
104011

023740

020010

004437

024276

4816

4617
4618
4619
4620

Qe00IY
020016
020020

020022

437

026500

020039

020086

012737
015737
G437
000400

000001
004OEE
027176

012737
015700

:SET INDEX INTO BUFFER

BIT

BNE

8126073, OBUFF1000
+
oxsxosa OBUFF +1002
ECCSRC

000020
00000S

wo?

YES- SKIP

#8176, 0BUFF(RO)

;CLEAR BIT

000000

1108:

MOV

INDICATE ECC IN BUFFER

JSR
JSR

RY, OPSTRT
nq DISEEK

#CCLR,RKCS1(R2)

,CLERR CONTROLLER

ERROR

i MR1

ERROR

:START THE OPERATION
.SIHULR E IMPLIED SEEK
,cs1 MISCOMPARE

i MR2

iMR3

JSR

RY4,DSECTR

: SIMULATE SECTOR PULSE

JSR
ERROR

RY, DRSYNC

HULRTE
nnx
conrs

ERROR
ERROR

RY, DHDCMP

ERROR

12’
13
14

nn1 couann
NTS Ennon

SR
ERROR
ERROR
ERROR
ERROR

R4, DRGPSN
1S
16
32
33

;co READ GAP AND SYNC
iMR1 IN Enaon zgnoxnc GAP
AFTER READING GAP
:CS1 ¥n RROR
iMR1
IN Enaon
ING SYNC
:cS1 IN ERROR
AFTER READING SYNC

MOV

MOV
JSR

400
ERR
ERROR
ERROR
ERROR
ERROR
ERROR
002326

;SET_SOQURCE TO

irs,oaurr(no)s TEST IF BIT SE

:g} &, 0BUFF (RO) ELSE SET BIT

BIC

002346
0023s0

;STORE ECC WORDS

855
1008%:
1018%:

020074
020102

oxoog

047636

4628 050064 1ougee
9630 050056 1940um
963
958872 19udus
46
32
4633
4634
4635

MOV

ERROR

104015
104016
104032
104033

02
02

46z
M
4EoY
4625

10uOl
0
104013

:SET ADDRESS OF OBUFF
1 MOV pnrr;au T0 IBUFF
:DEC_COUN
:LOOP UNTIL PATTERN IS MOVED

ERROR

017774

:SET ADDRESS OF IBUFF

#0BUFF| R3
(R3)+, [P1)+
RO
75%

MOV

047636

#IBUFF,RI

SEQ 0087

MOV
MOV
DEC
BNE

ERROR

4605

4611l

JO7

02-DEC-77
10:43 PAGE 87
WRITE CHECK WITH DCK

MOV
MOV

050636
050648
00234
047636

90 Oirroe 184988
:ggé 15572 184888

4812
46_3
4eid

T30

75%:

005

3% Q17765 087Eh 0b0ioD
3%
4294 Q778
817733 fee’ed
892728 ooouo
000100

4895
459
4297
4838
4553
4800

30(1046)

MOV

046632
047636

8
e pow o
Rl
g
M

MACY1l

MOV

%1, ECPATX

cuOss ;cposx
DWR
53
54
55
941
Y42
43

#20,BITCNT

S, RO

] conrsnrs

R PREAMBLE

N ERROR

och OR RKDA IN ERROR nrrsn SEARCH

;LOAD EXPECTED

‘E
:GO

PATTERN

E
gr D POSITION
SIMULATE WRITE
CHECK

:NUMBER OF WORDS TO SIMULAT
:MR1 -IN ERROR ON WRT CK OR ECC READ
1ECC ERR
ag uaxas CHECK OP

:CSI ER
TER
WRT CHK OR
ECC READ
{ECC REG INCORRECT AFTER ECC RERD
'ERR IN ECC PAT CALC.
‘ERR IN ECC POS COUNT
:SET BIT COUNT FOR CORRECTION COUNT

:SET COUNT FOR ECCPOS PASS THRU O

CZRGEBO RKB11 DSKLS cm. PRTS
CZReEB.P11
02-DEC-77 10:21

%39

oaomg

32:3;9 020112

012701

KO?

MACY11 30(1046)
oa-oec
-77
10:43 PAGE 88
T30
WRITE CHECK WITH DCK

013672

MOV

00S037 001214

46
0201
737 03161
9eag
00138
984737
4641 oaoxg 016237 D3b%es
000032 002214

Y64,

8581

%-49

4e4
132
4644 0201
4645 85812;
464
4648

01
01

4649
%20

020210

m;s;

020214

:1'?

020226

4657
D

4660
4ebl

46
4665

Haam

1401

03;
3737
1401
0-43;

4eS4

4655

3737
1

4651

46
46

005301
134

001406

020222

012701

012737

000733

%0038
0023
002350

002212

ERROR
CMP

42
E.ECPS,T.ECPS

INC

BITCNT

2%:

177777

002350

%gg

020272

013737

0022

002220

4673

020314

2737

000001

002220

4676

020326

001402
104044

oao.éng

33‘1"’333

323?

104045

:; 82

020350

:g;e

000410

1002

002160
000100

5%:

002174

;CHECK IF POSITION CORRECT

:YES - SKIP

Ri
o3

:DEC COUNT TO ZERO IN ECCPOS
INOT g z;no - LOOP

:IF 0 - SKIP

sBUMP BIT COUNT

,oec PASS

THRU O COUNT

#-1,ECPOSX

:PRESET exchreo POS T0 GO TO ZERO

:GO DO LOOP AGAIN

$TMPS
uoms R1

:GET COUNT TO NEXT O IN ECC POS

$TM

TEST SWITCH
,ssr couN TO ran POSITION
:SET RO _TO
URN AFTER ONE PASS
iSET_EXP os TO GO TO O ON NEXT BIT
:BUMP SWITCH

JSR
JSR

PC,RDBIT
RY' GETREG

;ONE MORE BIT TO SET READY
IGET "’éé REGISERS

#GO,E.CS1

:CLEAR GO

BEQ
ERROR

68
44

:YES
- SKIP

SE;E,

;scn,r.sn

5§

c-l ECPOSX

L.8SI,E.CS1

CMP

MOV

: ALREADY
;

:GO DO LOOP RGARIN

:GET EXPECTED CSl

#ROY!LERR,E.CS1 ;SET READY AND ERROR

BIC

6S%:

:YES
- SKIP

TST
MOV
MOV
MOV
INC
BNE

BIS

002220

2%
43

#20000, R1

MOV

002220

4679 oauaouauo 012737 100000 002234
b .. 84

MOV

4s:

4671

4“ 020262
737
1616
%Egg oaoz% 83#37 332355

MOV

aunP POSITION EXP CTED
:SET FOR COMPARE AND REPORT
;CHECK IF PATTERN CORRECT

000716

020322
020324

DEC
BNE

BEQ

002350

020260

4674
75

BEQ
ERROR

DEC

:CLEAR SWITCH

RKECPS(R2),T.ECP

BEQ

1S:

;SET COUNT FOR ECCPOS TO O FIRST PASS

co
PC’ ECCGEN
NERATE BEoC
RKECPT(R2),T.EP?
sGET PRTTERN

CMP

002326

020230 005737 001214
001012
gsggs 312701
16
2
012700 000001
&1)537 77777
37
1214

3737

PC,RDBIT

TR
MOV

ECPOSX
scposx,;.scps
E.ECPT.T.ECPT

%5;;

JSR

MOV
INC
MOV

002254 002214
002252

§TMPS

002212
002252

020234

737

3%:

#13672,R1

CLR

ERROR

T.C81,E.CS1

#DCK,E.ER

i CHECK IF csx CORRECT
rssr xgkggc HARD ERROR SET

ssr EXPECTED ERROR REG

7%:
l!lll!Illlllll!llllllllllllllllllillll!l!ill!!llfil!{lll!lll!!!l

%eg

4687

‘¥

CLEAR RKB11 CONTROLLER WITH A CONTROLLER CLEAR.

4689
4690

‘¥
tx

CHECK OF loc:u onos T0 AN RKOB IN 24 SECTOR FORMAT,
CYLINDER
O, HEAD
O, SECTOR 0.
CLOCK THROUGH SEEK

4688

4691

T 3l

PUT

WRITE CHECK OF 18 BIT WORDS

CONTROLLER IN DIAGNOSTIC MODE.

AND DRIVE CLEAR MESSAGES.

ISSUE A WRITE

SIMULATE A SECTOR PULSE,

SEQ 0088

CZR&EBO RK&11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11

MACY11l 30(1046)
T3l

LO?

10:43 PAGE 89
02-DEC-77
WRITE CHECK OF 18 BIT WORDS

SEQ 0083

AN °Rc000
52" a1 T ecC
“MAk Z0RE“NG ERRORS SET-"
823322 812957

!li!lllgg;glll!lllllllllIlllll!l'llll'llill!!lll‘ll!llll!lflll!‘ll’!

000001

001234

?ST

383369 IESS7 888328

888230

#1,STIMES

8SR

W
SH.LORDRK

.BYTE
.BYT

DO
C

iBUF

DESIRED

550 ”L“ n28¥?ERS

ch;

BUFFERnognsss 1BUFF
1WORD
C

WRTCHK ! CFMT

; COMMAND WRTCHK!CFMT

031770

JSR

RY, CLRIBF

;GO CLERR INPUT BUFFER

032014

gsR

R4,Y, BLDDA T

ggsho DA TA
-80
:

000400
046632
047636

MOV

MOV
MOV

o
autrRl
#0BUFF | R3

COUNT F
aurrsn SIZE
SETT AnoSnss
ogn
gr

DEC

JSR
JSR
ERR
ERROR

CCCLR RK
RY,
RY, oxsesx
Y
5§

75%:

MOV

BNE
00 0

43589

000000

1108:

MOV

ERROR
023316

023740

PATT RN
ngv

758

,LOOP UNTIL PATTERN IS MOVED

026500

104033

000000

002346

CONTR

S#S 9 ogt
TION
1ED SEEK
SIHULRT
:CS1 MIS onPakE
,HR
&
‘MR2

:MR3

R4, DSECTR

; SIMULATE SECTOR PULSE

JSR

R4, DRSYNC

;s SIMULAT

RY, DHDCMP

;SIMULATE HEADER SEARCH

R4, DRGPSN

ERROR
ERROR
ERROR

104014

S1(R2)

JSR

ERROR
ERROR

024276

0 xaurr

(R3)+, IR1)+

ERROR

012737

TOR

LEAR BAD

sec
o
RACK O

-4

004437
104015
1 052
4

;300 1 ITERATION

10
11

12
13
14

Hsno R PREAMBLE

iMR1 CONTE
:CSl conrenr

N ERROR
IN ERROR

‘MR courenos agERRO
ARCH
;CS1
{RKDCYL OR RKDA IN ERROR AFTER SEARCH
nno svnc

ERROR
RROR
RROR
ERROR

1S5
1B
32
33

nnx IN ERROR READING GAP
:CS1 } Ennon AFT n nsnoxnc GAP
YNC
RROR RE
'MR1
:CS1 IN ERROR nrrsn nsnoxnc SYNC

MOV

#0,ECPATX

:LORD EXPECTED PATTERN

CZRGEBO RKB11 DSKLS CTRL PRTS

CZRGEB.P11
4748

4749

02-DEC-77 10:21

020544

020552

012737

004437

00S066

027176

MACY1l 30(1046)

131

002350

02-DEC-77

10:43

MO?7

PAGE 90

SEQ 2090

WRITE CHECK OF 18 BIT WORDS
MOV

#5066, ECPOSX

JSR

R4, DWRTCK

Lono EXPECTED POSITION

SIMULATE WRITE

g
By
ERROR a1

ERROR

o
R
L
{2} fifi“fimofiificflét‘flEREap="0

MoV

#40. *40. ,RO

;SET COUNT TO EMPTY SILO

MOV

:;2; 020616 001370

MOV

BNE

ISHD,RKMR]
(R
18

LOOP UNTIL O

47
358253 8?333; 88§328 002220
4768 020632 042737 000001 002220

130
BIC

¢§§725851
oco E.CSI

EE¥
Exf‘nfigg
cs1
:CLEAR GU
B

BEQ

L
A
4783 85@1838«'?
4755

0205

:;'g'? 020572

4758

:;59

020574

1 0'40‘1 3

012700

003100

127

000440

1S:

020640
0646

052737
8 3737

:;;g

gggggg

104057

0654

000026

7% 000040 000026

4769
4770
4771

ERROR

1401

000200
002160

DEC

002220
002220

BIS
CMP

4774

ERROR

;ERR IN ECC PAT

;ERR IN ECC POS COUNT

#0MD!MCLK RKHRI(RE) ;CLOCK CONTRCLLER
; DEC_COUNT

#RDY E. cs1
1.0l ,E

:SET READYaxr
,cugcxF S1 CORRECT

1"CS1 xn ERROR AFTER WRITE CHECK"

l!«llllllllllllilllll!lll'lll!lll!'llIllllllllllllll!llilll!l!!ll!

:;;s

firssr 32

477

‘¥

:;;g
4780
M4
4783

5:
T
H
H

:;gg

47
4787

020660

000004

012737

000001

4790

00S037

4792

020700

005037

3;33

nnxs

NO E

e o 3636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 26 36 26 36 36 36 36 36 36 3 36 36 36 36 36 36 36 36 36 36 3 36 36 36 36 36 36 36 6 36 36 36 36 36 3 2 3 % ¥ X% %
t&132:
SCOPE
#1,STIMES

;;00 1 ITERATION

4791 35527u 005037 002354

002352

CLR

BSEDES

:;ga

CLR

HIBITS

;CLEAR BAD SECTOR ossxnso

002394

CLR
gsn

ECCSRC

RY, LOADRK

iCLEAR ECC SOURCE

’%9"0“L; SEGISTERS

oan;?u

712

004437

032230

3;3?
8%0313 oqsggg
4798 020716 177777
:799

020720

000031

4803

020726

004437

001234

1 CONTROLLER WITH A cour
LER CLERR
L%conrséLLsn
xn oxncuogxn
é¥on
3 u§xre
8b?gsgze flggfiggcgfigso
EE HROUSfi"gst
eCKED €427 worDS
gUEERESIfSRcugciE "358AcggoMRITE
35 51?"%

MOV

4795

020662

WRITE CHECK OF A PARTIAL SECTOR

.BYTE

igflgg ’

3§§g 020722 004437 031770
032014

-1
WRTCHK

JSR

R4, CLRIBF

JSR

R4, BLDDAT

:CLEAR HI ORDER BITS
iSECTOR O

sfirgsnonoonsss IBUFF

:WORD COUNT -1
: COMMAND unrcux

:GO CLEAR INPUT BUFFER
;GO BUILD DATA

CZRGEBO'RKG11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21
4382

020732

qeo;

734

8127

12701
812703

4813

020756

012762

750 012321
4803
33}5 8535?5 88?39?
850790

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 91
132
WRITE CHECK OF A PARTIAL SECTOR

000006

480
4808

ngu

NO7

83"“37

000400

100000

032274

00000C

104006

3355

021004

004437

023316

4823

021010

004437

023740

3353

4824
3925

qa59

4828
4829
:gg?

1002

021014
021016

ggg
BNE

1108:

MOV

4833 021032
021036 004437
104015
483°
3@3 051048
851044 104933
134033
4838 02104 012737
4839 1054 012737

#CCLR,RKCS1(R2)

e BigE gy Bh T

‘MR2

JSR

RY,DSECTR

TSR

RY, DRSYNC

RY, DHDCMP

10
11

12
13
14

RY, DRGPSN

15’
35
33
#0,ECPATX
cqbss ECPOSX

e
EIED IR
4844 021074 104055

e
8
ERROR
55

3335 851102 104043

ERROR

4849

;CLEAR CONTROLLER

4B4e 051100 10494s

sgg Egafl RN TO IBUFF
!LOOP UNTIL PATTERN IS MOVED

RROR

JSR
ERROR
ERROR
ERROR
MOV
MOV

002346

SET noonzss or 1BUFF
iSET RE OF OBUFF

:START THE OPERATION

ERROR
ERROR
ERROR

026500

000000

éga)+,!n1>+
75%

:SET
A COUNT FOR BUFFER SIZE

R4, OPSTRT

cRROR
ERROR

104012
104013
104014

4832

oxautr.nx
#0BUFF | R3

JSR

RROR

1020 004437 024276

1024
1026
021030

#400, RO

g
J-OimaK
ERROR
s

104007

104010
104011

MOV
MOV

75%:

48le 050774
1ouopa
Looodt
753
104005

4817
4818

;PATTERN &

MOV

046632
047636

SEQ 0091

ERROR

IRELATS
JaneD SEEX
IMR1
s
:MR3

; SIMULATE SECTOR PULSE
5 u;

R PREAMBLE

nnx cou ENTS IN ERROR
:CS1 CONTENTS IN ERROR

; SIMULAT u;
nnx cou
L Sn
nxoch

R SEARCH

N Enaon
AFTER SEARCH

DA IN ERROR AFTER SEARCH

S
;ngx READ
f"
RGAP
RORAND
g;ng
GAP
16R1
ERROR EEQE£HSERDING
REABING. SyNCC ooF
;CS1 IN
}u
SYNC
;LOAD EXPECTED
:LOAD EX TEB PATTERN
171

o adtel s

L
LSRN R TRRO RO
:CSI ERROR AFTER WRT CHK OR ECC READ
R TROECE
PRI CaLe, o ECC RERD

:ERR IN ECC POS COUNT

021104

013700

002164

MOV

T.BA,RO

;GET ACTUAL BA

485

35%%53

83?383

000002

ggg

:g,no

;$E§T
ngggnRecr NUM OF WORDS XFER

021122

012737

MOV

oxaurr+a,s.en

MOV

oono-néLK RKMR1(R2) ;RUN CLOCK

4851
09

4gS4

352%
4857

021110

021130
021132

162700

104046
012701

046632
046634

SUB

002224

00OOO40

4$:

4S8 021136 012762 000440 000026 3§:
4859

021144

012762

000040

000026

ERROR
MOV
MOV

#1BUFF,RO

46
48, ¥

#DMD, RKMR] (R2)

:SUB_START VALUE OF
SET

EXPECTED BA

:REPORT XFER LENGTH ERROR
:SET counr ro END OF OPERATION

CZRGEBO_RKG11

cfggea Pil
4860

1152

CTRL PR

8255&-77 10: ax

MACY1l

005301

zgé 35115« 001370
486
11
004437
4864 §u§ 013737

4e65
Y4

11
0427
851 76 8357

33673

%igiz

:ese nai 04 omzox

356

260 002220

000001
ggo

30(1046)

3?32

002220
002220

4871

-e

:DEC_COUNT

BNE
JSR
MOV

3s
RY, GETREG
L.AS1,E.CSI1

:LOOP UNTIL ZERO
csr 611 REGS
iGET EXPECTED €SI

ggg

.csl,E.CS1

:$§c5 ;.I-,E;Ss‘ CORRECT

BIC
BIS

002220

104057

PAGE 92
unngecns 09
A PARTIAL
SECTOR

DEC

18:

808

02-DEC-77

8GO0, E.CS]
#RDY,E.CS1

ERROR

,cuf'm GO BIT
:SET RERDY BIT

i»CS1 IN ERROR AFTER WRITE CHECK"

4872

zg;a

H‘;l!lllllll!lll:;:#glé:‘lg:lgagssl?m:l:’lllllllllllllilllllllil

4875

4876

;

;m;?

;;

m RKG11 CONT

4875
4880

"
%

R
o%sgSc:
gg
0.xru.n E n sec ORSEEK
m&"BSé;&%
PULSE

coumouzn m

en uxm A CONTROLLER CLEAR.
noos.

xssue A uTuTs

u8as
3§a§
4885

;:
E:
e

un
n:
D’ onm
- onm °° T%T %sggusunugon SETS.
5:
fg?‘C03}TQEEOLDLoumcco' fcuan5
s
e

488¢

oooom

ooo

MOV

#1,STIMES

4887

fl?ga'
% 91 021216 000004

%Eé 021220 012737 000001 001234
4895

(021226 005037

002352

4897

021236

002394

35':99

oe%aqa

004437

4301

021251

:904905“

6000 1

4306

021260

012705

4900 8512233 nnuonmuu

oaxa;u
021270

032230

4914

4915

1314

012737

021322

012762

021330

004437

HIB?;S

gsn

R4, LOADRK

'BYTE

x?urr

ECCSRC

WRTCHK
000020

47636
0001

MOV

:CLEAR HI ORDER BITS
CLsna ECC_SOURCE

ssc o

Rscxsrsns

TRACK

.sgsssg noonsss IBUFF

WiS.aewr

188110
Hiy swowp ge 0
:ELSE PATTERN suoum BE ALL ONES

#CCLR,RKCS1(R2)

;CLEAR CONTROLLER

021322

001110

112%:

MOV
MOV

#-1,0BUFF
#1108, SLPERR

100000

000O0OO

1108:

MOV

JSR

;CLEAR BAD SECTOR DESIRED

:SET PRTTERN COUNT

046632

;;00 1 ITERATION

#16.,RS

OBUFF
%1, IBUFF

032274

100000

onmmoD “ua'
TCHK

CLR
MOV

4310
0s130% Obiong
|Poool 04eb3s
491
ggxaos
12737 677777 047636
3313

BSEDES

CLR

.BYTE

000

805937
012737

CLR

:902 éig‘g 0-7«7,;;;
4907
Y4

000020
i¥
; g#gsl!l;gsgzllllllllllifil!&lll!llll!illllllll!llill*!lll*lllull!!

a;a; 021232 005037 002354
005037

éé 005000 040000

RY, OPSTRT

CL;m RST uon?
OF OBUFF
N FIRST PATTERN

*SET LOCAL LOOP ON ERROR
:START THE OPERATION

cznscao RKG11 DSKLS CTRL PRTS

CZR&EB.P11
4916

021334

02-DEC-77 10:21
004437

Al Eing
e
1
1

‘

MACY1l 30(1046)

023334

133

02-DEC-77

10:43

CO8
P

SEQG 0093

WRITE CHECK emos (P% 1)
JSR

RY,DISEEK

s SIMULATE IMPLIED SEEK

e
ERROR

5]
miscareane
‘MR2
-

: é 021350 004437 023316

JSR

RY,CSECTR

: SIMULATE SECTOR PULSE

023740

JSR

ERROR
ERROR

RY, DRSYNC

10°
11

1 CON ENF?c%u ERROR
csx CONTENTS IN ERROR

Y4
gx11364 110401
?g 024276

JSR

RY, DHDCMP

SIMULAT

491

:g 021346

104007

1354

Y4: § 351320
104010
021362 104011
Y4

L qgax

021374

3 i

:937
49

4940

3;3

851-4
1

021410
141

RROR
RROR

104014

Y
M

ERROR

026500

1
1

104033
12737

000000

002346

was 312737 004066 002350

{:gs

’ 027176

4943

021434

104053

434
Yy7

O21442
gsww

104091
13:335

4950

021450

012701

:ggg
Y

021472
Y7y

001370

12’
13

IMR3

1! numr

R PREAMBLE

con‘5903
r'fi' EZ:'?mon

,nx oa RKDA IN ERROR men SEARCH

JSR

m.oncpsn

RROR
RROR

BT HEDINEe
:GO

RERD

.gai i
:

ERROR
MOV

MOV

20 scpmx

#4066

.lrsa

R4, DWR cx

%? READING GAP
NG SYNC

;CS1 IN ERROR AFTER READING SYNC
: LORD EXPECTED PATT!

I%ION

4944 3514
183%45
4945
143§ 1

Ennon
ERROR

RROR

MRL IN E

:gg

ERROR
ERROR

ERR

91
42

{ECC REG INCORRECT AFTER ECC READ
{ERR }u CC PAT CALC.

1446

000040

3953 g%a?fi §§7301

3883“

:m gismsoo w883‘7'w§3

1484

4959 851210 1

“8 888852 =

021534

104415

851343 005305

1536

006337

021544

001266

496

:ggg

002170 001162

#8.%4.

BNE
JSR

18
RY, GETREG

——

OBUFF'SREGE
sg !

I2ETWORD FROM BUFFER
1 *LCE FAILED TO SET"

ASL

:LOOP UNTIL ZERO

Mov
ERROR
DEC

:SET COUNT

GEsrmfruge SET

BNE

———

ECC POS COUNT

sgcs,r.csa

T.CS2, SREGO

.EE? csgx}on REPORT

;LOCAL LOOP ON ERROR
IBUFF

1108

;SHIFT F

NEXT TEST PATTERN

:DEC PRT?RR

:LOOP UNTIL nu. PRTTERNS TESTED

22222212222 2222222222222 22322232323223222223232222222222232222222
22

'iTES
T 34

———

CC RERD

#DMD! MELK, RKMR1 (R2) ;RUN CLOCK

SCOP1

046632

S,I,E

MOV

2%:

4870

:ERR

MOV

345833 002170

4971

cxon

;Egc
émon N wm cuscos
:CSI ERROR AFTER WRT CHK OR ECC READ

BSX 3?"8'”("“““) ;DEC COUNT

436,
051858 013737 043636 88%%22
:ggé 851?52 164
:gg;

54
&5

WRITE CHECK ERROR (PART 2)

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21

CZRGEB.P11

D08

MACY1l 30(1046) 02-DEC-77 ERROR
10:43 (PART
PAGE 2)
94
WRITE CHECK
T34

4972

;¥

4973

FRe
¥

LEAR RKG11

R WITH A CONTROLLER CLEAR.

4i
:3;9
..3;8
4980

o "%%o
RSE ité Le HROUGH SEEK
g%fi
m‘% VE CLE éssncgs &ufl;i A sscx:;oa mérs‘nfl??
flnf?fnclic“gffl'ge
99‘1 AT USING EACH
Em
i
CHECK E
OF THE FOLLOWING

3383

:988

*s;s‘l’!IlglsgzillllillillIIlll!llllll!!illlllllill!lllllllllllilll

3335

5es
4387

fi’?i 851338 8?393; 000001 001234

:%a

oa{sss

oosoa;

ooaggg

e mm

OCNFIGURATION RS WRITE CHECKED DATA:

nSv

#1,STIMES

;;oo 1 ITERATION

asi;s?;g

e
LEAR BAD secron ozsmso

efé
EOURCE

35 gi% 000
3“5 oaism
Wauu
g@
@fi
! 1
5005 gx
1610
1
12737 B
177
046632
Sooi
GRIElY
oty
50057 gaei&sas 0331737 000001 046632
200 D21
1 n7§ 77777 04763
%
ww §‘1J$7
621552 001113 1128:

Davrs 0 :
13{}5 ’
:ufircm
MOV
,
ns
MOV
$177776, IBUFF
o
o
E,I,E
oaxro IBUFF
MOV
MOV mo?E!PERR

ésc
E
1BUFF
£oma%um”
HORDr:sanogness
TCHK
T mr RN C
PATTERN
§‘m'EasB30
or osurr
:
mns
!&§ELOCH.
Loo§ 8«ULERESRLL ONES

soxg
801
5014

JSR
JSR
ERROR

RY, OPSTRT
m DISEEK

:START THE OPERATION
:SIMULATE IMPLIED SEEK
:CS1 MISCOMPARE

RY,
10 DRSYNC

SIMULAT
PREAMBLE
n%x
con?sf#ADER
fu ERROR

R4,

;SIMU

5011

021652

1660
15%
16

012762

004437
ooqgsz
104

100000

032274
023334

5015 021672 104005
5016 021674 104006
gg{; 021676 104007
gcue 021700 004437 023316

353
2855
5023

1?7
Y437 023740
1710
104010

021712
1714

5027

104011

Y437
1720
?84012
021722 104013

024276

000000

1108:

MOV

#CCLR,RKCS1(R2) ;CLEAR comaousn

ERROR
ERROR
ERROR
JSR

5
b
7
RY4,DSECTR

ERROR

JSR
ERROR
JSR
cgnon
ERROR

DHDCMP
12’
.
13

IMR1
®
:MR2
‘MR3
s SIMULATE SECTOR PULSE

:CS1 CONTENTS IN ERROR

ADER
SEARCH
3
bon
e;fi
'f
ES
cs1 IN ERROR AFTER ssnacu

SEQ 0094

30(1046)
T34

437
104015

026500

I
000000

1 Y7§§ 004066
027176

13:825

012762

18:

0440

8800“0

000040

0044

00101 glg?;g 002170
1373
13737
4060

04663
04663

ERROR
JSR

RY, DRGPSN

;GO

Egggs

15’

ERROR

;ggi xn E
OR AFTERnsgoxuc GAP

1CS1 }u
RROR
EE READING SYNC

MOV

%0, ECPATX

JSR

RY, DWRTCK

;GO SIMULATE WRITE

:NUMBER OF WORDS TO SIMULATE

:MR1

IN ERROR ON WRT CK OR ECC READ

MOV

88, ¥

:SET COUNT

DEC

R1
18

;DEC_COUNT
:LOOP UNTIL ZERO

RY csrnsc

;GET_REGS

T.CS2, SREGO

iSET CS2

oono-nCLx RKMR1(R2) ;RUN CLOCK

MOV

#0MD, RKMR] (R2)

BIT

5;6: .CS2

MOV
MOV
ERROR

IBUFF. SREG1
OBUFF| SREG2
60

‘$E§T IF gce SET

FOR

REPORT

iSET
D
READ
:SET WORD FROM BUFFER
:®WCE FAILED TO SET"

SCOP1

;LOCAL LOOP ON ERROR
IBUFF

;SHIFT FOR NEXT TEST PATTERN

1108

LOOP UNTIL ALL PATTERNS TESTED

1BUFF
RS

iPUT CARRY anc IN
osc PATTERN COUNT

2222222222222 222222222 Y 2 2 2 e 2

R S RS RS T E ST R P R R PR R

WRITE CHECK ERROR (PART 3)

CLEAR RKB11l C TR

sn W TH A CONTROLLER CLEAR.

tx
‘¥

chxggen o
nE
Snn
&L

SECTOR g
OCK THROUGH SEEK
S.
IHULQTE A SECTOR PULSE,

‘¥
‘¥

PUT conr OLL

ta713s:

TIC MODE.

;ss

A WRITE

CHE

uSao nxos IN aq ssc OR FORMAT

A G

ukxTE

OF ;o

ONE WORD OF DATA CONSISTING

CK DATA IS 000000. MAKE SURE

g? sngggcgnennon SETS.

R332

001234

PATTERN

E§F§§¥E£ POSITION

;;
¥

000001

:ECC ERROR IN WRITE CHECK OP
:CS1
ERROR AFTER WRT CHK OR ECC READ
;Ecc
G INCORRECT AFTER ECC RERD
;ERR IN ECC PAT CALC.
:ERR IN ECC POS COUNT

ires 35

000004
012737

YNC

5S4
S5
91
42
43

BNE
P

naxnc GAP

no GAP

ERROR
ERROR
ERROR
ERR
ERROR

ADC
DEC
3

:MR1 IN ERROR

#4066, ECPOSX

ASL

006337
005537

;RKDCYL OR RKDA IN ERROR AFTER SEARCH

505

b32
Dfl?b36

2%:
022066
G22072
022076
022100

JSR

032356

SEQ 009S

ERROR

0001

81 755

EOS

02-DEC-77
10:43
PAGE 95
WRITE CHECK ERROR (PART 2)

MOV

002346
0023s0

104041
10“045
10404

Pt Bt B

s Pt P

MACY11l

104014

§1 7

Pt ot Bt Pt

s Bt

s B

]S EFARTS 83 S99y o

RRRRR PR RRRRRBLG RRmLD R

$i338ae §

gZRSEBOPTTEII DSKLS CTRL PRTS
02-DEC-77 10:21

REPEAT USING 400000 RS

3222222222322 222 2222222222 222222222 2222222222222 2t ]

SCOPE
MOV

#1,STIMES

;;00 1

ITERATION

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZReEB.P11
5084

goes
oe;
g&

FO8

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 96
WRITE CHECK ERROR (PART 3)
T35

2112 %30;17
2352
11
037
2344
1
m 032230
1

2164

100000

51
172 012700 DO4000
gosaoo
5175
sxgé
gig 022200 001376
5105 oas
004437 032274
sxog

510

2212

004437

104004

000000

023334

2109 05516 104008

S115

E}{?

022234

104011

S123

5124

022250

022254

004437

104015

026500

5129

gxgo
131

022264

832558
H

012737

000000

4437

027176

2737

S132
5133

022304
022306

000001
104053

§137
gigg

022316
022320

104042
1040

5134
5135
5136

oaaaxg
022312
022314

10405
104055
104041

005066

#4000, RO
RO

JSR

RY, OPSTRT

;SET sm.
‘r COUNT
LOOP uum ZERO
mm THE OPERATION

ERROR

c51 nxscoARE

JSR

RY,DSECTR

: SIMULATE SECTOR PULSE

ERROR

BNE

002346

002350

RY. DISEEK

$CS1 CONTENT

ERROR
ERROR

35
33

1
ERROR

ERROR
ERROR
ERROR
ERROR
ERROR

RY, DRGPSN

JSR

i
:MR3

;81
numr; ADER PREAMBLE

JSR

MOV

ATE IMPLIED SEEK

R4, DRSYNC

RY, DHDCMP
1
114

MOV

:WORD COUNT -

#CCLR.RKCS1(R2) ;CLEAR CONTROLLER

JSR
ERROR
ERROR
ERROR
ERROR

2158
055588
§igg 35
262 104048
133033

:BUFFER RDDRESS IBUFF
! CFMT
WRTCHK
;C
;SET mans
READ OF 200000
LOWB FORFORPATTERN
:SET
.ssr IN
rsa
:SET LOCAL_LOOP ON ERROR

MOV
DEC

MOV

ERROR

5118
2236 004437 024276
5119 855 g2 mwms
5120
4 10401
?igé 022246 104014

:TRACK O

4s:

1108:

JSR

104010

:CYLINDER O

;;ecron 0

112%:

ERROR
&
ERROR 7

022226 004437 023740

022232

;CLEAR BAD SECTOR DESIRED
:CLEAR ECC SOURCE
:LOAD "L" REGISTERS

iBUFF
-1
WRTCHK! CFMT
MOV
#40000,HIBITS
IBUFF
CLR
CLR
OBUFF
MOV
#1108, SLPERR

JSR

gi {o 352223 104007
E{{é 022222 004437 023316
S114

'BYTE

.BYTE

1
6
1
10031
1
095
2140 012737 (040000 002354
305037 046632
51
50
1
005937 047636
sogg ggax
81 37 022164 001110
g?w

BSEDES
ECCSRC
R4, LOADRK

000

0221

CLR
CLR
JSR

SEG 0096

15’

gf"
nnon

,sxnu.m; n SEARCH
‘MR
RROR
,csx
Enoa
.nxoc OR RKDA xu snnon orrsn SEARCH
:GO

‘MR1

RERD GAP Auo

ING GAP

PGR1
RETER Ref0InG oaP
:csl §n
IN RROR
fiflgfi"gcmxm
SYNC

#0,ECPATX

;LOAD EXPECTED

PATTERN

osbss;cposx

:NUMBER OF WORDS TO SIMULATE
:MRL IN ERROR ON WRT CK OR ECC READ

5S4
55
41

42
43

1GO

xpsgr D
P?‘E‘ITION

SIMUL

*ECC ERROR IN WRIT cucc oP
CSI ERROR AFTER WRT CHK OR ECC RERD
;scc REG INCORRECT AFTER ECC READ
EERR IN ECC PAT CALC.
‘ERR IN ECC POS COUNT

0%2701

%Ss“-fi Bi3%

000040

022346

o
23

004437

2737

MACY11l

88665

30(1046)
T3S

13737 047636

2430
2432

005300
001374
104063

022434

104415

022436

023727

002354

022446 g?é;g; 100000
055354 000843

002354

5 R

;GET REGS

MOV
MOV

T cS2, SREGO
IBUFF , SREG1

iSET CS2 FOR REPORT
:SET WORD RERD

snsg;

iSET UP FOR REPORT

oués

OBUFF , SREG2

ROR

SREGY

s14. R0

RO
3%
63

;"WCE FAILED TO SET"

;LOCAL LOOP ON ERROR

HIBITS,#100000
S3
oxooooo,uxexrs

108

T 36

HtxH
;:

;LOOP UNTIL ALL PATTERNS TESTED

WRITE CHECK ERROR (PART 4)

CLEAR RKG1l

ER uxrn A CONT

PUT
coanQBOESN
3&

nn nx

LER CLE

WRITE

cron ronnnr

onx
ARQs
RULATE f sSm
SECTORPUEEE
& Go0p."&8&5
“°SORIuofio"s’-

11: cuecx ERROR strCHECK uono COUNT

RND

I3 33232322323223223222223222
222222322222 22222222222 222222233

000004
012737

000001

03223

|=]

o
my

022428

001234

t&136:

SCOPE

MOV

#1,STIMES

:;00 1 ITERATION

&R
JSR

Hifoes
R4, LOADRK

iCLEAR
StQ 08DESIRED
L%SD olBRD
® REE?

.BYT
"BYT

0
0

xaurr
400

031770

JSR

chxnoen
TOR O
K 0

aurrsn ADDRESS IBUFF

:WORD COUNT

WRTCHK
004437

;TEST IF sscono PATTERN DONE
; £§
XIT
*SET_FOR PATTERN 400000

2222222222222 23222222232222323333222 2222322222232 222222 222222

022514

:SET WORD FROM BUFFER

HIBITS, SREGY

OUNT

ngr IF 1 E SET

MOV

CMP
BEQ
MOV

RY cstasc

SCOP1

;fir

:§g§qn65é nxnnxcka) SSH"ELocx

JSR

DEC
BNE
ERROR

100000

SEQ 0097

50509 UNTIL ZERO

MOV

2%:

PAGE 97

(PART 3)

R1* bt

CLR

3s:

GOS8

"Eg
NE

MOV
001172

10:43

WRITE CHECK ERROR

Efi{

040000

Ssga?q
13500 0OGO1E
B55us8 OdGo3s 001178

02-DEC-77

:03

032356

£
DRB3E
S S 104 o

022322

R
2
on

Bt e Bt 5t Bt et Bt et Pt Pt Pt Pt Pt ot Pt Pt ot Bt s

RESR B3B8 VRR 2OV B I3 IINIRPS AL

Bt B

ot Bt P

RA A

ot s Pt et Pt s Bt Pt o

un
(¥4

s Bt et s ot Pt o Bt o Pt ot s P —

AN
OOONAIOOAOIAOAOMTNIINTIINTIIINTUIWLN n
s Bt Bt ot Pt ot Pt Pt et

CZRGEBO RKB11 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21

-400

! COMMAND WRTCHK
R4, CLRIBF

:GO CLEAR INPUT BUFFER

CZRGEBO RKB11 DSKLS CTRL PRTS'

02-DEC-77 10:21
CZRBEB.P11
5196 022520 004437 032014

MACY1l 30(1046)

T36

igg 022524 000005

10:43

PAGE 98

:PATTERN

127
3
29 BEER fieel
B

gfi ggwa m

758:

MOV
o
ng\é

ooaurr R3
BT
(R3;+, (R1)+

UFFER SIZE

;SET A

iSET BRSSO
oaurr
BT
rnur
,figgpmn?m T0 IBUFF

BMOV

§Es
#530, RO

050636

MOV

#126073, 0BUFF+1000

08 % 000100 047636

BNE
ggs

1008
{YES - SKIP
:Srrs.owrr(m){ELSE SET BIT

100%8:

BIC

$B1Te,0BUFF (RO) ;CLEAR BIT

5219 022624 012762 100000 000000 110%:

MOV

022550

012700

000S30

gzssu

81573;

126073

gov
BIT

050“3
Esfi 1 ; B0000,
2509 855?
2“35
1
§5?3
211 022604 001004

gig g
14

gis

022624

218
g
H
5222
saga

022632

000100

047636

1018:

SEQ 0098

WRITE CHECK ERROR (PART 4)
GOBUILD DATA
R4, BLDDAT
JSR

02-DEC-77

HO8

;

3‘3 L PATTERN IS MOVED

;SET INDEX INTO BUFFER

;STORE ECC WORDS

T-S?2"8? TO8 *INDICATE ECC IN BUFFER
:1swsagy
gwrrmm ?Esr
MS
J

#CCLR,RKCS1(R2) ;CLEAR CONTROLLER

2644
022646
022650

004437 032274
og:a
1 033 023334
183005
104006
104007

JSR
JSR
ERROR
ERROR
ERROR
ERROR

RY, OPSTRT
nq oxssex
s
b
7

IMR1
IMR2
:MR3

ggg

022652

004437

023316

JSR

R4,DSECTR

: SIMULATE SECTOR PULSE

5227

022656

004437

023740

JSR

R4, DRSYNC

nuuars HEARDER Pnsnnat.

3ge3 Bacetd
4 194010
104011
=0
437
427
il
gamse
fpuy
omere
g3
26749 104013

gsgg

022676

104014

5236

022700

004437

gsgg
gg:g

7
710
2712

104016
104032
104033

squ

022714

012737

022736

104053

S249
€250
251

742
(022744
022746
022750

104055
104091
104042
104043

5237

2704

104015

026500

000000

SCoMP
-

ERROR

R
H
Ao
zs..os
N ERROR AFTER SE

JSR

R4, DRGPSN

;GO READ GAP AND

ERROR
ERROR
ERROR

1B
32
33

iC 1
;
.c51

MOV

#0, ECPATX

2543
45 050738
852733 Obau3r
83310 Oo7i5g Coees0

R
310

104054

ERROR

gg:?

RROR
11
w19
R
RY, DHDCMP
on
T
ERROR
13

ERROR
002346

:START THE OPERATION
IHPLIED SEEK
:5 nm.mg

ERROR

ERROR
ERROR
ERROR
ERROR

53
&5
H1
42
43

csx{

TENTS
TS 1AIN

;nxoch OR RKDA IN ERROR nnsn SEARCH
iMR1 IN smon

N
N
N

n nsnomc GAP
TER nenomc SYNC

RROR ag

;LORD EXPECTED PATTERN

g s ".-.‘SNJL
;wngénRy
uonogfo
ATE

:MR1 IN ERROR ON WRT CK OR ECC READ

;Ecc Emon

N WRITE

CHECK OP

:CS1 ERROR
AFTER
WRT CHK OR ECC READ
:ECC REG mconnecr AFTER ECC REARD
iERR IN ECC PAT CALC.
‘ERR IN ECC POS COUNT

FORRORRRRIR) R
REAEN
YW NN N
Re8om

SRR|

0 RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
P11

108

MACYLl 30(1046)
02-DEC-77 10:43 PAGE 99
WRITE CHECK ERROR (PART 4)
T36

:
18:
000026
000440
gss 4 815;25
01
000040 000026
012701

g22

355

7749

000020

005396
0013

004437

032356

. ¥,
;RUN CLOCK
nxnnxtha) T COUNT
oono-néLx
oono RKMR]1 (R2

BNE

JSR

RY, GETREG

DEC

002170

BIT

137

332133

001162

MOV

gggz

16037

683362
e

047636

001166

023040

012737

046634

16037

gsaosa
3064

060037
3537'7
1402
104061
000410

023066

012737

023074
023102
023104
023106

023737
001401
104062

002224
002224
177655

002162

BNE

001164
002224

MOV

ERROR
2%:

002164
002222

002222

3%:

4$:

TO END OF OPERATION

MOV
MOV
MOV

040000

301

737

SEQ 0099

MOV

ADD
CMP
BEQ
ERROR
BR
MOV

CMP
BEQ
ERROR

:DEC_COUNT

:LOOP UNTIL ZERO

sWlE, T.CS2

T.CS2,

SREGO

IBUFF LRO), SREGL

;GET '611 REGS

:TEST IF WRITE CHECK SET

:YES-

SKIP

;35; EP FOR REPORT

FER WORD

OBUFF
(RO) , SREG2 ; SIMULATED WORD

6
4

{WCE_NOT SET ERROR
T
;

RO,E.BA
E.BA,T.BA
3%
61
4s

8IBUFF+2,E.BA

:ADD IN THE na;n OF WORDS TO THE ERROR
cuecx xr conn

#-123,E.UC

s:r sxpecrso WORD COUNT

T.WC,E.WC
4§
B2

;SET UP EXPECTED BA
YES
-

SKIP

aus ADDRESS ERROR
TEXIT
CHECK IF CORRECT
IVES
- SKIP
*WORD COUNT ERROR

CZREEBO RKBL11 DS KLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

02-DEC-77 _ 10:43
ND OF PASS ROUTINE

MACY11 32(10“6)

.SBTTL
R

JO8

PRGE 100

END OF PASS ROUTINE

23213112123 323 322223333222 3333323222222 222 222222222222 2222t

: K INCRE

NT THE PASS
; #TYPE "END PASS #XXXXX

R_(SPASS)
TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYYTM

AR
V=TV~
OOQOD—W\»
- Ooun
+0
=
VO

SENDCT:

;; YES

.WORD

digtTM

$DOAGN:

—

000

SRTNRD:
SENULL:

012762
012762
000204

0001 40
000040

000026
000026

OSECTR:

; ;RESTORE COUNTER

;s TYPE ASCIZ STRING
: ; GE T OVER THE ASCIZ

:;;@gg gzggs ronE;vpsour

ASCII WITH SIGN
EE$0 TYPE-- lglgflL
STRING

;3 TYPE egcx
THE RSCIZ
: ‘GET OVER
TOTAL ERRORS SINCE LAST REPORT -

67%
63

FOR TYPEOUT

SERTTL,-(SP)

; ;SAVE SERTTL

PC, (RO)

BRANCH _IF NO MONITOR
:
: ;CLEAR THE WORLD
;:GO TO MONITOR

ASCIT WITH ES
100YPERR TYPE--DECINAL
RE TURN
1iTY
}

$SGETH2:

SENDAD:

377

$PASS,-(SP)

023206

001245
00llle
000042

; sLOOP?

<12>¢15>/END PASS’ %/

oo1112

La(PC)+

65%
4$

023154

001256

)

.WORD

WWWWWWWWwWwWwWwwww

SEOPCT:

W
wWww
Wy
neoe

; sZERQO THE TEST NUMBER
; ;2ERO_THE NUMBER OF ITERATIONS
; s INCREMENT THE PASS NUMBER
;3DON'T ALLOW A NEG. NUMBER

00, SPRSS

001256

.SBTTL
rnn
CNDE;

ERS

SEOP:

:?- bhfl—:hwfl—hhfl—::?—h
SEasuRRS B 3*: AN
RfRoRERESTORR

PRI
O RRR RR RRRKPRRRJRRRLN
WWw
ww

un
W
O

;?zgfigy“fl"uqy“flunnU“flU“flU“flU“flU“flUl
NERRRRRRR
Sgepiess gggfl8§

; #WHERE XXXXX AND YYYYY ARE DECIMAL
; #IF THERES A MONIT OR GO TO IT
; #IF THERE ISN’T JUMP TO NEWPAS

WWWWWwwWwwwww
e et Pt P Pt ot Pt s Pt Pt
N
—
DO NN LWh-0O

SEQ 0100

ADDRESS

: 'SAVE ROOM

1iACTIL
J
.
.

d(PC)+
NEWPAS
-1,-1,0

; s RETURN

: sNULL CHARACTER STRING

DIAGNOSTIC MODE SECTOR PULSE
THE SECTOR PULSE IS PROVIDED BY THIS ROUTINE
MOV
MOV

RTS

$DMD!MSP,RKMR1 (R2)

agHD,RKth(RE)

29 ET SECTOR PULE

;RESET SECTOR PULSE

CZREEBO axsxx osts CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

KO8

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 101
DIAGNOSTIC MODE IMPLIED SEEK

SEQ 0101

5339
5340

.SBTTL
¥

gg:g
5346
47
sggg

2343

H
E:
tx
x
%

QIEFERENT
COUNE FOR
DATACLOCK
BNO RERD
ATA/MRITE
CHECK,
ACCORDINGLY.
COUNT
sc#g ?us
AND MIITE
(L.CS1)
STARTED
AT THE END
OF THE IMPLIED
SEEK THE CONTENTS OF CSl
MR2
AND
MR3
CHECKED
TO
VERIFY
THE
OPERATION.
ALL
oiscns#:ncxss
ARE REPORTED IN THE
ORDER LISTED.

5350

CALL:

8341

S¥

§35]
5352
£353
5354
ggss

5339 023334
5358

6359
5360

023334

e
tx
tx
‘¥
e

DISEEK:

010046

0233
oefiauo

010346
032537

000002

5365

5359 §§%3 §§f§§2 010000 002260
é%ia 3372 012700 00S222
gggg 8%
700 000016
118:

004612

108:

5371

023402

012762

000440

1S:

éééé §§g§§§ 3?57?0 000316
2354

5372 023410 012
T

002260

000026

000040 000026

0234

sagg

353«54

53801 gsaqu

103

113703

84;;
1

00630

384 023456
53%59&
(023460 15370;

5385
ggg;

3533?3

83?53

002246

ggg?

023504

010337

002250

£392

023510

013737

002260

6393
5394

023516
023524

012737
004437

022040
032356

MOV

15%:
002260
168:
002220

002244

RY, DISEEK
ERROR
;CS1 MISC
4
S
iMR1 MISCOMPARE ERROR
6
:MR2 MISCOMPARE ERROR
7
iMR3 MISCOMPARE ERRON
RO, -(SP)

;PUSH RO ON STACK

MOV
Sfi}

R3'-(5P)
OS;TI,L.CSI

; :PUSH R3 ON STACK
$g§cx grxgnxrs DATA

MOV

géz
MOV
ADD

:fgnvL.¢s1
%66, ¥41. RO
#4%3+2, R0

#66. %37. RO

,couur FOR CLOCK THROUGH SILO LOAD

#DMD! MCLK nxnn1c

MOV
JSR

L.DCYL,R3
RY, FSBLWV

BIC
MOV

0177400,n3
%5, RO

:gx.uq+a,no

noz
#DMD, RKMR1 (R2)
W
MOVB

177400
000005

5388
023474 0S27 001000
6389 023500 004437 032444

JSR
ERROR
ERROR
ERR
ERROR

MOV

002267

002266
010000

GETTING ?TR US, AND CLEARING THE DRIVE. SINCE THIS REQUIRES A

ggv

§g75 023422 013703 002274
gggg 853453 goqu 7 032444
5379

DIAGNOSTIC MODE IMPLIED SEEK
H$ CONTROL#ER 1S CLOCKED THROUGH THE SEEK MESSAGES

R3'E. nna
L.OT

:SET COUNT FOR READ OR WRITE CHECK

,;gs é;xga SECTOR MODE
:ELSE CHANGE FOR 18 BIT WORDS
:nuo SHIFT REGISTER LORD
:SET CLOCK

An c#ocx
AN

R$Ee
STO

IRED
CYLINDE
ORDER OFB

ExP?CTEnna

.cer SIRED

ancx/ CTOR

SEE

SEéFc

gés

L.DS,R3
:grnf L.CS1

Nssr IF fie BIT MODE

BNE
BISB
BIS
JSR
MOV

MOV

MOV
JSR

158

#BIT9,R3

RY, rsvav

o? TRRCK ALIGNMENT

:LOOP
é& IL ZERO
;stn SECTOR NUMBER

'ELSE
s* ronnnr BIT IN HDR WRD
‘REVERSE BIT ORDER

R3.E.MR3

:STORE AS EXPECTED MR3

L.CS1,E.CS1

:GET EXPECTED CSl

#OMD! ECCWIMEWD,E.MRL ;SET UP sxpecrso MR1
R4,GETREG
:GET RK REGS

CZRGEBO RKG11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11
5395

gggg

gqe

3540

3737
1411

012737

LO8

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 102
DIAGNOSTIC MODE IMPLIED SEEK

002160

002220

023562

001236

S"P
£Q

MOV

023546 032777 001000 155364
gu
g:ax 023554 001056
S403

023560

853?23 83373; 002244 002204

§~4

S408

023572

001410

§31
S411

353253
023604

387535
012737

001000
023614

155336
001236

guxu
415

Ssggxu
16

ggg sq
737

002246

002206

001000

155304

023646

001236

5419

gwx
418

6419
g:s?

023612

023636
023644

000761

001410
oas

012737
000744

B
7
002250 002210
§§§§§§ §g§z§2
g:gg
5425

5:
s:

(023660

032777

001000

155252

2777

001000

155232

gzgg

023722

BIT
BNE
MOV

gg:

;

000204

: CHECK LOSS 3N ERROR

3§
RY, - (SP)

18T

RY)+

BEQ

CHP

.MR1, T.MRI

gggngaczze T0 RETURN FOR
IYES - sxx
:SET STACK FOR RETURN TO SUB-ROUTINE
UMP TO NEXT ERROR CALL

HECK MR1

SKIP

ggxrq.asun
823, SESCAPE

ugux gr boop ON ERROR
ssr ESCAPE FOR RETURN TO SUB-ROUTINE

1ST
CMP

(R4)+
E.MR2, T.MR2

:SAME OPERATION AS ABOVE TO
:CHECK MR2

BIT
BNE

chrq,asun
9

5§

MOV
BR

%58, SESCAPE
43

1ST
chP

PR3, T.MR3
E(R4)+

BIT

#BIT9, ISKR

535
BR
6%:

#BIT9, ISKR

#2%, SESCAPE

BEQ

5%:

; CHECK gsi
OK- SKIP

RTS

&E
MOV

3$:

1.CS1,E.CS1
2%

:SAME OPERATION AS ABOVE TO
RES
;gussx

2’5 SESCAPE
42 y
#BITS, ASWR

sCHECK

LOOP ON ERROR

NE
Esg
MOV
MOV

9§ !
‘R"éap
f§§
sa
(sp)+'RO

5 §b
gunp T0 NO ERROR RETURN
,,bS 533fnro R3
::POP STACK INTO RO

MOV
JMP

SESCAPE

#STACK, SP
SSLPERR

CLEAR ESCAP
:-co
ERN
OFF s§QCK
TO LOOP START

RTS

5438

023724 005037 001236
6439
023730 012706 001100
g::? 023734 000177 155150

78:

CLR

g4y

S44

.SBTTL

[

5445

‘¥

DIAGNOSTIC MODE
?
E S ?? READfigSYNC
“I» PRTTERN
BITARE (PREAMBLE)
CLOCKED THROUTH THE RERD.

AT THE END OF THE SYNC READ, CSI IS CHECKED TO INSURE IT

S446

S4y4?7

5448
5449

§450

[

2%:

08352§ §g§9§; 023700 001236
8532
727

?u 1 853;82 1001
szag oaa;io 005724
qufl
85371 8?3233
6435 023720 012600

4s§:

000204

g:gg

gzig

|
.

023556 010446

SEQ 0102

‘¥

tx
‘¥

‘¥

THE conrsnrs MR1 nns no
NITORED TO WATCH FOR AN ERROR

DID NOT GET CHANGED.

CALL:
JSR

ERROR

R4, DRSYNC

10’

‘MRl CONTENTS IN ERROR

CZRGEBO RKB11 DSKLS CTRL PRTS

02-DEC-77 10:21

CZRGEB.P11

MACY1l 30(1046)

02-DEC-77

10:43

PAGE 103

DIAGNOSTIC MODE READ SYNC PATTERN (PREAMBLE)

§3§é

ERROR

5453
5353

¥
x

IF AN ERROR IS DETECTED, THE SUBROUTINE WILL SET UP TO ABORT
THE PRESENT TEST UNLESS' LOOP ON ERROR IS SET.

DRSYNC:

MOV

853;38 010046

§§§§ giig figg fizgfi

§§§é ggg % figfig 002244
4

465

31616

466 85#000 89523;

26 002204

S467
4

oauoxq

023737
001424

002204

547,

024

037

001236

375

8538:3

353783

001254

002244

35% 024016 012737 024066 001236

g:;q §§§332 §§%5%I 001000 155102
Y

53;3 §§§§§§ 1&3937

s:eo

oauosg

oxaggg

033472

024076

1236

000177

gggg 024102 012737 122040 002244
Yy

737
4391 8531110[ 895237
8868%2 002204

§3

5494

024132

85?535 002204

002244

012737

024142

001236

JSR

;GO_READ A BIT

fi'fie

6F§fF£W'ECCH E.Hk%Sigs og)s(PéCTED MR1

MOV

nxhaxtsa) T.MR1 ;cer MR1

MOV

#28, SESCAPE

T.MR1,E.MR1’
23

:CHECK IF IT IS CORRECT
1YES - SKIP

CLR

SESCAPE

;CLEAR ESCAPE

ggz

aassrn,RO

MOV

ssu BTB(RO), SESCAPE

ggg

éfip)+,no

ggg

suB

INC

DEC
BNE

MOV
JSR

MOV

rgxre,asun

;SET ESCAPE FOR CONTINUE TEST
$HEC§ }; LOOP ON ERROR

"ELSE SET UP TO SKIP TO NEXT TEST
;;POP STACK INTO RO

BITCNT
ag

:LOOP UNTIL RERDY FOR READ GATE

8127

COUNT FOR REST OF SYNC

; INCREMENT THE BIT COUNT

oono-hsuo-sccu-nbcnrsE.MR1 ;SET NEW EXPECTED MRl

READ BIT
nxhnxtsa) T.MR1 -327
MR1

Esnnl.e.nhx

cugcx gr Sonascr

MOV

%63, SESCAPE

SET ron courxnus TESTING

iNC

CNT
B1
gg

UMPO
BIT
TER
S
BNTER
:LOOP UNTIL nsnov FOR SYNC 1

002322

MOV

;MOV PRESENT TO PREVIOUS

ssgg
ggou 32:{96
0 qaos 80273;
053537 336352
002204 002204
002244

MOV

%33
CMP

BEQ

5&&5??55)
T.MR1 'ESTRES?
T.MR1,E.MR1’
: CHECK é;xgonnscr
7$

oauiso

66?329

005237

002326

§§8?

¥l

13737

SS0S
2208

024206

Sgge
5439

4yiv2

8923

SLEM'}?
TO CLOCK TO READ GATE

MOV

5%:

RO ON srncx

EEE

4idg

2%:

133

012700

4s:

:CS1 CONTENTS IN ERROR

Ellég gésgn;E
CMP
BEQ

00002 831235 -

gu5484
32 owoce
024066 008
005237 002326
024072 3853
Egg 024074

3s:

6%:

4125 813337 6%385? 002320
001404
140

T,M1.BIT

S& %

iSET SYNC 1 BIT

:YES
; YES -

SEQ 0103

CZREEBO RKb11 DSKLS CTRL PRTS
02-DE c-77 10: el

CZReEB.P11

nnunniniininununun N
un
e b bm e bt e b —
nn
[Vo
OQ\!W‘W

g}mmmmmmmmmm
S

00s

02-DEC-77

MOV
BR

001236

JSR

78:

002220
002220

154656

S0s:

S18:
—
—
—

171]
@
MR
NS
R
EE
SIS

e K i i K i i K i i i K i i
¢ 0 M i o

NI MBI GINI NI NI NI BIEE

024332

—EONT T

8 -8

024276
024276

SEQ 0104

PAGE 104

DHDCMP:

REGISTERS
;GO GET RKG11

;GO TO ERROR EXIT

(Pq)+
L.CS1,E.CS1

T.CS51,E.CS1
4§

;BUMP BIT COUN
;BUMP_TO NEXT ERROR CALL
iGET EXPECTED CSl
iCHECK IF CORRECT
- SKIP
iNO

(R4)+

;BUMP TO NO_ERROR RETURN

BIT
BEQ
CLR
BR

#BIT9, 3SWR
51§
SESCAPE
18

TEST éEIEOOP ON ERROR

MOV
RTS

;SKIP TO RETURN

RH,-(SP)
RY4

THIS ROUTI

COMPARE THA

CLERR FOR SKIP TO NEXT TEST
;SET UP STACK FOR RETURN
R READ_AND COMPARE

;MRTE&T&LTDH“‘%

DIAGNOSTIC MODE HE

HEADER WORDS READ AND
TRANSFER OPERATIONS.

E&Eé &122% iNTR‘ICK

38S

TO
INSURE
IT DOE
Txo
i
THE
cgnpnas
END
Suo
N§§§§E
rue
AND
D
cuscx
OF
RKEETsf
;}* n£$§srsnsnns
VERIF EO io ;HEHEEaucnsEE <809

AT SR
R
WORDS ARE CHANGED RCCORDING i0 BSEDES conrsurs THIS
CAN BE USED TO FORCE HERDER
CALL:

SR
ERROR
ERROR
ERROR

RY, DHDCMP
;ERROR IN MRI
12
{ERROR IN CS1
13

MOV
MOV
MOV
MOV

RO, -(SP)
R1,-(SP)
R3.-(SP)
RS -(5P)

MOV

#S, RO

MOVB

BIC
1%:

RY, GETREG

CMP
BNE

CLR

002326
000005
002267
177400

;SET_RETURN FOR CONTINUE TEST

BIYCNT

TsT
MOV

001236

024274

NO8

47, SESCAPE
508

INC

TST

001000

10:43

DIAGNOSTIC MODE READ SYNC PATTERN (PREAMBLE)

356
326
002260
002160

NO-

510

2lb

[eetutend

S09

024220

4210

0000

$507
S508

MACYI1 30(1046)

ASL

BEE

TYPE ERROR.

*ERROR IN PACK ADDRESS
; ;PUSH
:iPUSH
:PUSH
::PUSH

RO ON STACK
R1 ON STACK.
R3 ON STACK
RS ON STACK

BItCNT

;CL;nn BIT COUNTER

L.OT,RI

iGEi DESIRED TRACK

#177%00,R1

iSET A _SHIFT counr

CLERR UNUSED BITS

:SHIFT TRACK TO ALIGN TO

‘HEADER WORD FORMAT

CZRGEBO RKG11 DSKLS CTRL PRTS

CZRGEB.P11

563

564
568
sss;

02-DEC-77 10:21

33M

?gs

557
gg
vé
gg;;

gra

MACY11 30(1046)

002266

40000
éoaa7u
10000

78? 001000

BISB

002262

igggg

001304

002352

043703

002352

sggé o2441Y
g

ssgs

5213
55
2289
gseo

591
ssgs
gggq

024420

012737

001204
122040

' 2%:

;

002244

737
<

1616

204

002204
002244

25 32 8§3§12 ggggfg 331583 154414
e
5603 024534 016537 033472 001236
1

560

024542

550

162737

012605

024554

012601

024552

?2}0

523

2015

608

5609

5613

3s:

BIC

’

Ys:

001236

5%:

000716

SEQG 010S

6S:

L.DS,R1

; INSERT DESIRED SECTOR

sBIT9,R1

{ELSE
SET FORMAT BIT
: COMPUTE VRC

#BITIS!BITIY,R1 ;SET BS BITS
L.DCYL,RO
:GET _DESIRED CYLINDER
5grnr.t.csx
;ggsr g;xga SECTOR FORMAT
gg,;g

RO, RS
RS R3
gg%oes

R1.R3

BSEDES, R1

BSEDES, R3

; TEST xrlgse DESIRED

:CLERR BIT IN WORD 2
:CORRECT HVRC

STMP1

:CLEAR A PASS COUNTER

MOV

#BITO,RS
PR.BIt,M1.BIT
PR.BIT
g0
#81T0,PR.BIT

-ESTABLISH BEGINNING OF DATA WORD
;ST
pnzv?‘oué BIT
:PRESET FOR PRESENT BIT O
ING~
axp.! 0 BE A ONE
:ELSE_CHANGE TO ONE

MOV

MOV
CLR
Big
MOV

#DMD ! MEWD! ECCW! ROGATE ,E.MR1

;SET EXPECTED MR1

JSR
MOV
SEE

PC,RDBIT
:GO READ A BIT
RKMRI(R2),T.MR1 ;GET MR1 FOR TESTING
ginnx,e.nkx
;sgscx éfi gonnecr

ggg.ssscnps

i SE nsru%n TO CONTINUE TEST

CLR

SESCAPE

w
MOV

2$E£cx éslkoop ON ERROR

flemes
] SRR I
$SWOBTB(RS), SESCAPE

ggg

MOV

#8179, ISWR

:CLEAR TO JUMP TO NEXT TEST

82, SESCAPE
(SP)+,RS

; ;POP STACK INTO RS

E?g

(SP)+. Rl

égp)+,no

:1POP STACK INTO Rl

INC

BITCNT

:BUMP BIT COUNT

:G0 DO THIS BIT

MOV

(SP)+.R3

MOV

002326

PAGE 10S

CLR

SUB

12383

005237

024574

000002

10:43

RO, R1, AND 3 HAVE THE EXPECTED HEADERS

?gg

012603

Bl
R i
8616 024572 006305
ggig

BIC

01
000001
118:
Y26 3157”?
%aeo
002322
7%:
205037
320
001243; 8gooox 002320

ggqs 024500 012735 gsg?gg 001236

5604

BIS
agz

ase

5579
gggo

BIS
MOV
géa
BIC
BIC
BIS
;g;

:85 043701 002352

oeuzig

02-DEC-77

DIAGNOSTIC MODE HERDER READ AND COMPARE

A
RS

ASL

e rest

::POP STACK INTO R3

::POP STACK INTO RO

SEKelh
SERL BT LS M
'SHIFT T0 NEXT BIT

CZREEBO RKb11 82§bgcCTRL PRTS
=77 10:21
CZR6EB.P11

00S737

024576

] ’8:3838&1:82&8 “héaodR REno"AN {BReare

001204

024612 gggggz e

B BEn
7

000003

023727

001204

000004

01270S
S

108:

168:

20RY

gés 002266
002244

e
18

CMP

ecR
CMP

BEQ

:PUT 3RD WORD IN RO

srgm , 43

;'J‘ousr % WITH WORD 37

oag;{s,ns

;SET TO GIVE IT IST GAP BIT
:BUMP PASS COUNT

STMP1, 84

; TEST IF RERDY FOR GARP
;YES - SKIP

128

FULSES CRHICH

iPUT IN WORD O OF GAP

_NUMBER OF CLOCK

OMPUTES THE

UALLY CALLS TO RDBIT) THE OPERA

BRI PERFORIED *fimsOWEPRIE, [OPRESS,COUNTERS

WHEN THE OPERATION STARTED (L.DC AND L.DA).
IN THESE COUNTERS

BIT
BIS

s?FfiT,L.CSI
#23.R1
.S t9.R1

;PRESET R1 FOR 24 SECTOR MODE

OR MODE OPERATION?
24
;1S IT ;EC

ron 22 55
£ciice
e

CTOR MODE

L.DS,R1

;EST éEI;RRCKISECTOR ADDRESS WAS MAX

MOV

:e T6,RS

;SET FOR 8 BITS OF GAP TO UPDATE

cMPB

L.DS,RI

HSV
B
MoV

18$

lE*TB,RS
1
#B8IT12,RS

;TEST IF SECTOR WAS MAX
;NO - SKIP

STMP1

BUHP

BNE
INC

g;c

17*

ogocm:,E.MR1

;SET FOR & BITS OF GAP TO UPDATE

;SET TO GXVE 15T 4 BITS OF GRP

CLERR RERO

002240
002226

002266

L.CS1,E.CS1

TST

MOV
MOV

T.CS1,E.CS1
4$
(RY)+

L.DCYL,E.DCYL
L.DA,E.DA

:
:

R?G
ERROR RETURN
ED

Oa.—

002274

S724
013 737
013737

MOV

CMP
BNE

(R4)+

O—

002220
002220

RY, GETREG

002260
002160

JSR

TST

882

032356

H%Ofl"

END OF BLOCK

DO8

178:

BRI

iy
RIS ELRS
—

un
00

i 558

12
025020

W
&

;BUMP PRSS COUNT

1.3

zoZRiS

21s:

000100

100000

; J4ST, PONE WITH WORD 27

MOV

002260

010000
001204

frnn, 82

e I

7
005;3?
2

"gg

001204

000025
010000

sn‘m

- wsas wewe

001436

INC

“WORB 2 IN RO FOR SIMULATION
'38
'BUMP PASS COUNT

; TEST IF PASS FOR 1ST WORD JUST DONE

OU’l
m

001204

STMP1

000002

SEQ 0106

é%
0

Bl RER o

AL
PR AT
5 &3FH

co9

ORRECT

INDE

TRACK/SECTOR

CZRGEBO RKb11 DSKLS CTRL PRTS

CZRBEB.P11

02-DEC-77 10:21

MACY1l 30(1046)

37 002226
75
;; 853353 613;00 000026
g
m m 010000 002260

gfi

02205,

000024

002226
2687 032050 A72%%0
4
3
002227
§ Siéim 681358

10:43

D09

PRGE 107

oe-o RO

vE
T IF}n 26 SECTOR MODE

cr:c:i&i SECTOR TO LARGE

CLRE
INC

E.DA+1
E.DCYL

;CLEAR TRACK TO O
:BUMP CYLINDER

ca:eng

gsgn T.DA

3&5

MOV

§LIIEB &a
AoV
‘ORo"
cma
BNE QQ“+1,R0
MP
SN

se8CYL,T.DCYL

JNP
MOV

43
E.DCYL,L.DCYL

1
DOS7
§§oé 85%1?5
15;
024550

TST
JNP

13(R4)+

5703
7

270s

g;g;
7
e

025160
1

013737

002226

032777 001000
o}
001236

052198
Bs0
025174 000137 024550
46

002266

153752

50$:
:

BIT
L

e
JMP
v

CHANGE FOR 24 SECTOR MODE

E.DA,L.DA

;CHECK IF CYL OK
SKIP
iNO-~

:CHECK IF DA OK

;STORE conpurso NEXT CYL
;AND NEXT

:GO TO GOOD EXIT

:BUMP TO NO ERROR RETURN

#BIT9, ISWR
CAPE

;TEST IF LOOP ON ERROR
:CLEAR TO LOOP ON ERROR

RY, -(SP)

:SET STACK TO CONTINUE TEST

3ie
R

.SBTTL

omy
R
DIAGNOSTIC MODE GAP REARD AND SYNC WRITE

g;ig

IS HANDLED IN THIS

714
g71d
5716

5711

5717

2718

MOV

:PRESET FOR 26 SEC/TRACK

CToR 10 0
cnscx
rml%sréaf%&e
xr
iNO- SKIP

15%:
gg ig gi’@
2633 i i
:g
002226 002166
ggss 8521@ %013 o24s12
25%:
553? 025136 013737 002240 002274 268:
025144

;BUMP_SECTOR

E.DA
#26, RO
fS;“T L.CS1

INCB
MOV

02c102 105037 0C2227
5655893 025106 00S237 702240
002240 002200
'

S698

SEQ 0107

DIAGNOSTIC MODE HERDER READ AND COMPARE

138:

m 002226

02-DEC-77

‘¥

THE READING OF "E GAP

ROUT

ummc OF THE SYNC (OR PREAMBLE)

H
T

THE _FIRST
ITS ARE
ER comms
ROGTTNE
“ANG
THE
a&mm""%fia
ESSRoéesse”S
HERE:
CHECK IS MADE THAT WR
GATE C
AND 255 "o" ax TS

CALL

AND A

SINGLE *1* BIT

JSR

RY, DWGPSN

mxnsn.

5720

ggg

ERROR

5726

ROUTINE CALLED:

5728

‘¥

RETURN POINT IF ERROR IN WRTBIT

5721
5722
§723
5727
5729

¥
S
e

T
H

ERR
ERROR
ERROR
JSR

15
16
7

;MR1 IN ERROR IN RERD GAP
:CS1 IN ERROR AFTER READ GAP
iMR1 IN ERROR IN_WRITE SYNC

:cS1 IN ERROR

PC, WRTBIT

NO ERROR RETURN

AFTER SYNC WRITE

CZRBEBO RK611 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21

MACY11 30(1046)

02-DEC-77
10:43
PAGE 108
DIAGNOSTIC MODE GAP READ AND SYNC WRITE

DWGPSN:

010046

;

STRILRT iyl sace

002204

mmmmmtflgmmm
:

001236
001000

153560

37
005037

02s4se

00S037

002326
002322
002324
002316

.RO
fé}.exrcnr

COUNT FOR cv% CHANGE
Ensser
BIT T COUNT
FOR REST OF GAP

L.DS

;TEST IF NEW SECTOR IS O

MOV

85, BITCNT

;PRESET BIT COUNTER roa REST OF GAP

;

END OF BLOCK

108:

MOV

18:

MOV

CLR

CLR
JSR

MOV
CMP

BEQ

#60. ,R0

cono-

iNO- SKIP

:SET COUNT FOR 60 BITS

énASSnsss

CCW!MEWD, E. MR

nx.arr

PC,RDBIT

,CLERR

:GO READ

T EX

creo MR1

vIOUS axr
BIT

RKMRI(R2),T.MR1 ;GET MRl
E.MR1, T.MR1
;CHECK IF CORRECT
118

:YES - SKIP

ESV

ggg,sescnpe

:SET RETURN TO CONT TEST

118:

INC
DEC
BNE
BR

BITCNT
RO
18
s

;BUMP BIT COUNT
:DEC LOOP COUNT
:LOOP IF NOT ZERO
'ELSE SKIP

2%:

CLR
CMP
BNE

SESC
#8179, ISR
3%
$TESTN,RO
RO

;CLEAR TO EXIT OR LOOP
{ERROR RETURN: CHECK IF LOOP ON ERROR
:YES - SKIP

;GET_NUMBER OF NEXT TEST
SHIFT ron xnoe
XI c

(SP)+,RO

;;POP STACK INTO RO

4s:
002220
002220

#54.

9g:

MOV
ASL

MOV
SUB
MOV

002260
002160

ON HOW MANY GAP BITS WERE

;NE FOR ADDRESS REGISTER UPDATE
NSsr
1
oesxnso TRACK/SECTOR NOW O

:ELSE ADJUST COUNT FOR TRACK CHANGE
JPRESET BIT COUNT FOR REST OF GAP

032356

#56. ,RO
:7 BITCNT

001254

033472
000002

1STB

MOV
ggv

001236

00S037
g2

THE ADJUSTMENT

002204

;PUSH RO ON_STACK

BNE

002326

002244

THE GAP.

READ IN THE HE
Efié
530“

ESV
8s:

RO, -(SP)

THE FOLLOMING CODE ADJUSH THE COUNT FOR THE REMAINDER OF

MOV

002326

MOV

SEQ 0108

SSWOBTB(RO), seschp . s FOR GOT TO NEXT TEST
82, SESCAPE
SET ?oFIRST INST (SCOPE)

RTS

JSR

R4, GETREG

15T
MOV
CMP

:GET RKb11 REGS

BNE

(R4)+
L c51 E.CSl
T.CS1,E.CS1

iBUMP TO NEXT ERROR RETURN
iSET EXPECTED CS1
:CHECK IF CS1 OK

TST

(RY)+

;BUMP RETURN POINTER

CLR

BITCNT

:CLEAR BIT COUNTER

CLR
CLR

M2.BIT
PI.BIT

CLR

M1.BIT

:NO -

:CLEAR ALL WRITE BIT INDICATORS

CZRSEBO RKG11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21

§787
S788
5;23

025456
02S4ee
025470

805037
012737
012700

002320
062040
000400

791

474

737

030652

£z E=i
7

7 002326

R
37

Q446

6%:

gsgsao

000001

5805
803

526
8535

12737
237

002326

S806

025540

004437

032356

gggg

5?::
g4 Gk

737
030652
770

3;3;
B 002160

SB811

855556

S814

0esS

032777

gl oo

MOV
RTS

RY, - (SP)
RY

sWRITE ERROR HANDLER-SET
:STACK FOR REPORTING SUBSEQUENT ERRORS

#1,P1.BIT

:SET SYNC ?;T OF 1 AS NEXT BIT

6’

:ERROR

JSR

PC.WRTBIT

INC

BITCNT

JSR

RY, GETREG

153350

:BUMP BIT

RETURN

COUNT

:GET RKB11 REGS

(R4)+
3s

;BUMP PRST _ERROR RETURNS
:GO TO EXIT

BIT
BEQ

#BIT9, ISWR
51§

;TEST IF LOOP ON ERROR
- SKIP
YES

S18:

ggg

RY,~-(SP)

;PRESET STACK FOR RETURN

SBTTL

DIAGNOSTIC WRITE DATA AND ECC ROUTINE
THE DATA IN THE OUPUT BUFFER IS WRITE SIMULATED,

S0%:

3
83
8
8
2
5
2

DWRITE:

002326
002342

GO WRITE

1ST
BR

SER

010446
0204

:BITS ARE WRITTEN

T.CS1,E.CSI
.
2%

724

010046
010146
010346
010546
005037
005037

;CALL WRITE BIT
:ERROR RETURN - SKIP TO HANDLER
:BUMP BIT COUNT
:LOOP UNTIL ALL 256

CHP
BNE

002220

025604
025604
02Sb
025610
0OeSele
025614
025620

BNE

PC,WRTBIT
X
BITCNT
RO

iBUMP TO NEXT ERROR RETURN

grog

5826
827
S828
S829
S830
5831
SB32
S833
S834
5835
5839
5837
S838
S839
S840
SB41
S842

JSR
BR
INC
DEC

(R4)+

025600
0eSele

:SET COUNT To'WRITE 256 “0”

TST

000711

001000

#256. , RC

saxg
S819
5820
S82l
S8ce
5823
S824

5560

R.BIT

ono-sccu'nsuo-unrcnrs E.MR! ;SET_EXPECTED MRl

MOV

002316

ggig

SEQ 0109

MOV

MOV
Ss:

i o
7

CLR

002244

§7=

FO9

02-DEC-77
10:43 PAGE 109
DIAGNOSTIC MODE GAP READ AND SYNC WRITE

MACY1l 30(1046)

3§scnps
RY’

‘CHECK IF CORRECT
INO - SKIP

'ELSE SET TO LOOP

ECC IS

GENERATED AND WRITTEN, AND THE POSTAMBLE IS WRITTEN.
CALL:

JSR

ERROR
ERROR
ERROR

RY,DWRITE

17
21
22

;MR1 IN ERROR IN WRITING
;ECC ERROR IN WRITING
;CS1 ERROR AFTER WRITE

NO ERROR RETURN '

ROUTINE CALLED:
P C. WRT BIT
J

RETURN POINT IF ERROR IN WRTBIT
NO ERROR RETURN FROM WRTBIT

MOV
MOV
MOV

MOV
CLR
CLR

RO, -(SP)
R1.-(5P)
R3.-(SP)

RS’ -(SP)
BItCNT
ECCLO

;;PUSH RO ON STACK
,;PUSH R1 ON STACK
:PUSH R3 ON STACK

::PUSH RS ON STACK
CLERR BIT COUNTER
:CLEAR ECC LOW

CZRSEQO RKSII DSKLS CTRL PRTS
02-DEC-77 10
CZRBE B.P

GO9S

10:43 PAGE 110
MACY1l 30(1046)
02-DEC-77
DIAGNOSTIC WRITE DATA AND ECC ROUTINE

T
T
1
S
Bespescio 5
g
010437
'

gge

ECCHI

MOV

RY, STMPE

MOV

nu srnp7

MOV

ooiz21e

TST

001220

ooguF‘FR3
(R4)+

SEQ Q110

1ol el s
AR

B oi A

THE FOLLOWING CODE SIHULQTES THE HRITING OF 400 WORDS

SPR?QERUR571§ROH h?flo L FT TOg8?3T1¥0 THé CURRENT BIT.

001214
1

3%:

002322

4s:

316

CLERR ?HI
OAD BIT POINTER

'GE fl WORD FOR WRITING

002254

?kggnlpsflEX?BIT IS ONE

i;T NiXT BIT
85

002316

002214
002214

*Ruscc rsn THIS BIT

43%:

,JUHP T0
40$:

002326

000001
002260

TTERN

ECC CORRECT
ERROR EXIT

T COUNT

TO LOOP

22 SECTOR MODE

g BIT SWITCH SET

328

32%:

4$
R1
43§
OECCH,E.HRI

33%:

20s

7%:

TEgT Ig %g BIT SWITCH SET

040000

#CFMT,L.CS1
318
S$TMPS
30%

IEITIH,R1

Tg SgPPLY 2 HORSBITS (16 & 17)
SET

oo1214

$TMPS

E THE 18 BIT SNITCH

020000

002244

026374

010000

oo1214

000675

BITCNT
R1
73
R1
RO,
81
4§
lC;HT,L.CSl

§Thes

001214

026064
026070

hgcx

026352

010000

?URRENT-E
TO

T0 PRE

002316

886882

URRENT

sgégg

002260

TEST éF EE SECTOR MODE

GO WRITE THE BITS

fi:
ggg s
é’%

CZR&EBO RKB11 DSKLS CTRL PRTS
CZR6E
02-DEC-77 10:21

HO9

10:43 PAGE 1 11
MACY11l 30(1046)
02-DEC-77
DIAGNOSTIC WRITE DATA AND ECC ROUTINE
30%:
318:

ooi214

S901

100

gggg

0eelle

00l

S0 gl o0

2 mus pEy

12701

Efi

g:fi

0i3737

S911

026146

001403

002316

gis Bl Ry o
5914
€918

000S01

§9ZS

002316

S5z
GRei%
e,
e
B
)
8 2R 2 o

324
2322
002320

1
026220

0S2737
000736

026230

005237

335

026244

000724

S50 gmem 0i270L

BEQ
98:

"
BR

020000

BNE

002244

10%:

Qo121

026252
026300

3737

13737
004737

002322
002320

118:
002324
802322
02320

gg:g

026314

001356

S946
§347

026316
Qse322

004437
Q13704

53;0 85&558

026336 - 023737

§95
S954

6346
(026350

856 C

1031

5724
000446

429%:

032356
001220

002160

;DEC_WORD COUNT
;IF_NOT _ZERO- GO GET NEXT WORD
;CLEAR FOR PRSS CONTROL
ECC WORD
iGET FIRST
iSET BIT POINTER
;SHIFT BIT INDICATORS AGAIN

?kE?“xF‘E%r’Is Z€R0

S gonago one
E
iWRTBIT ERROR - SKIP

TCNT

?EHEEERTIVE-EKIP

Ab[ABH
14$

108

R1
$TMPS,
81

8
$ECCW,E.MR1
8s

1ST
BNE

gns

$TMPS
118
srngs

$ ?H
HRITINGLgST ECC WORD

*F H%gEING LAST BIT OF LAST ECC
EbSE ?E%T
;ELSE SET ECCW IN MR1

TSST PR?S

0 JUST DONE

ggél.giné

O
PRaS
{EUe
GETSECoN é NGRD

MOV

#15.,R1

;SET A BIT COUNT

MOV

CLR
JSR

030652

13737 002260

€951

12%:

;CLEAR THE SWITCH

L
BIS
BR

MOV

00000

Si:gé

ASL
CMP

000001

S 00 0053 ooza
can

M1.BIT,M2.BIT
PR.BIT.MI.BIT
Px.ax;.PR.axr

BMI

agg 026246 012701 000017
53:0

MOV
MOV
nox

ggr

5323

5937

$TMPS
RO
33
T
CCHI,RS
#BITO.R1

S&T
418:

S e pmE o

5936

CLR
DEC
BNE
CLR
MOV
MOV

SEGQ 0111

P;ZE§T:P$ZEIT
P1.BIT
PC.WRTBIT

1§t

INC
DEC
BNE

BITCNT
Rl
128

JSR

R4, GETREG

MOV
TST

srfip7 RY
(RY

002220

MOV

L c51 E.CSI

002220

CMP
NE
ST
BR

T.CS1,E.CS1
188
(R4)+
198

;LOOP

;SHIFT BIT INDICATORS

;SET ZERO FOR WRITE POSTAMBLE

iGO_WRITE BIT
iWRITE ?T ERR?R - SKIP
;BUMP B
iDEC BIT COU
:LOOP UNTTIL BIT COUNT O
;GET RKB11l REGS

iSET R4 FOR ECC ERROR RETURN
;BUMP_TO CS1 ERROR RETU
iGET EXPECTED CSl
; CHECK _IF CORRECT

iNO
- ?KIP
:BUMP TO GOOD RETURN

:GO TO RETURN

——

nNw
~N
=)

0O
0

0004

$TMP7 .RY

rzg!,‘ESCRPE

;STORE RETURN POINT FOR NO LOOP ON ERROR

001216

148:

MOV
BR

?EQPS,RH

;SET FOR MR1 ERROR RETURN

001216

208:

MOV

fggPS,RH

;SET FOR MR1 ERROR RETURN

ooi21e

15%:

$TMPG,RY

;SET FOR MR1 ERROR RETURN

168:

#BITS, aSWR
178

;CHECK _IF LOOP ON ERROR
;NO - SKIP

SESCAPE
198

; CLEAR_ESCAPE
'SKIP TO EXIT

17%:

RY, -(SP)
RY

s CONDITION STACK
!GO0 REPORT ERROR

168%:

SESCAPE
#8179, ISWR

:CLEAR FOR LOOP OR EXIT
!CHECK IF LOOP ON ERROR

AS
NNN
W

152524

33
TESTN, RO

RO
198:

:YES - SKIP
'SET UP TO SKIP TO NEXT TEST

SESCAPE
, (RO)
$SWOBTB
82, SESCAPE

; ;POP STACK INTO RS

; ;POP STRCK INTO R3
; ;POP STACK INTO Rl
; ;POP STRCK INTO RO

oo
—
~

SYNC

[+1]

102

goooo

o
£
N
o

033472
000002

NG OF THE SYNC (OR PREAMBLE)

i i i i i K K K K K

o
OJWVoOD
OJVLoD
OwmoN

FEREELE
T SSRt2

001236

001000

001236

001254

ED_IN THE HEADER COMPARE
BIT? ARE PROCESSED HERE.
GATE CAME ON

o 20 i

6001
Oe

;SET FOR_ ECC ERRUR_RETURN

MOV
MOV
BR

025760

001236

777

SEQ Q112

13%:

001220

001000

8g§037

109

02-DEC-77

10:43 PAGE 112
DIAGNOSTIC WRITE DATA AND ECC ROUTINE

MACY11 30(1046)

N
Vi

026352

nnNNININNINININININININIINNITININ v
un mtgmmmmmmmmmmmmmmmm
D WODDDD
0 DO DO DD D DD
0

CZREEBO RKb11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21

026500
02eS00

010046

DRGPSN:

RO,~-(SP)

; sPUSH RO ON STRCK

JO9

SEQ 0113

02-DEC-77
10:43 PAGE 113
DIAGNOSTIC MODE READ GAP AND DRTR SYNC

MACY11 30(1046)

737

Fu 582
S8RE

5 55 5
R8s puneg 8
£

002326

ngv
?sre

:6§,éxrcnr
L.DS

:PRESET BIT COUNT FOR REST OF GAP
;TEST IF NEW SECTOR IS O

ggv

:Dgatrcnr

:PRESET BIT COUNT FOR REST OF GAP

BNE
MOV

002326

MOV

002326

MOV

85, BITCNT

#60. ,RO

iNO - SKIP
*ELSE ADJUST COUNT FOR TRACK CHANGE

;PRESET BIT COUNTER FOR REST OF GAP

iSET COUNT FOR 60 BITS

MOV

cono-gccu-nsuo,E.MR1

CLR
JSR

M1. axr
PC,RDBIT

:CLEAR PREVIOUS BIT
:GO READ BIT

ggv

ggg,ssscnps

:SET RETURN TO CONT TEST

INC
DEC
BNE
BR

BITCNT
RO
1%

;BUMP BIT COUNT
:DEC_LOOP COUNT
:LOOP IF NOT ZERO
{ELSE SKIP

SESCAPE

001254

CLR
CMP
BNE
MOV

§TESTN,RO

;CLEAR TO EXIT OR LOOP
{ERROR RETURN: CHECK IF LOOP ON ERROR
i YES - SKIP
iGET NUHBER OF NEXT TEST

033472

MOV

$SWOBTB(RO), SESC

002244

022040
320
3ee
031616
000026
002244

002204

026642

001236

001236
001000

CLR

MOV
CMP
BEQ

002204

11%:

152264

c2s:

ASL

SuUB

000002

MOV

4S8:

032356
002260
002160

004737
016237

EL
o;s. RO

END OF BLOCK

002326

¥
£¥
R

026750

THE GAP. THE ADJUSTMENT DEPENDS ON HOW MANY GAP BITS WERE
nsno IN THE HEADER COMPARE ROUTINE FOR ADDRESS REGISTER UPDATE
TST
L.DA
s TEST IF DESIRED TRACK/SECTOR NOW O
BNE
as
iNO - SKIP
MOV
2SY.
{ELSE ADJUST COUNT FOR CYL CHANGE

——

N EO

ii
IS L3ih458 o

THE FOLLOHING CODE ADJUST THE COUNT FOR THE REMARINDER OF

o
N

NN E£WMN-

Fa50R822222

258

A
SEEEEEEEE
SRRLZSRE

355

[SYSYeeereretete:

PSS
NN NS

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZReEB.P11

002220
002220

002326
022040
000200

002244

031616
000026

002204

#8179, ISWR

AE
HIFT ron xuos ING

(SP)+,R0

;;POP STACK INTO RO

82, SESCAPE

JSR

R4, GETREG

MOV

L 051 E.CSI

APE FOR GOT TO NEXT TEST
E

ET To FIRST INST (SCOPE)

:GET RKB11 REGS

(R4)+

iBUMP TO NEXT ERROR RETURN

T.CS1,E.CS1
2%

:CHECK IF CS1 OK
INO - SKIP

1ST

(R4)+

;BUMP RETURN POINTER

CLR

BITCNT

;CLERR BIT COUNTER

JSR

RKfiRl(RE),T.HRl‘GET MRI FOR TESTING

CMP
BNE

MOV
MOV
cs:

Rxhnxtna) T.MR1 ;GET MRI
iCHECK IF CORRECT
E.MR1,T.MR1
:YES - ;kxp
118

RTS

TST

:SET EXPECTED MRl

:CLEAR PRESENT BIT

MOV

:SET EXPECTED CS1

#DMD* ECCW! MEWD, E nnx :SET EXPECTED MRl
#128. RO
T COUNT TO READ 128 "O"
BIT

CRLL READ BIT

PTTSII DSKLS CTRL PRTS
02-DEC-77 10:21

gz
6S

027002

001236

MOV

22s:

002326

cMP
BEQ

000177

8RS
S
<

¥ 5y 55®

000026
002244

002204
002204

027056

001236

000001
031616
000026
002244

002320

027126

001236

MOV

8238, SESCAPE

:GO TO ERROR EXIT
:BUMP BIT COUNT
;LOOP UNTIL ALL 128
iBITS ARE ngno

238

:SET COUNT

FOR REST OF SYNC

;SET EXPECTED nn%
;GO _CALL READ BI
;GET MRI FOR TE;TING
:TEST IF CORREC
:YES - SKIP

{ELSE SET ESCAPE

S0$

:GO TO ERROR REPORT EXIT

INC
DEC
BNE

BITCNT
RO
c1

;BUMP BIT COUNTER
iDEC BIT COUNT
:LOOP UNTIL ALL 127 READ

MOV
JSR

#1,PR.BIT
PC ROBIT

;SET SYNC BIT OF 1 AS NEXT BIT
iGO_RERD IT

CMP

E.MR1, T.MRI

RKMR1(R2),E.MR1 ;GET MR1 FOR TESTING

:CHECK IF CORRECT

BEQ

248

:YES - SKIP

INC

BITCNT

;BUMP BIT COUNT

ISR
18T
CchP
BNE

RY, GETREG

;GET RK611 REGS

T.CS1,E.CS1

; CHECK _IF CORRECT

ggv

RAR, ~N

032356
002160

002220

gg:s.sescnps

:ELSE SET RETURN FOR CONTINUE TEST

001000

151756

(R4)+

;BUMP TO NEXT

ERROR RETURN

;NO - SKIP

(R4)+

; BUMP PRSTTERROR RETURNS

S0s:

BIT
BEQ
Sk
CLR

Si$
ggSCRPE

#8179, aSKR

; TEST IF LOOP ON ERROR

S1%:

RTg
MO

gz,-(SP)

;PRESET STACK FOR RETURN

.SBTTL

DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE

T
R
TR

NNN

24s:

002326

OF DATA. THE ROUTINE WILL TRANSFER A FULL OR PARTIAL SECTOR.

001236

3
R

B
LE S

;SET_RETURN FOR CONTINUE TEST

sRDGATE . E.MR1
PC,ROBIt
RKMRI(R2),T.MR1
E.MR1,T.MR1

MOV

002244
002204

822%, SESCAPE

8IS
JSR
MOV
CMP

BEQ

23%:

002326

; TEST IF CORRECT
; YES - SK IP

508
BITCNT
RO
13
8127.

SEQ 0114

b B

S8R * Yo zREY

oK o
RRRRRLL
NNNN3
S

1616
431818

E.MR1,T.MRL
ces

BR
INC
DEC
BNE
MOV

002244

R B0 VT 1 £

002204

002244

NNNNNN

2124
B0 0
N

O BB ICR B

iy
e

P P

oooooco oo oo oo oo oo oo oo oo

023737
001404

SSSEEE e

8858SEEEEE
PR a}fl\l

026762
026770

KOS

02-DEC-77
10:43
PAGE 114
DIAGNOSTIC MODE READ GAP AND DATA SYNC

"MACY11 30(1046)

GO TO EXI

; YES - SKIP
;ELSE SET TO LOOP

THIS ROUTINE IS USED TO SIMULATE THE READ OR WRITE CHECK

THE FIRST WORD AFTER

THE CALL SPECIFIES HOW MANY WORDS

IF LESS_THAN A FULL

CTOR

ARE TO BE TRANSF

OF THE TRANSFER 1S NOT

ERACH BIT IS TRANSFERED.

TgE ;CC AT THE END

CHECKED.

THE ECC IS CHECKED AT THE TIME

EITHER 16 OR 18 BIT WORDS CAN BE SIMULATED

CZREEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

TMTMTM
T T e

U& ww

R I i K BE

TT I '

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

s ot Pt

NNNNNNNNNOO O

7224

027230
027232
027236

spzcxrxss THE souacs or THE ECC

CHECK

F ECCSRC IS A

Loggnggus I"TSF;HEIFEEODERCIETRK fle‘é%flpflTED
LASTH$HS
WORDS FROM ECCHI AND ECLO ARE

CRL
JSR

%Eggéfl-*ngsfiflé IERERR READING DATA OR ECC
fror
32 Egg
[ECt REGISTEPHT
[hmoR REeDINGREgECT
baTRLflFTER
0 READ
C ECC
ERROR 41
o

% 1N Eet EaL

Ennon “5

ERROR 43

*
%
¥

ROUTINES CQLLED:
RDBIT
ECCGEN

DRERD:

010046

010146

ESSSS sg

CaLCugALt

ng
RROR5?1“5 }N
uaT K OR ECC READ
Ecc Sscésren iuconnscrrrsn READ ECC

RROR 4

ECC PAT

CALCULATION

RR IN ECC POS COUNTING

010437

005724
010437
005724

RO, -(SP)

; ;PUSH RO ou STACK

MOV

R ,-(gp)

,,PU H n

R1,-(SP)

001220

MOV
MOV
TST
MOV

(R4)+,RO
(R4)+
RY, $TMP?7

001210

MOV

RY, $§TMP3

125&

37 Y

MOV

10346

027210

857552

A 3RD Locnrxou ECCSRC

WORDS TO BE

WRTCK:

7
1
0104
357s1u
00S724
72le 010437
857

IS SET TO O IF THE ECC IS EXPECTED

o 0

i i i i

027

ECPATX,

TO BE CORRECT AND SET TO'1 IF AN ERROR 1S BEING FORCED.

JERGTH OFTRANSFER
cnx on ECC REARD
nné N _ERROR "RiTE
EROR g

7176

027200

ANOTHER LOCATION,

7172

ADING MUST OCCUR BEFORE THE ROUTINE IS CALLED.

7176

RRE-REAUTRED, "ET 18I0
AR 17ArE"Asdlnko
T ol 4RO
=o
coun?ONxSETeB AT N OF THE DATA TRANGPER. THis

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

NN
E L LS L L L L L L L

e R RR

R e e K

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

el gl gl gl gl gl gl gl e gl gl gl e ale pls alogle ale ale ale alo ale alo ol e ol e oo ol oo als oo oo ol oo o alo oo oo oo o ol oo ol oo oo o o' oTo o0 o )

s B
B B

DLl L

MACY1l 30(1046) 02-DEC-77_ 10:43 PAGE 11S
DIAGNOSTIC READ DATA OR DIMNOSTIC WRITE CHECK ROUTINE
OB i O i K K

183

LOS

MOV

001216

001212

TST

TST
MOV
TST

RS’

-(5P)

:PUSH R1 ON STACK

Tncx

sro
ns;unn
UMP5
ro
T RETU
ERROR RETURN
;

RY, STHPE

Srons

(R4)+

gunp TO

(R4) +
RY, $TMPY
(R4)+

P TO NEXT ERROR nsURN
srons ECC REG ERROR RETURN
:BUMP TO NEXT ERROR RETURN

NEXT ERROR R TURN

TORE CS1 ERROR RETU

SEQ 0118

027240
§§72fl4

010437

MACY11l 30(1046)

02-DEC-77

10:43

MO9S

PAGE 116

DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE

OOl2e2

RY,$TMP10

;STORE_ECC PAT ERR RETURN

3??855'&5
EESE&

axrss
!CLERS
:CLEAR ECC conpu$so LOCATIONS

STMPS

;CLEAR FOR 18 BIT MODE SWITCH

7588

027256

s et

s s e

OO O OO0 O OO O OO
OO O OO O
e
) ORI RO RO RO FORD FUOORORO
DO NN EWh-0O 3BSR ZoR=8889R
ittt
i et 3

CZRBEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRGEB. P11

ssgnr.L.csx
:fiioo?,s;n;ig

géxggx:irnpxq

e Bt e ot B

328:

100!

1
18887 ¥TMPIS

#10041,STMP1Y

ggfl!fifl?flfli

e e

BRI
002322

4s:

002204

;g.ax;,nx.axr

18:

s Bt pe e

H3$:

030462

e bt

862215 i
H4$:

002260

29%:

s
e

oo1214

001214

sSHIFT ;gsssnr INTO PREVIOUS

PC,RDBIT

: GO Reno BIT

T.MR1,E.MRI1

;CHECK IF CORRECT

BITCNT

TEST IF FIRST BIT OF DATA

ELSE xnsént Al

RKMR1(R2),T.MR1 ;GET MRl

:YES - SKIP

e ECe
XS GENERATE ECC
o
$K§EPT‘22&¢TtE°P*; TEST IF ECC CORRECT
108

002326

027540

T
WBITO POINTER
i: GETBATA

030276

010000

¢.SET BIT COUNTS FOR 16 BIT MODE

?quaxr EEESENT BIT IS O

030262
002326

;557 5158 BIT MODE
:ELSE SET UP BIT COUNTS FOR 18 BIT MODE

Ti:gé

#1,PR.BIT

002320
002204
002244

308:

1B TSRS 15 oone
T_COQUN

ELSE SHIFT BIT POINTER

#CFMT,L.CS1
30%
§TMPS

:TEST IF 18 BIT MODE
:NO - SKIP
:TEST IF PROCESSING BIT 16 OR 17 DONE

291714, R
H?éx*s:ns
g;nps

' XET POINTER FOR 2 MORE BITS
;§Ns
n? HI nosn
31
S
‘SET 18 BIT

$TMPS

;CLEAR 18 BIT SWITCH

SEQ 0116

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21
6235

318:

236
Eggg

027544
027546

005300
001302

gggg

§§;§§g

?zgg

002326

000137

030234

133;;

888323

£l

gg:g

;

857553

NOS

MACY1l 30(1046) 02-DEC-77 10 43 PAGE 117
DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE

001226

002322

33%:

037 ooxgxu

B548
05
DEEK o SO
624 gsgégg §?g g
340 050636
ggg?

13737

342

050640

6265

77,

6264

i AL
027720
6269
6270
ES;é

6273

027726
8577aq
7736

000026 002204

g;
7

002204

002244

2326

001226

312

e—

363:

7 §gooae 002214 49%:

3737

886“8;
1

02774

2214

002254

030276

326

4s$:

gs;g 833354 - S; 885325 001230
6276 027756 04 9”3
Ge24y
gg;; gg;; ; 85%5;3 353555 33?233 46$:
6279

Ekge Tgsgpxr FULL SECTOR WAS READ

JMP

ELSE JunP TO EXIT - DO NOT CHECK

?gx

SE'EEE&E#'BIT

CLR

§THMPS

gggg

oggggg

gg?zgg

2533

0300

001157

6290

030052

023737

002214

002244

002254

002326

001232

TRy MR
itoS o
;ELSE MOVE THEM INTO BUFFER

Eccnx,OBUFF+1000’
CCLO, OBUFF+1002

gégnx,s.nkx

;sggcx éfilgonnecr

CMP

BITCNT,STMP12

;TEST

MOV

JMP

%8
MOV
CMP

#BITO,R1
:SET BIT POINTER
PR.BIT,M1.BIT ;SHIFT PRESENT 10 Pnsvxous
5?'3&7'
:AND SET UPPRESENT
34é
81,PR.BIT
PC
RDBIT
:GO_RERD BIT
RKMRI(R2),T.MR1 ;GET MRl
118

EELs¥ Jgflp TO0 REPORT exxr
IF

FIRST ECC BIT

Eecccen
ilEenalt
Eck For pr e
RKECPT(RE) 1.€cPt
sGET PATTERN
T.ECPT,E.ECPT

BEQ
JMP

45§
108

caz
BIC
gnz

INC

§g;cnr $TMP13
SECCW,E.MR1
ex;cnt§TMP1Y

BIC

#ROGARTE ,E

ITCNT

SECCW,E. nax

;TEST IF'ECC PAT CORRECT

i YES SKIP
*ELSE GO REPORT ERROR

T COUNT

Esgg% gélgsr BIT OF ECC
:ELSE CLR ECCW FOR ECC READ
;i%sg %tx%gT BIT OF POSTAMBLE

ELSE ssfnsccu FOR ECC DONE

:CLEAR RERD

GATE

eI
g
sPosx$xou
eFOR REPORT
ECPOSX,
E.ECPSelct?
EXPECTED
5050PT.E.ECPT

°SE§§IEF CORRECT

BNE

208

iNO
- SKIP

CMP

BITCNT,STMP14

CMP

47%:

:CLEAR FOR PASS COUNTING

ggg

gnz

6287 830033 023737 002212 002252

nggnkngrsogra BIT FOR ECC GEN

:GET ECC FROM BUFFER

o
MOV

100000

(R3)+,RS

MOV

MOV
MOV
g%§
BEQ
MOV
JSR

eE
ERE Blesw
6284 030024
013737 s
002350 sl
002252

042737

020000

35;0NT,STMP12

BIS

030002

052737

ggz

002244

gggg

027774

;oscasn:nr WORD COUNT
:IF NOT ZERO - LOOP

MOV

368:

626

RO
33

BRE
MOV

012305
§§§§ 853252 012701
000001
sags 02
13737 002320 002322 5S:
sas; §§§§
002320
dség 76
é"
gsgo
76
7
002320
76
7 ggigfs
34$:

DEC
BNE

T.ECPS,E.ECPS

;CHECK IF POSITION CORRECT
;TEST IF ECC DONE

SEQ 0117

O0z22se

S18:

= O WD NN
£ WM+~

6S:

oo1214

000001

7%:

—

;BUMP PASS COUNT

81
STMPS,
8$

aflo ECC uono JUST READ) - SKIP

4 GETRE

;GET RKb11l REGS

001236

9%:

owas,tsscnps
23

108:

$TMP7, RY

8448, $ESCAPE
128

118:

$TMPE, RY

:BUMP

SE EXPECTED CSl

i CHECK IF CORRECT
- SKIP
NO

;ELSE BUMP RETURN POINTER TO NO ERR
;SET RETURN TOR MR1 ERR.

iSET RETURN TO CONTINUE TEST
;SET RETURN FOR ECC _ERROR

;SET RETURN TO CONTINUE TEST
;SET RETURN FOR_

MRl ERROR

8458, $ESCAPE

:SET RETURN TO CONTINUE TEST

$TMP10,R4

;GET RETURN FOR PATTERN ERROR

128
2es:

IF NOT 1 (NOT THE

POSTAMBLE)

§
POINTER
B;TPRSS
ss
COUNT

]

001236

; TEST_PASS COUNT.

RS
$B8ITO,R1
TMPS

.&s1
.C SlT

002220
002160

030326

R m

$TMPS

368

30324

S_COUNT. IF NOT O
FIRST ECC WORD JUST WRITTE)

$TMPS
78

FT BIT POINTER

027632

48%:

roNONONONON D
) .I& '3 a

B344

Sam——
—~O

030326
002z212

POS COUNT EXPECTED
PATTERN

030342

g34s 03031€

CTED ECC IS O

3 §E57 88073
By
DM

Ses:

002214

002214
ele
25¢
002254

001236

634

HECK ROUTINE

RST POSTAMBLE BIT

001232

002350
32

mov
O

002346

—

MACY11

ovorororor
o oo o

§§g§§§§s§ssseg§a%%fi%é%@fim

C-77 10:21

-~y
m
w
-4

c§ggsgo
RKG11 05552 CTRL PRTS

SEQ 0118

CIRL PRTS
C%:EEBO
RKB11 ggkbéc
77 10:21

001236

T
001407

150sse

6358
635

'gg’, SESCAPE

:SET RETURN TO CONTINUE TEST

23s:

$TMP11,RY

;RET RETURN FOR POSITION ERROR

12%:

$TMP11,~(SP)

;PREP STACK FOR RETURN

(SP)+

;REMOVE LAST ENTRY FROM STACK

5391+,no

<§P)+:R1

::PSP
3fnrg
svncx INTO ao

srgpq,nu

;GET RETURN FOR ECC ERROR

SC
og;rq.asun

:TEST IF LOOP
ON ERROR
Ysgr IF
&gop ON snnon

gTESTN,RO

EgcnsEG;STERS T? k?OP ON ERROR OR

005726
005037

148:

831360

20%:

001210

001236

001000

ooi212

000204

150S04

001254

:GET_CS1 ERROR nsrunn

8673

000002

001236

OS‘SESCRPE

3v
@

—
—

SSWOBTB(RO), SESCAPE

£CCGEN:

£
o

002316
000002
002322

12%:
000001
002336

002340
1%:

;SET UP TO ESCAPE TO NEXT TEST

. x
RgJ*gTE

RTED FOR THE
I TH&E R2UTIgS “S ?flELEgfloH§HECC *g SQLC

é
o&}TIGN ARE PLACED §°°“éc“"°m8°t&’:m"‘$BT O
RKECPT

ECCHI ARE PLACED IN E.ECPT FOR ERSY COMPARISON

g?fl

SC,ECCGEN

Rg
OP BIT

002260

027504

030s20

?npa RY

001236

030500

:NO LOOP- SLEAR ESCAPE

033472

830476

:TEST IF LOOP ON ERROR
iNO SKIP

016037

030462
g30uey

#BI1T9, ISUR
148

:SET RETURN TO CONTINUE TEST

13%:

SiEEn)

ggggg%

#48$, SESCAPE

SESCAPE

O}ESOS

—

6355

13704
12737

8325
6323

e %13%57182READ DATA'OR DIAGNOSTIE WRITE CHECK ROUTINE
001236

8%8338 886438

Cl0

OF NEXT BIT
Hg

HgCK gF IT

IHI.BIT,RO

ELSE CHRNGE TO PRESENT BIT

(RO)
33

CHECK IF _NEXT BIT O
YES
- SKIP

#1,ECCHI
S$
ECCXOR

NO CHECK IF BIT 31
= 1
iNO, SET ECC XORED BIT
:CLEAR ECC XORED BIT

SEQ 0113

CZREEBO RKB11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

MACY1l

gga1
002340

000001

2737

5%:

020020
002342

174

&k>
QT
MOV
ggs
ROR

TS;

002336

gg qli

3s:
78:

805345

§§§§§
$3333

002336

02-DEC-77
GENERATE ECC WORD

30(1046)

002342

002340
002254
O02es4

108:

%v
BIC
gzg
gxg
IC
BIs
MOV
2

10:43

D10

#],ECCHI
11
#1,ECCXOR
ceoL

CCH

rl:ccxon

SEQ dJ120

PAGE 120

BLc BIT
1EHERT SRARRY
cuzcx FB
cLEnn Ezcon56 317
,se?
ECC
iSET cnmv n.op
sCL

ocuzcx
;r XOR NEEDED

ogfrxs-am -(sP} boxogngr ECC BITS
ogpxbggéwECCLb 0, 2, 11, 21, 23
1 10 SP -(sm
senb T8, ECCHI
sé é?
5N
;
EC
R
ECCLO

T
MR
S
gm
g
g';.g}
ma
?e i ngo
mxmemncs
DELAYR
g comurs
.SBTT

‘¥

H
e

662938

001000

001236
001512

150206

030765

001023

002322

002244
O02e44

MOV
MOV
MP
EQ
v

MOV

18:
38:

<3gl
F NSRSR"'Q” nSx
RETURN
58
85
SMCLK
! MEWD,E . MR1 cnem:
REG. 1
uné PRO crso MAINT. TRANSITION
oonomcu(,hxm
RKMR1(R2) . T.MR1 g
c 1 CORRECT
P&ozm
g.mx.r.nflx
mnnsxsnou
!
§
#1$, SESCAPE
;838E cms ron LOOP ONERROR

RTS

SEMW], EMUW+2
(SP), =(SP)
PC

BIT
BEQ
JMP

#SW9, ISWR
33
638

BIC

SMCLK'PCA!PCD,E.MR1 ; INITIALIZE MAINTENANCE REG. 1

MOV

031606

014400
042000
002320

&e5bin: > Rmg

WRTBIT: BIS

002400
000440

030724
043644

11omm ron msKEDPROPER
'mmsmofl OFT
AT EACH mmsxngflwxr MR1
#@E&E‘ 'M? '"B.éum’tssrfi? '%mgxfiou uusn THE
é&m

BIS
TST
BNE
TST
BNE

H
:SAVE URN
:MR1 INCORRECT ON UPWARD TRANSITION

;CHECK IF _LOOP ON ERROR
*NO, CONTINUE
:YES, LOOP ON ERROR

onsuoeumcm,t.nm
PR.BIT
; CHECK ¥r ou;

SIMULATE ONE

208

1YES,

108

:YES, NO TRANSISTION

M1.BIT

:CHECK IF PREVIOUS ONE

czns:go RK&11 D
CZReEB.P11

042737

6459

6460
£4E

59
2%!0

CTRL PRTS
c-77 10:21

i 1
xgxg
1

2%§ 031
xgg

002000

002316

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 121
SIMULATE ONE BIT OF WRITE DATA IN MAINTANENCE MODE
: INDICATE TRANSISTION
SMEWD E.MR1
BIC
002244

45; 010000 002244

5.,5"8 D31

6470
647
BY7
647
2:7-4

1
1
1
1
i

15T
BNE

5§:
108:

sug
gxg
g:
11
B4
6480
gggé

11
1112

118:

1116
[ §§u§u
E4Be
031138
smg?
3311%
6488 031150

128:

111

012737 031170 001236
6489 031156 012737 044022 001512

et
BHE Gles
6492

EEE
BIS
BR

p1.B1t
53

:CHECK IF NEXT BIT = 1
;vs'é CHECK FOR PRECOMP ADVANCE

108

fgo 65W
A N gum
: RO’ s
iset
:CLOCK IN ZERO

BIS

#PCA,E.MR1

s CHECK FOR
:CLOCK
IN '55 COMP. ADVANCE
:SET PRECOMP. ADVANCE

MOV
RTS

(SP), -(SP)

::MR1 INCORRECT
'wnu

BEQ

BIT
JMP

#SW9, ISWR
128
638

;CHECK IF LOOP ON ERROR
:NO, CONTINUE
:YES, LOOP ON ERROR

BIS

SMCLK'MEWD,E.MR1 :CREATE

1ST
BNE

MOV
MOV
CMP
BEQ
ngx

MOV
MOy
BEQ
MOV

MOV

T&an
#PCD,E.MR1
TS:.BIT

EXPECTED MAINT REG 1
onbzncl.x,h(muné) Pnsvfos
ans UPWARD TRANSISITICN
BKIRI(RE).T.MRI
;3TORE PAINT
ReCeed.) 1 commect
158
'
°
Ev':%
TINUE
8138, SESCAPE
:LORD gcnp: FOR LOOP ON ERROR

SEMWS, EMW+2

:LOAD

;gorccg°'I‘g$ LOOP ON ERROR

ERROR MESSAGE

gifi

sggoaf?flq

147742

13%:

gég

zggq.asm

§497
6498
6499
6500
6501
1?335
3
6504

031204
03125
0312
031226
1234
1242
1244
031

052737 002000 002244
8-457417 000400 002244
1 73; 000040 000026
0162
0022
023737
002204 002244
1414
012737
031264 001236
012737 044110 001512

158:

BIS
BIC
MOV
MOV
CMP
BEQ
MOV
MOV

SMEWD, E. MR1
;RESET TRANSITION INDICATION
SMCLK E . MR1
#0MD, RKMR1 (R2) ;sup%vnanT PART OF DATA
Rki*R] (R2), T.MR1 ;STO!
1
T.MR1,E.MR1
;CHECK IF MR1 CORRECT
193
: YES ngnm
817%, SESCAPE
:LOAD ESCAPE FOR LOOP ON ERROR
SEMWYG , EMW+2
:LOAD ERROR MESSAGE

6435
6496

BRI
D

6508
6509
6510
>
6513

6514

031264
031272
031274

032777
00114
5037

031606

001000
001236

147646

178:
18%:

JNP

BIT
BNE
CLR

#SW9, ISWR
638
$SESCAPE

(YES, LO

ounE ERROR

R
.

’

;CHECK IF LOOP ON ERROR
:YES, LOOP
ON ERROR
:CLEAR ESCAPE
;

031308

00S737

002316

208 :

’

L 4

#0OMD RKMR1(R2) ;CLOCK IN DATA BIT
RKMR1 ‘R2), T.MR1 ;STORE MRl
T.MR1,E.MRI
:CHECK IF MR1 CORRECT
128
:YES, CONTINUE
:é“:’E?fi%E
;tonb ESCAPE rthR LOOP ON ERROR

2333

001000

SEQ 0121

P1.BIT

:CHECK IN NEXT BIT A ONE

BO RKG1

KLS

CTRL PRTS

czzgésga.lm ’ 83-5&-77 10:21

fif Gl

e e

::ggé 83;

78 983332

MACY1l 30(1046)

113s4

€231

é;

031414
0116
1416

F10

PAGE 122

002244

308

CHECK

SEQ 0122

IF PRECOMP DELAY

308

:YES,

gtla

#PCA,E.MR1

408

:CHECK MRI

e t

;%E& rgé PREC

ség

Her

SMCLK,E.MR1

e
eADVZNCEBadt
:set
COMP.

sRESET MAINT CLOCK IN EXPECTED MP1

LAY

% 002204

BIS
MOV

MOV

iSet gfi mc&w DELAY
#PCD,E.MR1
#DMD’ RKMR1(R2) ;CLOCK IN DATA BIT

gaweo 001236

MOV

2418, SESCAPE

RTS

fEME.fMNe
'

:LORD

:MR1 INCORRECT

BIT

638
#MC xhs.rm

#SW9, ASWR

:CHECK

m 002244
000026 40S:

10:43

SIMULATE ONE BIT OF WRITE DATA IN MAINTANENCE MODE

§ 13 gig %‘zu DU S—
2%
6

02-DEC-77

e’ e

000

147512

MOV

41§:

RKMRI (R2), T.MR1 ;STORE MRl

ESCAPE FOR LOOP ON ERROR

ILOGD ERROR,MESSAGE

IF LOOP ON ERROR

gas
33{452
%Emw
3
0 wg
37 %:oo ggeew 42s:

BNE
BIS

8230 031468
OOlale
ooeewd
DO=2204
1
127
1502
1236

MOV

RRLT-A
T ORCK
I SRINT REG 1 Comect
%438, SESCAPE
:LORAD ESCAPE

RTS

pc '’

365

w
%
031444
0162

000026

002204

6541

(82
G0 Dia7y GBS GGIEIE
ggqu 031553
gg:g

{E‘

figg

001 000

147430

6548
6549
6550

151
1
15&

1
85

002400
000040
000026

002244
000026
ggeaaw

ggsx

iua oo?u 7 002204

6560
6561

1874
031600

005037
062716

43$:
438
458:

2294

ssgs 1?« 8127 031564 001236
Gggg 031
o3
032777
:gég §§i§9&4 BRTEEE
WS 47346
.

478:

50%:

:}EEE 031293 865199 ?4%593

638:

6568

DOD

5564

6567
6569

031

g,lfiT

oonbe LK,RKMR1(R2)

UPWARD TRANSITION

RKMR1(R2).T.MR1 ;STORE MAINT REG I

MBS

SW9, o ISKR
33,,!

(LOMD
ERROR messace
:MR1 INCORRECT

:CHECK'l‘%sou
IF LOOP?RROR
ON ERROR
;v§

BIC
MOV
MOV

SMEWD
! MCLK s.mx -SEt
ISTION
#DMD, RKMR1LR2) ;ELOCK TRANSISTION
RKMR] (R2),T.MR1 ;STORE MR1

MOV
RTS
BheT

s“n;’ SESCAPE
:LOAD ESCAPE FOR LOOP ON ERROR
P
'MR1 INCORRECT
#SW9,
ISWR
.
;CHECK IF LOOP ON ERROR
<
YES,
LOOP ON ERROR

RTS

MOV

ISLPERA

ggg

001236
000002

r;j; 031604 00020

MOV

: YES 309xpsgéo
ON ERRORMAINT. REG. 1
figmtn

CLR
ADD

JMP

T.MR1,E.MRI

;%cx 'r'umqm CORRECT

SESCAPE
#2, (SP)

:CLEAR ESCAPE
:ADJUST RETURN

#STACK, SP

:FORCE STACK

*RETURN

:LOOP ON ERROR

.SBTTL SIMULATE ONE BIT OR READ DATA IN MAINTENANCE MODE
Px

ONE BIT OF DATA IS READ SIMULATED. NO CHECKING IS
DONE BY THIS ROUTINE.

RKB11 DSKLS CTRL PRTS

P11

02-DEC-77 10:21

88?7

002320

253

88??

002322

30(1046)

RDBIT:

TST

PR.BIT

- =
R

n
NN

fesespusy

800040
86000

4§:

000440
000040
001440
000040

108:

0002
000026

MOV

#DMD
! MCLK !

RTS

MOV

#DMD!MCLK ,RKMR1(R2)

MOV
MOV
RTS

#DMD! MCLK!
RD RKMR1 (R2)
(
#DMD, RKMR1
; RETURN
PC

MOV

P
P

ogno,RKMR1
(R2)

#DMD RK
RKMR](R2)

;CLOCK IN ONE

BY MEMORY PflRiE

IT WILL BE ENABLED. THIS ROUTINE WILL PROCESS TRAPS CAUSED

MEMERR: MOV

2108

RRORS.

: LORD ESCRPE

(SP) , TRAPPC

s ogs

BNE

€S
158’ DEUR

RRORTRY AGAIN
TELo8?a8" ND
c o8R0t
EE

158:

MOV
JMP

#STACK,
§LRE

.SBTTL

CLEAR INPUT BUFFER

MOV

—

.SBTTL

INSERT TRANSITION

#OMD, RKMR1 (
. CLOCK IN 2ERD
#DMD! MCLK , RKMR1(R2)

‘%

:
éfoonr

ERROR

IBUFF no

T nsn PARITY ERROR

;xn TIALIZE

:LOOP

STACK

ON fsnon

;GET BUFFER POINTER

g TORE Rl

SER

CLEAR
ouoo 1 szr COUNT; FOR
CLEAR BUFFER WORD

BNE

MOV
c

(RO

MOV
(SP)+,R1
R4
RTS
BUILD onrn BUFFER

COUNT

.LOOP UNTIL COUNT IS ZERO
;RE;TORE RI
'RETUR

THE PATTERN SPECIFIED IN THE CALL IS LOADED INTO THE DATA
BUFFER. THE ENTIRE BUFFER IS ALWAYS LOADED (400(8) WORDS).
MOV
MOV
MOV

MERD, RKHRI(RE)

MOV
MOV

MEMORY CHECK ENRBLE TRAP
IF THE PROCESSOR IN USE HAS MEMORY PARITY OPTION

18:

NNN

geeess
S0 o
28 Lo

s Pt Pt Pt et Pt

MmN
L W0

A
AA

108
ni.axr
cucéx
Yggflb'flCLKaxnnxtke)
u%sav
gonnus
NOT INSERT TRANSITION

MOV

TST
BEQ
sgv

CLRIBF: MOV

.SBTTL
¥

s¥

000001

RTS

BNE

MOV

147164

PC,RDBIT

JSR

Rgrunn

G10

PAGE 123
READ DATA
IN MAINTENANCE MODE

CALL:

‘%

001236

:43

000440

031742
002310

02-DEC-77

SIMULATE ONE BIT OR

e b

235

000

e e B

00008 288288 8288888
X% U‘U‘G"
*8

gés

MACYL1l

MOV
MOV
MOV
CMP

RO, -(SP)
R1,-(SP)
R3.-(SP)

RS’ -(SP)
#0BUFF , RO
#400, R
(RY) . 81

: ;PUSH RO ON STACK
,,PUSH R1 ON STACK
PUSH R3 ON STACK

,-PUSH RS ON STACK
:LOAD RD T0 POINT TO BUFFER
:SET DATA LENGTH
:TEST IF PATTERN 1(ALL ZERO)

ue 5

CZRGEBO RXB11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21

6630

03204

ggflé 335829 837339 000007
0320
0 if?;
177777
i
03206

2%:
3s:

6640

Eigfii% §§?:§9 000006

4§:

ss:q

032110

5%:

§§§§

6636

6637

032066

100

=g 835
032

At
1‘

gg:g

Eggg fisg
6654

032

- g6ee 03125

EZ?E 835

FRETOF EERRENING

‘q'g 8351@

1375

1003

g3 0ues7e

021427

5 §§§ 1

6667

212

000004

78:

021427

000003

8%:

B7A%%2
1

046472

046432

Ro)+

EEESE 2léBr oBuFF

%Sq),.r
(RO)$ R3
R3,0577777

s TEST IF PAT 7 (ALL ONES)

Rl
1ss

01260

81550

SET BUFFER TO ALL ONES

sNO_- SK%P

gnz

;gq),os

E;SST §; PATTERN § (ALT 1 &8 O)

MOV

33,(R0)1

CMP

:TEST IF PAT & (COMPOSIT ROTATING)

fga),cs

16TeRS

1 &b°Eofb eOPFER

#125252,R3

ot &F ParTam: &

;EL5§KLoao OBUFF WITH PAT §
v’

(R4), 84

; TEST IF PATTERN 4 (HI-LO FREG MIX)

fggru,ns

P
;NO
WITH ADD OF PAT 4
aginrsn
;L8RO

CMP

(RY), %3

s TEST IF PAT 3 (MAX PRECOMP PHASE MIX)

oB T2,RS

Moy
MOV

#p
:Pnra,ns

DEC

Eé

552c c

figv
MOV

’

(Rg)+,t80)+

DEC

TS
MOV
MOV

(R4)+
(SP)+,RS
(SP)+.R3

au;

MOV

000204

:ELSE

MOV

138:

1;75

:NO sxgg

BNE

BRY

SEQ Jl124

Efip

12%:

032226

046532

PAGE 124

°§§

§6s301

24
012605
012603

gg;a

Snp
MOV
MOV
BNE

6S:

214
032216
032220
ngsga

DEC
ast

6668
6669
6670
227

00000S

2?5983
125252
10320

555175

(X223

]

18:

005301
001375

10:43

Eggé ggggag

MACY1l 30(1046)
02-DEC-77
BUILD DATA BUFFER

RTS

128

(5P)+.R1

(5P)+.RO

'9aD POINTE!
NT § WITH ADD OF PAT 3

IGET Sflgggflg PAT 2
5955

EREPEQ§ PflT?ERN THROUGH BUFFER
;:BUMP PAST PARAMETER
:;POP STACK INTO RS
:;POP STACK INTO R3

:1POP

STACK

}1POP STACK

INTO Rl

INTO RO

67
257
6677

.SBTT
ORAD "L” R
TERS
;?B
.
#HED“Lh
REE?§§EES
ARE LOADED FORM THE PARAMETERS FOLLOWING
: %
THE SUBROUTINE CALL. DIAGNOSTIC MODE IS SET IN L.MRI

6681
6682

%
s¥

g?;g
£68

AND L.CS1 IS LOADED WITH THE COMMAND.

CALL:

JSR
. WORD

R4, LOADRK
CYLINDER

E§SBEBO RKB11 DSKLS CTRL PRTS
6EB.P11
02-DeC-77 10:2i1

MACY11l

LR B

geo 200
oPPy
NN X 9449

MOV
CLR

CLR
MOV
RTS
.SBTTL

NNNNNNNN

2Rgfifi&&

000002
000004
000020
000006
000010
000026

OPSTRT:

W=+

DLW
QNUNNY——

[y e ettt

8
vogogg 2 eRNOQDS
\‘NU: Q
St

0000000

; *

GETREG:

002160
000011

MOV
MOV

: COMMAND,
FORMAT ,DRIVE TYPE,3UPPER BUS ADDRESS BITS

:LOAD
:
:
:

(R4)+,L.DCYL
(R4)+.L.DA
(R4)+.L.BA
(R4)+ L.WC

#0MD, [ . MR1
L.ASHF

CYLINDER
TRACK AND SECTOR
BUS ADDRESS
WORD COUNT

{SET DIAGNOSTIC MODE
:CLEAR OFFSET

L.CS2
(R9)+,L.CS1
RY

:CLEAR CS2
:LOAD CS1
: RETURN

IN A STARAIGHT TRANSFER.

L.WC,RKWC(R2)
L.BA RKEQ(RE)

;MOVE THE “L“REGISTERS INTQ
: CORRESPONDING RKB11 REGISTERS.

MOV
MOV
MOV

L.DCYL,RKDCYL (R2}
L.DA,RKDA(R2)
L.ggé.axggacna)

MOV
MOV

L.ASOF , RKASOF (R2)
L.CS1,RKCS1(R2)

L.MRI RKMRI(R2)
RY

GET THE RKG11 REcxsrsns
ALL THE RK611 REGISTERS EXCEPT THE DATA BUFFER ARE
STORED IN THE “T* REGISTERS.

MOV
MOV

RO, -(SP)
R1.-(SP)

;;PUSH RO ON STACK
:PUSH R1 ON STACK

::PUSH R3 ON STACK

MOV

R3.)-(5P)

MOV
MOV

#T.CS1,R1
#11.R3

égoi+,(nx)+

:GET STRRT OF REGS
:SET COUNT

BNE

:LOOP UNTIL DONE

ADD

#4 RO

:SKIP OVER DB AND SPARE

MOV
MOV
MOV

(RO)+, (R1)+
cno1+,r.scp§
(RO)+.T.ECP

:STORE MRI
Ecc POSITION
;
¢C PATTERN
:

MOV
MOV

(RO)+.T.MR3
(SP)+.R3

:
MR3
::POP STACK INTO R3

MOV

18:

:WORD COUNT

RK611 REGISTERS

RTS
.SBTTL

SEQ 0l2S

PAGE 125

START THE OPERATION
THE
INFORMATION §N THE "L" REGISTERS ARE LORDED INTO THE

MOV

000016
000000

00000000

; ®

000000

et
= ==

6724

RETURN:
RTS

I10

; SECTOR
: TRACK
:BUFFER ADDRESS

- WORD

MOV
MOV
MOV

002276

10:43

.BYTE
"BYTE
- WORD
- WORD

LOADRK: MOV

o
W

oo
oo o oo oo oooo oo
NNNNNNNNNNNNNNNNY
~N NNN
N

RA A
SE8B8IRR LB

6683
6684
6685

02-DEC-77
30(1046 )
LORD TM L" REGISTERS

CLR
MOV

R2. RO

(RIH+

(RO)+.T.MR2

:8ET RK BASE

:GET CS1 THRU DCYL

:CLEAR T.DB
:

MR2

cznseao RKG11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

6739

6740

2;35

032436

032440

032442

MACY1l 30(1046)
02-DEC-77 10:43
GET THE RKB11 REGISTERS

012601

012600

MOV

(SP)+,R1

RTS

nov

oooaou

J10

PAGE 126

SEQ 0128

:;POP STACK INTO Rl

(5P)+.R0O

::POP STACK INTO RO

6743

.SBTTL

“"FIRST SHRLL BE knsv

6745

BECOMES BIT O AND VICE VERSA,BIT 14 BECOMES BIT

6744

6746

6747

THE CONTENTS OF

LAST

L BE rxnsr~ SUBROUT INE

R3 IS SWAPPED suo FOR END,

1 AND VICE VERSA, ETC.

6748
6749

x
‘¥

WITH R3 LOADED WITH THE WORD TO BE SWAPPED

675,

RETURN:

6754

WITH R3 SWAPPED

g? :
675

6755

6756

6757
s;ga

tx
032444

032444
8fl§3§8

FSBLVV:

010046
010146

6780
035428 002004
6761 032454
012700 0C0001
67

676

2464

6765

6764

12701

050104

2472
032474

6772
6773

032504
032506
032510

012604
012601

032514

000204

%3
6771

6774
6775

776

18:

001401

759
6767

CALL:
JSR

MOV
MOV

CoN
MOV

100000

006300
ooxuo?

2%:

g0,
010403

3%:

032512 012600

g;;g

.SBTTL

RY, FSBLVV

RO, -(SP)
Rl -(5P)

FAPERH
R POR SWAPPED WORD
:SET FOR BIT rs;r

BIT

RO, R3

:TEST IF grr SET

BIS

R1,RY4

gEg

;SHIFT FOR NEXT BIT
T
Efé;naéT;ESTED - YES - EXIT

MOV
MOV

(SP)+,RY
(SP)+ Rl

POP STACK {
,,POP STACK nro

RTS

MOV

BEQ
ASL

#BI715,R1

INO - SKI

o
MOV
RY,.R3

(S5P)+.RO

012737

032602

000004

PARCHK: MOV

67
67

032532
40

012737
00S037

000000
002332

002334

MOV
CLR

nsnp

MOV
MOV

81 .RY (R3)
#PAR.EN,
(R3)

6784

012737

012703

000340

032560

6791 03257
6793

032574
032576

830241

006104
001366

6794 032600 000406

MOV

172100

E;EE
12704 000001
6787 §§§§§9 §6§713
000001
6788

000006

MOVv

168:

JaleT
PO hext eI ser
.s ORED sunppeo u no
:POP STACK INTO no

CHECK FOR MEMORY CHECK ENABLE

032516
032524

:SET _FOR BIT SE

iSET gonnsspouoxncI

6780
6781

: ;PUSH RO ON STACK
::PUSH R1 ON STACK

Ry’
~SP)
#8170, RO

MOV

6777

I.E. BIT IS

TST

cLC

ROL
BNE

8208, ERRVEC

opn

RRVEC+2

» MEMBAS, v R3

RY
16$

22%

;SET VECTOR FOR MEMORY PARITY CHECK
;LOAD GOOD PARITY
:CLEAR FLAG

‘

:LOAD REGISTER TO DETERMINE IF

xn?gngngflcchENnaLE
:ENABLE MEMORY CHECK e
cuecx IF FINISHED
SET UP NEXT MEMORY PARITY MODULE

REQTORE TRAP VECTOR

CZRGEBD RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11

44
679 035604
67
67
6800

6804
6805

5806

6807
6808

lg
1
14

0326

032644

032650

12737

100S
12737
005037
000207

K10

208:

000002

000006
000006
002332

000004

000116
000116

000114

(SP)+, (SP)+

;ADJUST STACK

gEg

#2,R3

ROL

MOV

SERRVEC+2,ERRVEC’

BNE

s CHECK _IF FINISHED

168

GET NEXT LOCATION

:NO,

;RESTORE TRAP CATCHER

CLR
TST

ERRVEC+2
MEMPAR

MOV

SMEMVEC+2,MEMVEC' ; RESTORE TRAP CATCHER

BNE

;CHECK IF MEMORY CHECK ENABLE AVAILIABLE
:YES, RETURN

25%

CLR
MEMVEC+2
R Ts
PC
ROUTINE TO SIZE MEMORY

: RETURN

H
JSR
PC,S$SIZE
tx
RETURN
1 %¥SLSTAD WILL $0NTRIN:

6813
6814
6815

WITH KT11 OPTION
-- LAST VIRTUAL ADDRESS OF THE LAST BANK
WITHOUT KT11
OPTION
-- LAST ABSOLUTE ADDRESS OF AVAILABLE MEMORY
:%¥SLSTBK WILL CONTAIN THE LAST gnux AS A SAF

816

6817
6818
6819

:%§KT11

IS THE MEMORY MANAGEMENT

:%BITO7 = 0 DON'T ¥as ME

nugr BE §£

‘¥

DETERMINED BY ROUTINE

$SIZE:

MOV
MOV
MOV
MOV

:%BIT1S = O DON’T

:-:17

032726

mggs?;g
Eoqs
6843
0

YLER=8
£
Frae o

0387

£
o

534

Yh|

[=peYeretetere

032764
032770
032772

6830
6831
6832

6653 835660
858
(3006s
5829
32666

0000000

032652
032654

TM
L =]o=

5620

HEYY
BEHE
68
£8Y4
6848
6849
68S0

CMP

: igxtnninuunuuununuunnlnunun!"unnuuu

6810

6811
6812

6840

22%:

2ss:
.SBTTL

5508

68ee
6823
6824
6825

SEQ Q127

MACYL1l1 38(1846)
02-DEC-77
_10:43 PAGE 127
HECK FOR MEMORY CHECK ENRBLE

MOV
MOV

000004
000006

MOV

TRAP
MOV

$KT11:
033052
177572
100000

6523“0
0010
077406

000004

RO, -(SP)
R1,-(SP)
R2,-(SP)
R3.-(5P)

;;san RO ON Tng STACK
STACK
R1 ON THE
;;SAVE
:iSAVE R2 ON THE STACK
;;sngs ngson THE srncx

SP ag

. :SAVE THE STACK POINTER

177740

000004

TO THE PRESENT PS

(SP)+, 38ERRVEC+2

; ;PUSH OLD _PSW AND PC ON STACK
::SAVE THE PSW IN @%ERRVEC+2

.WORD

200

TST

JUSRO

MOV

sKIPARQ, R2

;;

877406, -40(R2)
(SP), (R2)+

;:PDR = 4K, UP, RERD/WRITE
»PAR"
il

R3, 1
#177600,-(R2)

: 1LOOP UNT;L RL# EIGHT ARE LORDED
;;SETUP KIPAR7 FOR 1/0

BPL
MOV

MOV

MOV
MOV
MOV

177600

ERROR VECTOR PS & PC

#3776.R1

TSTB

ADD

000200

033010

18:

PRESENT

aotnnvsc -(SP) ::SAVE
,
- (5P)
MERRVECH2

MOV

BIS
CLR

032710

THE CALL

HAVE MEMORY MANAGEMENT OPTION

: ;SET THE ERRVEC PS
000006
003776

BEF

MOV

(PC)+

: ; SETUP_ADDRESS
: ;USE

MEMORY MANAGEMENT?

TO USE MEMORY MANAGEMENT

1:SET

SCORE
3
NO
#SKTNEX, 98ERRVEC ;-;sr FOR TIMEOUT

#100000,8KT11
-(SP)
#108,R3

8200’ (SP)

-(R2)
#28, J8ERRVEC

;3KTI1

vgu THERE?

;;YES--SET KT11 KEY
15§~ron “PAR" LOADING
;;Iuérx

ADDRES

FIRST “PAR"

::LOAD EIGHT "PAR.’S"TM AND EIGHT "PDR.'S"

: tUPDATE FOR NEXT "PAR"

1:SETUP KIPARE FOR TESTING
::CATCH TIMEOUT IF NO SR3

c§sgsgo
RK611 nghgcc;;ulsngf
6851

000020

B
8854 R
1

MACY11 3266??3% 782§?§E ;gxo 43
172516

MOV

ATNe

7 000004 8.]
sggs
833815
8?3533
673345
ses; §§§§§§ §§§§?7 fi
3775
4s:

013;5
’2
agé

6863

2735 100000 032710 S$SKTNEX: BIC

sesg

177572

737

033110

4000
8863
033079
Dess0
000040
6868 033100 005711
sgga

gggx

8gg1ae 010137 033154

687

oggxue

6879
6880

3136

010237

033144
0331;8

012602
012601

812&03

g??%x

#100000, $KT11

gfx

18:

A
ABD
CMP

SCROUT: SUB
Hov
MOV

2 axr

: :TURN OFF MEMORY MANAGEMENT

__;;KT1 uou-sxxsreur
FOR TIMEOUT

o£7777s,R1

ONE

nsfi# BY 1K
ixucn
INCREEE
nr on TIME OUT
L

+4000,
R1
""o-'TRY
s
ounsgé
?§§c
234
aoennvscoa"RSES
PRROR
VECTOR
(SP)+. 9SERRVEC

$SIZEX: gue

033156

;

oscnour acsnnvsc ss

.~.8°SeRl

TST

177776

SCORE:

J4SR3

SEQ 0128

ggxipnar,cna)
53557
xr
(R2),R2
,,csr Lnsr BANK+1

gkn

8871
033118
162701
004000
687,
1iig§
6 702 000040
£874
31
1012637 000006
6875
3126
000004
68

BHI

$KTOUT: MOV
000004

PAGE 128

STy
LT
Sacng’
ot
ey
nonv
MANAGEMENT
usxrour
aosanvsc':32¥
9gn ME OUT
aoxqa 56
,,1
8" Nog; ;-ncn

MOV
ggg

gase
6860
2825

820,

L10

MOV

RI,SLQTRD

: ;LAST ADDRESS

MOV

(SP)+,R3

;;nsgrons R3

MOV

R2.SLSTBK

MOV
MOV

(SP)+.R2
(SP)+.R1

: JLAST BANK

;;RE TORE R2
iRESTORE RI

5883
3154
00
Fegg
83312
8358
D

LSTAD:
.WOR
g%arnz
sgggg
8 g
HRNDL

2 rd

llllllll!il!lllIllillllll»l!lllll!ilil!llllll!llllllllllillll{ll

6889

fls

6886

5888

THIS nourxus CONTR

£5es
gggg

Tl TEST(o
IN SWR<7:0»

LOOP ON

:ggge-x

gggg

6893

03316

6901
6302

033162
033170

032777
001131

6304

033172

000416

033174

013746

6900 833158 104407
6905
63906

53 "9"25"‘ grun)

ua ESTS. IT WILL INCREMENT

g oasanv REG. (DISPLAY<7:0>)
lfl gogg ; OR
FLG) NT DISPLAY
08>
:rufq CH OP xonsvxoe BY THIS ROUTINE RRE:

6830
2835

630

:: CONTA
THE
LAST
ADDRESS
2588n7n§=§
THE LAST
BRRK

$SCOPE:

040000

145750

18§:

SCOPE

CKSWR

exr
;

#8888START

§xTSTR: BR
000004

MOV

; ; SCOPE=10T
#BIT14, ASWR
$OVER

;;TEST FOR cnnncs IN sorr SWR

: ;LOOP_ON PRESE TEST?
:YES IF SW14=1

OF CODE FOR THE XOR tecTERusunes
6%

JSERRVEC,~-(SP)

;s IF_RUNNING ON THE “XORTM TESTER CHANGE

:1THIS INSTRUCTION TO A_"NOPTM (NOP=240)
;;SAVE THE CONTENTS OF THE ERROR VECTOR

| CZRGEBO RKB11 DSKLS CTRL PRTS
CZR6EB.P11

02-DEC-77 10:21

MACY1l 30(1046)

231

oazsg;

b 8651#40 -

Egig gg% mm 000400

5§:

sg%

gfi

2716

145702

a:g'é

géz?ig 001115 001103

2339

Eéé

gg;:c:e, 3SWR

,.bgop
ON SPEC. TEST?

REL
ADD

E v

S§

¥§¥a

BEQ

ggso

83347

6962

033476

3474

,.EST583’%?79 DESIRED TEST

gstP, SLPADR

fizr-){c
33

%;39
001104
37 001234 001104

E§V
HR®
EEI:
TET

gsPERR, SLPRDR
3FTheS
a:sfinu.asun
§PASS

gs\x,nss.sxcm

n85

ogxroe, 3SWR

ficm

81, SICNT

ST“mE

:,,rom
1 8RRL HE
EERADDRESS
P&+ muMBER
AS AN INDEX
OF TEST POINTER
D l

5"ERS.‘?occunngg!»mN .

xt'__sfigons FOR THIS TEST OCCURRED?

::L00§F0N ERROR?

"ggr LoB‘S ADDRESS TO LAST SCOPE
1RO
THE NUMGER
OF ITERATIONS To MAKE
l.
:: m?r Tsffir'%usv
JIF Y$
:
nm

::memé"?
?‘enflf
éS'Ju
,,cnscoF(
XOF ITERATIONS MADE
::Rgx n"fizé 5@ {%ngs%Sgumsn

JUAGHY.STINES
Esuu
RS IONS TO
srsr-m STESTN
Eg%im%g figflm MAILBOX
(g)iLPE
::?.R‘JE
EaRE
(1)SERROR
ON NEXT TEST
s*S?nn
JDISPLAY
;:8"§nmv
EST
NUMB
$LPADR, (SP)
"nsggrunn ADDRESS

003720

32582;&3000'

3414

.WORD

TST1+2

;s STARTING

004444

.WORD

TST3+2

: ;STARTING ADDRESS OF TEST 3

4032

"WORD

ossuoeTaL (SP)

§Rmx, SERFLG

%.t?: n"?s
"

::annugn

gnf;e

528
BIWR TALE B
voieM o o : OV,
6950 033424 1{:15737 ooiioa 001254
goxa
2325 83333% 81123; 8811?3
MOV
£353
Q3ME 113937
000D
001
dGue
5335
8333:5'4
51
7
881182
wéuéfi
SOVER:
MOV
5959
‘-ogg 868563 001106
E?\Il
oglggn

ons'?imcx msn A TIME OUT

<§P) STSTNM

gxz

3383 8?393‘7 000001 001104 18:

23553

836, (SP)

277 001000 145612

ggg
fié‘?.gz 001110 001106 7%:
£37 03340
10037 poiiga
S
‘2’330 D3335¢ gfifg‘ 004000 145560 3$:
seflé D3336¢
254 001256

233'0
£t

Bog

%ggg 001106

iiTme
OUT ON XOR?vzcron
.,gss'rsn;”s NEERR

(gpn @8ERRVEC
( P“
aszamc

g[w;

usy 001102

£5:9
:
xos; 001103
6930 033306 001421

SRisd0En
VEC

ERV
gnc

O el5*‘2'935#*59
o e

000036

8354
§§§§§§ §§§3i2
6925
716 033472

Eggz

SEQ 0129

ag OF CODE
i FOR’ THE XOR ”“53#
£S$:; #888END
'rssrt-:nucu Em:ggm t12557

5318 fisie TG 1oz
gsao

10:43 PAGE 129

SCOPE HANDLER ROUTINE

B30 833582
BiETF ?99858 .
i
8683

g 59{1

02-DEC-77

: iMAX. NUMBER OF ITERATIONS
TST2+2

ADDRESS OF TEST
1

TARTING ADDRESS OF TEST 2

02-DEC-77
10:43
SCOPE HANDLER ROUTINE

MACY11l 30(1046)

. WORD

A
e
ReRIA

83%2%83#2 Lo
N

001375

N1O

SEQ 0130

PAGE 130

TSTY+2

: s STARTING noonssg OF TEST 4

1 i2TORTING
ADORESS OF
OF TEST
TEST 96
%g
Nwfi
:: ;START
;START
S5 OF TEST 10

: ;STARTING
ADDRESS OF TEST 11
: :START
sg OF TEST 12
; ; STARTING
&S OF TEST 13

2E000000000000
RRR
Brtnm ONN grnu%fixmqgefzcn: 2=
o258

O WUl
ONENEN

8r8a8

——

=58SRoBos Ao

——

00
LTM
Lo
00
oo
un I
NN PLENONLE
wao

nfldhfldhsdhflm &
NP FARA
'fl\qg v

oo LAl AL AU AL A AL AL AU AL AL

§§§§§§

CZRGEBO RKB11 DSKLS CTRL PRTS
CZRbEB.P11
02-DEC-77 10:21

{RTART 5§

§§ OF TEST is

;:§mm g %gi g ST 20
ST
MOONSE & Tt ol
;;srnnr

1i2]ORTING
:
ISTART
; ;START

ABORESS
0!
A0

OF TEST
58
TEST 27
3§ TEST 30

1 s STARTY
i 3 START

:
:

OF TEST 33
OF TEST 34

’

. WORD
- WORD
- WORD
- WORD
WORD

ADDRESS OF TEST 24

; s START

;;§TflRT

:START

Q0!
:

OF TEST 31

OF TEST 32

OF TEST 35

llillllllllllll!i‘lllllll&llll&llll!ll!il!!illlll
!!lllllgggelil
H"88TTL
LOOP ON INTERNAL ERROR
001000

145344

SCOP1S:

gIT
Q

TSTB

001103
001110

BEQ
HOV
%

TST36+2

#SW9, ISKR

SERFLG
Ss$
SLPERR, (SP)

2TARTING ADDRESS OF TEST 36

;CHECK_IF LOOP ON ERROR
; NO_RETURN

;CHECK IF ERROR OCCURED
iNO, “RETURN
GOTBsgk TO BEGINNING OF LOOP

.SBTTL APT COMMUNICATIONS ROUTIflE

S$:

000001
000001

034056
034054

000001

034056

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 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 46 36 36 36 36 36 3 36 3 3 2
:; TO REPORT FATAL ERROR
#1,SFFLG
§ATY1: MOVB
:1TO TYPE A MESSAGE
81 SMFLG
MOovB
SATY3:

SATYY:
$ATYC:

034054
000001

001270

000100

001271

000004
000002
001250

000004

BR
MovB

sAtyc
#1,8FFLG

0.8
5H¢L
BAPTENV, SENV

1%:

;;TO ONLY REPORT FATAL ERROR

;;PUSH RO ON STACK
:PUSH R1_ON_STACK

,,suoah? TYPE'A HESSAGE?
,,opsaa;xucaguoen APT?

:
MESSAGES?
aaPTSPOOL SENVM : 1SHOULD SPOOL
BR
_NOT:
::IF
PIGET nessncs ADDR
3 sp) RO
UMP RETURN ADDR.
#2,4(SP)
,,sss IF bons W/ LAST XMISSION?
snécrvps
:IF NOT:

WAIT

| B

RKB11
CTRL PRTS
| %2“8"P11
8?552#-77
10:21
7019
001264
;850

785§

MACY1l 3U( ms)

266
&%oo-o
001250
833755
0004

7029
;ggo

177776
034636

7033
7034
7835

034056
001270

7o§
7040

000004
001252
000002 000004

7 3?

;33

704

7048
7049
7050
7051
7053
7054

SUB

38:

108:

001250

733
?
704
7044
7045
7

001250
034056
034055

118:
128:

4054

034054
(034055
034056

7055

000
000
000
034060
000200
000001
000100

$MSGAD, RO

g:' SMSGTYPE

P:TELL APT TO TAKE MSG.

ASR
MOV

RO
RO, SMSGLGT

MOV
ADD

J4(SP) 48
82, 4(5P)

START

MESSAGE

;;cs MESSAGE
LNGTH IN WORDS
;;Pu LENGTH IN MAILBOX
:;PUT MSG ADDR IN JSR LINKAGE
:BUMP RETURN ADDRESS

MOV
JSR

17?776, ~(SP)
PC,STYPE

; s PUSH 55576 ON STACK
:iCALL TYPE MACRO

1ST8
BEQ
TST

SFFLG
128
SENV

; ,suouw REPORT FATAL ERROR?
i IF NOT: BR
i
ING UNDER APT?

nao'
vE
ADD

82,4(SP)

BEQ

TST

INC
CLRB
CLRB
CLRB

SMFLG: .BYTE
SLFLG: .BYT
SFFLG: .BYT
-EVEN
APTSIZE=200
APTENV=001
APT
L=100

000040

;8?;"

;

C-77 10:43 PAGE 131
APT COMMUN cggxons
ROUTINE
MOV
; ;PUT ADDR IN MAILBOX
2%:
;tsga RO,
éfib”SMSGAD
::FIND
END OF MESSAGE

001264

?
7t

Bll

;;}

129

$MSGTYPE

(SP),SFATAL

NOT:

“xr»l'"fios'rm ‘L“l-;?}’ MESSAGE?

;;GET ERROR
#
: : BUMP

RETURN

SMSGTYPE
SFFLG
SLFLG
SMFLG
(SP)+,R1
(S5P)+.R0

;;rsthanfl TO TAKE ERROR
;icL
FRATAL F
::CLEAR LOG FL
; s CLEAR_MES
rmc
:POP STACK INTO Rl
,,POP STACK INTO RO

O
0
0

: 'MESSG. FLAG
::L0G FLAG
:'FATAL FLAG

i ; RETURN

;

APTCSUP=040

.SBTTL

7058

ERROR HANDLER ROUTINE

H lll!!lilllllllllllll!!!ll&lllllllllllllllllll!&ill*llllli!!illl

7059
;32?

huxs nounne
un.%mcnenr.m THE ERROR FLAG AND THE ERROR COUNT,
%sm o
E onR AND THE RDDRESS OF THE ERROR CALL

7062
7063

nne SWITCH opnons PROVIDEO BY THIS ROUTINE ARE:
:#SWIS=]
HALT ON ERROR

7065
;866;

: #5W10=1
-:gggg:x

;gg

7064

%SW13=1

7070

034060

7072

034062

7071

7073

7074

034060

104407

034066

001775

034070

$ERROR:

105237

001103

013777

001102

78:

145044

INHIBIT ERROR TYPEOUTS

BELL ON ERROR
LOOP ON ERROR

ERROR
CKSWR
INCB

BEQ

MOV

N
SERFLG

; ; ERROR=EMT AND N=ERROR ITEM NUMBER
:; TEST _FOR_CHANGE IN SOFT-SWR
,,ser me sn OR FLAG

:DON’T

LET THE FLAG GO TO ZERO

$TSTNM, aDISPLAY ;,oxsmv TEST NUMBER AND ERROR FLAG

SEQ O

288

Efi
N

gET
R

52::
$:

4§:

001236

023276

—

001110
001236

000042

N3NNI NN NN N N

SITEHB
ageaspc
#BIT13, SWR
SB’mm
,SCRLF
PC,SATYY

81
BEQ
MOV

#BIT09, 3SWR
43
SLPERR, (SP)

MOV

ESCAPE, (SP)

CMP

BNE

HALT

6S:

SAPTENV, SENV

2%
SITEMB,21$

O
O
22%
JSWR
35

g 5

’

(SP) ss

.BYTE
'BYTE
?R
ST
aPLT

gfigua

3s:

8=y

NENNE

85% v

}uw—
£

£
Lo
R[

—

B
A 3 &>R
hh-

[

oL£nNO

Bt Pt Pt Pt

MOVB
BIT
ok
TYPE
JSR

218:

144714

,,COUNT THE NUMBER OF ERRORS

BNE
MOVB

034200

001000

cMPB

001270

144730

INC

gflg

SEQ 0132

PAGE 132

,,BELL ON_ERROR?
aélP
i

18:

Cll

oaxtxo JSWR

BIT

145034

SCAPE

#SENDAD, 3842

; sGET ADDRESS OF ERROR INSTRUCTION
SRVE THE ERROR ITEM CODE
;387RIP

% TYPEOUT I

::§o ToTfigsausfiaon ROUTINE

: RUNN
sx"s 397ERRH&ESEPORT
::no
NUMBER AS ERROR NUMBER

,.ss? ITEM

:REPORT FATAL ERROR TO APT

SIHALT

$3TEST Sgn

c
E

IN SOF T-SWR

ITCH SET?

ON E

TURN FOR
L

uD:
; sACT-11

agTURN ADDRESS FOR ESCAPE

,,eggNCH IF

AUTO-ACCEPT?
NO

; ; RETURN

RTI

o 363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3606 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 6 36 36 3 3 2

TTL

TYPE ERROR ROUTINE

!ENTRY JSR PC, TYPERR

;ns URN RTS PC

NN NN

N NN N N N N NN N NN

h?;hfl—hfl—b-hfl—hfl—:::z::3::3::2::?-&15hw-hfl—h»-h-

8B NR R O SDD NN E w0 BB IRRZERSS3

s P

3333333333 9535953
S
3

7078

CZRSEBO RK611 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21

MACY11 3?(10“6)
02 -RESGU??I 'éO:'fi
RROR HANDLE

USES THE "ITEM CONTROL BYTETM (SITEMB)
S _ROUTINE

TO DETERMINE WHICH

o 13T B nERORTel Eobceiiine
S01STRReohel
001254
001254

!Illlllllll!ll‘llllllllllil.illlll!ii&llll!illlll!llllllliillll
SAVREG
SRVE TEST NUHBER FOR REPORT
STSTNM, STESTN
figva
STESTN

}YPERR:

BIC
MOVB

034314
034316

001330

18:

BIC
DEC
ASL
ASL
ASL

ADD

8177400,
sxr;ngok

g
R
RO

RO
#SERRTB,

CLERR UNUSED ?E

FORM INDEX FOR ERROR TABLE

;FORM ADDRESS OF ERROR ENTRY

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11

MACY1l 30(1046) 02-DEC-77
TYPE ERROR ROUTINE

;'&.'-"

fagg o
001245

104401

71
71
;iaa

Su 034354
14
104401 001245

714

012001
445

7;33
71

:'133
714

714

7144

7148

71u9

2%:

3s:

4s:
S§:

71M

3
438

71
71

108:

112003
720

7150 034402 001416
58-‘4'
71
7154
7155
7156

83:312

1044
3
001403

7159 (034426

104401

7123
7164
7165

85’302
14
8520737

;igg

7161
7162

1401
034436 005104
qso

;isg

1751

nga 833-435 %383

7199
7170
7171
7172

7173
7174
7175

034466

7e
474
76

138:

001245

i48:

034464

041116

104401

001245

000740
45;

118:

128:

i 041116

nga wg @760

5-4

MOV

002314

;i;g

oaustlaa

010000

7180
7181
7182
7133

034522
034526
83“233

104401
005737
Soy 7

041121
000042

7185

034542

012706

001100

158:

178:

188:
144430

208:

7186

034546

000137

023106

‘DH
msn%
HERE
;GET DT
POINTER
aam‘;

THERE ARE NONE

INDENT SWITCH

IRESET

:GET DF POINTER

;STORE NUMBER OF DH'S

DEC

xgg

m
: NO-

SCRLF

sTYPE <CR><LF>

TYPOC
ang

En E

TYPE

1ST

BEQ
COM
DEC
BLE
MOV

148
RY

123

llssacsa'
tag)

numsn or DATA WORDS
;GET 8 ST
?&m PAS
IF ANY oam ron THIS HEADER
*TEST

iNO_- SKIPm
DATA PRINT
WORDS
i CH cK

i YES,
*
PUT'FIRS mm WORD ON STACK

m WORDS

TORS

: CHECK xr n:x

nofnwuuaLs

14
RY

:NO, DO NO
um'f&
:C
moe

(RO)+, 188

R2
208

;nongn 's’
i NO=
:GET NEX ou POINTER

gcg

'1‘3:

%F ungsnozn GET DATA

TYPE
TYPSD
. WO

, SPACE2
0

rv
So?"

BR
RESREG
IN

ios
ERRCNT

;LOOP
; INCREMENT ERROR COUN

B?o

TYPE

aér

MOV

023134

RE ISN’T ONE

3(R1)+,-(SP)

7184

000001

(RO)+ R2

,gsw
;
;;YPE cn;afir

BNE
MOV

gflxs

127

(RO)+,RO

SSRNEH TPTHERE 15T Lme FEED
'en
IYPEPOINTER
ERROR MES2&2“"

SCRLF
tRO)+,R3
(RO)+
R3

;i;g @gég %g%z 000024 002314
Y

0(RO)+,R1

SEQ 3133

TYPE
MOVB
Tgra
18T

BEQ
TST

131496

(P0O)+,48
,SCRLF

MOV
aea

MOV

ossooa

]

uoSo

PRAGE 133

5828
SCRLF

MOV
BEQ
m;s
CL

3 104401 001245

714
nug

BEG
TY
NeE
)

10:43

TYPE
TST
BEQ

MOV

JMP

17%

$CRLF

gsma,asun

5§§ ,ERRCNT
, ABORT
42
308

#1,SEOPCT

sstack, sp

$EOP

Eno- RANCH
:

INDENT

NTER GOES HERE

cnscgsIF ABORT arrsn 20 ERRORS

gnecsexym"'e'non THRESHOLD EXCEEDED

rv#e “PROGRAM HAS BEEN ABORTED BECAUSE
ERROR THRESHOLD EXCEEDED"
cuccx IF IN CHAIN MODE
'"SA "“&T
FORCE

END OF PASS COUNT TO ONE FOR ABORT

s INITIALIZE STACK

'BRING IN NEXT PROGRAM IN CHAIN

CZRGEBO RKG11 DSKLS cm. PRTS
CZREEB.P11
02-DEC-77 10:21

7187

;{g

034552

034554

MACY11 30(1046)
02-DEC-77
TYPE ERROR ROUTINE

000000

;ig?

7192

7183

013

127

001324

000

5138
2 013706
3 001100
B0ii03
21% 034800

7197

2139
7200

604

000010

HALT

.SBTTL

CONTROLLED PROGRAM HALT

RTS

;SET *611 BASE

af,
H5uC

B
SETACK.SP

°L‘m
CLEAR Efim“"‘m
STACK

MOV

81, SEOPCT

TYPE

19 012737
BOjaps ooooue
000001 023134

7203

8’33630

JMP

#CLR,RKCS2(R2)
OPROO?

SEOP

:CLERR SUBSYSTEM

HALT MESSAGE

PAASL
1 NOWITON Powame
:FORCE _END OF Pnocann
:JUMP TO END OF PASS

5%:

HALT

;ggg

.SBTTL

TYPE ROUTINE

7208

3 llll!ll'llllllllllll!llll!llllilll!lllllllllllilllllllI.!llllll

7ell

P ¥NOTEL:

kfluL CONTAINS THE CHARACTER TO BE USED AS THE FILLER cmancrsn

:uorsa-

SFILLC CONTRINS THE CHARACTER TO FILL AFTER.

;agg

000000

$BASE , R2

MOV

034616

034624 000137 023106

SEG 0134

CTRHLT: MOV

041053

;gm

PAGE 134

30%:

25§:

000207

10:43

Ell

632 000137 002404

7209
7210

JMP

START1

:¥NOTE2:

;5%3
7els

’icm.

;5%

:on

;gég
7554

':
-

7216

T%1)

SFILLS conmms THE NUMBER OF FILLER CHARACTERS REQUIRED

usmc A TRAP INSTRUCTION

TYPE

, MESADR

: ;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING

i3 1193 H;ggsn TERMINAL?

;Eggoa

;gga 0342% igggg; 001157

$TYPE:

;gla

fipfl.c

7227 gggg ggxumD46

18:

MOV

RO, -(SP)

;gaag gsggz oooogg

7229
72
7231
7232

56
4
0346

17600

2737
1011
132737
001405

000002

000001
000100

7533
D308
004237 033698
72
7
7236

710

716

001003

7240

034724

005726

7242

034730

0B2716

7237
7241

:RESTART IF CONTINUE

inourms T0 TYPE RSCIZ I'E . sme MUST TERMINATE WITHA O BYTE.
:%THE ROUTINE WILL INSERT
A mrgs % CHARACTERS AFTER A LINE FEED.

7212

7228

;HALT PROGRAM

034726

132737

012600

001270
001271

000040 001271

000002

B1S:

mfl:u

MOV

CMPB
BNE
BITB
BEQ

SAPTENY, SENV
628
$APTSPOOL , SENVM
628

"%
Bo'SATya
LWORD 0O

62%:

BITB

608:

MOV

38:

az2lsP),Ro

#APTCSUP, SENVM

BNE

60%

TST

<sm+

ADD

82, (SP)

(5P)+ RO

5;%\7,:HERE IF NO TERMINAL
; iSAVE RO

:IGET ADDRESS OF ASCIZ STRING

,.numasm IN APT
i iNO
CHECK ron AP
;
MES
..uo
CHECK on

cousou

S FeazactSS ‘SS For aet

5;%%230:
;;

CONSOL suwasssso

i 3 YES, SKIP_TYPE ouT

Eixr TERMINATOR POP IT orr me STACK

: 'RESTORE RO

:IADJUST RETURN PC

noenno

RTI
CMPB

BEG

#HT, (SP)
ELS

BNE

CMPB

000200

TST
TYPE

scngr

03S114

5§:

035050
001156

6S:

001154

7%:

000001

0350S0
035114

CLR
BR
JSR

cMPB

BNE
MOV

#CRLF, (SP)
(SP)+

: ;BRANCH IF NOT <CRLF>

CLERR CHRRHCTER COUNT

TT"Ex THI7EO&
o CHARA
TERCHARS. ?
F%LLER
HE
CHAR.
G%

2%
$NULL
, -(SP)

<CRY<LF> EQUIV

;POP_

,,TYPE A CR AND LF

sFiLLC, (SP)+
1(SP)
63
PC, STYPEC

DECB

; ; RETURN
; ;BRANCH IF <HT

$CHARCNT
EE?
PC,STYPEC

DECB
BLT
JSR

SEQ 013%

PAGE 135S

G3i7%0

Ys:

000011

F11

8 OF FILLER CHARS. NEEDED
THE
CHAR.
A NULL NEED TO BE TYPED?
-

TYPE ROUTINE

10:43

——ln

034734

02-DEC-77

:SEuERReR,
3:2

n§

RK6E11 DSKLS CTRL PRTS
EB.P11
02-DEC-77 10:21

MACY11l 30(1046)

F_NO--GO POP THE NULL OFF OF STACK
YPE A N¥LL

SCHARCNT

NOT COUNT

RS A COUNT

SRS i

: HORIZONTAL TRB PROCESSOR
030

oL
o
£RO

o
W
qwunonn

000

}NJ £

035042

000040
03S0S0
000007

95:
8%:

035114

JSR

MOVB

BITB
BNE
TST

$TYPEC:

144074

000002
000015

144066
000002

oooo1e2

000002

18:

(SP)+

2%
ASTPS
$TYPEC
2(SP),aSTPB

BNE
CLRB
BR
CMPB

18
§CHARCNT
STYPEX
8LF,2(SP)

?EO

NCB
$CHARCNT: .WORD
§TYPEX: RTS

.SBTTL

9s’

BR
TSTB
BPL
MOVB

cMPB

035114

trvpsc
PC
87 SCHARCNT

#CR, 2lsSP)

STYPEX

(PC)+
O
PC

REPLACE
TAB WITH SPACE

,,TY

PACE

: 'BRANCH IF NOT AT

;1 TAB STOP
;PO SPACE OFF STACK

:1GET_NEXT CHARACTER
! 'WAIT UNTIL PRINTER IS READY

; ;LOARD CHAR _TO BE TYPED INTO DRTR REG.
,,IS CHRRRCTER A CARRIAGE RETURN?
38
H IF NO
,,YES--CLERR CHARACTER COUNT
TEX

::xs cunnncvsa A LINE FEED?

F YES
: iBR
,.coun THE CHARACTER
: :CHARACTER COUNT STORAGE

BINARY TO OCTAL (ASCII) AND TYPE

llilillllIl!llll!i!lllll!!l!!l!ll*lilll!ll!ll*ll!llllll!lllliil

’iruxs ROUTINE IS USED TO cunucs 16-BIT BINARY NUMBER TO A 6-DIGIT
; #OCTAL

(ASCII)

NUMBER _AND
TYPE
I

s &
s ¥

MOV
TYPOS

NUM, -(SP)

lSRZEOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE
; %C

3 &
P %

s &
¥
s @

BYTE
.BYTE

N
M

; sNUMBER TO_BE TYPED
,,CRLL FOR TYPEOUT
;iN=1 8 & FOR NUMBER OF DIGITS TO TYPE

; 1=TYPE LEADING ZEROS

,,O-SUPPRESS LEADING ZEROS

CZRSEBO RKB11 DSKLS CTRL PRTS

CZRBEB.P11

02-DEC-77 10:21

MACY1l 30(1046)

02-DEC-77

10:43

Gll

PAGE 136

SEQG 0136

BINARY TO OCTAL (ASCII) AND TYPE

7299

: ¥§TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST

7301

: %CALL:

7330

:¥§TYPOS OR STYPOC

7302

MOV

; sNUMBER TO BE TYPED

;305

;:gngoc---snrsn HERE FOR TYPEOUT OF A 1& BIT NUMBER

7§§2

TYPON

NUM, - (SP)

;gga

;

‘e
;¥

7310

$TYPOS: MOV

1
01764
7311 833153
11 39 83888? 035343

7312

035132

;3{5

iuu

7313
7314

0351
14

112637

035345

1{2;;7

000001

gaszxs
06

~
035333

i?§

§i°3§§

;321

179

113q

7§g3 §§§1

18§°q

J(SP),-(SP)

1(3?):56§?LL

s ;s

ADD
BR

o; (SP)
STYPON

(SP)+.SOMODE+1

;;NUMBER OF DIGITS TO TYPE

: ;ADJUST RETURN ADDRESS

MOVB

STYPOC: aoxa

Rk
7352 832515 615583 000012
%

038502 §g§z§§

7327
;

7330

7331

035230

ggss; ;gs zs§? FIL%GS¥§TCH

ggz

sa,-(§§;

: ;SAVE R3

zgxa

ggfiooe+1,nu

;3
733
7339
733

7338

7341

03526%

;344

035274

7345
7

7§3§

MOV

3
185

18:

CLR
ROL

006105

2%:

ROL

5 1 oasaw
70233
100016
035254

7333 832314

042703
1002

177770

ponss
Gires
110337 oasazo

4$:

zgggg* 83§§q2
q

090742

7353
7354

035324
035326

012603
016666

815284

000002

ROL

Sg{
DECB
BPL
BIC

00S204

035316

732& Eggg

3%::

;350

cg:igcn

RS -(

i A12(SP)oRS
A

105

000004

%6, RY

::SET THE ?*ERS%IBN 3ouur
H

::GET THE NUMBER OF DIGITS TO TYPE

e
i
IPICKUP THE INPUT NUMBER
.

:SUBTRACT IT FOR

R3
g

;;CL;RR T
i 1RO “TEns

: :FORM THIS DIGIT

MAX. ALLOWED

o¥rpurnugno
NTO “C

gg,aa
SOMODE
73

::GET
LSB TROFDIbIT?
THIS DIGIT
9
R
::BR_IF NO

::TEST FOR 9

#177770,R3

P:GET RID OF JUNK

S 0?

BP0
¥ege
R3,8%

e
1505, 1
RS
,.savg ronT;;g ggcxr

;E?zsuas LAST DIGIT ISN'T A BLANK

(§P)+:Ru

52522785 RS

INC

7%:

DEC

sgtnr

ggv

%SP)4 -

MOV
MOV

(SP)+.R3
2(SP) . 4(SP)

THE MODE
;;LssoPICKUPZERO
FILL SWITCH

:I,SOFILL‘I

MOV

035345

; ;NUMBER TO BE TYPED

;;CALL FOR TYPEOUT

MOVB

7319 §§§x§8 11575; 558882 SSESuS STYPON: ngv
;3:9

NUM, -(SP)

::CALL FOR TYPEOUT

MOV

; s DON’

5588uu1

) Qo TussLnsr DIGIT

: 'RESTORE
R3
:iSET THE STACK FOR RETURNING

CZRGEBO RKB11 DSKLS CTRL PRTS
CZR&EB. P11
02-DEC-77 10:21

MACY1l

035342
035343
035344

02-DEC-77

BINARY TO OCTAL

o388 ik BAgBAE
41

30(1046)

noy

8s ’

888

YTT
'3
.BYTE

SOCNT:
SOFILL:
$ OMODE:

000
[s]0]s;
000000

.BYTE
.WORD

JSBTTL.

10:43

PAGE

137

SEQ 0137

(ASCII) AND TYPE
(SP)+, (SP)

O
O

;;R$TUR" F n
1 asurxnc
Pg
r
55?:8#?35
::0CTAL DIGIT COUN

~ 34 ZERO FILL SWITCH
nunegn oxcxr TO TYPE

GOMVERT BINARY TO DECIMAL’

YPE ROUTI

3 luunnnuuu|inulnunnnmunuliunnuuunnu

lTHIS ROUTINE IS USED TO CHANGE
A

n S-DIGIT

one Tigh TiFE
11 DEEEIGNG
SePoTXEELsnoxuc
IR I 5"";5432‘6& NUHBER
ZEROS WILL ALWAYS
B

; #BEF ORE

:QEELRCED WITH SPACES

$TYPDS:

LLrrrirrrrr

3 R RRnRR0e0a
: 73 FEREREN=62R3
(v

TYPDS

NUM, -(SP)

MOV

RO, -(SP)

; ;PUSH RO ON STACK

000001

035562
000040

18:

03sss2

3s:.
4s:

RE'-(2P)
-(5P)
R3,
RS -(SP)

STACK
ON grncx
$iUSH RRS 83
555325
ON STACK
H

MOV
BPL
NEG

20(SP)
18
RS

::GET THE INPUT
::BR IF _INPUT
i:
T

MOVB
CLR

MOV

888066
000040
000010

177777

6$:
78:

820200, - (SP)

8-, 1(SP)
RO

#SDBLK, R3

gexa

aé,(R3)+

R1,RS

égc

MOV
L

?2?

BNE
rg}g
5§:

PUT
;553
H?ug 1 Rourxgg - R ON THE STACK

Hov
MOV
MOV
MOV

020200
000020
0000SS

MOV

SLB

$OTBL (RO),R1

NUMBER
POS
Y
R POS

11 NUMBER NEG.
PIMAKE T
ZERO_THE co«;rnnrg INDEX
: ;

PISETUP

i rn;ug

ou PUT

OINTER

Iac nanngrsn TO A BLANK

£Ec§§ rueHE?a“*'as

;;ssan THIS BCD DIGIT

R1,RS

; AD
rnur
:.rnL
chx "B 8?"

né
33

;SP)
(SP)

MOVB

RE !n3)+

SWITCH AND SIGN

??sp) 1(R3)

TST
CMP
BLT
BGT
MOV

5839

BIS
BIS

:3SET

0, né

(RO)Y+
RO, #10
2s’
83
RS,R2
X3

;1 INC

HE BCD DIGIT BY 1

5713?
ooxuc LERDING 0's?

S
::HSKE
§5£ BHS 5
3{{F
IT ASCII
;1 MAK
NOT ALRER g }

,,PUT THIS cnnnn TER IN THE OUTPUT eur ER

: JUST INCREMENTING
TABLE INDEX
: ;CHECK THE
ns DIGIT
T
.,co 90

;

,,GET s LSD

::GO CHANGE TO ASCII

CZREEBO RKB11 DSKLS CTRL PRT?
CZREEB.P11
02-DEC-77 10:2

piie 032818

105726

7414
7415
7418

0S01
1
1260

506

741

7ale

7
7421

7422

7454

7426
7427
7428
7429
7430
7431
743
7433
7434
7435
7436

7438

180063

116663

8s:
177777

0355

035554

035556
035
0355

035572
035574
035576
035600

=20

40l
01666
2616

035562
000D02

10:43

I11

PRAGE 138

CONVERT BINARY TO DECIMAL AND TYPE ROUTINE

TSTB
BPL
MOVB
CLRB
MOV
MOV
MOV
MOV
MOV

177776

030230 §i‘°"'°a

7439
7440
7441
7442
7443
7444
7445
7446

TYPE
MOV

000004

3420

MOV
RTI
10000.
1000.
100.

$DTBL:

goi7ed

000194
000012
0004

(SP)+
B
-1(SP),-2(R3)
(R3)
(SP)+,RS
(SP)+.R3
(SP;+.R2
(SP)+.R1
(SP)+ RO

$DBLK
2(SP),4(SP)
(SP)+, (SP)

; ;MAS THE LSD THE FIRST NON-ZERO?
i
F_NO
;;YES--SET_THE SIGN FOR TYPING
1iSET THE TERMINATOR
; s POP grncx INTO RS
i
TACK INTO R3
1 iPOP grncx INTO R2

i
TACK INTO Rl
: ;POP STACK_INTO R

i
TYPE
: JADJUST THE STACK

: ;RETURN TO USER

10.

4
.BLKW
TTY INPUT ROUTINE

SDBLK:
.SBTTL

31 2322232 2222222222222 2222222222222 222222222222 2222 ts sl sdd
.ENABL
LSB

TKCN#' .WORD

0000OC
000000
000000
000001

632602

; ;NUMBER_POINTER
OF ITEMS IN QUEUE
; s INPUT
; ; OUTPUT POINTER

;3 TTY KEYBORRD QUEUE

TKQEND=

EVEN

; #TK_INITIALIZE ROUTINE

:%THIS ROUTINE WILL INITIALIZE THE TTY KEYBOARD INPUT QUEUE
'¥SETUP THE INTERRUPT VECTOR AND TURN ON THE KEYBOARD INTERRUPT

: %CALL :

7448 035602 00SQ37 03SS72
7449
=]

ta
¥

035606

012737

035600

035574

7452
7453
7454
7455
7456
7457
7458
74E9
7460
7461
7462
7463

035630
035636
035e42

012737
005777
012777
000207

0002
143304
000100

000062

7465
7466

035656
035662

7464

02-DEC-77

035650

143274

JSR
RETURN

§TKINT: : CLR
MOV

MOV
MOV
MOV
TST

MOV
RTS

PC, STKINT

STKCNT

i CLEAR

COUNT OF ITEMS IN QUEUE
$TKQIN,SYKQOUT ::QUEUE INTO THE INPUT & OUTPUT PGINTERS.
#STKSRY aorxvsc ;JINITIALIZE THE KEYBOARD VECTOR
;:"BR" LEVEL Y4
8200, 9stKVEC+2
JSTKB
: ;CLEAR DONE FLAG

#100, 9STKS
PC

:IENABLE TTY KEYBOARD INTERRUPT
:RETURN TO CALLER

#STKQSRT, STKQIN ; ;MOVE THE STARTING ADDRESS OF THE

; #TK SERVICE ROUTINE

*%THIS ROUTINE WILL SERVICE THE TTY KEYBOARD INTERRUPT
m

READING THE CHARACTER FROM THE INPUT BUFFER AND PUTTING

UE
:%IF THE CHARACTER IS

%UPON RETURN EXIT IS
035652

117746

042716
021627

143270

177600
(000003

$§TKSRV: MOVB
BIC
CMP

ONTROL-CTM

:
O

741

MACY1l 30(1046)

($C) STKINT IS CALLED AND

MADE TO THE "CONTROL-C* RESTART ADDRESS (CTRHLT)

a$TKB, -(SP)
#1C177, (5P)
(SP), #3

; ;PICKUP THE CHARACTER
:'STRIP THE JUNK
1115 IT A CONTROL C?

SEQ 0138

CZREEBO RKB11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21
7467
74

0356?8
036
74

747é §§;¥
7470

747

;:;5

035722

;37

0357

001007
604401
737
7

1627

Py @EniE golg

7483

77:85

30
7491

7433

7494
7495
7496
7497
7498
7499

§§§§

035

1627

%29

001140

3%:

318:

109;

036012
036014
036026
32

036060
036066

32%:

035572
000140

1627
0S
§§1527

000175

2719

000040

4s§:

177530

37
e7

035574

012737
000002

035600

035601

035574

81, STKCNT
3%

;3 IS THE QUEUE FULL?
BRANCH IF NO
; s

TST

tspr+

: ;CONTROL C RESTART

::1IS IT A CONTROL G
;1 1S SOFT-SWR SELECTED?
::GO0 TO SWR CHANGE
3

$BELL

PIRING THE TTY BELL

BR
CMP
BNE

1
(5P), %23
328

; sEXIT
::1S IT A _CONTROL-S?
; ;BRANCH IF NO

TST

(SP)+

JSTKS

: :CLEAN CHARACTER OFF OF STACK
;;oxgneLz TTY KEYBOARD INTERRUPTS
: ;CLEAN CHAR OFF STACK

15TB
BPL
MOVB

ISTKS
318
3$TKB, - (SP)

:iWAIT FOR A CHAR
iil
UNTIL ITS THERE
ACTER
;;GE TH§ 9

ENE

318

,,ggnucu é‘

RTI

$$C177, (SP)
(SP)+, k21

#100, 3$TKS

INC
CMP
BLT
CMP
BGT
BIC

STKCNT
(SP), %140
4g
(SP), 8175
4§
#40, (SP)

INC
CMP
BNE
MOV
RTI

grxox
TKQIN, ¥STKQEND
5
#STKQSRT, STKQIN

MOVB

(SP}+,@STKQIN

'¥ROUTINE
IS ENTERED
:

7515 032108 105;;7 143040

7516

036104

7518

03blle

75el
752e

CMP
BNE

: ¥SOF TWARE SWITCH nscxsrsn c

036106

03bl1e6
03blee

100121

117746

143034

021627
001300

000007

042716

177600

001140

(tC)

: 'BRANCH_IF NO

CTRHLT

7-BIT ASCII
i ;MAKE IT
;:IS IT A CONTROL-Q?
¥
; ;

;Nnet
RETURN

FROM THE T

TTY KEYBOARD INTERRUPTS

: :COUNT THIS CHARACTER
R CASE
IS IT
:'BRANCH IF YES
;IS IT A ?PECIRL CHAR?
; ;BRANCH I
S
R CA
$IMAKE IT

;;AND PUT

IT IN QUEUE

;;upoars THE POINTER
END?
; ;GO OFF THE
: ;BRANCH_IF NO
;;EE§£T THE POINTER
URN
¥
MMM R

o o 336363636 26 36 36 36 36 36 36 36 36 36 36 36 36 96 36 36 36 36 36 3606 3636 36 36 36 36 0

7508

7519
7520

5%:

; ;BRANCH IF NO

::TYPE A CONTROL-C

(SP), #7
23
#SWREG, SWR

MOV

143132

$CNTLC

SEQ 0139

CMP
BNE
CMP

JMP

BIC
CMP

ebe

PAGE 139

::INIT THE KEYBOARD
:'CLEAN UP STACK

CLR

143166

J11

AC,STKINT
<§P)+

TYPE

000023

7509
7510
7511
7S1e

7517

2s:

10:43

JSR
157

BEQ

1240

85
3
035574
;goq 036056 001003
750

035572

105722 143160

750S
7509

18:

000007

013779 000100

INPUT ROUTINE

;;g 6&271? 000021
177600

036009

02-DEC-77

TYPE

034556

001500

TTY

036766
035602

7ize G384 gzzrar o000l
o5 By e
7480

MACY1l 30(1046)

HANDLER,

R RN NNHHEXXERRRREERERER

AND WILL

: ¥SERVICE THE TEST FOR _CHANGE IN agrrunne
ITCH REGISTER TRAP
: %C %CALL WHEN OPERATING IN TTY INTE UPT MODE.

§CKSWR: CMP

#SWREG, SWR

:;1S THE SOFT-SWR SELECTED

?NE
STB
BPL

15%
93TKS
158

;;%XIT IF NOT
;IS A CHAR WAITING?
;1 IF NOT, EXIT

BIC
CMP

#1C17?7,(SP)
(SP), #7

iiMAKE IT 7-BIT ASCII
:3IS IT A CONTROL-G?

MOVB

BNE

d$TKB,-(SP)

;; YES

i IF NE;tTPUT IT IN THE TTY QUEUE

CZRGEBO RKEB11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

MACYIl 30(1ous) oe-osc-77
Y INPUT ROUTINE

7523

;ggg

36146

112737

000001

7534
75

036154
36160

104401
604401

037000
37005

0361

109402

164

7540
036206

7544

036226

7525

036236

001135

142736

78:

117746

142732

104401

036766

123727

001135

000001

000100

142670

;ggg
14 042716 177600
20 021627 000003
7547
754
332524
001015

75
7583

036232

062706

036244

ooxog;
0127

000006

7564

036254

000137

034556

755
75
7559

036264
(0362

021627
001005
6guunx

000025

7555
75

7560

;ggé
7563

7564

03627

036300

2706

000737
021627

7565
754
.
7568
9

036304
ggggog
12
036314
036

001022
’f573§
0014
016677
0357

7575

0363

1003

7571 0O
757

7574

575

7576
7577
7578

342

0363

036356
036362

036364

1044 ;

65372

000015

108:

000004

001135 000001

737

035050

021627

142616

1245

000100

021627
002420

93:

208:

012777

gggoo;

8%:

000060
000067

142574

118:

148:

158:
168:

ggu
.hx
(SP;+
PC,
STKINT
astks

i3
xnc IN AUTO-MODE?
"ELEnéourn - F STACK
? ?L ?ngfir QUEUE
,,gé§a?L§ TY KE
INTERRUPTS

scNTLc
SWR

: ;ECHO THE CONTROL-G (1G)
DiTY
cunneurogoursnrs

#1,SINTAG

suasc -(5P)

ERRUPT

:)
:SAVE

INDICATOR

SWREG

YPE--OCTRL ASCII(ALL DIGITS)

-(SP)

:PTHE NEW SWR

::IF NOT TRY ARGAIN

1STB

J$TKS

MOVB

BIC
CMP
BNE

JSTKB

CMPB

SINTARG, 81

: 'REENABLE

JIMP

CTRHLT

,,CONTROL-C REST

(SP), %25
108
SCNTLU

;1S IT A CONTROL-U?
: 'BRANCH IF NOT
' IYES RECHO CONTROL-U (tU)

198

:iLET’S TRY IT AGAIN

BPL

ADD

000006

880005

CLR

TYPE

036773

000002

MOVB

MOV
TYPOC

105777

100375

ggga
TST
JSR
CLR

TYPE
$GTSWR: TYPE

013796 000176

oggows

;g:

7550

SEQ 0140

,':883%?%
THRaP CaLL RS
A RESULT
GF A
: %CONTROL-GRBE”23.%‘?&%5#‘5
ING YPED ?
A "°‘"’x§e"°"a§cxsr“
TCHnecxsrsh
BEING
SELECTED.

752 oas{gg 653727 001134 000001 68:
75aa 0351
7253
832132
75?
035602
7531 835142
77 142776

7541

PRAGE 140

, R Y1212 221221222222222222222222222:32:122222222222222T2222222TTTTTTT 23

725

75
7537

10:43

K1l

BNE
MOV

CMP
BNE
TYPE

ADD

CMP

: :CHAR THERE?

ofc17? P)
(SP).sa
3%
$CNTLC

6, SP

83
#100, ISTKS

k6, SP

(SP), %15

BNE
TST
BEQ
MOV
ADD

168
4(SP)
118
2(5P), aSWR
og s

BNE

15§

TYPE

CMPB

ERL

txnnc sl

MOV

#100, 3STKS

JSR

PC,STYPEC

CMP

(SP), 867

RTI

CMP
BLT

(SP), #60
18%

:PICK UP CHAR

1iMAKE IT 7-BIT ASCII
;1S IT A_CONTROL-C?
:,aaaucu 19 NOT
! ’

:3YES,

ECHO CONTROL-C (1C)

; JCLEAN UP ;Tncx

_TTY KEYBOARD INTERRUPTS?

sBRANCH_IF NO
TALLOW TTY xsveonno INTERRUPTS

:: IGNORE

PREVIOUS INPUT

::1S IT A <CR>?

,:annflc IF NO
1s IT THE FIRST CHAR?
H:Rnflc
YES
: 1 SAVne
s
.,CLERR UP STACK
iiYES

;ECHO <CR>"AND <LF

E-E

E TTY xao INTERRUPTS?

,.annncn IF NOT

:!RE-ENRBLE TTY KBD INTERRUPTS

: RETURN

i s ECHO cnnn

‘CHAR¢ 07
,.ennncu IF YES
:iCHAR
> 77

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11
7579
7580
7581

042726

R
B

036412

6blb
104401

TTY INPUT ROUTINE

MACY11 30(1046)

02-DEC-77

BGT
BIC

000060

000002

17%:

001244

18%:

177776

;i INO, sux!r ;SESENT

(5P
2(SP)

ROOM FOR NEW ONE.
i3
: KEEP COUNT OF CHAR

(SP)

TYPE

.DSABL

(SP)

ASL

BR
LSB

PAGE 141

; ;
BRANCH IF YES
' :STRIP-OFF ASCII

f}?p’

ASL
INC

L1l

189
#60, (SP)+

ggg

ASL

000002

10:43

$QUES

208

st ltt dd

"53 ruas ;HE FIRST CHAR

HAR OVER TO MAKE

i TYPE 2(CRY<LF>

: 'SIMULATE CONTROL-U

bbb bbb dobdedobadobdedotudofotodatotdofotapodototabotafotatatod
& L0 L

:&THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY
: #CALL:

T
%

RDCHR

RETURN HERE

;;GET A gunnncrsn FROM THE QUEUE
: ;CHARACTER IS ON THE STACK
:;WITH PARITY BIT STRIPPED OFF

NN EWN=-0O
v—u—o—-t—v—-o—-o—o—o—s

’

016666
005066

000004
000004

12746
02

036456

005737

035572

Sgg; 035572

3727
001003

000002

$RDCHR: MOV

18:
000004

035576

035601

Bioas oose0o

035576

2s:

036532
035536

83248

——————

8 BS4Y
6550
036552

§229§§ 036756

036766

MOV

#5648, - (SP)

RTI

000177

ADY FOR A CHARACTER
::PUT NEW PS ON STACK

;;PUT NEW PC ON_

STRCK

::POP NEW PC AND PS

;;WAIT ON A CHARACTER

gga

f;KCNT

DEC
MOVB
INC
CMP
BNE
n ¥

; ; DECREMENT THE COUNTER
§TKCNT
ISTKQOUT,4(SP)
;;GET ?NE CHARACTER
;UPDATE _THE POINTER
;
TKQOU
TKQOUT, #STKQEND ' ; ;DID IT GO OFF OF THE END?
BRANCH ;r NO
; ;
2%
#STKQSRT, STKQOUT ‘h§§ T THE POINTER

RETURN HERE

SRDLIN: MOV

1$:

2%:

cba
MOV

CMP

BLOS

ROCHR
682713

4(5P)
-(SP)

; ;PUSH DOWN THE PC AND

;-lll!lllllilllll!l!lnll!lillilliillllilllill&l!lllllllll{l*il!ii
;figg{f ROUTINE WILL INPUT A STRING FROM THE TTY
;3 INPUT A STRING FROM THE_TTY
RDL IN
1%
‘%

036Se2

4(sP},2(sP)

CLR
CLR

(SP),~-(SP)

MOV

108:

MOVB

CMPB

BNE
TST

R3,-(SP)

-($P)

;;ngggigz 85 FIRST CHARACTER WILL BE ON THE STACK
2T

TOR

WILL BE A BYTE OF ALL 0’S

: s SAVE ng

“8t§““

HE RUBOUT KEY

ADDRESS

#STTYIN,R3

::BR ;r YES
) Engflon; CHARACTER FROM THE TTY

#$TTYINYS.
,R3
(SP)+, (R3)

2177, [R3)

S$
(SP)

;;BUFFER FULL?

:GET

CHARACTER

::1IS IT A RUBOUT

;:BR IF NO
::1IS THIS THE FIRST RUBOUT?

02-DEC-77 10:21

7o Biessd6 19A99%7
Ilersr ooo;;:

8 He
Mely
036576 020327 036756

MACY1l 30(1046)

036754

777

764

764
43
44
7645
49

3%285

xoagg;

111

ooéug?

1127

764
764
7650
76
;:;

4e
4y

04401
16
122713
08-10083
;al,

7655

036656

001011

7654

763

000134

036754
000025
036773

S§:

(R3),9%
ELS
$
(SP)

:ISETUP TO TYPEOUT THE DELETED CHAR.
;160 T
:GO READ
ANOTHER CHAR.
,,RUBOUT KEY SET?

#'\,9%

-1,

BLO

BEQ

TYPE
CLR
CMPB
BNE
E;PE

9%
tsp)
825, (R3)
eg
sc:~m.u

BNE

MOVB

8s:

CMPB
CLRB

TYPE

822, (R3)

"Eksomrkmcngnsgfio -

(T:;:a
BNE

ai'

7671

;g;g

fE I
g
BN
tee
734 011646
835735

000004

312 %

036756

674 §3277"35
:55
7675
888
;5;76 oas;ss ggggw
7279
7679
7680

793

037000
037005

000002

000004
-

9s:
’THEE"

01S

0S1412

oaoo7s

000

0S1127

snsun.

;igé 8 ;gxg 8333:3 %22}‘2 020127 SMNEW:
;.":gg

;ggg

037

3§
$QUES

‘

man

"SBTTL

n: mpur
mmc

,,cochxup ANOTHER CHACTER
T

595 ;nan

“c
K FOR RET URN
: o IF NOT

i
o,
MOV
(SP), -(SP)
MOV

4(sP), 2(SP)

TR e
s AND
Lmhongs,
::no.rusr ms STACK
PUT ADDRESS OF THE

.BYT
.BYT

.gLKa

3Eit:u

R“GS
FOR ASCII CHAR. TO TYPE
::§'3
,,REEEEVE
a avrss FOR TTY INPUT

JASCIZ

«<15>¢<12>/SWR = /

R?‘x'

sSTTYIN,HiSP)
ks

132 88235
000812
gSNTLU' angif
/fu/<i§><15>
005015
000
"ASCIZ /1G/<15>¢12>

masas

1s mmc ER A "tR"?

%3 ), 9%

;1 162581 §§§3§3

e
e
7670

,,cu:m THE RUBOUT KEY
;1S cmmcrsn A CTRL U?
iR IF
Ry
,EEP% omnm. U

3523

7222 §§7é§ %

A BACK SLASH

STTYIN

4s:

ggv

; gn

,,gm cmnncrs

001244

1iBR_IF YES

, SCRLF

BR
TYPE

754

RUBOUT KEY

(R3)

72
74

171;

(SP)

7659
7660

;"""; 8&7&

MOVB
TYPE
8R
TST

036756

000767
6834 1

(it

1:TYPE A BACK SLASH

ELOeey
,,smcx EMPTY? -

1 -wéx 001245
104401

&
.;;,95

SEGQ 0142

BNOM
R3, #STTYIN

7%:

105013

PAGE 142

B
CMP

036754

ES 122713 000022

Hove
?3;2

10:43

036754
036754

Sfim
401
14
7496
0366
005716

02-DEC-77

TTY INPUT ROUTINE

“*f'

FIRST RSCII CHARACTER ON IT

"88NTR8L
.
; ;CONTROL "G"

.RSCIZ / NEW= /

READ AN OCTAL NUMBER FROM THE TTY

7687

, o 6363636 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3636 26 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 36 3 36 K 46 3 3 36 36 36 3 2 % 3 % ¥ % ¥

7690

;#THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL

;ggg

ign‘x‘gcgogrms WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND
TO BINARY

EE———

CZRGEBO RKB11 DSKLS CTRL PRTS

CZRGEB.P11

M1l

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

N1l

MACY11 3gé1046)
02-DEC-77__10:43 _PAGE_143
AD AN OCTAL NUMBER FROM THE TTY
#*0CTAL DIGITS.

SEQ 0143

IF AN ILLEGAL CHARACTER IS READ A "?" WILL BE TYPED

' ¥FOLLOWED BY A CARRIAGE RETURN-LINE FEED

THE COMPLETE NUMBER MUST

;¥THEN BE RETYPED. THE INPUT IS TERMINATED BY TYPING A CARRIAGE RETURN.

; #CALL:

000004

$RDOCT: MOV

MOV
MOV

MOV
MOV
ROLIN
MOV
MOV
CLR
CLR
MOVB
BEQ
CMPB
BGT
CMPB
BLT
ASL
ROL
ASL
ROL
ASL
ROL
BIC

037156

2s:

—
—

000060
000087

177770

000012
037166

ADD
3%:

001244

(RO)+,~(SP)
35
8’0, (SP)
4yg
8’7, (SP)
4%

R
R2
R1
R2
R1
F2

NUMBER
; sREARD AN _OCTAL
; ;LOW ORDER BITS ARE ON TOP OF THE STACK
; sHIGH ORDER BITS ARE IN SHIOCT
; sPROVIDE SPACE FOR THE
; s INPUT NUMBER

:1PUSH RO ON STACK

::PUSH R1 ON STACK
:1PUSH R2 ON STARCK
:iREAD AN ASCIZ LINE
::GET ADDRESS OF 1ST CHARACTER
;;AND SAVE IT
: ;CLEAR DATA WORD

; sPICKUP THIS CHARACTER
;3 1F ZERO GET OUT
; sMAKE SURE THIS CHARACTER
;1S AN OCTAL DIGIT

%2
i

;%8

(SP)4,R1

;;STRIP THE ASCII JUNK
EERDD IN THIS DIGIT

R1,12(SP)

; iSAVE THE RESULT

#4C7, (SP)

R2.§HIOCT

MOV
MOV
RTI
TST
CLRB

(SP)+.R1
(SP)+.RO

(SP)+,R2

(SP)+

(RO)

LWORD

TYPE

$HIOCT:
.SBTTL

(SP)+,R0
RO, 5%
R1
R2

MOV

TYPE

5%:

R1,-(5P)
R2,-(SP)

2%
(SP)+

MOV
4s:

(SP),~(SP)

4(sP},2(SP)
RO, -(5P)

BR
TST
MOV

BEtas

000002

RDOCT

RETURN HEPE

18:

——C
o8o
oot
BSDOFOOOQO
o e T S
A
@NONPLPOOVND
SSrnEne
nn
L0000
88
LONOOCOC'OT
U= NN
ORER
-0 o
(=]
&
§U
8oRS
NI&R8g8i :!-SO
o o ) B-Frao o

G EOFEROF
Ed LE0 Lo

oo
o0 O
o0 £
[= ] £
ow o
[=1=} —

§c

&8 8008

s e Bt s Pt Dt Pt Bt Bt et Pt Pt Bt Pt e =1
e Dt ot e

NNNNNNNNNNNNNNNNNNNNNNNNYNY

e s e Bt Bt

o
RRRRREAEARER 20000tat
000
WONLRWW

N
~N

~
n

NNNNNNNN NN

RARRRRRRAA.
DD
NN ELN—O DD

3
8

$QUES

.WORD
O
SAVE AND RESTORE RO- RS

; ;CLEAN_TERMINATOR FROM STACK

; ;POP STACK INTO R2

;;POP STACK INTD Rl

; ; POP STACK INTO RO
; s RETURN
; sCLEAN PARTIAL FROM STACK
;3SET A TERMINATOR

;3 TYPE UP THRU THE BAD CHAR.
; s TRY AGARIN

i;HIGH ORDER BITS GO HERE

ROUTINES

Y T 1212223222232 2222223222232 22 2323332222222 22222 222222222222ttt i

: kSAVE RO-RS
;:anL-

" SAVREG

;:upon RETURN FROM SSAVREG THE STACK WILL LOOK LIKE:

P XTOP==-(+1B)

CZRBEBO RKB11 DSKLS CTRL PRTS

02-DEC-77 10:21

CZR6EB.P11

;¥ 42--=-(418)
3 ®

; #414---R0O

Er‘
22

mnm

Zz2Zrr

B2RBIREZEE

3‘R’U§X7flx;§ag
zZZZZ
3335 EELRR
000000

BRRRZR ARA

uununununvm

33 %33 gfifi

POWER DOWN AND UP ROUTINE

;;li!llllllllllllll!llllllI!!li!llill’lllllll!l*l!lfili!lllll**!ll

: POMER DOWN ROUTINE
JSWR, SAVSWR

$§PLRDN: MOV

141650

000026

MOV
MOV
HALT

#SPWRUP, PURVEC
#PR7, PWRVEC+2
.=

;SAVE SWITCH REGISTER
;SET UP VECTOR

; HANG UP

;;l!ll*'l.ll!l!*llll!!!l*II*"**!*.**'!"*!!.*!Iii*lili!i*l‘*!lll

7797
77
77

037312
037316

7801
7802

037330
037332

7800

;3 SAVE PS OF CALL
;3SAVE PC OF CALL

(SP)+.RS

(SP)+.RY
(SP)+.R3
(SP)+.R2
(SP)+.R1
(SP)+.R0

STACK
STACK
STACK
STACK
STACK
STACK

ON
ON
ON
ON
ON
ON

;3SAVE PS OF MAIN FLOW
;;SAVE PC OF MAIN FLOW

(SP)+,22(SP)
(SP)+.22(SP)
(SP)+.22(5P)
(SP)+.22(5P)

.SBTTL

7791 037305

44~
A4

;;PUSH RO
; ; PUSH Ré
; ;PUSH R2
; ;PUSH R3
; ;PUSH R4
; ;PUSH RS

§§§§§§§§§§
RFFrFoTe &

037306
037310

P)
) ~(5P)
22(5
P)
. -(5P)
22(5
. -(5P)
22(5P)

7792
7793

RS -(5P)

22lspP),-(sP)

—

037264
03727

037226
037226
7232
72
037
7.
037
037252
37254
7
7260
037262

RO, -(SP)
R1.-(SP)
R2,-(SP)
R3.-(5P)
R4, ~-(5P)

fisr-nhn—hhn-h
85 SRR

776
7764
7765
7766
77?
7768
7769
7770
77?71
7772
7773
7774
77278
77
7777
7778
7779
7780
7781
7782
7783
7784
7785
7786
7787
7788
7789
7790

0000000000

7258

037202
37204
37210
037214
037220
037224

$SAVREG:

———

[m=]

7761

+H-~-RY

; % +8---R3
i #410---R2
i#+12---R1

e Rave
2528
SS;i-m
776

SEQ 0144

; # #4---RS

igcu:cn:cu:cu:cn:

7747
779
774
7750
7751
7752
7753
7754

Ble

10:43 PAGE 144
MACY11l 30(106)
02-DEC-77
SRVE AND RESTORE RO-RS ROUTINES

037406
000144
037406

037324

005337

037410

: POWER UP ROUTI NE
SPWRCT
#100. SPWRCT+2
MOV
sPURCt
18:
INC
18
BNE
SPURCT+2
DEC

$PURUP: CLR

;LOAD WAIT COUNT
;:WAIT FOR TELETYPE

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11
037336
037340

037264

e
§§‘§%

MACY11l 30(1046)
POWER

BNE

oV
¥§gs

000024
000026

037412
1324
141500

000000
042527

141542

ooolee

oa-o:cag7

.SBTTL

cle

PAGE 145

SEG 014S

b
Puhvsc+z ORI
WA P
osrnc
roncs srncx

MOV

*sogasE.'!é.m

.:gg?z

IMP
23352;’

19i:2

SE&%&“&H% GISTER

CK ENABLE

aSLPnbn;GO Back’ REINITIALISE
ro LAST TEST R2 ron '611 BASE
o

; TELETYPE TIME OUT

" JEVEN

TRAP DECODER

$ ::;;l;&:?llIl::::l;;l;t;I::El:lll;lll:gl&l!ll!illlllll!;;:;ll;;ofl
‘

*AND U

*"‘

?TnggnnsvTRBLEFOR

THEsrn&vxncADDRESS

:gs ;0 TEET ROUT§ggTINE. THEN USING THE ADDRESS OBTAINED IT WILL
$TRAP:

0oooo2

MOV

:SAVE RO

agggg

::GET TnnP nooness

ASLv8

(RO),RO
RO
'

TRAP
sxrfgnTrgnByt5N8£

MOV
RTS

037454

RO -(sp)

¥g¥

S$TRPAD(RO)
RO
RO

;1
GO T0 nourxne

:;THIS IS USE TO HANDLE THE “GETPRI” MACRO
000004

037452

000002

n8v

$TRAP2: MOV

.SBTTL

(SP),-(SP)
4(spP},2(sP)

;
THE
PC D
Soun
gu
HE
:,ngvs
:IRESTORE THE PS

TRAP TABLE

:E¢I§HE99#§QSQN §"3ucr
srnnrxnc ADDRESSES OF THE ROUTINES CALLED
:

037454
D.?WSB

7442

ROUTINE

$§TRPAD: .WORD

§TYP
$TYPOC

STRAP2

; s CALL=TYPE
:;CALL=TYPOC

TRAP+1(104401)
anp+a<10~uoe)

TTY TYPEOUT nourxns
TYPE OCTAL NUMBER (WITH LEADING ZEROS)

037466

34636
035144
035120
035160
035346

037470

036160

SGTSWR

;;CALL=GTSWR

TRAP+6(104406)

GET SOFT-SWR SETTING

037472
037474
037476
037500

036070

SCKSWR
SROCHR
SROLIN
$RDOCT

;;CALL=CKSWR
::CALL=RDCHR
::CALL=RDLIN
; ; CALL=RDOCT

TRAP+7(104407)
TRAP+10(104410)
TRAP+11(104411)
TRAP+12(104412)

TEST_FOR_CHANGE IN SOFT-SWR
TTY TYPEIN CHARACTER ROUTINE
TTY TYPEIN STRING ROUTINE
READ AN OCTAL NUMBER FROM TTY

05!7%4

037030

AP+3( 104403)

§TYPOS

;;:CALL=TYP

:;CALL=TYPON
::CALL=TYPDS

np+q(183 gq)
TRAP+S(104405)

TYPON
TYPDS

rvpe OCTAL NUMBER (NO LEADING ZEROS)
PE
TYPE

CTAL NUMBER (RS p;n LAST CALL)
DECIMAL NUMBER (WITH SIGN)

CZRGEBO RKB11 DSKLS CTRL PRTS

CZREEB.P11

02-DEC-77 10:21

7828 37308 B37A2¢
7861

037506

033566

MACY11 30(1046)
02-DEC-77
TRAP TABLE

10:43

Dle

PAGE 146

$SAVREG ; ;CALL=SAVREG

SRESREG ; ;CALL=RESREG

SCOP1S

;;CALL=SCOP1

SEQ J146

TRAP+l 3(1 04413) SAVE RO-RS ROUTINE
TRAP+l 4(1 0 Y 414) RESTORE RO-RS ROUTINE
TRAP+1 s(l 0Y 41S)

INTERNAL LOOP ON ERROR

CZRSEBO RKB11 DSKLS CTRL. PRTS
CZR6EB.P11
02-DEC-77 10:21

MACY1l 30(10‘46)
02-DEC-77
_10:43
DATA TABLE FOR PRINT OUT
.SBTTL

C lsg‘i

01254
1

::2

788S

sS4

;88
789

DATA TABLE FOR PRINT OUT

.WOR

HORS

gTESTN TRAPPC

002244

DTOOOS:

.WORD

STESTN,SERRPC,E.MR1,T.MRI

001116

002246

DTOODG:

.WORD

STESTN,SERRPC,E.MR2,T.MR2

001116

002250

DTOOO7:

.WORD

STESTN,SERRPC,E.MR3,T.MR3

&gééég

oozaug -DTO010: .WORD

STESTN,SERRPC,E.MR1,T.MR1,PR.BIT,M1.BIT,BITCNT

001116

%222

$TESTN,SERRPC,E.CS1,T.CS1,PR.BIT,M1.BIT,BITCNT,T.CS2,T.ER,T.DS

170

002174

%ég

%5?22

DTOO14: .WORD

slfg

%Ssgg

DTO017: .WORD

IT
M2.BIT,BITCNT
$TESTN,SERRPC,E.MR1,T.MR1,P1.BIT,PR.B’T,M1.B

002254

DTOD21: .WORD

STESTN, SERRPC,E.ECPT,T.ECPT,BITCNT

ouaie?.g

DTO026: .WORD

STESTN,SERRPC,T.CS1,T.CS2,T.ER,T.DS,T.WC,T.DCYL,T.DA

DTOD37:

STESTN, SERRPC

002220

001116

002170

wééég
fiéfi

3771

PAGE 147

OTOOO4:

1116

00232

002326

166

DTOO11:

.WORD

STESTN,SERRPC,E.DCYL,T.DCYL,E.DAR,T.DAR

037716

7895

;=q7 0._%'% %ggg ggééég 002252 DTOO43: .WORD
;gg ‘ %}o %f 5§ 00Il16 002234 DTOO4S: .WORD
;gg? §§77% %%s: 001116 002224 DTOO46: .WORD

037744

STESTN, SERRPC,E.ECPS, T.ECPS,BITCNT
STESTN,SERRPC,E.ER,T.ER
$TESTN,SERRPC,E.BR,T.BA

;goog

&0000

%él 63

001116

002222

DTO0B2:

.WORD

$TESTN, SERRPC,E.WC, T.WC

7904

040010

O0i2SY4

001116

001162

DTOOB3:

.WORD

$TESTN, SERRPC, SREGO, SREG3, SREG1 , SREGH, SREG2

7905
7906

377
;77

040016
040024

.WORD

TESTN,SERRPC,E.CS1,T7.CS1,T7.CS2,T.ER,T.DS

7891

I4;éqq

001116

002174

orogg:

Elc

001164 001166 DTOO40: .WORD
%él 3} %g};g DTOO41: .WORD

001170
001166

1164

00117

SREGO, $REG], SREG2
STESTfl SERR#CE.ECPT,T.ECPT,E.ECPS, T.ECPS,BITCNT

SEQ J147

CZRGEBO RKG11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRGEB.P11
;907

.SBTTL

7909!
0%

000001

791
7914
7918
7919

041232

041250
goa

000

7913
791

041314

000
041333

000

o41423
4 000083

—
000
000

7910
;31
1

002
000006

791

7m920
7 :
792%’2

7925
?
?
?
7929
7930
7931
7932
933
7934
7935
79
79
79

C
041232
i
72
000
040072
041250
D40074
002
040076 041314
0100
000
0102 041351
104
002
040106 00000S
o-ouug
000
0112
041232
guu
000
153 041250
1
002

000
000

000

000
000
000
000

000

041314

794

mm%

041367

7943
7944
7945
7946
7947
?
794

g:ox
01
g:gl
1490
142
0144
146

0S
00
mxsaa
041250
041314

7951

040152

041405

g:oxso
0162

000
041232

000

7358
ougie °CMERY
795 830172 ouxs?;

ooo

7942

7950

7952
7983

7954
7955
7956

0401

040150
Q40154
040156
Q40164

7960

Q40174

7962

040200

7961

040176

000

000
000

2
00000S

000

DMOGOR
0,0
DHOOOB
2,0

.BYTE
-WORD

0,0
DHOO4A

.WORD
.BYTE
.WORD
.BYTE
.WORD
'BYTE

DHOOOA
0,0
DAMOOOB
2,0
DAMOO4
0,0
ghooqa
,0
S
0,0
DMODOA
0,0
DAHOOOB
2,0

'%T
.BYTE
.a"vcr':c

- WORD
.BYTE
.WORD
.BYTE
.WORD
.av;s
- WO
.BYTE

ghgoue
g,o
0,0

"WORD

DACOMC

DFO007: .WORD
.BYTE
.WORD
'BYTE
- WORD
.BYTE
.WORD

0,0
DHOODOR
0,0
ghoooa
0
DAHOO4

.BYTE

"WORD
.WORD

0,0

E'O

0,0

DAMOO4D

2,0
S

"WORD

0,0
DAMOODODA

gon)
- WORD

Réeooe
Shom

"WORD

DAO10A

.BYTE

000

.BYTE

000

'BYTE

041563

DHOO4

DAMOO4

.BYTE

DFO010:

SEG 0148

-WORD

000

DFO006:

PAGE 148

2,0
6
0,0

.WORD
.BYTE
.WORD
-BYT

uons

000

o40122
040124

.BYTE
DFO004: .WORD
.BYTE

—

Fle

DATA FORMAT FOR PRINT OUT

DFO00: .WORD

000

7940

MACY1l 30(1046) 02-DEC-77 10:43
DATA FORMAT FOR PRINT OUT

0,0

5.0

CZRGEBO RKG11 DSKLS CTRL PRTS

CZRGEB.P11
7963

7964 g"soeouC
o0

02-DEC-77 10:21
000006

000

796
?
796

oY1
091

?
79

041517

ag 2

041631

;g:%

797

7974
7975
m;;
73
79
79

002

o-u%

003
000005

040236
2

7981

041232
041

041677

gg
7

000

?
]
335
;990’
E
o-u%
7991 8302 - 041773

000
000

7=;g

000

7992
7933
7¢
799

7997
79388
7999

8000

ggsé
8003

8004

040304

1
312

040314

040322

000
042057
007

041232

041250
o4214
042171

003

8008
8009

.
040334
-

041232
000
041250

8013

040346

000003

8015

040352

041250

04035

042245

ggio
emé
8014

424 04233§

0403S0

3019

040354

8018

040380

8017

10:43

.BYTE

0,0

.WORD
.BYTE

DMOiO
0,0

.HORS

DAHOOYE

uong
.BYT
- WORD
.BYTE

000

004
000005
o=u°°°

DFO011: .WORD

000

000
000
000

02-DEC-77

DATA FORMAT FOR PRINT OUT

000

000
041736

7984
7985
;995

MACY1l 30(1046)

- HORD

DHOOO0R
008
2,0
%

Ehgma

.BYTE
DFO014: .WORD
.BYTE
.WORD
.BYTE
.

3,0
5§
0,0
DMOOODA
0,0
DHO00B

BYTE
.WORD

0,0
DMO1YA

BYT

2,0

DHO14

000
000

.BYTE
DFO017: .WORD
'BYTE

000

BYT
- WO

0,0
DHO17A

.WORD
.BYTE

S
0,0

000

.a' v: 12 ghg
. ‘53?2 3“8009
.WORD DAHOOD17

DFO021:

000
000

000

DFO026:

000

"
000

000

002

000

007

000

.BYT

DF0027:

7,0

- WOR
BYT
.WORD

DAOOOA
0,0
DAHOOOB

WO
IBYT
.WORD

8#0021
0
DHO21A

.WOR
BYT

g
0,0

'BYTE

000

4,0
5
O ooon

.BYTE

2,0

3,0

- WO
.BYTE
.WORD

DAHOOOA
0,0
DAMOODOB

.WORD

%5
"BYTE
.BYTE

.WORD

.BYTE

.WORD
.BYTE

§Agoas
,0
0,0

DAHOOOB

2,0

DAMOO26
7,0

Gle

PAGE 149

SEG 0149

000
000

000
0G0
000

}\J

000

e Bt ot

DFOOYS: .

000
000

000

000
041250

O41465
002

00000S

041230
000

000

DFOO46:

.B
.
.B

000

o
0O

DFO0SO:

O
£
-~

o c:%?:

oguoo:

£
D

U
D

kSou

000

(=
O
D

000

£NO

RARR

DFOO43: .

-4

000

oBodos0
n
o

000

(=]
D

000

X=
00
o
(=]
TM

-BYTE

DHO578

=
o
Lty)

. WOR

(=]

iT &

" IBYTE

Ofllgbg

. WORD
.BYTE
:Egzg

DHOOOB

8 do5 oBoBo

g
-BY

042357

2
@
*

-WO%E
. WORD

0&1250

i ol

10:43

DATA FORMAT FOR PRINT OUT

DF0037:

g%e 000883

02-DEC-77

30(1046)

n O000ONWOOODNDO L WOoOOONDO £

MACY11

(==
V]00 £NOD
P
(=] o
(=]
(=
(=]
=]
£
L)
"

CZRGEBO RK611 DSKLS CTRL PRTS
.P11
02-DEC-77 10:21

Hl2
PAGE

1S0

SEQ J1S0

CZRGEBO RKB11 DSKLS CisL PRTS

CZRGEE.P11
02-DEC-77 10:21
8075
0S42 041250
8076
0544
002
000
gn
0S
041314

575

]

8081
8082

833

806S
ggg
gg
8030
8091
ggs

mlom
333

-~
000

Soa

000

000004
Mlogg

gggg
9099
809
ggg
8100
8101
135

0624
06

042520
000
042545
003
000005
000
041232
000
041250
002
041314
000
041465
002
00000S
000
041232
000

8105
exo?
8107

040636
040640
040642

041314
000
041502

104

8108
8109
8110
8111
8112

70
72
749
76
0600
0602

0612
0614
0616

041250

Soa

0644
002
os;s 000005
06
000
0652 041232
040654
000

8113
Quoces 832
8115 040662 042572
8116

8117

8118

04066Y

C40BEE
040670

000

042637
00S

000
000
000
000
000
000
000
000
000
000

000

000
000
000
000

ooo

000
000

MACYLl 30(1046)

02-DEC-77

10:43

DaTA FORMAT FOR PRINT OUT
.WORD
DHOOOB
.BYTE
0
.WORD
DHOO4

'%55
.BYTE

ohoooun
2,0

.BHYU'1'2

2,0

DFO060: .WORD
.BYTE

DFO0B1:

.WORD
.BYTE
.WORD
.BYTE
.WORD
.BYTE
.WORD
BYTE

BYTE

-WORD
.BYTE
.WORD

BYTE
DF0062: .WORD
.BYTE
.WORD
.BYTE
uong

BYT

.WORD
'BYTE
.WORD

.BYTE
DFO063: .WORD
.BYTE
.WORD
'BYTE

4
ghgooa
DAMOGOA
0,0
DAHO&OB
3,0
S
0,0
DHOOOA
0,0
DHOOOB
2,0
DHOOM
0,0
DAMOO4G
g,o
0,0
DMOOOA
0,0
DHO00B

2,0

DHOOM
0,0
DHMOO4H
2,0
S
0,0
DHOOOA
0,0

i B DHOB3A
X

-WORD

.BYTE

0,0

.BYTE

5,0

"WORD

DFOD&3B

I12

PAGE 1Sl

SEQ 0151

&39823moS5E-232wmm
03

MACY1l

%0 (O=]

30 (1046)
02-DEC-77
~ SCII MESSAGES

Wo244'[* 2-** ox-&8 N
IWx ~ Ngv

Sm%o1TWSLour1EvmL1_mE"LOm1EWw—m1oLTEwN1O"L1ETm1L210E%1L1Em11E1m1E11Ew1S1m&

>8-M03)m@]NA)A3I)mD-@N.MIw3.AVa8D2?_A8o]Aa3DA5211oD4Y])8Gv0o0NeG)«]A]G5]G0o]G3)(8D)(D)@i 1] oNNG0]G0oA]DG2O8oG]0](DCSD()[@N—(=DV})DDeG]@=NT0/]GD]G)mG)oT8a(DM)4N(Do()D4oD0o0/oa)D)@oNN e09oGl0eoo--Gl0
—W)[NOwo~U]nVoW[-bA~LTI [41—a=~ (mxSxaw¥='3[]7]+ —&nAo[4do9v~~ NN *3[(&+-v« 11(Q&|4zaQ- ~~NY)Y.o[)]=+ —[£—x-.4N Q["-xx wv>40O2[}+“ (8-7o-O4ow>xxW ~Nw ”V)~[7n+]6wv
||oo4-"2'} (W»-@*}~] Q—- w7 -4g[~X ~.'- et

mNvWw w4n' 9-[+ - bt-~ xX

Wn—Oe0Ao~t—o->-NvyL.51—ba>-o-D=2U5nOT]m—0[U=%N—H&0Un2)Ma1—aoBnW—o]Q(v&aiNamfmmi=--4fyiul—[okavA#u=ts]x5-wO1uxIr9aw.uOIoo7£—mx=~A).~pwnwmm—4-eN4%[%ww=[oa£—o4NNw1]waF\mmmfia(mWa2f—0W-v=]lEs.mn-MH_CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZREEB.P11
10:43

J1l2
PAGE 152

N[ax4~>\+

SEQ 0lSe

=[N wN~

—

W w [=} w (=]b ~ v wn ~ ~ — L7}

CZRBEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11

10:43

Kle

PAGE 153

SEQ@ Q183

.SBTTL

DATA HEADERS

020040

DHOOOA:

.ASCIZ

/TEST

ERROR/

020040
000
880123

DHCOOB:

.ASCIZ

/NUM

PC/

DHOOOC:

.ASCII

/TEST

TRAP/<15><12>

.ASCIZ

/NUM

PC/

DHOOM4:

.ASCIZ

/EXPECT

RCTUAL/

030523
1513

DHOO4A:

.ASCIZ

/RKCS1

RKCS1/

DHOO4B:

.ASCIZ

/RKMR1

RKMR1/

031122

DHOOMC:

.ASCIZ

/RKMR2

RKMR2/

égfg

DHOO4D:

.ASCIZ

/RKMR3

RKMR3/

88%%23

DHOOME:

.RASCIZ

/RKCS2

RKER

020040
105

DHOO4F :

.ASCIZ

/RKER

RKER/

101
113

DHOOM4G:

.ASCIZ

/RKBA

RKBR/

850090

DHOO4H:

.ASCIZ

/RKWC

RKWC/

041505

DHO10:

.ASCIZ

/EXPECT

ACTUAL

PRESENT PREVOUS BIT/

.ASCIZ

/RKMR1

RKMR1

BIT

COUNT~/

RSCIZ

/RKCS1

RKCS1

BIT

COUNT~/

mmwm5amsvTeAT B

.z1SEaL1ELm1E1wLm1mL!E&Lm1ELm1Eom1L!EZl1LzZ.1E81L1L1E1E1zL1EaL1Eb121LD1L211lEL17.lu.1lYL1.7l1‘.El‘al.1l8L.1l3.l13.lo

BDDBSOTRDAIioHGBD1tOBADE

MACY11 30(1046)
02-DEC-77
DATA HEADERS

0475ee

020040
000103
0S2103
0Sesa4

13
0S1040

1527

5522

1527

RKDS/

e—O00MOMMOMMOTBMmOS~0O0RW2300W6M3W8M5WWqWaMo1xm8mmwum0m0?
SsSperAaRogTeASlageCENAGRo8SASR5ES-ARERSEaREARRSARAmoAnEmo~AXAR
w
N
I
4Qx-xS[e+ m—e-=—] [(woxz[N1v)4] ~

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21

xQox> [(|Q4=l7] Q[wW[ —1.)]

SR
RmS—aBZ5—eu—E.gU.NN%a.IOOma1N0e2wRAm2S[8J(QN—Q1x-47=)o7T)w[]?+S!mo-‘R“dwD2n[|(-&4Q—NQo>-mIN+¥=1)7[E]+)5aa2IOme.5z3sw(8—x4QN—wQaxN7qI7)=[s+5dslez-AamT"[Q&—N—WQ>47N7}i}e]EemRaDLTOml-sS.RlwamNRE7)Rm——[U5QN8x( 4xw x=N( 7i4}([hp¢]+L:B RNBEOmIOSO(—~eWa~ox%7F)Ny)IROnlU.2~lOL.7NlTIo2(LwoxQv=VlN(nyN]4o.T:UlaOBlJ.he8IlndnNPlzE.llN(m[Q==8 4QQQ N~ W—b .[xx -- 7¥..)7N[b]lK.lB.mlT.Sl:.
—x(7(V4x4(w3847=_[[[]]]+++ (wvxx9o=bN8P] |w4oo-=~ [o|oQ-—9~0&(4]s¢ [[-—( —=x= —b —— +143]] i[|[Q49w—b No4¥)=l[][7[«+]++ 4>Q44a) ==p[[[4]]e+++ (LQQxQ =-| wowa1 -( Qx |>b x[—( n8t(pd+]ee«[
CZRBEB.P11
MACY1l 30(i046)
02-DEC-77
DATA HEADERS

10:43

Ll2
PAGE 154

SEQ 0154

—

-3

=z T

o
X

CZRGEBO RKB11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21

n
o

10:43

PRGE 311

SEQ 0185

DHO37A:

.ASCIZ

~GOOD

BRD

WORD~/

DHO37B:

.ASCIZ

/WORD

WORD

NUMBER/

DHOO41:

.ASCIZ

~/EXPECT

RACTUAL

EXPECT

ACTUAL

BIT/

DHOY1R:

.ASCIZ

/RKECPT

RKECPT

RKECPS

COUNT~

DHOBOAR:

.ASCIZ

/RKCS2

BUFFER « WORD~/

DHOBOB:

.ASCIZ

WORD

DHOB3A:

.ASCIZ

/RKCS2

BAR17-16 BUFFER

BR17-16 WORD~

BUF WD

WD READ RERD~/

020040
020104
047527

3 A ?9??%3
o

2 222222

042117

READ/

DHOB3B:
L£=0N

e e e

nLwn—-o

[ealealealueloeles]
[NINIATATATA

coases8288 i

—

£ g pos

02-DEC-77
MACY11 30(1046)
DATA HEADERS

040505

.ASCIZ

WORD

CZRGEBO RKG11 DSKLS CTRL PRTS

CZRBEB.P11

02-DEC-77 10:21

MACY1l 30(1046)

ggi

831
831
8320
832
832
:335..

2704
éfi
?
753
7
g4 z;uss

:_aaes

ma%

832

mggg
8

83§m
7

3330
8331
8332
83
3

3014

;

;lgg oM

-:«gg

3039

3341

8345
8346

8347

8349
83

3100
gxos
111

043116
043124

833135

051{22

gao
6511

042520
020131
0S4S24
046102
0S0101

EMOOO:

.ASCIZ

/UNEXPECTED MEMORY PARITY ENABLE TRAP/

osiiég

EMSO04:

.ASCIZ

/ERROR AFTER ATTEMPTING IMPLIED SEEK/

Q46940

042511

1
oYY

1513
116

042440

1116

020061

iég

051105

cmu;
osué
122

042440
042513

1115

020063

o4
831}1;
5

047111
0S1117

122

178

PAGE 156

ERROR MESSAGES

Q45505
030523
051105

600

10:43

.SBTTL

%515
355505
7111
020107

|;|J 3

834
834
8344

4
105

054105
042105
0S1117
3:3?22
16
0Sil24

ounsg

ggx

02-DEC-77

ERROR MESSAGES

Nle

0S1122

ESUOYA: .ASCIZ

/RKCS1 IN ERROR/

ESOO4YB:

/RKMR1

.ASCIZ

IN ERROR/

501D§ 031122 ESOOMC: .ASCIZ /RKMR2 IN ERROR/
ESOO4D: .ASCIZ

/RKMR3 IN ERROR/

0S1122
020122

0S1122

ESOOME: .RSCIZ

/RKER IN ERROR/

83551

Sgomx

ESOO4F:

.ASCIZ

/RKBA IN ERROR/

EMSO11:

.ASCIZ

BERROR ATTEMPTING TO DO HEADER READ/COMPARES

ESO11A:

.ASCIZ

/RKDCYL OR RKDA IN ERROR/

043193 081113
o
mamg
152 053513 020103 ESOO4G: .ASCIZ /RKWC IN ERROR/
ggsx
maisa
82{{‘%
0492440
0S1122
1 %iafl %&é&é EMS010: .ASCIZ ~/ERROR ATTEMPTING TO READ HEADER SYNC (PREAMBLE)/
E§§§ figi%
8355 33 176 gs'gzgfi
111 020107
i356

Ou3oeh OBli08 081340

OuFial

359
}BE?

3226 oaog
"33333 046

gaasaa
24505

33324

153

0S1117

103

8365 ouaa;u ou§

fie&o 020117
2101
040505
050115

051105
027504
0S1101

8370

041504

046131

8366
8367
8368
8369

043272
043300
043306
043314

042510
O0SIO40
047503
000105

8371

043324

047940

043316

045522

020122

045522

SEQ 0156

RK
CTRL PRTS
CZRSEBOISNDSKS

10:43

e
e

s P

e
e

PAGE 157

EMS0O1S:

.ASCIZ

/ERROR PTTEMPTING TO RERD GAP/

EMS020:

.ASCIZ

/ERROR ATTEMPTING TO WRITE DATA SYNC (PREAMBLE)~/

EMS021:

.ASCIZ

/ERROR ATTEMPTING TO WRITE DATA OR ECC/

ESO21A:

.ASCIZ

/ERROR IN ECC CENERATION/

SEQ 0157

n
LY

—

[

[+4]01]
W

MACY11l 30(1046)
ORAOR HES 02-DEC-77
€

eik
o
&R Qm
i
e g-o (=]S

02-DEC-77 10:21

2‘3

CZR6EB.P11

3397
gE“
ggg g

g%fi

B0 b1

33:125
o
gxsos
1127
3:'&&6% EMWl:

8400

i?g22 EMS023: .ASCIZ /ERROR BETWEEN SECTORS ATTEMPTING MULTI-SECTOR WRITE/

103

g:am& 3
g4 7 fig-«

1
11
440
8410 S}
153
40
520
Buls 04303 097105 O94E33 Daassy
8413 333795 2137 g:?’-fla
106
el
T
g:i; 83 ;% fi
§§§?§é
7ALl Ema2:

3
.ASCIZ /MR1 INCORRECT ON 1ST UPWARD TRANSITION OF MAINT CLOCK/

'
_ASCIZ /MR1 INCORRECT ON 1ST DOWNWARD TRANSITION OF MAINT CLOCK~

£18
e Golct gl i
84
7
4 gwx 020104
8421 53795 guéu
3101 099523
043776
044004
mzoxa

ussz
1
fig

8.‘33%‘7
15
046103

047940
047111
041517

8427

044030

047503

0S1122

041505

8426 044022 oswluus 020061 047111 EMW3:

.ASCIZ ~/MR1 INCORRECT ON 2ND UPWARD TRANSITION OF MAINT CLOCK/

gY22
8423
gzg

10:43

Cl3

PAGE 158

SEQ 0158

.ASCIZ

/MR1

EMS026:

.ASCIZ

/EXPECTED CYLINDER OVERFLOW ERR DID NOT SET/

ESO26A:

.ASCIZ

/WRITE TO CYL 632,

EMS027:

.ASCIZ

/UNEXPECTED ERROR WHILE TRYING TO FORCE CYL OVERFLOW/

ES0268:

.ASCIZ

/WRITE TO CYL 1456,

EMS030:

.ASCIZ

/UNEXPECTED CYLINDER OVERFLOW WRITING LAST PHYSICAL RADDRESS~

EMW4:

4 RoRFR-D Sm
==

on—-00
~—

i
753
Ll
]

[y
N

ORROR MESSAGES.

REZZR

7117

RZZRTZZ

1
1
1
1

222
Z
=
i
28

99992 |Ppoeoon
53 Si

PRPRRR22T
SEBYRRZCREBS

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZR6EB.P11

MACY11l 30(1046)

INCORRECT ON 2ND DOWNWARD TRANSITION OF MAINT CLOCK/

TRACK 2,

SECTOR 25,

WORD COUNT 401/

WORD COUNT 401~

02-DEC-77
MACY11l 30(1046)
ERROR MESSAGES

CZREEBO RKb11 DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21

EMS032:

.ASCIZ

/ERROR ATTEMPTING TO READ DATA SYNC

oL n
=-=0ouin

WO
AR ES 2=

/UNEXPECTED ERROR WHILE WRITING LAST PHYSICAL ADDRESS/

EMSO34:

.RSCIZ

/ERROR ATTEMPTING TO REARD DATA OR ECC/

EMS03S:

.ASCIZ

/ECC ERROR IN READ DATA OPERATION/

EMS037:

.ASCIZ

/DATA COMPARE ERROR AFTER INPUT NPR TRANSFER/

EMSOM41:

.ASCIZ

/ECC REGISTER NCT CORRECT AFTER ECC READ IN READ DATA/

EMS042:

.ASCIZ

/ERROR IN ECC PATTERN CALCULATION AFTER ECC ERROR/

@ Lt

0oL O
n Or DU

gm%g

-0

SEQ 0189

(PREAMBLE)~/

000
b

hgg

—

3 252 §"‘
£
2o

PAGE 159

.ASCIZ

nNE
8‘—
NVO
n
oun

[ LA Lt = T 2
no-0
LU0NN0
-0

3’— Ty
2
ROSAN

Rk M i

ZAE 20
@

N8 eoo

SrRERE
ae:ag,

RRRE2

g.e
P Pt
Pt ) e
b

FRAL2

22 28]

323832
38
8Z382fes228

——

SR2RRR RA
UV o b b

§SIRIFERENER
—

w
n

PPEEE
FAIIIIIR
ORI

D13

EMS031:

e [y

v =T

St
e
s B
e b

PSR

Pt s ot e s
Bt P
e e B

BERE

0S3S17

L0 Lrr-

046106

—

OY4sSH2

DODNCNEWN—-O

eifiggfl
RZoR-088IRRESV2E
32222?22222%?2??
BBIRR

8484

10:43

CTRL PRTS

wc-fl 10:21

8540

0201%2

Y
Y
H4

0201
D2C
0S11

854
"g

151

8551

111

047503

g:’Sls
1105

042440

Eiig

EMSO44:

.ASCIZ

/ERROR AFTER PROCESSING DATA CHECK ERROR/

EMSO46:

.ASCIZ

/TRANSFER LENGTH ERROR ATTEMPTING PARTIAL SECTOR OPERATION~

gélwg

EMSO47:

.ASCIZ

~/BAD SECTOR ERROR DID NOT PREVENT DESIRED ADDRESS INCREMENT~/

2503
107

995
2

1440

1520

ESS?.
;1

8581
asn;s
851

020122
EMSO43: .ASCIZ /ERROR IN ECC POSITION COUNTING AFTER ECC ERROR~/
1503

827
8e7e
=7
85

{55
Qe3i0e
gl
104
1505

Al SRAIC
104 0492523
1117
835“0

045636

042111

04566

042101

O0OS1440

0457

020124

044127

047105

BE
325

Ten oug

117

045732

042440

EMSOS0: .ASCIZ

~/BAD SECTOR ERROR DID NOT CAUSE CERR TO SET~/

EMSOS1: .ASCIZ

~BAD SECTOR ERROR FAILED TO SET WHEN EXPECTED~/

o40

052117

ERMl
S
8214%
103

B
D
pis g ol
8235
D4B718 OR0L0B OMGIII Daside
8593
045716
2040
020117. 042523
8595

PAGE 160

101
150S
7522

esgé

10:43

040S03

S£

e
8

02-DEC-77

ERROR MESSAGES

% =i

SOR-2Re

-.-Dl

MACY1l 30(1046)

NE£OOOO £

CZREEBO _RKB11

CZR6EB.P11

ELl3

0S0130

041505

SEG 01860

1516
1
1

501

Q46352

0511

B64S
8646
8647
8648
8649
8650

046366
5374
Q46402
046410
O4EM1E
046424

051105
0503

020124
020070
047515

75¢ee
0“511;
02011
047111
044502
042504

/ERROR ATTEMPTING WRITE CHECK OR ECC READ AFTER WRT CHK/

EMS0SY:

.ASCIZ

/ECC ERROR IN WRITE CHECK OPERATION/

EMS060:

.RSCIZ

/WRITE CHECK ERROR FRILED TO SET

EMSO61:

.RSCIZ

/TRANSFER LENGTH ERROR WITH WRITE CHECK ERROR/

EMS063:

.RSCIZ

/WRITE CHECK ERROR FAILED TO SET

Roa

—

IN 16 BIT MODE/

NWwNoo
£
wonw

8643

046360

.ASCIZ

04751

8636
g
155
BE38
Osiiss 0s1117
S RlOuesle ED
BAG
BEdl O4EIUG ORIS05
020113
8644

EMS0S3:

ié’fifi&%fi?fi
—i% s
Bifoiicy

1
1

8633

86
86
gg 1

8634

4103

NQNi—a QDN-&J:o-O—g

e gu

N
VIN]

862

0914

on
oL

1
éax11§§

8624
86

'i 3
1%
1

S
862
lee
gitsis

¢15><12> /WHEN BAD SECTOR ERROR OCCURRED/

861

gg{s
esx?
asxg

.ASCIZ

.
5108

861
8614

506

50E

SEQ Jl&!l

993

B10

—

861

[ty

3¢

PAGE 161

/DATA TRANSFER DID NOT CONTINUE TG END OF SECTOR~/

% .{
50

;§17

F13

.ASCII

EMSO0S2:

0
2506
104

—

8603

124
1y

10:43

&L £
(=

000104

—

042524

O0O4S740
7494

o28 BRgeS 522

859
8597
gg

02-DEC-77
ERROR MESSAGES

MACY1l 30(1046)

CZRG6EBO RKB11 DSKLS CTRL PRTS
c ZRBEB.P11
02-DEC-77 10:21

18 BIT MODE~

CZRBEBO RKE&11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21
o4e432

MACY1l

02-DEC-77
ERROR MESSAGES

30(1046)

10:43

Gl3

PAGE l&2

EVEN

.SBTTL DSTR PATTERNS AND BUFFERS
; ®
SQHNIF‘NSS
nNL—-nNLEO-n

nNLe

LO=~=NNE~-N LD
=W

PAT2:

o—ooanou-uRIS
£ e

1 - ALL ZEROS
PATTERN 2 - ROTATING CELL PULSE PRECOMP

2oR=RRLC R
RESNERLRARTANLS
UU‘M&’):SFNSMN&OnNU‘

PATTE RN

)

133333

W
w
[N
W
W

—| el el el el elaleden

PAT3:

PATTERN 4 - HI-LO FREQ.

177777
177777

PRTY:

177777

6;5?7?
S2s

8707

046554

0S2s2s
0Seses
177777
177777
0S2ses
0S2ses

0s2ses

MIX

SEQ Q0le2

gipeey
66
046570

MACY11 30(1046)
02-DEC-77
10:43
DATA PATTERNS AND BUFFERS

1863

172765

PATTERN S - ALTERNATING 1°S AND Q'S
PATTERN 6 - COMPOSIT ROTATING

PAGE

BEEESE

177
177
172765
172765

e P

Pt Pt Pt Pt Pt Pt

S NNNNNNNNNNNNNN
wn ~Oo Q\IC‘U\‘U'\»—O%

GDCDCD €D GO D G0 D G0 0D €D €O COrD

CZREEBO RKB11l DSKLS CTRL PRTS
CZReEB.P11
02-DEC-77 10:21

072307

135143

PATH:

156461
167230
7

072307
135143

164616

ooo4o2
000402
000001

¢ B

PATTERN 7 - ALL ONES

IBUFF:
OBUFF:
.END

.BLKW
.BLKW

%02
402

SEQ 0183

CZRBEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

aagz;

7440
112

ADDW

=
AD
=
ADDWY =
ADDWS =

Aoou ==

ADDWB =
RADDWY_=
%VCTS
VM =

RENV
=
RAENVN =
AFATAL=

0S3s
180

1306
1306
1148%
1306
1306
1306
1306
1306
1306
1306
1306
1306
1306
1306
1306
1306

MACY1l 30(1046)
02-DEC-77 10:43 PAGE 165
CROSS REFERENCE TABLE -- USER SYMBOLS

1306

8148s

1321

1306
1306
1306

1312

1306
1306
1306

1317
1318
1309

1306

e
1306

1348

13%
1341

AMADRY=

1306
1306
1306

1344
1328
1336

AMSGRD

1306
1306
1306
1306
1306
1306
1306
1306
10528

1314
1315
1308
1329
1337
1340
1343
1311
1306

1308

34
= 000020

70558
7011

7236
7053

7013
1306

70548
1319

1805

BAI

1347

1308
1306

AADRS=

AMADR!

I13

1306
1306
1306
10S1s
1306
17398
1111s

7052

1310
1313
1320
1306
1346
6782%

7087
7231

1345

7ee9

SEQ Ole4

CZREEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.PI11
anx;
= 000400
BA17
= 001000
BITCNT
002326

BITO

J13

10:43
PAGE 166
02-DEC-77
CROSS REFERENCE TABLE -- USER SYMBOLS

MACY1l 30(1046)

3060%*
4058*
S746%

3077%

SEQ J1&S

3210%

= 000001

34S5*
S483*
SB73%
gEEOl

3586#
SS11%
S942%
6265

3603%
S5S4+#
6017%
B272%

S006

§590

S8sS

' BITOO = 000001

BITOl = 000002

' B TDS = 000004

iaxrq

= 001000

= 000400

IBLDDRT 032014
BPTVEC= 000014
BSE
= 000200
BSEDES
002352
CCLR

CDT
CERR

= 002000
= 100000

| CFMT

= 010000

CKSWR =

100000

104407

o000

e
e ]
et s et e e ()
NN
o

—

P
b

n O\DQVU‘%O

£
o
WWwWwWwwo

2278
3798

5978
3903

= 000200

' BIT8

=
L0
0 — L0~
OLWNWNO LNNOD

' BIT?

= 000010

e e 1) e b b

=
00
= 000040
= 000100

BIT3

3544

4130

6940

4131

SSe4

S84

Se34

6762

3131

WO U1

BITY
BITS
BITe

O ngmr-v-mom
whnNLE- LW

POUTUT=
b be V() 0= bt e
[PVIV I L
o 1 Y«
T

= 000004

0 OWWW—DWUN
£ £
OONLEWOLENOVD

' BIT2

| BITIS = 100000

[

BIT14 = 040000

muw»m—m
D £ bt
FURY

—-L£N

'94715 = 004000

|
BITl2
= 010000
' BIT13 = 020000

ot ot Pt Bt ot e

| BIT1
= 000002
BITIO = 002000

s ot Pt Bt s

| BITO9 = 001000

gmmmo—o—r—;uu—o—r—o—.——= 0D G 0= e bt () 0t Dt Pt Pt Pt ot P T
e
ps s p—a v
OO0
= D0 b= = O U= WWN
L
UMY 0= b e s () 0
N
L B U‘-B-EJ:UD—D\D\Ig
= OWwNNNwWN

000020
000040
000100
00020C
000400

(1) 0

=
=
=
=
=

TUUN 50 bt b

|
,
|
'

BITON
BITOS
aflro?
BITO?
BITO8

& O N OO U= 0 b e s s s ot ot s OO0
WD UTD
0= s pe
O0LEN
hESRR
nNEN~-0O go
000WL
£
W0~
&%

| BITO3

S660

6230

3017

4000

24s
556

3009

4576

2503*
3976%
5185#%
2504
3977

4108*

2B6S*

4395%

2866

3128%

H469*

3129

4493

4722

3361

4078

4439

2451
5890

4118

S093

;
|

CZREEBO RKB11 DSKLS CTRL PRTS
CZR6EB.P11
02-DEC-77 10:21
CLEAR = 00000S

CLRIBF
o

031770

Cge
= %&Jlg
E%F = 000200

1078.

2
1
.

K13

MACY1l 30(1046)
02-DEC-77 10:43 PAGE 167
CROSS REFERENCE TABLE -- USER SYMBOLS

2790
'4326

CTRHLT
8:556
BSK
= 19%%

612.
3‘lig :

;275
1830

11418

2975

1153

%SP = 1

= %J‘OOO

1928

919s

7471

1264

DF % 8:@62

1391

79238

goow O‘OOiSB

i:gg

i:gi

DF %

ggl%

DFOO11

202

DF%HI
DF0017

DF0021
B; ooag

32
0256

1397
1415

1433
1451

0302
0326

1463
ég?g.

BF%:O

040402

1 Sgg

g%:g

0446
66

DFGJS? gfl%&

1
DFOO42

| DFOO46

DFO0SO

040406
040426

DFO060
DFO061

0O40SS6
040576

DHDCMP

024276

DHOO4G
DHOOMH
DHOO41

3534
6608

366S

379

3901

3238

3369

3500

3631

3763

4086

4217

4679

1517

1529

1619

7953%
1541

1631

79638

799S#
1511

800S#s

2531
4018
S549s
7935
8163
8C1s

1457

1469

1523

80*0;.
160
1613

80718

041263

791S
8039
1368

D41314
041333

7917
7919

7929
8079

7939
8176%

7949

8059

8067

8077

809S

810S

8173s

041367

7941

041423
041450

7921
8061

041405

041465
041502
042406

7945

7958

8021

8031

8081
8089

2482
3920
S23l
792S
8111
8009
8166%

7931

2702
4271

8063%

2416
3815
5118
7913
8101
7999
8113

041351

ebl4
4149

8053#

2361
369
S0
1647
8091
7989
8103

7991

4120

80274

2295
3563
4928
1611
8073
7979
8093

4366
1497
7965

3988

7285

ea4y
3432
48e7
1587
80SS
7967
8083

041773

1943
2809

3403
S194

2178
3301
4736
1569
8007
7957
807S

041250

DHOO4D

1649
1655

1625
1508

3273
4801

elez
3170
4611
1563
7997
7947
8065

DHOOOB

DHOO48

1535
1499

7975

3140
4710

2061
3037
4507
1557
7987
7937
57

041232

DHOOY

159S
7985

Tagg.

3007
4574

2009
907
4403
154S
7977
792
8047
81688

DHOOOA

DHOO17

1445

8029
8037%

1601

1793

1427

15
156S

0532

7554
3105

7933

8019

1589

7285
7246

1475

1547
1571
1583

2877
g:g 6

SEQ J1e6

8233

8179%

8182

7951

8185

8069
8107
8033

8097
8198%
B2B1#

7973
8192#

8188%
8195#

CZREEBO RK611
CZR6EB.PI11
DHO10

DHO10AR
DHO108
DHO1Y
DHO14A

DHO17AR

8:1517

1563

1631
1677
1 39

205

8:821R
lg

Sé?;

78
DHOY1A
DHOB0A

235
2452
eSe0

8“83?

DHO608B

2545

DHOB3R
2572
DHOB3B
042637
DI
=
040000

DISEEK

023334

DISPLA

001142

DIS
' DLT

' DMD

'DRA

- DRDY

DREARD

000174
= 100000

= 000040

= 000006

= 00020

DSKLS CTRL PRTS
-DEC-77 10:21
7959

7961

7971
7981
7983

7993

L13

MACY1l 30(1046)
02-DEC-77
10:43 PAGE 168
CROSS REFERENCE TABLE -- USER SYMBOLS
7969

82088

824es

8043
82608

8025
8035
BOB;

82778
8287%
8294s

808

8115
8117
1103

82018

82158
8222
82288

8003
8051

8023

8256#

82738

8298#

8302#
8309s

1931
3422

2049
2555

2166
3683

3803

2404
308

12648

1793%

1801%

B955%

7074%

11648
293#
4762
S371
Ezgg

962

2080

4858
5372
6525

1
2834
4859
5393
6537

491

11938
11228

SEQ 0187

1801

5106

52l

283S
4951
S463
6549

S357#

2081

2519
4006

2602
4137

2690
4259

2797
4354

2895
4495

3025
4

3158
4724

3289
4815

2197

2198

2314

2315

2435

2436

394
435
S488
6577

394
S04
5583
6580

430
S04
S750
6581

4303
S141
788
6582

4390
S142
6028
6583

2551

533
8335
470
6588

2552

6062
6586

4
5256
6440
6587

uaeé

4761
8336
6484
6589

114S#

11528

027176

sgéa

3%;

E?Eg.

3050

3183

3314

3445

3576

3708

3828

3933

4031

4162

026500
, DRGPSN
0T
= 00004

2707

4296
11508

2814

Hg;l

e91e

4s1e

42
4616

3175

4741

4333

3437

4933

833b

7
glgg

820

236

392

600%8

4023

4154

DRPAR = 000010

DRSYNC

023740

Dee
<== Ba0000
DSECTR 023316
DSWR
= 177570
DTE
= 010000
DTYE
= 000040
DTO00
037510

DTO004

037514

11298

2805
4362

1939

2903
4399

00S

5057

21e3

3166
4607

297
4732

174

2240

2291

2357

2412

2478

2527

2610

2698

2696

1937
2803

003

2055

121

2238

2289

2355

410

2476

2525

2608

4397

4501

4605

172
295

4730

4821

4922

S019

s112

S225

S335s

1576

1600

1636

1642

78658

1516
1456

1528
1468

1618
1522

7874
1540

1630

7877%

11568
b2
1915

4265

9188
1138%
11318
1369

1384

DTO00S
DTO006
DTO007
DTO01I0

037532
037542
037552
037562

1390
1396
1402
1408

DTOOIY
DTO017

037624
037640

1432
1450

DTO011

037600

1414

4360

1263

78648
1486
7868#
1474
1480
1420
1426

1594
78838

033
4503
901

1792

7870#
78728
1438

1444

7881

3031

164

3428
4823

3559
4924
3426

3691
s021

3557

3811
S114

3689

3916
s227
809

4C 14
S4:68
3914

4145

4012

4267

4143

CZRGEBO RKB611 DSKLS CTRL PRTS

CZRGEB.P11

02-DEC-77 10:21

TSSS& 8332?3

1534

1564

1546
1 ;

1648
7
:

78918

1612
79028
79048

1492

037716
.k?7

DTOO4%
DTO062
DTO063

037770
040010

1588
1660
1666

DWRI

025604

1956

T
T

-k;;
0377
5

DHGP??
DWRTCK

ggg&?&

ECCGEN

4749

4840

2191

3066.

gs&sl

002344

1743%
gggé:

eb73%
393;5

ECCW

= 020000

1172%

ECH

= 000100

&;2;.

2973

ECPATX

002346

17448

2713%

001602

6445
B475
b489
5504
367
382
06
18

1776%

94B*
2b2b%

8407
S30
pS42
SS4
318
388
1412
1424

1948
1498

14488
2619%

M13

PAGE 169

SEQ 0168

3199

1520
1538

78868

78888

evee

2537

4941

5038

2429

3330

6185%

2620

§731#s

ZEYY

2627

3461

3592

3724

4o47

4178

6250

BY10%

6415

b416%

BY417%

3016%
H4Y471%

3149%
HY4y72%

bY411*

bl64s

4640

S867

6214

E2HS

3412#%
4701%

3543%
4792%

3674*
4897%

3786#%
Y433us

3890%
S086#%

2780%
HoYos

2886#%
H4337%

S463

cuge

5583

§7S0

5788

SHEE

5324

6028

6062

6276

6279

3103

3236

3367

3498

3500

3629

3631

3761

4084

4218

417

Eg;gl

2918%

3048*

3181%

3312%

3443%

3574%

3706%

3826%

3931#%

4029%

qa : qgi :
S
BiE
40S0O*
4051
YBH3® | 4BYM

6406

5244

2779%
4129

6412

6400

S836#%

6184%

6408%

6249

5131

5903

§931

3282%
Yogge

6419

B420*

BY21 %

Y22

ots :
B0
Hggg!
4YeSb*

i4
UM
4o71%
4BbY4®

4938:
SR
Ylbl*
4748*

4933:
OSBU
Y181#%
4B39%

Sgag:
3G
4182
4940*

Ségg:
R
Y4194
SO037%

SE;S*
M
Yya02x
S130%

saggl
R
Yos3x
S243%

090*
R
43;8*
6284

2066%
B47S%

2073%
B4B9x*

2183%
BSO4*

2190*%
BS30%

2300%
BS4ex*

2307*%
BSSY#

2421%*

2428%

253b*

2543%

1394
1442
1430

1400
B8353#
8362#

1586

8325#

2066
1955

2183
07

2300
2130

2421
2307

2536
2428

2bl9
2543

8379
2626

8499
1634

8507

1777%

1955%
B4Y4S®¥
84168
84264
8435#

k>3

10078

48 %

[+ ]
W
N
£

O43644
043732
044022
044110
042704
042751
043163
043243

EMW1
EMW2
EMW3
EMWY
EMOODO
EMSO
EMSOI0

12338
1509

14 ?:

10:43

2308

@
&
N
n

1510

LLELE &Wg
o
Of\lB

6402*

Hgas:
M
4030%
4E23%

EHTVEC= 880030

SE42 %

4;30:
fe
3932*
4519%

e Bt Bt P Bt ot et ot s ot Bt Bt e

O0ieos
001632

17408

nnunELs
L L L
N~ 00 V0NN
oLonNCONO
£

ENO0
EHO31

7900#

Ye24

2074

1;&10

ECPOSX 002350

78984
1654

4520

17428

002336

1510

2301

002342

ECCXOR

1624

2184

ECCLO

ECCSRC

1504

2067

293?

002340

1498

1949

ECCHI

02-DEC-77

CROSS REFERENCE TABLE -- USER SYMBOLS

1462

DTO037
|
}
H

MACY11l 30(1046)

8387#

CZRSEBO RKSII DSKLS CTRL PRTS
CZReEB.P
02-DEC-77 10:21

002236
002224
002220

B8554s

VO WD
N0~ Lo
Kk
SmESEXESS

.AS
E.BA
E.CS1

AE 2B D HRSITNER '-’-§\D\DU‘\J

ERRVEC=

wwruo-;.-m-.-.-u-.-.-.--.-.-.-m.-.oo
UNUIILN

mmmm

olgX:i

. EMSO4

Bblls

002254

m
O
o
—

mmmmmm

002252

4210%

002234
002244

E.MR2

002246

E.MR3

002250

E.SPAR
E.WC

002256
002222
043015

ESOO4YA
ESOO4B
i ESOO4C
ESOO4D

02-DEC-77

BS14s

EMSO
EMSO3
EMSO4

043072

N13

10:43 PAGE 170
CROSS REFERENCE TABLE -- USER SYMBOLS

MACY11l 30(1046)

1419
B8338#
B341#

SEQ 0169

GETREG

| GNS

??;6:

032356

e5
30

032444

= smwxxs U

GO
000001
it

GTSWR = 104406

| HIBITS
HT
H

IBUFF

IDRE

002354

= 000011
= 000400

D46632

000

5282

2086

39
4423

28;9
Y4

3128

4
4
i

17478

2674%

2781%

9108
1134#

7244

7285

2726

2798

1774%

1775%

gié&:
79
984
4797
S063*

11368

100

10948

I0TVEC= 000020

10058

1968

8370#
1623

78538

zsg?i

4116
4807
SOe4*

46
T

4338%

424
4851
5091

SEQ 2170

83948
84S3s

2100

296
53

- LIO
VY

0O4YM

83444

N
e

gTE

FSBLVV

1605
B8347%
1665
1 gg
1
66

18
1R
026R

158
165
165
1431
éflbé

glé;
1
145

Bl4

MACY1l 30(1046)
-DEC-77
10:43 PAGE 171
CROSS REFERENCE TARBLE -- USER SYMBOLS

§Og

BO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
B.Pl11

:lfl‘

c
c

203

3095
4669

;94;

eelz

3e28
4766

9338

2320

3359
4863

849

2334

2441

34390
4956

3621
S0S3
3756

850

3362

3493

3624

7851

3753
S146

3377

$389

67S63s

5260

4076
S394

4207
S510

3952

4079

4210

4309

7853

7855

7856

2998%

3131%

3264*

3394*

4B96*

4993%

S5095%

36S6*

3787%

5153

Sléc

S164#*

287

42
4854
S09*

3003
4298
4902
S150

3136

4343
4908%
5190

3269

Y445
4909
S200

3399

4477
4960
s264

3530

4487
4Y966%#
5289

3661

4570
4999
6608

3792

4580
Soggl
87398

3839
4706
S006

3897
4716
S057

2506

2589

2675

2782

2869

2999

3132

3265

2213

eeee

2330

2339

2451

2460

2966

3096

4YSES*

4700*

4791%

3892%

7857

2868%

44YEB8*

3525*

24ss

3979

&RPRRD‘ 172538
=

KIPARLl=
KIPAR2=
KIPAR3=
KIPARY=
KIPARS=

KIPQR?S
KIPAR7=
KIPDRO=
KIPDRl=
KIPDR2=
KIPDR3=
K
=
KIPDRS=

172342
172344
172328
1723
172352

iéég:

1039
1040%
10418
10428
10433

172354
172356
172300
172302
172304
172306
172310
172312

10448
10458
10278
1028%
1029%
1030#
10318
10328

KIPDR?= 172316
LF
= 000012

10348
911

KIPDRB= 172314

LOADRK
L.ASOF
B

L.CS1

032230
002272
002264

002260

e814

6842

&858

1033%

7279

7285

1918

2153

2270

2391

4898
17148
17098

4995
6697%
6694%

S087
b712
6707

5186

6632

3229

3360

3491

2096

2105

3395

17078

3526

1978

3657
1987

3788

3622

3893

3754

3980

3951

4112

4077

424y

4208

4339

4208

4473

4424

4566

4538

4702

4670

4793

4767

CZRGEBO RKB11 DSKLS CTRL PRTS

CZRGEB.P11

02-DEC-77 10:21

4864

g8
L18§ BRsece
88555?
L:MRI
L.MR2

005536
gg

MACY1l 30(104&)

02-DEC-77

S360

5386

S677

s§777

5879

S890

Plgt
SN see
s
e
17150 S
1393 ggew
Sexx s
2328 o
244
538
? 63

2553

0
2258

o,
§9u1

28?5'

B
17178

S366

6187

6226

[or.

OFFSET=
OFST
=
oPI
=
OPROD)
OPRO02
OPROO3
OPROO4
OPROOE
OPROO7

OPSTRT

00400

15
000004
02
Q4072
040724
(040732
(040762
041004
041053

(032274

= 000200

PARCHK 032518
PARM

002380

6713

314
gxu
-

Y
§ag§

Eggi

iu6349

3y
53qo

33533

Y45335

2339

e
6806*

6699%

e
6805%

1§SSE
A73ds
iz?g:

SS66

6784
B
121

g?faxr’ 882532

6394

10488
{2,
10478

jitls
115;.

SS13

ngaaas- 172935
TEw
EE"VEC'
éé"

SRSK= 000017
REuo =

e328

§ 57
48

?11é.

S39%2

3703
uggx

SEQ 0171

S668

6055'

?sqs'
4325

M2 BIT_ §?3308

PRGE 172

Se48

594§

4igbgz
x'

Cl4

CROSS REFERENCE TRBLE -- USER SYMBOLS

Eéggé = 000400
.

10:43

6536

6537

6548

657

580

6582

6586

6588

=
sgaa

P
5463

5488

5583

5750

5788

6028

6062

6439

B4SH

B4S9

&483

3335.
pd3sx

LH2%
subR
5858%

*
PS00:
590b*

*
PRgbe
593b6%

M
pTES*
b462

784%
BISe*
6467

23R
7883

gERd9%

336

37%

9
333

5937%

F, me,
maogm
R
éal
S214%

uw
oo

NN
opd

NN
R

OB
sl

En oo
8RO

6249%

62SO*

U
3R
R
8740s

&
5w

5265

w2
Db DM
T
S84S5
eiB2

1866

B126#

2517

2600

5785%

1118%

10828
11478
11398
183
1839
184
1857
183
713

81218
1899
8127
B81als
g134s
1418

3419

3550

1323

4916
11198

1868
1199

2047

2164

50l2

5105

7808

3682

17518

7808

2281

3802
5218

2402

3907

6706w

4005

4136

¥
M
Ol
bba4

2689

4258

6664

2796

4353

2894

4494

3024

4598

3157

4723

3288

CZRGEBO RKB11 DSKLS CTRL PRTS
CZR&EB.P11
02-DEC-77 10:21
PAR. EN=
PAT

Parg
PATY
PATE
PCA
PCO

| gg;

10508

11638

4
47

=
=
01
= 002000

‘ ;xao = 9;9995
P&?SY‘ 882535
{

' PRO
PR
|‘PR3
Pné

000000
== 0001140
=

= 000038

PRY
PRS
"PRE

=
= 000240
=

' PR7

= D0OO34C

' PS
=
PSW
=
PWRVEC=
P1.BIT

RDBIT

177776
177776
000!
002316

031616

RDCHR = 104410
RODATR= 000021

66Se
6652
6641
11708
11718
ilé7:

51?:
i9§5.
908%

63530
9358
9368
9378
938
398
940%

4yis

9148
91Ss
1006#
ég?so

g;gg
;031
630

TE=

100000

10848
qx;e
117498

ROLIN =

xoq:xx

7704

= 60002

9°T

= 8832
=

RECREGS
109419
REST ? 68 3 8
RESVEC= 00001
+—

RKASOF= 000016
=

RKCS2 =

RKDA
=
KDB
=
RKDCYL=
KDS
=
RKECPS=
RKECPT=

000023

000020
000012
000030
000032

10868
1848,

4439

1994*
1197
1001s
10648

i
1061#

10608
1066#
10658
1062#
10708
10718

D14

PAGE 173
10:43
MACY1l 30(1046)
02-DEC-77
CROSS REFERENCE TABLE -- USER SYMBOLS

SEGC Q172

6787
86578
86778
86978
87198
6453
BMS53

6469
B46Y

6518
6524

Y431%

S46l*

5500

ISSZ

5937

§938%

6029*

SS01#*
6088%

S586
6200

SS87%
%
6201

S590%
6204*

S751#
6244

S787%
5255

859
6256#%

S860%*
E259%

S907
6455

S909*

S912%

5938

S939*

6393

6460

1725

1212

1761

6781

7805

780%
786¢%

1781%
©5801%

7790%
5860

7804#
S8b4#*

915

5523
sozg
78568

268
g
S

7a§7o

2832

. 4540

ee0s
17548

3355
so;;

39;;
6089

2788
4345
5583

1887
4671

7805%

5908

3358

6260

4639

65738

4668

3460
S465

3489
5490

3591
ss0e

3620
S591

3723
§7583

2875

3138

3271

3401

3532

3663

3794

3899

3986

SBb2

6280

3492

3623

3755

3953

4078

4209

4310

S5E2

5553

5233,
SOl1#*

S217%

6713%

58831

38974

4049
4048

4Yeye
4e4!

6283
5868

6229
8 'S

3227

4433

3329

2839

3361

4769

B712%

S;Ygl

6709%

5480

7193

4597%

4813*

49 14#*

3332
3331

3594
3593

3726
3725

439
%
784

6708%
2938
2937

3068
3067

3201
3200

CZRBEEBO RKB11 DSKLS CTRL PRTS

CZREEB.P11
Og-DEC-?? 10:21
RKER 000014
10638
RKMR1 = 000026
10678
eb34*
4792!
=

MACY1l 30(1046)

B4y

BY70%

RKMR3 = 888832

1069

198S

RKSPAR= 000022
RKVEC
002304
RKWC
=

10728
17248
10SEs

1881#*
6706%

1882*

;ggg:

7809

S061
7861

S160

7169

8147

PRI

RLS

002306

SCOP1S
SEEK
=

355;
1

17258

;110.

2a
5
boaas
2R
= 006090
SCOP1 =
1S

I;Sé.
11198
ygpy

SELDRvV=

1076%

SK1
=
SPACE2
SPAR
=
SPDLSS=
SRTFLG
SRTSPL=
SRO
=
SRé
=
SR
=
SR3
=
STACK =
START
START1
' STKLMT=

| SVAL

SWR

1116

002312

69938
1083%
11278
7157
1102%
11498

1883#%

bY71

B48S

eee0

2337

‘SHSB

1754%

1757%

6839

6854%

BB61*

177576
172516

1022
1023

6B8S1*

002400
002404
177774
= 100000
001140

1196
1752
9168
1157%
12638

1772

5439

17588

7204

001100

SWREG
000176
SW0
= 000001
SWO0
= 000001
SW0l
= 000002
SW02
SW03

= 000004
= 000010

SW0S
SW
SW07
SW0B8
SW09
Sul
SWi0
SWll

=
=
=
=
=

=
=
=
=

000020
000040
000100
000200

000400
001000
000002
002000
004000

1021#

90Ss

5520
6493

SEQ 0173

1760

1757%
1785

1770

55399

708
11948

7094
1800

9594
s
957%
9S6#
95S#
954 ¢
53¢
9528
9S1s
950
9684
949y
9484

969
368
967
966
96S
964
9E3
961
960

1792%

S70
6534

7098
1822

2315%

4390%

Sl4y2®
6066
6S2S*
6588%

6499»

243S#

2436#*

5255#
6078
BS26
£589%

S2S6#*
6090
6537»
6711%

4391#

4532%

2551%
4533
S33S*
6207
6538

2552
Y4761#
S336#
ekl
6549

S430
6449
6993

S473
6479
7075

7861%

1751%

l?;g?‘i

17278

PAGE 174

€S0
BYEY*

1080%
10208

000011
177572

10:43

CROSS REFERENCE TABLE -- USER SYMBOLS
4416 —
1962%
1963%
2080%
2081%
197%
2198%
zgggn
2834%
283S%
394S»
94b*
4302*
48S8*%
4B8S9%
4OSix
495§!
g 8%
049%

S371%
6440%

02-DEC-77

ElY

1794

5765
BSHE
7176
7474

1834

6564

6604

1800%

1807 %

5814
6558

7474
7513

368
660

7513
7536

718S

1822

£978
6901

7S68%

7196

7806

F1y4

CZRSEBO RKB11 DSKLS CTRL PRTS
CZREEB.P11
02-DEC-77 10:21
Sulg
SW1
SWiY
‘

SWiS

= 010000
= 020000
= 040000

9478
468
94ySs

9678

ShiY4

gz;

SWS

-o-o-c-c-«nmyimmmmm

9668

96SH

9638

3t
9608

1000
DOC

1182
1183%
1185s

RTC =

1181#s

.STSP=
:
=
BITVE=

100

1180
1184#
1002

SEEK=

KVEC =

PVEC =
Y
R
310
=
TRTVEC= 000014

TST1

TSTI10
ngé
Tl

83§QI2

10098

1010%
17268
1008%
1003%

1890

8628

010156
010704
011432
012160
812?14

ST20
ST2l

013450
014176

030

19098

6960

B967

36508
37808

6975
£976

1991

816866
16602
017264
004442
017600
020350
020660

42368
4331s8
4421
2109
4S61ls
46968
47878

TST36

022456

TSTE

7864

1778%

6970
6971
6972
£973
6974

TST2S
TST26
TST27
TST3
TST30
TST31
TST32

TSTHY

B597%

29938
31258
32578
33888
35198

38858
39738

13138
TST3S

7452%

£968

014512
015004

015532

74S1%

27748

TSTe2
TST23

TST2H4

6479

6508

2001

2029

6961

410Ss

4443
2119

4Y4yebs
21468

6982
6962

22638

6963

1779%

6969

19396

£977
£978

6979
6980
6981
Y428
2114
6983
6984
B£98S

o186
022103

M
S0828 £988

00S0S4

2eeb

00S466

6493

11788

2bb78

83 138

6449

1179%

009622

ST13
STI4
ST1S
STi6
ST17

ST2

7176

quM
g

.CLR =
FMT =
PACK=

RECL=

SEG Q174

9648

s
| SWS
=
1
;

MACY11 30(1046)
02-DEC-77 10:43 PAGE 17S
CROSS REFERENCE TABLE -- USER SYMBOLS

Si18ls

6989

2343

2348

2231

2236

2353

23814

6354

6993

RGEBO RKB11 DSKLS

C%RBEB Pll
rsr;

CTRL PRTS

oa-figc- 10:21

MACYLl 30(1046)

02-DEC-77

25008

2464

2uEg

2474

IYPE® = 10wa01

1816

1833

183"

006360

TYPERR

034260

TYPOC = 104402
" TYPON = 104404

1YRSOF" boa1e
T.BA
" X

25838

6966

1c 7652
s QR75?9 R
7648
7084

1838
7850w

7121w

1865

1677
16728

coBies

4294
sl

T.CS2

002170

?ngo

T.DA
T.08
T.0CYL
T.0S

T.ECPS

002166
002202
0022
002172

002212

T.ECPT

002214

T.ER

002174

{ T.MR1

0O2204

4425

Y440

16738
16798
1678%
16758

5693

&gg;

18
7537

7848%

Y446
i@

4850
gt

5271
7900
A%l

§8§5

7877

4YS41

7881

4673
7888

59 38

S;ggl

2944

3068%*

16844

2937%

Seoew

s865°
4679

4417

16808

7883

S407

1849

7154

7865

g46

765

789;

3725%

SEQ 0175

6965

R
7660

S691

?893'

PAGE 176

CROSS REFERENCE TABLE -- USER SYMBOLS

006110

18T

10:43

Gl4

4049*
2941

4048*

SEad

;865

S4eb*

7888

405

3067%

40S2

5973
87

S467

4770

S0S6
3074

$180%
3071

4179%

3103
7888

SH9L*

1857

7148
787

7993

539

5088

2643

Sebl

5263

7877

Y4y

3207

3332%
648

3338
6283%

3469
6299%

3600
b734#%

3204

3331%

3335

3466
6215#%

3597
6268%

4084

H4416%

6032*
BY471*

CR
7663

7259

5238

S149

4867
788

SIiy

3201 %

4186

3200%

4183

23
7898

S492

539

Yo41x

S514

S669

2367

5808

6538%

6539

S754%
BYY1*
6551

SS03#*

7643

4311

60Se

7874

T.MR2

002206

%896'

1984%

1993

2102

2111

2219%

2228

2336%

2345

2466

6736%

T.MR3

002210

5395'

1985%

1998

2103%

2116

2220%

2233

2337%

23S0

2471

6737%

| T.SPAR

002216

1685#

0004
000007
0400
020000
1
040000

11158
1079
11408
1120%
11S1#
11218

5277

7888

7902

4357

5054

5147

T.WC

UFE
=
UNLOAD=
UNS
=
UPE
=
wW
=
WCE
=

HRGATAS
=

002162

90023

WROCNT
0023
WRHEAD= 00002
WRL
=

WRTBIT
WRTCHK= 000031

WRTGAT= 040000
WR.PAR= 000004

| §APTHD

001000

16718

10858

17378
10878
11548

1924

5791
10888

5802
4479

1223

12298

11738
10438

5788

2042
5865
4572
6454

5261

2159

2276

2397

2512

2535

5913
4708

5940
4799

64398
4904

5001

5093

5192

CZRBEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRBEB.P11

02-DEC-77

SEQ 0178

7048
70068

?TQT: ExEwEx U
YC
3636

33612
3620

7234
7090

1326#%
1837

7527
1845%

7077

7110

7480

1787
1873

7268

7277%

7677
72828

1768
12778

1776
1 73.

1782

1784

12788

1873

1783

1281

15853

1883

1286#

1287%

12888

1289

1290#

12918

1292

1293%

12948

1295

7110

7133

7138

7146

7159

7172

7250

7285

7570

7657

7cb1%

1275

12858

7684
1886

7152

7810

1580

76788

388 E388%38SRRRERes28
e
S NAR
T

708S
n

7428

e e e e Y PU Q) 0=
NN
LN

5327%

5323

7105

7011
7013

703S
7231

S302
6890
6931

7184#*
65929
%
6954

6937%

£959

7195#

7080%
7891

7081
7893

786S
7898

7868
7900

7877

7881

7883

S438%
S705%
*
047
b377%
69S3*

S4S9*
S757%
6048*
6379%

S764*
6070%

»
=

7201

W
W=l

o0
00

$SATY1
$SATY3
SATYY
SAUTOB

H14

10:43 PAGE 177
CROSS REFERENCE TABLE -- USER SYMBOLS

MACY1l 30(1046)

7229

23S

0011se

7033

7042%

7050%

7101

SY70»

#
EY4Y
7103

CZRGEBO RKB11 DSKLS CTRL PRTS
02-DEC-77 10:21

CZRGEB.P11

631128
1
$HD
= 000000
’HIBT§
";000

gICNT
INTRG
' SITEMB

033052
39“2

SLF
SLFLG

1246
03405S

$KT11

SLPADR
SLPERR
SLgTRD
SLSTBK
- SMADR1

i
-

SMAI

1
$MAMS2

Sflflfl§3
$MAMSY

$MBARDR

7089

6863#%

001106
001110
3154
033156
1302
g1312
1316
001250

001300
001304

001310
001314

gg&ooa

0S4
037016
001264
001266
001250
03700S
001301
001305
001311
SMTYPY
001315
SMXCNT
033470
NULL
001154
SNWTST= 000001

SMFLG
SMNEW
SMSGRD
SMSGLG
- SMSG
| §
$MTYP1
$MTYP2
SMTYP3

945

001306

I14

PAGE 178

SEQ 0177

7285

D011
001135
001114

| gfiTNEX
TOUT

10:43

CROSS REFERENCE TABLE -- USER SYMBOL.S

03 183

uuwmomw&ugmgw
&

SHIOC

02-DEC-77

1256#
3208
358

e e e N Bt Bt et N N Bt s Pt Bt s Pt Pt P
Wwwu
WNRWO—-—-WOW
L
WE
L
~ DNV LOW
N O+ Lo+
= %2
S88
XU
8=

L
gt

001 124

127Cs

1254

MACY11l 30(1046)

1235

6947

7571
7110

7e8s

7667

7738

4912

5926%

6935*
S009*

6956
S440

6958
6565

660S

1307

1804

6950

7087

7229

7044

7048#

1820

7811

035342
035344
033454
001256
0010
03741
037406
037264
037312

6952*

23678
2981
38738

2369
3110%
3875

9S8

6997

7100

2489
32438

2571
3245

Y7748

4778

7022

7025%

7037

4O#

22sl
29798
3770

4YS46#

SOCNT
SOMODE
SOVER
SPQS?
$PASTM
| SPOMER
SPWRCT
SPWRDN
SPWRUP

6935

4548

46848

CZRSEBO RK611 DSKLS CTRL PRTS
02-DEC-77 10:21
CZRGEB.P

SQUES
SROCHR

3
SRDSZ

001244

1299%

76028

Sggsgs

76258

7857

12758
12768
12778

274S*
2746%
2747%

Eeuxus U

7859

0
000010
D011

76998
7618%
1273%

001170
001172
001174

12788
12798
1280%

001176
001200
037226
023310
#REEEE

0371?0
833169

032652
033114
177777
033420
000220

7400

12818
12828
77718
S329%
7861

g01272
000000

$TKB

1783
2863

1784
2994

6891

7660

7677

7735

7738

38SB8%
3859%
3860%

4959%
4960%
4961#

SOS6*
S0S7%
S0SB8*

S149%
SISO
S1S1*

S263*
S264*
S265*

7892
7892
7892

7904
7904
7904

1778
7472

1780
7477

1782
7478

1783
7508

1784
7684

7904
S5155%

7904

1773
7071

1774
7097

1776
710S

1786
3126

1910
3389

897

2030

6901

6913

6915

6916

2929

65930

6931

6938

6958

7062

1319%
901

1807
905

S083

7063

s182

7064

5289

7065

5295

7066

5322

707S

328

S330

7082

7094

995

6896

6919

Se01
7874

5767

5980
7881

6047

6377

6925

6959

69S0*
7888

7122%
7891

7123%
7893

7864
789%

7865
7898

7868
7900

1783%
C8%

1910%
3389

2030%
3520%

2147%
36S1*

2264%
3781%

2382%
3886*

2S01*
3974*

2S84*
4106*¥

2668*
4237%

277S%
4332%

2863%
4467%

2994+
4Sbex

744B%

7478

7495%

7609

7611%

13108
;ggg

Se0

5475
;ggs

5769

12968
3126#%

4697%
12668

4788%
7432

1765
74378

74488
7503

7449%

4893
7453

7613%
7616

S182%
7517

6375
7886
S5295%
7544

B93Bx

BI4S

6948*

6958

7S01*

7502%
7614

761b%

7503

7505*

7454%

748Sx

7487

7493

7515

7531%

7541

7553%

7573%

1843

1845

1851%

1853

1856

1868%

1870

1872

1874#

5619

Se22%

5625

Se28*

SB31

Se35*

5638

Seb1*

1283#%

1841#%

001204

12848

5582%
B6179%

S0B3*
7489

6045
7883

7450

001202

1878%

4990%
7464

7530

7612
7505

;:gs.

5982

7469
7614

74S0%
7449

12918

1298

277S
4332

6955

1877%

1297

2668
4237

6952

%ngo

1296

2584
4106

9??8

74348

301

S294

2501
3974

?339

74338

900

1817

2382
3886

4990

6895

899

1814

c2eb4
3781

4893

6894

898

1786

2147
3651

4788

6893

74358
74368

O0leee

895

787
3258

4697

035576
035600

ggéégg

$TMP1
STHPIO

7589

4562

001234

356
035601

7285

SEQ 0178

7860

69498
1209

S477

035572

S1S2%
S153%

6824
6872%

878

7858

1884
6862
17518
6910
1204

17518
6900

J14

]

7859
6899

033472

001254

78Sk

77558
1774

Y467

STIMES

7110

036432

0011
001164
001166

STESTN

MACY1l 30(1046)
02-DEC-77
10:43 PAGE 179
CROSS REFERENCE TABLE -- USER 5YMBOLS

1880

B346

1875%

1876%

K14

CZRBEBO RK611 DSKLS CTRL PRTS
CZRBEB.P1
D2-DEC-77 10:21

MACY1l 30(1046)
02-DEC-77 10:43 PAGE 180
CROSS REFERENCE TRBLE -- USER SYMBOLS

gTflPll
TMP12

12928
12938

6181#
6£189%

350
6193#%

b6191=

6195*

ggxeew
1226

gmpxa

lsgg

TMP14

001

ngPg
TMP

001
00121

STMPY
$TMPS

ooleaie
001214

$TPB
S$STPFLG
$TPS
STRAP
$TRAP2

12878
c88%

H4SB8#

001216

= 000037

879%

001220

$TN

1285s
12868

41
5929%
1289

S$TMPE

STMP?7

12948

001182
001157
001150
037420
037442

6190%

617S5%

B177%
5333!

Haggl
b186#*
S846#*

6354
6239

6265

6277

6290

6295

6368
2956

2961 #%

3063%

3086

3091
*

A
J'96%

4665%
be34#*
966

S8SY*
b*
b171%

Sg8s8l
6313
6334

1991

1996

2001

6194*

6274

6370

3486#

zsggl

3589#%

4660
b23e*

3612

2751#%

3843#%

12908

2730

2749

21478
2474
3110
3886#

2226
2487
3126

ee31l
esS0ls

S168
12684

1828
274%

6920
7e85S

6960

7848#

7849%

S294#*

6890

Y4678

4546

1272%
1267%
1778 @
7835s

7223
7eze
7824#
7846

39748

4Sees

19108

3617%
2

3721%

3864#

3224*

3327%

3350

335S*

qug
b317#%
6342

S896*
6320

S899*
6324

S902*

5920

5927

Sg848*
2014

So47

6173%

2348
2762
35208
4317

2030

2353
27758
3636
43328

2367
2847
36518
Ye2

2ll4
23828
28638
3768
Y428

2ll9
2464
2979
37818
4443

2132

78584

78598

69708
69834

6£971s
6984#

3749

7850%

7851%

78524

7853

78544

7855

78564#

78578

£922*

6949%

6950

6955

6959

7074

7110

7122

72724

7273

7575

69684
69818

69698
©£982#

4697 %

4774

47884

4873

4893#

331004

1232%

STTYIN
STYPBN=
STYP
$TY
ST
ST
X
STYPOC
ST
STYPOS

036756
#xx%%x U

335050

7627
7852
73748
7030
253
7278
7315#
7314
73108

7851
7223
260
7e80
7848
73178
7849

$uUS
SVECT1

001274
001320

1320%
134Ss

1847

1855%

1856#%

1859

1879%

1880%

1881

1883

6959
6972#

5}
69738

69618
69748

6962
6£975s

69634
6976#%

63648
6977

6965
69788

696648
£979%

696748
69804

732

7360%

SUNIT
SUNITM

4636

035116
03S144
035160
035120
o01eee
001010

SVECT2
001322
$XTSTR
033172
$SGETY4= 000000

$3$SW0B= 000037
SOFILL
035343
SHOCAT= #xxxxx U

= 0S0e42

13138
1234s

13468
6904
g322s

7628

7640

7839

7267

72838

7658

7847

7672

£986#

6987

1188%

11928

1198#

1204

1205%

74284

7432

74368

73/

12424

ggeg

7315%
7084

1307

4990s

S0e8

4175%

2469
2994%
3873
yucu
S083%

76764

7850

69858
7311%
6901

4970

4O72*

7285
7285

STSTM

12458

2109

4067

eeb4s
2655
33898
4224

= 000016
001102

HO4Y4Y =

2249
25844
3374
4106%

1
3258
4091

2343
cbbB8s
3505
42378

3219

37494

$STRP

$TSTNM

78398

SEQ 0179

17?

6£988#

1786

6989%

6990#

1207#%

1830

7HCC8

1209

S307#%
75768

1210#%

5330

7677

1213#8

6331%

7684#

1219

6958
7738

1220%

6959

7793

1222

70S1s

8652

1224

7110

8739

CZREEBO RKB11 DSKLS CTRL PRTS
CZRGEB.P11
02-DEC-77 10:21
.$X

S——

= 001000

12198

L14

MACY1l 30(1046)
02-DEC-77 10:43 PAGE 181
CROSS REFERENCE TABLE -- USER SYMBOLS
1224

SEQ Q180

CZRBEBO RKB11 DSKLS CTRL.PRTS

CZRBEB.P11

dio
ENDC

1012s

02-DEC-77 10:21

Y
8163
228?
$§?q
gsfis

LS
08
si;8

2705
2800
2828
2916

2708
2801
2
2922

B
gé;g
321
3433

2287

§§59
b

¥
3123
gfi
3440

I
0 3
5l
2292
833
seey§
270

saw
92

31LB

Ml4

MACY1l 30(1046) 02-DEC-77 10:43 PAGE 183

SEQ 0181

CROSS REFERENCE TABLE -- MACRO NAMES

fW
‘su
i
2293
&d3d
53¢

LB
agsg
g187
2296
S8
§§§§

e
2069
8158
2297
5383

710
2807
96
24

2711
2319
9

271
2811
838
2926

sH;

B9
2978
si838
&d%)
Sifig
264

2718
2812
2893
2927

W
ao;x
8178
2302
5§8§
ggSS
91

B8
ao;g
SiA7
2303
q§§
8857
2692

2719
2815

2720
2816

s
20;5
SMG3
2304
sggg
Seis
259
2721
2817
908
2971

3441

OPE
186
3325
3447

OFS
139
3393
3948

PN
3183
3321
3449

RN
géa;
gflga
3452

O&Eo¥S
190
gog
3323
gq
4
3451
3#;2

=
3582
34§8
3498

ou
3936

3937

s
138

®
333;

s
39%5

:13;

3140

:141

3ius

g8
5M2
aaos
8199
cere
2634
20;7

2722
2818
2909
2976

O
gaq
3458
3;;1

e
2188
AMR
&M
;e
2699
2752
2824
2910
3026

ga;
433
%

e
2153
5A%
zaxo
qéa
=9
2700

88
83
2311
8ia%
&
2703

e
558
2342
S48
!
2704

&
2 1
3453
gg §

o
3592
gugg
53?

B
401

e
4015

:155

3155

:123

4373

4374

4375

SEed.

565
Y4544

2755

2913
3027

g OB93
335u
gggs

gxég

2798
2826
2914
3028

B2 Fy BW Al Y X2 B o®e e o e ¥ Ex &n
5
3927

4019

3929
4020

4299

4269
431

435

uégg
4356

5279

6598

1918
1817

2036

5%,
3638

U
37688

401

:gge

4268

4381

Egggcg
GETSR
LOLPER

igis:
10iss
1214#

LB
3636%

4025
43

uégg
438

4021

ué?u
4357

Y358

2183

2270

2391

NS,
3770

At
3873%

343,
3875

4385

4386

4026

qé?g

4293

394
403

314

4583

4363

4364

4367

)t
39588

SThe.
3960

4091%

4400

Y401

Y404

M2t

4034

:1sg

ugés

4405

4093

&
4008

:151

3&22

4007
4035

4563

4369

Y419

42248

Yye8
4372

Y420

SN,

4226

4037

Y427

43178

403

4535

Y42

4319

e{au

2799
27
1
3029

4054

4291

4448

CZRBEBO RKB11 DSKLS CTRL PRTS
CZRBEB.P11
02-DEC-77 10:21

MULT
NEWTST
OSECRD
OSECWC
POP
PUSH
REPORT
SCOPE

SETPRI
SETTRA
SETUP
SKIP
SLASH
SPACE
SSECWT
STARS

SWRSU

4456

1012s
1012%
0S
168

17208
H;B?
17218
10128
7776
1012%
7701
101;.
9078

3519

S181
1012
78398
1012%
10;20
2474
1012%
10128
17208
50150
26
3110
3972

SSCMTM
$SESCA
SINEWT

12368
1012
10128
350S
S168
7839
1804%
10128
2474

$s8C

SSSET
$SSETM
$$SKIP

EQUART

HERDE
.KT11
.SETUP
. SWRHI
SWRLO

$ACT1

12368

3784

8784
8784

B784%
878#%
878#%

878#%

4972

SOe8s

2847

2979
4774

4873

3656

3786

3891

6669

6738

6772

6619

6720

4466

2667

2774
4S61

7855

7857

2119

38
2571
3387

1302
esee
3505

4548

46848

4686

47748

4776

4873%

487S

1894
3636

2014
3768

el3e
3873

2249
3958

4091

2367

2487

2571

2655
4454

4546

4584

2673

2780

2868

2998

3131

3264

3394

3525

Y472
S434

4566

5479

4701
Se06

4792

4897

4994

6049

S186
6361

5456

S549

5731

5836

6009

6165

2029
3780

2146
3885

2263
3973

410S

2381

2500

7849

7850

7851

7853

2001
4443

2109

5771

5984

4317
S081
7508

1012

78398
1012#
1012
10128
1012%
1012%
10128
1012

SEQ 0182

HS46

4873
7120

TRMTRP
TYPBIN
TYPDEC
TYP
)
TYPOC
TYPOC
TYPTXT

Nl4

1J:43
PAGE 184
02-DEC-77
CROSS REFERENCE TABLE -- MACRO NAMES

MACY11l 30(1046)

4224

4236

4317

2583

4331

49708

S070

S1e8%

5170

4370

3243

3374
S0e8

3979

4111

4a4ye2

7048

7046

7415

7727

6756

7006

7008

7029

7374

4696

e86e

2993
4787

3125
4892

4989

3257

3388
sosa2

7858

7859

7860

7861

2231

2236

2343

2348

2353

2464

2469

1291

1292

1293

1294

1295

2762

3110

4330
S168
7523

1277
1285

1278
1286

1279
1287

1280
1288

1281
1289

1282
1290

elie
3&.3

2249
3958

2367

2487
Ya24

2571
4317

G484

4546

2762

2847

2979
47749

4873

7850

7851

7853

7855

7856

7857

7858

7859

7860

7861

2001

2109

2114

2119

2226

2231

2236

2343

2348

2353

4443

4091

2655

4684

3110

4970

3243

3374
S0e8

2464

2469

80 RK&11 DSK
B.P!1

788

ég'”

8788

87 s
788

2
]
b

8
788
788

8788
8788
8788

ABS.

CTRL PRTS
C-77 10:21

0S0e42

ERRORS DETECTED:

MACY1l 30(1046)
02-DEC-77
0 "03 PAGE 185
CROSS REFERENCE TABLE -- MACRO NAMES

1186
36

7685
7429

7738

6885
&80
7816

000

RMO3: CZR&EB, RMO3: CZRGEB. SEQ/SOL /CRF /NL : TOC/DOC=RMO3:
CZRGEB. P11

RUN-TIME: 28 24 2 SECONDS
RUN-TIME RATIO:
CORE USED:
30K

DOCUMENT PAGES:

1332/56=24.7
(59 PAGES)

183

B1S

SEQ 0183