Digital PDFs

MAINDEC-08-DHRKB-D-D

December 2000

66 pages

Original

6.0MB

Document:	RK8E Drive Control Test
Order Number:	MAINDEC-08-DHRKB-D-D
Revision:
Pages:	66
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/maindec-08-dhrkb/maindec-08-dhrkb-d-d.pdf

OCR Text

PlSK

X/o

m
-<
a:.

Ui
to

Q
O

a.
<c

f~«

u
u;

>•

-4

«ar

2:.

r~-

5
oc
o

a»
a:

a 1

u
O

Lt!

»-»

~«

t-t

1
1

f-»

w
o

CD
it:

a
»-<

o in X

r. ->i

Ul KJ
ta

jf:

i-t

U X CO
>•

o
o

>* Ui

Ci3

»-t f-e

W 10
wX •
uo
O ID
W
U U (O o
a.
X

-3

«C

f-«

X 2r

<
—I
o

X
o

SI.

tii

ui
«Q CD r>
«C
2^ o:

M
M
w

<
CI

X
U <C O 3:

at.

o
J

O3
<

r> 2.

(0 CO
<C

bi lO

X Ml
X
o
&u X

£X.

O
O

UI
»a HI
U3
oc: o«
cu

£^ UJ

cci

*-»

»-*

ff.

•
1
1

•et

Ot.

lw»

1*1

^
O H

.-3

»-*

i»-

!X
H»

t>-

a.
tx

2: -3

^
Ui

f-»

<£

U
o
o
a
r3

Ol.

u
Q
O
a.
u.

a
M oo
QW Q
U3
X >t
to o >t«
o
ua
ct
o
F-w

•<
U3

o
X

i~*

fc-*

Cf>

Jjj 1-6

U, b-«
<xi

»-*

e«

ijj

O
J UX
to

iO to t> >*
ec

X
a.
o

111

o a

X-

»-<

to X.
-at

^ r> O

Ix)

O O O.
a
wo

to t-

a St

t-«

3^::

O<
^ W S

«3t.

-2.

US to

cj a,

a s:

X 2 u* to
O O <t

f-«

u
CQ Ou

x R

M CQ
o

oo
OU
o

E-«

>* :«
oc
a. oc
•< U)
US

»-«

oc £X i2

rOft

i«

rt:

fcd

€-» 2:

X o n>
a
w

RO^J

Prcts^-T

I
f.

»-*

O
15

lr»

t-*

1
1

2;
I^lS

1
1

O t
u i

s:
«t

1
1

f-*

ffi

fr^

<t
DC

(-*

u
<:
a

to
f-

>•

QC
««
sc

£X

UI
at:

»-*

e-«

o
(1.

QC
a.
DC

o
>v
Q

£L

f-«
»-«

IX
U:
a«

X
o

Ul
•~3

13
sz;

u
o
X

o
a
X
X

»-H

X
e»
o
X

IH
0}

tr*

fr*

t-«

f-*

f-t

«t

O
X

3
X

ir*

t-»

tr*

O
CE.

>
oc

O
U

O
u

f-«
»-»

l-»
K-i

H
to

>•

a*:

X
o

iTJ

X
X
a

X
u

a
o

o
X
X
o

o
wr
f«*

3£

o
(O

»-«

<
X
o
X
Oi

X
o
X
X

lO
s:

X
lO

X
o

no
1H

Ui
yn

<
in

»-*

O
o
Ul

o
H«

:£

*«

««

U3
t«

o
Ml

H t

u
o
X

t-»

Q
X
X
u

«t

X
X
u

<
X
X
o
X
X

o
U3
X

o
2;-

u
X-

<
X
>

o
u
aa
X

H
O
a

I-*

til

S£

to
r>

o
Id
a

>•

X
o
X
X
b3

to
a.

o
o
^
a.

o
u
to

X
o
X

o
1-4

>•

a
>

E-i

»-«

X
X
o
to

»-i

*-»

o
o
X

;>}

iMi
l-t

<
u
n
x

<£

to
U)

o
X

X
!^
O
X
cu

<
X

o
X

M
o:
at

UI
OL

o
X

5
o u

Ul
to 3C

-J
c?
<c

ex.

Ix.

RIV

a z:

ALL

wMw
tJJ

^ ad
U CM >H
o

2.
O
•a
M O a 3.

M<
QQ
a: lo in Ci
>
o • tn W
X
a
o * =K
X ad CM H
sr.

UO to

»-«

«3C

ua U2 LjJ

:^.

H* H»
U} U. iJU
U3

-J z> U5

C o
£X
u Ui
U2 X
O X
u
:»c;

t5
u.

> O

t-H

OL h:

1-4

o o
a

ui a.
c» ac

•
f

JX a.

h-t

l-«

to
31
<«

1- .J

f>i

»-»

at-

a cd o

»-)

o
O

u
t-l

Q
to La X
4 lO
»o t~»
a.

ir>

a: at

r- to
r- CC

U
< a*
CO
•* X << O X
o <
at
o ct
:^ U3 <
> o 3c a O l-

:>
«*

^
o

*-»

a CO
lO H
u3 «« 3
t-»

at =3

CO to

«c to
b«

l-t

UJ {ju

f-t

> U3
X
w c to
-3
^. u o
^ < UJ
a.
Jo
«C
o
z «*
(-*

t-4

F-»

X OD
bl
Xo
O >f
X
X <t
o to
to
X

a<
uo
Xo n
o

<f-t

CL OL

t*'

s;-

to ui to
X.
l-t >*

O
X
X
O

X
o *c s:
XXo
X X t>
3
b. to
o so
^ bJ *e
X a*

f-*

f-t

^xi

X to X
b)
Q o
X

O X b.
o

H
-a

Ts:

1
1

X
<

t
»
1

l-t

X %
1

o •
U]
X
1

O
X
*t
X

lr<

I-*

to
bJ

z:f

H» a: r»
bl
u, >i

uc
oOo
O
o a •J
^zH

OL
Ck

b*'

bl i-l

to
*t

GO <4

bl
»^

•

o
X

1
1
1

b«

ixl

o
*4
O
o
>X
X to
o

»-»

X :3
o a.

a
a. s:
oo

O a
o
X
21 O X
Ht bj
cr bl X
X o
X b- b.
3 O
Q
to bl X bl
bi X O CO

X
o

3
Z CDo

lO UI CJ <«:
U3
b. -1 .3

H
X

b. iO bj
^<

z
X

«£

1
1

cu
lO

»JI
\~*

•cc

o • o Mz
-3 Q

X
X
q

a
<:

U
OD U

X
^
X
Oo
z
X

t-»
rt*

X.
OD bl

l-t

ar.

lO to a.

•3
< m cj

o z. o
M bl o >
X X
O X o bl
to
o
oo
o o
j1 O X
Xo
O H» O X

3b:

bi
»j

»-*

M o b)

f-*

oc *-«

o o

O <*
o

2 a. o

f-«

X u}
CL
H a.
<c o
X

o
O * -4
oo

;2r

bj b.

OD bi

f-*

</2

»-t

o
t-

H :«iO
O
u

cc
a: t>i ua

fcf>

a
X

:3 <t

a. Ill

Ik.
»-*

>u
<C o
<
+ o w
LU
o t_ X
>:
ao
« a in bi a
u.
O
o
«£ w o w
Xo
cc <
<t > « «*
o
•< <cC
QC CD U3
OC
u:

^ ac

CL Ul
{H
UJ
U2 l-« to
to

*«

o
SQ
o
^ <t

b}
E-«

O
•
Ul lO

•

»-«
\r*

:)ft:

w
o

lO
(-1

bl
OD

o
X

O
rt
X

K
i

ir*

i
ft

X
c
X 1

>•

X i
1

f-*

X
«

< r- bl 3:
X
O z: X
O O bJ o
X
a z a
Ji
b3 O
X o to
»J H b.

i-»

bi to
s: b)

1
•

:£

.J
bl

•
•
1

X
X

a
b^
Oo
z X
bl M
f- z.
X a
b3 u
O CO
z to

•
f-«

*« bl 10
b)

u
W to
to w to
< Q
X X
M
>-»

jtl

»^

^ O
OC

l-t

CO
Ui
to

M
XX
O
)M
X
OX
2;
M ui
X ua o.
»MO
<a
-X a
a*
o w
o a.
*j a o
ou
W X to
o.
o t« ca
u X
to

•CH

o
ct

fc-«

35 2;
1-4 »-t

< «<
cc:

PC
ui =

< .a
X

'.>]

f-*

3 O•

frHf

t-*

<J
W
Xa
OOXM
OOF-' ID W J ^
a o = ua «o
5r

a. z:

ff.

iSi

t-*

t-t Sr.

2 i
t~4

•ui

«Q

fr^
.Jf t-i

«a 3.

txl

f-«

b3 >« o:

X £t 3:
XOX w
ou
O Ul X
»:J

ls3

t-«

O 05
(X X ^: O O
O .o 2: M to•
M
o
X
o
^
O X =3
o o OD
^ r>
o
a «o o X
H M o a.
ir<

f-*

ixl

»~»

ul2

t-i

fr«

O hi ^
-3 Q CD
M
,^3

•

Cl,

X O 3^ JZ

U3
L>
«0 lO ffi

t-*

t/3

t
i

L5
bJ

«
I

o; I

X 8

f-«

3s:

t-« fcx

t-* 1-*

OC
U2

l»J

1x3

is:

t-i

;3:

I-*

f-*

1-3

»-4

£-« E-4

-a:

^
X
as b3 o
M H>
M

E-i

i2;

UI Q«
2:
CE

O
O

f~*

fr*

t-*

w <x
XO3

M X>O
Ld X o
to
X HH •X o
^ Ul
wO M
»
Xa
XMX
<c to o
X M O 5C M iU
O<XX
a x o* to :«iO 2: •
M to
lO
M 2:
W &u O
XD
55
>aM
HUX
O
M
ol
>
X
e> c o
O X to M X
2:
< tu to X C5 M
:3
oo
X to
lO
^ (X M
to
<c
X
J
>
o
X
X MMM XOM
OX
Z5 M X O Q X
» X o
oMo2
M
Xo
:2 w
21 uJ
3 ^ X Ml M
X U3
M z:
X
:2 2:
X
Wi Q M M lo 2i to
uj a< <o 3 U 3 U O 3
X
u
-a:

sz:

JjlJ

bu-

f-i

>-*

O >•
• PC
o^
H oc
CO
OO
o
21 to w a;
O U U3 a:
a
a: o X
a: 2s
w o to O PC ^ U3
zu
•EE
ac M M
Ji UJ <C O
a.
X w
-<
H<
o
M
e«
a* o o ^
*J *H
o ^ n
• *« CQ W
o
»a X
X *c
X (X z:
oc o: 2: U
oJw
OC &U O W M
DC
O
*4
O
u <c :« n z> O oc w
'jii

U] lU
to tH.
U. Z3
»-*
Ml
U]
1-^ f& oc
:0 uj
>4 U.

u3 b2

I-*

H»

^, Ou

jtJ

O
O VL X o a

X 3£ OL

X Ul UJ
o ns to 5:
X
X
3E.

X
to

-»

3t
to

M CJ
.a w3
OXM
o ^
<t O

•

trJ

f-«

fau

"=»•

*-3 Ul'

» lO X
O
X < O X- 3
X 2 U X
• o
M X
Xo
jj
l; X X
w to X
^ M
< to
lO
UM X
XXo
M M
to
^
X -3 o w o
:d
X lO
Q U3 O M O
X Ml to UJ
I

i»-

2r.

f-»

t-«

f-«

1-^
:rt

bJi CV.

;3C

t-«

t-*

i-i

1-4

«i

f-»
faj

!:>

X »4 CU
O '3 s: CO
X OM
CU X
- >*
2 M -*
CU
O O <0 3X ^
•:3

Is.

^-t

U.1

lo to J3

*a;

to 40

M
CO U3 Ul
M r>
*«
XXM
M CD
^ O X M Ui
X
X
o Ul
H«
>
o •J O^ U
<C
X X Ui o
X X Ul X X
Xoo
UI o ui
s ^
OX
Z bl X X Ct
X Gu Ut U}
^ >« ^ to n
o
CO f- o
w ja ud 3
Ul ID X O X
X X
Q.
<
u3 a < X u.
U
> X \J X
O X O J O »J
Jf
X »4
U U3 a o
^- <t
sx*-*
X
Xw M
M U.
«c
•*
M
to
X.
X
U3
X HU
X
X »3
U.
13
Ul < M X M
UJ o
M>X
M O CO w • X
X
to
0D Uf X
M
O -J X
-3
Ui
XXXM^
X X »H4 < U2 X
X
Ui
•<«

f-«

f-» »-l

1/1

Uki

(/)

sr.

•

»
O ^
^
I-*

O
O
^

£X

X <c «

t—

a to

*~«

«t

pc:«iw£tc>wwao

w J a* w ui o

cktuio;

W PC
«t
W
on *t
O
o
ec 3: PC H
o
»a
O o uj a; ui
U :30f-*ii30:£:iZ:

>-«

O H» o
»3
U
03 3

»-t

Cxl

o
o

t-»

w
< C3

l-»

X at «i < •
u
< 3 Q U3
f-t

CK It.
UJ

»~i

It*

»-i

oXo
O oQC
PC kl O lO u
a:
3

= <h

<0 fai

l-»

•<<

;2;

*X »-* fct to

X '«
X w
^ u :r~<

3 at :3

t-«

o <«

-a:

O < bj PL
UJ
X
a: «5
O

i~t

to 2:

<
X

o CO
»-«

UJ
lO

oHO
I«3

<o -a

CL
to >«

uw
a u QC QC o
<;
o (X o
o
o
at
o PC LU OC
2; ac X 3
U U3 < *t u IQ

1-4

f-*

ai.

t-»

t-*

PC
.£

GO
DC

DC ^.

o —J
a

t-«

o
M

o
:2

:e:

o
o

o to
o to
OC <

f-«

O
fr-*

*r»

1-4

sc:

i~»

1-4

o
«-«

1-4

O
O o a
ac

3 *
- tt 3

u
X

El
Id

I-*
E-*

«o «o 1-,

a. {X,

3 t>

•3

^ »o

U3 «« l-»
-« to e» «r4
to
Id

H o t
lO Hi
X <c to
M c O (M UJ

s:
-«

f-t

^ CO OC X
to

UJ :>•

w
It

s: ou

(r<

•J

i-i

— bu O

*-f I*.

3 PC

b-*

E-<

f-«

•
rx a. t? to «_> 3;
to
2: ui
~« PC

«<<

PC
a.

X X

to U2
^. U3
*-t PC
H
in
»J IQ CL

OC «:

U] £ X
o •«
U
bJ
>• X to
O OC
to z o a:
-4 o
OC
o CO OC PC
0. o
1 < PC
W OC C! PC s; o
X
-3 O
O cu

OC
t5

fci

M H»
o
3 ^
a <:
a.

o to
»-»

I-*

ijn

t/3

>-«

> a ui
o a; X
o u H *^

t/J

^ < 3r < O

o
M

i« O X QC
S:
3
(W
O O w
•J
<W I- O
O
^ ^X 3o

v*a

»-l

-4 z:.

C I-*

o
o OL

U
< cc ^
•

M >H

i»:

z:
'/J
t-l

H»

^ O
hj
X
S

<t to
ua u. PC
C(

m
X
X

oo
r-i

"Z>-»

•
oa
•
3:: KO

l«

i-*
t-i

b} CD
a,

</>

<t
cc

o
O

a
0

0
»-«
It*

t
t
1
1
1

1
•
•
1

i
i
1

a
"V
Q 1
<

Q
U
isi

1
B

•at

f-«

»-«

Q r>

iiu

S
1

1
1
1

i
1

< B
o S
-a:

o 1

B
B
B

•-«

•

iz:

1
CSC

O t
^

£al

QC
r>

to
»in

21 a«
•< s:

u <x 0
ui
0
to U
,a ^
u ao
< a.
U Qu
< Q
CQ 2£
w <£

<<
0
0 .a
w PC

i-i

a: CO

0G
{£ £C
CU *«

K 0
<c

X a.

«-«

:«

•
in

r—

0U
X
0
oc 0
fHI

'*»

t-*

<
0X

o: b.

#-4

Sal

i»i

fk PC
1-4 O*

fr*
»-<

a
o
oc o

lr«

t-*

£X (A s:

Z bl
00
M b.

I-'

X 2: G
Ul O
X
Z U3 H
n >« W

PC
HI

fc-*

Ifl

b3
CO

w to
Xw

>*
CD
2:

OC Ui

lO •
UI >• 4>
«o •
E-t
in

2: ua o
o
X Q <C
»~f

25;

^w
0
z; 0
X

^
Q ^

0 10
s-i

a..

z
H

0
wi 0
X

D
X U3
b. 1^

b3
ud en
U3 OD

0
bJ

3r.

< X

Xuw
X to
00
0 <N W
X 0 H»
a.
X
10 3
U3 to to
X b3
HX
Q to
b4 G «C
-4
«f>

f-«

t-»

UX
CO

fc-l

«t

0
01-0

b.
»-l

£s}

(6 »^
ui

U 0•

>X
bl

f-<

1x5

•

i-» «a:

la
bi

2; bi

^ O
O
X al •
X
2r
m
o
WOO
>H
10
> pi
W O
PC
U
O >* 5«

o
o
U
X

»"*

X to

X
X bl 3
0x0
Hi X
HX
OL KJ
A

a Ck

o
a;

>»

U3
OQ

•3 (A

tfl

PC iOC L»
U3
iH

U}
to
13

Ul
IQ

M
O: PC
O Q Ct
<J •
X >:
H
w ac at
o
3£ O
WO
U3 »^ Ul
WO «

fc.

t-«

B
«
B

j«i

>* i«i

1/3

o B

t-«

lr«

H lU

1
t

lit

>^ t-«

>U3

h3 l-» 'S'

X 'X
St

>•

»-*

U U] UI
o.
>>
x4
Ml

ID ^
oo
X
>•

to f-«

a-.

00
Ml

X =>

ow
Hi

w
X 2£ X

t-»

>•

f-« <-*

=
ov e-t hi

.a
d3

«o
2^ :^

OD
2r a*

bl SE:
»H

f-*

<< ,a

w e?
Ol
*-<

Ci ct
UJ

ao
U IS
a; o
UUU
at
CU

^ a.

n o
O cc
o ^ u:
'Z.

<
b3

a.
:d

u
U

*~*

a;
«i

t-«

t
1

c^^

f-*

fe-*

> U3
a u
o

»-4

.c5

DC
at

•

i
i

•

lr«

I-*

1
1
»

IX.

-a;

o
o

t
•

1-4

•

O
<
a

Ul ua

o ui
PC

•

-*
w

.«

£0
*C

f-»

-J

{-<

>-»

M
to
a

>•

U
X

M
X

In}

f-*

o
<
o
^

o
o
a:

£-«

<
X

»-<

u
U

l~«

ua
PC

o
1^
Ml

f>3

«c

E-i

XQ
<
£

o
»-»

to
to
U}

tr*

>• s

lO
to
(O

as:

&
o

o
o
o

UI
U2
CQ
-<

X
\J
EMi
3:
10

O
o

fc-t

OX
U, f-*

> 1
t
X »

0
e-«

»a
Is2

X
f-«

X
0

W
0

U
5t

a
X

X Ou
u
M 3C
3C

f-l

15 10
Ul CQ
«t
F-» *a

Ml
to

Xw
0

0
IM

•ac

(-*

X
^ a.
0
M=

»3

ir«

c
<x
0

•

£r

XU
to X
> «t

0M
10 10
10

>
Ml
X
a •
i
i

f-«

0 i
u »

•

<a
0 (O
-J M

a M

•

>
M
X

«-»

•
1

lO
lO

XQ
M
X
QX
iO 0

tHi

•a.

•d.

•

1
i

to u>

0
X

<o
LO

t-«

c0
MX
X

e«
to
10

It*

»-*

CM
in

J »

«*

(£i

u
^

X
LO a

«C
u«

0
X

o
o
Q
=

fiu
1-4

to
CO

tr*

•z>

>•

h.
IH
oc

X 2:
<

•a

f-»

^
U

b.'

£0

f-«

1-4

r:>

1
•
1

H»

fa-

-J

ui 10
10
to
10 to

t-i

< U.
3O
•-a

>-«

h3 PC
fc-

0 in
M
SO Q
M

:o
X.

•
•1

0
M
M
;o
0

r-«

u»
M

.3.

•4:

lO
>u
»^
;^
cc
-*
.4

X
sr

:^
uo

o
u

o X Q.

•

Cl'

a.
<t

<
o

>•

-J

;*i

•z.

o
Mi

^
O »

O
X •

1-1

o
o

H
X
U
3t
0
X

u
<

»4

X to
H>
M
X

w
<•
X
M

l-l

^M
a
s: Q

to
to

^
<

M
X
b)
>

C
X a]
a
X

E-i

W CD <W
a.

t-t

«/>

o
M

««<

Q
o

U
sr

U)
H<
U2

«J

«>

»-f

1/3

:xi

a.
s:

t-«

u
>

»-»
a::

o
o

•

o
o
o
o
o

I-t

o
1-

w
X

ir»

Ui
f-*

frt

»-i

U)
(X

X
i-t

ix)

O
XW

ir*

f-»

t-«

§-«

</»

F-'

oc
PC
ta2

w
X

o.
t-»

•

10
l-l

»4

f-*

J-i

a
CO

X
o

O
3
—
r

{X.

^ c

wo
X

U}
to l-«

o
X
z:
i« o
X
X •a
ua
o s:
oc o

>
X
o

1-1

o w
^ CU U3
> wa •
CO o <
CO A U 2
** -<
o
a.
J
Q
X as
o

^ M
<O
XX

<
X
O U)
O 10
X
X 2:
o
UI
X ^
IN U
f-*

J!
UI CU
>•
*t
t>

»-»

X
CO

OX
X s:
<
to X
oo
X
to X
»-«

I*.

f-»

XU2 u
oa
X
«2
»J
X QW
X2 X
O O

<
X

0
at

3c;

l-«

o
!-•

>
>-*
.

o
CO

z
0
H4 M

IJi

0
0
^ ac
*<
X
00
-3 X
0X

Ir*

»-<

t-*

1
6
1
ft
ft

X
0
»

B
ft

l-«

-40

Lb.

X
O O
Ul
X
XO X
X uo
SE 2 HI
X bJ
ua
o
X O CO
(O O U2
Xr
^ U CO
< oX
Xo o
WUX
>« a. 2i X
K >* O W
< O=

1
%
B

CO
«i

fc-«

•

»-t

Cx3

ft
ft

.-a

f-«

CO •
I
t-»

ft
ft

•J

ft
ft

<X
X
0
u, 0
It.

ft
ft

•
15

X
«*

UI ImJ

ae:

t-t

1-4

^ (-

X
M<

t-«

i~l

»H
Hi

»JI

w
o
o
<

tsii

E-t

O
Q

U3 UI

fki

[H {a3
:3 H»

X
o

f- 1/5
IS

E-«
rtC fa]

Ok*

X
o

i-t

a.
&.

O
X

a^o
<

»JI

{-«

»a u.

•

o r>
Q

»-»

2!:

o
o

ba
CO

«0
to

«0

l-»

Ill

<
X

us to

<«

X
0 •
1

•a

3>
C»
Ul X
\n Q
0
U3 0
X
X

X
bi

ur>

i-»

it:

tC
bS r»*
•
in

0z
>w 0
CO
X30
id
0 CO
0

CO
Ul as

« CO

0u
0
J0

»-»

(ri

»~l

:m:

(O H bl
to X
0 bl 3

J bl 0
CD 0
X
0a
< 00
as
w M
X
bJ
b3 > 2
M n>
< X0
s: Q s:
•«t

>-»

f-t

(-1

13 bl

i3Q

0a
bl
-3

U CO
w
>
X
X Ci
CO
-*

HC to

» M
CO

0
^

fl
b3 .J
to «t

•

UI
OC
ul
CQ
s:

H«

u
X
0
f-4

10 f-»

10
UQ

>
OL

<
0

0
0
0
r>i

0
0
0

0
0

X
H

to
to

X
Ui
M

i~«

m
0

•

X
:*l

>*
u.

X
h*

*-«

oc
UI

f-i

:«

u« »-»
2r

ax
1-4

lr«

10 UI

»X
a
u; ui 0
to w 0

*-»

bi
«i

H»
Ui
«5

.IK

X
«0 60

>-»

w to«
X

m '*

<-* CM

M B

m
11

W V*

«r«

•

vHI

XXX

:-c :« :«
<o 10 10

«0

f-*

•a

H« X
X c»
X<
0
-J u.
00
0
X 31
to 0

*« Ui

«H>

frt

€-«

<
X

X0
<
X^

»-l

to JO «5

w>t

a^
Z

fr*

0<
X
X 0 ui
«->«

»-}

»-l <-*

X
•
M
00
0 X :a
-«

ir*

t-» tH> t-*

;^
10 (o 10

:e:

^ >*

00
0
< !0

f-»

1-4

10
UI

-a

ae.

K^
<L

to
:<

0
0

:s:

X
a

Hi f-*
•a u>
to

i-*

X 3:
0 to

*<£

aa
<C M
XW
H» U2
XH

ex.

*-«

CO 0>

^<
X to
0
Q

<
4

•

X^
0X
0
X0
X0

0
X

2-.

1-1

X
X
0
to

X
0

0 UJ
0 *a
XX
x:
0
wu
X

H* to
(O

U
>•

«(<

X s:
0X
0

Irt

>
X
0
U)
at>

X
36

to
UJ
to

0
0X
U3 X
X
U<
to 0
00
to Uj

jr.

«o
t-«

U) UI

•a

U!
to

S-*

•

UJ Ui
-a >-

<
X

0 3:
X0 0
cQ -i
0
0 < <c
to W 2 2;
to
U3
-< 0
s:
X M •3
fx Z U
UJ SE 0 0
X U] w 0
w to
0
z.
<c »3 2: X
X<0
Hi X 0
XHXW
to 0
X UJ X
(- H* X
0 US
0
u.
to 0 z; Ml
»-«

i-i I-*

>
M0
Xz
Q
a to
J ui a
<M
H»
X UI X
C
H*
H< X
Ut X
^
IH

to
Ji

U
to

s-t

t-«

<
X
z
3t

to »~i t^
UI fr> UI
Ht .-3 Hi

{-»

UJI

a z 0 UI
ja UI u] to
X X£
X b3 U}
H» X Ci to
wX
X u0
0 a 2. X
2^ 0 X
to < t^ Ui
«
H*
^ Ui
*< 3 X to
X 0 «o
U]
UI
>« X a 0
2 >* 0
*t Hi 3C ^
fc-«

«-«

<«:

x:
to

»
i

»~*

<
0

<
UI X
Hi 0
JX
0a
lO
CQ U)

^X
H»
X

0 u.
u. 0

1
s

0
H<
H

£L

U.
u.

0
X

>
X

1-1

0
r

D
<
0

0
X

0
to

C 6

X 1

e>
us 10

»
B

UI
H»

B
i

X e
U3
HI
H*

%
%
%
1

X t1

1
i<r.

0
Ui
X
u

1
t
1
1
B

U£

»~t

5£.

IHP

s
X33

X 0 UI
HXX

H0
2£
U«
O 0 UI
X0
21:

;t3

t-i

H
0
H

H 5*
to 0
UI
HH
0 Ui
M lO

H
X
X

to
U2

>
X
a

•

0
OQ

*-*

•
to

to to

X
Q UI X
X H
XH
*c
0
»a 0 z
3

o
u
tn

^ s: X
0 X
X X
HOW
H
2i
0 U)
uaX
t-*

«<
r3

f-«

X
H

1-4

t-*

<I>

to bJ

5Z:

fr-t

0
X
X

•

>X
X0

0 UI
-t 0
X
>•
0

0 UI
u>
^ H*
Ui X
<
^X
a)
XX
0H
H0

»-*

UJ ;^
at

to «J

as:

H at
U3
to 0

H
X

0
X
<
H

<
X
H

>*
U.

•

*^ to
UI

H
X
H( UJ
^Q
z:
UJ 3
X
H oJ
>
H»
-t X
X Q
H
H
in

>• -z.

UI
•>

U>
M
X
XX
U2 S
>0

1-4

a.
•

0
M

Q
<

U3
St

o
o

Ir*

U3
l-«

u
3
a
m
<

u
Ul
H
0
oc

to
o
O »n

|ju

»4
uj

.-3

t/i

X**«
X
— fn• *«
to

10
IX Ul

0
0
0
0
0
E-i

>
X

C?
U}

tr*

oc
IH«

t-*

LU
CC
ac

&
s:
0
L>

;2:

0
X=

0
OC
•3:

.-^

tr
3:

-J

O
m

«,

fx;

t-»

tr*

<
«
w
to
u

b3
<o

Oa.

:«

0 e
0
Ul 10
X a.

•Hi

o;
a«

f-»

«o

H« ID
CO

0H
U<
Z U2

<
»-4

t-<

00
^
Uw

(T
Q* In

to
to

5S »-»

0
^

-a:

•

X0
2^ »-*

0 to
J
atC

Ir*

UJ PC

X «£
13:

U3 ai

m
H

Ul r

m ^« < X
«o X ^
a. sE-sj",0
0* « ^ u. a.

X <
2
to n
X<

00
X«
X

>Xw
QX
w0
0
X^
X<
X
0
U3 w
m 3^
0
X Ul
a. u
m

U3 in
to
>^ U3

UJ Ou

oo
O CD

to Ul

m CL
3O
ou
to

f-«

Ul
a.
>«
In Z:

X—
O hi
X
Xo
t-*

ffi

»n
to >n
40 in

O<
Xm
2: in
X U} to
X ua
o
&u O M

»n f-*

1
0
X
I-'

c e

u i1

z B
<« f
X
0
X

i»

Ul 3::
t-« Hi

In
U3
*n

Xe
X
0 Ul
u^ ax
X

0
XX
t~*

1
t

a B
B
X B
Ui
H(

X
1*3

B
1

•»

Ul ci
«t *n kn

t/>

0
0

B
«
B
B
i

u B
X B

u i

CO »n
Ul IH Ul
fn
In
:d
:s

•

u
0

X
a X
XX
En 0 U3
as
0 W *n
0 *a X
0=
lr»

.-^

Ul 2;
>• »n
to to
»n

w
X

a Ul X
X
X fn
^0
:3 Z in

t-*

^2:

txl

3
X

Ul >a

X a U3
MXX

f-t

to
Ul »n
f-i Hi

U
0 UI
H to
UJ M
>X
*n r>
XQ
0 Ul
•« 0
X
>, a.

x
X tn

0 uj
X 0 ai

2 u-

to
Ui

>
n
X
0
^

0
<
0

•-3

X
to

J »n
Ul X

0
X
u
-<

0 UI
>
Ul

X
Ul

H
X

X X0 tn
m0

>*
U.

««;

.-3

H
Ul sr.

^ iO
Ul
fn H
X
15 X
»n Ui
^ Ci
Ul ZD

m Ul

>
Ht mi
X
«j,

XQ
H
H

X
X
H
m

>
X
a

m
z:.

X
X
H

X
X
ZD

u
U]

»n

0
X

w*
Ul

t->

'Ji

U^
JH
to
tn

X
H
H

0
0
0

U2
fn
to

U. Ul
»n

Ul
>-

0
0
0
H
X
CM

Ul
.a
u^

X
XX
w :d
>

t-t

•

X
X

lO
to

H»

H»
UJ SL

m
0

Ul
2:;

to
»n

X
<c

to
Ul

Ci
«t

0
X

-4 to S2.

to
UJ

>
tn
X
Q

H«
»n
US

X ul X
m
>c
»n tn

as:

< 0

«c

U.
*n

»-•

0 to
u «o
Ul
wu
X0

zr.

X
0

>
O
Ul UJ
to X

X
0

a
n

»-a

X
0H

t-*<
in
t-«

1-4

J-^

(0 ui

<£:

to to

0s
We
ul Q

o
»n

»~i

- ^

:i»

£
>
X sr
a

to
;0
Ul

fcn

X
<

to Ul
Ul

w0
Xu

««

k3
e«
«)
i-i

,q
•J

-at

l-t

U3 fn
OQ 2:

to
to
U3

tC-at^
—
X oc
cc

t-«

Ul
to
Ul

~3
Ul~3

o
£M
O
o

DC
Ul

to
Ul
bJ
OC
a.

-«

<
X

0
CX

»-l

fC
Iti

>
0

X
X
o
(n

fr*

<
o

«x

0
0
m
X

X
Ht

f-,

U.1

Ul
iO

W
O
oc

l~»

t-*

•a

«t

•

XM
O
•a
O -^
QC to

a
J
u
<

W3
U)

u
:^ U
>
0
oc oc
a. a

Ui to
iX a.

X
1-

ex.

l-»

s a:

-1

0
0<
Z U)

t-» fc-*

u0
0
0
<t ^

0
0u
Id <o
a
>t a
H" 2;

0
oc
X0
w^
C*l

»-s

0 CO
z

OL «£

a0
cc •*

kJI

>- «
U. ^-

wi :»; K.
CI
u.
uj
tk.

tt.

to H>

^ >

-3 •a.
-1:

«x

ri.

V?
tj

K,
u. O.

jr.

h-»

0
u
X

•

>* •
Ml
<t

i
t
1

1
i
t
1

X>
0
aX

H :^
0
X

U 3C

0
X
t-«

0
fo.

t-» It*
»-<

X 2^
X

to
2:

1
t

K
1
1
i
i

*-* t-*

u. rs Hi

ui va
X,
t-* fO

•a

CL^

t-<

0
CM
0

U.4

t-»

Sii

Kt,

6^
to

Id to

•

X • >«
2 0 oc
as
0 0 Ul D

1
1
t

X
X

0 to 0 w3
3 W E3
Eh 0 OC 0
X
^ -x to
Ul
<t 10 tJ
X
n>
a*:

-r,

to
UI

»-«

»o
ut

««:

Ui «c Uj «o
Z>
b. 1-

•J
Ul a.

^
CD
|-«

bi
tO

o
<
•

Xo
,j »a

o Ul
U O U.
i~»

-at

X W

UJ
U. Ui Ui Ul

H«

!/5

i-»

-J.

ijkl

Ml X
O
X CD X U
10 U2 » H a
a<
Ul
4D
Q to CD X
UJ

i^;

•

l-«

•-«

f-4

oJl

o Ml UJ

X ul

X
to 0
td
X0
a u2
0 10
0

fa-

t-«

^ z> a

O i£
Ck <

l-t

o o >* 5: U3
X
X
O U3 *0 *C
to
X to
X
2:
to u
^ UJ
a ca • uCO
O U2 Ul O «^
Ut X a 2 UJ
o:
£ UI M
H« X
UJ
X, o
UJ 2;
X X o «*
O UJ
HO
Ul o u <
to Q X
Xa
UI
UJ Q
X •« — * O -J
MO
o
O
;^
Ui Ul
—
<
2:,

U.1

'aJ

0
X
to

t-« 1*1
»-* tt,

ijD

jr.

«a;

00
UJ

tJ>

^ Ml

2:
»-«

«Jt^

X to H» 0

t~*

0 -3 to
0 ^ X.

MO Ul Ui
to

UJ
H"

M UJ X X •
r^ XIr- a*
UI M
3:
0 rr- <
H»
ul
3t
,J 0
XX
<
0 0
s: u0 000
0
0 0 u) 0
< Ck 0 0 ^
0 UJ
Ul U <
X X 0 U. 5?
*4 0 U. UJ
X
3 ^
0 0 >^ 0 a.
^
^M
to
X 0
X 0 :3 H u
0
H
bJ
Ht
UI M <
to U3 > to <:
-4
w a. w
0 Mi X <
X <
U2
^ tat X
St a: UJ
X 0 0n
to
0 UJ M 20 Ui
m
X
M
0 a. • Uj
to
X UJ
Ui
X o- UJ to 0*
x:
Ul X
K*
0
H« M
0
0
or
UJ
«0 CL 0 X -<

M
ui <
X U.
MX

»_j

to rD
UJ to

a
X

0
u:

X UI

-il

JH
C>
CL

r>
a.

>4 OD

Xu
f~»

«o

tj>

lr«

2:;

M
X
<
to

:t.:

rt.

-«c

12,

a
u

&-t

f-«

t-J

t--

<£.

W
X

-a:

ito

^-^

UJ LJ
lO H*

fr*

O
X

*z:

f-4

-3.

0 UJ
X to
X w
UJ
t^
H 0 to
jj
^- C
CO <C
0 OL
UJ ^ UJ
^ UJ to

E-f

f-1

faj

-fr

f-r

UJ
to

»-*

»-<

l-t

Ir*

-a^

UJ
D«
.< UJ
*3C

1"^

—

€-»

f-t

-2.

•

ir»

F-*

t-i

»-*

H
W

X
O

6-»

(21

z 10 X

1
1

X
X

F-«

*->

U.!

to
to

t*l

;::>

IX u)

-a:

0
XX
f«0 K to
0 X u. UI
W0
00
X H
U3
X0
eu «« X
0 a.
«*
M X
X <c 0 0
a 2:
to Q
0

»-*

0 1
lr»

0
u
c ^

:=>

OA
to

<o UjI
Ul

a
1"*

to UJ

cc
IX

0 a.

ua a«

«X

to va
u!

*-<

•

0 -c
>
U

•
ca
-« ,j

>-i

0 »

a:
a*

Ul
2>

f-*

»-»

I-*

2 U

« b3

1-*

I-*

»-»

HI h.

•
10
:o
bJ

U3
Ui

Ok*

J-*

0
0X

F-»

Ul
-* :>
O.
Z> f-»
C£ »-«

to
to
Ui
et

f-»

:?t

i-<

»-J

iai itt

(-4

»-i

«rt
fNi

tr%
f>«

to
to

CO
>-

a.
a.

a.
10

1-4

IS
US O
U t4
X =>
a. u
X
O
o
ou
•>

to b3
U
to CO

lO
•«

0
u.

3Q
to
Cu 2:

00
o

«-»

U] CO

in3

UI
<o

Pd fr*

M
X IQ

Q
X

fr*

10
aX
H"

o::

F-«

•

0
Ui

U* t5
tu

Ck*

UI
lO
<*

H
0u

W X

»-i

t-l

fx]

i wa

< <o

X CL
Ht

Q
u
UH
u
u
to Ul

< UI
10

D CO
to
UI

0X
0

<
<

UI
to

to CO
•oc

f-i

U.
bu U)

Q0X
aa
<
CO
f-»

0X
i-l

(r*

UI Ul

X
ua
0 *t
X

b]
in

0
0
X
e<
f-t

U
bl

0
o

PL Ul
£Q

.a
.a

0
0
b2

trt

0
S w
fa ^
u
0

0 t
0
0

t-t

Sr*

Ul in s:

X zr
-4

fr*

0 Ul
X
^
Ul Ul
CO ID

bl ac

m CJ
X bl

0
< bl

»-a »-»

> t
bl

£
•<

•
B

t
•

X B
t
o
X

CO
to
UI

X •
HX
to <
^
Ul
X 10
CO
X Ul
0X
GU
Ul

to 2:

a
<

Ul
CO bl

Xw
0>
s: u
Q
X

bl bl

I-l

e-»

X
X
to

XX
X to
U bl
3& bl
to

ir»

i-t

•
t

t-«

CL CJ>

bj:

'X Ul

X B

u •

X Ul

Ul Ul
L> £C

>-*

-*
fn

Ul 2^
U2

CO
bl

0
Ul

bl
bl
10

0
bl

^
2 B

KJ
tn

bl B
s: B

>
bl
a

»-3
»-»

:«

e-«

X. Ck
*t 25

B
B

B
S
B
B

o-#

CO •
bl in

LO
Ul

U B
H»
M B

m
X
Xa

H-l

B
B

:m:

bl i
bl •
10 B

O
to

t-»

X
O •
OX
O X bl

o
o
o

o
F-t

t-t

M
Xo

M Ul

F-t t-»

U]
t-t

CO Ul

ox o

o
X

in u.

««:

o
o w
,J X Ul
to
«
oz
b. M Ul
X
hi O O
XMa
< *t
t-»

i-«

u.
a;:

t~t

e»

X^
OU
><
>n
a
X Ul
O bl O
Ul ^
bl CO bl
X
mX
t-i

IE
2r 'it
Z5 e> lO

CO to
s: CO 2i
:i> Ul »n
2:

(~»

to
L>
bi Ul f-^
t~*

to
<;

Q to
•
<
X X

2: ^*

10
bl

*-t

O
X B

X
X

bl
t4

CO
bl

O s:

.Ji

In lO

CQ t-4
3C

o
X

X
Uo

>* *-•

.J bl
bl bl
»H to
u.
•a
-1

J£

r> in
•
bl ur>

0
OX
X -«
bl

»4 bl

^
X B
B
X B
a B

•

< .J
X<
UX

i
ft

O BB

•<
St,

fr*

•
CD

15
Ml

bl
ea

bl <:

:=>

> >•
X^
O
Q

ar.

fc-*

X ft
0
0

0 c>
0
0

to
Ml

00
0
Ul
u
X
bl >
Ul
CO 0
Mi

O Ul

fr*

X
bl
a 25
2i

to
bl

0
0
0

X
M

VJ»

H
Ul
X0

b. bl
Hi (O

;xi

-3

h*
2: CO
Ul

•
1
1

1
1

U«

CO t-t
Ul H«

0
00
u0
bl 0
X
m
>• a

H
w
0
2 X

0
a^

«<

•oc

x/i

1
1

f-«

•J >a

»:!

U)
>«

CO
Ul

f-» laJ

*-»

to Ul
<: s<;
3:

«t to
oc

UX
>
bl ^
0X

0
<c
0

bl bl

bl
CO

f-l

at::

l-«

Qa
^ ca
X

*
*~4

St
r> UI
U.

s«:

l-»

wX0
X b2

X
0

«C

M U3

a: us

U
h- ^

aH
Ui
!0 CO

0 UI

»]

»-»

*«

uu
X to

0
^a
< (K

f-«

to
q:

X
H

10 <o

i-i

UI
UI 10 l-»

CL
a.

Ssl

O CD

*~i

F-* tJi

»-i

u:
OL

>•

I-*

X
0
0

m:
CO

t-«

0
0

2:
U}

UI
(D

to
<o
bS

b5
CO
bl

t-t

3i bu
lO
Si

U)
CO

Ul >n Z
to

M
bl
to

I-*

t-«

fr-t

Q
<

•

a at
•a
>•

Irt

•
i/>

t3
t-l

ui
a.

XO
oo
<

la.

X
a
a
z>
o
X
«o
o:

-X CO

w o.

it u.

X
a

a;
ba

X
«M
Ma
CO <

ic:

1-*

to M
X Qw

COS-*

H« Ul Ml
to cc
*^
»-» Ul

•

'55

<r e-« *<

3 b. OC

f-*

O &J

to
DC
a.

as.

fr-f

w
U
40

f-«

•-*

to
to
bl

bl
to

<
Ma
< fo a.

to
to

I-t

l-(

o
o

IX.

5-^

tJ>

o to
f-*

X
bJ
OO

<r i-t

l-»

U bl
a;
u

*~«

bl *^

> IH

O to

o
Xw
Ul

to
Ul Ul
cc
t-

Q
O
a<

{-t

o to
X
%

b2
W
to to

fr*

Cx
Cx

O
O
4 b}

"t,

CL
(O
to

bi
50 to
to
to b3
to OC

fc-*

ua
a o
a. <

o
<
X

:«l

<-»

•

-'S

z •

X X b3
m

1
1
1

«<

t-*

1
t
i

1
K

X
X
X 1

bl
bl

b. 1

to Ci

^
X to
OQ

h«

M
o to
a* X

i-«

I-*

*a£

to
to

>
o
XX

M Hi
CO

bl bl

^X
t-t

to
t-f

-a

f-*

»-t

CD ;^,

::>

i"*.

•
t-»

to to
Ul

l-«

a
<
bl
bl o
to 2S
o
ou
M bl
*-*

»-«

f-»

o
o
^ bl

»-*

l-H

0
X

2^:

to
CQ

o to

f-»

b]
t

«•

(-4

>£:

< -K
HO

Q to
^ X bl
O .J X
OXQ
b3 X. O
to W <
bl

< 2S

bl "Z.
UJ
to

t-»

H» to
Ml

b.
H<

t-*

to
to b}

2:
1-4

»-i

< lO
bl
OX

a: 2:

i/1

^<
to o
O bl
O to

bi ia:^

It*

1
5

CO B

X
a
X
X •
8

Is.

-ac

l~«

«t:

to
Ix)

flQ

HI
bS
60

>•
-z:.

t-*

2:.

wu
hi X
lO
X
nu
^
»
o s
X to

•

•«£

X
to

CQ to

tt.

t-« :2.

X
OW
O
bi
> X
-4
X U)
owo

o X
Xo
»
to •
Q « r-•
bJ
>~
tn
to X J
•
to
a. 0
0 X t- ^ ^
0 r3
u<t
lO UJ 0 0 U,
X X
KJ &
X K» bl
M Ul 0 to 0
(M
35
0
= 0
Kl
t- X to X
X to < Q ^
0
to
^a
bJ
to
=3 W
3 X Ul U ^
^ «£ b) X bl
to
X M3 X
0 X » b. X
ju
0
n X J0
to X 0
<
X 3 0 X 13
H X ,0
X 0 • »< 0
Ml
:i}

u
««

u •
w
:« a~
M U3

St-

!X.

bl
IX
Ul to Z:
CD (O U]
UI f-«
OC

CjJ

fc-«

o
o
o
o
o

-1
iO >*

QMO
CO o

X
«J

a.
as:

:e:

.-I
«ac

l~4

f-»

oo •
M
o tt
o
w o
M ^
X M

t-i

I-*

£0

X
<
r*
^

bu
bJ
to
:3

•
1

•

H4 ei

it.

3a
X bl
Ul

iz:

f-*

* r> U3 f-« t.5 2:

^ Ul X
XX
^
>
0 X to
s
w to X <
X
bj
Ml X
^ M«
> 0 1Cs <^
0 ;Z b. 0 -2
H
bi «c
z. X
X MOO 3
0-0
00
• X X
Ul M«
a X ,j to
X
M iu X :u H* uj
W Ml 0 Ul 5L
2: X ad u c Ul M»
fH U to 0
to i -2.
<< bl
bl
t-l bl

*=C

ue.

«:r

1-^ »JI

b.t

bi:

Csl

s<r

f-* f-« lr«

•z.

0
XX
X
ul
•C

cx Ul

5= X
n> a
0 bU« Ul
X
to
Xa
0 Ul

X
X

tj>

Ut bl

.a
»4

X
0

o
O («
CO

<C5C

t-«

0 1^
0 <<
0 Ua W
ir^

sz:

&4 :=>
ix qc

CM
in

t-«

c n 0 a.
ix
00
a
bu
a3

c*i

U-

0
M
PL *X \^
U3 U3 0 U3 M
OC
0; to
a
*x
0 a^
l-«

2?:

vJJ

10
t/3

i-*

1-^

^
*x

*!•

<ct

^00
i*J

0<X

0 *c
K
00
w a:

Z> O.
2; UJ

s»
:xj

a X

-f.

»~»

fc-t

t-»

it;

f-«

0 «i
0 ^ £ 10
X r> 0 u
U3 0 2 U- U
<0
a. r 0

l-»

tfj ^-4

»-i

Z. Ul «£ U1 bi

<XXXX
tH
a
0
0
U3 iO
x; UJ ^ ^

je:

oc.

-t

f-«

»-i

:< i-» »-»*»..<

(i2

t-»

0 a {x
M 0 0 ua

JZ.

»-*

*-*

QC
bJ

se;

t-i

u ua
0X
J

Ul Mr

< HQX
M
W f<0 X
0 0 3c n *
0
0 (O to ua
>
a.
us
a;
0 < *U9 0
* < 0 X
2 m0
*
4*

»-»

l/J

c*^

{jj

»-» f-i

E-i

t-t

jr»

ua CM

0
«« «*
w
X

I-*

-J

X in ;£ -s »o

W5 Ul
CO
Ou

Ul
»a

m {u <
X

:«

ixJ
tfT.

* t-«
10 to

3-.;

u
< U3

to «o

CM U4
«i 10 f-t

Q U.
vc
3: < < a
X 0
a -*
U.
u. 0
bu OL
X

U £X

f-i

«t

«-*

t-t

(O
a. (»} ii3 ta
oc OC

X 0
c a,
*-<

Ui
s:
a<c CD
to
cQ
bi
UI
da

"^r

UU
u :e
«t
0
X a oc
X0
X
X Ul 0
• <. U. X
04
U)
u a
tO 4 tj :n
3 0 a ua X
iH
0 21 X
< 2: << M
0Q ^ •
00
0 *t 0
X b2 w Ul ^
UJ
a- OC
00
0 Ul hi
3
X
X
X
bu u
tf~»

ta.

•/J

e-»

t-* it:

-a,

fc-«

t-«

3S:

Cs.

2:.

-a:

t«3

fc-i

«-!

»-«

<
X to u X 0
X 0
0
Lt,

;

j<i

X to
X 3C

0
<0 0
•oi

«
s

t-«

b3 CD to
U«
bu a.
:3 :i> «£

X
a
O X f X X Hi
to o
U O O 3- o H»
»a <
to 2: (Q n
(Q O
o «c -< X o y>
hi
X2
U3 3:
Ul to
Ul lo
to
to
W O 10 H O O
X X «o
Ul o
X O O O hJ
X X
^ n OX
hi X < O
X Ul X O
^ OQ ul Ul H
w <:
X
to O I
o X
< o ^, X
{O Ch X <t
O OD to hJ U. vo o o a
a X
Q
2; hJ w
hi
X Ul Ul X
X
fH
o w CJ X H
X
oX
X • to
Ul
OO
Ui
o
Ul 2:
I—
O
«c u >
21 ^
to hi hi
hi >«
XX
Ui X X
h3
X X o 5:
X
H« H O Ci
Ul
Ul o
X 21 w u o H m •
X O Ul < o
X D- X CO
<
I

Cm}

1*1

f
I;

s:
Ul w
o hi X
u
X Hi M
Ul
X e« M Ul
X u3 X J as
O H H -I O
< W lA

»-«

£3C

hi
Ul

i£i

sr.

'^(3

-2.

i-<

r-t

W Ui

•

0
^a0
<0
0
ra
U2 0 X
>• X oc u
•
0u
•
00
<W
to H« ^ M
0
2:
0 M •<
OC
2£ X
H r- < 0
z 0

^ a.
X0
t-«

'ji

3:.

0
(X

>H
IX

i-i

{-»

^ 0

ua oi ft u3

X U3
OC M X
0

•
U2
tn <o UJ sz. >c
fM :3 aji

X«

cs* i2: -2: <c
tTt *-i *-t t~*

* X 0 «3

Ir-t

X fH X o
X
o
O to
M

I-*

F-»

t-»

:::>

irf^

-s:

;

t-*

SI.

-a:

-2.

*~l

i-«

'sO

;

* >-*

t-»

(

t-»

li^:

»-4

;

»-«

I-*

X
o
o
Q H to Ul X
«x 10
X X
H Ul
X 03 Ul
to
hi X
H<
U3 ^ O Ul X
X
XoX <
•4
w
OD
H>
o
u. a. 10 Q.

ST US

< X
X fN

I
I

•<<

;
:

':<

O
Ul

to CO
i

Z>
St

X
H

-SC

o w hi
X
X 3:
Xo
C
o to to
X as a: X •
X Q S> O <C
Ul < O X O UJ
X to
h3 h« X
H Ht
oX
X X 10 23
o
< o «« H W
uH
X O X
< < X < to X
O hi O <t ci
Ul H
Q
Z US U h.
X Xwa o
»:)

«ec

f-«

ie;

X
Ul
h.
U-

•

i-H

H 10
O .J

<t:

H u • Wi <U
H*
^
^
10 5C U3 X X o
^ u X a a ^. to
O Ui H X a w a
X X UJ
H Ul X X o
Ui
o <
X lO
2:
X h^ X Ul
UJ X Ul JD X X
US
U, X hi H
X
!0 *J
U. H
*J 10 o
10
c«
3X
^ X
3:
H
X
hi
-3
O O
X X <t Ul
to H
hi < X
X Ul lO X ya X
t~i

TaI

*-»

E-i

Ul X"
<c

HX
U- o
OX
to
2: Ul

OX
H

»-»

-« b.

CJ3 »-l

-a;

a o
u.
O -« ^ X
Xo
X
n X-J «< < J u
w o o «o
< Ul
OQ X
X a t- X
so
^ < H -a
W (O C Q Q
W
X u.
« H M U3 Z H
O X •< u
M 40 -hi
hi
flO
O Ul Ui H O to
X
XXX
z:
o o :d O Ul
X
U) U X X
X CO
X O X Ul O Ui
o hi X U. ^
t-«

(

>£>

to al

to
Ul <t
a.

X
o
o
<

«««

i-«

1.^

o
o

H S£
o
o u.
to
ca Ul
-Kt CD

t*l

X <

(

o
o

o.<

o 3:

«0 PC

u
X a.
Xa
ft
a
X2
u<

bl a:
PC PC

X Q
3 UJ

3
fiu

1
1
6

<
X E
i

o 1
1

<
.a

a.
r>
ac

Q
s
IH

a
Q

•J)

e-«

oe;

f-»

o
u«

o
!>.

<
X «o
a*
ao
ao
o; .a

CL
ls3

w
U
Q

O
Qu

Ota

IHf

l-f

i!^

u:t

•

»a

<
>
•

CCi

a; oc
U3

o«

1
1

•
•

1
»
1

a:.

•

1
t

>
o
u t%

fx.

PC
PC
U3

o t

O
>
o «o
U =>
id
CK O
•

•

•< »
PC t

I-*

a >•

»>«

IH
»J

r«-

ar>

J
X

oc
Ui

»J

^
X

M
a
X

iH
bj

at
bl

> E
O
II

1
u
U3 t

OC
bl

«X
PC
o -

bl
bi a.
lO ct

«i:

X
^

H
3
woe*
^ ui
Ou X
< X PC

ac
OK

iiH

X OC a

PC bl
Ul

bl
a.

X
DC
bl

*-«

O
<
Ul
X
X
o
X
X
bl

l-«

t-i

;»!

X
^ X X bl X
O to bl bl to bl X
X
O bl
a. bl
bl X X < to
^
X a
a o *c u? bl z
lO^<CClb3XtO»-H
X
^
at
<£
X to to U to «1
X
O
lO O O O U O O O

e* 10
lO
to

t-«

i-«

t-»

»Hf 6-»

t-« »-t

a<:

»s(

>-t

X
XOK
X
O X bl
O
X X to X X
O X
X bl Hi o X
X
ba
X O X X bl
X b^ bl X X bl X
O
e« X o bl
X X CL
'ol

X X

X
o
X
X

X
<
bl

b3
ac as »J H>
r>
bl
bi iHi

OC
bJ

X 1- X
«t OC M
X O J b.
bi PC bl O
>XX
O bl bi
O X 3E
:

*-*

ou
ie O
^
•< •«

U2 bl bl

IHl

•

•J

> PC
ooz
o
U PC
PC
jjj

»a

Qt>

.-a

PC
bl

X
OXo
bl "
U
O X Oi
3S

3Z
>o
o as ^
CO
O Pb
>»
bl

ac
u3 ta PC
»-l Ul
CC 3:
b.

>-«

PC
ac to •
=
bi
a*

i-«

a
O b'
z
OC w =>
a« o o
b*

u
OC X o
a
bl
bl
z
^zo
A O •<

>«

X w>
3; b3
X

H»

§-«

< 1

bl
at'

<:
PC

<<
X 2:
aM
PC ^ s:
o «« r>

X a;

u
o

o
r

«t
se:

•< CL
•
UJ
PC lO 2:
ta
• bl
«-*
t«

w
uz

\n isi
PC

o at
b. ^
se PC
Hi O
o
Q OC

bl »:i

«-«

<
s:

o<
.a

t-*

O
CL

i<i

5<:

iiC

lr«

l-«

0 Ul a.
^ X ex
X *« H 0

02:

oc
U3

U]
ac

» ^ X

X 5. »0 Z
X0

«*•

?-t
I-*

1/)

c
Xo

WO2
r-l

<c
bJi

sr.

U2 »-<

U3 K

•
;

tx
U}

t-«

0 <
0:
W U3
DC
a <
«<
U3
^ a.

««t

12:

t-i

:Z3

f-t

»-3
*H(

:e:

^/i

::3

U3 ba

f-*

I-*

0
-Z

*-H

<: a*

CC CL H» *-«

tr,

J CO
aX0
»-« i-»

f-t

•

<t
cc a:
ii»

b2
£X

l-t

U] 10

i-*

u«

0
to

(T)

X
-<

X
M

Ul
a;

to >~*

ar
:3

u.
Ul

0
Ci

ir*

0
u

ft)

0
U

<
u
ac
iS

9Q
to

<
0

a
•<

U
X «c
X UJ X
0X
U.
X
0
X
X
E-«
«*«

US a.
E-»

I-*

or,

tj5

Ul ul

* Ul

l-i

f-i

f-*

0 to
ar 0
Ul ^ o a
z

lr»

fc.

U3 l-S

t-»

frt

*-l

X 0 * to 2. U3 •4
X
0 X
• 0
X
Ul X Ul M
H •X
IH X
Ul ^ X u.
Xw 0 wa
0 X 0 X ya 0
X t Ul
X X H< a Ul
to iC
X X
Q 0 Mo
Ul <C 0
0
X Ul Ul u 10 X
(X
X X<
lr-«

-a.

•«1

t-t

l-t

fr*

U!^

ttl

Ir*

1-4

fc-*

t-^

X= UX
X
L> X
u. 0
0
0 M Ul ^
X L>
to
W

f-4

»-4

t-t

U.1

ii".

O*.

tjy t-t

X U. X' Uj
0 3 — H« r> Ul
M
X
u.
X k* X < Oi
< u 0 r> »J
U.^

Ul 1-3 H* to
to »Hl

'sS

U.'

«!:

* to to
i-«
to «
X

»-<

00
rt;

10
^ X. X X
*< Ul 0
0 to 0 a.
^w
0
0 X «r 10 »4

»-i

f-»

0 UJ Ul

0 ^
0 ZD
X0 <

t-«

X
0
»X

»-»

0 iH

a: to

•
to

ya
t-v

I~<

c n

•

K,
W X* X 0

e-^

f-»

»-»

to
to

«>

to Ou Ul

Ul UJ UJ

f-*

Cs
Ul
a.

X
r>
a
a

f-i

— U3

0 Oi
Ul X X to X X
0 X Hi Ui
U5 X Ul 0
M
Ul U3 1
Ul X
0 Ul X X X X
0 U!
H
3 to X
to to to
0
Ul *H »a CD H
X X 15
2,
0 0 jU tj Q
Q X Ul

(Xi

w
0Q

t-i

0
U

i-»

•4

X
W
u

<
Ul
X

>* 2:.
CD

f-»

to ««c
*H Ul
CC

x.>»

ac.

oc
n>

t-»

to
(H

^0 bi

Ul
Ul Cu

^
>*

Ul
to U5
to
U}

• a: 0
Ul 0
X u- u cx •« a

Ul
2<i

M
z;
10 to
CO a Ul
bd
X
UJ X X

0 *XX

u.
•< fx, b« {».

X
0

CC
Ul

*X laJ

f-^

f-.

«c

to
to
u:

to
•H at;
vS

t-i

W Hi Of-*
X
uu
a. w :£ ^
0 a.

CC
Ul

0
X

CC
•

c*-

t-»

»—

Ul »-<

ox
< u. >*

t-t

0:,

H«

::>]

> <o
o ac ^
CO o et
< a: u3 o
a, a

•
to

a. t~*
Ul

r-»

(X>

»-l

oo
a.

M
2: H« 10 <
0
Ul
0
Ul 0
<:
J
^
«€ < SI b.
3X0X
u3
to
OX
C UJ
XXQ
U3 X
X Ul <
-a:

1-^

Ir*

fc-»

1-4

f-'

Cj
Ul
Ul
UJ *c r>
3; 2:
a.
^-t <f >*
>*
t-t Ul
5: f-«
rfTt

a
H
0 U. 0 0 Ul

t-s -s;

0 tj

o
tf>

ca
in
>*

M
O
A
W
X

a: so

in f-

•

a bl
2 OC

•<

•< CQ

Ul -s: DD

o b3

in
lo a\
oc ir*

«-*

a^
X
Xx

z; to

1-4

a 1-

Q -X
o

n iH
o .J
WXo
a. (X

H » >*

*^
<«

PC
a.

o oc
O

flC

a. ««

W •
CL 1
D 1
O t
1

•J
Esl

•
•
I

o t
u
to t
t

o
z
u
•0

»-t

-£
to
cc
cc fr-* so
oj
ta

X a.
i» a. o
o z;

X (X <
2::

w uj a.
o

o
O <£ W
^ ul CU
HO
UJ
a to
a
-Ul
U
so
<O
WX

E->

e»

flC

2: oc

a
2

o
a.
o at o
w

»^

Xw
o
X
o ta
ac X

a. Sit
DC

O
oo

>•

OU
^X
n
o
£U O

bi «o
a. Mt

i-t

ac to *-f
to
i> »a
»:>

O U}

•cC

w
X

>•

XH
O

X o*
ft oc

bl
(«

£-«

^ hu
X

•

-~»

f-*

t-,

PC
-I
IS

s: oc
;^

^X
PC
3£ W

f-»

5u to at
bi

»-*

«c

to 3C

o •1

a t
ft

»-*

Ou
>»

e
6
i

>
<
X

2:.

oo
3
OO
bl
O ^
w
t-s

a: E-»

^ X b«
O^
^
^ o
O 13 MS
bu D
t-»

o
u

•*

o
o
o

-<
Ci

lr«

o
o
o

o X•
X
X Ul
M

o
o

fe^

o
PC
OC
bl

;s z> us
i~*

:^ bl

Pk
i-«

o
to

o a.

O Ou
a >*
o
b^ PC
oa
X PC

>« t>

DC CSS
kO

O
X €V

X in—
bl

<o
n us

b;(

e-«

bl bl

o
:^ 2.
I-*

^ Ci

X
u

X
O
X
Xo
bl WD

X
bi •*
I-*

»J| bl
»J|

o *o

X
o bl
b.

o a.

bi f-»

XX
I-*

2i>

0 to 2:
0

0 on
0 —

Ul f- k3
«C bl

U
O Ul
X
^H
<
X to X U. <
00
Ui
Ul M
X *t to
HX
bl 2S X
CO U. X Ul
X
a
X
2: Ul X 0 X Ul
Ui
2:
X
0 n b5 ** bl
to 3 X 8^
^ u *«
0 ^ Hi Z.
0 0 <: X
b.
u
Ul
ai CO
w > bl >*
b]
<
X
X
b*
X
X

0
00
0
00
00

U) to

»-l

0 -<

<
0 Ot
0
<V 0

CE^

XXX

0
0
00
00
0

X *t bl X
O b. X OQ ^
X
X
X X to X
Ul bi 0 X w
bl »-«

<O
CJ bl
X
X
u

«*:

0^ to

I-*

•-4

1-4

f-«

bl a.
bJ a*
>« i»t;
Ir^ iO

rr-

E-»

<O
o to
Uu
o bl
> (H
bl <: <
X
M
a
CO
Qu
o
< »a u
X => X
bl O
U
<M
**
to X o

U
o

bl •
(X

»-l

o 1

f
1

>*
*c

{si

S£

X > H*
^
X to
2

a < St
O b«
X
O
CO a
t-»

.a Mi U3
«^ to

a.
ac

o
o

r PC

bl a»

•

a:;

CO PC

f"»

ao
o

l-«

bi h3

S-*

ss:

5t to
it:

\J
tJ

f-^

bl
b* OC
OC
Z3
b)

to CO
bl

M >* H
X to
«C —
to
X bl
to Ul
X
O
0
a.
s:
<C X.
a
o •
2:
aJ
0
>» bl X Ul

X
X O PC
o o
XQ
PC bl «c
bi X o

PC §-»
U2
a:
U.

f-«

»Jt

o
o
o

bl «t

bl to

;z:

DC E-»

»a

bJ
DC Z>
UJ lO

;-2;

lc-«

ua c?
QC

X 2,
M ac
Q CI >*
2:
< F*
f-«

f-4

*ac

PC
bl

2t
O H4

Dt.

6-*

CO l-»

*:x

a
bl
X

•4:

<
qc
bi < c
ca
o
<
to

»-*

^ ;z
<o

£xl

2: bl

•

O
O
o

a 2;
n bi

««

It*

X CM
U
Xu

O 0-

f-*

1-4 l-t

.5:

1-^

6-*

f-t

X0
O 0« UQ
X —0
X
bi to 0
0
X00
b) 0
0—

Ir*

</>

e-»

*-»

U0
X 0
00
to 0 0
0
r?
M 0
bl

<:
lr«

to PL.

—

u
>»

•-3

£Q

h«

f-f

I-*

au
<
0
U]
CC X
Hi

JH
1—

id
bu

Z b3

-s

a
U
a

< SO

f-i

#-»

b3
!H

CO St

•

z f

o ••
Ft

«-»

s
$

a.
f-«

to
Ul

t
1
1

•

fc-.

o 2:
:^ bl
to cc

w<
a
^X

C
2.

-I

r-t

to *t
(X oc

f
B
B

oo
cc o
oc cc
a.

u.',

X
to

ac
a. a.
•HI uJ

2:,

0 M U X U]
> -J
u •u
Z
CC e*
0
0 to 0 UJ X
OC Q
•«
»X
2 Ul
L>
< • 0 X z.
u 0

f-«

DC to

<. Ui
tt.

v-j

CC
to

3
<t M

Ui to
a: ik3

wX0
f-«

U -J

j:;

oc to

fr*

*-*

t-*

0
0 oc
<

* CC

u <c
<

to IHf
»-« .-3

«<£

•

it;

I-*

»-t

0 1

B
1
t

0 •
B
u
*< B

rvO

—

0 to 0 bj
IX X
Q U.

ua 2:

l-«

l-l

a
z. <c z

QC to

W a. Hi
W 0 0 IQ Ot
.4 U
£X
0
u OC to :x »H
rtC

(0 u. OL bl
to
U} to bj J-*

B
B

•

to
to CC
»~»

to f£
»-« iU

f-» -2:
1-4

B
B

ac
«< *-* flC
UI CD
•4

to CC

iit:

< a0
0 to Z b}
<X
0.
s
Q
Z
0
«x <
a Ul
zuX0
«<
H Kj

B
B
t

*—

•

-.3

e-*

0
to

It* lau
»-*

1
1
t

f-<

S
B
B

< B

O 1

U}
DC
a:

O
X

B
ft

EJ>
I>J

b«

Q CO
»^ U
O

to cc

r> Mf to

< 3: W
X :^
Z |W bH W
H<
<t
Q0
CO X
at M
<
£C

«o

ar.

bu
Ul

£C *a

t> •<

u«

U3
CC

*JI

•

a:
CL

f-t

1-4

0
Q to
t-«

X
to

X IX

2:,

U«

CC
bl

>» t->

0
<

Vr*

DX
«<
O

<«aC

bl t-*

S-i

fr-«

fa]

to
bl

rtC

o.
CU

u.
<x

XO
o

U OC
2: a: <
bl O bl
Xaa
X c»
C? M 21
O bJ X
-< X ^
OX
^3m
E->

w
a

o
XK
O bu
a

>-4

Ik}

X
Ct

u «o w
4 X
O ahi h*
HO
:S
3 O ST

1^3

ir»

fr*

U *^

l«i

ba X
X b3
H
E-«

b3 «aC
Ul Ul

X
X

X
s

X bi
X <C X

X t*

-a

<o
o 3: w
O

«o

O
XX

(X.

X
o

X ^
o
X
»/)

X X 10
o Ul
X X
X (O o
W3G

XX
0X
>* X bl
CO
b^
X
O
X
3 Ul
X U3 <:
.a ba m
U
3 O MX
XQo a
*c
a X •« 10
b3
CO h* b« a o
U.
XX a
X bl bl w w
<>
M bi
zo
iM >-»
M U to
X *e X >*
X Ul O bl w a X
2t O 000
H X ?. fO o
U2

b3 be:

-ua

t-«

fc^ faj

»~«

Cad

»ji

Ci
«aC

^ to
O3
r*

O *•«
^ U CO
H
<
Q SI bl

OX
X
:r
X
o a: <

a:
*t

t-<

o ba Ul
10 O
o
*t
t-l

OOQ
^ Ul «<
^

(

M
:£
o
a

•

»-i

u
U)

tfJ

uji

fr*

X X. >• >*
o J •
X
Q u« o ^
o o
o X Ul :z X
.

l-«

lo to
to (O U3
UJ Ul

us
ft,

O
<

OQOO
ooo
at;

«c

»a bl fr* *t fr*

^ O
:3 Ul o
Oooo
X

s to
E-i

3 < oo OC X oc
fv o o o
oc
^ X s: X
J
>4
bJ W IH
u
:^
2 2 uUU
>*
^ b3
-t
o
o OQO aQ
e<
o <c ^ o O
UI U3 UJ
Ul
< .a C
CO
Q lo «o cj
u La o a 2.
Q< O
z
UI Z> 13 »J .4
oow M
«t
W
ac <c X X X
UJ Ui OC U3 cc ac o o
x X
3^
:«
cr
Ul bJ X bl U3 b3 => 3 bl

t-*

»-»

[i3

fr4

%jt

f-*

II; t>i

bk}

X X sr <

.Jl

<c
^:

faJ

1/3

St. 2;;

Jr-

(-i :>£

ix;

•d
X.

oooooooo'n'^ifitcr-i
O

o -«
I

(ft «-» «-»

O 21 X
H4 Ul ^
O
2t Q
U
z
3 «« X
3^
fc-i

lr»

»-*

ar.

Q
M H U n

Ul «0 bl
u
z: t>
UU
«« X.

»~«

•cc

,Jf

t-*

X Ul Ul
X CD

l-»

PC
uj

o
< W X
w
<H O o
X O H> b. -3 Ul
X
H Ul <
a
X
Ul
a X
X X Ul Ul a: ;u 3* X
XQU
o
o X U. Ui :d u. Ul
ui z
<
X U. X 3
u. < a:
o
• » o ac
Ki
O
bl >X
b*
a:
o
"^
X
Ul X
13
OHOX
X
X
lO Ui bj
O
Ul
Xu
Ul
a Ul
U)
CQ Ul U. X
u. X X
US
M ^ u:
X
Xu
O X UJ X U- U) o u. 1- Ul
aX
X lO Ul to M
ouitoxufc^:3(-*
oQ
-* <
< CQ o a.
X -t
X
a: to
O
CQ ^ u> a Ul
fn =» Ul
oo
X >:
r> w «« X:
X
•U*Ct5
Ul <c
WJUIX
Ul O X Ul
u •* < ^
U X ul X X Ul «£
Ul
Ul
X
HX
O U. W U X
tj
X
O
^ O d
Q
u. o <
< O U.
2^
X to w o X
<:
< Ui
O
UlWOCfiHtXXS 3 X
X X
X
bo H bi X 10 w o
Ui
-« Ul
Ul
< Ul « S ua
u.
^- o
Ul n
2C o 1- X o o
U- w o
a
M a u. X ^ o u^
v5 Q O U u* o
<c ^
Ui
:d Ul Ul to
;o
*W
to to <
UJ
Ul
o o
00
u. to Ui
r>
J • to c> X
X
-X 'X
Ul
UiJDiX3U:}XU.F^U- <C U. H« U. «C 3 ,J
Ul UJ
lo
O ^ U3 X Ul
^ ,i <c o o to X O
-< X o X < X
2i
oo XaXo
to 1- IOO«OU.OOi-rU o
Ul

•

f-4

f-l

»-*

111

cc;

,-5

;*i

3^;

f-t

t-*

ir«

»-i

f-*

r-t

f-«

fc-*

l-S

i^r.

(r*

t-«

<z;

»/i

i<:

fc-

I"*

f~»

»-i

i-v'

IjlI

ill

t-»

or.

lr<

f-«

f-»

-J*

:-4

i-i

»-«

k-*

I-'

»-*

h--

,»3

sr.

O
«9

<
u;

o
• X X JH
^ ^ ^ o to
M ba
3:
O
*H >
us

t-*

ii2

> 05
O

a:
u
« a w CQ X
f-«

o
<
• w
u
Q «0 O bu
^3
•4 m
OQ O <
^C
CO £X a < Ml
W UJ > u a*
U. X
o QC
hi

IX.

«-«

.J]

i-i

f-f

[xl

Ul t; Ml

> tH
3B:

f/i

4 < bu

w u a:

t
fi

e
t

u i

»-«

Ul 1

o •f

3e:.

<:
a.

i~«

ac
a.

t->
t-«

Hf
Ui
s*; *a
CL
(O
6

X
»-i

f~»

to
«o

U
«0 0 *€
W 21
o «c a X W

1-4

O CO (4 <C CO
at H* s.
o^

»-*

CL.

X
0Q
0 t5 50
to
uc
to X
at

-i:

SsJI

Isl

is *-v
W3 :z>

>- CO

X Qc
o Ui

•a.

a* Ul iX

X>
0
0QQ
IS
2: to • «c <
0 <o *
«
f-«

lar.

^ M

Mf &a
tr«

X U. i£

to 10 »~*
1^ £«3 ac

t-«

Ir-t

o a*

i-«

GU
a*

t-»

to CO
il *x.

:s-

cc s:

0<
Ul 0
X0
DC
aa
11

Oft

f-i

:«

to bl 10

»-l

PL £xl

^
w
w <

to s:
««
CO

t-«

t-*

U
O3w
H s:
10 Q
to
0

a
X

a. •-3

o :£

>oo u

s>c

'-^

»-4

a
mw •
^ iO
SS
Ha
CO CO 0
<: X
ww
60 St

:2:

ir*

SsJ

fc-*

!3
-< fiu

f»- 6-*

M a;
a o CQ
o^
^ a.
O
O OC
U £t
2r

«c

tr>

i-t t-«

>
M

--2:

0 t5

-4

w
0 *W
0
s:
»-l

0a
U Ul
»3
fr4

t«3

fac M" a*

a;
fX.

i
&

l>u

to
uj «e£
a. Ou

fr-f

to
Ml

«<
a; to (X
bi bi

th*

i
1

•

a.
CO 10 a»

0 X u.

t-*

t
t
e
1

CC
Cu

1
ft

(

PALIO

iiibi

Vl4i

PAC£

/PKBK DRIVE CtJNTROL TEST
/

/COPYHIGHT

CO I972,l97i,i974 DIGITAL EQUIP, CORP.i MAYNAPDi

MASS,

/ALL KNOWt, HALTS

020t
0202
0203
0204
0205
0206
0207
0210

5 3 24

5316
5303
5332
5347
5142

o2n

6555
4122
4162
4776
4072
4002

0212
0213
0214
0215
0216

/UNDEFINED INTERRUPT
/SKIP TRAP FOR DCLR
/SKIP TRAP FOP OLAG
/SKIP TRAP FOR DLCA
/SKIP TRAP FOR DRST
/SKIP TRAP FOR DLDC
/SKIP TRAP FOR OMAN
/THE RECOVERABLE ERROR HALT
/PROGRAM STOP OR HALT FROM SWR4sl
/XOT CHANGE HALT
/HALT FOR "CHECK WRITE PROTECT"
/HALT FOR "CHECK WRITE PROTECT"
/HALT FOR "CHECK WRITE PROTECT"
/END or TEST HALT FROM SWR9«l
/FROM ALIGNMENT SUBTEST

ERHLTl
ERHLT2
ERHLTi
EPHLT4
ERHLTb
ERNLTb
ERHLT7
ERKLT9
STPHLT
CHNKLT
MPHLTI
MPHLT2
ApHLTl
ENDHLT
HEDHLT

5217
5343

f>200

/BUFFER LOCATION
0217
0220
0221
0222
0223

/START or PROGRAM DATA BUFFER
/END or PROGRAM DATA BUFFER
/DISK ADDRESS WORD IF BUFFER
/DISK ADDRESS WORD IN BUFFER
/BUFFER *l "BREAK STOP CHECK" "1

7000
7377
7000
7001
7400

WRKBUF
ENDBUF
KITRK
LOTRK
STPCHK

6741
6742
6743
6744
6743
6746
6747

DSKPB6741
DCLP«6742
DLAGB6743
DLCA=6744
DRST«6745
DLDCB6746
DKAN»6747

4420
4421
4422
4424

DSKOUT»JMS X
OSKINkJMS I
RANADD«JMS I
R£CALaJ»S t
S£EK»JMS I
DISKGOwJMS I
HArCHK«JH5 I
KlLBUr»JMS I
FILBUFBJMS i
WATISS«J«S

/SKIP ON TRANSFER DONE OR ERROR
/CLEAR DISK CONTROL LOGIC
/LOAD ADDRESS AND CO
/LOAD CVRRENT ADDRESS
/READ STATUS REGISTER
/LOAD COMMAND REGISTER
/LOAD MAINTENANCE

riGURe*JM5 X
NERR0R«JM5 I
ERBOR«JMS I
lONwATBjMS X

XDOUT
XOXN
XRNAD
XBESTR
XONLY
XDXSKG
XHFCHK
XKLBUF
XFLBUF
XWTISZ
XSKWAT
XFGURE
XNERRO
XEPRO
XXOhWT

V142

20-DEC-73

13154

4442
4443
4444
4445
4446
4452
4447
4450
4451
4453
4454
4455
4456
4457
4460
4461
4436
4462

ACCHP1»JMS I
ACCMP2«J«S X
RDSTAT«JMS I
RDCMD»JHS I
SDADD«JMS I
LDADO«JHS I
0SK5KP»JMS I
LDCMDBJMS I
LDCUR«JMS I
CLRALLKJMS X
RDCRC«JMS I
LDMANsJHS X
RDBUF»JMS I
PRNTGR"JMS I
0CTEL«JM5 r
TwQCTbJMS 1
TVPE«JM5 I
CRLF»JMS X

XCOMPl
XC0MP2
XROST
XRDCH
XRDAO
XLDAO
XSDKP

.4423

4425
4426
4431
4430
4433
4432
4427
4437
4440
4441

LlO

•

SKPftAT»J«S

X
,

0000

•0
/

0000
0001
0002
0003

OOPO
5001
0002
0003

5001
0002
0003
/

0010

#10

0000

AUTOlOf

0010

0011
0Q12
0013
0014
0015
0016
0017

0010
0020
0040
0100
0200
0400
1000

KOOlO,
KO02Of
K0040.
KOlOOi
K0200f
K0400,
KlOOOf

0020

«20

OOlO
0020
0040
0100
0200
0400
1000

/
/

0020
0021
0022
0033
0024
0025
0026
0027
0030
0031
0032
0033
0034
0035
0036

5553
4536
6320
6215
6200
5600
6432
5656
5447
5435
5261
5247
5215
0222
6151

DOUT
DIN
RNAO
ONLY
RESTOH
DISKC
HFCHK
rCURE
FLBUF
KLBUF
SKWAT
x«nsz, WTISZ
INTADD
INTRQ,
THSFLD, PRSFLD
XpPXNT* PRINT

XDOUT,
XDIN,
XRNAD*
XONLY,
XRESTR,
XDISKG,
XHFCHK,
XFGUREf
XFLBUF,
XKLBUF,
XSKwAT,

XLDCf'

XLDCA
XCLDR
XBDCR
XLDHN
XPDBF
XPRN
XFROCT
XTOCT
XPRINT
XCRLF

PALIO

V142

0037
6400
0040 5000
0041
5200
0042
522i
0043
523i
0044
5300
0045
5412
0046
5350
0047
5333
0050
5325
0051
5307
0052 5317
0053
5340
0054 6000
0055 5344
0056
5400
0057
6IU
0060 6066
0061
603b
0062 6053
0063
700i
0064
7000
0065
4500
00^6
4820
0067
7000
0070 0000
0071
0000
0072
OOOi
0073
0002
0074 0003
0075
0004
0076 0005
0077
0006
0100 0007
0101
1234
0102 2000
0103 3000
0104 4000
0105
6000
0106
7000
0107
7760
Ono 7700
out 0077
0112
2525
0113 5252
0114 5000
0115
7771
0,116
0017
0117
0037
0120 6201
0121
6244
0122
7740
0123
7400
0124 7600
0125 5403

2 ©"DEC *

XK'CRRO
'

EBRO

xion WT
XCOMPl
XC0MP2
XRDSTi

C0MP2
RDCM
ROAD
SDKP

XRDC!"**

XRDAD#
X5DKP*
XLDCMj
XLOC A
XLDAD
XCLDR,

tiOCM
LDC A

CLDR
rdcr

Xlomn ,
XRDBF
/

XPPN ,

XFROC X J froc t
xtoct #
XCRLF f
UPO N E
LOTRK
XH I T R K * hitrk
C Y L 4 5 0 t 4500
TR K 2 1 2 >

4$ 2 0
0

DR 1 VS V #

0001
0002

K0002
KOO 0 3
K0004,
K0005,
K0006,
K0007*
K1234,
K2000,
K3000,
K4000f
K6000^
K7000»
K7760,
K7700,
K0077,
K2525,
K5252,
K5000,
K7771,

0004
0005
0006
0007
1234
2000
3000
4000
6000
7000
7760
7700
0077
2525
5252
5000
7771
0017
0037
cor
RHF
7740
7400
7600
9403

KOOn,
K0037,
KCDF,
KRHf,
K7740/
K7400,
K7600,
K5403,

PALiO

V142

2o-de;c • 73

0126
0127

0770
7007

K0770,
K7007,

13194

PAGE 1*3

0770
7007

DECIMAL
O130

7764

Mi2,

•12

OCTAL
/

0131
0132
0133
0134
0135
0136
0137
0140
0141
0142

7774
0000
0000
0000
0000
0000
0000
0000
0000
0000

TCNTR3
TCNTP4
TCNTR5
TCNTR6

0143
0144
0145
0146
0147
0150
0151
0152
0153
0154
0155
0156
0157
0160
0161
0162
0163
0164
0165
0166
0167
0170
0171
0172
0173
0174
0175

0000
0000
0000
0000
0000
oooo
0000
0000
0000
0000
0000
0000
0000
0000
2200
0011
6047
0000
0000
0306
5373
5300
6304
3240
7777
0000
0200

GOREGl, 0
GDREG2, 0
CRREGl* 0
CRREG2# 0
STREG#
0
DBPEG,
0
CHREG,
0
Dareg,
0
CAREG,
0
ADPEG,
0
DTBEG,
0
ACREC,
0
HOMEMA, 0
RAPCNT, 0
STCON,
2200
CRWROi, oou
CRWRD2( 6047
DATCNTi 0
5AVDAT, 0
K0306i
0306
K5373,
5373
K5300,
5300
K6304,
6304
ENDTRK, 3240
SOFERR, 7777
SAVpcr, 0
RESTRI, 0200

0200

• 200

0200
0201
0202
0203
0204

5206
5777*
5776'
5775*
5774*

BGKf

M4f

RECO,
REGl
5BCNT1
TCNTRl
TCNXR2
,

f
f
r

0
0
0
0
0
0
0
0
0

JMP
JMP
JHP
JMP
JHP

,4-6

MANUAL
CHANG
MANPRO
AUTPDO

/TO NORMAL TEST
/TO MANUAL TEST
/TO CHANGE lOT DEVICE COOES
/CHECK MANUAL WRITE PROTECT
/CHECK PROGRAM WRITE PROTECT

V142
0205
0206
0207
0210
02 U
0212
021i
0214
0215

02U
0217
0220
0221
0222
0223
0224
0225

20-DEC • 73

5575
6224
3157
1157
1120
3222
1121
6201
3472
1125
3473
1034

3474
7402
7604
0074
3071

PPSFLUi

JHP I
Rir
DCA
TAD
TAD
OCA
TAD
CDF
DCA I
TAD
DCA I
TAD
OCA J
HtT
LAa
AND
DCA

JI54

PAGE 1«4

R£STRT

/RESTART AFT£r PROGRAM STOPI

HOMEMA
HOMEKA
KCDF
PHSrLD
KRHr

/MAKE KOMEDF

/SWITCH FIELD

/GET RMr rOR iNI,

KOOOi
KS403
K0002
XNTRQ
K0003

/JHP

FOB LOC,

/GET ADDRESS RETURN

/MAKE DF*IF

K0003
DR2VSV

/MASK AMOUNT OF ORZVCS

0226
0227
0230
0231
0232
0233
0234

7604
0016
7640

LAS
AND
K0400
SZA CLA
TAD
DRZVSV
CLL RAL
DCA
DRIVNO
DCA
REGO

1071

7104
3070
3132

/MASK SWR3
/TEST DISK IN iO-ll
/YESi GET DISK NO, TO TE8I
/MAKE II IN 9«ig
/START KITH THIS DRIVE X

/VERIFY THAT THE DISK DRIVE IN "DRIVNO* 15
/RCAOy TD SEEK, READ, OR WRITE, STATUS REGISTER
/SHOULD GO TO 40G0,
/

0235
0236
0237
0240
0241
0242
0243
0244
0245
0246
0247
0250
0291
0252
0253
0254
0255

7330
3144
1015
1070
4450
4444
4442
7610
5253
3144
4453
4444
7650
4437
4440
0235
5300

TSTO

TOE,

CLA CLL CML RAR
DCA
G0REG2
TAD
K0200
TAD
DRIVNO
LbCKD
RDSTAT
ACCHPl
8KP CLA
JMP
TOE
DCA
GDReG2
CLRALL
ROSTAT
SNA CLA
MERROR
ERROR
TSTO
5200

/EXPECTED STATUS
/SETUP COMPARE REGISTER
/ENABLE SET DON-g BIT
/GET CURRENT DRIVE NUMBER
/LOAD COMMAND REGISTER
/READ STATUS
/CHECK RESULTS
/O.K, SO FAR
/ERROR STATUS
/SETUP COMPARE REGISTER
/CLEAR STATUS
/READ STATUS
/SHOULD BE 0000
/0«K, 4096 LOOPS
/ERRORS STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY THAT «DSKP" SKIPS ON TRANSFER DONE FLAG
/WHEN THE DISK DRIVE IS READY.
/

0256
0257
0260
0261

1015
1070
4450
4447

PALIO

V142

0262
0263
0264
0265
0266
0267
0270

5266
4453
<447
4437
4440
0256
0006

T5T1,

TAD
TAD
ldcmd

K0200
DRIVNO

/ENABLE SET DqNE BIT
/CURRENT DRIVE
/LOAD COMMAND
/DSKP "DISK SKIP I0T«

DSKSkp

Ut54

"Clt,

JMP
CLRALL
DSKSKP
NEPROH
ERROR

PAGE 1«S

TIE

TSTl
0006

/ERROR, NO SKIP
/CLEAR SKIP FLAG OUT
/DSKP "DISK SKIP lOT"
/O.K. 4096 LOOPS
/ERROR, DSKP FAILED
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY THAT INT, OCCURES FROM
/THE TRANSFER DONE FLAG WHEN DISK
/DRIVE UNDER TEST IS READY TO SEEK,
/READ, OR WRITE,
027 1

0272
0 27 i

0274
0275
0276
0277
0300
0301
0302
0303
0304
0305
O306
0307
0310
0311
0312
0313
0314
0315

1015
1016
1070
4450
7240
4441
5313
4453
7240
4441
7610
5313
1015
1070
4450
7340
4441
4437
4440
0271
0007

TST2,

TAD
TAD
TAD
LDCMD
CLA CKA
ION«AT
JMP

K0200
K0400
DRIVNO

T2E

CLRALL
CLA CMA
lONWAT
SKP CLA
JMP
T2E
TAD
K0200
TAD
DRIVNO
LDCMD
CLA CLL CMA
I ON WAT

T2E#

NERROR
ERROR
TST2
0007

/ENABLE SET DONE BIT
/ENABLE DISK INT,
/GET CURRENT DRIVE
/LOAD COMMAND REGISTER
/SOFTWARE FLAG
/WAIT FOR DISK INTERRUPT
/ERROR, NO INT.
/CLEAR THE INT, OUT
/SOFTWARE FLAG
/WAIT FOR DISK INTERRUPT
/0,K. NO INT,
/ERROR, INT,
/ENABLE SET DONE BIT
/CURRENT DRIVE
/LOAD COMMAND
/SOFTWARE FLAG
/WAIT FOR DISK INTERRUPT
/O.K. 4096 LOOPS
/ERROR, DISK INT,
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY A "TIMING ERRoR« DOES OCCUR IN STATUS REGISTER
/IF A DLAG IS ISSUED WITH THE COMMAND REGISTER IS SET TO
/A FUNCTION OF «7»,
0316
0317
0320
0321
0322
0323
0324
0325
0326
0327
0330
0331
0332
0333
0334
0335

2132
1106
1157
1070
4450
1077
3350
4452
4432
5346

IPO
3350
7330
1013
3144
4444

ISZ
TAD
TAD
TAD

REGO
K7000
HOMEMA
DRIVNO

LDCMD
TAD
DCA

LDADD
8KPWAT
JMP
TAD
DCA
CLA CLL
TAD
DCA
PDSTAT

K0006
T3T
T3E
K5300
T3T
CML RAR
K0040
GDREG2

/GET CURRENT DRIVE
/LOAD COMMAND REGISTER

/SETUP TEXT POINTER
/DLAG, LOAD DISK ADDRESS
/WAIT FOR ERROR SKIP
/ERROR, NO SKIP OCCURRED

/SETUP TEXT POINTER
/SETUP EXPECTED STATUS
/READ STATUS REGISTER

UI54
0336
0337
0340
0341
0342
0343
0344
0345
0346
0347
O3S0

4443
76i0
5346
4453
3144
4444
4442
4437
4440
0317
0006

PAGE 1*6

fcCCMPl

/CHECK RESULTS
/STATUS 15 0,K,
/ERROR STATUS INCORRECT
/CLEAR STATUS
/SETUP EXPECTED STATUS
/READ STATUS
/CHECK RESULTS
/ALL IS 0,K,
/ERRORi TIMING SKIP OR STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

8KP CLA
JMP

CtRAU
DC&
BD5TAT
ACCMPl
NERRQB
tit,
T3T,

TST3
000b

/V^BIKY THAT "RliCALIBBATC" SETS TRANSFER
/DONE THEN DRIVE READY ON SELECTED DRIVE
/

0351

0352
0353
0354
Q3S9
0356
0357

4424
0357
5355
4437
4440
0351
0006

T8T4,

T4T,

RECAL
T4T

/"RECALIBRATE"
/TEXT POINTER
/ERROR* SKIP OR STATUS
/0,K, TO NEXT TEST
/ERRORi DISK SKIP OR STATUS

NERBOH
ERROR
TST4
0006

/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY THAT "SEEK ONLY* TRACK 312 SETS
/TRANSFER DONE THEN DRIVE IS READY,
0360
0361
0362
0363
0364
0365
0366
0367
0370
0371

7301
3151
1066
4423
0371
5367
4437
4440
0360
0006

0372
0373

5773
0400

0374
0375
0376
0377

4710
4101
6535
4600

T5T5#

T5E,

T5T,

CLA CLL lAC
DCA
CMRt'G
TAD
TRK2i2
SEEK
T5T
JMP
HERROR
ERROR
TST5
0006

/EXTENDED
/SETUP EXTENDtD BIT
/GET LOWER DISK ADDRESS
/SEEK ONLY 312
/TEXT POINTER
/ERROR, SKIP OR STATUS
/0,K, TO NEXT TEST
/ERRORr DISK SKIP OR STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

JMP I
TST6

/TO NEXT TEST

PAGE
/

/SOMETHING IS WqRKInG. NOW SEEK ONLY TRACK 312
/THEN RECALIBRATE AND CHECK TOR NO ERRORS IN STATUS,
0400
0401
0402
0403
0404
0405

7301
3151
1066
4433
0414
5212

PALIO

Vi42

0406
0407
0410
0411
0412
0413
0414

4424
0414
5212
4437
4440
0400
5300

TST6,

CLA CLL lAC
DCA
CMREG
TAD
TRK212
SEEK
T6T
JMP

20-DEC-73

T6E,
T6T,

RECAL
T6T
JMP
NERHDH
ERROR
TST6
5300

13154

/SETUP EXTENDED BIT
/SEEK ONLY 312
/TEXT POINTER
/ERROR, SKIP OR STATUS

PAGE 1-7

T6E

/•RECALIBRATE*
/TEXT POINTER
/ERROR, SKIP OR STATUS
/O.K. TO NEXT TEST
/ERROR, STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/
/

/VERIFY A "RECALIBRATE" FORM CYLINDER,
/SURFACE, AND SECTOR 07777,
/

0415
0416
0417
0420
0421
0422
0423
0424
0425
0426
0427

0430

3151

7340
4423
0430
5226
4424
0430
5226
4437
4440
04tS
5300

TST7,

T7E,

T7T,

DCA
CMRl
CLA CLL CHA
SEEK
T7T
JMP
T7E
RECAL
T7T
JMP
T7E
NERBOR
ERROR
TST7
S300

/CLEAR EXTENDED BIT
/SEEK ONLY
/TEXT POINTER
/ERROR, SEEK ONLY
/"RECALIBRATE"
/TEXT POINTER
/ERROR, SKIP OR STATUS
/O.K. TO NEXT TEST
/ERROR, STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY A SEEK ONLY AND FIND ALL ADDRESSES
/INCREMENTAL SEEK TEST. SEEK 0, 1, 2, 3, ETC,
/CHECK TIMING AND NQ ERRORS IN STATUS,
0431
0432
0433
0434
0435
0436
0437
0440
0441
0442
0443
0444
0445
0446
0447
0450
0451
0452
0453
0454
0455
0456

3135
3136
1135
3151
1

TST8,

136

4423
0456
52S4
2136
7610
2135
1135

7650
5233
1136
1172
7640
52 33

4437
4440
0431
5300

T8E,
TST,

DCA
DCA
TAD
DCA
TAD
SEEK
T8T
JMP
ISZ
SKP CLA
ISZ
TAD
SNA CLA
JMP
TAD
TAD
SZA CLA
JMP
NERROR
ERROR
TST8
5300

TCNTRl
TCNTR2
TCNTRl
CMREG
TCNTR2
TSE
TCNTR2

/SETUP EXTENDED BIT
/LOWER DISK ADDRESS BITS
/SEQUEHCIAL SEEK ONLY
/TEXT POINTER
/ERROR, SKIP OR STATUS
/UPDATE POINTER

TCNTRl
TCNTRl

/SET EXTENDED BIT

T8R

/IS EXTENDED BIT SET YET
/NO, CONTINUE
/YES

TCNTR2
ENDTRK

/WAS IT LAST TRACK

TBR

/NO, CONTINUE
/O.K. TO NEXT TEST
/ERROR, STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/VEHIFY
SEEK ONLY AnD FIND ALL ADDRESSES
/312, 3U, 310, 307, ETC, CHECK FOR
/NO ERRORS IN STATUS REGISTER,
ft

VM2

i3f54

20-DEC-73
/

0457
0460
0461
0462
044^ i

0 464

0465
0466
046 7
0470
047 1
0472
0473
047 4
0475
0*76
0477
0500
0501
0502
050i
0504
0505
0506
0507
0510

05U

i066
i i

T8T9,

3135
7301
3136
1136
3151
1135
4423

T9R»

5307
7 340
3b

3135
7301
1135
7640
5264
1136
7650
5306
3136
5264
4437
4440
0457
5300

/SETUP LOi^ER DISK ADDRESS POINT

/SETUP EXTENDED POINTER
/SETUP EXTENDED BIT

/OECREMCNTAL SEEK ONLY
/TEXT POINTER
/ERROR* SKXF OR STATUS

T9T

05 1

1 1

TBK212
TAD
K0017
TAD
TCNTBl
OCA
CLA CLL I AC
TCNIR2
DCA
TCNTR2
TAD
CHReG
DCA
TAD
TCNTPt

T90K,
T9E,
T9T»

CLA CLL
TAD
DCA
CLA CLL
TAD
SZA CLA
JHP
TAD
SNA CLA
JMP
DCA
JMP
NERROR

CMA
TCNTRi
TCNTBl

/DECREMENT

lAC

TCNTPl

/riRST TIME 0 YET
/NO, CONTINUE

T9R
TCNTR2

/PAST EXTENDED BIT
/YES* TEST O.K.
/CLEAR EXTENDED SIT

T90K
TCNTR2
T9R

/CONTINUE
/O.K. TO NEXT TEST
/ERROR* SEEK ONLY
/SCOPE LOOP POINTER
/TEXT POINTER

EBROF!

TST9
5300

/VEBIFY A RECALIBRATE FROM ALL
/CYLINDERS. CHECK ALL CYLINDERS
/BETWEEN 00000-14500,
/

0512
0513
0514
0515
0516
0517
0520
0S21
0532
0523
0524
0525
0526
0527
0510
0531
0532
0533
0S34
0535
0536
0537

3135
3136

TSTIO,

iU5

TlORf

3151

lU6
4423
0545
5343
4424
0545
5343
7300
1136
1013
3136
7430
2135
1135
7650

5314
1136

U72

TCNTRI
DCA
TCNTR2
DCA
TC«TR1
TAD
CMREG
DCA
TCNTR2
TAD
SEEK
TiOT
TlOE
JMP
RECAL
TIOT
TlOE
JMP
CLA CLL
TCNTR2
TAD
K0040
TAD
TCNTR2
DCA
SZL
TCNTRI
ISZ
TCNTRI
TAD
SNA CLA
TIOR
JMP
TCNTR2
TAD
ENDTRK
TAD

/GET EXTENDED BIT
/SETUP EXTENDED BIT
/GET CYLINDER
/SEEK ONLY
/TEXT POINTER
/ERROR IN SEEK ONLY

/"RECALIBRATE"
/TEXT POINTER
/ERROR* SKIP OR STATUS
/GET LAST CYLINDER
/UPDATE
/TIME TO SET EXTENDED?
/YES
/GET E-XTENDtD POINTER
/SEI?
/NO DU THIS CYLINDER
/GET LAST CYLINDER
/GET LAST POINTER!

PAGE 1-9

PALiO

V142

13154

0540
0541
0542
0543
0544
0545

7640
5314
4437
4440
0512
5300

SZA Clh
TIOR
JMP
NEPROR

/NON-EXISTENT CYLINDER?

TSTIO
5300

/SCOPE LOOP POINTER
/TEXT POINTER

0546
0547

0600

JMP I
TSTll

5 7 47

DO IT
/0»K. TO NEXT TEST
/NO,

/TO NEXT TEST

PAGE
/

/SEEK ONLY SEtMg TO BE WORKING, NOW DO
/A FEW RANDOM SEEKS TO HEALLY SHAKE THE
/DISK DRIVE UNDER TEST,
/

0600
0601
0602
0603
0604
0605
0606
0607
0610
0611
0612
0613
0614
0615
0616
0617
0620
0621
0622
0623
0624
0625
0626
0627
0630
0631
0632
0633
0634
0635
0636
0637
0640
0641

1122
3135
4422
3136
7004
3137
4422
3140
7004
3141
4422
0111
1110
3160

TSTU,

U37

TllR3#

RANADD
DCA
PAL
DCA
RANADD

3151

U36
4423
0641
5237
1141
3151

DCA
RAL
DCA
RANADD
AND
TAD
DCA
TAD
DCA
TAD
SEEK

K7740
TCNTPi

TCNTR2
TCNTRi

TCNTR4
TCNTR5
K0077
K7700
RAPCKT
TCNTR3
CMBEC
TCNTB2

TUT
JMP
TAD
DCA
TAD
SEEK

U40
4423
0641
5237
2160
5216
2135
5202
4437
4440
0600
0000

TAD
DCA

TUT
JMP
I&Z
JMP
ISZ
JMP
•iERROB

THE,

ERROR

TSTU
TUT,

0000

TUE
TCNTR5
CHREG
TCNTR4

THE
RAPCNI

TUR3
TCNTRI

TURl

/AMOUNT OF PASSES
/SETUP COUNTER
/GENERATE A RANDOM ADDRESS
/SAVE IT
/LINK IS EXTENDED BIT
/SAVE IT
/GENERATE A RANDOM ADDRESS
/SAVE IT
/LINK IS EXTENDED BIT
/SAVE IT
/GET A RANDOM NUMBER
/MASK OUT
/MAKE COUNT VALUE
/SETUP COUNTER
/GET EXTENDED BIT
/SETUP COMMAND REGISTER
/SEEK ONLY
/TEXT POINTER
/ERROR, SKIP OR STATUS
/GET EXTENDED BIT
/SETUP COMMAND
/SEEK ONLY
/TEXT POINTER
/ERROR, SKIP OR STATUS
/UPDATE COUNTER
/SAME LOOP
/UPDATE PASS COUNTER
/MAKE NEW ADDRESS
/O.K. TO NEXT
/ERROR, SKIP OR STATUS
/SCOPE LOOP POINTER
/MODIFIED TEXT POINTER

/NOTE! THE FOLLOWING TWO (2) TESTS wlLL NOT BE RUN
/IT SINGLE DRIVE TESTING OTHER THAN DRIVE 0
/OR WHEN MULTI-DRIVE TESTING »!ITH 4 DRIVES,
/

PALIO

V142

20-DEC«73

I3l64

PAGE t-lO

/VERirif k "NOT READY" ON ALL
/DPJVES MOT ON THt CONTROL.
/

0642
0643
0644
0645
0646
0647
0650
0651
06S2
0653
0654
0655
0656
0657
0660
0661
0662
0663
0664
0665
0666
0667
0670
067i
0672
0673
0574
0675
0676
0677
0700
0701
0702
0703
0704
0705
0706
0707

t07i
3135
7301
1071
3136
1136
7104
1015
4450
4444
4442
7610
5305
4453
2136
2135
5270
4437
4440
0656
5200

0710
0711
0712

7301
4453
7346

0714
0715
0716
0717
0720
0721
0722

3135
7301
1071
3136
1073
1161
3144

3132
7604
0016
7650
5252

DCA
REGO
LAS
AND
K0400
SNA CLA
JMP
• •^4
TAD
DRIVSV

lo-fi

7640
5777*
7346
I07i
7650
5777 '
7301

4453

U61
3144
7346

/SETUP FOR 4096 PASSES
/RUN NEXT TWO TtSTS
/HAXSE
rOR OTHER THAN 0
/MORE ON SYSTEM
/]£ES» DON'T TEST
/AC TO 7775
/AMOUNT or DRIVES
/ARE THERE FOUR
/YES, CAN'T TEST

JMP
TST14 -1
CLA CLh CMA RTL
TAD
DRIVSV
SNA CLA
JHP
TST14 ml
CLA CLL lAC
TSTi2#
CLBALL
/CLEAR CONTROL
TAD
STCON
/EXPECTED STATUS
GDREG3
DCA
/SETUP COMPARE
CLA CLL CMA RTL
TAD
DRIVSV
/AMOUNT OF DRIVES
DCA
TCNTRl
/AMOUNT NOT THERE
CLA CLL lAC
TAD
DRIVSV
/START WITH THIS DRIVE
DCA
TCNTR2
T12R#
TAD
TCNTR2
CLL RAL
/SHIFT TO UNIT BITS
TAD
K0200
/ENABLE SET DONE
LDCMD
/LOAD COMMAND
RD5IAT
/READ STATUS
ACCHPl
/CHECK RESULTS
5KP CLA
/O.K.
JMP
T12E
/ERROR, STATUS
CLRALL
/CLEAR STATUS
TCNTR2
ISl
/UPDATE DRIVE NO.
laz
TCNTFl
/WAS XT LAST DRIVE
JMP
T12R
/NO, MORE TO TEST
NERROR
/O.K. 4096 LOOPS
T13E;,
ERROR
/ERROR, STATUS
TSTia
/SCOPE LOOP POINTER
5300
/TEXT POINTER
/VEBIFY A DRIVE STATUS ERROR ON ALL DRIVES
/NOT ON THE CONTROL , ACTUALLY A SELECT ERROR,
/

PALIO
0723
0724
0 7 25

0726
0727
07 30

0731
07 32
07 33

0734
0735
07 36

0737
0740
0741
0742
0743
0744
0745
0746
0747
075t
0751
0752
0753

CLA CLL lAC
CLRALL
CLA CLL CMA PTL
TAD
DRIVSV
DCA
TCNTRl
CLA CLL lAC
TAD
DRIVSV
DCA
TCNTR2
TAD
K0002
TAD
STCON
DCA
GDREG2

TST13,

TUB,

V142

13154

136

TAD
CLL PAL
TAD
K0200
TAD
K3000
LDCMD
LDADD
RDSTAT
ACCMPl
SKP CLA
JMP
CLRALL
TAD
STCON
DCA
GDREG2
RDSTAT
ACCMPl
SKP CLA
JMP
T13E
CLA CLL lAC
CLPALL
DCA
GDREG2
RDSTAI
SZA CLA
JMP
TUfc
I6Z
TCNTR2
ISZ
TCNTRl
JHP
T13R
NERKOH
ERROR
TST13
5300

7104
1015
llOJ
44S0
4452
4444
4442
7610
5356
4453
1

lAl

0754
0755
0756
0757
0760

3144
4444
4442
7610
5356
7301
4453
3144
4444
7640
5356
2136
2135
5320
4437
4440
0710
5300

0761
0762

5762
1000

0777

1000
lOOO

T13E,

JMP I
T6Ti4 •!

/CLEAR CONTROL

/AMOUNT OF DRIVES
/SETUP COUNTER
/START WITH THIS DRIVE

/EXPECTED STATUS
/SETUP COMPARE REGISTER

PAGE 1*11
/GET DRIVE NO,
/PUT IN UNIT BITS
/ENABLE SLT DONE
/FUNCTION SEEK ONLY
/LOAD COMMAND
/LOAD AND GO
/READ STATUS
/CHECK RESULTS
/O.K.
/ERROR, STATUS
/CLEAR STATUS
/EXPECTED STATUS
/SETUP COMPARE
/READ STATUS
/CHEAK RESULTS
/O.K.
/ERROR, STATUS

/CLEAR CONTROL
/SETUP COMPARE
/READ STATUS
/STATUS SHOULD BE 0000
/ERROR, STATUS
/TRY NEXT DRIVE
/O.K. 4096 LOOPS
/ERROR, STATUS
/SCOPE LOOP POINTER
/TEXT POINTER
/TO NEXT TEST

PAGE
/

/VERIFY THAT DISK CAPACITY EXCEEDED DOES OCCURR
1000
1001
1002
1003
1004
1005
1006
1007
1010
1011
1012
10!3
1014
1015
1016
1017

2132
1066
1012
3135
7301
4453
7330
1073
3144
7301
1103
1070
4450
1135
4452
4432

TST14,
T14R,

ISZ
TAD
TAD
DCA
CLA CLL

REGO
TRK212
K0020
TCNTRl
I AC

CLRALL
CLA CLL CML RAR
TAD
K0002
DCA
GDREG2
CLA CLL lAC
K3000
TAD
TAD
DRIVNO
LDCMD
TAD
TCNTRl
LDADD
SKPWAT

/SETUP FOR ONE PAS
/ADDRESS POINTER
/ENABLE CLEAR CONTROL BIT
/CLEAR CONTROL

/EXPECTED STATUS
/SETUP COMPARE REGISTER
/EXTENDED TRACK BIT
/FUNCTION SEEK ONLY
/CURRENT DRIVE
/LOAD COMMAND
/LOAD AND GO
/WAIT FOR SKIP

PALIO
t020
1021
1022
1023
1024
1025
1026
1027
1030
1031
1032
1033
1034
103b
1036
1037
1040
1041
1042
1043
1044
1045
1046
1047
1050
1051
1052
1053
1054
1055
1056
1057
1060
1061
1062

Vi42

UI&4

5260
4444
4442
7610
5254

JMP
RDSTAT
ACCmPI
SKP CLA
T14SE
JMP
CLA CLL I AC
CLRALL
CMPkiG
TAD
K0200
TAD
LDCMD

7301
4453
1151
iOlb
4450
4432
5260
7330
3i44
4444
4442
7010
5254
1070
4450
3144
4 444
4442
7610
5254
2135
5204
4437
4440
1001
5300
5263
4440
1001
0006

PAGE ImiZ
/ERROR, NO SKIP
/READ STATUS
/CHECK RESULTS
/STATUS 0»K.
/ERBOP, STATUS
/ENABLE CLEAR CONTROL BIT
/CLEAR CONTROL
/GET LAST COMMAND
/GET ENABLE SEEK DONE BIT
/LOAD COMMAND
/*AXT rOR DISK SKIP
/ERi^OR, SKIP
/EXPECTED STATUS

SKPftAT

JMP
CL& CLL
DCA
RDSTAT
ACCMPl
SKP CLA
JMP
TAD
LDCMD

T14KS:

CHL RAR
GDBtG2

/READ STATUS
/CHECK RESULTS
/STATUS 0,K.
/ERROR* STATUS
/CURRENT DRIVE
/LOAD COMMAND
/SETUP COMPARE REGISTER
/READ STATUS
/CHECK RESULTS
/STATl/S 0,K,
/ERROR

DBIVNO

DC A

BDSTAI
ACCMPl
SKP CLA
Ti4S£
JMP
TCNTRl
ISZ
T14R
JMP
NERROH
EPRDR
TST14
5300
JMP
ERROR
TST14
0006

T14SE,

/LOOP
/O.K. TO NEXT TEST
/ERRORr DISK CAPACny EXCEEDED
/SCOPE LOOP POINTER
/HODiriED TEXT POINTER
/TO NEXT TEST
/ERROR, DISK SKIP
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY THAT SKIP AnO STATUS DOES OCCUR
/AFTER 256 riRlTE ALL AND READ ALL BREAKS,
/THIS SHOULD WRITE ALL ZEROS ON AND
/READ ALL ZEROS OFF THE DISK SECTOR 00000,
KILBUF
TAD
DCA
DISKGO
T15T
JMP
TAD
DCA
DISKGU
T15T
JMP
NERROR
ERROR
TST15

1063
1064
1065
1066
1067
1070
1071
1072
1073
1 074
1075
1076
1077
1100

4431
1114
3151
4425

PALIO

Vi42

20-DEC-73

UOl

5300

Ti5T,

lOl

5277
1017
3151
4425

UOl
5277
4437
4440
1064

TlSEf

/ZERO WRITE BUFFER
/WRITE ALL FUNCTION
/SETUP COMMAND
/DISK WRITE ALL
/TEXT POINTER
/ERROR* SKIP OR STATUS
/FUNCTION READ ALL
/SETUP COMMAND REGISTER
/DISK READ ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/O.K. TO NEXT TEST
/ERROR, WRITE ALL
/SCOPE LOOP POINTER

K5000
CMREG
T15E
KIOOO
CMREG
T15E

13!S4

PAGE 1-13

/MODIFIED TEXT POINTER

5300

/VERIFY THAT SKIP AND STATUS DOES OCCUR AFTER
/i28 WRITE ALL AND READ ALL BREAKS.
/THIS SHOULD <«PIT£ ALL ZEROS ON AND READ ALL
/ALL ZEROS OFF THE DtSK SECTOR 00000,
/

1102

U 14

U03

1014
3151
4425
1121
5317
1017
5 014
3151
4425
1121
5317
443?
4440

104
1105
1 106
1107
1110
1

nil
1112
1113
1114
1115
1116

tU7
U20
U2i

TST16

DISKGO
T16T
JMP
TAO
TAD
DCA

Tl6£f

U02
5300

TAD
TAD
DCA

T16T,

DISKGO
T16T
JMP
NERROH
ERROR
TST16
5300

K5000
KOlOO
CMREG
T16E
KlOOO
KOlOO
CMREG

T16E

/FUNCTION WRITE ALL
/HALF BIT
/SETUP COMMAND
/DISK WRITE ALL
/TEXT POINTER
/ERROR, DISK SKIP OR STATUS
/FUNCTION READ ALL
/HAL? BIT
/SETUP COMMAND
/DISK READ ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/O.K. TO NEXT TEST
/ERROR, WRITE ALL
/SCOPE LOOP POINTER
/MODIFIED TEXT POINTER

A WRITE ALL TO ALL OF CYLINDER 0
/AND USE DATA PATTERN 2525 + 5252.
/make: THE FIRST T^O WORDS IN THE BUFFER
/EQUAL THE DISK ADDRESS, CHECK THE DATA WITH
/READ ALL.

/VERIFY

1122

U23
1124

U25
1126
1127
1130
1131
1132
ii33
1134
1135
1136
1137
1140
1141
1142

U43
1144
1145
1146

U47
U50
1151

U52

1122
3135
1112
4430
1114
3151
1135
0117
3463
1070
3464
1463
4435
1162
5360
4431
1017
3151
135
0117
4425
1162
5360
1112
4427
I

T8Ti7 ,
Tl7S»

TAD
DCA
TAD
FILBUr
TAD
DCA
TAD
AND
DCA I
TAD
DCA I
TAD I
DISKGO
T17T
JMP
KILBUF
TAD
DCA
TAD
AND

K7740
TCNIRJ
K2925
K5000
CMREG
TCNTRl
K0037
XLOTRK
DRIVHO
XHITRK
XLOTRK

T17E
KlOOO
CMREG
TCNTRl
K0037

DISKGO
T17T
JMP
TAD

FIGURE

T17E
K2525

/SETUP SECTOR COUNTER
/FILL OUTBOUND BUFFER
/FUNCTION WRITE ALL
/SETUP COMMAND

/MASK OFF SECTORS
/SETUP ADDRESS WORD IN BUFFER
/GET DRIVE NUMBER
/SETUP ADDRESS WORD IN BUFFER
/DISK WRITE ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/KILL DATA BUFFER
/FUNCTION READ ALL
/SETUP COMMAND
/MASK OF SECTORS
/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP
/i^fORD

BY WORD COMPARE OF DATA

PALIO
ltS3

US4
115S

U57
U60

PAGE 1*14

Vt42

lil54

7610
5960
213S
5334

SKP CLA
JhP
TCNTPl
l$Z
T17S
JH9
NERROB
ERROR
TStl7
5373

/THIS SECTOR O.K.
/ERROR* DATA
/UPDATE SECTOR COUNTER
/TRY NEXT SECTOR
/O.K, TO NEXT TEST
/ERROR, READ khh
/SCOPE LOOP POINTER
/TEXT POINTER

JMP I
TSTle

/TO NEXT TEST

1161
1162

4437
4440
1122
5373

1163
1164

5764
1200

Tl?Ii

PACE
k WRITE DATA TO ALL OF CYLINDER
/AND USE DATA PATTERK 5252 + 2525,
/MAKE THE riRST TWO WQRpS OF THE BUFFEP
/EQUAL THE DtSK ADDRESS, CHECK THE
/DATA WITH READ DATA,

/VERIFY

1200
1201
1202
1203
1204
1205
1206
1207
1210
1211
1212
1213
1214
121S
1216
1217
1220
1221
1222
1223
1224
1225
1226
1227
1230
1231
1233
1233
1234
1 235
1236
1237

1122
3135
1113
4430
1104
3151

TSTlfli

Ties,

U35
0117
3463
1070
3464
1463
4425
1237
5235
4431
3151
1135
0117
4425
1237
5235
1113
4427
7610
5235
2135
5202
4437
4440
1200
5373

Tl8E,

Tl8I»

K7740
TCNTRl
K5252
TAD
riLBUF
K4000
TAD
CHREG
DCA
TCNTRl
TAD
K0037
AND
XLOTRK
DCA I
DRIVNO
TAD
XHITRK
OCA I
XLOTRK
TAD I
D25KG0
TiST
JMP
KILBUr
CMREG
DCA
TCNTRl
TAD
K0037
AND
DXSKGO
TlBT
T18E
JMP
K5252
TAD
FIGURE
SKP CLA
JMP
Ti8E
TCNTRl
ISZ
Ties
JMP
NEPROR
ERROR
TST18
5373
TAD
DC A

/SECTOR COUNTER
/FILL OUTBOUND BUFFER
/FUNCTION WRITE DATA
/SETUP COM^^AND

/MASK OF SECTORS
/SETUP ADDRESS WORD IN BUFFER
/GET DRIVE NUMBER
/SETUP ADDRESS MORD IN BUFFER
/GET ADDRESS
/DISK WRITE DATA
/TEXT POINTER
/ERROR, STATUS OR SKIP
/CLEAR DATA BUFFER
/SETUP COMMAND
/MASK OFF SECTORS
/DISK READ DATA
/TEXT POINTER
/ERRORr STATUS OR SKIP
/WORD BY WORD COMPARE OF DATA
/THIS SECTOR O.K,
/ERROR, DATA
/UPDATE SECTOR COUNTER
/TRY NEXT SECTOR
/O.K. TO NEXT TEST
/ERROR, DATA BREAK
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY THAT DISK STOPS BPEAK AFTER 128

PALIO

V142

20-DEC-73

13154

PAGE t«l5

/Zr THE HALF BIT IS SET, THE REMAINDER OF THE
/THE BUFFER SHOULD BE 0000,
/THE FIRST TKU WORDS OF THE BUFFER SHOULD
/EOUAL THE ABSOLUTE DISK ADDRESS,
5252,
/THE DATA PATTERN UjjED IS 2525
.

1240
1241
1242
1243
1244
1245
124b
1247
1250
1251
1252
1253
1254
1255
1256
1257
1260
1261
1262
1263
1264
1265
1266
1267

1112
4430
1070
3464
3463
1114
1014
3151
4425
1267
5265
4453
4431
1017
3151
4425
1267
526S
1112
4426
4437
4440
1240
5373

TST19,

T190K,
Tt9E,

T19T,

TAD
FILBUF
TAD
DCA I
DCA I
TAD
TAD
DCA
DISKGO
T19T
JMP
CLRALL
KILBUF
TAD
DCA
DISKGO
T19T
JMP
TAD
HAFCHK
NERROR
ERROR
T6T19
5373

K2525
/FILL BUFFER wITH DATA

DRIVNO
XHITRK
XLOTRK
K500C
KOlOO
CMREC
T19E

KIOOO
CMREG
T19E
K2525

/MAKE DISK ADDRESS «4DRD
/MAKE DISK ADDRESS MORO
/FUNCTION WRITE ALL
/HALF BIT
/SETUP COMMAND
/DISK WRITE ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/CLEAR STATUS
/ZERO BUFFER
/FUNCTION READ ALL
/SETUP COMMAND
/DISK READ ALL
/TEXT POINTER
/ERRORf 8KIP OR STATUS
/WORD BY WORD COMPARE DATA
/O.K, TO NEXT TEST
/ERROR. DATA BREAK
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY THAT DISK STOPS BREAK AFTER 12S
/IF THE HALF BIT IS SET. THE REMAINDER OF THE
/THE BUFFER SHOULD BE 0000.
/THE FIRST TWO WORDS OF THE BUFFER SHOULD
/EQUAL THE ABSOLUTE DISK ADDRESS,
/THE DATA PATTERN USED IS 5252 * 2525,
/

1270
1271
1272
1273
1274
1275
1276
1277
1300
1301
1302
1303
1304
1305
1306
1307
1310

1113
4430
1070
3464
3463
1114
3151
4425
1317
5315
4453
4431
1017
1014
3151
4425
1317

TST20,

TAD
FILBUF
TAD
DCA I
DCA I
TAD
DCA
DISKGO
T20T
JMP

K52S2
/FILL BUFFER WITH DATA

DRIVNO
XHITRK
XLOTRK
KSOOO
CMREG
T20E

CLRALL
KILBUF
TAD
TAD
DCA
DISKGO
T20T

KIOOO
KOlOO
CHREG

/MAKE DISK ADDRESS WORD
/MAKE DISK ADDRESS WORD
/FUNCTION WRITE ALL
/SETUP COMMAND
/DISK WRITE ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/CLEAR STATUS
/CLEAR BUFFER
/FUNCTION READ ALL
/HALF BIT
/SETUP COMMAND
/DISK READ ALL
/TEXT POINTER

i3£54
3tl
1X2

314
315
316
317

5315
4426
443?
4440
1270
5373

T200K*

T20T

JMP
TAD
HAFCHK
NCRROR
EHROR
TST20
5373

PAGE 1-16
/ERRQRf SKIP OR STATUS

T206;

K52S2
WORD COMPARE DATA
/O.K. TO NEXT TEST
/ERROR* DATA BREAK
/SCOPE LOOP POINTER
/TEXT POINTEi*
/VtORD BY

/VERIFY A WRITE ALL THEh READ ALL 128 WORDS,
/THE FIRST TWO WORDS Or THE SUFFER SHOULD
/EQUAL TH£ ABSOLUTE DXSK ADDRESS,
/THE DATA PATTERN USED IS 2525
5252,
1320

U2l
1322
1323
1324
1325
1 32&

1112
4430
1070
3464
3463

TST21

FIL8UF
TAD
DCA
DCA
TAD
TAD

Ui4
iOl4

13 27

3 1 5 1

U30
1331
1332
1333
1334
1335
1336
1337
1340
1341
1342
1343
1344
1345
1346
1347
1350

442S
1350
SS46
4453
4431
1017
1014
3151
4425
1350
5346
1112
4426
4437
4440
1320
5373

1351
1352

5752
1400

K2525

TAD

T210K,
T2iEr
T2iT*

1
r

DCA
DISKCO
T2iT
JMP
CLRALL
KILBUr
TAD
TAD
DCA
DISKCO
T2iT
JMP
TAD
Hafchk
NERROR
ERROR
TST2i
S373

/FILL BUFFER WITH DATA

DBIVNO
KHITRK
XLOTRK
K5000
KOlOO
CMREG

/HAKE DISK ADDRESS WORD
/MAKE DISK ADDRESS WORD
/FUNCTION WRITE ALL
/HALF BIT
/SETUP COHMAKD
/DISK WRITE ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/CLEAR STATUS
/ZERO BUFFER
/FUNCTION READ ALL
/HALF BIT
/SEIUP COMMAND
/DISK READ ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS

T21E
KIOOO
KOtOO
CMREG
T21E
K292S

/WORD BY WORD COMPARE DATA
/O.K. TO NEXT TEST
/ERROR, DATA BREAK
/SCOPE LOOP POINTER
/TEXT POINTER

JMP

/TO NEXT TEST

TST22
/

1400

PAGE
/

/VERIFY A WRITE ALL TO ALL OF CYLINDER
/USE DATA PATTERN 2525
5252
/CHECK FOR NO ERRORS XN STATUS,
/KAKE FIRST TwO WORDS OF EVERY SECTOR
/EQUAL TO ADDRESS OF SECTOR.

U22

TST22,

TAD
DCA
TAD

K77«0
TCNTRi
K2525

FILBUF
TAD

TCNTRI

1400
1401
1402
1403
1404

3135
1112
4430
1135

T22R1,

PALIQ

V142

20-DEC-73

1405
1406
1407
1410
1411
1412
1413
1414
1415
1416
1417
1420

0117
3463
1070
3464
1114
3151
1463
4425
1444
5242
2135
5204

AND
DCA
TAD
DCA
TAD
DCA
TAD

/FILL BUFFER WITH DATA

13154

DISKCO
T22T
JMP
I5Z
JMP

/SETUP SECTOR COUNTER
2 Vt<>

PAGE

-17

K0O37
XLOTRK
DRXVNO
XHITRK
K5000
CMREG
XLOTRK

T22E
TCMTRl
T22R1

/MASK SECTOR BITS
/SETUP ADDRESS WORD IN BUFFER
/GET DRIVE NUMBER
/SETUP ADDRESS WORD IN BUFFER
/FUNCTION WRITE ALL
/SETUP COMMAND
/GET TRACK AND SECTOR
/DISK WRITE ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP
/UPDATE SECTOR COUNTER
/MORE SECTORS TO GO

/VERIFY THAT THE DATA WRITTEN ABOVE
/ON CYLINDER 0 WAS O.K. CHECK WITH READ ALL.

K7740
TCNTRI

1U2

TAD
OCA
KILBUF
TAD
DCA
TAD
AND
DISKGO
T22T
JMP
TAD

4427
7610
5242
2135
5223
4437
4440
1400
5373

FIGURE
SKP CLA
JMP
T22E
TCNTPi
ISZ
JMP
T22R2
NERROH
ERROR
TST22
5373

1122
3135
4431
1017
3151
1135
0117
4425
1444
5242

T22K3,

T22E,
T22Ti

KIOOO
CHBEG
TCHTRl
K0037
T22E
K2525

/COUNTER FOR 37 SECTORS
/CLEAR DATA BUFFER
/READ ALL FUNCTION
/SETUP COMMAND
/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP
/WORD BY WORD COMPARE OF DATA
/BUFFER 0,K-,
/ERROR, DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CHECK
/O.K. TO NEXT TEST
/ERROR, STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY A WRITE DATA TO ALL OF CYLINDER
2525
/USE DATA PATTERN 5252
/CHECK FOR NO ERRORS IN STATUS
/MAKE FIRST TWO WORDS or EVERY 'sector
/EQUAL TO ApPRESS OF SECTOR.
1445
1446
1447
1450
1451
1452
145J
1454
1 45b
1456
1457
1460

1 122
3135
1113
4430
1135
0117
3463
1070
3464
1104
3151
1463

TST23,

T23R1,

TAD
DCA
TAD
FILBUF
TAD
AND
DCA I
TAD
DCA I
TAD
DCA
TAD I

K7740
TCNTRI
K5252

/SETUP SECTOR COUNTER
/FILL BUFFER WITH DATA

TCNTRI
K0037
XLOTRK
ORIVNO
XHITRK
K4000
CMREG
XLOTRK

/MASK SECTOR BITS
/SETUP ADDRESS »s'DRD IN BUFFER
/GET DRIVE NUMBER
/SETUP ADDRtSS WORD IN BUFFER
/FUNCTION WRITE DATA
/SETUP COMMAND
/SECTOR TO LOAD

PALIO
t46l
1462
\ 46)
1464
1465

VU2
442S
1510

DISKCO
T23T

5 i06

JMF
ISZ
JMP

2135
S251

/DISK WRITE ALL
/TEXT POlNTtR
^tnKUK* a I
Ub

T23t.

ft I

TCNTRi
T23Bi

f\JfUHlZ>

PtV-iUrv

OP\ir

^UUfVitR

/VERIFY THAT TKL DATA WRUTtN ABOVF
WITH BFin
/ON CXLINDER 0
1466
146?
1470
1471
472
1473
1474
1475
1 476
1477
1500
1501
1502
1503
1504
1505
1506
1507
J510
I

122
3135
1

44 31

T23R2r

3lSi
1135
0117
4425
1510
5306
1113
4427
7610
5306
2135

5270
4437
4440
1445
5373

T23£f
T23T#

hfcTA

K774C

TAD
DCA
KILBUF
DCA
TAD
AND

XR i

CMREG
TCNTRl
K0037

/SETUP COMMAND

DISKGQ
T2SI
JMP
T23E
TAD
KS252
FIGURE
SKP CLA
JMP
T23t
ISZ
TCNTRl
JMP
T23R2
NEPROB
ERROR
TST23
5373

/DISK R£AD DATA
/TEXT POINTER
/fRuniS.

ST JIT US nR ^IfTD

/DATA O.K.
/ERROR, DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CHECK
/O.K. TO NEXT TEST
/ERROR, WRITE ALL
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY A WRITE ALL TO ALL OF CYLINDER 145
/AND USE DATA PATTERN 2525
5252,
/THE FIRST TWO WORDS OF THE SECTOR SHOULD
/EQUAL THE DISK ADDRESS, CHECK IKE DATA
/WITH READ ALL.
1511
1512
1513
1514
1515
1516
1517
1520
1521
1522
1523
1524
1525
1526
1527
1530
1531
1532
1533
1534

1122
3135
1112
4430
7301
1070
3464
7301
1114
3151
1135
0117
1065
3463
1463
4425
1556
5354
4431
7301

ALIO

V142

1535
1536
1537
1540

1017
3151
1135
0117
1065
4425
1556
5354
1112
4427
7610

1541
1542
1543
1544
1545

1546
1547
1550
1551
1552
1553
1554
1555
1SS6

TST24»
T24S,

K7740
TCNTRl
K252S

/SETUP SECTOR COUNTER
/FILL OUTBOUND BUFFER

lAC

DRIVNO
XHITRK

/GET DRIVE NUMBER
/SETUP ADDRESS wORD IN BUFFER
/EXTENDED BIT
/FUNCTION WRITE ALL
/SETUP COMMAND
/SECTOR COUNTER
/MASK OFF SECTOR BITS
/ADO IN CYLINDER
/SETUP ADDRESS WORD IN BUFFER

lAC

K5000
CMREG
TCNTRl
K0037
CYL450
XLOTRK
XLOTRK

/DISK WHITE ALL
/TEXT POINTER
/ERROR, SKIP OP STATUS
/CLEAR DATA BUFFER
/EXTENDED BIT

T24E

KILBUF
CLA CLL lAC

13154

20-DEC-73

KIOOO
CMPEG
TCNTRl
K0037
CYL4S0

TAD
DCA
TAD
AND
TAD

5354
2135
5313
4437
4440
1511
5373

TAD
DCA
TAD
FILBUF
CLA CLL
TAD
DCA I
CLA CLL
TAD
DCA
TAD
AND
TAD
DCA I
TAD I
DISKGQ
T24T
JHP

T24E,

T24T,

DISKCO
T24T
JMP
TAD
FIGURE
SKP CLA
JMP
ISZ
JMP
NERROR
ERROR
TST24
5373

T24E
K2525

T24E
TCNTRl
T24S

PACE

•19

/FUNCTION READ ALL
/SETUP COMMAND
/SECTOR COUNTER
/MASK OFF SECTORS
/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP

/WORD BY hORD COMPARE OF DATA
/THIS SECTOR O.K.
/ERROR* DATA
/UPDATE SECTOR COUNTER
/TRY NEXT SECTOR
/O.K. TO NEXT TEST
/ERROR, READ ALL
/SCOPE LOOP POINTER
/TEXT POINTER

1557
1560

5760
1600

JMP I
TST25

/TO NEXT TEST

1600

PAGE
/

/VERIFY A WRITE DATA TO ALL or CYLINDER 1450
/AND USE DATA PATTERN 5253 * 2S2S,
/THE FIRST TWO rtORDs or THE SECTOR SHOULD
/EQUAL THE DISK ADDRESS,. CHECK THE DATA
/WITH READ DATA
1

IbOO
1601
1602
160)
1604
1605
1606
1607
1610
1611
1512
1613
1614
1615
1616
1617
1620
1621
1622
1623
1624
lb 25

lb2b
1627
16J0

1122
3135
1113
4430
1070
3464
7301
1 104
3151
1135
0117
1065
3463
1463
4425
1644
5242
4431

7 30 1

J151
5

0117
iO^'S

4425

T8T25,
T25S,

K7740
TAD
DCA
TCNTRl
K5252
TAD
riLBUF
CLA CLL I AC
DRIVNO
taU
DCA I
XHITRK
CLA CLL lAC
TAD
K4000
DCA
CMREG
TAD
TCNTRl
AND
K00J7
TAD
CYL450
DCA I
XLOTRK
TAD I
XLOTRK
DISKGO
T25T
JMP
T25E
KIL8UF
CLA CLL I AC
DCA
CMREG
TAD
TCNTRl
AND
K0OJ7
TAD
CYL450
DISKCU

/SETUP SECTOR COUNTER
/FILL OUTSOUNO BUFFER

/GET DRIVE NUMBER
/SETUP ADDRESS WORD IN BUFFER
/EXTENDED BIT
/FUNCTION WRITE DATA
/SETUP COHKAND
/SECTOR COUNTER
/MASK Orr SECTOR BITS
/ADO IN CYLINDER
/SETUP ADDRESS WORD IN BUFFER
/DISK WRITE DATA
/TEXT POINTER
/ERROR, SKIP OR STATUS
/CLEAR DATA BUFFER
/EXTENDED BIT
/SETUP COMMAND
/SECTOR COUNTER
/MASK OFF SECTORS
/DISK RKAD DATA

PALtO

V142

1631
i632

1644
5242

16 3 i

1655
1636

4427
7610
S242

6 J7

2 135

1640
1641
1642

5202

U4i
U44

UIS.4

20-DEC-73

PAGE 1.20

/TEXT POINTER
/ERRORf STATUS OR SKIP

T25T
T25E
K52S2

TAD

/WORD BY ¥(ORD CQMpAHE
/THIS SECTOR O.K.
/ERROR, DATA
/UPDATE SECTOR COUNTEP
/TRY NEXT SECTOR
/0»Kf TO NEXT TEST
/ERBORi DATA BREAK
/SCOPE LOOP POINTEP
/TEXT POINTEP

SKP CLA
T25E
JHP
TCNiRi
XSZ
JMP
T25S

44 37

4440
1600
5373

T25E,
T25T>

ERROR
TST25
5373

/VEHIFY & WRITE kLL To ALL Uf CYLINDER 1450
/USE DATA PATTEHN 5252 * 2525
/CHECK FOR HO EPFQPS IN STATDS,
/HAKE FIPST T«D WORDS OF EVERY SECTOR
/KQUAL TO ADDRESS OF SECTOR,
/

1645
1 646
1647
1650
1651
1652
1653
1654
1655
1656
1657
1660

1122
3135
1113
4430

TST26»

U35

T26Klf

1662
1663
1664
1665
1666
1667
1670

3151
1463
4425
1716

0117
1 065
3463
7301
1070
3464
7301

K7740
TCNTBi
K52S2

TAD
DCA
TAD

FILBUF
TAD
AND
TAD
DCA I
CLA CLL

/SETUP SECTOR COUNTEP
/rXLL BUFFER hlTH DATA

TCNTRl
K0037

/MASK SECTOR BITS

Ci'L45 0

/SETUP ADDRESS

XLOTRK

DXSKGO
T26T
JMP

5314
213S
S2S1

ISZ
JMP

i*0BD

I AC

DRIVNO
TAD
XHITRK
DCA 1
CLA CLL lAC
K5000
TAD
CMREG
DCA
XLOTRK
TAD I
.

T26E
TCNTRl
T26Ri

/CET DRlVt NUMBER
/SETUP ADDRESS WORD IN
/EXTENDED BIT
/FUNCTION WRITE ALL
/SETUP COMMAND
/GET TRACK AND SECTOR
/DISK WRITE ALL
/TEXT POINTER
/ERROR? STATUS OP SKIP
/UPDATE SECTOR COUNTER
/MORE SECTORS TO GO

/VERIFY THAT TKfc DATA WRITTEN ABOVE
/ON CYLINDER 1450 WAS 0,K, CHECK WITH READ ALL,
/

1671
1672
1673
1674
1575
1676
1677
1700
1701
1702

122

31 35

4431
7301
1017
3151
1135
0117
1065
4425
1716

1703
1704

5314

PALIO

V142

1705
1706
1707

1113
4427
7610
5314
2135
5273
4437
4440
1645
5373

1710.

1711
1712
1713
1714
1715
1716

T26R2,

TAD
DCA
KILBUF
CLA CLL
TAD
DCA
TAD
AND
TAD
DiSKGO
T26T
JMP

K7740
TCNTPi

TAD

K5252

FIGURE
SKP CLA
JMP

T26fc

KIOOO
CMPEG
TCNTRl
K0037
CYL450

T26E,

T26T

/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP

T26E

13154

ISZ
JMP
NERROR
ERROR
T5T26
5373

/COUNTER FOR 37 SECTORS
/CLEAR DATA BUFFER
/EXTENDED BIT
/READ ALL FUNCTION
/SETUP COMMAND

lAC

TCNTRl
T26R2

PAGE 1-21

/WORD BY WORD COMPARE OF DATA
/BUFFER O.K.
/ERROR, DATA
/UPDATE SECTOR COUt-'TER
/MORE SECTORS TO CHECK
/O.K. TO NEXT TEST
/ERROR, STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY A WRITE DATA- TO ALL OF CYLINDER 1450
5252
/USE DATA PATTERN 2S25
/CHECK FOR NO ERRORS IN STATUS,
/MAKE FIRST TWO WORDS OF EVERY SECTOR
/EQUAL TO ADDRESS OF SECTOR.
1717
1720
1721
1722
1723
1724
1725
1726
1727
1730
1731
1732
17J3
1734
1735
1736
1737
1740
1741
1742

1122
3135
1112
4430
1135
0117
1065
3463
7301
1070
3464
7301

.TST27,

T27R1,

U04
3151
1463
4425
1767
5365
2135

5323

K7740
TAD
TCNTRl
DCA
K2S2S
TAD
FILBUF
TCNTRl
TAD
AND
K0037
CYL450
TAD
XLOTRK
DCA I
CLA CLL I AC
DBIVNO
TAD
XHITRK
DCA X
CLA CLL I AC
K4000
TAD
CHREG
OCA
XLOTRK
TAD I
DISKGO
T27T
T27E
JMP
TCNTRl
ISZ
T27R1
JMP

/SETUP SECTOR COUNTER
/FILL SUFFER WITH DATA
/MASK SECTOR BITS

/SETUP ADDRESS WORD IN BUFFER
/GET DRIVE NUMBER
/SETUP ADDRESS WORD IN BUFFER
/EXTENDED BIT
/FUNCTION WRITE DATA
/SETUP COMMAND
/SECTOR TO LOAD
/DISK WRITE ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP
/UPDATE SECTOR COUNTER
/MORE SECTORS TO GO

/VERIFY THAT THE DATA WRITTEN ABOVE
/ON CYLINDER 1450 WAS O.K. CHECK WITH READ DATA,
f

1743
1744
1745
1746
1747
1750
1751
1752
1753
1754
1755
1756
1757
1760

1122
3135
4431
7301
3151
1135

0U7
1065
4425
1767
5365
1112
4427
7610

T27B2,

TAD
DCA
KILBUF
CLA CLL
DCA
TAD
AND
TAD
DISKGU
T27T
JMP
TAD
FIGURE
SKP CLA

K7740
TCNTRl
lAC

CHREG
TCNTRl
K0037
CYL450
T27E
K2525

/COUNTER FOR 37 SECTORS
/CLEAR DATA BUFFER
/FUNCTION READ DATA
/SETUP COMMAND

/DISK READ DATA
/TEXT POINTER
/ERRO^, STATUS OR SKIP
/WORD BY WORD COMPARE OF DATA
/DATA Q.K,

PALIO

V142

1761
S?62

5 365

iUi
n6«

5 34b

t765
1766
1767

JMP
tsz

2135
4437
4440
17!7
5j7i

T27L*

ERPOft

T27I

TST27
537 3

/ERRORf DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TQ CHECK
/O.K, TO NEXT TEST
/gRpORf writs: all
/5C0P£ LOOP POINTER
/TEXT POINTER

T27£
TCNTRl
T27R2

/SECTOR TIMING TEST
/VCKIFY THAT WRITE AND HEAD ALL ARE ACTUALLY DOING CONSECUTIVt:
/SECTORS. WHEN DOING CONSEC UTIVt SECTORS IN WRITE OR READ
/kll KODE, SECTOR THANSFEBS SHOULD OCCUR EVERY 2,5 KILLI/SECONDS. THE PROGRAM WILL REPORT A STATUS ERROR OF
/NO DONE FLAG IF THIS DOES NOT OCCUR,
1770
1771
1772
1773
177 4

1775
1776
1777
2000
2001
2002
2003
2004
200S
2006
20 07

2010
2011
2012
2013
2014
2015
2016
2017
2020
2021
2022
2023
2024
2025
2026
2027
2030
2031

1157
1070
313?
1 122
3135
1114
3151
7 340
1117
4425
2052
5250
1170

1135
7110

PALIO

V142

2040
2041
2042
2043
2044
2045

2U6

2(j46

T5T28

/SAVE FIELD

TAD
OCA
TAD

K 7 740
TC N TR

DC A

CMPEG

5232
4447
5242
5250
2135
5206
4457
4440
1773
530O

DRIVE

/SETUP SECTOR COUNTER
jvunrrtnu wpttc all

K5 000

CLA CLL
KOO 37
TAD
D I S KGO
T28T
JHv
T2 8 E
K5 300
TAD

/DISK WRITE ALL
/TEXT POINTER
/£RROR» Disk skip or sti

/MODIFY TEXT POINTER
T2eH#

76 3 0

2034
2035
2036
2037

2047
2050
2051
2052

HOMEMA
DBI VNO

DC A

3 25 2

1104
1017
1137
3151
1151
6746
1067
3153
1153
6744
1135
0117
3152
1152
6743
1105
3136
674S
3147
1147
1104
7650
5245

20 32
20 33

TAD
TAD

T2810A,

T28IOB,

T28IOCf
T28IOD,

TAD
Ift
RAR
CLL one

TCNTRt

13154
ISZ
JMP

DSKSKP
JMP
JHP
T280K,

T2e£,

T2eTi

/WRITE OR READ ALL?
/HERE IF kRXTE ALLl

SZL CLA
K4000
TAD
KIOOO
TAD
TCNTR3
TAD
CMREG
DC A
CMREC
TAD
DLDC
BGNBUF
TAD
CAREG
DC A
CAREG
TAD
DLCA
TCNTRl
TAD
K0037
AND
DAReG
DC A
DAREG
TAD
DLAG
K6000
TAD
TCNTR2
DC A
OPST
STRtG
OCA
STREG
TAD
K4000
TAD
SNA CLA
T280K
JHP

ISZ
JMP

TCNTR2
T28100
,-1

T2eE
TCNTPl
T2fiR

NERROR
ERROR
TST28
5300

DRIVE
/GET FIELD
/SAVE FOP ERROR TYPEOUT
/LOAD COMMAND REGISTER

/SAVE rOF ERROR TlfPEOUT
/LOAD CURRENT ADDRESS

/MASK SECTOR BITS
/SAVE FOR ERROR TYPEOUT
/LOAD AND GO
/TIME COUNTER
/READ STATUS REGISTER
/SAVE FOR ERROR TYPEOUT
/WAS STATUS 4000
/YE5» GOT TRANSFER DONE

PAGE t«23

/UPDATE TXHE COUNTER
/WAIT FOR GOOD STATUS
/ERROB» HAVE TO WAIT FOR FLAG
/HANG IF NO SKIP
/ERRDRr WRITE ALL
/UPDATE SECTOR COUNTER
/MORE TO TEST
/O.K. TO NEXT TEST
/ERROR, WRITE OR READ ALL
/SCOPE LOOP POINTER
/TEXT POINTER

/SECTUR TIMING TEST
/VERIFY THAT READ AND WRITE DATA ARE NOT DOING CONSECUTIVE
/SECTORS, WHEN TRYING TO DO CONSECUTIVE SECTORS IN READ DATA
/OR WRITE DATA MODE, SECTOR TRANSFERS SHOULD OCCUR EVERY DISK
/REVOLUTION, APROX. EVERY 40 MILLISECONDS, THE PROGRAM WILL
/REPORT AN ERROR OF A DONE FLAG IF THIS DOES NOT OCCUR
/

2053.

2054
2055
2056
2057
2060
2061
2062
2063
2064
2065
2066
2067
2070
207i
2072
2073
2074
2075
2076
2077
2100
2101
2102
2103
2104
2105
2106
210?
2110
2111
2112
2113
2114

2U5

1122
3135
3151
1117
4425
2126
5324
1170
3326
1135
7110
7630
1104
1137
3151
1151
6746
1067
315J
1153
6744
1135
0117
3152
1152
6743
1105
3136
3144
6745
3147
1147
7640
5324
2136

TST29,

TAD
DC A
DC A
TAD

DISKGO
T29T
JHP
TAD
DC A

T29K,

T29IOA,

T29IOa#

T29IOCr

T2910D,

TAD
CLL RAR
SZL CLA
TAD
TAD
OCA
TAD
DLDC
TAD
DCA
TAD
DLCA
TAD
AND
DCA
TAD
DLAG
TAD
DCA
DCA
ORST
DCA
TAD
SZA CLA
JMP
ISZ

K7740
TCNTRl
CMREG
K0037
T29E

K530a
T29T
TCNTRt
K4000
TCNIR3
CMREG
CMREG

/SECTOR COUNTER
/SETUP COMMAND
/DISK READ DATA
/TEXT POINTER
/ERROR, SKIP OR STATUS

/MODIFY TEXT POINTER
/READ DATA OR WRITE DATA
/HERE IF WRITE DATA{
DRIVE
/GET FIELD
/SAVE FOR ERROR TYPEOUT

/LOAD COMMAND REGISTER

BGNBUF
CAREG
CAREG

/SAVE FOR ERROR TYPEOUT
/LOAD CURRENT ADDRESS

TCNTRl
K0037
DAREG
DAREG

/MASK SECTOR BITS
/SAVE FOR ERROR TYPEOUT
/LOAD AND CO

K6000
TCNTR2
G0REG2
STREG
STPEG
T29E
TCNTR2

/TIME COUNTER
/EXPECTED STATUS
/READ STATUS REGISTER
/SAVE FOR ERROR TYPEOUT
/STATUS O.K.?
/ERROR IN STATUS
/UPDATE TIME COUNTER

VU2
2116
2it7
2120
2121
2122
2123
2124
2125
2136

Uf 54

20.DEC -73

5310
4447
5317

2Ub

T29UK,

JMP
DSKSKp

T2910D

l&l

TCNIBl
T29R

JMP

5264
4457
4440
20S3
S300

T29t,

T29T#

/WAIT rOP GOOD STATUS
/EPRORr HAVE TO WAIT FOH FLAG
/HANG IF NO SKIP
/UPDATE SECrOH COUKTER
/MORE TO TEST
/D,K, TO NEXT T&ST
/iCRRORr STATUS
/SCOPE liOOP POIhTER
/HODlriKO TEXT POINTER

ERROR
Tata?
5J00

/DATA TH&NSFEB IS WORKING, NO* CHECK CRC WORD IN
/THK C RC REGISTER AFTER A READ ALL, THE CRC SHOULD BE
/ALL 0 & FOR ALL O'S DATA PATTERN,
/

2127
2130
2131
2132
2133
2134
2135
2136
2137
2140
2141
2142
2143
2144
2145
214b
2147
2150
2151
2152
2153
2154
215S
2156
2157
3160
2161
2162
3163
2164
216$
2166
2167
3170
2171

1107
3135
7301
4453
4431
1114
3151
1135
0116
4425
2171
5367
1017
3151
1135

2172
2173

5773
2200

TST30,

TAD
DC A

K7760
TCNTRl

T30R*

CLA CLL

I AC

/SETUP SECTOR COUNTER
/CLEAR CONTROL
/CLEAR BUFFER AREA
/FUNCTION WRITE ALL
/SETUP COMMAND

CLRALL
KILBUF
TAD
OCA
TAD
AND

K5000
CKREG
TCNTRl
K0017

/MASK SECTOR BITS
/DISK WRITE ALL
/TEXT POINTER
/ERROHr STATUS OR SKIP
/FUNCTION READ ALL

DI8KG0
T30I
JHP
TAD
OCA
TAD
AND

0U6

T30E
KIOOO
CMREG

/SciTUr Ct(MWJlP*u

TCNTJtl

/MASK SECTOR BITS
/DISK READ ALL
/TEXT POINTER
/ERRORi STATUS DP SKIP

K0017

DZSKCO
T30T

4425
2171
536?
1171
3371
7301
4453
3143
3144
4454
4443
7610
5367
2135
5331
4437
4440
2127

TJOE
JMP
K6304
TAD
OCA
T30T
CLA CLL I AC

CLRALL
DC A

T30Ci
T30T,

6304

DCA
RDCRC
ACCMP2
SKP CLA
JMP
ISZ
JMP
MEBROR
ERROR
TST30
6304

GDREGl
GDREG2

/MODIFY TEXT POINTCH
/ENABLE CLEAR CONTROL
/AND CLEAR BRK ENABLE FLOP
/STORE IN COMPARE RREGI6TER
/STORE IN COMPARE REGISTER
/READ CRC REGISTER
/CHECK RESULTS
/O.K.

/ERROR, CRC
/UPDATE SECTOR COUNTER
/MORE SECTORS TO TEST
/O.K. TO NEXT TEST
/ERROR, CRC
/SCOPE LOOP POINTER
/TEXT POINTER

T30E
TCNTRl
T30R

JMP I
TST31

. + 1

PACE
/

PALIO

13154

V142

PAGt 1»25

/vrnrKY that the; chc word written
/ON DiSK IS CURRtXT, CCKPARL IT TO
/KNOWN VALUt IN COPE. ON A READ ALL TH^
/CRC HEAD FROM DISK IS LEFT IN THE CRC BUFFER,
5252,
'THE CRC SHOULD BE 116047 FOR DATA 2525
2200

1107

2;i0l

3135
7301
44S3
1112
4430
1114
3151
1135
0116
1107
4425
2247
5245

2202
2203
2204
2205
2206
2207
2210
2211
22!2
2213
2214
2215
2216
2217
2220
2221
2222
2223
2224
2225
2226
2227
2230
2231
2232
2233
2234
2235
2236
2237
2240
2241
2242
2243
2244
2245
2246
2247

1017
3151
1135
0116
1107
4425
2247
5245
1171
3247
7301
4453
1162
3143
1163
3144
4454
4443
7610
5245
2135
5202
4437
4440
2200

6304

TST3i

K7760
TAD
TCNTRl
DCA
CLA CLL I AC

/SETUP SECTOR COUNTER

CLRALL

/CLEAR CONTROL

TAD

FILBUF
TAD
DCA
TAD
AND
TAD

DISKGO
T31T
JMP

K252S
/FILL DATA BUFFER
/FUNCTION WRITE ALL
/SETUP COMMAND

K5000
CMPtG
TCNTRl
K0017
K7760

/MASK SECTOR BITS

/DISK WRITE ALL
/TEXT POINTER
/ERROPf STATUS OR SKIP
/FUNCTION READ ALL
/SETUP COMMAND

T31E
KiOOO
CMREG
TCNTRl
K00i7
K7760

TAD
DCA
TAD
AND
TAD
DISKGO
T31T
T31t
JMP
K6304
TAD
T31T.
DCA
CLA CLL I AC

CLRALL

T31E,

T3iT,

TAD
DCA
TAD
DCA
RDCRC
ACCMP2
SKP CLA
JmP
ISZ
JMP
NERROR
ERROR
TST31
6304

/MASK SECTOR BITS
/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP

CRWRD^
GDREGl
CRWRD2
GDREG2

T31E
TCNTRl
T31P

/MODIFY TEXT POINTER
/ENABLE CLEAR CONTROL AND
/CLEAR BRK ENABLE FLOP,
/GET GOOD CRC
/STORE IN COMPARE RRECISTER
/GET GOOD CRC
/STORE IN COMPARE REGISTER
/READ CRC REGISTER
/CHECK RESULTS
/O.K,
/ERRORf CRC
/UPDATE SECTOR COUNTER
/MOKE SECTORS TO TEST
/O.K, TO NEXT TEST
/ERROR, CRC
/SCOPE LOOP POINTER
/TEXT POINTER

/REALLY PROVE THE HEADS ARE MOVING,
/VERIFY A WRITE ALL TO ALL OF CYLINDER 1450
/AND THEN CYLINDER 0, USE DATA PATTERN 5252 +
5252 ON CYLINDER 0,
/CYLINDER 1450 AND 2525
/CHECK FOR NO ERRORS IN STATUS,
/MAKE FIRST TftO WQRDS OF EVERY SECTOR
/EQUAL TO ADDRESS OF SECTOR,
/

I3f 54

20-DEC-73

PAG£ 1»26

/riKST WRITE CYLINDER 1450
2250
2251
22S2
2253
2254
2255
2256
2257
2260
2261
2262
2263
2264
226S
2266
226 7
2270
227i
2272
2213

1122
3135
1113
4430
7301
1070
3464
1135
0117
1065
3463
7301
1114
3151
1463
4425
2362
5360
2135
5257

2274
2275
2276
2277
2300
2301
2302
230)
2304
2305
2306

1122
3135
1112
4430
1135
0117
3463
1070
3464
1114
3151
1463
4425
2362
5360

TST32,

K7740
TCNTBl
K52b2

TAD
DCA
TAD

/SETUP SECTOR COUNTER
/FILL BUFFER WITH DATA

flLBUF
CL& CLL I AC
DRlVNO
TAD
XHItRK
DCA I
TCNTRl
TAD
K00i7
AND
CyL450
TAD
XLOTRK
DCA
CLA CLL I AC
K5000
TAD
CMBKG
DCA
XLOTRK
TAD 1
DI5KGQ
T32I
T32E
JMP
TCNTRl
ISZ
T32R1
JMP

/GET DRIVE NUMBER
/SETUP ADDRESS rtOBD IN BUFFER

/MASK SECTOR BITS
/LOWER CYLINDER
/SETUP WORD IN BUFFER

/FUNCTION WRITE ALL
/SETUP COMMAND
/SECTOR TO GO
/DISK WRIT ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP
/UPDATE SECTOR COUNTER
/MORE SECTORS TO GO

/WRITE ALL TO ALL OF CYLINDER 0
/

2307
2310
2311
2312
2313

2314

K7740
TCNTRl
K2525

TAD
DCA
TAD

/SETUP SECTOR COUNTER
/FILL BUFFER WITH DATA

riLBUi'"

T32B2,

TAD
AND
OCA
TAD
DCA
TAD
DCA
TAD

DISKGO
T32T
JMP

2US

ISZ
JMP

5300

TCNTBl
K0037
XLOTRK
DRIVNO
XHITRK
K5000
CMR£G
XLOTRK

/MASK SECTOR BITS
/SETUP ADDRESS WORD IN BUFFER
/GET DRIVE NUMBER
/SETUP ADDRESS WORD IN BUFFER
/FUNCTION WRITE ALL
/SETUP COMMAND
/SECTOR TO LOAD
/DISK WRITE ALL
/TEXT POINTER
/ERROR, SKIP OR STATUS
/UPDATE SECTOR COUNTER
/MORE SECTORS TO GO

T32E
TCNTBl
T32R2

/VERIFY THAT THE DATA WRITTEN ABOVE
/ON CYLINDER 1450 WAS O.K. CHECK WITH READ ALL,
/

TAD
DCA
KILBUF
CLA CLL
TAD
DCA
TAD
AND
TAD

K7740
TCNTRl

2315
2316
2317
2320
2321
2322
2323
2324
2325

1122
3135
4431
7301
101?
3151
1135
0117
1065

PALIO

V142

2326
2327
2330
2331
2332
2333
2334
2335
2336

4425
2362
5360

DISKGO
T32T
JMP

1M3

TAD

4427
7610
5360
2135
5317

SKP CLA
T32E
JMP
TCNTRl
ISZ
JMP
T32R3

T32H3,

/COUNTER FOR 37 SECTORS
/CLEAR DATA BUFFER

lAC

/HEAD ALL FUNCTION
/SETUP COMMAND

KiOOO
CMPEG
TCNTRl
K0037
CYL450

t3l!>4

/ADD IN CYLINDER

PAGE 1-27

T32E
K52S2

FlttURE

/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP
/WORD BY WORD COMPARE OF DATA
/DATA O.K.
/ERROR* DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CHECK

/VERIFY THAT THE DATA WRITTEN ABOVE
/ON CYLINDER 0 MAS O.K. CHECK WITH READ ALL,
2337
2340
2341
2342
2343
2344
2345
2346
2347
2350
2351
2352
2353
2354
2355
2356
2357
2360
2361
2362

1122
3135
4431
1017
3151
1135
0117
4425
2362
5360
1112
4427
7610
5360
2135
5341
4437
4440
2250
5373

2363
2364

5764
2400

K7740
TCNTRl
KILBUF
KIOOO
TAD
CMRE6
DCA
TCNTRl
TAD
AND
K0037
DISKCU
T32T
T32E
JMP
K2S25
TAD
FIGURE
SKP CLA
T32E
JMP
TCNTRl
ISZ
JMP
T32H4
NERROK
ERROR
TST32
5373
TAD
DCA

T32R4,

T32E»
T32T,

/COUNTER FOB 37 SECTORS
/CLEAR DATA BUFFER
/READ ALL FUNCTION
/SETUP COMMAND
/DISK READ ALL
/TEXT POINTER
/ERROR, STATUS OR SKIP

/WORD BY WORD COMPARE OF
/DATA O.K.
/ERROH, DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CHECK
/O.K, TO NEXT TEST
/ERROR, WRITE ALL
/SCOPE LOOP POINTER
/TEXT POINTER

JMP I
TST33

/TO NEXT TEST

2400

PAGE
/

/REALLY PROVE HEADS ARE MOVING,
/VERIFY A WRITE DATA TO ALL OF CYLINDEP 0
5252 ON
/THEN CYLINDER 1450. USE DATA PATTERN 2525
/CYLINDER 1450 AND 5252 + 2525 ON CYLINDER 0.
/CHECK FOB NO ERBOPS IN STATUS,
/MAKE FIRST TwO WORDS OF EVERY SECTOR
/EQUAL TO ADDRESS OF SECTOR,
/

/FIRST WRITE DATA TO CYLINDER 0,
/

2400
2401
2402
2403
2404
2405

1122
3135
1113
4430

TST33,

7300
1135

T33R1,

TAD
DCA
TAD
FILBUK
CLA CLL
TAD

K7740
TCNTRl
K5252

/SETUP SECTOR COUNTER
/FILL BUFFER WITH DATA

TCNTRl

PALIO
2406
2407
2410
2411
2412

24U
2414
24iS
2416
2417
2420
3421

Vi42

20-DEC-73

0117
3463
1070
3464
1104
3151
1463
442&

13154

AND
DCA
TAD
DCA
TAD
DCA
TAD

PAGE i«28

K0037
XLOTRK
DRIVNO
XttlTRK

K4000
I

XLOTRK

DISKGU
T33T

2S1 1

SJ07

JMP
ISZ
JMP

21 J!J

«^04

Ti3fM

/MASK OFF SECTOR BITS
/SETUP ADDRESS WORD IN
/GET DRIVE NUHBER
/SETUP ADDRESS rtORD IN
/FUNCTrON WRITE DATA
/SETUP COMMAND
/SECTOR TO LOAD
/DISK WRITE DATA
/TEXT PUINTbP
/ERROR, STATUS UR BMP
/UPDATE fifcCTOP COUNTER
/MOPE StClOkft TO GO

/WRITE DAT* TO ALL QT CYLINUEH 1450
/

2422
2423
242 4
242S
2426
2427
2430
2431
2432
2433
2434
2435
2436
2437
2440
2441
2442
2443
2444
2445

1122
3135

4430
7301
1070
3464
1135
0117
1065
3463
7301
1104
3151
1463
4425
2511
5307
2135
5231

T33R2,

TAD
DCA
TAD
FILBUF
CLA CLL
TAD
DCA I
TAD
AND
TAD
DCA I
CLA CLL
TAD
DCA
TAD I
DISKGO
T33T
JMP
ISZ
JMP

K7740
TCNTRl
K2525

/SETUP SECTOR COUNTER

/FILL BUFFER

bkXTH

DATA

lAC

DRIVNQ
XHITRK
TCNTRl
K00i7
CYL450
XLOTRK
lAC

K4000
CMREG
XLOTRK
T33E
TCNTRl
T33R2

/GET DRIVE NUMBER
/SETUP ADDRESS WORD XN
/MASK OFF SECTOR BITS
/ADD IN CYLINDER
/SETUP ADDRESS WORD IN
/EXTENDED TRACK BIT
/FUNCTION WRITE DATA
/SETUP COMMAND
/SECTOR TO LOAD
/DISK WRITE DATA
/TEXT POINTER
/ERROR, STATUS OR SKIP
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CO
.

/VERIFY THAT THE DATA WRITTEN ABOVE
/OK! CYLINDER 0 WAS O.K. CHECK WITH READ DATA,
/

2446
2447
2450
2451
2452
2453
2454
2455
3456
2457
2460
2461
2462
2463
24S4

1122
3135
4431
3151

T33RJ,

U35
Oil?
4425
2511
5307

llU
4427
7610
5307
213S
5250

TAD
DCA
KILBUF
DCA
TAD
AND
DISKGO
T33T
JMP
TAD
FIGURE
SKP CLA
JMP
ISZ
JMP

K7740
TCNTRl

CMREG
TCNTRl
K0037
T33E
K52S2
T33L
TCNTRl
T33R3

/COUNTER FOB 37 SECTORS
/CLEAR DATA BUFFER
/SETUP COMMAND
/DISK READ DATA
/TEXT POINTER
/ERROR, STATUS OR SKIP
/^ORD 8^ WORD COMPARE OF
/DATA O.K.
/ERROR, DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CHECK

PALIO

Vt42
/VERIFY THAT THE DATA WRITTEN ABOVE
/ON CYLINDER 1450 WAS O.K» CHECK AlTH READ DATA.

246b
2466
2467
2470
2471
2472
2473
2474
2475
2476
2477
2500
2501
2502
2503
2504
2505
2506
2507

2510
2511

U22

TAD
DCA
KILBUF
CLA CLL
DCA
TAD
AND
TAD

3135
4431
7301
3151
1135

1065
4425

5373

T33E»

T33T

/SECTOR COUNTER
/CLEAR DATA BUFFER

lAC

CMREG
TCNTRl
K0037
CYL450

DISKGO
T33T

251 1

5307
1112
4427
7610
5307
2135
5267
4437
4440
2400

K7740
TCNTRl

T33E
JMP
K2525
TAD
FIGURE
SKP CLA
T33E
JMP
TCNTRl
ISZ
T33R4
JMP
KERROR
ERROR
TST33
5373

/SETUP COMMAND
/ADD IN CYLINDER
/DISK READ DATA
/TEXT POINTER
/ERROR, STATUS OP SKIP

/WORD BY WORD COMpARE OF DATA
/DATA 0,K,
/ERROR, DATA
/UPDATE SECTOR COUNTER
/MORE SECTORS TO CHECK
/0»K, TO NEXT TEST
/ERROR* WRITE DATA
/SCOPE LOOP POINTER
/TEXT POINTER

/VERIFY A CYLINDER ADDRESS ERROR IN
/STATUS REGISTER, CAN BE CAUSED BY ISSUEING
/MAINTENANCE SHIFT CRC AFTER DISK
/HAS ACCEPTED THE ADDRESS,
/

2512
2513
2514
2515
2516
2517
2520
2521
2522
2523
2524
2525
2526
2527
2530
2531
2532
2533
2534
2535
2536
2537
254U
2541
2542

7301
4453
4423
2546
5344
7301

U57
1070
1104
4450
7301
1104
3144
1066
4452
7330
4455
7010
4455
7010
4455
4447
5337
4444
4442

TST34,

CLA CLL lAC

CLRALL
SEEK
T34T
T34E
JMP
CLA CLL lAC
HOMEMA
TAD
&R1VN0
TAD
TAD
K4000
LDCMD
CLA CLL lAC
K4000
TAD
GDREG2
DCA
THK212
IAD
LDADD
CLA CLL CML RAP
LDMAN

/CLEAR CONTROL
/SEEK ONLY TRACK 0
/TEXT POINTER
/ERROR, SKIP OR STATUS

/TOTAL COMMAND WRITE DATA
/LOAD COMMAND REGISTER

/EXPECTED STATUS
/LOAD AND GO READ

/ENTER MAIMTENANCE,

RAR

/SET DB4 FOR ENABLE SHIFT

LOMAN
RAP
LDMAN

/SHIFT CRC
/WAIT FOR FLAG

DSKSKl^

JMP
RDSTAT
ACCHPl

.-1

/READ STATUS REGISTER
/CHECK RESULTS

20-DEC«73
2543
2544
2&4S
2S46

4437
4440
2512
5300

2547
2S5Q

5750
2600
1

NtBROR
ERROR
TST34
5300

T34E»

jHP I
T5T35

/O.K. TO NEXT T£ST
/ERROR, CYLINDER ADDRESS
/SCOPE LOOP POINTER
/TEXT POINTER

/TO NEXT TEST

. + 1

PACE

2600

A CRC ERBOP By ENTERING MAINTENANCE
/AND SHIFTING CBC IN *RITE kll MODE ,

2b00
260 1
2602
260 3

CLA CLt
CLRALL
KILBUF
TAD
LDCUR
TAD
TAD
TAD
LDCMD

TST35,

7 3 01

445 3
4 4 31

10 67

2d 1 0
)

«^
2612i
261 4

2616
2617
2620
2621
26 22

262 3
2624
2625
2626
2627
2630
2631
2632
2633
2634
2635
26 36
26 37

2640
2641
2642
2643
2644
2645
2646

tOADD

'330

CLA

4455
7010
4455
7010

l/DMAN

CLli

lAC

/CLLAR CuNTRuL
/CLbAK our FbH AKC>A

BGNBUF
/hOfkU

HUMEMA
DRIVNO
K5000

CURRbnl AUPRc.55

tUMnAniU
/lUiAL
/LOAD COMMAND
/LOAD AND GO fl^lTt ALL

CML RAP

/ENTER HAXNIENANCC

RAR

LDMAN
RAR
TAD
LDMAN
DSKSKP
JMP
CLA CLL
CLRALL
CLA CLL
TAD
DCA
TAD
LDCUR
TAD
TAD
TAD
LDCMD
LDADD
DSKSKP
JMP
RDSTAT
ACCMPl
NERROR
ERROR
TSTJ5
5300

107 3
44 47
52 2 0
7 3 01
4 45 3
7 3 3 0

1011
3144
1067
4451
1157
1070
1017
4450
4 45 2

4447
5237
4444
4442
4437
4440
2600

T35E,

SiOO

/SET 0B4 TO ENABLE SHIFT
/SET AC BIT 10 DATA
/SHIFT CBC
/SKIP ON ERROR FLACi
/KEEP SKiriXNG CRC TILL ERROR

K0002
1-2
I AC

/CLEAR CDnTHDu
CML BAP
KOOlO
GDBEG2
BGNBUF

/EXPECTED STATUS REGISTER
/LOAD CURRENT ADDRESS

HOMEKA
DBIVNO
KIOUO

/TOTAL BEAD ALL COMMAND
/LOAD COMMAND REGISTER
/LOAD AND CO READ ALL
/hAIT AND SKIP ON CRC ERRORl

.•1

/READ STATUS REGISTER
/CHECK RESULTS
/0,K« TO NEXT TEST
/ERBOHi ChC ERROR
/SCOPE POINTER
/TEXT POINTER

/BIG ADDRESSING TEST
/FORMAT THE COMPLETE DISK SURFACE WITH

PALIO

VU2

13154

PAGE I«31

/WRITE ALL< USE DATA PATTERN 2S2S * 52S2
/MAKE FIRST TWO WORDS OF EVERY SECTOR
/EQUAL TO ABSOLUTE ADDRESS OF SECTOR,
/

2647
7301
2650
4453
2651
1112
2652
4430
2653
3463
265 4
1070
2655
3464
2656
1070
2657
1157
2660
1114
2661
3151
2662
1067
2663
3153
2664 7330
2665
3144
2666
1463
2667
3152
2670
1067
2671
6744
2672
1151
2673 6746
2674
1463
2675
6743
2676 6741
2677
5276
2700 6745
2701
3147
2702
1147
2703 1 104
2704 7640
2705 5325
2706 7301
2707
6742
2710 2463
2711
5314
2712 2151
2713 2464
2714 1464
2715
7110
2716 7620
2717
5264
2720 1463
2721
1172
2722
7640
2723
5264
2724 44 37
2725
4440
2726
?647
2727
5300

CLA CLL
CLRALL
K2525
TAD

T5T36

rUBUF
XLOIRK
DBIVNO
XHITHK
DRIVNO
HOMEMA
K5000
CmPEG
BGNBUF
CABEG
CLA CLL CML BAP
DCA
GDPEG2
TAD I
XLOTBK
DCA
DAREG
TAD
BCNeUF
DCA
TAD
DCA
TAD
TAD
TAD
DCA
TAD
DCA

I0T4&1

I0T6AI
IOT3Ai

lOTUl

T36I,

DLCA
TAD
CMPEG
DLDC
TAD I
XLOTRK
DLAG
D5KP
JMP
DRST
DCA
STBEG
TAD
STREG
TAD
K4000
SZA CLA
JMP
T36E
CLA CLL I AC
DCLB
tSZ I
XLOTRK
JMP
.3
ISZ
CMREG
ISZ I
XHITRK
TAD I
XHITRK
CLL RAR
SNL CLA
JMP
T36H
TAD I
XLOTRK
TAD
ENDTRK
SZA CLA
JMP

/CLEAR CONTROL

/FILL SUFFER WITH DATA
/COUNTER
TRACK WORD
/GET DRIVE NUMBER
/COUNTER 4 TRACK WORD
/CURRENT DRIVE
/CURRENT FIELD
/FUNCTION WRITE ALL
/SETUP COMMAND
/GET START OF BUrFER
/FOR ERROR PRINTER

/SETUP EXPECTED STATUS COMPARE
/FOR ERROR PRINTER
/START OP BUFFER
/LOAD CURRENT ADDRESS
/LAST COMMAND
/LOAD COMMAND REGISTER
/SECTOR TO LOAD
/LOAD AND 60
/DISK SKIP lOT
/WAIT FOR FLAG
/READ STATUS
/SAVE FOR ERROR PRINTER
/GET IT
/ADD IN FUDGE FACTOR
/STATUS 0,K,T?T?
/HO, STATUS ERROR
/ENABLE CLEAR CONTROL
/CLEAR CONTROL

NERROR
ERROR
TST36
5300

/DON'T SET EXTENDED TRACK
/YES, SET IT
/SETUP BUFFER ALSO
/GET TRACK WORD
/GET EXTENDED BIT TO LINK
/WAS IT SET
/NO, CONTINUE
/GET LOwER TRACK WORD
/ADD IN FUDGE FACTOR
/DONE WITH DISK
/NO, MORE TO GO
/O.K. TO NEXT TEST
/EBBOP^ STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

JHP

/TO NEXT TEST

2730

5731

PALIO

VH2

ilil

3000

I3I54

page:

1-32

PAGE
/

/BIG ADDPt-SSlNG CHtCKi
/IF A DATA tPROK SHOULD HAPPEN TO OCCUR
/wlIH THE FIB5T TWO WORDS OF THE BUFFtP* YOU
/SHOULD REALIZE THAT TH£ PROBLCH COULD BE
/ADDRESS.ING,
/
/

/VERIFY THAI THE DATA Qti DISK 15 CORRECT
/CHECK THE COMPLETE SURFACE
/THE DATA ON THE COMPLETE DISK SHOULD BE 25125
/HOWEVER, THE TitQ FIRST WORDS OF EVERY SECTOR
/SHOULD EQUAL THE ABSOLUTE DISK ADDRESS.
3000
3001
3002
3003
3004
3005
3006
3007
3010

30U
3012
3013
3014
3015
3016
3017
3020
3021
3022
3023
3024
3025
3026
3027
3030
3031
3032
3033
3034
3035
3036
3037
3040
3041
3042
3043
3044
3045

PALIO

3135
1017
1157
1070
3151
1207
7410
3077
3174
1067
3153
7340
3173
4431
1135
3152
1067
6744
1151
6746
1135
6743
6741
5226
6745
3147

U47

305 1

7 301

3 05 2

6742
1167
3277

Ui2
4427
7610
5275
2135
7610
2151
1151
0072
7650
5213

U35

307 3

1172
7640
5213

3074
3075
3076
3077

4440
3000
5300

307 1

DCA
TAD
I0T4A2f OLCA
TAD
IOT6A2* DLDC
TAD
I0T3A2# DLAG
I0T1A2, DSKP
JMP
I0T5A2I DBST
DCA
TAD
TAD-

44 37

TCNTRl
KIOOO
HOMEMA
DRIVNO
CMREG

/FUNCTION READ ALL
/CURRENT FIELD
/CURRENT DRIVE
/SETUP COMMAND
/GET TEXT POINTER
/TEXT POINTER
/SAVE. FOR CRC ERROR
/GET START OF BUFFER
/SAVE FOR ERROR PRINTER

SAVPCT
BGNBUF
CAREG
CHA
SOFERB

/SETUP CRC ERROR POINTER
/CLEAR DATA BUFFER
/LOMER DISK ADDRESS
/SAVE FOR PRINTER
/GET START OF BUFFER
/LOAD CURRENT ADDRESS
/GET COMMAND
/LOAD COMMAND REGISTER
/GET DISK ADDRESS
/LOAD DISK ADDRESS AND CO
/DISK SKIP lOI
/WAIT FOR DISK SKIP
/READ STATUS
/SAVE FOR ERROR PRINTER

TCNIRl
DAREG
BGNBUF

CMREG
TCNTRl
."1

STRtG
K4000

/ADD IN FUDGE FACTOR
/STATUS O.K.
/NO STATUS ERRORS
/EXPECTED STATUS
/SETUP COMPARE REGISTER
/GET STATUS PtAU
/>5ASK roR CRC
/isAS IT CRC ERROR
/YES CRC ERROR
/GET TEXT POINTER
/SAVE IT

•

SNA CLA

T37A
JMP
CLA CLL CML RAR
GDRtG2
DCA
STRLG
TAD
AND
KOOlO
SZA CLA
*4
JMP
TAD
K5300
TJ7T
DCA

V142
317J
5253

DCA
TAD
TAO
TAD
DCA
TAD
SKP
T37T
OCA
TAD
DCA
CLA CLL
DCA

KILBUF
TAD

1147
0011
7640
5^47
1170
3277

3046
3047
3050

3072

T37R,

1104
7650
5251
7J30
3144

527!>

3053
3054
3055
305b
3057
3060
3061
3062
3063
3064
3065
3066
3067
3070

TSTj7,

13154

T37E
JMP
SOPERR
DCA
.f 3
JMP
CLA CLL I AC
17A,
iOT2fe2» DCLB
K5373
TAD
T37T
DCA
K2525
TAD
FIGURE
SKP CLA
T37E
JMP
TCNTRl
ISZ
SKP CL&
CKBEG
ISl
CMREG
TAD
KCOOl
AND
SNA CLA
JMP
T37R
TCNIRl
TAD
ENDTRK
TAD
SZA CLA
JMP
T37R
MLRROR
ERROR
T37E,
TST37
5300
T37T,
:

PAGE 1-33

/STATUS ERROR NOT CRC
/SET CRC ERROR POINTER
/DON'T CLEAR CONTROL
/ENABLE CLEAR CONTROL
/CLEAR CONTROL
/SETUP TEXT POINTER
/GET EXPECTED DATA
/CHECK DATA READ
/THIS ONE 0,K,
/ERROR, DATA
/UPDATE LOWER DISK ADDRESS
/SET EXTENDED BIT
/IS EXTENDED SET
/NO, CONTINUE

/ADD IN FUDGE FACTOR
/DONE WITH DISK
/NO, MORE TO CO
/0,K« TO NEXT TEST
/ERROR* STATUS
/SCOPE LOOP POINTER
/TEXT POINTER

/BIG ADDRESSING CHECKl
/IF A DATA £;RR0B SHOULD HAPPEN TO OCCUR
/WITH THE FIRST TWO WORDS OF THE BUFFER, YOU.
/SHOULD REALIZE THAT THE PROBLEM COULD BE
/ADDRESSING.
/

/READ ALL SECTORS ON THE DISK AND CHECK
/THE STATUS, IF STATUS ERROR OCCURPES THEN CHECK THE DATA,
5252.
/THE DATA ON THE COMPLETE DISK SHOULD BE 2525
/HOWEVER, THE TWO FIRST WORDS OF EVERY SECTOR
ADDRESS,
DISK
ABSOLUTE
/SHOULD EQUAL THE
/

3100
3101
3102
3103
3104
3105
3106
3107
3110
3111
3112
3113
3114

3US
3116
3117

7340
3173
3135
3136
1017
1070
1157
3151
1067
4451
1151

4450
1135
4452
4447
5316

TST38,

CLA CLL
DCA
DCA
DCA
TAO
TAD
TAD
DCA
TAD
LDCUR
TAO
LDCMD
TAD
LDADD
DSKSKP
JMP

CMA
SOFERR
TCNTRl
TCNTR2
KIOOO
DRIVNO
HOMEMA

CHREC
BGNBUF
CMREG
TCNIRl
.-1

/SETUP CRC ERROR POINTER
/SETUP LOWER ADDRESS
/SETUP EXTENDED
/FUNCTION READ ALL
/CURRENT DRIVE
/CURRENT FIELD
/SETUP COMMAND
/START OF BUFFER
/LOAD CURRENT
/LAST COMMAND ISSUED
/LOAD COMMAND
/LOWER ADDRESS
/LOAD AND GO
/DISK SKIP lOT
/HANG IF NO SKIP

i 0

V i 42

3120
312i
3122
3123
3124
3125

4444

31 2b

3i27
3130
3131
3132
3133
3134
3135
3136
3137
3140

3H1

20-DEC •7 3

21 5 I
2l3fe

7650
5310
1135
1172
7640
5 310

5350

U 12

4427
5345

3142
3143
3144
3145
3146
3147
3150
3i5i
3152
315)

7410
1170
3353
7610
4437
4440
3100
5300

3154
3155

575&
3200

PAGE i»34
/'BEAD STATUS
/SHOULD ONLY BE DONE
/JUST DONE FLAG 1
/STATUS ERROR
/UPDATE ADDRESS
/DOh'T oEI bXTi;Nl>t.P TRACK
/TI-S* SET II

K40 0 0
TAD
SZA CLA
JMP
T38fc.
ISZ
TCNTRl
JMP
• + 3
CMRtG
ISZ
TC^iTR^
ISl
TCNTR2
TAD
SNA CLA
T 38R
JMP
TAD
TCNIP
EhDTRK
TAD
SZA CLA
JMP
T 3 8R
JWP
T 380K
K2525
TAD

104

7&40
5340
2i3S
5330

1 1

i3f&4

PDSTAT

/IS Extended set
_

T380K #
T3BDE,
T38T,

wORP vU!*!rAKE Ur DATA
/errori just the status
/TEXT POINTER
/DATA ERROR
/STATUS TEXT POINTER
/SETUP
/STATUS ERROR
/fiuHv oi

figure;

1167

/ADD IN FUDGE FACTOR
/DONE <nXTH DISK
/^Uf MQFE TU vu
/ALL OtKf

JMP
» + 3
K537 3
TAD
SKP
K5300
TAD
TiST
DCA
SKP CLA
nerror
ERROP
TST38
5300

/ERROR» READ DATA
/SCOPE LOOP POINTER
/TEXT POINTEP

/TO urVT TEST

JMP X
TST39
/

3300

PAGE
/BIG ADDRESSING CHECKi
/XF A DATA ERROR SHOULD HAPPEN TO OCCUR
/WITH THE FIRST TWO WORDS OF THE BUFFER, YOU
/SHOULD REALIZE THAT THE PROBLEM COULD BE
/ADDRESSING.
/

/CHECK DISK HEADER WORD WITH READ DATA
/IF STATUS ERROR OCCURRES THEN CHECK DATA,
/THE DATA ON THE COMPLETE DISK SHOULD BE 2525
/HOWEVER, THE TWO FIRST WORDS OF EVERY SECTOR
/SHOULD EQUAL THE ABSOLUTE DISK ADDRESS.

5252,

3200
3201
3202
3203
3204
3205
3206
3207

7340
3173
3135
3l3b
1070

3210

1157
3151
1067
4451

PALIO

V142

3211
3212
3213
3214
3215
3216
3217
3220
3221
3232
3223
3224
3225
3226
3227
3230
3231
3232

1151
4450
1135
4452
4447
5215
4444
1104
7640
5237
2135
5227
2151
213b
1136

32 33

1172
7640
5207
5247
1112
4427
5244

3234
3235
3236
3237
3240
3241
3242
3243
3244
3245
3246
3247
3250
3251
3252

TST39,

T39R#

20.DEC-73
TAD

CMA
SOFERR
TCNTRl
TCNTR2
DRIVND

TAD

LDADD
OSKSKP
JMP
RD5TAT

5207:

U35

T39E#

T390K,
T39DE»
T39T,

/CURRENT FIELD
/SETUP COMMAND
/START or BUFFER
/LOAD CURRENT

CMPEG
BGNfiUF

13154

CMREG
TCNTRl
.-1

K4000
TAD
SZA CLA
JMP
T39E
ISZ
TCNTPl
JMP
. + 3
ISZ
CMPEG
TCN1R2
ISZ
TAD
TCNTR2
SNA CLA
JMP
T39R
TAD
TCNTRl
TAD
ENDIPK
SZA CLA
JMP
T39R
JMP
T390K
K2525
TAD

FIGURE
JMP

1167

/NO SOFT ERRORS
/SETUP LOWER ADDRESS
/SETUP EXTENDED
/CURRENT DRIVE

HOf^tMA

LDCMD

7650

7410
1170
3252
7610
4437
4440
3200
5300

CLA CLL
DCA
DCA
DCA
TAD
TAD
DCA
TAD
LOCUR

TAD
K5373
SKP
TAD
Kb300
DCA
T39T
SKP CLA
MERROR
ERROR
TST39
5300

PACE 1-35
/LAST COMMAND
/LOAD COMMAND
/LOWER ADDRESS
/LOAD AND GO
/DISK SKIP lOT
/HANG IF NO SKIP
/READ STATUS
/SHOULD ONLY BE DONE
/JUST DONE FLAC ?
/STATUS ERROR
/UPDATE ADDRESS
/DON'T SET EXTENDED TRACK
/YES, SET IT
/IS EXTENDED SET
/NO, CONTINUE

/ADD IN FUDGE FACTOR
/DONE WITH DISK
/NO, MORE TO GO
/ALL O.K.

/WORD BY WORD COMPARE OF
/ERROR, JUST STATUS
/TEXT POINTER
/ERROR
/STATUS ERROR POINTER
/SETUP

/O.K. TO NEXT TEST
/ERROR, READ DATA
/SCOPE LOOP POINTER
/TEXT POINTER

/DO A RANDOM READ DATA
/THE DATA ON THE COMPLETE DISK SHOULD BE 2525
/HOWEVER, THE TWO FIRST WORDS OF EVERY SECTOR
/SHOULD EQUAL THE ABSOLUTE DISK ADDRESS,

5252.

3253
3254
3255
3256
3257
3260
3261
3262
3263
3264
3265
3266
3267
3270
327 1

1106
3141
4422
3137
7004
3140
1140
3151
1137
4425
3300
5276
1112
4427
7610

TST40,
T40R#

T405,

TAD
DCA
PANADD
DCA
RAL
DCA
TAD
DCA
TAD
DISKGO
T40T
JMP
TAD
FIGURE
SKP CLA

K7000
TCNTR5
TCNTR3
TCNTR4
TCNTR4
CMREG

/LENGTH OF TIME FDR THIS TEST
/GET AN ADDRESS FOR SEEK/READ
/SAVE IT
/LINK IS EXTENDED
/SAVE IT
./SETUP COMMAND

TCfiTR3

T40E
K252S

/DISK READ DATA
/TEXT POINTER
/ERROR, SKIP OR STATUS

/WORD BY WORD COMPARE OF DATA
/DATA O.K.

PALiO

Vt42

3272
3273
3274
3275
3276
3277
3300

5276
2141
5255
4437
4440
3253
0000

iit54

20-DE:C-73

JHP
t&l
JMP

PAGE 1-36

T40E
TCKIR5
T40R

/DATA ERROR
/LOOP
/0,K, TO NEXT TEST
/ERROBr READ
/SCOPE LOOP POINTER
/TEXT POINTER

T4CiE,

T40T»

T5T46
0000

/RANDOM SEEK THEIK' WkItE THEn SEEK THEN READ TEST
/THt DATA WRIXTSM IS 2525
5252 AMD THE TWO
/FIRST ftORDs or THE StCTOR ARE SET TO THE DISK ADDRESS,
/

3301
3 302
3 30 3

3304
3305
3306
3307
3310

33U
3312
3313
3314
3315
3316
3317
3320
3321
3322
3323
3124
3 325
3 326

3J27
3 330
333 1
3332
3333
3334
3335
3336

1110
3141
4422
0116
1

135

3372
5370
1 136

3 345

3350
3351
3352
3353

1135
4423
3372
5370
1140
3151
1137

PALIO

V142

3 347

K77feO

PAPC^T

RAL
DCA
PANADD
DCA
PAL
DCA
TAD
FILBUF
TAD
TAD
DCA I
TAD
DCA I
TAD
DCA
TAD
SEEK

20-DEC-73

3354
3355
3356

4425
3372

DISKGC
T4IT

5 37 0

3357
3360
336 1
3 362
3363
3 364
3 365
3 36&
3367
3 370
337 1
3372

tli^
4427
7610
5 370
2160
5317
2141
5303
4417
4440
33ni
5373

JMP
TAD

3 37 3

5774
340O

TCNTP2
TCNTP3
TCNTP4
K2525

TCNIR4
DRIVNQ
XHITPK
TCNTR J
XLOTPK
TCNIR2
CMREG
TCNTRl

T41E
TCNTP4
K4000
CMREG
TCNTR3
•

T4iE
TCNXR2

TCNTRl
T41L

NfcPfiOR

T41I.

ERPOP
TST41
5373
JMP 1
TST42

/DISK ADDRESS

PAGE i«J7
/DISK READ DATA
/TEXT POINTER

T41E
K2525

riGUPL
SKP CLA
T41E
JMP
RAPCNT
ISZ
T41S
JMP
TCNTR5
ISZ
T41R
JMP
T41L,

/GS:T

TCN1P4
CMREG
TCNTR3

13154

/riLL BUfFER
/GET EXTENDED BIT
/GET DRIVE NUMBER
/DISK ADDRESS WORD IN BUFfER
/LOi«jER DISK ADDRESS
/DISK ADDRESS WORD IN BUrFEK
/GET EXTENDED BIT
/SETUP COMMAND
/DISK ADDRESS
/SEEK ONLY
/TEXT POINTER
/ERROR SKIP OR STATUS
/EXTENDED BIT
/FUNCTION WRITE DATA
/SETUP COMMAND
/DISK ADDRESS
/DISK WRITE DATA
/TEXT POINTEP
/ERROR SKIP OF STATUS
/GET EXTENDED BIT
/Sc,iUK CUMMANU HciulO^Er
DISK ADDRESS
/GO SEEK ONLY
/TEXT POINTER
/ERROR, SEEK SKIP OR STATUS
/GET EXTENDED BIT
/SETUP READ DATA COMMAND

CrtPEG

3374

/SAVE COUNTER
/RANDOM SEEK DISK ADDRESS
/SAVE
/LINK IS EXTENDED BIT
/SAVE
/RANDOM SEEK/1«RITE DISK ADDRESS
/SAVE
/LINK IS EXTENDED BIT
/SAVE IT

TCNTPl

T4 IT

JMP
TAD
TAD
DCA
TAD
DISKGO
T4iT
JMP
TAD
DCA
TAD
SEEK
T4iT
JMP
TAD
OCA
TAD

U40

3341
3342
3343

3346

T41S,

4423
3372
5370

3 340

K0017

RANADD
DCA

3 1 3b

/PASS COUNTER
/GENERATE RANpON NUMBER

TCN'TPS

BANADD
AND
TAD
DCA

107

4422
3137
7004
3140
1112
4430
1140
1070
3464
113?
3463
1136
5151

K770O

TAD
DC A

T41H,

3160
4422
3135
7004

104
3151
137
4425

3 337

TST41,

•/ERROR, SKIP OR STATUS
/KiORD BY *ORD

COMPARE OF DATA

/DATA O.K.
/DATA ERROR
/COUNT TO SAME TRACKS
/REPEAT
/PASS COUNTER
/LOOP
/O.K. TO NEXT TEST
/ERROR
/SCOPE LOOP POINTER
/TEXT POINTER
/TO NEXT TEST

PAGE

/VERIFY A RECALIBRATE THEN A RANDOM WRITE DATA»
/THEN A RECALIBRATE THEN RANDOM READ DATA,
5252 AND
/THE DATA PATTERN WRITTEN IS 2525
/THE FIRST TWO *0RDS OF EVERY SECTOR
/SHOULD EQUAL THE ABSOLUTE DISK ADDRESS.
3400
3401
)402
)40}
3404
3405
3406
3407
3410

34U
3412
3413
3414
3415
3416
3417
3420
3421
3422
3423
3424
3425
3426
3427
3430

tuo

TST42,

3141

4422
3135
7004
3136

T42R#

1112

T42Sf

4430
1136
1070
3464
1135
3463

4424
3451
5247
1136
1104
3151

U35
4425

343 1

3451
5247
4434
3451
5247

3452
3433

3151

136

TAD
DCA
RANADD
DCA
RAL
DCA
TAD
FILBUF
TAD
TAD
DCA I
TAD
DCA 1
RECAL
T42T
JMP
TAD
TAD
DCA
TAD
OlSKGO
T42T
JMP
PECAL
T42T
JMP
TAD
DCA

K7700
TCNTRS
TCNTRl

TCNTR2
K252S
TCNTR2
DRIVNO
XHITRK
TCNTRl
XLOTRK
T4 2E

TCNIR2
K4000
CMREG
TCNTRl
T42fc

T42fc;

TCNTP2
CMRtG

/PASS COUNTER
/RANDOM DISK ADDRESS
/SAVE
/LINK IS EXTENDED BIT
/SAVE
/FILL BUFFER
/GET EXTENDED BIT
/GET DRIVE NUMBER
/DISK ADDRESS WORD IN BUFFER
/LOWER DISK ADDRESS
/DISK ADDRESS WORD IN BUFFER
/RESTORE DRIVE
/TEXT POINTER
/ERROR SKIP OR STATUS
/EXTENDED BIT
/FUNCTION WRITE DATA
/SETUP COMMAND
/DISK ADDPE55
/DISK WRITE DATA
/TEXT POINTER
/ERROR SKIP OR STATUS
/RESTORE DPIVE
/TEXT POINTER
/ERROR, SKIP OP STATUS
/GET EXTENDED BIT
/SETUP READ DATA COMMAND

PAMO
:^434
34Ji>

345b
5437
5440
3441
3442
3443
3444
344&
3446
3447
3450
345t

yii2
1

345 1

5247
1112
4427
7b iO

5247
2141
5202
4437
4440
3400
5373

/DISK ADDRESS
/DISK READ DATA
/TEXT POINTER
/tRROH, SKIP OR STATUS

TAD
DISKCU
T42T
JMP
T42fc;
K2S25
TAD
FlGUPt
SKP CLA
T42E
J MP
TCNTR5
ISZ
T42P
JMP

135

4425

CQwpARr OF DATA
/DATA O.K.
/DATA ERROR
/PASS COUNTER
/LOOP
/O.K. TO NEXT TEST
/ERROR
/SCOPE LOOP POINTER
/TEXT POINTER
/*«ORD BX WORD

EHROS.

T42£;,

TST42
537 3

T42T,
f

/TPY TO CAUSE CYLINDER ADDRESS ERRORS BY
FEW RANDOM SEEKS THEN A READ DATA,
/DOING
,

3452
3453
3454
3455
3456
3457
3460
3461
3462
3463
3464
3465
3466
3467
3 470
3471
3472
347 3

3474
3475
3476
3477
3500
3501
3502
3503
3504
3505
3506
3507
3510

35U
3512
3513

3SU

1336
3l4i
4431
4422
0117

TST43,
T43Fii

U22
3140
4422
3137
7004
3136

iUb
3151
1137

4423
3514
5J12
3140
5261
1136
3151

1U7
4425
3314
5312
1112
4427
7610
5312
2141
5254
4437
4440
3452
0000

T43T»

TIMSTP
TAD
TCNTR5
DCA
KIL8UF
RANADD
AND
K0037
K7740
TAD
TCNTR4
DCA
PANADD
TCNTR3
DCA
RAt
TCNTR2
OCA
TCNTR2
TAD
CMPEG
DCA
TCNTP3
TAD
SEEK
T43T
T43fc
JMP
TCNTP4
ISZ
T43R2
JMP
TCNTR2
TAD
CMREG
DCA
TCKTR3
TAD
DI8KC0
T43T
JMP
T43E
K2525
TAD
FIGURE
SKP CLA
T4JE
JMP
TC.NTR5
tsz
T43R1
JMP
NEPROR
ERROR
TST43
0000

/SETUP PASS COUNTER
/CLEAR BUFFER
/GET RANDOM NUMBER
/SETUP COUNTER FOR SEEKS
/GET RANDOM SEEK ADDRESS
/SAVE XT
/LINK IS EXTENDED BIT
/SAVE IT
/SETUP COMMAND

/SEEK ONLY A RANDOM TRACK
ntVt POINTER
/ERROR, SKIP OR STATUS
/COUNT NUMBER TO DO
/SETUP FOR READ DATA
/LOAD AND GO READ DATA
/TEXT POINTER
/ERROR SKIP OR STATUS

/CHECK DATA READ
/ALL O.K.
/ERROR, DATA
/MORE TO TEST
/P,K. TO NEXT TEST
/ERROR, SKIP, STATUS. CF
/SCOPE LOOP POINTER
/TEXT POINTER

/CHECK DISK HEADER WORDS WITH READ DATA

PALiO

Vi42

20-DEC-73

13154

PAGE i-39

/IF STATUS ERROR OCCURRES THEN CHECK DATA,
/THt DATA ON THE COMPLETE DISK SHOULD BE 2525

5252.

/HOWEVER, THE T«0 FIRST WORDS OF EVERY SECTOR
/SHOULD EQUAL THE ABSOLUTE DISK ADDRESS,
3515
3516
3517
3520
3521
3522
3523
3S24
3525
3526
3527
3530
3531
3532
3533
3534
3535
3536
3537
3S40
3541
3542
3543
3544
3545
3546
3547
3S50
3551
3552
3553
3554
3^55
3556
3557
3560
3561
356 2
3563
3564
3565
3566
3567

7340
3173
313S
3136
1070

3570
3571

577 1

1157
3151
1067
4451

T5T44,

T44P,

U5l
4450
1135
4452
4447
5332
4444
1104
7640
5354
2135
5344
2151
2136
1136
7650
5324
1135
1172
7640
5324
5364

CLA CLL
DCA
DCA
DCA
TAD
TAD
DCA
TAD
LDCUP
TAD
LDCHD
TAD
LDADO

DSKSKP
JWP
RDSTAT

C«A
SOFERH
TCNTRl
TCNTR2
DRIVNO
HOHEMA
CMPEG
BGNBUF

CMREG
TCNTRl
•

.-1

U12

K4000
TAD
TIMSTP, SZA CLA
JhP
T44E
TCNTRl
ISZ
JMP
. + 3
CMREG
ISZ
TCNTR2
ISZ
TCNTR2
TAD
SKA CLA
JMP
T44R
TCNTRl
TAD
ENDTRK
TAD
SZA CLA
T44R
JMP
T440K
JMP
K2525
TAD
T44E,

4427
5361
1167
7410
1170
3367
7610
4437
4440
3515
5300

JMP
. + 3
Kb373
TAD
SKP
K5300
TAD
T44T
DCA
SKP CLA
NEPROR
ERPQP
TST44
5300

T44aK,

T44T»

/SETUP CPC ERROR POINTER
/SETUP L0*JER ADDRESS
/SETUP EXTENDED
/CURRENT DRIVE
/CURRENT FIELD
/SETUP COMMAND
/START OF BUFFER
/LOAD CURRENT ADDRESS
/LAST COMMAND ISSUED
/LOAD COMMAND
/LOWER ADDRESS
/LOAD AND GO
/DISK SKIP lOT
/HANG IF NO SKIP
/READ STATUS
/SHOULD ONLY BE DONE
/JUST DONE FLAG 7
/STATUS ERROR
/UPDATE ADDRESS
/DON'T SET EXTENDED TRACK
/YESi SET II
/iS EXTENDED SET
/NO, CONTINUE
/ADD IN FUDGE FACTOR
/DONE WITH DISK
/NO, MORE TO GO
/ALL O.K.

/WORD BY WORD COMPARE OF
/ERROR, JUST STATUS
/TEXT POINTER
/ERROR
/STATUS ERROR POINTER
/SETUP

•

/O.K. TO NEXT TEST
/ERROR, READ DATA
/SCOPE LOOP POINTER
/TEXT POINTER

JWP I
TST45

3600

. + 1

/TO NEXT TEST

3600

PAGL

/VERIFY THAT WRITING ON A TRACK DOES NOT AFFECT

PALIO

Vi42

UlS4

20-DEC-73

PAGE i»40

ADJACENT TRACK, THE TEST SEQUENCE IS AS roLLOhSl
/WRITt TRACKS OOOOO-OOl 00-00040 THEN READ khO CHECK
/TPACKS OO040-OO00O-OO1OO, WRITE: TRACKS 00020-001 20*00060
/THEN RtAD AND CHLCK TRACKS 00060-00020-00120, ETC,
/TKL CENTER TRACK IS SET TO A DATA PATTERN OF
/2525 * 5252. THE LO«<ER AND UPPER TRACKS ARE
/SET 10 A DATA PATTERN OF 5252
2525, THE FIRST TWO
/WORDS OF FVPRY SKClOK ARE SET TO THE ABSOLUTt
/DISK ADDHCSS,
/k*i

36 00

360i
3b02
360 J
3 b 04
36 05

3606
3607
36 10

3611
3612
3613
3614
36 1 S

3616
3617
3620
3621
3622
3623
3624
3625
3626
3627
3630

1012
3135
1 350
3141
734b
3140
1 1

TST45

T45SC #

3137
1112
5 222
1140

T45R1 t

7110
7 6 30

1122
1012
1135
3137
1113
4430
110?
3136
3142
1142
0116
3463

36 3 1

U37

3632

7104

3634
3635
3636
3637
3640
3641
3642
3643
3644
3645
3646
3647
3650
3651
3652
3653
3654

1463
3463
7630
7001
1070
3464
1464
1104

5343
1142
1074
3142
2116

PALIO

V142

T45A1

T45R2»

3151
1463
4425
374S

3655
3656
3657

5226
2140
5212

3660
3661
3662
3653
3664
3665
3666
3667
3670

7340
3145
7346
3140
1135
3137
5276
1140
7110
7630
1122
1012
1135
3137
1107
3136
3142
1137
7104
0107
3146
7630
7001
3151
1142
0116

KuOiO
TCNTRl

TAD
DC A
TAD
DC A

/GET STARTING POINTER
/SAVE II

K 7 1 56

TC NTRS
CLA CLL CMA PTL
TCNXR4
DC A
TAD
TCNIRi
DC A
TCNXR3
K2525
TAD
JMP
T45A1
TAD
TCNTR4
CLL RAP
SZL CLA
K7740
TAD
TAD
K0020
TAD
TCNTRl
DCA
TCNXR3
K52S2
TAD
FILBUF
TAD
K7760
TCNtR2
DCA
DCA
TCNTR6
TAD
TCfJTRb
AND
KOOi?
XLOTRK
DCA I
TAD
TCNTR3
CLL RAL
K77 0
TAD I
XLOTRK
DCA I
XLOTRK
S2L CLA
lAC
DRIVNU
TAD
DCA I
XHITPK
XHITRK
TAD I
K4000
TAD
DCA
CMREG
TAD I
XLOTRK
DISKGO
T45T
JMP
T45L
TAD
TCNTPb
K0003
TAD
DCA
TCNTR6
TCNTR2
ISl

I3l54

20-DEC-73

T45R2
TCNTR4
T4SR1

JMP
XSZ

/COUNTER FOR TRACKS TQ 00
/THREE TRACK COUNTER POINTER
/t^RITE CENTER TRACK FIRST

/DATA PATTERN FOR CENTER TRACK
/GO WRITE CfcN'IER TRACK
/GET POINTER

/WRITE UPPER UR LOWERI???
/DO LOWER
/REDUCE OR UPDATE
/SAVE TRACK TO DO
/USE COMPLEMENT OF CENTER TRACK
/FILL BUFFER «ITH DATA
/GET SECTOR COUNTER POINTER
/SETUP COUNTER
/START WITH 0
/GET SECTOR POINTER
/MASK SECTORS
/SETUP ADDRESS WORD IN BUFFER
/GET DISK ADDRESS
/PUT EXTENDED BIT IN LINK
/ADD IN SECTORS
/SETUP ADDRESS WORD IN BUFFER
/SET EXTENDED BIT????
/5fESi i I

/ADD IfJ CURRENT DRIVE
/SETUP ADDRESS WORD IN BUFFER
/GET EXTENDED BIT
/FUNCTION WRITE DATA
/SETUP COHMAND REGISTER POINTER
/GET CTL,, SURFACE! AND SECTOR
/WRITE ALL
/TEXT POINTER
/ERhOr, i^RIIE SKIP UR STATUS

/UPDATE SECTOR POINTER

/UPDATE SECTOR COUNTER

PAGE i-4l
/DO REST OF TRACK
/UPDATE TRACK COUNTER
/DO OTHERS

367 1

3672
3673
3674
3675
3676
3677
3700
3701
3702
3703
3704
3705
3706
3707
3710
3711
3712
3713
3714
3715
3716
3717
3720
3721
3723
3723
3724
3725
3726
3727
3730
3731
3732
3733
3734
3735
3736
3737
3740
3741
3742

U46
4425
3745
5343
1145
7650
1112
1113
4427
7610
5343
1143
1076
3142
2136
5301
3145
2140
5267

IU5
1011
3135
2141

5204
443?

T45R3,

T45A2,
T45R4,

CLA CLL CMA
CRPEGl
DCA
CLA CLL CMA RIL
TCNTR4
DCA
TCNIRI
TAD
TCNTR3
OCA
T4SA2
JMP
TCNTR4
TAD
CLL RAR
SZL CLA
K7740
TAD
K0020
TAD
TCNTRl
TAD
TCNTR3
DCA
K7760
TAD
TCNTR2
DCA
TCNTR6
DCA
TCNIR3
TAD
CLL RAL
K77bO
AND
CRREG2
OCA
SZL CLA
I AC

CMREG
DCA
TCNTR6
TAD
K0017
AND
CRREG2
TAD
DISKGO
T45T
T45E
JMP
CRREGl
TAD
SNA CLA
K2525
TAD
K2525
TAD
FIGURE
SKP CLA
T4SE
JMP
TCNTR6
TAD
K0005
TAD
TCNTR6
DCA
TCNTR2
ISZ
T45R4
JMP
CRREGl
DCA
TCNTR4
ISZ
T4SR3
JMP
TCNTRl
TAD
KOOlO
TAD
TCNTRl
DCA
TCNXRS
ISZ
T45SC
JMP
NERROR
.

/SETUP FIRST TIME POIhTLR
/TRACK COUNTER POINTER
/SETUP FOR READ CENTER FIRST
/READ AND CHECK CENTER TRACK
/POINTER
/CHECK UPPER OR LOWER
/CHECK LOWER
/REDUCE OR UPDATE
/SAVE THE TRACK TO READ
/AMOUNT OF SURFACE SECTORS
/SETUP SECTOR COUNTER
/START WITH 0
/GET DISK ADDRESS
/PUT EXTENDED BIT IN LINK
/SAVE RESULTS
/SET EXTENDED BIT
/YES
/SETUP COMMAND FOR READ DATA
/GET SECTOR POINTER
/MASK
/ADD IN TRACK
/READ DATA
/TEXT POINTER
/ERROR» READ SKIP OR STATUS
/CET FIRST TIME POINTER
/FIRST TIME????
/NO

/CHECK DATA READ
/DATA ALL O.K.
/ERROR* DATA
/UPDATE SECTOR POINTER
/UPDATE SECTOR COUNTER
/DO REST OF SURFACE
/CLEAR FIRST TIME FLAG
/UPDATE TRACK COUNTER
/DO OTHER TRACKS
/GET CURRENT TRACK POINTER
/UPDATE
/SAVE IT
/UPDATE TOTAL AMOUNT TO DO
/MORE TO DO
/ALL O.K. TO END OF TEST

P^LiO

V142

3743
3744
3745

4440
ibOQ
0000

3746
3747

5747
4040

3750

7156

K?i56,

4000

PAGE

13tS4
T45fc:,

F.RROR

T45T»

TST45
0000

page;

1*42

/CRKOKf TRACKS AFrCCTED
/SCOPE LOOP POINTER
/MODIFIED TEXT POINTER

JMP X
ENDTST

/TO EwD OF TEST

7i5b

/PROGRAM TO AID IM HEAD ALIGNMENT,
/GET TWO SEPARATE SEEK ADDRESS FROM
/THE SWITCH REGISTEH AND SEEK ONL^ BETWEEN
/THEM. SECOND ADDRESS MAY BE CHANGED AT ANT TIME,
7604
3135
7402
7604
3136
1136
0100

4000
4001
4002
4003
4004
4005
4006
4007
4010

U03
4450
1136
0107
4452
4447
5214
4453
4444
7640
5216

40U
4012
4013
4014
4015
4016
4017
4020
4021
4022
4023
4024
4025
4026
4027
4030
4031
4032
4033
4034
4035
4036
4037

U35
0100
1

103

4450
1135
0107
4452
4447
523 1
4453
4 444
7640
5233
5203

LAS
DCA
HEDHLTf HLT
RE5CK»
LAS
DCA
TAD
AND
TAD
LDCMD
TAD
AND
LDADO
DSKSKP
JMP
CLRALL
PDSTAT
8ZA CLA
JMP
TAD
AND
TAD
LDCMD
TAD
AND
LDADO
DSKSKP
JHP
CLRALL
RDSTAI
SZA CLA
JMP
JMP

/GET FIRST ADDRESS
/SAVE IT
/WAIT FUR SECOND ADDRESS
/GET SECOND ADDRESS
/SAVE IT

SfiSEK,

TCNTRl
TCNTR2
TCNTR2
K0007
K3000

/MASK DRIVE
EXT, BIT
/GET SEEK FUNCTION
/LOAD COMMAND REGISTER

TCNTR2
K7760

/MASK OFF CYLINDER + SURFACE
/GO SEEK ONLY
/SKIP ON DONE

.•t

/CLEAR STATUS
/READ STATUS
/DRIVE DONE?
/NO, WAIT
/GET FIRST ADDRESS
/MASK DRIVE
EXT, BIT
/GET SEEK FUNCTION
/LOAD COMMAND REGISTER

.-3

TCNTRl
K0007
K3000
TCNTRl
K7760

/MASK OFF CXLiNDER AND SURFACE
/LOAD AND GO SEEK
/WAIT FUR DONE

.•I

/CLEAR STATUS
/READ STATUS
/DRIVE DONE?
/HO, WAIT
/CHECK FOR NEtt ADDRESS

.-3

/CONTAINS fc'ND OF TEST TYPE OUT A^D A CHtCK Ut^ S^P3«1
/ifiHlCH IS CQNTINI'E TO TEST CUHPEf^T DISK,
/ALSO IF THERE IS MQPE THAN i DI5K ON THE SYSTEM
/AND THEY HAVE ALL RUN THE COMPLETE TEST, RUN OVERLAP
/SEEKS AND OVERLAP SEEKS* WRITE, AND READ DATA ON ALL
/DRIVES

ALIO

Vi42

20-DEC -73

13154

PAGE 1-43

4040

7604
OOlb

4041
40 4 2

4043
4044
4045
4046
4047
4050
4051
4052
4053
4054
4055
4056
4057
4060
4061
4062
4063
4064
406S
4066
4067
4070
4071
4072
4073
4074
4075
4076
4077
4100

ENDTST

(

5264
1071

1450
5264
7104
7041
1070
7650
526U
7326
1070
3070
5273
4765
4764
4766
3070
4462
4457
6741
7604
0075
7640
7402
7301
4453
3132
3133
5700
0235

TSTSEK,r

SAMDSK,

ENDHLT,
NEXDSKi

LAS
AND
SZA CLA
JMP
TAD
SNA
JMP
CLL PAL
CIA
TAD
SNA ClA
JMP
CLA CLL
TAD
DCA
JMP
JMS I
JMS I
JMS I
DCA
CBLF
PRNTER
TEXEND
LAS
AND
SZA CLA
HLT
CLA CLL
CLRALL
DCA
OCA
JMP I
TSTO

K0400

SAMDSK
DRIVSV
SAMDSK

DRIVNO
TSTSEK
CML RTL
DRIVNO
DRIVNO
NEXDSK
XLAP
XGRONK
XOVRRD
DRIVNO

/MASK SWITCH 3
/LOOP ON SAME DISK
/YES
/WAS THERE AND EXTRA
/NOf ONLY DISK 0

/CURRENT DRIVE
/STAPT OVER YET
/YE5» TEST OVERLAP SEEKS
/UPDATE DRIVE NUMBER
/TEST ^JEXI DISK DRIVE
/PERFORM OVERLAP SEEKS
/PERFORM OVERLAP SEEKS
/OVERLAP SEEKS
WRITES
/SETUP DRIVE NO,

/PRINT PASS COMPLETE

K0004
/SWITCH 9 SET?
/YESi STOP PROGRAM
lAC

/DCLR

REGO
RECi
/LOOP ON PROGRAM

/THE FOLLOWING IS A ROUTINE TO CHECK THE WRITE PROTECT
/FUNCTION WHEN IT IS MANUALLY SET BY THE OPERATOR,
/NOTEl NO SCOPE LOOPS ARE AVAILABLE FOR THIS TEST.
/

4101
4102
4103
4104
4105
4106
4107
4110
4111
4112
4113
4114
4115
4110
4117
4120

7604
7104
0077
3070
lilO
3133
3132
1112
4430
1070

3464
3463
1114
3151
4425
4161

MANPROf LAS
CLL RAL
AND
K0006
DRIVNO
DCA
K7700
TAD
DCA
R£G1
DCA
REGO
K2525
TAD
FILBUF
TAD
DRIVNO
DCA I
XHITPK
DCA I
XLOTRK
TAD
KbOCO
DCA
CMREG
OISKGO
TMPROI

/GET THE SWITCHES
/MA^K DRIVE NUMBER
/SAVE DRIVE NUMBER

/SETUP PASS COUNTER
/SETUP FLAG POINTER
/DATA PATTERN TO WRITE
/FILL OUTBOUND BUFFER
/SETUP ADDRESS WORD IN BUFFER
/SETUP ADDRESS wOrD IN BUFFER
/WRITE ALL FUNCTION
/SETUP COMMAND
/WRITE ALL TO SECTOR 0
/TEXT POINTER

PALlfi

1 ^
d
41223

V142

20-DEC»73

iit54

PACK 1-44

U
DQ
MP C
EBP
]U

UUf T 1 f

/EPRORf STATUS
/HALT AND WAIT FOR UPERATDP

HLT

4 i 23

4124
4 I 2S

MpP 1

4431

TAD
DC A

/CLEAR OUTBOUND BUFFER

K ILBUF

07 0

346 4
1114

DB I V No

TAD

XrilTRK
K5 000

3 15 I

DC A

CMREG

41 30

4425

4131
413 2
413 3

4 1 6 1

diskgq
TmPROT

7 32 b

4 i 34

4 1 26
4127

4 1 3S

4 1 36

4140
4141

NQp
CLA CLL CHL RTL
K 0 020
TAD
DC A
GUREG2
K5300
TAD
TMPROT
DC A
TAD
STRLG
ACCMP i
S K P CLA

7 000

0 1 2

314 4
1 1 7g
3361
4 44 2

Mr'ERR

CLA CLL

41 44

AA\i
4150
4151
41 52

I AC

C LP A LL
KILBUF

TAD

K 1 000

DC A
DI SKGU

C MRE^G

4425
4 i 6 1

TMPROT

31 5 1

MPERP
K2525

5 35 7

ni2

TAD

4427

FIGURE
N£RROR
ERROR

4154
4155
4156
415 7
4160
4161
4162
4163

4 44 0

MpERB

4123
0000
7402
5301

TMPROT,
MPHLT2*

4164
416S
4166

4265
4200
4400

XCRONKi gronk
XLAP,
OVRLAP
XOVBBD* OVPBED

4200

PAGE

44 37

MPRl
0000
HLT
JMP

/SETUP ADDRESS v^OrD IN BUFFER
/WRITE ALL FUNCTION
/SETUP COMMAND REGISTER
/hRlTE ALL TO SECTOR 0
/TEXT POINTER
/MAKE EXPECTED ST -MUS
/SETUP COMPARfc, REGISTER
/SETUP TEXT POINTER
/GET STATUS READ
/CHECK RESULTS
/STATUS 0 , K
/ERROR* WRITE PROTECT
/ENABLE CLEAR CONTROL
/CLEAR CONTROL
/CLE.AK UATA BUrrc-R
/FUNCTION READ ALL
/SETUP COMMAND
/READ ALL SECTOR 0
/TEXT POINTER
/ERROR
/EXPECTED PATTERN
/CHECK DATA READ
/ALL 0,K« GO LOOP 64 TIMES
/ERROR* WRITE PROTECT

MANPRO

/TEXT POINTER
/SUCCESSFUL WRITE PROTECT
/REPEAT

/
'

/BDUTINE TO DO 3VJ!:RLAP SEEKS ON EXISTING DRIVES
/AFTER ALL HAVE RUN THE COMpLETii; DIAGNOSTIC
(

/
4 2 00

0000

OVRLAP,

4202
4203
4204
4205
4206
4207
42t0

7104

PALiO

Vi42

4211
4212
4213
4214
4215
421b
4217
4220
4221
422 2
4223
4224
4225
422b
4227
4230
4231
4232
42 33

4234
4235
4236
42 37

4240
4241
4242
4243
4244
4245
4246
4247
4250
4251
4252
4253
4254
4255
4256
4257
4260
4261
4262
4263

4264

3141
1071

0VPR 1 ,

7040

3HU
3137
113?

TCNTR4
DC A
TCN1R3
DCA
TAD
rCNTR3
CLL RAL

0VPR2f

20-DFC -73

3 07 0

1137
4422
4420
4453
2137
2140
5207
3137
1071
7040
3140
1137
4421
52 32

5240
5261
2137
1137

U40
7640
5225
5221
7340
3140
2141
5207
3137
1071
7040
3140
113?
4421
5250
7610
5261
2137
2140
5250
4437
4440
4201
5300
5600

K4000
TCMTR5
ORIVSV

TAD
OCA
TAD
CMA

4 2 01

I 3

DCA
TAD

/PASS COUNTER
/GFT AMOUNT OK DRIVES

/SETUP COUNTKH
/START wiTH DRIVE

5 4

DHI VNG

/DISK NO, POINTER

TCNTR3

RANADD
DSKOUI
CLRALL
TCNTR3
ISZ
TCNTR4
ISZ
JMP
0VRH2
DCA
TCNTR3
TAD
DRI VSV
CMA
OCA
TCMR4
0VRP3/
TAD
TCv'TRS
DSKIN
JMP
NDTDON
JMP
OVPOK
JMP
OVRERR
NOTDON, ISZ
TCNTR3
TAD
TCNTR3
TAD
TCNTP4
SZA CLA
JMP
0VPR3
JMP
0VPR3 -4
CVROK,
CLA CLL CMA
DCA
TCNTR4
ISZ
TCNTR5
JMP
0VRR2
DCA
TCNTR3
TAD
DRIVSV
CMA
DCA
TCNTR4
ALLBAK, TAD
TCNrR3
DSKIN
JMP
ALLBAK
SKP CLA
JMP
OVREBR
ISZ
TCNTR3
ISZ
TCNTR4
JMP
ALLBAK
NERROR
OVRERR* ERROR
OVRLAP
5300
JMP I
OVRLAP
t

/SELECT A RANDOM ADDRESS
/SEND DISK OUT
/CLEAR STATUS
/UPDATE DRIVENUMBEK
/UPDATE DISK COUNTER
/DO ALL EXISTING DISKS
/CLEAR FOR 0
/GET AMOUNT OF DRIVES

/SETUP COUNTER
/CHECK FOR DRIVE DONE
/DRIVE NOT DONE
/DRIVE DONE AND NQ ERRORS
/DRIVE ERRORS
/UPDATE DISK NUMBER
/LAST EXISTING DRIVE
00 REST
RESET

/NO,

/JfES,

/UPDATE PASS COUNTER, DONE
SEND OUT
/SET FOR 0
/NO,

/CHECK FOR DRIVE DONE
/HAIT FOR THIS DRIVE
/tiAIT FOR NEXT
/DRIVE ERRORS
/LAST DRIVE HOME YET
ALL
/O.K. TO NEXT
/ERROR, OVERLAP SEEKS
/y*AIT FOR

/SCOPE LOOP POINTER
/TEXT POINTER
/ID VEXT TEST

/ROUTINE TO Da UVERLAP SEEKS AND
/REALLY SHAKE THE DRIVES
/ALL DRIVES PERFORM "SEEK ONLY" BETWEEN
/312 AND SOME RANDOM TRACK,
/

4265
4266
4267
4270
4271

0000
1105
3141
1071
7040

GRONK,

TAD
DCA
TAD
CMA

KbOOO
TCNTR5
DRIVSV

/CLEAR PASS COUNTER
/AMOUNT OF DRIVES

PALIO

Vi42

4272
4273
4274
4275
4276
4277
4300
4301
4302
4303
4304
4305
4306
4307
4310

3140
3137
1137
7i04
3070
1137

43U

1137
4422

4312
4313
4314
431S
4316
4317
4320
4321
4322
4323
4324
4325
4326
4327
4330
4331
4332
4333
4334
433S
4336
4337
4340
4341
4342
4343
4344
4345
4346
4347
4350
4351
4352
4353
43S4
4355
4356
4357
4360

DC
DC
TAD
ft
ft

Chi RAL
DCA
TAD
TAD
DCA
TAD I
CLL PAP
SZh Chk
JMP
TAD
CLL CML
JMP
TAD
PANADO
AND
CLL
DCA I
TAD 1
D5K0UX
CLBALL
T5Z

777 '
3136
1536
1

7110
7630
5311
1066
7121
5315
0370
7100
3536
1536
4420
4453
2137
2140
5274
3137
1071

7040
3140

U37

GRNKR^f

4431
5335
5343
5364
2137

NTGRWK,

U40
1137

7640
5330
5324
7340

13154

20-DEC-73

GpNKOKf

3140
2141
5274
3137
1071

7040
3140

/SETUP POINTER
/START WITH 0

DPIVND
TCNTR3
DSKPOT
TCNTR2
TCNTR2

/SETUP DPIVE NO, PDINTEH
/GET ADDRESS POINTER
/SAVE IT
/GET LAST VALUE
/EXT, BIT SET?
/XES# GO TO OTHER THAN 312

TRK212
/SET INDICATORS
/SAVE AND SEND DRIVE OUT
/GET SAVE POINTER
/GET PANDOM ADDRESS
/CLEAR EXT, BIT

I AC

.5
TCNTP3
A7776

/RESET IT
/GET ADDRESS
/SEND DRIVE OUT
/CLEAR STATUS
/.UPDATE POINTER
/UPDATE COUNTER
/MORE TO SEND OUT
/START CHECK AT 0

TCNTR2
TCNTR2

TCNTR3
TCNTR4
I5Z
GRNKPl
JMP
TCNTB3
DCA
DRIVSV
TAD
CMA
TCNTF4
OCA
TAD
TCNTR3
D5KIS
NTGRNK
JMP
GBNKOK
JMP
GRNKER
JMP
TCNTR3
ISZ
TCNTR4
TAD
TCNTR3
TAD
SZA CLA
GRNKR2
JMP
GRNKR2 -4
JMP
CLA CLL CMA
TCNTR4
DCA
TCNTR5
tsz
GBNKRl
JMP
TCNTR3
DCA
DRIVSV
TAD
CMA
TCNTR4
DCA
TCNIP3
TAD
DSKI«
GPNKR3
JMP
SKP CLA
GRNKER
JMP
TCNTR3
ISZ

1137
4421
5353
7610
5364
2137

GBNKP3r

PALIO

V142

20-DEC-73

4361
4362
4363
4364
4365
4367

2140
5353
4437
4440
4266
5300
5665

MEPROR
GRNKER, ERRUR
GRONK +1
5300
GRONK
JMP I

4370

7776

A7776,

4377

4535

•4366

PAGE

TCNrR4
TCNTR3
TCNTR3

ISZ
JMP

13154

/SETUP AMOUNT COUNTER
/CHECK FOR DRIVE DONE
/DRIVE NOT DONE
/DONE SEND BACK OUT
/DRIVE ERRORS
/UPDATE DRIVE NO, POINTER

/LAST ONE YET?
/hO.

ntS, RESET POINTER
/SETUP POINTER
/UPDATE PASS COUNTER
/NOT DONE YET

/CHLCK FOR. DISK DUNE
/WAIT FOR DRIVE
/WAIT. FOR NEXT ONK
/DRIVE ERRORS

PAGE 1»47

TCNTR4
GRNKR3

/MORE TO ^AIT FOR
/O.K. TO NEXT TEST
/OVERLAP SEEK ERRORS
/SCOPE LOOP POINTER
/TEXT POINTEP
/EXIT

7776

4400'

PAGE
/

/PO'JTINt TO PtPFORM RA^/DOM OVERLAP SEEKS, WRITES AND,
/BEADS UN ALL EXISTING DRIVES AFTER THEV HAVE RUN THE
/COMPLETE DIAGNOSTIC.

4400
4401
4402
4403
4404
4405
440b
4407
4410
4411
4412
4413
4414
4415
4416
4417
4420
4421
4422
4423
4424
4425
4426
4427
4430
4431
4432
4433

4434
4435
4436
4437
4440
4441
4 442

4443
4444
4445

0000
7330
3141
1071

7040
3140
3137
1137
7104
3070
1137

4422
4420
4453
2137
2140
5207
3137
1071
040
3140
1137
4421

OVPRED,

CML RAR
TCNTR5
DRIVSV

/PASS COUNTER
/GET AMOUNT OF DRIVES

tCNTR4
TCNTR3

/SETUP COUNTER
/START WITH DRIVE

ISZ
ISZ
JMP
DCA
TAD
CMA
DCA
TAD
DSKIN
JMP
JMP
TAD
DCA
JMP
ISZ
TAD
TAD
SZA CLA
JMP
JMP
TAD
TAD
DCA
TAD I

TCNTP3
TCNTR4
0VBRD2
TCNTR3
DBIVSV

5234
5242
1170

OVPPDi#

POLEPK,

33 32
5 3 30

2137
1137
1140
7640
5225
5221
1335
1137
3334
1734

CLA CLL
DCA
OVRBDl* TAD
CMA
DCA
DCA
0VRBD2, TAD
CLL RAL
DCA
TAD
PANADD
DSKOUT
CLRALL

CHKNEXf

OVRDDK,

TCf^TR3

/SETUP DRIVE POINTER

DRIVNO
TCNTR3

/SELECT A RANDOM ADDRESS
/SEND DISK OUT
/CLEAR STATUS
/UPDATE DISK NUMBER
/UPDATE DISK COUNTER
/DO ALL EXISTING DISKS
/CLEAR FOR 0
/GET AMOUNT OF DRIVES
/SETUP COUNTER

TCNIR4
TCNTP3

/CHECK THIS DRIVE
/CHECK FOR NEXT DRIVE
/DONE AND NO ERRORS

CHKNEX
OVBDOK
K5300
TOVRDT
OVPDER
TCNTR3
TCNTR3
TCNXR4

/SETUP TEXT POINTER
/ERRORS
/UPDATE DISK NUMBER

0VRRD3
0VPRD3 -4
DSKPOT
TC?>JTP3

DSKAOD
DSKADD

/LAST EXISTING DRIVE
/NO, DO PEST
/\F.St RESET
/GET STORAGE pOlNTEp
/ADD IN DRIVE NUMBER
/HAKr: ADDRESS
/GET DISK ADDRESS

PALi 0

Vi 42

P Au£

13 13

4446

DCA

TCNTR2

TAD
DCA

KO 00 4

•48

/SAVE IT
/GET POINTER
/ADD IN FUDGE FACTOR
/MAl^E ADDRESS
/GET DISK NUMBER POJNTEP

4447
1

4 45 0

075

33 34

445 2

D6KADD
TC MP 3

1
CLL
^
3070

HAL

DH I V'^U

OC A
TAD

1113

/MAKE DISK NUMBtR
/GET DATA PATTERN TU USt
/FILL DATA flUFFICR
/GET EXTENDED BIT
/ADD IN DRIVE NUMBER
/SETUP ADDRESS WORD IN BUFFER
/GET CYL,, SURFACE, AND SECTOR
/SETUP ADDRESS i^OF.D If. BUFFER
/GET EXTENDED BIT
/ADD IM WRITE FUNCTION
/SETUP COMMAND POINTER
/GET ADDRESS
/DISK WRITE DATA
/TEXT PUlNTER
/ERROR, WRITE SKIP OP STATUS
/CLEAR PATA BUFFER
/GET EXTENDED BIT
/SETUP COMMAND REGISTER

K5 25 2

F 1 LbUf
ft
1

TAD
TAD

7 3 4

^ At

l^I^
64

3<*

113 6

•

3 46 j

4465
4 466

TAD
DCA
TAD

XLOTRK

XH I I RK
K 40 0 0

DCA

4 47 1
4 47 2

5 330

447 3

4 431

4475

3 15 1

nSK ADD
DK 1 V NO
XH I IRK
TCN TR2

*
^ J
1 463
4435
4632

447c

DC A

It
ecrruU
DISK

CMBEG
xlqtpk

T0VRDT

unr
KILBUF

u V Mutr

t^irf

Otir-

447 b
447 7

1 1

TAD

45 0 2

0 V RDER

K5252

FiUUKt

7M 0
5330
4506
450 7
4510
4511
4512
4513
4514
*^ 1 f

4516
4517
^

45K 21?

I 1 J
1

TMD

n If B r\

TAD

r^ till B 4

fl»

ranadd
DSKOUX
ISZ

TC NTR5

5 2 34

JMP

3137
1071
7 040

DC A
TAD

CHKMEX
TCNTR3

1 3 7

442 1

53 ! 7

CMA
DCA
RKDBAKj TAD
DSKI N
JMP

/WORD BY WORD COMPARE DATA
/DATA 0,K, CONTINUE
/DATA ERROR

4422
4420
2141

514 0

/GO, READ DATA
/TEXT POINTER
/ERROR

TOVPDT

5330
1113

/GENERATE RANDOM ADDRESS
/SEND DRIVE BACK OUT
/UPDATE PASS COUNTER, DONE
/CHECK FOR NEXT DRIVE
/SET FOR 0

DRI V S

TCNTR4
TCNTR3
/CHECK THIS DRIVE
/WAIT FOR DRIVE
/CHECK FOR NEXT
/ERROR

RLDBAK

SK P C L

453 J
4524
4525
4526
4527
4530

AyURc.5S

/bc-T L)IS^

D X SK vtU
15

4501

AUU

CMRCG
TCNTR2

45 3 1

2137
2140
5317
4437
4440
4401

4532
4S3i

5300
SbOO

PAL 10

V142

20-DEC-73

4534
4S35

0000
6365

DSKADO. 0
OSKPOIi DSKOA

ISZ
ISZ

POLtR R
TCN IP 3
TCNTR4
RKDBAK

JMP
NEPROR
OVRDEB, ERROR
CVPRED
TOVRDT, 5300
JMP I

OVPRED

13154

/LAST DRIVE HOME VET
/WAIT FOR ALL
/O.K, TO NEXT
/OVERLAP SEEKS
READ DATA
/SCOPE LOOP POINTER
/TEXT POINTER
/TO NEXT TEST

PAGE

1«•49

/ROUTiNt TO CHECK DRIVE IN AC
4536
4537
4540
4541
4542
4543
4544
454&
4S46
4S47
4550
4551
4552
4553
4554
4555
455b
4557
4560
4561
4562
4563
4564

POOO
7104
4450
1

DIN,

151

1015
4450
73 32

3144
4444
4447
5361
7330
3144
4444
1104
7640
2336
2336
5736

U05

CLL RAL
LDCMD
TAD
TAD
LDCMD
CLA CLL
DCA
RDSTAT
DSK5KP
JMP
CLA CLL
DCA
RDSTAT
TAD
SZA CLA
ISZ
ISZ

NOINf

7640
5356
5736

J
A WIT v\nTur \tr\
DkIVb> nOi
/MAKE
/r IRST SELECT DKIVK
La

CMREG
K0200
CML RTR
G0ReG2

/LOAP CwMMANP
/MAZDt EArc.CTt.u oTATUo
/SE.TUP CuMPAHb. HEGiOTtP
/REAP STAIU5
jfttrfu CAD tsirvD

NDIN
CML RAR
GDREG2

/bArbCTfcU STAXUb

K4000

/ADD I« rUDOE FACTOR
/O |K , IT7T

DIN
DIN
DIN
K6000

/EXIT

JMP I
TAD
S£A CLA
.-5
JMP
DXN
JMP I

/aETUr CUnrAKL Kbulolbn

y t.- D D

/SKIP IF NO ERROR
/EXIT

4600

PAGE

/MANUAL FUNCTION TEST
/LOAD ADDRESS 0201 OP "iMANUAL"
/SET SWITCHES TO FUNCTION
/PRESS START
/MACHIKt SHOULD HALT
/SET SWITCHES TO DISK ADDRESS
/PRESS START
/MACHINE SHOULD HALT
/SET SWITCHES TO COMPLEMENT DATA PATTERN
/PRESS START
/MACHINE SHOULD HALT
/SET SWITCHES TO 0000
/PRESS START
/INCASE OF FAILURES USE NORMAL SCOPE SWITCHES
/IF LOOP IS DESIRED USE NORMAL SCOPE SWITCHES
4600
4601

7604
0307

4603
4b04
4605
4606
460?

7 j4g

3132

U35
J155

MANUAL, LAS

K7707
AND
TCNTRl
DCA
CLA CLL CMA
PECO
DCA
Rlf
TCNTRi
TAD
TCNTRl
DCA

/l«ASK

/SAVE FUNCTION

/SETUP FOR U^E; PASS
/USE CURRENT FIELD

/ACTUAL FUNCTION

LiO

V142

4610

46 i 4

1135
0077
3070
7402
7604

46i5

31 3b

461 6
46 1 7

7402
7604

4&U
46 i 2

4613

4620
4621
4622
4623
4624
462!?

HLT
LAS
DCA
HLT
LAS
DCA
HLT
TAD

1137

46 3Q
46 31

7630

4632
4633

3140

46 34
46 35

0106

46 36
46 3 7

7640
5247

105

7 34 0
i I 35

1 1 1 4

1 1

46 41
46 4 2

3 1 5 t

4643
4644
464^
4646
4647
4650
4651
4652
4653
4654
465S
4656
4657
4660
4661
4662
466 3
466 4
4665
4666
4667
4670
4671
4672
4673
4674
4675
4676

4423
470b

J i

5 303

5302
1 1

NTSEK,

0100
3464
1 135
3151

136

3463
1140
7650
443 1
1136
4425
4705
530 3
1140
7640
5302
1151

5300
1137

4426
5302

47 0 1
47 02

4703
4704
4705

4440
4624
5373

4706

5224

TCNTB2

/SAVE DISK ADDRESS
/«AIT FOR COMPLEMENT DATA

TCNTRi

/SAVE IT
/«AiT FOP OPERATOR TO CONTINUE

TtNTRJ

CLA CLL
TCMRl
TAD
AND
K7000
K6000
TAD
SZL CLA
CLA CLL CMA
TCNTR4
DCA
TCNlRl
TAD
K7000
AND
K5000
TAD
SZ,A CLA

/GET FUNCTION

/»AS IT A R£AD
/NO, SET A FLAG
/READ FLAG
/GET FUNCTION
/MASK
/hAS IT A StEK
/NOT A SEEK
/VES
/SETUP COMMAND
/DISK ADDRESS
/SEtK ONLY
/TEXT POINTER
/ERROR, SKIP OR STATUS
/TO HANDLER
/GET FUNCTION
/MASK
/SETUP ADDRESS WORD IN BUFFER
/FUNCTION
/SETUP COMMAND
/DISK ADDRESS
/SETUP ADDRESS WORD IN BUFFER
/GET READ FLAG
/WAS IT A READ
/YES, CLEAR BUFFER
/GET DISK ADDRESS
/DISK CO
/TEXT POINTER
/ERROR
/GET READ FLAG
/WAS IT A READ
/oAS A aRITE, TO HANDLER
/GET LAST COMMAND
/KASK OUT HALF BIT
/*A5 IT HALF BLOCK TRANSFERS
/NO, COMPARE WHOLE BLOCK
/GET GOOD WORD POINTER
/CHECK FOR HALF BLOCK
/U.K. NO ERRORS

TAD
DCA
TAD
SEEK
TMANT
JMP
JMP
TAD
AND
DCA I
TAD
DCA
TAD
DCA 1
TAD
SNA CLA
KILBUF
TAD

TCNXRl
CMReG
TCNTR2

JMP
TAD
FiGURt
NERRDR
ERROR
TMANS
5373

TMANE
TCNXB3

/DATA ERROR
/WAS A HEAD
/WORD 8V hORD CQMPAKE OF DATA
/NO ERPUPS
/EPROB IN FUNCTION SELECTED
/SCOPE LOOP POINTER
/TEXT POINTER

JMP

TMANS

TMANE
TMAWOK
TCNTRi
K0007
XHITRK
TCNTRl
CMREG
TCNTR2
XLOTRK
TCNTR4

t3l&4

20-DEC'

5303
1137
4427
4437

/KASK DISK DRIVE
/ACTUAL DRIVE
/WAIT FOP DISK ADDR, IN SWITCHES

TCNTR2
DISKGO
TMANT
TmAnE
JMP
TCNTR4
TAD
S2A CLA
TMANOK
JMP
CMR£G
TAD
KOlOO
AND
SNA CLA
JMP
,5
TCNTR3
TAD
HAFCHK
TMANOK
JMP

001 4

Vi42

PAGE t-SO

TCNTRl
K0006
DRIVNO

/FILL PUFFER WITH DATA
TMftNS*

oioe

4677
4700

DC A

3137

4626
4627

'ALIO

TAD
AND

7 4 02

4430
7300

i3{54

20-DEC «73

TMANOK
TMANE,
TMANT,

PAGE 1*51

LOOP

4707

7707

K7707,

7707

FUNCTION
/WHEN IT IS SET UNDER PROGRAM CONTP OL
/NOTE no' SCOPE LOOPS ARE AVAILABLE FOR THIS TEST
I

4710
4711
4712
4713
4714
4715
4716
4717
47 20

4721
4722
4723
4724

4725
4726
4727
4730
4731
4732
4733
4734
4735
4736
4737
4740
4741
4742
474 3

4744
4745
4746
4747
4750
4751
4752
4753
4754
4755
4756

7604
7104
0077
3070
7344
3133
3132
1112
4430
1070
3464
3463
lil4
3151
4475
4775
5373

U02
1070
4450
4452
4444
7640
5352
4431
1070
3464
1114
3151
4425
477b

7000
7326
1012
3144
1170
3375
1147
4442

AUTPRO* LAS
CLL RAL
K0006
AND
DRIVNO
DCA
CLA CLL CMA RAL
REGL
OCA
REGO
DCA
K2S2S
TAD
FILBUF
DRIVNO
TAD
XHITRK
DCA 1
XLOTRK
DCA I
K5000
TAD
CMREG
DCA
DISKGO
TAPROT
APERP
JMP
K2000
TAD
APRl,
DRIVNO
TAD
LUCMD
LDADD
RDSTAX
SZA CLA
APAl
JMP
KILBUF
DHIVNO
TAD
XHITRK
DCA 1
K5000
TAD
CMREG
OCA
DISKGO
TAPROT
NOP
CLA CLL CML RTL
K0020
TAD
GDPfc.G2
DCA
APAI
K53UO
TAD
TAPHOT
DCA
STREG
TAD

/GET THE SWITCHES

/MASK DRIVE NUMBER
/SAVE DRIVE NUMBER
/SETUP HEPEAT POINTER
/DATA PATTERN TO WRITE
/FILL OUTBOUND BUFFER

/SETUP ADDRESS rtOBD IN BUFFER
/SETUP ADDRESS WORD IN BUFFER
/WRITE ALL FUNCTION
/SETUP COMMAND
/WRITE ALL TP SECTOR 0
/TEXT POINTER
/ERROR, STATUS
/FUNCTION WRITE PROTECT
/CURRENT DRIVE
/LOAD COMMADN REGISTER
/LOAD AND GO
/READ STATUS REGISTER
/SHOULD BE 0000 7?T?
/ERROR, STATUS
/CLEAR OUTBOUND BUFFER
/SETUP ADDRESS WORD IN BUFFER
/WRITE ALL FUNCTION
/SETUP COMMAND REGISTER
/rtRlTE ALL TO SECTOR 0
/TEXT POINTER
/MAKE EXPECTED STATUS
/SETUP COMPARE REGISTER

ftCCMPl

/SETUP TEXT POINTER
/GET STATUS READ
/CHECK RESULTS

PALIO
4757
4760
4761
4762
476J
4764
4765
4766
4767
4770
4771
4772
4773
4774
4775
477t>

477?

V142

/STATUS 0»Kt
/ERROR* WRITE PROTECT
/ENABLE CLEAR CONTROL
/CLEAR CONTROL
/FUNCTION READ ALL
/SETUP COMMAND
/READ ALL SECTOR 0
/TEXT POINTER
/ERROB
/EXPECTtD PATTERN
/CHECK DATA READ
/ALL O.K. 00 ONE KOBE TIME
/ERROR, WRITE PROTECT

5KP CLA
APERP
JMP
CL& CLL I AC

7610
5373
7301
4453

CLfiAtL

TAD
DC A

1017
3l5l
4425
4775
5373
1112
4427
4437
4440
4731
0000
7402
5310

ApEHR,
CBPCJP
APPl
TAPBOT, 0000
HLT
JMP

5000

PACK

KIOQO
CHREG

DISK.GO

TAPROT
JMP
TAD
FIGURL

APERP
K2525

/TEXT PQINTKB
/SUCCESSFUL WRITE PROTECT
/REPEAT

AUTPRO

/SUBROUTINE FDR "EPPORS," SCOPE tOOPS, AND
/EPKOR TYPEOUTS
/

5000
5001
5002
5003
5004
5005
5006
5007
5010

son
5012

50U
5014
5015
5016
5017
5020
5021
5022
5025
5024
5u25
5026
5027
5030
5031
5032
5033
5034
5u35
503t>

5037

0000
IbOO
317S5

7604
7 700
5217
7604
7006
7710
5215
1354
4436
1600
5755
1600
3356
2200
7301
1200
3357
4462
4462
1600
0100
1365
32 33

7402
32 36

4457
7402
4462

M,10

V142

5040
504 i
5042
504i
5044
5045
5046
5047
5050

4457

5051
5052
5053
5054
5055
5056
5057
5060
5061
5062
5063
5064
5065
5066
5067
5070
5071
5072
5073
5074
5075
5076
5077
5100
5101
5102
5103
5104
5105
5106
5107
5110
5111
5112
5113
5114
5115
5116
5157
5l2u
5121
5122
5123
5124

EPRO,

7 300

57 50
7 340

1200
4460
1600
7104
7420
5264

3200
4457
5752
1200
7700
5261
1143
4461
1144
4460
7610
3200
1200
7104
7420
5301
3200
4457
5754
1145
4461
1 146
4460
7610
3200
1361
3364
362
3010
1115
3 363
1200
7500
5346
7104
3200
1364
2364
2364
3322
4457
7402
1410
4460
1

ERRAU

CLA CLL
ERRO
TAD I
RESTRT
DC A
LAS
SMA CLA
EFPAl
JMP
LAS
RTL
SPA CLA
JMP
K0207
TAD
TYPE
EHRO
TAD I
JMP I
E5C0PE
TAD I
EBPO
RETRN2
DCA
EBPO
ISZ
CLA CLL I AC
ERRO
TAD
INHIBT
DCA

CRLF
TAD r
AND
TAD
DCA
HLT
DCA

/GET RESTART ADDRESS
/STORE
/GET SWITCH 0
/XS IT SCOPE LOOP
/NOf CONTINUE
/(SET SWR2

/INHIBIT BELL???T

/CHECK FOR BELL

/STORE FOB RETURN
/NEXT TEST POINTER
/STORE FOB SPECIAL RETURN
/GET TEXT POINTER
/MASK 9-11
/HAKE ERROR HEADER TAD

ERRU
K0007
HEDTAD
t + l

/MODIFIED HEADER IAD

.2
/MODIFIED HEADER POINTER

PRfJIER

HLT
CRLK

20-DEC- 73

13154

PHNTER
TEXPC
CLA CLL CM A
EBRO
TAD
OCTtL
CHRO
TAD I
CLL RAL
SNL
NTGD
JMP
ERRO
PRNIER
TEXGD
ERRO
TAD
SMA CLA
JMP
.3
GDREGl
TAD
TWOCT
6DPEG2
TAD
OCTEL
SKP CLA
EP
DCA
NTGO#
ERRO
TAD
CLL RAL
SNL
NTCHC
JMP
EBRO
DCA
PRNTEB
TEXCR
CBREGl
TAD
TWOCT
CRPEG2
TAD
OCTEL
SKP CLA
ERRO
DCA
NTCRC»
XTEXT
TAD
PCNTR2
OCA
XBEG
TAD
AUTOlO
DCA
K777 1
TAD
PCNTRi
DCA
EBRO
STRAUT# TAD
SMA
NQTEX
JHP
CLL RAL
EBRD
DCA
PCNTR2
TAD
PCNTP2
ISZ
PCNTR2
ISZ
DCA
.+2
PBNTEH
HLT
AUTOiO
TAD 1
OCTEL

PACE 1"53

/PRINT PCt
/GET PC POINTER
/PRINT PC STORED
/GET TEXT POINTER

/NOT GDI REGISTER

DCA

/V<AS IT A 6 BIT OCTAL BYTE
/NO
/GET DATA
/PRINT TWO OCTAL

/PRINT FOUR OCTAL
/GET TEXT POINTER

/PRINT CRI

/PRINT
/PRINT FOUR OCTAL

• OF HEADS
/COUNTER FOR
/GET TEXT POINTER

/NOT THIS ONE
/GET TEXT MESSAGE POINTER

/STORE FOB PRhTER
/PRINT XXl
/MODIFIED TEXT POINTER
/PRINT FOUR OCTAL

Sl2b
5126
5127
5130
5131
5132
5133
5134
5135
513b
5137
5140
5141
5142
5143
5144
5145
5146
5147
5l50
5151
5152
5153

V142

20-DEC" 73

2363
5310
7604
700d
0016
7650
5342
7630
5340

AGAIN,

1357

5755
1356
5755
7402
47.60

5756
5264
71043200
2364
2364
2010
5325

13154

PAGE 1«S4

IS%
PCNTRi
JMP
STRAUT
LAS
PTL
AND
KG400
SNA CLA
JMP
ERHLT9
S2L CLA
JMP
I
H18
TAD
ESCOPE
JMP I
TAR
RfcTpN2
ESCOPE
JHP I
EBHLT9» HLT
XGTPEG
JM5 I
RETRN2
JMP I
MTGD
JMP
CLL PAL
NOTtXf
ERPO
DCA
PC NT R
ISZ
PCNTR2
ISZ
AUTOl
ISZ
JMP
AGAIN

/CHECK FOR NEXT XXt
/GET SWITCH 5
/SHIFT FOP TESTING
/MASK
/WAS IT INHIBIT HALT
/ K 0 HALT
/SAME OR hEXT TEST
/SAME TEST
/GET RETURN
/CHECK FOR BELL
/GET RETURN
/CHECK FDR BELL
/ALL RECOVERABLE ERROR HALTS
/CntCK FOB GET ALL REGlbTtFo
/NU# TRI SAnC TtoT AGAiN
/DUMP

5154
5155
5l5t>

5157
5160
5161
5162
5163
5164
5165
5166
516?
5170
5171
5172
5173
5174
5175

0207
5470
0000
0000
5527
5756
0146
0000
0000
1366
6615
6630
6644
6662

K0207
ESCOP£f
RETRN2 #
INHIBT*
XGTBEG
XTEXT#
XpEGj
PCKTPl
PCNTRi
HEDTAD
HEDLST*

0207
SCOPE
0

GTREG
TEXST
CRREG2
0
0

TAD
CRTXl
EBTX2
ERTX3
EBTX4
ERTX5
EBTX6
ERTX7
E8TX9

6b 7 2

6704
6716
6726

HgDLST

5200

PACt

/SUBROUTINE TO WAIT FqR INTERRUPTS
/IF INTERRUPT 0CCUPE5 GO BACK

5200
5201
5202
5203
5204
5205
5206

0000
7450
1122
3221
7240
3231
6001

LIO

V142

20-DEC- 73

13154

22 3 1

ISZ
JMP
ISZ
JMP
lOF
JMP
INTADD, I&Z

C0>^P2
t-l

5207
5210
521 I
52 2
52t 3
52
521 S
J

5217
5220

5207
222 1
5207
6002
5600
2^00
4447
7402
5600

/FAST OR SLOW
/GET SLOW CONSTAMT
/SETUP COUNTER

SNA
K7740
TAD
DCA
COVPl.
CLA CmA
C0HP2
DCA
ION

/SETUP COUNTER
/TURN IT ON

PAGE 1-55

COWPl
.-3
I

IUN«T

DSK5KP
ERHLTi

HLT
JMP

/TURN IT OFF
/NO INT OCCUHED

lONlvT

ICM^^T

/DISK SKIP lOX
/ERROR* ILLEGAL INTERRUPT
/EXIT

/ROUTINE TO COMPARE AC 10 GDREG2
/

5221
5222
5223
5224
522b
5226
5227
52 30

0000
3l5b
liSb
7041
1144
7640

ACRLG
DCA
ACREG
TAD
CIA
GDRtG2
TAD
SZA CLA
COMPl
ISZ
COMPl
JMP I

2221
56 21

/SAVE AC
/SKIP IF O.K.
/ERROR* DON'T COMPARE

/ROUTINE TO COMPARE CRREGl AND CRREG2
/GDREGl AND GDREG2,
/

5231
5232
5233
5234
5235
5236
5237
5240
5241
5242
5243
5244
5245
5246

0000

5247
5250
5251
5252
5253
5254
5 255
5256
5257
5260

0000
7300
1122
3221

C0MP2,

CLA CLL
GDREGl
TAD
K00t7
AND
CIA
CPPEGl
TAD
SZA CLA
CRERR
JMP
CRREG2
TAD
CIA
GDREG2
TAD
SZA CLA
C0MP2
ISZ
C0MP2
JMP I

7 300

1143

OUb
7041
1145
7640
5245
1146
7041
144
7640
J

22 3 1

5631

/NOT THE SAME

/EPROB* NOT THE SAME

/ROUTINE TO WAIT FOR 500 HS,
/

323 1
2231

5254
2221
5254
5647

WTISZ,

CLA CLL
K7740
TAD
COMpi
DCA
C0MP2
DCA
C0MP2
ISZ
.-1
JMP
COMpl
ISZ
.-3
JMP
WTISZ
JHP I

/ROUTINE TO WAIT FOR DISK SKIPS

/GET TIME CONSTANT

PALlO

VI 42

2o«»DEC ""7 3

S26i
5262
526 3
5264

0000
7300

SKWAT»

526!i

32 31

5266
5267
5270
5271
5272
5273
5274
5275
5276
5277

4447
7610
5276
2231
5266
2221
5266
7610
2261
5661

n 22

CLA CLL
TAD

3221

DC A

Mu?

D5KSKP
SKP CLA
JMP

C'/'^'^

RDSI,
I0T5*

0^00
6745
7410
7402
3147
1147
5700

"HTSK KKTP IQT"

/n<«Kl>

/(fUT

Tnb O^^ir

C0MP2

ir-

.-4
JMP
COMPi
ISZ
,«6
JMP
SKP CLA
5KWAT
SKWAT
JWP I

/SUBPUUTUE
5i00
5301
5i02
530J
5304
5305
5306

PAGE 1*56

13154

/NO SKIP OCCURRED

/EXIT

TO HEAD STATUS REGISTER

DRST
SKP
ERHLT5 , HLT
DCA
TAD
JhP

/READ STATUS lOT

STPEG
STBEC
POST

/SKIP TRAP
/SAVE RESULTS
/EXIT

/subpouiinE to LOAD CURRENT ADDRESS REGISTER
5307
5310

0000
3154

531 1

53U
5315

3153
1154
6744
5707

5316

7402

53i 3

53H

LDCA,

154

I0T4#

ERHLT4

DCA
TAD
DCA
TAD
DLCA
JHP

/SAVE IN ADDRESS

ADPEG
ADREG
CAREG
ADREG

/SETUP INITIAL CURRENT ADDRESS
/LOAD CURRENT ADDRESS lOT
/EXIT

LDCA

/SKIP TRAP

HLT

/SUBROUTINE TO LOAD TRACK ADDRESS REGISTER
5i

5320
5J21
5322
5323
5324

0000
3152
1152
^743

LOAD,

I0T3,

DCA
TAD
DLAG

EHHIjT3 ,

JHP
HLT

57 17

7402

/Sl'BROUTIfvE

0000
3151

S325
5326
5327
5330

6746

IDT6,

PALIO

V142

20-OEC-73

5331
5332

5725
7402

J«P
EPHLT6, HLT

5333
5334

0000
6741
7410
2333
5733

SDKP,
TOTlr

/SAVE OUTBOUND DATA

DAREC
DAREG
I

/LOAD DISK ADDRESS REGISTER
/EXIT
/SKIP TRAP

LDAD

TO LOAD COMMAND REGISTER

U5l

DCA
TAD
DLDC

/SAVE OUTBOUND DATA

Cf^-PtG

CMPEG
/LOAD COMMAND REGISTER

13154
I

PAGE 1-57

LOCh

/EXIT
/SKIP TRAP

.'SUBROUTINE TO ISSUE •DSKP'* DISK SKIP lOT

5 335

5336
5337

/DISK SKIP lOT
/DID NOT SKIP

DSKP
SKP
ISZ
JHP

SPKP
SDKp

/EXIT

/SU&POUTINE TO ISSUE "DCLR« CLEAR lOT
/

5340
5341
5342
5343

0000
6742
5740
7402

CLDB,
ICT2»

5344
5345
5346
5347

OOOU
6747
5744
7402

LDMN»
I0T7,

DCLP
JMP
ERHLT2* HLT

CLDR

/DCLR «CLEAR TOT"
/EXIT
/SKIP TRAP

/SUBROUTINE TO ISSUE «OMAn» MAINTENANCE lOT
/

DMAN
JMP
EPHLT7, HLT

LDMN

/"DHAN" MAINTENANCE lOT
/EXIT
''SKIP TRAP

/SUBROUTINE TU SHIFT# THEN READ DISK ADDRESS
/INTO DATA BUFFER, 12 SHIFTS
/

5350
5351
5352
5353
5354
5355
5356
5357
5360
5361
5362
5363
5364
5365
5366
5367
5370
537 1
5372

0000
7300
1130
3134

RDAD,

CLA CLL
M12
TAD
SaCNTl
OCA
CLA CLL CML PAR
LDMA^
PAP

7 3 30

4455
7010
4455
7300
1015
4455
2134
5362
7300
1012
4455
3152
1152
5750

LDMAN
CLA CLL
K0200
TAD

LDMAN
I6Z
JHP
CLA CLL
TAD
LD^AM
DCA
TAD
JHP I

,-2

K0020

DAREG
DAREG
RDAD

PAGb
/

/SHoRuUIUE Tu READ DATA BUFFER TU AC
5400
5401

0000
7330

/LOAD MAINTENANCE

PDBF,

CLA CLL CML RAP

/SHIFT TRACK ADDRESS BIT
/LOAD MAINTENANCE lOT

SBCNTl

5400

/BET MAIN(l) ENABLE BIT
/LOAD MAINTENANCE

/SHIFT 12 BITS
/READ DATA BUFFER
/SAVE RESULTS

/EXIT

PAGE 1-58

13154

20-DEC-73
LDMftN

5*03
5404

1012
445b

540t>

l-^O

5407
5410
5411

15i»

TAD

K00.20

DCh
TAD
DCA
TAD
JMP

DBRfcG

/LOAD MAINTENANCE

SbOO

DBRtC
DTRtG
DTRLG
RDBr

/£X1T

RE.GXSTER 10
/subpcjUtine to SHIFT COMMAND
/DATA BUFFER IHtIN READ DATA BUFFER
i

5412
5413
5414
5415
5416
5417
5420
5421
5422
5423
5424
5425
542b
5427
5430
5431
5432
5433
5434

ooco
7300
1130
3134
7330
4455
7010
445b
'300
1016
4455
2134
5224
7300
1012
4455
3151
1151
5612

RDCH,

CLA CLL
TAD
DCA
CLA CLL
LDMAN
RAR
LDMAN
CLA CLL
TAD
LDMAN
ISZ
JMP
CLA CLL
TAD

Ml 2

/12 BIT SHIFT

SBCNTi
CML RAR

/LOAD MAINTENANCE
/LOAD MAINTENANCE

/ENABLE BIT FOB SHIFT
/LOAD AND GO

K0400
SBCNTI
.-2

/SHIFT 12

K0020

/ENABLE READ BUFFER
/LOAD AND GO
/SAVE IT

LDHA>J

DCA
TAO
JMP

CMREG
CMBCG
RDCM

/EXIT

/ROUTINE TO ZERO WORK BUFFER
5435
5436
5437
5440
5441
5442
5443
5444
544b
5446

0000
7340
1067
3010
1123
3164
3410
2164
5243
5635

KLBUFi

CIA CLL CMA
BGNBUF
TAD
AUTOlO
DCA
TAD
DCA
DCA
ISZ
JMP
JMP

K7 400
I

DATCNT
AUTOlO
DATCNT

KLBUr

•

7/)/?/;

/START OF BUFFER -1
/SETUP AUTO INDEX

'.o^-

/SETUP COUNTER
/CLEAR BUFFER
/UPDATE COUNTER
/NOT ALL CLEARED YET
/BUFFER CLEARED

-2

/ROUTINE TO FILL THE i^ORK BUFFER >JlTK
/THE COMPLEMENT DATA THATS IN ThE AC.
/

FLBUF*

5447
5450
5451
5452
5453
5454
5455

COOO
3165
7340

ALIO

V142

20-DCC -73

5456
5457
5460
5461

1165
3410
1165
7040
3410
2164
5256
1101
3410
5647

LPDAT,

5 46 2

5463
5464
5465
5466
5467

SAVU&T
DCA
CLA CLL CMA
BGNbUK
TAD
AUTUlO
DCA
K7600
TAD
DATCNT
DCA

1067
3010
1124
3164

TAD
DCA
TAD
Cka
DCA
ISZ
JHP
TAD
DCA
JMP

13t54

SAVDAT
AUTOlO
SAVDAT
AUTOlO
DATCNT
LPDAT
K12i4
AUTOlO
FL8UF

/SAVE DATA WORD
/START OF BUFFER •!
/SETUP AUTO INDEX
/C-oo

/SETUP COUNTER

PAGE 1-59
/GET FIRST WORD
/STORE IN BUFFER
/GET SECOND WORD

/COMPLEMENT IT
/STORE IN BUFFER
/UPDATE COUNTER
/MORE WORDS TO GO
/HAKE WORD IN BUFFER
/BUFFER FULL

/ROUTINE TO CHECK FOR ^AIT AND RECALIBRATE
5h70
5471
5472
5473
5474
5475
5476
5477
5500
5501
5502
5503
5504
5505
5506
5507
5510
5511
5512
5513
5514
5515
5516
5517
5520
5521
5522
5523
5524

Tb04
0012
7640
4433
7604
0013
7650
5322
7301
4453
1151
0325
4450
7326
445i
4432
7000
1151
1015
4450
4432
7000
1151
0325
3151
7301
4453
5726

5525
5526

7577
COOO

3i2t>

scrPE*

TOTST
OCA
LAS
K0020
AND
5ZA CLA

WATISZ
LAS
K0040
AND
SNA CLA
NOCLR
JMP
CLA CLL I AC
CLRALL
CMPEG
TAD
K7S77
AND
LDCMD
CLA CLL CML RIL
CLRALL
SKP^AT
NOP
CMBEG
TAD
K0300
TAD
LDCMD
SKPWAI
NOP
CMRtG
TAD
K75 77
AND
CMPEG
DCA
CLA CLL lAC
CLRALL
TOTST
JHP I
K7577,
TOTST,

/SAVE SCOPE LOOP POINTER
/GET SWITCH 7
/MASK
/WAIT LOOP?
/YES
/GET SWITCH 6
/MASK
/IS IT CLEAR DISK
/NO, DON'T
/ENABLE CLEAR CONTROL
/CLEAR CONTROL
/GET LAST COMMAND
/MASK OUT SET DONE
/LOAD COMMAND
/ENABLE RECALIBRATE
/RECALIBRATE
/WAIT FOR FIRST DONE
/LAST COMMAND
/LOAD COMMAND
/hAlT FOR SECOND DONE
/MASK SET DONE

/ENABLE CLEAR CONTROL
/CLEAR CONTROL
/GO TO TEST

7577
0

/ROUTINE TO GET ALL REGISTERS
/(NOTEI THIS ROUTINE WILL CAUSE ONE MAINTENANCE
IF THE LAST PREVIOUS
/DATA BREAK TU LOCATION 0
/FUNCTION EXFC'.'TED «AS A READ DATA BREAK.)
5b71
5530
5b3l
5532

0000
7604
0011
7650

GTPEG,

LAS
AND
SNA CLA

/GET SWITCH 8
/MASK
IT GET ALL REGISTERS

/«yAS

iit54

Vi42
5533
5534
ibib
55 3b

953?
5540
5541
5542
5543
5544
55 4 5

5546
5541
5550
5551
555 2

JMP I
ISZ
RDSTAT

5727
23?7
4444
445b
7300
4451
7J32
4455
4454
4446
4445
4462
7301
4453
1124
5727

PAGE 1*60
/NO, 00 BACK
/¥E5» UPDATE POINTER

GTP£G

/READ STATUS
/READ LOWER BUFFER

CLA CLL
LDCUR
CLA CLL CML RTR
LDMAN
RDCHC
PDADD

/SEI CA TO 0 FOR BREAK
/EN&BLE SHIFT TO LOWER BUFFER
/BRLAK IT LAST BREAK WAS A READ
/BEAD CRC
/READ TRACK
/READ COMMAND

CHLF
CLA CLL lAC
CLRALL
TAD
K7600
JHP I GTPEG

/E.MABLE CLEAR CONTROL
/CLtAR CONTROL

/tXIT

/ROUTINE TO SEND DRIVES ON AN OVERLAP SEEK
5553
5554
555b
5556
5557
5560
S561
5562
5563
5564
5565
5566
5567
5570

0000
3327
7004
1070
4450
1151

DOUT,

U03
1157
4450
327

OCA
RAL
TAD
LDCMD
TAD
TAD
TAD
LDCMD
TAD
LDADD
DSKSKP
JMP
JMP I

4452
4447
5366
5753

GTREG

/SAVE ADDRESS

DKIVNO

/GET CURRENT DRIVE
/LOAD COMMAND REGISTER
/GET LAST COMMAND ISSUED
/ADD IN SEEK ONLY FUNCTION
/ADD IN CURRENT FIELD
/LOAD COMMAND REGISTER
/GET SAVED ADDRESS
/LOAD AND GO
/WAIT rOR FIRST DUNE FLAG
/HANG IF NQ SKIP
/DISK tS OUT

CMREG
K3000
GIREG
.•1

DOUT

PAGt
/

/HOUTINE TO RtAD UR i^HlTE ON DISK
/RETURN
SKIP OR STATUS ERROR
/RETURN +2 O.K.

5600
5601
5602
5603
5604
5605
5606
5607
5610

DISKGi

5612
5613
5614
5615
5616

0000
3254
7340
3173
1600
3174
2200
1151
0255
1157
1070
4450
1067
4451
1254

LIO

V142

20-DEC- 73

5617
5620
5621
5622
5633
5624
5625
5626
5627
5630
5631
5b32
5633
5634
5635
5636
5637
5640
5641
5642
5643
5644
5645
5646
5647
5650
5651
56S2
5653

4452
4432

LDADD

5 234

JMP
CLA CLL
DCA
RDSTAI
TAD
S2A CLA
JMP
TAD

56U

DCA
CLA CLL
DCA
TAD I
DCA
rsz
TAD
AND
TAD
TAD
LDCMD
TAD
LDCUR
TAD

SKP»nAT

7 3 30

3144
4444
1104
>640
5236
1167
2200
3574
5600

U66
52 32

1147

OOU
7650
5252
7300
1151
0106

no5
7630
5252
3173
5230

ino
5232

ISZ
DCA I
JMP I
SKPERH* TAD
JMP
STAEPKf TAD
AND
SNA CLA
JHP
CLA CLL
TAD
AND
TAD
SZL CLA
JMP
DCA
JMP
HRDERRf TAD
JMP

PETHN,

/SAVE TRACK ADDRESS

SAVTRK
CHA
SOFERR
DISKG
SAVPCT
DISKG

/SET CRC ERROR FLAG
/GET TEXT POINTER
/SAVE IT
/UPDATE POINTER
/GET COMMAND
/MASK OFF
/CURRE^JT FIELD
/CURRENT DRIVE
/LOAD COMMAND
/GET BEGINNING OF BUFFER
/LOAD CURRENT ADDRESS
SECTOR
/GET TRACK

CMREG
K7501
HUMkiMA

DHIVNO
BGN'bUF

lil54

% 5
SKPERR
CML RAR
GDREG2

/LOAD AND CO
/WAIT FOR DISK SKIP
/EPRHR, NO SKIP
/EXPECTED STATUS
/SETUP COMPARE REGISTtP
/READ STATUS

K4000

STAtRR
K5373
DISKG
SAVPCT
DISKG
K0306
RtTRN
STREG
KOOlO

HRDERR
CMREG
K7000
K6000
HRDERR
SOFEPB
RtTRN -2
K5300
RETKN

/*A5 STATUS 4000
/ERROR* STATUS
/TEXT POINTER
/UPDATE FOR GOOD RETURN
/STORE IN TEXT POINTER
/EXIT
/SKIP TEXT POINTER
/EXIT
/GET STATUS JUST READ
/MASK OUT CRC ERRORS
/WERE THERE ANY
/fiO, OTHERS

/GET LAST COMMAND
/MASK FUNCTION
/ADD IN FUDGE FACTOR
/WAS IT A READ ALL OR READ
/NO, MUST BE A WRITE
/SET CRC ERROR FLAG
/CO CHECK DATA OR RETURN'
/EXIT

5654
S655

0000
7501

SAVTPKr 0
7501
K750l»

/ROUTINE TO COMPARE WQRDS IN BUFFER TO
/KNOWN DATA PATTERN IN THE AC,
/

5656
5657
5660
5661
5662
5663
5664
5665
5666
5667
5670
5671
5672
!>b7 j

5674
5D7b
567b
5677
5700

0000
3144
1067
3154
ii5i

0100
T041
1554
7650
1151

oioo
5343
2154
1554
»041
1152
7650
5303

FGUREf

GDREG2
DCA
BGNBUF
TAD
ADRCG
DCA
ChREG
TAD
K0007
AND
CIA
ADREG
TAD 1
SNA CLA
.4
JMP
CMRLG
TAD
K0007
AND
DTEKR
JMP
ADREG
rsz
ADPEG
TAD I
CIA
DAREG
TAD
SNA CLA
.3
JMP

/SAVE FOR ERROR PRINTER
/GET START OF BUFFER
/SAVE FOR ERROR PRINTER
/GET DISK NO, AND EXT, BIT
/MASK THEM
/GET FIRST TRACK v«.OHO
/WAS IT 0,K, 7
/\r.&, CHECK NEXT TRACK WORD
/GET DISK NU. AND EXT, BIT
/MASK THFM

/UATAERROR
/UPUATE ADDRESS
/GFT SECOND WORD

/COMPARE TO ADDRESS
/WAS SECOND TRACK WqRD O.K.
/YE5# NOW CHECK DATA

.MO

V142

5701
5702
5703
5704
5705

1152

570t>

5707
5710
5711
5712

57U
5714
5715
5716
5717
5720
5721
5722
6723
5724
5725
5726
5727
5730
5731
5732
573i
5 7 34

5735
5736
573?
5740
5741
5742
5743
5744
5745
5746
5747

20»DEC • 75

5 3 4 3

732t>

U23
3164
2154
1554
7041
1144
7640
5344
1144
7040
3144
2164
530b
2154
1101
7041
1554
7650
533 1
1101
5343

LPFIG,

/GET GOOD INFO
/DATA ERROR

/SETUP COUNTER
/UPDATE ADDRESS
/GET DATA WURD

/COMPARE 10 GOOD ONE
/WAS ^ORD O.K.?
/f.0, DATA ERR13R
/GET CDOD DATA

7 33 0

3144
11^3
7b40
5656
7340
3173
1170
3574
7 330
3144
1554
3155
2256
5656

PAGE 1*62

13t54

TAD
DABLG
JMP
DTERP
CLA CLL ChL RTL
K7400
TAD
DATCNT
DCA
ADPtG
ISZ
ADREG
TAD !
CIA
TAD
GDREG2
S2A CLA
JMP
DTEHB
TAD
GDREG2
CMA
GDRtG2
DCA
DATCNT
ISZ
JMP
LPFIG
ADREG
ISZ
TAD
K1234
CIA
ADREG
TAD I
SNA CLA
JMP
.t3
TAD
Kt234
OTCHR
JMP
CLA CLL ChL RAP
GDREG2
DCA
SOrERR
TAD
SZA CLA
JMP I
FGURE
CLA CLL CMA
SOFERR
DCA
K5300
TAD
DCA I
SAVPCX
CLA CLL CML RAR
GDREG2
DCA
ADREG
TAD I
DTREG
DCA
rCURE
152
FGURE
JMP I

DTERP,

/IT IS A COMPLEMENT DATA

/UPDATE BUFFER COUNTER
/MORE TO CHECK
/UPDATE ADDRESS
/GET aORD in buffer
/WAS IT O.K.
/YES ALL DATA O.K.

/«ORD LOST IN SUFFER +1
/EXPECTED STATUS
/SETUP COMPARE REGISTER
/GET CRC ERROR FLAG
/aAS IT SET
/NO THE BUFFER IS O.K.
/SETUP CRC FLAG
/RESET FLAG
/TEXT •'ESS
/SETUP TEXT POINTER

/SETUP COMPARE
/GET BAD itORD
/SAVE FOR PRINTER
/UPDATE FOR ERROR RETURN

5750
5751
5752
5753
5754
5755
5756
5757
5760
5761
5762
5763
5764
5765
5766

2003
7200
0704
7200
0322
7200
2324
7200
0402
7200
0315
7200

TEXPC*

TEXT

upCl"

TEXGD,

TEXT

"GDI"

TEXCR#

TEXT

"CRI"

TEXST,

TEXT

«STl"

TEXDP»

TEXT

"DBI"

TEXCM,

TEXT

"CM|»

0401.

TEXDA/

TEXT

"DAI"

7200
0301

TEXCA,

TEXT

-CAI"

PALIO

V142

5767

7200
OIOh
7200
0424
7200

5 7 70

5771
5772
5773

13IS4

TEXAP,

TEXT

"ADI"

TEXDT,

TEXT

"OTI"

PAGE 1>63

6000

/SUBROUTINE TU SHIFT CRC REGISTER TO DATA
/BUFFtP THEN kEAD IT,
f GOi

0000
7 300

6O02
6U0 3
6004
600S
6006
6007
6010
6011
6012
6013
6014
6015
6016
6017
6020
6021
6022
6023
6024
6025
6026
6027

3134
7330
445&
7yl0
4455
7010
4455
2134
5211
7300
1012
4455
3146
1130
3134
7332
4455
7010
4455
2134
5225

JHP
CLA CLL
TAD
LDMAN
DCA
TAD
DCA
CLA CLL
LDMAN
RAP
LDMAN
ISZ
JHP

6030
6031
6032
6033
6034
6035

7300
1012
4455
0116
3145
5600

CLA CLL
TAD
LDMAN
AND
DCA
JMP I

6000

CLA CLL
TAD
.yi2
DCA
SBCNTl
CLA CLL CML PAR

13U

/12 SHIFTER

/LOAD MAINTENANCE
RAP
LU^'AN

/LOAD MAINTENANCE

RAP
OMAN
ISZ

/LOAD AND GO

SBCNTl
.-2

/12 BIT SHIFT

K0020

/ENABLE READ BUFFER

CKPEG2

/SAVE IT

M12

sacMi

/12 BIT SHIFTER

CML RTR
/LOAD MAINTENANCE

/LOAD AND GO
SBCNTl
,•2

/12 BIT SHIFT

K0020

/ENABLE READ SUFFER

K0017
CRPEGl
PDCR

/SAVE OTHER HALF
/EXIT

/SUBROUTINE TO PRINT TWQ OCTAL
603fa

6u37
6040
6041
6043
6044
6045
6046

0000
3134
1134
7010
7012
0100
1

26 4

4436
1134

DCA
TAD
RAR
RTR
A^D
TAD
TYPE
TAD

SBCNTl
SBCNTl

K0007
K02b0

/PRINT FIRST BYTE

PALIO

VH2

6047
6050
6051
6052

0100
1264
4436
5636

K0007
K0260

kUO
TAD

/PRINT SECOND BIT
/EXIT

TYPiL
.I,«P

TOCT

/
/

/HOUTi^t TO DU CRLF
605i
6054
6055
605b
6057
6060
6061

443b
1 263
4436
5653

6062
606 3
6064
606b

0215
0212
0260
0240

K02i5,
K02i2,
Ku2b"»
KO240,

6066
6067
6070
6071
6072
6073
6074
6075
6076
6077
6100

noOO
7006
7006
3253

FROCT,

6102

7004

Oi)00

7300

CLA CLL
K0215
TAD
TYPE
TAD
K02i 2
TXPE
JMP I
UPONE

126 2

C212
0260
0240

/POUTINL TO PHINT FOUj

6 i 0i
6 104

610b
6106
6107
6tl0

PTL
SIl

UPONE

DC A

U31

TAD
OCA
TAD

3236
1253
OlOO
1264
4436

AND
TAD
TYPE
TAD
OIL
BAL
DCA
ISZ
JMP
TAD
TYPE
JMP I

253

3 25 3

2236
5274
1265
4436
5666

TOCT
UPONE
K0007
K0260
tiPONE

UPONE
TUCT

.-u
K0240

FBOCT

/SUBROUTINE TO PRINT

6ni

oooo
7300

17U

CLA CLL
TAD I

61U

2311
326b
)66b

ISZ
DCA
TAD

6117

Olio

fc-SD

6112
6113
6114
6115

7450
5345
7500
7020

SNA
JHP

6124
6l2b
6126
6127
6130
6131
6132
6133
6134
6135
6136
613?
6140
6141
6142
6143
6144
614S
6146

700 1

lAC
RIP
RTB
PTR

6147
6150

4100
3740

6151
6152
6153
6154
6155
61S6
6157

0000
6046
6041
5353
6042
7200
5751

PBlNTi

6200

PACE

6 1 ?3

PAGE 1-65

EXIT

Sf^A

TYPE
FHOCT
TAD I
K0077
AND
SNA
EXIT
JMP
K3740
TAD
SMA
K4100
TAD
K0240
TAD
TYPE
FROCT
ISZ
CLA CLL
PRN + 5
JMP
CLA CLL
PRN
JMP 1

666
0111
\

7450
5345
1350
7!500
1

PHN
FKOCT
FHOCT
K7700

CML

7012
7012
7012
4436

347

1265
4436
2266
7300
5316
7300
5711

/GET POINTER

UI54

V142

6120

6122

20-DEC -73

PALIO
6 121

EXiTi

K4i00,
K3740,

4100
3740

/POUTXNE TO TYPE
•

TLS
TSF
JMP
TCF
CLA
JMP

.-1

/ROUTINE TO RECALIBRATE SELECTED DRIVE OR
/SEEK ONLY POSITION IN AC ON SELECTED DRIVE,
/

6200
6201
6202
6203
6204
6205
6206
6207
6kl0
6211
6il2
6213

0000
7300
1600
3315
2200
1200
3215
1070
1157
4450
7326
4453

RE5T0R*

CLA CLL
RE5T0R
TAD 1
SAVPC
DCA
RESTOR
ISZ
RESTOR
TAD
ONLY
DCA
DRIVNO
TAD
HUMt»«A
TAD
LDCMD
CLA CLL CML RTL
CLRALL

/GET TEXT POINTER
/SAVE FOP ERROR
/UPDATE PC
/GET PC
/SAVE FOR END OF SEEK ROUTINE
/CUHRENT DPIVt
/CUKRENT FIELD
/LOAD COMMAND
/ENABLE PECALiBHATE BIT

/"RECALIBRATE"

frLi 0

V I 42

6214

5232

6 215

0000

6 216

3i 1 6
16 15

DC A

6 2 17
6 2 ?0

3 3 15

DC A

62 2 1

2 215

ISZ

6222

1151

622 3

00'' 2

6 2 24

115?

6 2 25

62 33
6 2 34

7 3 30

62 3b

3144
1122

6227
6230

62 3 1
623 2

6236
6237

/CHECK FOR ERRORS

^AVXO

/SAVE LUwEP TRACK BITS
/GET TEXT POINTER

SAVPC
r ^B^r

/GET COMMAND
/MASK OFT EXTENDED BIT
/CUPRENI EltLD
/CURRENT DRIVE
/SEEK ONLV function

TAD
n ti T V w n

070

110 3
4450
1316
4452
44 3 2
5 313

62 26

TAD

CHECK

TAD
LDCMD

K3000

/GET POSITION
/LOAD AND GO
/WAIT FUR FIRST DONE FLAG
/ERRORf NQ SKIP
/EXPECTED STATUS
/SETUP COMPAf^C REGISTER

LD ADD
r*UI7/"V

C &^ D 1^ K T

33 20

H 1

CL» CLL
OCA
TAD
ncA
RDSTaT
TAD
SNA CLA

CML PAP
GD REG2
K7 7 40
RN AD

/sptup skip TIM^R
/READ STATUS

62 40

4444

6241
6242

U04
7650

62 4 3

5252

+ 7

/YES

6244
6245
6246

105

TAD

K6 0 0 0

/NOi

3144

DC A

1147

GDPtG2
SIRSG

TAD
K2 0 0 0
TAD
S2A CLA
SEKEP2
JMP
K0200
TAD

6250

1102
7b40

6 251

5 310

6252

1015
1151

6 247

6 25 3
6 25 4
6 255
6 25 6

4450

6 25 7

4444

6 260

44 47
4 1 0
5 2 7 3

6 26 3

1105

6264

76 40

6 26fc
6 26 7

/ORIGINAL COMMAND
/LOAD COMMAND

LDC MD
CLA CLL CML RTR

/EXPECTED STATUS
/READ STATUS
/FLAG SET?

314 ?4

6262

drive MUST BE BUSYi

/ADD IN FUDGE FACTOR
1^ O
U"X*t OwOi
f
ERROR
/N0
/ENABLE SET SECOND DONE FLAG

ChPEG

^ ^

6 261

6 265

K 4000

CHKSKr» RDSTAT
DSKSK P

/NO
/^ES GOT ITl

r ri T <; K D
K6000

/DRIVE KUSY?
/NOf ERROR

SZ A CLA
5LKEH2
n IN W n U H
CHKSKp

« ^1

2 36 4
5 25 7

T S7
»

JMP

6 27 1

5 25/

6272

5 313

62"' 3

7 3 30

6 27 4

314 4

DC A

4444

hilb
h2Tb

6300
6iOl

PALIO
*i02
6303
6304
6i05
6306
6307
6310

63U
6312
6313
6314

GQTSKF# CLA CLL

104

7640
S310

U5i

7t.50

SEKEP2,
G08AK,

166

5311

K4000
TAD
SZA CLA
SiLK£;R2
JMP
CMRCG
TAD

/wAS IT ONLY DONE FLAG
/NO, ERROR STATUS
/GET LAST COMMAND

AUD
LDCMD
DCA
PDSTAT
SNA CLA
JSZ
TAD
DCA I
JMP I
TAD
JMP

SAVPC,
SAVTC,
A7577,

6320

OOOO

RnAD,

6 32 1

3 360

6322
6323
6324
6325
6326
6327
6330
6331

7 101

63 32

3 363

6333
6334

1363

DCA
CLL lAC
TAD
TAD
CLL RTL
OCA
TAD
PTR
TAD
OCA
TAD
SNL
JMP
TAD
CLA
TAD
GOTADD, DCA
TAD
TAD
OCA
TAD
DCA I
TAD
TAD
DCA
PAL
DCA I
TAD I
CLL RAP
TAD
JMP I

6 3 3b

6336
6337
6340
6341
6342
6343
6344
6345
6346
6347
6350
6351
6352
6353
6354
6355
635b
6357

362

7420
5341
1172
7200
1363
3364
1361
1360
3360
1364
3760
1360
1075
3360
7 004
3760
1760

7110
1

364

5720

6 360

OOOU
6365
1234
2345

K5300
SAVPC
ONLY
K0306
GOBAK

/SETUP TEXT POINTER
/BACK to TEST
/SKIP TEXT POINTER
/EXIT

RANDOM DISK ADDRESS

SAVPDT# 0
DSKSAV DSKOA
Pf*>-HDi #

ONLi:

/MASK OUT
/CLEAH STATUS
/SETUP COMPARE REGISTER
/READ STATUS
/WAS STATUS 0000?
/UPDATE PC

GDBEG2

7b77

6361
6362
6363

PAGE 1*67

A7577

/POUTINE TO GET

362

SKIPI

POSIAT

0000
oooo
7&77

fJO

/SETUP EXPECTED STATUS
/HEAD STATUS

6315
631b
6317

1363
7106
3362
1363
7012

/ERROPf

nA p

13154

0317
4450
3144
4444

L n Li

GDREG2

V142

2215
1170
371b
5615

CH^o^P
sr K E P 1

1234

RNWRD2* 2345

SAVPOT

/SAVE DISK NO, POINTER

RNWRDl
PNWRD2

RNWRDl
RNWRD2
RNWRDl
RNWBD2
RNWRD2

GOTADD
ENDTRK
RNWRD2
RNWRD4
DSKSAV
SAVPOT
SAVPOT
RNWRD4
SAVPOT
SAVPOT
K0004
SAVPOT
SAVPOT
SAVPOT

PNWRD4
RNAO

/USE THIS AS DISK AOOI^ESS
/HAVE TO CHECK BOUNDARIES
/GET SAME
/SAVE WORD
/GET POINTER
/ADD IN DRIVE NUMBER
/MAKE ADDRESS
/GET rtORD
/STORE IT
/ADD IV FUDGE FACTOR
/MAKE ADDRESS
/GET THE LINK
/SAVE EXTENDED SIT
/GET IT
/SHIFT
/GET WORD
/EXIT

llt54

PALiO

Vi42

6H4

0000
0000
0000
ooou
0000
0000
0000
nooo
POOD

RNWRD4
DSKOA

6400

PAGE

6^65
6366
636?
6)ly

63U
63M

PAGE 1-66

0SK2B,
DSKiB»

/SUBROUTINE TuP "NO ERROPS And SCOPE
/LOOPS, UPDATt UP CQUNTEB 'REGl« ON EVEKY ENTBY,
'

640U
640i
6402
6403

OOOU
2200
7 300
1600

6405

64 i 6

7604
oois
7b40
7402
7604
7004
7700
5217
1600
5631

6417
6420
6421
6422
6423
6424
6425
6426
6427
6430

7640
5224
2133
5575
7301
44S3
2200
2200
5600

6431

B470

3 i 7 b

640t>

6407
64i0

64U
6412
6413
6414
&41&

iU2

NtP-RO#

NEPPQ
ISZ
Clk CLL
NtPHO
TAD I
PtSTPI
DCA
LAS
AND
K0200
SZA CLA
HLT
STPHLTf
LAS
PAL
ShA CLA
. + 3
JMP
NERHO
TAD I
NSCOPE
JMP I
P£GO
TAD
SZA CLA
NEXTST
JMP
ISZ
PESTRT
JMP I
NEXTST, CLA CLL I AC
CLBALL
ISZ
NERPO
ISZ
NEBRO
JMP I

/GET RESTART ADDRE&S
/STORE
/GET SWITCH 4
/HASK

/PROGRAM HALT
/STOP HALT FROM SWR4»i
/GET SWITCH I
/IS IT SCOPE LOOP
/NO
/GET RETURN POINTER
/CHECK FOR WAIT AND RETURN

OR 4096 PASSES
PASS PER TEST
/UPDATE UPCOUNTER
/BACK TO SAKE TEST
/ENABLE CLEAR CONTROL
/CLEAR CONTROL
/UPDATE PC STORE
/UPDATE PC STORE
/TO NEXT SEQUENTIAL TEST
/i
/i

NSCOPt, SCOPE
f

/KOUTiNt TO DU HALF BLOCK DATA CHfcCKS
6432
6433
6434
643S
6436
6437
6440
6441
6442
6443

PALIO

oooo
3144

DCA
TAD
DCA
TAD
AND
CIA
TAD I
SNA CLA
JMP

76S0
5247

V142

1151
6444
0100
644S
5330
6446
2154
6447
1554
6450
7041
6451
1152
6452
6453 7650
6454 5257
1152
6455
5330
6456
2154
6457
6460 7326
1124
6461
3164
6462
1554
6463
6464 7041
1144
646b
6466 7640
5331
6467
2154
64?0
1144
6471
7040
6472
3144
6473
2164
6474
5263
6475
1124
6476
3164
6477
3144
6500
1S54
6501
7640
6502
6503 5 3 30
2154
6504
2164
6505
5301
6506
1554
6507
6510 7041
uoi
6511
7650
6512
6513 5316
1101
6514
6515 5330
7 330
6516
3144
6517
1173
6520
7640
6521
5632
6522
7340
6533
3i73
6524
1170
5b74
6527
6530
6531
6532

1067
3154
1151
0100
7 041
1554

7330
3144
1554
3155

GDPtG2
BGNbUr
ADPEG
CKPiG
K0007

/SETUP FOR ERROR PRINTER
/GET START OF BUFFER
/FOR ERROR PRINTER

ADPEG

/COMPARE TO BUFFER WORD
/SAME ?
/YES

UI64
CHPEG
K0007
HFERR
ADPEG
AORLG

TAD
AND
JMP
ISZ
TAD I
CIA
DAREG
TAD
SNA CLA
+ 3
JMP
DAPEG
TAD
EHP
JMP
ADPLG
ISZ
CLA CLL CML RTL
K7600
TAD
DATCNI
DCA
ADPEC
TAD I
CiA
GDREG2
TAD
SZA CLA
HFEBR +1
JMP
ADPEG
ISZ
GDPLG2
TAD
cma
GDREG2
DCA
DATCWT
ISZ
HFRl
JMP
K7600
TAD
DATCNT
DCA
GDREG2
DCA
ADREG
TAD I
SZA CLA
HFERR
JMP
ADPEG
ISZ
DATCNT
ISZ
HFR2
JMP
ADREG
TAD I
CIA
R1234
TAD
SNA CLA
. + 3
JMP
Ki234
TAD
HFERR
JMP
CLA CLL CML RAR
GDREG2
OCA
SOFEPR
TAD
CLA
S2&
HFCHK
JMP I
CLA CLL CMA
SOFtPP
DCA
K5300
TAD
SAVPCl
DCA I
CLA CLL CMl RAP
GDPbG2
OCA
ADPEG
TAD I
DTPEG
DCA
.

HFRlf

PAGE l»69
F

/fJD

/UPDATE ADDRESS

/COMPARE TO DISK ADDRESS
/SAME????
/YES
/NO
/UPDATE ADDRESS

/SETUP COUNTER FOR FIRST HALF

/COMPARE TO GOOD VALUE
/WERE THEY THE SAME
/ERROR, DATA BREAK
/UPDATE ADDRESS POINTER
/NEXT WORD IS COMPLEMENT
/MORE TO TEST IN FIRST HALF

/SETUP COUNTER
/PEST OF BUFFER SHOULD BE 0000
/WAS IT
/ERROR

/MORE TO CHECK
/GET WORD IN BUFFER +1
/WAS IT O.K.?
/YES
/ERROR, BUFFER +1
/EXPECTED STATUS
/SETUP COMPARE REGISTER
/GET CPC ERROR FLAG
/WAS IT SET
/NO ERRORS

/RESET CPC ERROR FLAG
/TEXT
/SFX UP POINTER
/tXpECTED STATUS
/SETUP COMPARE
/GET BAD WORD
/SAVE FOP PRINTER

PALIO
6533
6534

V142

13154

20-DEC-73

2232
5bJ2

PACK 1-70

HFCHK
HFCHK

/ROUTlNfc in CHANGE I'ROGHfcM OEVICF. CoOtS
6i»35

6536
6537
6540
6541
6542
6543
6544
6545
6546
6547
6550
6551
6552
6553
6554
6555
6556

6557
6560
6561
6562
6563
6564
6565
6566
6567
6570
6671
6572
6573
6574
6575
6576
6577
6600
6601
6602
6603
6604
6605
6606
6607
6610
6611
6612
6613
6614

PALIO
6615
6616
6617
6620
6621
6622
6623
6624
6625
6636
6637
6630
6631
6b32
6633
6634
6635
6636
6637
6640
6o41
6642
6643
6644
664S
6646
6647
6650
6651
6652
6653
6654
6655
6656
6657
6660
6661
6662
6663
6664
666S
6666
6667
6670
667 1
6b72
6673
6674
6675
6676
6677
6700
6701
6702
6703

7b04
Ol2b
3232
1360
3200
1361
3357
1757
3000
1400
0127
1232
3400
2357
2200
5344
7402
5355

LAS
AKD
DC A

TAD
DC A

CHANGR, TAD
DC6
TAD
AND
TAD
DCA
I5Z
1S2

K0770
HFCHK
CCNTRl
NEPRO
CHNPOT
CNGSAV
CNG5AV

/SAVE DESIRED CODE

/GET ADDRESS POINTER
/SAVE IT
/GET OLD lOT CODE
/MASK
/ADD IN DESIRED

0
I

K7007
HFCHK
I

JMP
CHNHLI* HLT
JMP

/CHANGE CORE
/UPDATE ADDRESS POINTER
/UPDATE CHANGE COUNTER

CNGSAV
NEPRQ
CHANGP

/DEVICE CODES CHANGED

0000
7745
6562
5334
5341
5322
5314
5301
5330
5345
2676
270?
2675
2671
2700
2673
3026
3052
3025
3021
3030
3023
2016
2032
2027
2032
2073
2077
2104
2110

Cngsav, 0
CCNTBli 7745
CHKPOTf ChNpOT

V142

20-DEC-73

13154

2324
0124
2523
4022
0507

ERTXW

TEXT

"STATUS REGISTER ERROR"

EPTX2#

TtXT

"COMMAND REGISTER ERROR"

ERTX3,

TEXT

"DISK ADDRESS REGISTER ERROR*

ERTX4,

TEXT

"DISK DATA ERROR"

ERTX5,

TEXT

»CRC REGISTER ERROR"

lOTl
I0T2
I0T3
10T4
I0T5
I0T6
I0T7
lOTlAl
I0T2AI
10T3A1

I0T4AI
lOTSAt
I0T6AI
I0TIA2
I0T2A2
10T3A2
10T4A2
IOT5A2
IUT6A2
T2810A
T28lOb
T2810C
T2810D
TaSlCA
T2910b
T29I0C
T 29 10-0

PAGE 1-71

U23
2405
2240
0522
2217
2200
0317
1515
0116
0440
2205
0711
2324
0522
4005
2222
1722
0000
0411
2313
4001
0404
2205
2323
4022
0507

U23
2405
2240
0522
2217
2200
0411
2313
4004
0124
0140
0522
2217
2200
0322
0340
2205

07U
2324
0522
4005
2222
1722
0000

PALIO
6704
f.705

6706
6707
6?i0
6?!i
6712
67tl
67i4
67I&
6716
6717
6720
6721
6722
6723
6724
6725
672b
6727
6730
6731
6733
6733
6734
673b
6736
6737
6740
6741
6742
6743
6744
6745
6746
6747
6750
6751
6752
6753
6754
6755
675b
6757
6760
6761
6762
6763

Vi42
0401
2401
4022
050?

13(54

20-DEC-73

PAGE 1-72

EPTX6,

TtXT

"DATA PEGlSTER EPROR'*

ERTX7r

TfcXT

"DISK SKIP ERROR"

EBTX9>

TEXT

"DISK INTERRUPT ERROR*

M23
2405
2240
0S22
2217
2200

04U
2313
4023

liU
2040
0!>22

2217
2200
0411
2313
4011
1624
0S22
2225
2024
400S
2222
1722
0000

2213
7005
4004

TEXEND, TEXT

"RK8E DRIVE CONTROL TEST PASS COMPLETE"

22U
2605
4003
1716
2422
1714
4024
0523
2440
2001
2323
4003
1715
2014
0&24
0500
7 00 0

»7000
/

7000
/

PALIO

7000

K1TRK«,

V142

20-DEC-73

7001

LOTRKs,

7377

ESDBUF*.

13154

*'57?

7400

Si'V-CHK*,
/

+400

PAGE 1-73

0000
Oioo

0200
03O0
O4O0
O5O0

0600
0700
1000

uoo
1200

UOO
1400
1500
tbOO
1700

20 -DEC-73

V142

PAL 10

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

uuuu
uuuu uuuu
uuuu IIUIOOO OOOOOOOO
uuuu uuuu
uuuu
uiooooo 00000000 OOOOOOOO

1 1

1 1 1 i

uuuu
nnuu uuuu
unuti uuuu uuuu
iiniin uuuu uuuu
unun uuuu uuuu
UlUUl unuu uuuu
iiiinti uuuu uuuu
U U uuuu uuuu
Ullllll uuuu uuuu
1 1

iiin
Ullllll

3200
3300
3400
3500
36 00

3700

uuuu
uoo

uuuu
uuuu
uuuu
uuuu

3000
3100

2400
2500

uuuu
uuuu
uuuu
uuuu
uuuu
0000^000

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

lun it

2600
2700

2200
2300

PAGE 1-74

uuuu
uuuu uuuu
U U u uuuu uuuu
uuuu
uuuu uuuu
tn nn
uuuu uuuu uuuu
nn
uuu u uuuu uuuu
uuuu
mmu uuuu uuuu uuuu
uuuu
uuuu
u
UUUll uuuu U 11 u uuuu
10000

i I i

uuuu
uuuu
uuuu
UU Hi uuuu
VlUllU uuuu
iinuu uuuu
uuuu
ui n 111 uuuu

2000
2100

13tS4

U
UU
in luu

111 1 1

i 1 1

I i 1 11 1 1

UUUll

uuuu
uuuu

uuuu
uuuu
uuuu
uuuu

UUUll

uuuu

uoooooo

UUUll
iuiuu

uuuu
uuuu
uuuu
uuuu
uuuu

00000000

uuuu
uuuu
uuuu
oooooooo

uuuu
uuuu uuuu
uuuu UIOOOOO OOOOOOOl

uuuu
uuuu uuuu
uuuu 10000000 OOOOOOOO
uuuu llliUU uuuu
UUUll uuuu uuuu uuuu
uuuu uuuu
uuuu uuuu
UUUU uuuu uuuu UUOOOO
uuuu uuuu uuuu
uuuu
uuuu UUUll uuiooo OOOOOOOO
uuuu uuuu uuuu uuuu
uuuu 10000000 00000000 OOOOOOOO
llUUli uuuu uuuu uuuu
00000000 00000000 OOOOOOOO
00000000

uuuu uuuu
uuuu uuuu uuuu uuuu
m uuuu
uoo
uuuu uuuu uuuu uuuu
11 11

nnun uuuu uuuu
ni lu uuuu uuuu
imuu uuuu uuuu
in mil uuuu uuuu
uuuu uuuu
UllllU uuuu uuuu
It

1 1 1 1 1 1 1

V142

PALIO

20«-DE:C*73

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

Ut54

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

00000000

OOOOOOOO

uuuu uuuu
uuuu UUIOOO
uuuu uuuu
uuuu 000000
UUUll uuuu UllUU
oooooooo OOOOOOOO

uuuu
uuuu
uuuu
uuuu

I 1

10000000

PACE I- 75

uuuu uuuu
uuuu uuuu
uuuu uuuu UUUlO OOOOOOOO
uuuu uuuu
uuuu uuuu
4200
uuuu uuuu uuuu 10000001
4300
uuuu uuuu
uuuu uuuu
4400
uuuu uuuu UUIOOO OOOOOOOO
4&00
uuuu
UUUll uuuu UllUU uuuu
4600
uuuu uuuu UUUll uuuu uuuu
4700
uuuu uuuu uuuu uuuu uuuu
uuuu uuuu
111 n u
5000
uuuu uuuu uuuu uuuu uuuu uuuu iiuuoo
1111
5100
uuuu uuuu uuuu uuuu uuuu
uuuu uuuu
liu
5200
uuuu uuuu uuuu uuuu uuuu uuuu uiooooo
Ul
5300
uuuu uuuu uuuu
UUUll uuuu uuuu uuuu
5400
uu u u uuuu uuuu uuuu uuuu uuuu UllUU 10000000
5500
uuuu uuuu
UUUll
UUUll uuuu uuuu uutiu
5600
UUUll uuuu uuuu uuuu uuuu IIUUU uuuu uuoooo
5700
uuuu uuuu uuuu uuuu uuuu uuuu
6000
uu uu uuuu
UUUll uuuu uuuu uuuu uuuu uuuu OOOOOOOO oooooooo
6i00
uuuu uuuu uuuu uuuu
UUUll uuuu uuuu uuuu
6200
UUIOOO
6300
u uuu uuuu uuuu uuuu uuuu uuuu uuuu
UUUU
uuuu
uuuu uuuu uuuu
6400
uu uu uuuu uuuu
u u u uuuu uuuu uuuu uuuu uuuu uuuu uuuu
6500
UUUll
uuuu uuuu uuuu uuuu uuuu OOOOOOOO
uuuu uuuu
6600
UilUll uuuu uuuu uuuu uuuu uuuu uuoooo
6700
4000
4100

uuuu
uuuu
inniii uuuu
iniiiti uuuu
unuii uuuu
lU UlU uuuu
uuini uuuu
nimii uuuu

iiiiini

lUUlU

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

uuuu
uuuu
uuuu
uuuu
uuuu
uuuu

11 1

1 1

l 1 1 l

11
1

1 I

7000
7100
7200
7300

7400
7500
7600
7700

-73

CCMPl

6ii7
43?v
4442
444J
0156
0154
5i2b
4250
4752
4773
4776
4731
0010
4710
0200
0067
0153
6560

CHANH

(^535

CHAI'.GR

D8PEG
DCLR
DIN
DISKG
DISKGO
DLAG
DLCA
DLDC
OMAN
DOUT
DRIV^O
DHIVSV

6544
6232
4434
6257
6555
6561
5340
4453
0151
6557
5221
5231
5245
4462
0145
0l4b
0162
0163
0065
0152
0164
0150
6742
4536
5600
4425
6743
6744
6746
6747
5553
0070
0071

PALIO

V142

LDMN
LUTRK

5344
7001
545b
5706
0130
0131
4101
4600
4157
4122
4162
4123

ft7577

A7776
ACCf^Pl

ACCMP2
ACPEG
APRtG
AGAIN
ALLBAK
APftl

APEBR
APHLTl
APPt
AUTOlO
AUTPPU
BGN
BGNtiUF

CAPEC

CHECK
CHKfJCX

CHKSKP
CHNHLI
CHNPOT
CLDH
CLPALL
CMPSG
CNGSAV
COMpt
C0f*P2

CRERP
CRlf
CRP£Gl
CRPfc;G2

CRWRDl
CRWHD2
CyL450
DAPEG
DATC>^I

LPD^^T

LPFIG
M12
M4

MANPRO
MANUAL
MPERR
MPMtTl
MPHLT2
MPPi
NDIN
NtPRO

NERROR
NtXDSK
NEXTST
KOCLR
NOTUON
NGTEX
NSCOPE
NIC PC

NTGD
NTGRNK
NTSEK
OCTEL
ONLY

CVRDCK
OVRDOK
OVRERft

OVRLAP
OVBDK
OVBRl
0VRR2
QVRR3
OVRRDl
0VRRD2
0VRRD3
OVRRED
PCNTRl
PCNTR2
POLERR
PRINT
PRN
PRNTER
PRSFLD
RANADD
RAPCNT
RDAD
RUADD
RDBF
RDBUF

20-1

DPS!
DSKOA
D5K0B
DSKIA
DSKIB
DSK2A
D5K2S
DSK3A
0SK3B
DSKADu
DSKiN
DSKQUT
D5KP
DSKPOT
DSKSAV
DSKSKP
OTERR
DTREG
ENDBUK
ENDHLT
ENDIPK
ENDTSl
ERHLTi
ERHLT2
ERHLT3
ERHLT4
ERHLT5
ERHLT6
ERHLT7
ERHLT9
ERRAl
ERRO
ERROR
EBTXi
ERTX2
ERTX3
CBTX4
EHTX5
ERTX6
EHTX7
ERTX8
ESCOPt
EXIT
FGURE
riGURt
FILBUF
FLBUF
FROCT
GDPtGi
GDRCG2
GOBAK
GOTAOD

-73

6400
4437
4073
6424
5522
4252
5l4b
6431
5101

RDCM
PDCMD
RDCR
RDCRC
RDST
RDSTAT
REGAL
REDBAK
REGO
REGl
RESEK
RESTOR
RESTPT
RETPN
RETRN2
RNAO
RNWRDl
PNWRD2
RNWRD4
SAMDSK
SAVDAT
SAVPC

"5064

SAVPCI.

4335
4647
4460
6215
4530
4442
4261
4200
4240
4203
4207
4225
4403
4407
4425
4400
5163
5164
4431
6151
6111
4457
0222
4422
0160
5350
4446
54?0
4456

SAVPOT
5AVX0
SAVTRK
SBCNTl
SCOPE
SDKP
SEEK
SEKERl
SEKCR2
SKPERR
SKPWAT
SKWAT
SOFERR
STAERR
STCON
STPCHK
STPHLT
STRAUT
STREC
SWSEK
TOE
TlOE
TIOR
TlOX

45 61

THE
TllRl
T11R2
TilR3

TUT

13154

6745
6365
6J7i
6366
6372
6367
6373
6370
6374
4534
4421
4420
6741
4535
6361
4447
5743
0155
7377
4072
0172
4040
5217
5343
5324
5316
5303
5332
5347
5142
501?
5000
4440
6615
6630
6644
6662
6672
6704
67ife

6726
5155
6145
5656
4427
4430
5447
6066
0143
0144
6311
6 341

PAGE

COTSKP
GRNKER
GRNKOK
GRNKRi
GRNKP2
GRMKR3
GROKK
GTREG
HAFCKK
KEDHLT
HEDLST
HEDTfcD
HFCriK

HFERR
HFPl
HFP2
HITRK
HOMEMA
HROERR
INHIBT
INTADD
IKTRQ
lONwAT
IO»iwT

lOTt
lOTlAl
I0TIA2
IQT2
X0T2Ai

I0T2A2
I0T3

lOtm
IOT3A2
I0T4
I0T4AI
Z0T4A2
X0T5
Z0T5A1
I0T5A2
I0T6
I0T6A1
X0T6A2
I0T7
ftOOOl

K0002
K0003
K0004
KOOOS
K0006
K0007
KOOlO
K0017

6273
4364
4343
4274
4330
4353
4265
5527
4426
4002
5166
5165
6432
6530
6463
6501
7000
0157
5652
5157
5215
0034
4441
5200
5334
2676
3026
5341
2707
J052
5322
2675
3025
5314
2671
3021
5301
2700
3030
5330
267J
3023
5345
0072
0073
0074
0075
0076
0077
0100
OOll
Ollb

K0020
K0037
K0040
K0077
KOiOO
K0200
K0207

0705
0670
0756
0720
1060
1004
1054
1077

T28I0C
T20XOD
T280K
T2BR
T28T
T29E
T29I0A
T29I0B
729I0C
T29I0O
T290K
T29R
T29T
T2E
T30E
T30R
T30T
T31E
T31R
T31T
T32E
T32R1
T33R2
T32R3
T32R4
T32T
T33E
T33R1
T33R2
T33R3
T33R4
T33T
T34E
T34T
T35E
T36E
T36R
T36T
T37A
T37E
T37R
T37T
T38DE
T38E
T3tOK
T3eR
T38T
T39DE
T39E
T390K

K02U
K0215
K0240
K0260
K0306
KQ400
K0770
KIOOO
K1234
K2000
K2525
K3000
K3740
K4000
K4100
K5000
K5252
K5300
K5373
KS403
K6000
K6304
K7000
K7007
K71S6
K7400
K7501
K7577
K7600
K7700
K7707
K7740
K7760
K7771
KCDF
KILBUr
KLBUP
KRMF
LOAD
LDADD
LDCA
IjDCM

LOCMD
LDCUIt

LDMAN

0012
0117

OOU

0014
0015
5154
6063
6062
6065
6064
0166
0016
0126
0017
0101
0102
0112
0103
6150
0104
6147
0114
0113
0170
0167
0125
0105
0171
0106
0127
3750
0123
5655
5525
0124
0110
4707
0122
0107
0115
012O
4431
5435
0121
5317
4453
5307
5325
4450
4451
4455

13154
5412
4445
6000
4454
5300
4444
4424
4517
0132
0133
4003
6200
0175
5632
515b
6320
6362
6363
6364
4064
0165
6315
0174
6360
6316
5654
0134
5470
5333
4423
6313
6310
5634
4432
5261
0173
5636
0161
7400
6410
5110
0147
4000
0253
0543
0514
0545
0637
0602
0612
061b
0641

T12E
T12R
Ti3E
T13R
T14KE
T14R
T145E
T15E
T15T
T16E
T16T
T17E
T17S
T17T
T18E
T18S
T19T
T19E
T19QK
T19T
TIE
T20E
T200K
T20T
T2tE
T210K
T21T
T22E
T22R1
T22R2
T22I
T23e
T23R1
T23R2
T2JT
T24C
T24S
T24T
T25E
T25S
T25T
T26E
T26R1
T26R2
T26X
T27E
T27Ri
T27R2
T27T
T2eE
T28IOA
T28iOB
.

UOl
1117
1121
1160
1124
1162
1235
1202
1237
1265
1264
1267

0266
1315
1314
1317
1346
1345
1350
1442
1404
1423
1444
1506
1451
1470
1510
1554
1513
1556
1642
1602
1644
1714
1651
1673
1716
1765
1723
1745
1767
2050
2016
2022

T39R-

T39T

2027
2032
2045
2006
2052
2124
2073
2077
2104
3110
2121
2064
2126
0313
2167
2131
2171
3245
2202
2247
3360
2257
3300
3317
2341
2362
2507
2404
2431
2450
2467

25n
2544
2546
2644
2725
2664
2727
3051
3075
3013
3077
3151
3140
3150
3110
3153
3250
3237
324?
3207
3252

PAL I 0

V142

Tit
T3T
T40E
T40R
T40S
T40T
T4 1 E
T4 1
T4 15

034t>

T41T

3 37 2

0350

TC«TR6
TEXAD

3276

TfcXCA

3 25 5

TtXC"
TtXCP
TEXDA
TEXDB
TtXDT
TtXLND
TEXGD
TEXPC
TEX5T

3 26 i

3 37 0
^
3 317

T42fc.

T42R

TH5FLI;

T4 2S
T 4 2T
T4 3E

3b 1

T4 3R
T43R2
T4 3T
T44t
T440K
T4 4R
T44T

3454

T 45 A I

3 6 22

35 14

355 4
35 24

3567

T45A2
T45E
T45R
T4SB2
T45R3
T45R4
T45SC
T45T
T4E
T4T
TbE
T5T
T6E
T6T
T7E
T7T
T6E
T8R
TbT
T9E

37 4 3

3612
3626
3667

37 0 1
36 04
37 45

0355
035?
036?
0371
0412
041 4

0426
04 30
045 4

0433
0456
05 07
05 06

0464
0511
4775
0135
0136

T9R
T9T
T A PRO T
TCNTPl
TCNIP2
TCNTF3
TC^TP4
TC«TP5

PALIO

0U7
0140
0141

V142

KPROPS DETECTEDI

LINKS GENF.HATEDl

RUN-TIMC;

20-DEC-73

23 SECONDS

3K COPE USED

TIMSTP
THANP
TMAhOK
ThANS
TMANT
TKPROT
TOCT
TOTST
TOVRDI
TBK212
TSTO
TSTl
T5T10
TSTil
TST12
TST13
TST14
TST15
T5T16
TST17
T5T19
TST19
TST2
TST20
TST21
T5T22
TST23
TST24
TST25
TST26
T5T27
T5T28
TST29
T5T3
TST30
T5T31
TST32
TST33
TST34

20-DEC-73

13154

TST3S
TSTi6
TST37
TST38
TST39
TST4
TST40
TST41
TST42
T5T43
T$T44
TST45
TST5
T5T6
TST7
TST8
TST9
TSTSEK
T^OCT

0142
5770
5766
5762
5754
5764
5760
5772
6741
5752
5750
5756
0035
35 36

4703
4702
4624
4705
4161
6036
5526

•tx?i

45 32

0066
0235
0256
0512
0600
0656
071O
1001
1064
1102
1122
1200
1240
0271
1270
1330
1400
1445
1511
1600
1645
1717
1773
2053
0317
2127
2200
2250
2400

2512

Ul54

•

UPONE
WATISZ
WRKBUr
WTISZ
XCLDP
XCOMPl
XC0MP2
XCRLF
XOIN
XOISKG
XDOUT
XKRRO
XFGUPE
XriBUF
XFPQCT
XCRONK
XGTREG
XHFCHK
XHITRK
XIONWI
XKLBUF
XhkP
XLDAD
XLOCA
XLDCM
XLDMN
XLOTRK
XNERRO
XQVLY
XOVHRD
XPPINT
XPPN

PAGt 1-79

2600
2647
3000
3100
3200
0351
3253
3301
3400
3452
3515
3600
0360
0400
0415
0431
0457
4060
4461
4436
6053
4433
7000
5247
0053
0042
0043
0062
0021
002S
0020
0040
0027
0030
0060
4164
5160
0026
0064
0041
0031
416S
0052
0051
0050
0055
0063
0037
0023
4166
0036
0057

XRDAD
XPDBF
XRDCM
XPDCP
XRDST
XFEG
XRE5TR
XRNAD
X5DKP
XSKMAT
XTEXT
XIOCT
XWTIS2

0046
0056
0045
0054
0044
S162
0024
0032
0047
0032
5161
0061
0033