Digital PDFs

XX-32014-2B

July 1985

448 pages

Original

16MB

view download

OCR Version

14MB

view download

Document:	CVMJAA0 MSV11-J MSV11-J MEMORY DIAG AH-U136A-MC JUL bw
Order Number:	XX-32014-2B
Revision:	0
Pages:	448
Original Filename:	CVMJAA0__MSV11-J__MSV11-J_MEMORY_DIAG__AH-U136A-MC__JUL_1985_bw.pdf

OCR Text

MSV11-J

MSV11-J MEMORY DIAG

CVMJAAD

AH-U136A-MC

10F3 JUL 1985

Hlfin
MADE IN USA

MSV1 1 'J

MSV11-J MEMORY DIAG

CVMJAAQ

AH-U136A-MC

20F3 JUL 1985

Hman
MADE IN USA

MSV1 1 ‘J

MSV11-J MEMORY DIAG

CVMJAAOQ

AH-U136A-MC

30OF3

JUL 1985

Hmum

MADE IN USA

MACRO V05.01b Fridey 15-Feb 85 16:10

Pege 3

SEQ 0001

|
LTITLE
CVMJAARQ MSV11-J MEMORY DIAG.
.NLIST TOC
REM

PO NN 1o s s s po ps =t P

IDENTIFICATION
PROCUCT CODE:

AC-U135A-MC

PRODUCT NAME:

CVMJAA MSV11

PRODUCT DATE:

MARCH 1985

MAINTAINER:

E.S.D.

METHODS

this

document

N (N LN PO O D

The

85 0 G Ll

|
{

OOV I VNBUNEFEOO® ~NTVbawn

A ;;CVMUARO MSV1!-U MEMORY DIAG.

information

J MEMORY DIAGNOSTIC

subject

change

without
notice
and should not be construed as a commitment
by
Digital
Equipment
Corporation.
Digital
Equipment
Corporation
assumes
no
responsibility for any errors that

may appear

in this manual.

The software described in this document is furnished to
the
purchaser
under
a
license
for
use
on a single computer
system
and
can
be
copied
(with
inclusion
of Digital's

Digital Equipment Corporation assumes no responsibility
for
the
use or reliabi}it{ of its software on equipment that is

not supplied by Digital.

1985 Digital Equipment Corporation

CVMJAAQ MSV11-J MEMORY DIAG.
a2
a3
44

as
a6
47
a8

50
51
52
53
54
55
56
57
58
59
60
61
62
63

MACRC V05.01b Friday

15-Feb 85

16:10

Page 4

SEQ 0002

OPERATIONAL SWITCH SETTINGS
SWITCH REGISTER DEFINITIONS
*

*
K

SWITCH
000

eeeem

USE
eeesccevamrenan

HALT ON ERROR

*
*
*

12
11
10

INKIBIT RELOCATION
QUICK VERIFY
BELL ON ERROR

*
*

x
*
*
*
*
*

14
13

9
8

5
4
3
2
1
0

LOOP ON TEST
INHIBIT ERROR

TYPEQUTS

LOOP ON ERROR
HALT PROGRAM (UNRELOCATED

OETAILED ERROR REPQRTS

INHIBIT CONFIGURATION MAP

RESTORE LOADERS)

LIMIT MAX ERRORS PER EANK
FAT TERMINAL (132 COLUMNS OR BETTER)
TEST MODE
SEE DOCUMENT
TEST MODE - SEE DOCUMENT
TEST MODE
SEE DOCUMENT
DETECT SINGLE BIT ERRORS

CVMJUAAQ M3V11-J MEMORY DIAG.

MACRO V05.01b F..iday 15-Feb-85 16:10

Page 5

TABLE OF CONTENTS

1.0

GENERAL PROGRAM INFORMATION

70
71
72

1.1
1.2
1.3

Program Purpose (Abstract)
System Requirements
Related Documents And Standards

1.5

Assumptions

2.0

OPERATING INSTRUCTIONS

2.1

Loading and Starting Procedures

2.5

Execution Times

1.4

Diagnostic Hierarchy Prerequ’sites

79
80
81

2.2
2.3
2.4

84
85

3.0

ERROR INFORMATION

3.1

Error Reporting

3.3

Error Halts

91
92
93

3.2

Default Test Sequence
Special Environments
Progrem Options

Error Abbreviations

4.0

PROGRESS REPORTS

5.0

CSR INFORMATION TABLES

5.1

MSVil-J CSR

5.2

MSV11-L/P CSR

6.0

SUB-TEST SUMMARIES

99
100

6.1
6.2

Tests
Peatterns

102

7.0

PROGRAM FEATURES

104
105
106
107
108

7.1
7.2
7.3
7.4
7.5

Fast Deta Access Rates
Bank Zero Testing
Memory Configuration Map
Everything You've Always Wanted To Know About SUPERMAC .
Memory Management Mapping

9¢

101

103

SEQ 0003

CVMJUAAQ MSV11-J MEMORY DIAG.

113

i%g
114

iig

E1l

MACRO Vv05.0l1b Friday 15-Feb-85 16:10

Page 6

1.0

GENERAL PROGRAM INFORMATION

1.1

Program Purpose (Abstract)

inl1.2.1.

SEQ 0004

117

a. Intended for use on all PDP-11/23/23B/73's which

120
121
122
123

b. This program will be used by system managers and operators to
determine the correct operation of main memory and also it will
be primarily used by field service and manufacturing to
isolate
failures to the memory and to isolate failures within the memory

126
%g;

c. The object of this software is to functionally
all main memory functions as fast as possible.

129
ig?

d. There is the capability of testing mixed configurations
and MSV11-P) on the system.

132
%32

e. It has
& special maintenance mode (Field Service Mode) to provide
specific functional capabilities.

iis

igg

135
136

1.2

133

1.2.1

141

1:%
1
144
145
146

147
1:3

1
150

151

the

conditions

to the correct card.

1;;
1

meet

test

and

verify
(MSV1il1-L,

System Requirements

Hardware Requirements PDP-11/23/238/44/83/84 CPU with 18/22 bit addressing

and at

least 64K (16 Bit Words) of Memory and Memory Management.

kkkkkk NOTE skesxx
1.

Like memory types must be on 16K word boundaries
starting at physical address 0.

REFERENCE

KTJll document for proper configuration

of unibus memory for 11/84

CVMUAAO MSV11-J MEMORY DIAG.
153
154

F 1

MACRO V05.01b Friday 15-Feb-85 16:10

Page 7

155

1.2.2

157

This program is designed to run

156

158
159
160
161
162
163

SEQ 0005

Software Requirements

following monitors:

stand

alone

under

any

XXDP«
ACT
APT

164

165
129
1

1.3

Related Documents And Standards

168
169

190
191
192

193
194
195

196

MS5V11-L Users Guide
MSV11-P Technical Manual

. .

Diagnostic Hierarchy Prerequisites

Try

)V}

Inhibit relocation (reference section 2.4.1)
Try CPU Diagnostics

If the program in any way misbehaves, then:

V) B

181
182
183
184
185
186
187
188
189

1.4

MSV11-J Users guide

180

177
178

176

PDP-11/23 User's Guide

171
172
173
174
175

Microcomputers and Memories (EB-20912-20)

170

179

the

it again with Cache off (reference Section 2.4.3.1)

Try Memory Management Diagnostics

Try Cache Diagnostics (where applicable)
Try QBUS Map Diagnostics (where applicable)

CVMUAAQ MSV11-J MEMORY DIAG.

MACRC v05.01b Friday 15-Feb-85 16:10

198

1.5

Assumptions

201

Menagement,

This

progrem

203
204
205
ggg

2.0

OPERATING INSTRUCTIONS

2.1

199
200

202

208

g?g
211

212
213
214
215
216
217
218
219
220
221
222

assumes

Cache,

the

and

(initially) Banik 0 (0 16K).

2.1.1

234

246

the

program

CPU,

Memory

occupies

The XXDP+ loaders are in bank 1.

Starting Procedures

Load address 200

Set switch register for options (normally 0)

Start

Stopping -

2.1.2

Set SW8, and/or

Type control "C" (Reference section 2.4.4.1).

239
240

247
248
249

This

Never-Never Land.

238

243
244
245

Map.

BE SURE
that the peripheral page jumper (where applicable)
is in place;
failure to do
so
sends
the diagnostic to

236
237

242

operation

NOTE

235

241

QBUS

SEQ 0006

Quick Starting -

225
226

233

correct

the

552

227
228
229
230
231
232

Page 8

2.1.3

Restarting (Preserve Configuration Table) 1.

Load address 202

Set switch register for options (Normally 0)

Start

231
252
253
254
255
256
257
238
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
an

MACRO V05.01b Friday 15 Feb 85 16:10

2.1.4

Page 9

Switch Register Options -

SWITCH

15
14
13
12
11
10

OHMNWHENO~I®O

CVMJUARQ MSV11-J MEMORY DIAG.

HALT ON ERROR
LOOP ON TEST

INHIBIT ERROR TYPEOUTS
INHIBIT RELOCATION
QUICK VERIFY
BELL ON ERROR
LOOP ON ERROR
HALT PROGRAM (UNRELOCATE
RESTORE LOADERS)
DETAILED ERROR REPORTS
INHIBIT CONFIGURATION MAP
LIMIT MAX ERRORS PER BANK
FAT TERMINAL (132 COLUMNS OR BETTER)
TEST MODE - SEE DOCUMENT
TEST MODE - SEE DOCUMENT
TEST MODE
SEE DOCUMENT
DETECT SINGLE BIT ERRORS

SEQ 0007

CVMJUAAO MSV1l-J MEMORY DIAG.
279
280
281
282
283
284

285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322

MACRO V05.01b Friday

15-Feb-85 16:10

Page 10

SEQ 0008

2.2

Default Test Sequence
The following two lists give the test protocol for parity and ECC

Memory.

or
APT,
2.4.4.8).

2.2.1

Tests marked with a “+" are not normally run except under ACT
or

through

Field

Service

Test Protocol For MSV11-L/P

Ccmmand

Parity Memory -

Test

Test Name

34
6
17
7
1
e
3
4
5
21
35

Soft Error Test
Initial Data Test
Holding 1l's and 0's Test
Address Bit Test
Address Test
Complement Address Test
3 XOR
9 Test
Rotating 0's Test
notating 1l's Test
Marching 1's and 0's Test
Worst Case Noise Parity Test

* 22

* 23
26

(Reference

Time (sec/16K)

Refresh Test

Shiftina Diagonal Test
Random Data Test

<1
<1
<1
<l
<l
<1
1
1
1
1
n/a

10
<1

* 24

Fast Galloping Pattern Test

Branch Gobble

* 31
x 32
33

Sob-a-long Test
Write Recovery Test
Test

Soft Error Test

3
<l
<1

Section

CVMUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15 Feb-85

16:10

Page

SEQ 0009

324

325
326

Test Protocol for MSV11-J ECC Memeory

340
341
342
343
344
345
346
347
348
349
350

10
17
2

1
2

351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367

41
42
43
46
47

5
21
22
26
24
31
32
33
34

Holding 1's and 0's Test
Address Bit Test
Address Test

Complement Address Test

Rotating O's Test

Rotating 1l's Test
Marching 0's and 1's Test
Refresh Test
Random Data Test
Fast Galloping Pattern Test

Sob-a-long Test
Write Recovery Test
Branch Gobble Test
Soft Error Test

[

o U]

A
A

s =t (s

Correction code test
Syndromes in CSR on SBE test
Check ECC Dissble Test
Address to CSR on DBE test
Extended address to CSR test
Byte write test
Check SBE with ECC Disable test
No CSR update on SBE with DBE test
Byte Address Test

36
20
37

Shifting check bits thru the CSR
Basic Double Bit Error test
Syndromes in CSR on DBE test

Y ot eed

14
45

Soft Error Test
Initial Data Test

Rotating 1's Test

334
335
336
337
338
339

Time (sec/16K)

5
34
6

Pattern Name

Pattern

A A AAAAAANAN

2.2.2

AWA
NAM
N
WNO
O(S

327

328
329
330
331
332
333

8 - Run only on the first Pass when under ACT or APT

#30,

At the end of each Pass the program will run cleanup Patterns
and #27 for all banks.

CVMJUARO MSV11-J MEMORY DIAG.
369
370
371
372
373
374
375
376
377
378

379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399

400
401
402
403
404
405
406
407

MACRO V05.01b Friday 15-Feb-85 16:10

2.3

Page 12

SEQ 0010

Special Environments

XXDP+

2.3.1

The first pass will be a quick verify pass
chain mode.

2.3.2

ACT

if and only

The program will not create double bit errors (DBE's)

after

the

1st

pass.

2.3.2.1

APT Execution Times -

Here are some measured execution times for an 11/23B under APT

1st QV Pass

2nd Pass

1024K MSV1ii-J

30 min

256K

MSV11-L

20 min

128K

MSV11-P

20 min

The first pass will be a quick verify pass

408

NOTE

414
415

Even though the first pass is a QV
pass
it
takes
longer
than
the
subsequent
non-QV passes due to the fact that it is
running
more
patterns,
some
of which

416
417
418
419
420

APT Automatic Mode -

409
410

411
412
a13

(patterns #24 and #33 for

example)

be extrememly time consuming.

can

onwerd

CVMUARO MSV11-J MEMORY DIAG.
422

423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439

440
441
442

443
444
445
446

447
448
449
450
451
452
453
454
455
456
457
458
459
460

46)
462

463
464
465

466

467

468
469
470
471
472
473
474
475
476
477
478

MACRO V05.01b Fridey

15 Feb-85 16:10

Page

13
SEQ 0011

2.3.2.2

APT Environment Table

The following table gives some of the standard sett ngs

€E-Table.

for

the

They may be modified as noted as the user sees fit.

FIRST PASS RUN TIME:
This parsmeter should be set according to the amount and type

memory to be tested.
measured times.

APT

The above table (APT Execution Times) gives some

For any patterns deleted (through use of

Descriptor Words) reference section 2.2 for

the

Device

individual pattern times,

NOTE
The times given in section 2.2
are
for
16K chunks of memory, not 128K boards!

LONGEST TEST TIME:
.
.
This parameter should be set to the execution time of the longest
pattern
being
run.
for
the
default
case
this is 35 seconds for

Pattern #33.

ADDITIONAL RUN TIME:
Not Used By Progreanm.

SOF TWARE ENVIRONMENT:
For APT auto mode this parameter should be set
dump mode set this to a "0".
ENVIRONMENT MODE:
When this parameter

is set to a

"0" the

program

does

"1",

it's

For

oun

sizing.
If
the users sets bit #7 however, he must specify the types
and amounts of memory to be tested.
SWITCH 1:
The default setting of this switch is "101".,
APT
uses
this
as
the switch register for the program.
Reference section 2.4.1 for more
information on switch settings.
SWITCH 2:

This switch, if set to any non-zero number, is used to limit

amount
of
passes
APT
count has been reached.

will

make.

the

The program will hang after this

CPU OPTIONS:

Not Used By Program.

MEMORY TYPE n
(n=1 to 4)
If bit #7 of ENVIRONMENT MODE

log

is set these four words are used to

the different types of memory to be tested.

these location are not used.
MAXIMUM ADDRESS n

If bit #7

is not set

(n=1 to 4)

These four words are used

in conjuntion

with

the

corresponding

CVMJARQ MSV11-J MEMORY DIAG.
479
480
481
482

483
484
485
486
487
488
489
490
49]
492
493
494
495
496

497
498
499

MACRO V05.01b Friday 15 Feb-85 16:10

MEMORY
TYPE
occupies.

words

SEQ 0012

indicate the highest address that memory type

NOTE

The above two parameters do not actuslly
have
to
represent
an
accurate

configuration
of
memory.
All
the
program
looks
for is an accurate tally
of memory amount!

INTERRUPT VECTOR n

(n=1 to 2)

Not Used By Program.

BUS PRIORITY n

(n=1 to 2)

Not Used By Program.

500
501

BASE ADDRESS:
Not Used By Program.

503
S04

DEVICE MAP:
Not Used By Program.

502

Page 13-1

CONTROLLER DESCRIPTOR CODE n
Not Used By Program.

(n-1 to 2)

DEVICE DESCRIPTOR CODES:

The Device Descriptor codes are used bI the program to

determine

which patterns it will run.
The default values of these words are all
"i"'s, indicating that all of the patterns shown in section
2.2
are
executed
(save
for
exceptions
as noted there).
Each set of words
controls a table in the program as follows:

0D WORDS

PROGRAM TABLE (Symbolic location)

Words 0-1

MKCSRT

Words 2-3

MKPAT

Words 4-5

MJPAT

Bit #0 set in the first word indicates that the first pattern
in
table will be executed, bit #1 the second, bit #2 the third,...
#0 of the second word

be executed,

indicates that the 17th entry

and so on.

in the table

the
bit

will

CVMJAAQ MSV11-J MEMORY DIAG.
529
530
531
532
533
534
335
S36
537
538
539
540
S41
342
543
544
545
546
547
548

MACRO V05.01b Fridaey 15-Feb-85 16:10

2.3.3

Page 14

No SBE Free Banks -

If the program cannot find any SBE (Single Bit Error)
free
locations
(in
non-protected ECC memorx) it will print out an error message and
continue testing by-passing the

2.3.4

Mixed Perity

ECC logic tests.

ECC Configurations -

The
program
will
function
normally
in
mixed
environments.
The
sequence
of
testing may
seem strange due to the recursive test mode
algorithm (reference sections 2.4.1.1, 2.4.1.2,
2.4.1.3).

SEQ 0013

| CVMUAAQ MSV11-J MEMORY DIAG.
350
531
332
553
S54
535
536

S57

558
559
560
S61
562
563
564
565
566

367
568

569
570
571
572
573
574
375
576
577
S78

MACRO v05.01b Friday 15-Feb-85 16:10

Page 15

S€Q 0014

2.4
2.4.1

Program Options
Switch Register Details -

If a hardware switch register
is
not
available
then
the
software
switch
register
is
in locetion 176.
IF under APT if BIT7 is set in
the E-TABLE
symbolic location "$ENVM" the APT software switch register

will be used ¥location $SWREG).

To change the software switch register contents:
Tgfle
“control
G".
This
will
cause
display the current value of the
SWR and prompt for
the octal input of the new SWR value from the terminal.
This
routine
will
ignore
you
(not respond to control "G") if you have a hardware

switch register.
SW15

= HALT ON ERROR

(100000)

Continuing
from this halt will first check for a chan
in the software switch re?ister ("Control G" in the TTY
input buffer) then it will
continue testing.

SuWia

= LOOP ON TEST
(40000)

This will cause looping on the present test or

pattern

(back
to
last
scope trep).
If in a pattern then the
looping will be for an entire bank of 16K addresses.
SW13

= INHIBIT ERROR TYPEQUTS
(20000)
This will cause returns from the error routine
without
the
typed
messages.
Other on error functions are not
affected.

Su12

= INHIBIT RELOCATION
(10000)
This prevents the program from moving and
prevents
the
program
from
test'ng
at

consequently
least 32K of

memory
.

SW11

= QUICK VERIFY
(4000)
If this switch is selected approximately
one
64th
of
the possible combinations of SBE's
DBE's are tested.
Each pass complete typeout will

preceding the pass number with

indicate this

"QV ',

mode

CVMUAARO MSV11-J MEMORY DIAG.

MACRO v05.01b Friday

€04
605
606
607
608
609
610
611
612
613
614

SH10

616

SW8

615

617

643
649
650
651
652
653
654
655

Page 16

SEQ 0015

= BELL ON ERROR

(2000)

This causes a bell

SW9

(or beep or

click)

each

error

LOOP ON ERROR

(1000)

This will cause looping from failure point back

last co -ectly

initiates the following sequence:

I
T A
[ BNV, R

Flush out

is relocated

it moves back

to bank zero.

all possible DBE's.

Turns off Memory Management.
Restore loaders.

Unmap the Unibus Map (if there
Halt

is one).

if under APT or ACT branch sel.

DETAILED EK0R REPORTS
(200)
After any normal error

causes

tgped:
RO, R1,

SWé

the

R2,

contents

R3,

R4,

RS,

report

typed

this

option

of the following registers to be
SP,

"CONTROL",

"CPUERR

= INHIBIT CONFIGURATION MAP
(100)
This

inhibits the printing of a map showing the

configuration - reference section 7.3
SWS

the

(400)

If program

SW7

initialized area of the current test.

HALT PROGRAM

This

624
625
626
627
628

640
641
642
643
644
645
646
647

Ce2

16:10

trep

618
619
620
621
622
623

629
630
631
632
633
634
635
636
637
638
639

15-Feb-85

memory

= LIMIT MAX ERRORS PER BANK
(40)
This will limit the number of error typecuts per
bank.
The
defsult
is
10.
DECIMAL,
however
this
can be

changed by changing location

“ERRMAX" manually.

CVMJUARO MSV11-J MEMORY DIAG.
657
658

MACRO V05.01b Friday 15-Feb-85 16:10
SWa

659

660

This

informs the pro?ram that the console terminal

a width of at least

SW3-1

666

Test modes determine the recursion algorithm to be used

during pattern tests.

ggg

MODE NAME DESCRIPTION

671
672
673
674

(0)
(2)
(4)
(6)

676

(12)

677

6;8

682

0
1
2
3

BAFPAF
BAFPAR
BAWPAF
BAWPAR

Banks
Banks
Banks
Banks

PAFBAW

Patterns forward, banks worst first

PARBAW

(10)

(14)

(16)

680
bgl

683
684

PAFBAF

PARBAF

forwerd, patterns forward
forward, patterns reverse
worst first, patterns forward.
worst first, patterns reverse.

Patterns forward,

banks forward

Patterns reverse,

banks forward

Patterns reverse, banks worst first.

For more details reference section 2.4.1.1, 2.4.1.2 and
2.4.1.3.

SWo

685

= DETECT SINGLE BIT ERRORS (SBE's)
(1)

686

For

687

on.

688

manufacturing

For

field

alnays be off.

689

690

purposes

this

service

purposes

switch

should

always be

this switch should

This switch will allow all ECC Single Bit errors to

691

reported by dissbling error correction.

692

693

Error printouts of SBE's are not

694

DBE's.

695
696

697

698

NOTE

distinguishable

699

If Double Bit Errors are found in

;01

datas can be written to the DBE locations.

700

the

from

memory,

this switch should be set to make sure that new

703
704
705

has

132 columns (LA36 with wide paper).

= TEST MODE

22;

675

SEQ 0016

= FAT TERMINAL
(20)

66%

663
ggg

Page 17

;89

2.4.1.1

Test Mode Example -

708
709

Example analgsis of mode S "PAFBAW".
and Banks 2,3,4, S are MSV11-L.

Assume Banks O

are

MSVI1L1-JU

761
762

Assume also that Bank

is known bad by the

program

v
a

the

s 'zing

routine or previous runs The testing sequence would be as follows:

TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST

17,

1,
2,
4,
5.

21,
20,
22,
26,

BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK

W WWNWNHWEWNW

; TEST MSV11-J MEMORY TYPES FIRST
; TEST KNOWN BAD MEMORY (BANK 3)

BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK

TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST

TEST
TEST
TEST
TEST
TEST
TEST
TEST

TEST 17,

N S 1,01, 8,00 ,8],87,V1,0 7,80, 0]

; TEST PRESUMED GOOD MEMORY (BANKS 2,4,5)

732

733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760

Page

SEQ 0017

L0, N0, 10, R

725
726
727
728
729
730
731

15-Feb-85 16:10

IV I T

711
712
713
714
715
716
717
718
719
720
721
722
723
724

MACRUL V05.01b Friday

(SIS

CVMJUAAO MSV11-J MEMORY DIAG.

768

769
770

771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788

789
790

791
792
793
794
795
796

797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815

Page 19

SEQ 0018

;RELOCATE
TEST
TEST
TEST
JEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST

TEST PROGRAM SPACE (BANK 0 & 1)
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK

b2ttt
2 OO OOOO

764
765
766
767

MACRO V05.01b Friday 15-Feb-85 16:10

n
n
OVUTHWLWNONNIB
W—

CVMUAARO MSVi1 J MEMORY DIAG.

NOTE
This

example

not

actual

sequence.

The test sequence was forward (the simple patterns
first,
complex
tests
last)
sequence of patterns (MSV11-L = 17, 7, 1, 2, 4, S, 21,
20, 22, 26)(MSvil-J =1, 2, 3, 4, 5, 26).
If the bank selection
following order:
1.

is forward the

banks

wWill

tested

the

Egg)benks that are not protected or program space (from 0

Parity banks that are not program space (from O to 167).

The program now relocates

tests:

Egg)banks that were protected or program
5.

space

(from

will

Parity banks that were program space (from 0 to 167).

If bank selection is worst
first
the
confi?uration
table
consulted and banks will be tested in the fol owing order.
1.

ECC banks that are known bad and are not protected or program
space (from O to 167).
Parity banks that are known bad and

(from O to 167).

ECC banks that are presumed good and

are

not

program

space

protected

CVMUAAO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday

program space (from O to 167).
Parity banks that are presumed good and are not program spsce

(from 0 to 167).

The program now relocates

824
825

ECC banks that
are
presumed
program space (from O to 167).

870

good

and

were

Parity banks that are presumed good and
(from O to 167).

2.4.1.2
MODE ©

Test Mode Details

program

were

protected
program

space

patterns fo ward

is the default and simplest mode.

This mode tests each bank

completely

167

While testin?_each bank the patterns are run
with
simple ones
first building to the more complex.

the

except those requiring relocations.

MODE 1

(from

"BAFPAF" banks forward,
This

846

857

Parity banks that are known bad and were program space
0 to 167).

843
844
845

858
859
860
861
862
863
864
865
866
867
868
869

protected

space (from 0 to 167).

827

847
848
849
850
851
852
853
854
855
856

tests:

ECC banks that are known bau and were

826

840
841
842

Page 20

SEQ 0019

817
818
819
820
821
822
823

828
829
830
831
832
833
834
835
836
837
838
839

15 Feb-85 16:10

"BAFPAR" = banks forward,

from

patterns reverse

This mode tests each bank
completely
except those requiring relocationx,

from

167

While testing each bank the patterns are run
with
the
most complex ones first, working to the simple ones.
MODE 2

"BAWPAF" = Banks worst first,

patterns forward

This mode first tests each known
bad
bank
completely
from
O to 167 except those requiring relocationx, then
presumed good banks are tested from
0
to
167
except
those requiring relocation*,
While testin? each bank the patterns are run

simple ones
MODE 3

tirst,

with

building to the more complex.

the

"BAWPAR" = Banks worst first, patterns reverse

This mode first tests each known

bad

bank

completely

CVMUAAQ MSV11 J MEMORY DIAG.
872
873
874
875
876
877
878
879
880
881
882

MACRO v05.01b Friday 15 Feb-85 16:10

917
918
919

920
921
922
923
924

SEQ 0020

from
O to 167 except those requiring relocations, then
presumed good banks are tested from
0
to
167
except

those requiring relocations.

While testing each bank the oatterns are run
with
the
most complex ones first, wo king to the simple ones.
"PAFBAF"

MODE 4

= Patterns forward,

banks forward

This mode tests each pattern completely with the simple

ones first, building to the more complex.

883

While testing each pattern the banks are run from 0

167 except those requiring relocationx,
"PAFBAW" = Patterns forward,

MODE S

banks worst first

This mode tests each pattern completely with the simple
ones first, building to the more complex.
While testing each pattern first each
known
bad
bank
from
O
to
167
except those requiring
relocations is
run, then presumed good banks are run
rom
0
to
167
except those requiring relocation*.
MODE 6

884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916

Page 21

"PARBAF" = Patterns Reverse,

Banks Forward

This mode tests each pattern completely with

complex ones first,

the

working to the simple ones.

While testing each pattern the banks are run from 0

167 except those requiring relocationx.

MODE 7

“PARBAW" = Patterns Reverse,

most
to

Banks Worst First

This mode tests each pattern completely with

the

complex ones first, working to the simple ones.

most

While testing
each pattern first each
known
bad
bank
from
O to 167 except those that require relocations* is
run, then presumed good banks are run
from
0
to
167
except those requiring relocationx,
NOTE

* Relocation

required

test

the

bank(s)
in
program
space
and also to
test
any
ECC
banks
protected
by
diagnostic
checkmode
with
the inhibit
mode pointer off (zero)!

CVMJAAO MSV11-J MEMORY DIAG.
926
927
928
929
930
931
€32
933
934
935
936

937
938
939

940
941
942

MACRO V05.01b Friday 15-Feb-85 16:10

Page 22

SEQ 0021

2.4.1.3

Test Mode Applications To verify correct operation of the memory system use
"BAFPAF
",
Advantages:

Disadvantages:

In case of & failing Bank,

time to find the failure.

it may take a long

To get detailed error information on known bad
by sizing routine) use Mode 2 “BAWPAF".

947

Advantages:

949
950

Disadvantages:
Failures other than zeros
long time to find.

948

Seeks Bad Banks.

To ?et 9ood error
“PA BAF ",
Advantages:

Banks

(found

Easy to understand.

ones may

take

info on any memory problem fast use Mode

Covers all banks fast.

To find any problem fast use Mode 7

Easy to understand.

Disadvantages:
[ailures from only complex patterns may
a long time to find.

Advantages:

Easy to understand.

943
944
945

946

Mode

take

"PARBAW”.

Covers all Banks fest.

Disadvantages:
Difficult to understand failures reported are
not necessarily the most basic failure modes.

CVMUAARQ MSV11-J MEMORY DIAG.

MACRD v05.01b Fridey 15-Feb-85 16:10

968

Page 23

ggg

2.4.2

3;5

A software switch register exists in location 174,

973

g;g

976

g;;

979
980

981
982
983

2.4.3
2.4.3.1

Special Memory Locations CACHE Constant -

The CACHE constant
to enable CACHE.

is located at symbolic location "CACHK" and is used

984

NOTE

986
987
988

Bit 0
effect
by the

989

in
the
CACHE
constant has no
since
it is unconditionally set
program whenever
it
tries to

enable CACHE.

332

2.4.3.2

997
838

The configuration table is located at symbolic location
has the following format:

1000

CONFIG:

1885
1002

1882
1

1005
1006

1007
1008
1009
1010
1011

1012
1013
1014
1015
1016
1017
1018
1019
igg?
1022
1023

SEQ 0022

Software Switch register

985S

990
991
992
993
994

Configuration Table
“CONFIG"

and

First 16K Configuration words (2 each)

2nd

16K Configuration words (2 each)

200th 16K configuration words (2 each)
Configuration Words:
LOW:

MED:

BIT 0
ERRORS PRESENT
BIT 1
MEMORY EXISTS
BIT 2-4
RESERVED
BIT S
SKIP ECC LOGIC TESTS FLAG (1=SKIP)
BIT 6
PROTECTED REGION OF AN ECC MEMORY
BIT 7
PROTECTED (PROGRAM SPACE)
BIT 8-11 CSR CODE
BIT 12-15 RESERVED
BIT 0-7
NUMBER OF ERRORS
BIT 8-10 MEMORY TYPE
BIT 11
CSR TESTED OK
BIT 12

BIT 13
BIT 14

BIT 15

RESERVED

"BACKGROUND PATTERN VALID" FLAG
BANK SELECTED FOR TEST BY FIELD SERVICE MODE
LOADERS HOME BANK

This table is used as the source for the configuration
Map (reference. section 7.3).

1051
1052
1053
1054
1055
1056
1057
1058
1059

1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1073
1076
1077
1078

SEQ 0023

2.4.4

Terminal Commands

2.4.4.1

Control

"C"

This command will:

If Switch 8 (Halt Program)

the program.

1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050

Page 24

If Switch 8

1025
1026
1027
1028
1029
1030
1031
1032

I<2

MACRO V05.01b Friday 15 Feb-85 16:10

Flush out any DBE's.

CVMJUAARO MSV11-J MEMORY DIAG.

Turn off Memory Menagement.

is not set,

HALT

in the switch register

unrelocate

is set halt

if program was relocated.

This command will only be recognized at the completion of the
test or pattern, or at the end of a line of an error message.

2.4.4.2

Control

current

"K" (Kill error printout and skip pattern)

This command will allow you to stop an error printout and skip to
the
next
pattern.
This is handy, for example, when you have a whole bank
full of errors, have gotten enough information, and wish
to
skip
to
the next pattern.

2.4.4.3

Control

"T" (Tell me what's happening)

This commend will print out the information
register.
This
is
mainly
intended
for
display register.

encoded
in
the
display
CPU's
without a hardware

Example:

BANK = 17 TEST = 46
RELOCATED BANK= O
PAT= 26

By use of Field Service Commend 17 "Trace” cen be set so that it

will

automatically type out the bank and pattern number- &s each pattern
run.
(Reference section 2.4.4.8.18).

CVMUAARQ MSV11-J MEMORY DIAG.
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092

MACRO V05.01b Friday 15-Feb-85 16:10

2.4.4.4

Page 25

SEQ 0024

(Control "S" (Stop)

This command will stop typeout (soon) and will wait for a Control

“Q".

1093

2.4.4.5

1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106

This command will continue typing
that has
been
stopped by
Control
ugr,
If
there
has
been
no
Lontrol "S” typed then this command
‘s
ignored.

OOV
IOWVBWNFO
SUN

=t st ot s (s it s el s b st
00 ot Pt Pt (= s P Pt P (S P

i St P

b o P

N NI A =2 =0 =t §=0 =0 p—0 b0 =t }s p

1094

Control "Q" (Quintinue)

2.4.4.6

Control "F" (Field Service mode)

This command will cause you to
commands.

enter

mode

which

looks

for

sub

When the program is looking for a sub command any number that is not o
legal
command
will cause a mini help message to be typed.
Therefore
when in doubt type 99 (CR) and you will get help.
NOTE
Typing just carriage return
command 0.

2.4.4.7.1

is s default

Field Service Command O (Exit)

This command will exit Field Services Mode and return to whatever task

was

return

prior

typing control

is a default Command O.

"F".

Note typing just carriage

CVMUAAQ MSV11-J MEMORY DIAG.

MACRO Vv05.01b Friday 15-Feb 85 16:10

Page 26

SEQ 0025

1126

1127
1128

1129
1130
1131

i%gg

2.4.4.7.2

iigg

This command will typeout the contents of the CSR.

1136
1137
1138

If there is more than one CSR on the CPU (or if the program has not
determined the CSR status yet), it will Ask you "WHICH CSR(0-F)" to
which you must respond with an Hexidecimal number from O to F.
Note

iizg

1141

1142
1143

Field Service Command 1 (Read (SR)

typing just carriage return is a default O.

If the CSR ¥ou select causes a trap to 4 the program will

CSR DOES NOT

EXIST".

1144

1145
1147
1148

CSR references are
with section 5.0.

done

iigz

2.4.4,7.3

iigg

This command will enable you to load the CSR.

1157

If there is more then one CSR on the CPU (or if the

yet determined the (SR status yet)

1120

typing just cerriage return is a default O.

1161

1162
1163

1164
1122
11
1167

iigg
1170

1172
1173
1174
1175

accordence

Field Service Command 2 (Load CSR)

1158
1159

“THIS

NOTE

1146

1149
1150
1151
1152

type

program

has

not

it will ask you "WHICH CSR(0-F)" to

which you must respond with an Hexidecimal number from O to

If the CSR ¥ou select causes a trap to 4 the program will
CSR DOES NOT EXIST*".

Note

type

“THIS

The CSR will be read and displayed as in commend 1.
The program will then ask you for the

gith

Octal number.

“CSR?" to which you must respond

Note typing just carriage return is s default

The program will then load the CSR and Read it

new contents.

again

displaying

its

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 27

SEQ 0026

50 0=5 5t hot Pt ot Pt

5= 0= (et Pt o Pt Bt s Pt P
OO
WOO
OO OB
o~

i Pt oot Pt Pt Pt | o

o-o-v-:o- O>,s o Pt Pt Pt o

CVMJUAAO MSVil-J MEMORY DIAG.

2.4.4,7 4

Fijeld Service Command 3 (Examine Memory)

This command will ellow you to examine any physical address

the necessary memory

nrsnagement mapping for you.

The program will ask you for the “PHYSICAL
ADDRESS
which you must respond with an Octsl number.

If the address access causes

“"TIMEOUT
TRAP",
program will type

trap

If
the
address
"PARITY ABORT”.

access

the

causes

end

does

(0-17757776)"

progrem

will

type

a trap to 114 the

The co-tents of your physical address will be typed.

2.4.4.” 5

Field Service Command 4 (Modify Memory)

This command allows you to modify an¥ physical address

necessary memory management mapping

for you.

The program will ask you for the "PHYSICAL
ADDRESS
which you must respond with an Octal number.

and

does

(0-17757776)"

the

If the address access causes
a
trap
to 4
the
program
will
type
"TIMEQUT
TRAP“,
If
the
address
access
causes
o trap to 114 the
program will type “PARITY ABORT".
The program will type “OLD DATA WAS" and the contents of your physical

address.

The program will then type "INPUT NEW DATA" to which you must
respond
gith
an
Octal number.
Note typing just carriage return is a default
The program will attempt to write this new

deta

into

your

physical

address
after
which it will read it again and type "DATA IS NOW" and
the new contents of your physical address.
NOTE

If you cen’t change the data, that would
indicate
that
you
have
a
Double Bit
Error in tnat double word pair.

CVMJARO MSV11-J MEMORY DIAG.
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1244
1242
1243
1244
1243
1246
1247
1248
1249

1250
1251
1252
1233
1254
1255
1256
1257
1238
1239
1260
1261
1262
1263
1264
1263
1266
1267
1268
1269

1270
1271
1272
1273
1274
1275
1276
1277
1278

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 28

SEQ 0027

2.4.4.7.6

Field Service Command 5 (Select Bank

Test)

This commend allows you to run eny bank with any pattern forever.
The program will

ask

you

“BANK(0-177)" to which you must respond

with

an
Octal
number.
f
the bank is not accessible.
type “BANK NOT ACCESSIBLE” and ask question over.

The program will

The program will then ask
wWwith an Octal number.

must

"TEST

(0-47)" to which you

respond

NOTE
Any pattern can be run

including

those

that
are
not
part
of the APT E-TABLE
defaults (reference section 6.2.1).
If
you
select
Pattern 0, the program w'll
ask "TEST O DATA IS?"
to
which
you
must

respond with an Octal

number.

If the Bank zou selected requires relocation

"BANK

the

REQUIRES RELOCATION” and exit this command.

program

will

type

Note normally this

is true for Bank O.

The progrem will then arm the console keyboard for
“TO ESCAPE TYPE ANY KEY!",

interrupts and type

The test pattern will be entered

depressed to escape this loop.

2.4.4.7.7

and

run

until

console

key

Field Service Command 6 (Type Configuration Map)

This ccmmand types the configuration mep.
This

is useful after a long run (overnight) to see all the banks

are marked as bad.

(Especially

if your console

that

is a video terminal).

For a detailed explanation of the map reference section 7.3.

CVMJARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday

15-Feb-85 16:10

Page 29

SEQ 0028

1289
1281

1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294

1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329

1330
1331
1332

2.4.4.7.8

Field Service Command 7 (SOB-A-LONG TEST)

This
command
allows
execution
of
the
SO0B-A-LONG
Test
n
all
non-protected
Banks
reference
Section
6.2.2.26.
Operution
is
identical to command S except that no Pattern or Bank is
entered
and
each pass causes a Bell.

2.4.4.7.9

Field Service Command 8 (Error Summary)

This command types out the rumber of passes and the

errors.,

total

number

there were eny errors it will type out the Banks and the

number of errors per bank up to 255 DECIMAL.

This becomes useful after long runs (all
video console terminal.

2.4.4.7.10

night)

systems

with

Field Service Command 9 (Refresh TEST)

This command allows execution of the Refresh Test on all non-protected
Banks reference Section 6.2.2.19.
Operation is identical to command 5
except that no Pattern or Bank is entered and each pass causes s Bell.

2.4.4.7.11

Field Service Command 10 (Set Fill Count)

This command allows setting of the terminal fill count (necessarx
for
LA30's,
ASR33's, end VI0S5's).
It is normally set to zero for LA36's,
VT52's,

VT100's,

2.4.4.7.12

etc.

Field Service Command 11 (Enter Kamikaze Mode)

This command allows Xou to run patterns that are normally not executed

unless under APT or
result
trying

ACT.

They are usually very time consuming and can

in failures that are fatal to tre program.
In effect
you
are
to
find
a
hardware
failure regerdless of the consequences.

Note that most crashes do not wipe out the display

‘s

telling

you

what

the

program

There are two ways to die here

information

which

was doing 8ust prior to failure.

Impatience and

(rashes.

CVMJUARQ MSV11-J MEMORY DIAG.
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346

1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1339
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1373
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389

MACRO V05.01b Friday 15-Feb-85 16:10

Page 30

SEQ 0029

2.4.4.7.13

Field Service Command 12 (Exit Kamikaze Mode)

Return to the default mode of testing (undo Command 12).

2.4.4.7.14

Field Service Command 13 (Turn Cache Off)

;his3c?gnges the Cache constant to

2.4.4.8.15

cache

(reference

section

Field Service Command 14 (Turn Cache On)

5his3c?3nges the

2.4.4.7.16

bypass

Cache

constant

use

cache

(reference

section

Field Service Command 15 (Test Only Selected Banks)

This command allows you to center the test effort on only those
banks
that
you
are
troubleshooting.
You may also test banks that require
relocation and were inaccessable via command S.

2.4.4.7.17

Field Service Command 16 (Resume Testing All Banks)

Return to the default mode of testing (undo Command 15).

2.4.4.7.18

Field Service Command 17 (Resume Testing All Banks)

Enable "Trace”.
After exiting field service mode,
the
program
type out the bank and pattern numbers as each pattern is run,

2.4.4.7.19
Disable

Ffield Service Command 18 (Resume Testing All Banks)

"Trace”.

(undo Command 17).

will

CVMJUAARO MSV11-J MEMORY DIAG
1391
1392
1393
1394
1395
1396
1397
1398

1399

1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412

1413
1414
1415
1416
1417
1418
1419
1420

1421
1422
1423
1424

1425
1426
1427
1428
1429
1430
1431
1432
1433

1434

1435
1436
1437
1438
1439

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 31

SEQ 0030

2.5

2.5.1

Execution Times

Typical (System) -

Execution time depends on
many
measured times on an 11/23B:

variables;

however

here

are

K words of MSV1l-J Memory
Normal Pass
Min
Sec

Quick Verify

Kamikaze Mode
Kamikaze QV

Min

Min
Min

Sec
Sec
Sec

K words of MSV11-L Memory
Normal Pass
Min
Sec
Quick Verify
Min
Sec
i(amikaze Mode
Min
Sec
Kamikaze QV

Min

Sec

K words of MSV11-P Memory
Normal Pass
Min
Sec
Quick Verify
Min
Sec
Kamikaze Mode
Kamikaze QV

2.5.2

Min
Min

Sec
Sec

Calculations (System)

Normal Pass
Add
Add
Add

Quick Verify Pass
Add
Add
Add

Kamikaze Mode
Add 10 min.,

Sec per 16K BANK of MSV11-P
Sec per 16K BANK of MSV11-L
Sec per 64K BANK of MSV11-J

Sec per 16K BANK of MSV1l1 P
Sec per 16K BANK of MSV11-L
Sec per 64K BANK of MSVil1-J
per 128K words for approximate pass times.

CVMJARO MSV11 J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 32

SEG 0031

1441
1442

1485

MT0020
MT0001
M70002
MT0003
MT0004
MT0005
MT0006
MTQ007
MT0010
MT0014
MT0017
MT0020
MT0021
MT0022
MT0023
MT0024
MT70026
MT0027
MT0030
MT0031

MT0032
MT0033
MT0034
MTC035
MT0036
MT0037

MT0041
MT0042
MT0043
MT0044
MT0045
MT0046
MT0047

i<l SEC
;<1 SEC
;<1 SEC
;1 SEC
;1 SEC
S | SEC
;<1 SEC
i<l SEC
;<l SEC
I | SEC
i <1 SEC
D | SEC
;1 SEC
;10 SEC
;10 SEC
;20 SEC
;<1 SEC
;1 SEC
;i 1 SEC
; 3 SEC
i<l SEC
;35 SEC
;<1 SEC
;<l SEC
;1 SEC
i<l SEC
i 1 SEC
i<l SEC
3¢l SEC
<

1484

Description

Test Time

1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483

Typical (Tests)

1453
1454
1455
1456
1457
1458
1459
1460

2.5.3

1443
1444
1445
1446
1447
1448
1449
1450
1451
1452

SEC
SEC
SEC
SEC

DATA PATTERN TEST
ADDRESS TEST
COMPLEMENT ADDRESS TEST
3 XOR 9 WORST CASE NOISE TEST
ROTATING ZERQOS TEST

ROTATING ONES TEST

INITIAL DATA TEST
ADORESS BIT TEST
BYTE ADDRESSING TEST
BASIC DOUBLE BIT ERROR TEST
HOLDING 1'S
0'S TEST

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST

MARCHING 0'S
REFRESH TEST

1'S TEST

SHIFTING DIAGONAL TEST

FAST GALLOPING PATTERN TEST
RANDOM DATA TEST

UNIQUE BANK TEST

FLUSH OUT DBE'S TEST

SOB-A-LONG TEST
WRITE RECOVERY TEST
BRANCH GOBBLE TEST
SOFT ERROR TEST
WORST CASE PARITY TEST
CORRECTION CODE TEST
CHECK ECC DISABLE TEST

ADDRESS TO CSR ON DBC TEST

EXTENDED ADDRESS TO CSR ON ERROR TEST
WRITE BYTE TEST
SHIFTING CHECKBITS THROUGH CSR TEST
SYNDROME BITS TO THE CSR ON A DBE TEST
CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST
NO CSR UPDATE WITH EXISTING DBE TEST

CVMJUAAQ MSV11-J MEMORY DIAG.
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500

1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532

MACRO V05.01b Friday

15-Feb-85

16:10

Page

SEQ 0032

3.0

ERROR INFORMATION

3.1

Error Reporting

Most errors are reported using the EMT

trap and

handler

prov ded

SYSMAC.SML.
Most errors will be of the "MEMORY DATA ERROR” type which
will be described here.
MEMORY DATA ERRORS w'll also cause
the
bank
to be marked as Bad in the configuration table.
Other errors are best explained by referencing
and if necessary the program listing.
Example 1:
MEMORY DATA ERROR
PC
BANK
VADD

022132
022132
022132
022132

37
37
37
37

060006
060006
060006
060006

PADD
03700006
03700006
03700006
03700006

GO0D
000000
000000
000000
000000

BAD
000100
000100
000100

000100

the

specific

XOR
CSR MTYP
000100
O
E
000100
O
E
000100 O
E
000100

typeout

PAT
06
06
06
06

While testing Bank 37 at virtual address 60006 (virtual addresses
are
always
between
60000
and
157776
for
mapping purposes), physical
address 3700006 (that's Bank 37
physical
6
within
the
Benk)
with
Pattern
6
(Initial
Data Test), the good data expected was O but the
data actually read (BAD) was 100, the
exclusive
OR
at
Good
Bad
%ields
100
which
indicates onlI
failing bit(s) (Bit 6).
It is an
SV11-J (ECC) Memory. The CSR is
located
at 172000.
Example 2:
MEMORY DATA ERROR

022132
022132
022132

BANK
35
35
35

VADD

060000
060002
060006

PADD

03500000
03500002
03500006

G0OOD

00000¢
Q00000
000000

BAD

000001
000100
000100

XOR

000001
000100
000100

CSR MTYP
O
O
0

€
E
E

PAT
06
06
06

While testing Bank 35, virtual address 60000, physical address 3500000
with
Pattern
6 (Initial Data Test), the good data expected was 0O but
the date actually read (BAD) was 1, the exclusive OR
at
Good
Bad
ields 1 which indicates onlI failing bit(s) (Bit 0).
It is an MSV11-J
£CC) Memory and the CSR is located at 172000.
NOTE

Subsequent errors of the

not type a new heading.

same

test

CVMUAAQ MSV11-J MEMORY DIAG.
1534
1535
1536

1537
1538
1539

1540
1541
1542

1543

1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1537
1558
1559

1560

1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582

MACRO V05.01b Friday 15-Feb-85 16:10

Pege 34

SEQ 0033

3.2

Error Abbreviations

The following
¢ OF ERRORS

1ST ADD

ARRAY
APT#
APTCCRE
APTM,S

BAC
BAD-WD1
BAD-WD2
BAD-CHK
BANK
8D-CC
CHKBITS
CONTRL
CPUERR
CSR
CSRNO
DATARG
DBE
DEV ADD
ECC
GD-CC
GD-CHK
GD-WD1
GD uD2
G0O0D
LSIZE
MEMERR
MMRO
MMR1

MMR2
MMR3
MTYP
PADD
PAT
PC

SBE
VADD
WROTEL
WROTEZ2
X0R
AUT

is & list of all abbreviations used

in error reports.

Number of Errors that were detected.
First Address that failed.
The array number that was locked up in the MS11-M CSR.
The # of CPU's APT expects on the system.
APT Core size.
APT MOS size.
Bad date.

Bad
Bad
Bad
The
Bad

Word #1 of a double word data value.
Word #2 of a double word data value.
Check Code Bits.
Bank number.
Banks are 16K words long.
Check Code Bits.

The 7 bit value of the Check Code Bits.
The CACHE Control register.

CPU Error register.
Control and
Status Register.
CSR NUMBER (0-F Hexidecimal).
The CACHE Deta Register.
Double Bit Error
(uncorrectable error).
Device Address.
Error Correctable Code.
Good Check Code Bits.
Good Check Code Bits.
Good Word #1 of a double word data value.
Good Word #2 of a double word data value.
Good data.

MSV11-J Size.
Memory Error register.
Memory Management Register
Memory Management Register
Memory Management Register
Memory Management Register

#0.
#1.
#2.
#3.
Memory Type (MSV11-J,MSV1i1-L, or MSV11-P).
Physical Address (asserted by the program after mapping).
Pattern number.
Program Counter at the time the error occurred.

Single Bit Error (correctable error).
Virtual Address (asserted by the program before mapping).

The data that was written into the lst half of a double word.
The data that was written into the 2nd half of a double word.
Exclusive OR of the good and bad data.
Shows the bad bits.
Address under test

CVMJAAQ MSV11-J MEMORY DIAG.
1584
1585

1586

1587
iggg

MACRO V0S5.01b Friday 15 Feb-85 16:10

3.3

Page 35

SEQ 0034

Error Halts

There sre several Halts

in the program.

igg?

All unused trap vectors contain a trap catcher ( . WORD .+2,HALT).

iggg

An undefined TRAP

iggg

The APT down load sequence will halt at symbolic location "APTHLT",

instruction halts at symbolic location "$HALTZ2",

Halt on Error option (SW15 Set) at symbolic location "$HALT",

iggg
{ggg

Halt program (SW8 Set) at symbolic location "$EXHALT".

1600
iggé

Power Fail will normally halt at the end of
(symbolic location "$DOWN").

1603
1604
iggg

Power Fail has a fatal Halt at symbolic location "$ILLUP” which can be
caused by power up occurring before power down sequence completed or
by power down before a power up sequence is completed.

1607

the

shut

down

sequence

CVMUARO MSV11-J MEMORY DIAG.
1609
1610
1611

1612
1613
1614
1615
1616
1617
1618

1619
1620
1621

MACRO V05.01b Friday 15-Feb-85 16:10

4.0

Pass complete typeouts as follows:
END PASS
END PASS
END PASS

#
%
2QV

1633
1634

1635

1636
iggz

1639

0
1
2

NOTE

Pass 2 was flagged es & Quick Verify
Pass.
(Because of & change in SWS)

1626
1627
1628
1629
1632

SEQ 0035

PROGRESS REPORTS

1622
1623
1624
1625

1630
1631

Page 36

To obtain progress reports while executing, typing a Control

print out the

Example:

information encoded

in the display register.

"T"

BANK= 2 TEST= 34
Reference Section 2.4.4.7.18 for more

information on Tracing.

1640

5.0

1643

The following
is & picture view of the current control

1641
1642
1644

1645
1646

1647
1648

1649

1650
igg%

1653
1654
1655
1656
1657
1658
1659
1660

will

CSR INFORMATION TABLES
status

registers
which can be tested by this program.
It shows bit
assignments and definitions to provide e handy reference, and
shows the similarities and differences between each one:

NOTE
All unused bits in each CSR are equal to zero.

CVMJUARO MSV11-J MEMORY DIAG.

I<'3

MACRO v05.01b Fridey 15-Feb-85 16:10

Page 37

SEQ 0036

1662

1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
17110
1711
1712
17113
1714
1715

5.1

(I1D

MSV11-J CSR

11111111

1111111

1111111111111

!DE!

EA!

'DE!EA!SI!

ADDRESS

1IT1IT1I1I1I1ITITI

!SE!IP!DCEC!EE!

1I1I11111IT1II1I

CHECK BITS

1IT1.1

!SE!IP!DCIEC!EE!

1111111111

1I1T1IT1ITII

I1
I
111
1I1I1111I1T1I1ITITITII
!DE!EA!SI!
!
SYNDROMES
'SE!IP!DCECEE!
I
I
I7I1I1111I111I1I111ITIII

15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00

Bit assignments are defined
as follows:

BIT1S UNCORRECTABLE ERROR
On a read to memory (ECC Disable

Bit = 0), this bit is set if
a double error occurs.
The

error address is stored in the
CSR.
Setting this bit also
turns on a red LED at the rear of
the card for a visual indication,.
This bit is also set in ECC
Disable Mode if a SERR or DERR
occurs,

B8IT14 EUB ERROR ADDRESS
With Bit 14 = 1, a read to the CSR
will fetch address A2l
through A18.
When Bit 14 = 1,
diagnostic data may not be
loaded into the syndrome
register.

CVMUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 38

SEQ 0037
\

BIT13

SET

INHISIT MODE

When this bit is set to
a "1”, it enables the inhibit
mode pointer to :nhibit

either the first or second
16K from ever
going
into the
Diag Check or
ECC
Disable

Mode.

BITS0S5-10 CHECK BIT STORAGE (CSR 11)
Check Bit Storage (Diag CK
Bit2 =1)
When in the diagnostic check
mode these bits are used to store
the check bits to be written
into memory or the check bits
read from memory.
If a double
error or single error occurs
when in the diagnostic check
mode and ECC disable Bit 1 = 0,
then the check bits are stored
in the CSR together with
the double or single error
bit.
These bits are writeable
in diagnostic mode.
A "1”
is stored in Bit 11 if CSR
02, CSR 13, and CSR 14 are
set to indicate that the
memory under test is a MSV11-J.

BITSOS 11 QBUS ADORESS STORAGE (CSR I)
(Dieg Ck Bits 2 - 0, ECC
Disable Bit 1 = 0)
If a double or single error
occurs on a Read cycle, then
address Bits All through
R17 are stored in these bits
These bits are read only on
the condition that SERR (CSR 4)
or DERR (CSR 15) is set but
CSR 14 is not set.

£QB Address Storage (Diaa Ck
Bit 2 = 0), ECC Disable
Bit
1 =00r1).
If a double or single error
occurs on a Read cycle,
address Bits Al7 through
A1l are stored in CSR
Bits
11 through 5 and address
Bits AR21 through Al8 are

CVMJUARO MSV11 J MEMORY DIAG.
1772
1773
1774
1778
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785

1786

1787

1788
1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1807
1803
1804
1805
1806
1807
1808
1809
1810
1814
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 39

SEQ 0038
stored in a backup reg:ster.
The EGB Error Address
Retrieval Bit (CSR 14) is
used to obtain the total
error address as follows:

With CSR Bit 14 = 0 & read to
the CSR will obtain Al7

through All from CSR Bits 11
through S.

CSR Bit 14 cen then be set
to @

"1"” and & read to the

CSR will then read A21
through A18 from CSR Bits 8
through S and 0's from CSR
Bits
11 through 9.
Address Bits A2l through
Ali are obtained

to locate the double
error to 8 1K segment of
memory.

The EQE address A2l
through Al8 is read only
whenever CSR 14 = .

BIT05-10 SYNDROME STORAGE (CSR III)
If » double or single error
occurs on a read or write
byte cycle, and if CSR bit
2 is set to a "0" syndrome
Bits X, 0, 1, 2, 4 and 8
and stored in CSR bits S
through 10,
To read the
syndrome bits from CSR, Bit
you must read the error
address, then set 2 of
the CSR must be st to

a "1" (diagnostic mode) end
the CSR read again.
This operst
on
will sllow syndrome bits
for a single or double
failure to be read

instead

of the address bits normslly
read when CSR Q2

is set to

81704 SINGLE ERROR

If on & read to memory o
SBE occurs, the errar
addrecs Aci-All end

the 2rror syrdromes will

“O~.

CVMUARO MSV11-J MEMORY DIAG.
1827
1828
1829

1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1640
1841
1842
1643
1844
1845
1846
1847
1848
1649
1830
1851
1852

1853

1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864

1865

1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879

MACRO Vv05.01b Fridey 15-Feb-85 16:10

Page 40

SEQ 0039
be logged :n CSR Bits S 11
unless the uncorrectable error
CSR 15 1s set.
The error
address will be logged
unconditionally in
the ECC
Disable Mode.
This bit is not
set if Inhibit Mode (Bit

13 = 1)

is set ond Diagnost:c

Mode (Bit 02 =

is set.

8IT03 INHIBIT MODE POINTER

This bit works in conijunction
with the Set Inhibit

(Bit 13).

When Bit 13 is set

to a 1, a 16K portion of
memory is inhibited from

operatinB in the ECC Disable
Mode or

Diagnostic Check Mode.

The Inhibit Mode Pointer
indicates which 16K is being
inhibited, i.e., Bit 3 = 0
the first 16K of memory is
inhibited, Bit 3 = 1, the

second 16K of memory
inhibited.

With Bit 13 set to a O,
3 becomes inoperative.

Bit

B8it03, in conjunction with
Bit 13, therefore allows a 16K
chunk of memory to always have
ECC coverage.
The systems
diagnostic can therefore
reside

in this protected

por tion of memory and cen
diseble ECC and/or run the
Diagnostic Check Mode in the
rest of memory without

itself

becoming vulnerable to single
errors.
This bit is a Resd/Urite
?&}Treset by power up and BUS

BIT702 Diagnostic Check Mode
This mode allows o means of
forcing & single or double

error in 8 desired location.
It elso provides s meens of

examining the check bits and

the syndrome
location.

in 8 given

CVMJARO MSV11-J MEMORY DIAG.
1881
1882

1883

1884
18835
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904

1903
1906

1907

1908
1909
1910
1911

1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1923

1926
1927
1928
1929

1930
1931
1932
1933

MACRO v0S.0ib Fridey

15-Feb-85 16:10

!
Page 41

SEQ 0040
The check bits desired for o

Qiven data psttern

are

written

into Bits 5 through 11 of
the CSR.
A word or write byte
memory will write the check bits
from the CSR to the MOS arra

(CSR 2 = 1) instead of the cxeck

bits generated on the data

to be written.
Single errors
on the read portion of the DAT(0B
cycle sre corrected.

A read to the memory will
read the check bits stored
memory
and clock them into

the CSR.

If a double error or single
error occurs the DERR or
SERR bit in the CSR is set

snd the error syndrome bits
read from ECC are stored in
CSR Bits 10-5 as well as the
address bits.
In Diegnostic
Check Mode the error syndrome

bits will be read wher CSR
Bits 10-5 are read.

This bit is a Read/Urite bit
and is reset on power up and

8US INIT

B8IT01 DISABLE CORRECTION MOCE
If this bit is set, no single
errors will be corrected.
A
single error will set CSR 4
and CSR 15 or a double error
will set CSR 15 and assert
BUS PBL if CSR 00 is asserted.

The 1K block of address
where
the error occurs will also

be stored

in the CSR.

The

priority of a SERR and DERR
will be the same, i.e., the

last error information will
always be stored unless a DERR

precedes a SERR.

If a double

error occurs during 8 write byte
cycle, the write portion of
the cycle will not be asborted.
The check bits written will

CVMUAAO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 42

SEQ 0041

1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952

1953
1954
1955
1956
1957
1958

have been generated on tie
data written.
This means that
if a single or double error
existed in the location accessed,
it would be cleared (unless the
errors were hard).

This bit

is a diagnostic aid

to allow writing and reading
data from memory without
interference from the error
correction logic.

BITOO UNCORRECTABLE ERROR
INDICATION ENABLE
If a double error occurs with
ECC enabled or a single error
or double error with ECC
disabled, on a Read cycle to the
memory

and this bit

is set,

then éUS PBL will be asserted.

CVMJARO MSV11-J MEMORY DIAG.
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972

1973
1974
1975
1976
1977
1978
1979

1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993

1994
1995
1996
1997
1998
1999

2000
2001
2002

2003

2004
2005
2006
2007
2008
2009
2010

2011
2012
2013
2014

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 43

S€Q 0042

5.2

MSV11-L/P CSR

I
111
I1111
1111111
'PEYEU!
!
!
ADDRESS
vt
tWP!
AR
I
1
1111111111111
1T

15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00
Bit assignments are defined as follows:
BIT15 PARITY ERROR

B8IT14

EQB

ERROR

BIT14
order

is zero,

the low
failing

RETRIEVAL
If
memory
is
on
Extended
QBUS,

addresses

the
an
when

are

available
(Bits
11-17);
when BIT14 s
one,
the
high
order
failing addresses
are
evailable
(Bits 18 21

of address).

the

memory is on a
QBUS,
a jumper disables this
bit so that it is read

only.,

and equal to ze-

ro.

8ITS
11-5
ADDRESS
With
set,
high

ror

ERROR
BIT14

they contain
order parity

address

21-18

with
they

the
er

¥Bits

address);

BIT14
cleared,
conte'n
the low

order parity error address
(Bits
17-11 of
address).
8IT02

WRITE

(odd)
other

when
parity

PARITY

Normal

when set.

WRONG

parity

clear;
(even)

BITOC ACTION ENABLE No
action
when
cleear;
trap
to
vector
114
when

set.

CVMJUARO MSV11-J MEMORY DIAG.
2016
2017
2018
2019
2020
2021

2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037

2038

2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049

2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061

MACRO V05.01b Friday

15-Feb-85

16:10

Page 44

SEQ 0043

6.0

SUB-TEST SUMMARIES

6.1

Tests

TEST

8I7 TEST OF ALL CSR'S/MATCH ALL CSR'S WITH MEMORY
(CSR Access may cause wrong Type of Traps)

TEST

2
TEST BANK O ACCESSES
Failures are fatal.

TEST

3
TEST BANKS 1-177 (OCTAL) FOR ZEROS AND ONES
Errors are not typed here - only logged in
the configuration table

TEST

ECC INHIBIT MODE POINTER TEST
TEST

DIAGNOSTIC MODE DISPATCH ROUTINE

This test runs all the patterns
mode selected.
TEST

UNIQUE BANK TEST

Pattern 27

is run

in the

CVMUARO MSV11-J MEMORY DIAG.

MACRO V05.01b Fridey 15 Feb-85 16:10

Page 45

SEQ 0044

2063
2064
2065
2066
2067
2068
2069
Sg;g

6.2.1

2072
2073
gg;g

Actual Tests are identified by symbolic locations "MTPXYY" where
X
may
be
any sub program indicator (A,B,C,etc) or 0 and YY will be the
number of the test.

2076

Setup procedures for each test are

2079
2080
2081
2082
2083
2084

Tests reside in 4 scripts that are scanned for execution.
Symbolic
location
"MKCSRT”
is
a table of tests that can run once for each
ECC bank. Symbolic location
"MKPAT” is
a table
of
tests
that
can
run on each Bank of ECC memory.
Symbolic location "MJUPAT" is a table of tests that can run on
each
Bank
of
Parity
memory.
Symbolic
location
“FSPAT”
is a table of

2087

The 1st 3 scripts are com letelp controlled by the APT

gggg

(1) with APT, or (2) manually.

gg;g

gggg
2088

6.2

Tests
General Test Information

identified by symbolic locations

“MTOOYY" where YY will be the number of the test.

tests that can be run
if

not

gggé

running

in Field Service Mode (command S).

under APT).

E-table

Example E-table Segment:

; THE FOLLOWING LOCATIONS SPECIFY WHICH TESTS
;ARE TO BE RUN FOR PARTICULAR MEMORIES

2096

;REFERENCE THE TABLE LISTED BELOW TO RELATE BITS TQ TESTS.

2098

;IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE...

209

(even

odifications to this table can be made

2093
gggg

2097

;BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITQ SET

2100
2101
2102

;NOTE+*NULL TESTS DO NOT TAKE ANY TIME
H
$DDUWO :
.WORD
177777

RECOMMENDED VALUE
;ECC CSR TESTS
177777 TABLE = MKCSRT:

2104

$0DU2 :

177777

;ECC TESTS

1777717

;PARITY TESTS

2103
2105
2106

2107
2108

$DDUL :

.WORD

177777

$DDW3:
$DDW4 :

.WORD
.WORD

177777
177777

$DDWS:

.WORD

;ECC CSR TESTS

177777 TABLE = MKCSRT:

;ECC TESTS
;PARITY TESTS

177777 TABLE = MKPAT:
003777 TABLE = MJUPAT:

103777 TABLE = MKPAT:

177774 TABLE = MUPAT:

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-8S 16:10

Page 46

SEQ 0045

2110
2111
2lle

2113

2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134

2135
2136
2137
2138
2139

Specific Tests

6.2.2

6.2.2.1

Test O

Urites

Reads R2

This

Basic Data Test
into a 16K Benk.

is used for Zeros and Ones testing end

eny console selected Test.

in Field Service Mode

It can execute out of the USER Instruction PAR's.
NOTE

It is
frequently
modified
dynamically
such
that
(1) it returns after writing

onlb (the 1st NOP
RETURN)

(2)

is
it

(the code PERRO2 and

with INC 3#PATERR).

replaced

with

only counts Errors

NOP

are

replaced

for

CVMJUARQ MSV11-J MEMORY DIAG.
2141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154

2155
2156
2157
2158

MACRO V05.01b Friday 15-Feb-85 16:10

6.2.2.2

Test 1

Page 47

SEQ 0046

Address Test

Writes
Reads
an
incrementing
addressed into a 16K Bank.

pattern

equivalent

It can execute out of the USER Instruction PAR's,

physical

CVMUAAD MSV11-J MEMORY DIAG.

MACRO v05.01b Friday 15-Feb-85 16.10

Page 48

SEQ 0047

2160
2161
2162

2163

2164
gigg

6.2.2.3

2167
gigg

Writes the complement of the physical address from high
addresses
low (write down) and reads from low addresses to high (read up).

2170
Si;é

This provides the complement of the coverage of Test 1
pattern and addressing sequence.

2173

It can execute out of the USER Instruction PAR's.

Test 2

Complement Address Test

in both data

CVMUARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 49

SEQ €048

2175
2176
2177
2178

2179
2180
gigé

6.2.2.4

2183

Writes

2186
2187

This test is run 4 times (1) with Zeros Ones,
Zeros,
(3)
with 401
Ones, and (4) with Ones

2190
2191

It can execute out of the USER Data PDR's, the User Instruction FAR's,
the Kernel Data PAR’'s and the Supervisor Data PAR's,

2184
2185

gigg

2192

change.

the 401

Test 3

3 XOR 9

Reads a Test that complements as

address

bits

and

(2) with Ones
401.
The test of
is to force a the parity bits to become involved.

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 50

2194
2195
2196
2197
2198
2199
2200
5585

6.2.2.5

2203
2204
gggz

Writes a background pattern of Ones.
Rotates a Zero
Carry
Bit
left
thru each par of bytes (18 times) and then checks that the carry is
Zero and the word (2 bytes) is still all Ones.

sgg;

It can execute out of the User Data PAR's and the Kernel Dsta PAR's,

Test 4

Rotating Zeros Test

2209
2210

NOTE

2214
gSiz

It is not uncommon to observe
the
good
data
equal
to
the
bad data.
his
indicates that the carry was not clear
after 18 ROLB's.

2211
2212
2213

2217

SEQ 0049

CVMJARO MSV11-J MEMORY DIAG.

MACRO Vv05.01b Fridey 15-Feb-85 16:10

Page 51

SEQ 0050

2219
2220
2221
2222

2223

2224

2225
2226
2227
2228
2229
2230
2231
2232
gggz
2235
2236
2237
2238
2239
2240
2241

2242
2243

6.2.2.6

Test 5

Rotating Ones Test

Writes a background pattern of Zeros.

Rotates a One

ceoarry

bit

thru each pair of bytes (18 times) and then checks that the Carry

One and the Word (2 Bytes)

is still all Zeros.

This provides the complement of the coverage of Test 4

left

is a

in data.

It can execute out of the User Data PAR's and the Kernel Data PAR's.

NOTE
It is not uncommon to observe
the
good
dats equal the bad data.
This indicates
that the Carry was not set
after
18
ROLB's.

CVMJAAQ MSV11-U MEMORY DIAG.

MACRO V0S.01b Friday 15-Feb 85 16:10

Page 52

2245
2246

2247

2248
2249
2250

gggé

6.2.2.7

Test 6

Initial Date Test

2253
2254
2255
2256
2257
2258

Writes Reads a double word first with all bits 0 except 1 (for every
bit position),
Second with
all bits
1 except
1
(for every bit
position)
This is a very quick check of the data paths.

SEQ 00%1

CVMJUAAO MSV11-J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 53

SEQ 00Se

2260
2261
2262
2263
2264

2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284

6.2.2.8

Test 7

Address Bit Test

Writes a background of all Zeros.
Read Address 1 for a O Byte.

Complement Address 1.

Read Address 1 for a non 0O Byte.
For each Address Bit position from Bit 1:

Virtual (2, 4, 10, 20, 40, 100, 200, 400,
1000,
2000,
60000, 20000)
Physical (60002, 60004, 60010,
60020,
60040,
60100,
61000, 62000, 64000, 70000, 140000, 100000)
Read Address for a 0 word.
Complement Address contents.

4000,

10000,

60200,

60400,

Read Address for a non-zero word.

This

is a very quick check of the address bit uniqueness.

CVMUAARQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday

15-Feb-85 16:10

Page

5S4

SEQ 0053

2286

2287
2288
2289
2290
2291
2292
2293
2294

2295

2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309

6.2.2.9

Test 10

Byte Addressing Test

With ECC Disabled.

Writes all ones to a double word.

For each of the 4 Bytes

Clears one byte.

in the Double Word.

Reads all 4 bytes from double word.

Checks for only proper byte clear.
All other bytes set to all ones.

This

is only done on one double word address.

NOTE
This

is run for ECC memory only

CVMJUARO MSV11-J MEMORY DIAG.
2311
2312
2313
2314
2315
2316
sgi;

2319
2320
2321
2322
2323
gggg

MACRO V05.01b Friday 1S Feb-85 16:10

6.2.2.10

Test 14

Page 55

SEQ 0054

Basic Double Bit Error Test

Write the CSR to enable diag mode with a double bit error
check bits of 110011 and Uncorrectable Error Indication
enabled.

Write firot AUT

2326
Sgg;

Read address, this should cause a double bit error.
is asserted and we check for a parity trap to occur.

2329
2330
2331
2332
gggg

Read the CSR for check bits
Indicator.

Write ones to the high byte of the address under test.

gggg

Read address and check for a Parity trap to occur as a result of (S)

2337

Repeat 5 and 6 for data of ones in the low byte and check for

gggg

in a 16k bank with data of all zero's.

This will write the check bits

in (1)

in (1) and Uncorrectable Error

write abort and parity trap.

2340

This test checks

byte write of a double bit error will be aborted.

to see

2343

2344

2346

2347
2348
2349

Since

e DBE exsists at this address the write should be aborted.

ggzé

2345

B8US PBL

This

test

& double bit

error

NOTE
only

run

for

the

MSV11-J

will

aborted and a

CVMUARQ MSV1l-J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 56

SEQ 0055

2351
2352
2353

2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
2367

6.2.2.11

Test 17

Holding 1's

0's Test

Urite a 16K Bank with
alternating
writing a Byte at a time.

Bytes

Read each Word for correct Test.

Do (1-2) again for a complement Test.

This checks the memory for the cepebility of holding 0's

Zeros

1's.

Ones

CVMUARO MSV11-J MEMORY DIAG.

MACRO VC5.01b Friday 15-F>b-85 16:10

Page 57

SEQ 0056

2369
2370
2371

2372
2373
2374
g;;z

6.2.2.12

Test 20

Syndrome Bits to the CSR on & SBE Test

2377
gg;g

Write CSR with check bits to correct bit 0 of the first AUT
16k bank from a O to a 1 with diag mode.

ggg?

MUWrite AUT with data of 0's creating a SBE.

2382
2383

Cleesr CSR.

gggg

Read the AUT to clock the address and syndromes

gggg

Read the CSR for the SBE

2388
2389
2390

Write the CSR to diag mode to clock the syndrome bits into
CSR bits 5-11.

Read the CSR for the proper syndrome bits.

ggg%

Sggi
2395

gggg
2398

2399

2400

2401
2402

2403

2404
2405

2406

into the CSR.

indicator, bit 4.

8. Repeat 1-7 for all 16 data bits.
9.
Repeat 1-8 for data of ones so that a correction will occur
from a 1 to a zero.
This test checks to see that the EDC chip can detect Single Bit

errors for all 16 data bits by checking for CSR bit#4 and that

the proper syndrome bits are placed in the CSR.

)

This test

NOTE
is only run for the MSV11-J

CVMJAAO MSV1i1-J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 58

SEQ 0057
{

2408
2409
2410
2411
2412

2413

2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424

2425

2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442

6.2.2.13

Test 21

Marching O's

1's Test

Urite a Background of alternating Bytes of Zeros

For the 16K Bank addressing Down
(a) Read check a word
(b) Byte Swap a word

(¢) Read check a word

For the 16K Bank addressing Up
(a) Read check a word
(b) Byte Swap a word
(c) Read check a word

For the 16K Bank addressing Up
(a) Read check a word

(b) Byte Swap a word
(c) Read check a word

For the 16K Bank addressing Down
(a) Read check a word
(b) Byte Swap a word

This checks the

integrity of the 32 Bit Double Words.

It can execute out of the User Data PAR's.

2443

2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
2454

2455

2456
2457

NOTE

It is not uncommon to see
a
misleading
error typeout because the second test in
each case is based upon
&
byteswap
of
the first test which may or may not have
failed.
If the error
report
indicates
errors
in pairs with the bad bit in the
second
report
being
the
same
bit

position
should

relative

byte then you

ignore the second error report.

Ones

Write a diagonal Test of ones on every KDIAG(TH) stripe
write zeros elsewhere.

Address

NOTE

2485
2486
2487

2488
2489
2490

eeeeee
—— e

LSB's

Example uses KDIAG of value 4 more typical
of
8.
Consult the symbolic definition of
the program listing to be sure.

2491

Disturb each row for > 3.2ms

2493

Read check diagonal pattern

Do (1-3) KDIAG times moving the
placement
stripe to cover all address positions.

Do (1-3) for a complement pattern

2492
2494
2895
2496
2497

2498

2499

2500
2501
2502

(zeros in a background of ones)

2503

NOTE

2505
2506
2507
2508

This test
is not normally
executed
except under APT
or ACT.
It may be
invoked VIR Field Service Command 13
(Kamikaze Mode).

2504

2309
2310
2511

OOOROOOH

2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484

OCOHOOO=O

287y

OFrOOOrO0

Example:

ol elelol Jo¥oTol

2468

is on addresses not bit positions.

QCOOROOOr

This Test

QOO0 OrO

gzg?

2469
2470

Refresh Test

Test 22

SEQ 0058

OFrOOOOO

6.2.2.14

Page 59

2459
2460
2461
2462
2463
g:gg

MACRO V05.01b Fridey 15 Feb 85 16:10

OOOOOO

CVMUAAO MSV1l-J MEMORY DIAG.

is a value
“KDIAG” in

the

diagonal

CVMJAAQ MSV11-J MEMORY DIAG.
2513
2514
2515
2516
2517

2518
2519
2520
2521
2322
2323
2524
2525
2526
2527
2528
2529
2330
2531
2532
2533

MACRO VO05.01b fFridey 1S Feb-85 16-10

6.2.2.15

Test 23

Page 60

SEQ 0059

Shifting Diagonal Test

Similar in overall operation tc test 22 except
for refresh and disturb rows.

does

NOTE
This
test
is
not
normally
executed
except
under
APT
or
ACT.
It may be
invoked VIA
Field
Service
Command
13
(Kamikaze Mode).

not

delay

CVMJAAO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 61

2535
2536
2537
2538
2539
gg:f

6.2.2 16

2542
ggzi

This does a classical galloping pattern
except
that
incremented by 400 Octal (every 64th double word)

2545
2546
2547
2548
2549
2550
2551
2552
2553
2554

Test 24

SEQ 0060

Fast Galloping Pattern Test

NOTE
This
test
is
not
normally
executed
except
under
APT
or
ACT.
It may be
invoked VIA
Field
Service
Command
13
(Kamikaze Mode).

addressing

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 62

SEQ 0061

2556
2557
2558
2559
2560
2561
2562
5322

6.2.2.17

gggg

Write Random Data

gggg

Read check Random Data.

gggg

This routine regenerates the same random numbers

2571
257¢
2573
gg;g

seed
8s the write sequence.
After the read check the seed is updated
so that the next use of this pattern will not invoke the same sequence
of random numbers.

2576
gg;g

If you wish to change the random sequence so that it is different than
any other run in the same configuration then there are 2 ways of doing

Test 26

Random Data Test
in a 16K Bank while

incrementing the Addresses.

using

the

same

$0.

2579
2580
2581
2582

2583
258;
258

2586

2587

.
.
Modify symbolic locations “SEEDHI" and "SEEDLO" to any number
you like,
.
.
.
Enter Field Service Mode and execute this Test (command S)

on some (any good) bank for a short time (30 sec or so).

This can execute out of the User Data PAR's,

and the Supervisor Data PAR's.

the

Kernel

Data

PAR's,

CVMJAARO MSV11-J MEMORY DIAG.

IKS

MACRO V05.01b Friday 15-Feb-85 16:10

Page 63

SEQ 0062

2589
2590
2591
2592
2593
2594
2595
2596
2597
2598

This Test uses Test 0 to write
bank.

gggg

It does not test Banks that require relocation to test.

2602

It does not run as part of any

2599

2603
2604
2605

6.2.2.18

Test 27

Unique Bank Test
read the Bank

number

script but rather is always

normal pattern tests are complete.

each

run

after

CVMJAAO MSV11-J MEMORY DIAG.
2607
2608
2609
2610
2611
2612
2613
2614

2615

2616

2617

2618
2619
2620
2621
2622
2623

MACRO V05.01b Friday 15-Feb-85 16:10

Page 64

SEQ 0063

6.2.2.19

Test 30

Flush Qut DBE's Test

This Reads each location then moves the old value back
in.
This
s
done
with
ECC Disabled and therefore corrects any DBE's or SBE's (if
possible).

It does not run as part of any script but rather is
always
prior
to
the
End
of
Pass
Code,
as
part of a Control

run
just
"C" (Boot)

command, as part of End of Pass shutdown for ACT or XXDP
Chain
Mode,
as part of hanging sequence after an error if under ACT or APT, and as
part of a shutdown sequence directed by Switch 8 (Halt Program).

CVMJARO MSV11-J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 65

SEQ 0064

2625
Sggg

6.2.2.20

2628

Rationalization

2631
2632
2633
52;;

In order to concentrate the memory cycles of a test into a particular
address,
we
must
cut the overhead cycles to a minimum.,
Frequently,
the
instruction
itself
maI
provide
adequate
data or
set
up
o
background in which any complemented bit may find it hard to survive.

2636
2637
gggg

The SOB instruction is the only PDP-11
instruction that
is (1)
»
single operand, (2) can be repeatedly executed at the same PC and, (3)
can escape this repetitious loop.

2640
2641

Hence, it can be possible to S0B a MOS cell
to death
(or
at
lesst
brain wash him), and to SOB a core into over-heating (or at least warm

2644
2645
2646
2647
ggzg

The SOB Routine will be loaded and called with RO set equal to the S08B
constant "SOBK”,
Rl
set
equal
to
the
complement of & “SOB RO,."
Instruction "100776".

2650

14:

2629
2630

ggzg

2651

2652
2653
2654
2655
2656

2664

2665

2666
2667

2668

SOB-A-LONG Test

eeeeceieeaaeeen

discomfort).

Simplified SOB Example:

S08

RO,14

;508 till RO underflows

CMP
BEQ
SOBFAIL
S0BMOV1
SOBMQvVe

R1,1$
24

;Read check not SO0B
;Skip 1 f OK
;Trap report error
;Code to get self moved
;Forward 1 word and run again

MOV

24:

R1,1¢$

;Write complement of S0B

SOBMOV3
S0BMOV4
..
SOBMOV.

2657
2658
2659

2660
2661
266§
266

Test 31

The value of the S0B constant can be found at symbolic location

“SOBK"”

This test

added

(typical 25 decimal).

via

the

"$DDW2-5".

is not

APT

in the normal script of execution but

E-TABLE,

Field Service Mode command

running this pattern.

2669
2670
2671
2672

2673
2674
sg;g
2677

the

normal

NOTE
This

may

reference symbolic locations "MKPAT",

test

not

except under APT
invoked VIA Field
(Kamikaze Mode).

normally

executed

or
ACT,
It may be
Service Command 13

"MJPAT",

method

CVMJAAQ MSV11-J MEMORY DIAG.

2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694
2695
2696

2697

2698
2699
2700
2701
2702
2703
2704
2705
2706
2707
2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2127
2728

MACRO V05.01b Friday 15-Feb-85 16:10

Page 66

SEQ 0065

6.2.2.21

Test 32

Write Recovery Test

This test causes a WRITE, READ, WRITE, READ, ...
to occur
in
memor¥
and
if
the
1st, 3rd, Sth, ...READ is bad the program may bomb or i
the 2nd, 4th, 6th, ...
READ is bad the program will
gracefully
type
out the error.
Write Recovery
Test
This test differs from other tests

in that

of a small test program actually running

it consists

in the benk under test.

The program is self modifying and may be difficult to debug.
To aid in
he_debgf. remember that the bank and margin are being

displayed. This will allow the user to at least see which memory
bank vailed.

The test consists of 1/2 of the bank stored with "MOV R2,-(PC)"
and the other 1/2 containing "177667". "177667" is the complement
of "JMP (RO)" instruction.
R2 contains “COM -(R1)" instruction
on entry to the bank and Rl contains the highest test address in
that bank.

If you understand this so far the rest is easy.
The test execution is as follows:
1. The "MOV R2,-(PC)" instruction executes storin
the contents of R2 in the address it vacated (
to -(PC).
2. Since R2 contains a "COM -(R1)” instruction it complements
the highest address under test. this address contained
“177667" so after the COM -(R1) it equals 110
cleverly this is the "JMP (R0O)” instruction.
3. This sequence continues until the "MOV R2,-(PC)"
instructions reach the middle of the test benk.
then the "JMP (RO)" instruction is met
and executed. RO contained the return address back
to test 13.
4. These steps are repeated for each bank under test.

NOTE
This

test

not

except
under
APT
invoked VIA
Field

(Kamikaze Mode).

normally

or
ACT,
Service

executed

It may be
Command
13

—

————

CVMJUAAQ MSV11-J MEMORY DIAG.

2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2748

2746
2747
2748
2749
2750
2751
2752
2753
2754
2755

2756
2757
2758

2759
2760
2761
2762

2763
2764
2765
2766
2767
2768
2769
2770
2111
2772
2773
2774
2775
2776
27177
2778

MACRC V0S5.01b Friday 15-Feb-85 16:10

Page 67

SEQ 0066

6.2.2.22

Test 33

Branch Gobble Test

This test loads a small routine
into
the
memory
under
test.
The
routine
moves itself along in memory one word after each pass so that
when it reaches the end every
instruction
has
executed
from
every

location

with

the

exception

the beginning and end of each test

area.

The Branch Gobble’'s general

format after you eliminate setup code

code to move the program aslong
BGTEST:
BRGOBB:

1$:

2%:

O
SEC
ADCB
BMI
INCB

This

and

; TEST WORD
BGTEST
14

;INC LOW BYTE
;END LOOP AFTER 128 TIMES

BGTEST+1

B8R

;INC HIGH BYTE

BRGOBB

BVS
ERROR
CLv

;LOOP 128 TIMES

;BRANCH IF V-BIT SET (SHOWLD BE)
;:ERROR TRAP
;CLEAR V-BIT

INCB

BGTEST

;INC HIGH BYTE ONE LAST TIME

8vC
BMI
ERROR

3¢
44

:BRANCH IF V-BIT CLEAR (SHOULD NOT B8E)
;BRANCH IF N-BI7 SET (SHOULD BE)
;ERROR TRAP

B8CS

44:

is as follows.

;BRANCH IF C-BIT SET (SHOULD NOT BE)

RETURN

code

ori

ionall¥

came

from

Exerciser
DZQKA-A.
he
first
section of that
diagnostic
and

the

PDP-11

Family

exerciser ever since.

NOTE
This

test

not

except
under
APT
invoked VIA
Field
(Kamikaze Mode).

Instruction

MOS memorys fell succeptable to this
it
has been
an
important
memory

normally

or
ACT.
Service

executed

It may o¢
Command
13

CVMUAAQ MSV11-J MEMORY DIAG.
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
2791
2792
2793
2794
2795
2796

2797
2798

2799
2800
2801
2802
2803
2804

MACRO Vv05.01b Friday 15-Feb-85 16:10

Page 68

SEQ 0067

6.2.2.23

Test 34

Soft Error Test

Rationalization

MOS chips have a failure mode

in which they can randomly pick or

drop

bits.
This is caused by Alpra particles bombarding the cell.
If the
cell is very
small (and they sre) then the electrons displaced by
the
Alpha
particle
are sufficient to cause the cell to change from a one
to a zero or from a zero to a one.

This test
create
a

is controlled by the main program so
that
it
is
used
to
Test
of
125252
and
52525
on alternate passes of the

This Test

is nothing more than a clever use of Test 0.

program.
The configuration table is used to flag banks that have
Test
invalidated
because
another
Test
was written over this
background.

the

CVMJUARO MSV11-J MEMORY DIAG.
2806
2807
2808
2809
2810
2811
ggig

2814
2815
2816
2817
2818
2819
2820
2821
2822

2823

2824
2825
2826
2827
2828

2829
2830
2831
2832
ggg}

MACRO V05.01b Fridey 15-Feb 85 16:10

6.2.2.24

Test 35

Page 69

SEQ 0068

Worst Case Parity Test

Force Write Wrong Parity
Under Test.

in each 1K word block of the

Read with Parity Trapping enabled,
occurrs,

Make sure error address bits are set correctly.

\Urite good perity without trapping,

occurrs when read.

making sure

and

make

NOTE

This test is run for parity memory which
is not controlled by the same CSR as the

program.

that

sure

Memory
a

trap

CVMJARO MSV11-J MEMORY DIAG.

MACRO V05.01b Fr iday 15-Feb-85 16:10

Page 70

SEQ 0069

2836

2837
2838
2839

2862

MWrite CSR with check bits to correct bit 0 of the first address
in 8 16k bank from a 0 to @ 1 with diag mode.

Urite AUT with data of O's.
Read AUT for correction of bit 0 froma 0 to a 1.

2845
2846
2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861

Test 36 Correction Code Test

6.2.2.25

Repeat 1 3 for all

2840
2841
2842
2843
2844

Repeat 1-4 for data of ones so that a correction will cccur

16 data bits.

from a 1 to a zero.

This test checks to see that the EDC chip can correct Single Bit

Errors for all 16k data bits from a 1 to a 0 and visa versa.
NOTE

This test

is only run for the MSV11-J

CVMUARO MSV11-J MEMORY DIAG.
2864
2865
2866
2867
2868
2869

2870
2871
2872
gg;z
2875
2876
2877
gg;g
2880
2881
2882
2883
2884

2885

2886
2887
2888

MACRO V05.01b Friday 15 Feb-85 16:10

6.2.2.26

Test 37

Page 71

SEQ 0070

Check ECC Disable Test

Urite CSR with ECC disable, Diag mode,
of 000010.

UWrite AUT with data of zero's.
memory.

Read AUT for data of zeros

and SBE check bits

This should write check bits to

insuring no correction was made.

NOTE
This test

is run on the MSV11-J only.

CYMJUAAO MSV11-J MEMORY DIAG.

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 72

SEQG 0071

2890
2891
2892

2893

2894
2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911

2912

2913
2914
2915
2916
2917

6.2.2.27

Test 41

Address to CSR on DBE Test

Write CSR with ECC disable,
check bits of 010011

Write AUT with data of zeros creating a DBE.

Read AUT to detect DBE and to clock address

Read CSR for correct address

Increment address by lk and repeat i-4 until 16k

This test

Diag mode,

and Double Bit error

into CSR

in bits 5-11.
is done.

insures that the correct address appears in CSR bits 5-11 on a DBE

NOTE
This test is run on a MSV11-J oniy.

2925
2926
2927
2928
2929
2930
2931

2932
2933
2934
2935
2936
2937
2938
2939

2940

ggdé

6.2.2.28

Test 42

SEQ 0072

Extended Address to CSR on Error Test

UWrite CSR with SBE check bits of 000010 with Diagnostic Mode.

Write low address
SBE.

2924

Page 73

Clear the CSR.

in a 16k bank with data of zeros creating a

Read address to detect SBE.

2919
2920
2921
2922
2923

MACRO V05.01b Friday 15-Feb-85 16:10

Read CSR for correct address and the SBE

CVMJUAARO MSV11-J MEMORY DIAG.

Read CSR for correct address bits

Repeat 1-7 with a test address that

indicator bit #4.

Enable CSR bit 14 to check the Extended address bits.

is the highest

in a 16k bank.

2943
2944

This test checks to see that the correct address bits apppear in the CSR.
This is also repeated for the Extended Address function in the CSR.

2945
2946

2947

2948

2949
2950
2951
2952
2953

NOTE
This test

is only run

for the MSV11 J

CVMJUARO MSV11-J MEMORY DIAG.
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965

5329

2968
2969
2970
2971
2972
2973
2974
2975

2976

2977
2978
2979

2980

2981

2982

2983
2984

2985
2986

2987
2988
2989
2990

2991
2992

2993

2994

MACRO V05.01b Friday 15-Feb-85 16:10

6.2.2.29

Test 43

Page 74

SEQ 0073

MUrite Byte Test

Urite CSR to Diag mode with check bits of 001100.
correspond to data of zeros.

effectively creates a SBE in byte 0.

Clear the CSR

Write byte 1 of the AUT with data of all ones.

Read CSR to check for SBE

Write the CSR to D'ag mode.

Read the AUT to check

Read the CSR to check for correct check bits corresonding to the data
read in (7).
These check bits are 000110.

Repeat (1)-(8) this time creating an error

Write first AUT with data of one

and all zeros

in bit zero.

These

The write

indication.

for the correct data

in low byte.

byte 0 in (4).

all ones

in high byte

in byte 1 (2) and writing

This test checks to see that a SBE will be corrected during the read portion of the
byte write and that correct checkbits will be generated on the write.

NOTE

This test

is only

run

for the MSV1i1-J

CVMJUARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 75

SEQ 0074

2996

3008

Test 44

Shifting Checkbits through the CSR Test

UWrite CSR to Diag Mode to Enable Checkbit register.

MWrite CSR with check bits of 000001, ECC disable and Diag mode

Urite memory with data of zeros.

Complement check bits pattern and write CSR as in (2).

into memory.

Read memory to read check bits written

for complement check bit pattern.

Read CSR for corret check bits written

Read CSR

This should write the check bits

Shift check bit pattern and repeat (1-7) till CSR bits S5-10 are done.

3021

3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020

6.2.2.30

2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007

Complement check bit pattern

3023
3024

10.

3022

3025
3026
3027

3028

3029

3030
3031

through a field of ones.

3033

3035
3036
3037
3038
3039

in (2).

into CSR.

in (2) and repeat (1 8) shifting a zero

Repeat 1-9 for every 100 octal locations in 16k

This test checks the ability to read check bits from the CSR to memory and back.
The test is done twice. Once shifting s field of a one through a field of zeros

and a zero through a field of ones.

and Check bit RAM's.,

This tests the Checkbit/Syndrome bit register

This test is done for every 100 octal locations in 16K.

3032
3034

in (2)

NOTE

1nis test

]

is only run for the MSVil-J

3064
3865
66
3067

3068

3069
3070
3071

Write CSR with DBE check bits of 110011 with Diag mode.
Write memory with data of zeros creating a DBE.

Clear CSR.

Write CSR with Diag mode to enable Check/Syndrome bit Register.

Read memory to detect DBE.
Read CSR for Uncorrectable error

3074

307S
3076

indicator.

Write CSR to Diag mode to read Syndrome bits
Read CSR for correct Syndrome bits of 111111.

Repeat (1-8) with Muliple Bit Error check bits of 111100 and
corresponding Syndrome Bits of 110000.

This test checks the

ability of the CSR to detect

a DBE

Syndrome bits ¢ nerated by the EDC chip.
This test
bits corresponding to a Multiple Bit error.

3072
3073

Syndrome Bits to the CSR on a DBE Test

Test 45

3048

3049
3050
3051
3052
3053
3054
3035
3056
3057
3058
3059
3060
3061
3062
3063

6.2.2.31

SEQ 0075

3046
3047

Page 76

3041
3042
3043
3044
3045

MACRO V05.01b Fridey 15 Feb 85 16:10

CVMJUARQ MSV11-J MEMORY DIAG.

test

is only

run

for

and read for the proper

is then repeated with check

NOTE
This

into CSR.

the MSV1ii-J

CVMJUAAO MSV11-J MEMORY DIAG.

MACRO Vv05.01b Fridey 15-Feb-85 16:10

Page 77

SEQ 0076

3078

3079
3080
1081
3082
gggi

6.2.2.32

Test 46

Check Single Bit Errors with ECC Disabled Test

3085

UWrite CSR with check bits to correct bit 0 of the first address

gggg

UWrite AUT with data of O's thus creating s SBE.

gggg

MWrite the CSR to ECC disable.

ggg%

4.,

Read AUT to detect SBE.

gggg

Check to see that no trap occured.

3839

Read CSR to see that uncorrectable error (CSR15)

gggg

Repeat 1-6 for all 16 data bits.

3100

Repeat 1-7 for data of ones so that a correction will occur

3103

Repeat 1-8 except

gggg

gigé

gigg
3106

3107

3%88

in 8 16k bank

from a 0 to a 1 with diag mode and ECC disabled.

from a 1 to a zero.

3112
3113

3114

in stegs (3) the CSR is written to ECC Disable

and BUS PBL enable and (5) we check for traps.

This test checks to see

that SBE

with

is done for all 16 possible SBE conditions.

Disable.

are treated a uncorrectable errors with ECC

The test is repeated 2 times, once with traps disabled and again

it enabled.

this

3110

3111

is set.

This test

NOTE

is only

run

for

the MSVi11i-J

CVMUARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb 85 16:10

Page 78

SEQ 0077

3116
3117
3118
3119

3143

3144
3145

Write the CSR with DBE check bits of 110011 and Diag mode.

Write memory with data of zeros creating a DBE.

Write CSR with SBE check bits of 000010 and Diag mode.

Write memory 4k above address

Clear CSR.

MWrite the CSR to Diag mode to enable Checkbit/Syndrome bit Register.

Read memory with address

NO CSR Update On SBE with exsisting DBE test

Read CSR for correct address and Uncorrectable error

Test 47

Read memory with address

3141
3142

6.2.2.33

[

3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140

Read CSR for SBE
in (8)

3147

3149

in (3) to detect DBE.

This test

ndicator

in (5) to detect SBE.

indicator and no change

This test checks to see that no update will occur
memory when a DBE already exists.

3146

3148

in (3) creating a SBE.

in DBE status

in CSR

in the CSR with a SBE

NOTE

is only run for the MSV11-J

CVMJARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

3151
3152
3153
3154
3155
3156
gig;

6.2.2.34

gigg

This

3161
3162
3163

specify a test to be run.

is an

Page 79

SEQ 0078

Test 999 Null Test
instant return added to preserve the software structure.

This test replaces any real tests when the APT E-Table does

not

CVMUAAQ MSV11-J MEMORY DIAG.
3165

MACRO V05.01b Fridey

15 Feb 85

16:10

Page

SEQ 0079

3166
3167
3168

7.0

PROGRAM FEATURES

7.1

Fast Data Access Rates

3170

One of the
main
areas
of
concern
in
testing
memorv
in
systems
environments
is speed.
One of the prime reasons that system programs
like
RSTS,IARS
and
MUMPS
can
crash
due
to
memory
Failures not
detectable
by
memory diagnostics (0-124K,0-2 MEG,etc.) is because of
multiple NPR devices contending for the bus.
After some delay
a
NPR
device
becomes bus master and does several memory transfers at memory

3169

3171
3172
3173
3174
3175
3176
3177
3178
3179
3180
3181
3182
3183
3104
3185
3186
3187
3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
3198
3199
3200
3201
3202
3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216

3217
3218

data rates.

On the
other
hand
most
diagnostics
when
writing
reading
and/or
checking
patterns
spend most of their time fetching inrstructions and
operands out of their program space
and proportionally
little
time
accessing the memory under test.
This diagnostic’'s error detecting abilities have been optimized around

the primary design criteria of speed.

have been taken.

7.1.1

To this end the following steps

Fast City

Utilization of Memory Management Registers

Non

Memory

restrictions the UIPDR's,

and SDPDR's.

Bus,

Non

QBUS,
Bipolar
Memory.
Since User Mode is only used for relocation
and Data Space is never used, then subroutines can
be
executed
from
the
UIPAR's,
UDPAR's,
KDPAR's,
SDPAR's
and with some Bit Pattern
UDPDR’s,

KDPDR's,

The
program
runs
in
Kernel
mode
and
Patterns
are
executed
in
Supervisor
mode for mapping purposes.
All core patterns and some MOS

Patterns are
subroutines
that
are
moved
referred to in the program as Fast City.

this

NOTE

18-Bit PDP-11's cannot execute from

the

PAR's
because
their
PAR's are only 12
bits wide;
they also have no Supervisor
Mode.
Therefore,
all
patterns
aeare

executed
in
memor;.
using
(reference Section
7.5).

7.1.2

S0B's

User

Mode

Bipolsr

region

CVMJUARO MSV11-J MEMORY DIAG.
3220

3222
3222
3223
3224
3225
3226
3227
3228
3229
3230
3231
3232
3233
3234
3235
3236
3237
3238
3239
3240
3241
3242
3243
3244
3245
3246
3247
3248
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 81

SEQ 0080
Utilizetion of the
full
PDP-11
algorithms (principally the S0B).

7.1.3

Instruction

Set

speed

pattern

CACHE

CACHE is used between pattern tests to decrease
program
pass
tines.
CACHE can be defeated by the operator (reference section 2.4.3.1).

7.2

Bank Zero Testing

Bank Zero has been traditionally neglected by memory
the following reason.
The vector space exists there

and

ALL

traps

must

diagnostics
not

access

for
test

pattern
data.
If the area is tested the diagnostic must not use ary
traps, and it is against the rules for power to fail.
Systems with Memory Management can overcome this becasuse all traps are
to Kernel Virtual space even if the power should fail (caution must be
observed because power up goes to physical
address
24
(because
the

Memory Management Unit comes up off)‘.

However, Catch 22 is that the qia?nostic is not APT compatible
mode because APT Accesses Physical
Memory Locations.

in this

The POP-11/83 can over come this because the QBUS Map can fool APT.

Because of the previous arguments this program does
not
relocate
in
the
true
since
of
the word (i.e.
no position independent code was
written (at least not on purpose)), but rather this program moves
and
remaps

(hereafter

referred

relocates).

This

enables

the

complete testing of Bank Zero or any other pro?ram space or privileged
space exactly as all other banks are tested.
The conditional test to
see if a bank is protected is complemented when relocated).
NOTE
The progrem will relocate
only
in
the
first
pess
under APT;
after this, the
program wWill remain fixed in Banks 0 and

7.3

Memory Configuration Map

CVMJAARO MSV11-J MEMORY DIAG.
3275

3276

MACRO V05.01b Fridey 15 Feb 85 16:10
This map

printed out

Page 82

immediately

is set (reference section 2.4.1).

SEQ 0081

after

sizing

the

memory

unless

SWé

It can also be printed at any later

gg;g

time

3279
3280
3281

Example:

gggz

ERRORS

3285
3286
3287
3288
3289
3290
3291
3292
3293
3294
3295
3296
3297
3298

MEMTYPE EEEEEEEPPPPPPPPPPPPPPPPPPPPPPPPEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
CSR
000000001111111122222222222222224444444444444444444444444444
PROTECT PP
I
I
P
I
1
1
1
1
1
1
1
0
1
2
3
4
S
)
456701234567012345670123456701234567012345670123456701234567
ERRORS
MEMTYPE EEEE
CSR
4444
PROTECT

3282

3299
3300
3301

3302
3303
3304

in Field Service Mode (reference section 2.4.4.8.7)

3313
3314
3318

3316
gglg
1

3319
3320

.
D’ splayed are Banks 0 77 Octal (1 meg words).
If
the
Fat
Terminal
Switch
was set (reference section 2.4.1) then all Banks (0-177) would
be shown.
If this was an 18-Bit PDP-11 (eg - 11/23), only Banks 0-7
would be printed.
The fields:

ERRORS:

10 11, nence they are marked as bad with X's.

The si7 'ng routine could not write zeros and ones

gggg

3311
3312

O12345672%23456701234567012345670123456701234567012345670123

3305

3308
3309
3310

MEMORY CONFIGURATION MAP
161K BANKS

Banks

ERRORS:

MEMTYPE:
Banks 0-7 are Memory
Type F (MSV11-J), and Banks
10-37
are
Memory
Tgpe
P
(MSV11-L/P)
eand Banks 40-77 are memory type
E(MSV11-J).
Banks 100-167 do not exist.

CSR:

CVMUARO MSV11-J MEMORY DIAG.

MACRO Vv05.01b Fridey 15-Feb 85 16:10

3322

3323
3324
3329
3326
3327
3328
3329
3330
3331
3332
gggi
3335
3336
3337
3338
3339

PROTECT:
Banks 0 and 1 are protected because they are program
space.
Bank
O
and 1 can also be protected because they are in the
bottom 16K of an MSV11-L/P CSR.
The protection is hierarchical
and
proYram
space
overshadows MSV11-L/P protection.
Banks 0
and 1 will not be tested until the
program
relocates.

7.4

3342

SUPER-MAC

3345
3346
3347

SEQ 0082

Banks 0-7 are assiYned to CSR 172100, 10-17 to CSR
172102,
and 20-37 to interleaved CSR's 172104 and 172106 and banks
40-77 are assigned CSR 17210.

gg:?

gg:z

Page 83

Everything You've Always Wanted To Know About SUPERMAC

is &

set

structured

programming

macros

...

that

allows

programs to be written in a high level, easily understood language.

As a general
rule,
most
SUPER-MAC
statements
can
be
single-line
statements or multiple-line (nested) block statements.
A single-line
statement must be completed on one source line;

no continuation lines

3348
3349
3350

are allowed.
Single-line statements should be as short and simple as
possible.
Comments may also be included on a source line.
All
the
eneral
rules,
conditions,
etc.,
that govern MACRO 11 also govern

3ad¢

should

3354

different than A + B.

3351

3353

3355
3356

UPER-MAC.

for

All

Spacing on & source lne

is very

be separated by a comma or a space.

spacing.

For

the conditional

example:

The

important.

elements

Tabs should never be used

expression

statements can be written

The

A+8

interpreted

as multiple-line

nested

3357
3358

blocks.
Each level of nestung within a block must be terminated with
an associated END statement.
ach level of nesting should be indented

3360
3361

.
User written macros or assembly language

3359
3362
3363

3364
3365
3366

two spaces.

.
.
instructions may be

included

in
a
program if desired.
As a debugging aid, if the symbol LST$$ s
defined, it will ceuse generated code and labels to
be
listed.
All

progrnms must begin with the macro call SMACIT.
This call initislizes
SUPER-MAC.
All
legal PDP 11 source and destination operands are legal
in SUPER-MAC.

3417
3418
3419
3420
3421

Sample Source File .ENABL ABS
.ENABL AMA
.MCALL .SUPER
.SUPER

.PAGE

O+

CITMoO

LET RO := A
LET B :
LET E :
LET G :
J :
LET
LET A :B= B

;LET EXAMPLES

; IF EXAMPLES

IF A IS TRUE
MOV
23,0
END ;OF IF A
IF B IS FALSE

34,E
MOV
END ;OF IF B
IF A EQ g THEN LET C

IF A LT

:= D

MOV
c.D
ELSE
MOV
E,D
END ;OF IF A
IF A EQ B AND C NE D
F
MOV
G
END ;OF IF
IF A EQ B 0
CNED
MOV
F. G
END ;OF IF
NC CEQ
1
IFB A EQ B
MOV
J
H,
ELSE
MOV
E J
END ;OF I f B A
IFB A EQ B ANDB C EQ
1
V>

3398
3399
3400
3401
3402
3403
3404
3405
3406
3407
3408
3409
3410
3411
3412
3413
3414
3415
3416

7.4.1

3395
3396
3397

SEQ 0083

COHn

3392
3393
3394

Page 84

OCOOO0OO0OOOOO0O0

3368
3369
3370
3371
3372
3373
3374
3375
3376
3377
3378
3379
3380
3381
3382
3383
3384
3385
3386
3387
3388
3389
3390
3391

MACRO V05.01b Friday 15-Feb-85 16:10

CHHIOMMOOMOD

CVMJUARQ MSV11-J MEMORY DIAG.

MOV

H J

MOV

E, J

ELSE

CVMJUARQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb 85 16:10

Page 85
SEQ 0084

3423
3424
3425
3426
3427
3428
3429
3430
3431
3432
3433
3434
3435
3436

3437
3438
3439
3440
3441
3442
3443
3444
3445
3446
3447
3448
3449
3450
3451
3452
3453
3454
3455
3456
3457
3458
3459

3460
3461
3462

3463
3464

3465
3466
3467
3468
3469
3470
3471
3472
3473
3474
3475

END ;0OF IFB A
IF RESULT 1S EQ
MOV
A,B
END ;0F IF RESULT
IF
BITS SET.IN A
Mov _ 8,C
END ;OF IF
BITS
BITS OFF.IN A
IF
Mov
C,D
END ;OF IF
BITS

;:ON.ERROR IS LIKE AN IF STATEMENT ON THE C-BIT
;ON.ERROR EXAMPLES
ON.ERROR
MOV

A.,B

MOov
ELSE

C.8

ELSE
Mov
C,B
END ;OF ON.ERROR
ON.NOERROR

MOV

A,B

END ;OF ON.NOERROR
ON.ERROR THEN LET A

:FOR EXAMPLES
FORI

-570

:B= B

A
INC
END ;0F FOR I
FOR RO :=
0 TO
140 BY
4
DEC _ A(RO)
END ;OF FOR RO
FOR I :=
133 DOWNTO
3 BY
ADD
A,B
END ;0OF FOR I

;BEGIN EXAMPLES

BEGIN ALPHA

FOR RO :=
0 TO
167
MOvB
A(RO).B
IF 8 LT
O THEN LEAVE ALPHA
END ;OF FOR RO
FOR RO :=
400 TO
567

IF B GE
O THEN LEAVE ALPHA
END ;0F FOR RO
END ALPHA

; $RETURN EXAMPLES

$RETURN
$RETURN ERROR
$RETURN NOERROR

: CASE EXAMPLES
MOV

CAEE RO

A.RO

MACRO V05.01b Friday

3477
3478
3479
3481
3482
3483
3484
3485
3486
3487

3480

;0F CASE RO

.END
7.4.2
.MAIN.

Semple Listing File (with No Expanded Macros)
MACRO M1111
01 APR-79 16:41
PAGE 2

000000

000016
000020
000022

;LST$4=0

000040
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

MACRO M1111

O01-APR-79 16:41

000136
000154
000164
000172

BIT5=40

PAGE 3

;LET EXAMPLES

000024
000030
000044
000056
000072
000100
000106
000114
000122
000122
000130
000136

.ENABL ABS
.ENABL AMA
.MCALL .SUPER
.SUPER

000000
000000
000002
000004
000006
000010
000012
000014

OO0O0O0OO0OOOOO0O

3497
3498
3499
3500
3501
3502
3503
3504
3505
3506
3507
3508
3509
3510
3511
3512
3513
3514
3315
3516
3517
3518
3519
3520
3521
3522
3523
3524
3525
3526
3527
3528
3529

Pege 86

CHIOMMOO®O>®

3489
3490
3491
3492
3493
3494
3495
3496

END

OO ~IOUNTH
WM -

3488

15-Feb-85 16:10

SEQ 0085
mooo

CVMJUARO MSV11-J MEMORY DIAG.

012737

000023

000006

012737

000034

000010

013737

000004

000006

LET RO := A
LET B :=C + D
LET E :=F +
1
LET G :=H +
2
LET J :=J +
01
LET A :B= 8B
;IF EXAMPLES
IF A IS TRUE
MOV
23,0
END ;OF IF A
IF B IS FALSE
MoV
34,E
END ;OF IF B

IF A EQ B THEN LET C := D
IF
ALT B
Mov
C,D

ELSE

CVMJAAO MSV11-J MEMORY DIAG.
3531
3532
3533
3534

3535
3536
3537
3538
3539

3540
3541
3542
3543
3544
3545
3546
3547
3548
3549
3550
3551
3552
3553
3554
3355
3556
3557
3558
3559
3560
3561
3562
3563
3564
3565
3566
3567
3568
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583

MACRO VO5.01b Friday 15-Feb-85 16:10

Page 87

SEQ 0086
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

000174
000202
000202
000222
000230
000230
000250
000256
000256
000276
000304
000306
000314
000314
000334
000342
000344
000352
000352
000354
000362
000362
000372
000400
000400
000410
000416

71
72
73
74

000440
000446
000450
000456

000416
000420
000426
000430
69 000436
70 000436

.MAIN.

000010

000006

013737

000012

000014

013737

000012

000014

013737

000016

000022

0i3737

000010

000022

013737

000016

000022

013737

000010

000022

013737

000000

000002

013737

000002

000004

013737

000004

000006

000500
000514
000516
000522
000534

MOV
END ;OF
IF A EQ
MOV

E,D
IF
A

B AND C NE D
F,G
A
END ;OF IF
IF
AEQBORCNED
MOV
F,G
END ;OF IF A
IFB A EQ B AND C EQ
1
MOV
H,J
ELSE
MOV
E.J
END ;0F IFB A
IFB A EQ B ANDB C EQ
1
MOV
H,J
ELSE
MOV
_E,J
END ;OF IFB A
IF RESULT IS EQ
MOV
A,B
END ;OF IF RESULT
IF
BITS SET.IN A
MOV
B,C
END ;0F IF
BITS
BITS OFF.IN A
IF
MoV
C,D
END ;OF IF
BITS

;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-BIT
;ON.ERROR EXAMPLES
013737

000000

000002

013737

000004

000002

013737

000004

000002

013737

000000

000002

MACRO M1111

75 000456
76
77 000466
78 000474

79
80
81
82
83

013737

O01-APR-79 16:41

ON.ERROR
MOV
A.B
ELSE
MOV
C,B
END ;OF ON.ERROR
ON.NOERRGR
MOV
C,B
ELSE
MOV
A,B
END ;O0F ON.NGERROR

PAGE 3-1

ON.ERROR THEN LET A

005237

000000

005360

000000

:FOR EXAMPLES
FOR I

-5T0

0 7O

140 8Y

A
INC
END :0F FOR I

FOR RO

:B= B

DEC
A(RO)
END ;0F FOR RO
133 DOWNTO
FOR I :=

3 BY

Page 88

000000

000002

ADD

END

BEGIN ALPHA

116037

000000

FOR RO
MOvB

000002

000000
000002
000004
000006
000010
000012
000014
000016
000020
000022

0 T0

167

A(RO),B
O THEN LEAVE ALPHA

IF B LT
END ;0F FOR RO
FOR RO :=
400 TO

567

IF B GE
O THEN LEAVE ALPHA
END ;0F FOR RO
END ALPHA

s $SRETURN EXAMPLES

$RETURN
$RETURN ERROR
$RETURN NOERROR

013700

000000

; CASE EXAMPLES
MOV

CASE RO

END

000001
01-APR-79 16:10

000000
000040
000000
000000

000000
000000
000000
000000
000000

000000
000000
000000

MACRO M1111

O1-APR-79 16:10

A,RO

MMONOME>

000000
000002
000004
000006
000010
000012

;OF CASE RO

.END
PAGE 2

000000
000000

A,B

;OF FOR I

;BEGIN EXAMPLES

MACRO M1111

.MAIN.

063737

Semple Listing File (with Expanded Macros)

7.4.3

3595
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619
3620
3621
3622
3623
3624
3625
3626
3627
3628
3629
3630
3631
3632
3633
3634
3635
3636

000542
000550

000566
000566
000570
000576
000604
92 000614
93 000620
94 000626
95 000636
96
97 000636
98 000640
99 000644
100
101 000650
102 000654
103 000664
104 000666
105 000670
106 000672
107 000674
108 000676
109 000700
110
111

ot s

3594

84
85
86
87
88
89
90
91

s et (et

3591
3592
3593

16:10

SEQ 0087

OB WNFOOVO~INUIE
NI

1585
3586
3587
3588
3589
3590

MACRO V05.01b Friday 15-Feb-85

CVMJAAQ MSV11-J MEMORY DIAG.

A:
B:
C:
D:
E:

G:
H:
I:
J:

PAGE 3

.ENABL ABS
.ENABL AMA
.MCALL .SUPER
.SUPER
LST$$=0
B8ITS=40
0
0
0
0
0

0
0
0
]

3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
3665
3666
3667
3668
3669
3670
3671
3672
3673
3674
3675
3676
3677
3678
3679
3680
3681
3682
36487
k{4

360,
3686
3687
3088

15-Feb-85

I<7

16:10

Page 89

SEQ 0088

25
26 000106
000106
000112
27 000114
28 000122
000122
29 000122
000122
000126
30 000130
31 000136
000136
32 000136
000136
000144
000146
000154
33 000154
000154
000162
34 000164
35 000172
000172
000174
36 000174
37 000202
000202
38 000202
000202
000210
000212
000220
39 000222
40 000230

;LET EXAMPLES

LET RO

013737
063737

000004
000006

000002
000002

013737
005237

000012
000010

000010

013737
062737

000016
000002

000014
000014

062737

000001

000022

113737

000002

000000

005737
001403
012737

000000

LET B
RDD
LET
MOV
INC
LET
MOV
ADD
LET
ADD
LET

IF A IS TRUE
ST A
BEQ LO
MOV
23,0

000006

000010
Ll:

023737
001003
013737
023737
002004
013737

000000

000002

000006

000004

000000

000002

000004

000006

000010

000006

000403
013737

001007
023737
001403
013737

000000

000002

000004

000006

000012

000014

END

;OF IF

IF B IS FALSE
1ST B
BNE L1
34,E
MOV
END ;OF IF B
IF A EQ B THEN LET C

CMP A,B

Le:

L3:
L4:

023737

; IF EXAMPLES

000002

000034

MOVB B .A

LO:

005737
001003
012737

:=C + D

MOV C.B

000000

000023

MOV A,RO

013700

ITOMMMO

18
19 000024
000024
20 000030
000030
000036
21 000044
000044
000052
22 000056
000056
000064
23 000072
000072
24 000100
000100

3638
3639
3640
3641
3642
3643
3644
3645
3646
3647
3648
3649
3650
3651
3652
3653
3654

MACRO V05.01b Friday

CVMJUARO MSV11-J MEMORY DIAG.

BNE L2
MOV D.C

IF ALY B
CMP A,B
BGE L3
MoV
c.D
ELSE
BR L4
MOV
€,D
END ;OF IF A

IF A EQ B AND C NE O

CMP
BNE
CMP
BEQ

A,B
LS
C,D
LS

F.G
MOV
END ;OF IF A

CVMJARO MSV11-J MEMORY DIAG.
3690
3691
3692
3693
3694
3695

3696
3697
3698
3699
3700
3701
3702
3703
3704
3705
3706
3707

3708
3709
3710
3711
3712

3Nnsg
3714
3715
3716
3Ny
3718
3719
3720
3721
3722
3723
3724
3725

3726
3727
3728

3729
3730
3731
3732
3733
3734
3735
3736
3737
3738
3739
3740
3741
3742

MACRO V05.01b Friday

15-Feb-85

L7/

16:10

Page 90

SEQ 0089
000230

41 000230

000230
000236
000240
000246

.MAIN.

LS:
023737
001404
023737
001403

MACRO M1111

000250

42 000250

43 000256
000256
44 000256
000256
000264

000266
000274

45 000276
46 000304

000304
000306
47 000306
ag 000314
000314
49 000314
000314
000322
000324
000332
50 000334
51 000342
000342
000344
32 000344
53 000352
000352
54 000352
000352
55 000354
56 000362
000362
57 000362
000362
000370
58 000372
59 000400
000400
60 000400
000400

000000

000002

000004

000006

O1-APR 79 16:10

013737

000012

000014

000010

000002

000004

000001

000016

000022

000010

000022

0004u.

013737

L6:

L10:
L1l:

123737
001010
123727
001004
013737

000000

000002

000004

000001

000016

000022

000010

000022

000403

013737

Lie:

L13:
001003
013737

000000

000002
L14:

032737
001403
013737

000040

000000

000002

000004

L15:
032737

000040

000000

AEQ B ORCNED
A.B
L6
C,D
L7

PAGE 3-1

L?:

123737
001010
023727
001004
013737

IF
CMP
BEQ
CHP
BEQ

MOV

END

F,G

;OF IF A

IFB A EG B AND C EQ
CMPB A,B
BNE L10
cMP C, 1
BNE L10
MOV

H,J

MOV

E.J

ELSE
BR L11
END

;OF IFB A

IFB A EQ B ANDB C EQ
CMPB A,B
BNE L12
CMPB C, 1
BNE L12
MOV
H,J
ELSE
BR L13
MOV
E,J
END ;OF IFB A

IF RESULT IS EQ
BNE L14

MOV
A,B
END ;OF IF RESULT

IF
BITS SET.IN A
BITS,A
8IT
BEQ L15
MoV
B.C
END ;OF IF
BITS
IF

BIT

BITS OFF.IN A

BITS,A

CVMJUAAQ MSV11-JU MEMORY DIAG.
3744
3745
3746
3747
3748
3749
3750
3751
3752
3753
3754
3755
3756
3757
3758
3759
3760
3761
3762
3763
3764
3765
3766
3767
3768
3769
3770
3771
3772
3773
3774
3775
3776
3777
3778
3779
3780
3781
3782
3783
3784
3785
3786
3787
3788
3789
3790
3791
3792
3793
3794
3795

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 91

SEQ 0090
61 000410

62 000416
000416
63
64
65 000416
000416
66 000420
67 000426
000426
000430
68 000430

013737

000004

Llo:

103004
013737

000000

000002

000403
013737

L17:
000004

000002

O1-APR-79 16:10

103404
013737

000004

000002

000000

000002

000403
013737

000456

75 000456

000456
000460
000466

77 000466
000466
000474
78 000474
79 000500
000500
000504
000512
000514
80 000514
000514
000516
81 000516
82 000522
000522
000526

;OF IF

BITS

;ON.ERROR EXAMPLES
ON.ERROR
8cc L17

L20:

MACRO M1111

000436
71 000440
72 000446
000446
000450
73 000450
74 000456

END

C,D

;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-B17

69 000436
000436
70 000436

.MAIN.

Mov

000006

000002

000000

A,B

Mov

C,B

END

;OF ON.ERROR

ON.NOERROR

PAGE 3-2

BCS L21

L2l:

Le2:

103003
113737

MOV
ELSE
BR L20

L23:

MOV
ELSE
BR L22

MOV
A,B
END ;OF ON.NOERROR

ON.ERROR THEN LET A
BCC L23

177773

005237

000000

005237
023727
003770

000020
000020

000020

FOR I

BO:

000023
EQ:

005000
005360

000000

062700
020027

00000
000140

Bl:

MOVB B,A

;FOR EXAMPLES

012737

C.,B

MOV

:-=

-5.I

-5 70

A
INC
END ;OF FOR I

INC I
CMP I, 23
BLE B8O
FOR RO

CLR RO

0 T0

DEC _ A(RO)
END ;QF FOR RO

ADD
4,R0O
CMP RO, 140

140 BY

CVMJUARO MSV11-J MEMORY DIAG.

3797
3798
3799
3800
3801
3802

3803
3804
3805
3806
3807
3808
3807
3810
3811
3812
3013
3814
3815
3816
3817
3818
3819
3820
3821
3822
3823
3824
3825
3826
3827
3828
3829
3830
3831
3832
3833
3834
3835
3836
3837
3838
3839
3840
384)
3842
3843
3844
3845
3846
3847
3848
3849

MACRO V05.01b Fridey

15-Feb-85 16:10

Page 92

SEQ 0091

000532
000534
83 000534
000534
000542
84 000542
85 000550
000550
000556
000564
000566
86
87 000566
000566
88 000566
000566
000570
89 000570
90 000576
000576
000602
91 000604
000604
000606
000612
000614
92 000614
000614

.MAIN.

003771

El:

012737

000133

000020

063737

000000

000002

162737
023727
002366

000002
000020

000020
000003

FOR I

MoV

133,1

133 DOWNTO

3 BY

ADD
A,B
END ;OF FOR I
suB
2,1
cMP 1,3
BGE B2

;BEGIN EXAMPLES

116037

000000

005737
002415

000002

005200
020027
003766

000167

012700

000400

000002

O1- APR-79 16:10

B4:

005200
020027
003771

0 TO

167

Move
A(RO),8
IF B LT
O THEN LEAVE ALPHA
ST B
BLT E3
END ;0f FOR RO
INC RO
CMP RO, 167
BLE B4
FOR RO

400,R0O

400 T0

567

PAGE 3-3

000002

000567

CLR RO

MOV

BS:

005737
002004

BEGIN ALPHA
FOR RO

005000

000620

000626
000630
000634
000636
95 000636
000636
96
97 000636
000636
98 000640
000640
000642
99 000644
000644
000646

£2

MACRO M1111

93 000620
000620
000624
94 000626

BLE Bl

£s
E3:

IF B GE
15T 8

O THEN LEAVE ALPHA

BGE E3
END ;0F FOR RO
INC RO
CMP RO, S67
BLE B5
END ALPHA

: SRETURN EXAMPLES
$RETURN

000207

RTS PC

000261
000207

RTS PC

000241
000207

RTS PC

$RETURN ERROR
SEC

$RETURN NOERROR
CLC

CVMJUAAQ MSV11-J MEMORY DIAG.

MACRO v05.01b Friday 15 Feb-85 16:10

100
101 000650
102 000654
000654
000656
000660
103 000664
104 000666
105 000670
106 000672
107 000674
108 000676
109 000700
000700
000700
000702
000704
110
111

3851
3852
3833
3854
3855
3836
3837
3838
3859
3860
3861
3862
3863
3864
3865
3866
3867

3868

3869
7.5

010046
006316
004737
000000
000002

000700

; CASE EXAMPLES

MOV
A.RQ
CASE RO
MOV RO, -(SP)
ASL 8SP
JSR PC,L24
A
8
C
D
€
F
END ;0F CASE RO

000004

000006
000010
000012
L24:

062616
013646
004736

ADD (SP).,aSP
MOV Q(SP)+,-(SP)
JSR PC,a(5P)-

000001

.END

Memory Management Mapping
Memory Management Mapping For

The

11/83

SUPERVISOR

KERNEL

USER

Program

Test Ares
Test Area
Test Area
Test Area
Perif Page

Program
Program
Program
Map to CSR's
Perif Page

Ost Bk/Fst
Src Bk /Fst
Src Bk/Fst
Src Bk/Fst
Dst Bk/Fst
Dst Bk/Fst
Dst Bk/Fst
Dst Bk /Fst

PAR
WO

7.5.1

000000

SEQ 0092

7.5.2

Program
Program

Memory Management Mapping For QBUS-11's With Supervisor Mode

PAR

SUPERVISOR

KERNEL

USER

Program
Program
Program

Test Area
Test Area

Program
Program

Perif Page

Dst Bk
Src Bk
Src Bk
Src Bk
Dst Bk
Dst 8k
Dst Bk
Dst Bk

Test Area

Program

Map to CSR's

Mem
Mem
Mem
Mem
Mem
Mem
Mem
Mem

(eg 11/23B)

~NoOOUM
A WO

3870
3871
3872
3873
3874
3875
3876
3877
3878
3879
3880
3881
3882
3883
3884
3889
3886
3887
3888
3889
3890
3891
3892
3893
3894
3895
3896
3897
3898
3899
3900

013700

Page ¥3

3902
3903
3904
3905
3906
3907
3908
3909
3910
3911
3912
3913
3914
3916

MACRO Vv05.01b fFriday 15-Feb-85 16:10

7.5.3

Page 94

SEQ 0093

Memory Menagement Mapping For QBUS-11's W/o Supervisor Mode

PAR
NONAWNNFO

CVMJAARQ MSV11-J MEMORY DIAG.

USER
Program
Program
Program
Program
Program
Program
Mep to CSR's
Perif Page

Progrem/Dst Bk
Program/Src Bk
Program/Src Bk
Test Area/Src Bk
Test Area/Dst Bk

Test Area/Dst Bk
Test Area/Dst Bk
Perif Page/Dst Bk

(eg 11/27)

CVMUARO MSV11-J MEMORY DIAG.

15 Feb-85 16:10

Page

SEQ 0094

.LIST
T70C
.ENABL
ABS
AMA
.ENABL
.DSABL
GBL

3918

3919 000000
3920
3921
3922
3923
3924
3925
3926
3927
3928
3929
3930
3931
31932
3933
3934
3935
3936
3937
3938
3939 000000

MACRO V05.01b Friday

;NOTE:
CVMJAO.SML IS THE SUPER.MAC SOURCE AND IS RELEASED WITH
; THIS PROGRAM.
ALL THESE .MCALL STATEMENTS REFERENCE THAT FILE.

000000
163000
000001

.MCALL
.MCALL
.MCALL
.MCALL
.MCALL
.MCALL
.MCALL
.MCALL

SMACIT,..PUSH,..POP,..TAG,..BRAN,
.EMIT, .EMITN, .EMITL,.EMITR
.IFOPR,.IS,.GENBR,.OPADD,.OPSUB,CL.EAR,SET,CLEARB,SETB
RNE,REQ,RLT,RGE,RGT,RLE,RPL ,RMI,RHI,RLOS,RHIS,RLO,RCS,RCC
IF,.OR,.IFARI,.LEAVE,.GOTO,0R,AND,THEN,ELSE,WHILE,CASE
FOR,TO,DOWNTC,REPEAT,UNTIL, THRU,END,BEGIN
$$END,LEAVE,JUMPTO,GOTO,PUSH,POP,LET
.SIMPLE, .ARITH,ORB,ANDB,IFB,UNTILB,WHILEB,ON.ERROR,
ON.NOERROR
$CALL, $RETURN

LNLIST
LIST
.NLIST
LST$$=
$SWR=
;;:EIT

TTM
MC,SYM
MD,CND,ME
O
163000
1

;I WANT FAT PAPER!
;LIST MACRO CALLS, SYMBOL TABLE
;DON'T LIST MACRO DEFS & CONDITIONALS £ EXPANSIONS
;DEFINED TO LIST SUPERMAC EXPANSICNS
;+USE THESE SYSMAC SWITCHES
;FIRST TEST NUMBER TO ONE(1)

CVMJAAC MSV11-J MEMORY DIAG.
DEFINE
TRAPS

MACRO V05.01b Friday 15 Feb-85 16:10

Page 98

SEQ 0095

3942
3943
3944

.SBTTL
DEFINE
TRAPS
;ALL ENTRIES HERE MUST HAVE A CORRESPONDING ENTRY IN THE
:TRAP TABLE "$TRPAD" (NEAR END OF PROGRAM).

gg:;

HERE IS HOM TRAPS WORK IN THIS PROGRAM

3949

{ALL TRAPS EXECUTE A “TRAP“ INSTRUCTION WHICH TAKES THE PROGRAM

3952

AT $TRAP THE PROGRAM PICKS UP THE RIGHT BYTE OF THE TRAP INSTRUCTION

gggg

: THE ULTIMATE DESTINATION OF A TRAP INSTRUCTION CAN BE GUESSED AT AS FOLLOWS

3958

{EXAMPLE :

NOP

gggg

;

NOP

33:2

:«TRAP DEFINITIONS

gggg

:TO SYMBOLIC LOCATION “$TRAP*

3953
gggg

:AND INDEXES INTO A TABLE AT LOCATION ”$TRPAD" WHICH SENDS THE PROGRAM TQ
:THE SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK.

3959
3960
3961

;
;
:

NOP
NOP
KERNEL

;ENTER KERNFL MODE

3964

ADD A DOLLAR SIGN TO THE SYMBOLIC NAME AND CHECK THE CRF FOR SOMETHING CLOSE

gggg

AT LOCATION 32546 YOU FIND THE ROUTINE $KERNEL

3965

3968

;

3969
gg;o

IN THIS CASE THE CRF HAS $KERNE LISTED AS 032546

NOTE THAT CRF SYMBOLS ARE TRUCNATED TO 6 CHARACTERS

;
;

SYMBOLIC NAMES GREATER THAT & CHARACTERS ARE USED S0 I CAN
REMEMBER WHAT THEY MEAN!

104405

;
TYPEIT=
TYPOC=
TYPOS=
;TYPON=
TYPDS=

ALL GOOD TRAP ROUTINES RETURN VIA AN "RTI* INSTRUCTION
104401
;s TTY TYPEOUT ROUTINE
104402
: :TYPE OCTAL NUMBER (WITH LEADING ZEROS)
104403
:;TYPE OCTAL NUMBER (NO LEADING ZEROS)
104404
: s TYPE OCTAL NUMBER (AS PER LAST CALL)
104405
: : TYPE DECIMAL NUMBER (WITH SIGN)

;TYPBN= 104406

:: TYPE BINARY (ASCII) NUMBER

3980
gggé

104407
104410

GTSWR=
CKSWR=

104407
104410

:;GET SOFT-SWR SETTING
: 1 TEST FOR CHANGE IN SOFT-SWR

3983
3984
3985
gggg

104411
104412
104413
104413

RDCHR=
ROLIN=
RDOCT=
RODEC=

104411
104412
104413
104414

;3 TTY TYPEIN CHARACTER ROUTINE
::TTY TYPEIN STRING ROUTINE
: tREAD AN OCTAL NUMBER FROM TTY
: :READ A DECIMAL NUMBER FROM TTY

3988
gggg

104415
104416

SAVREG= 104415
RESREG= 104416

; ;SAVE RO-RS5 ROUTINE
; ;RESTORE RO-RS5 ROUTINE

3335

104417

KERNEL= 104417

;ENTER KERNEL MODE

3993
3994
gggg

104420
104421
104422

ENERGIZE=104420
DEENERGIZE=104421
KMAP=
104422

;TURN ON MEMORY MANAGEMENT & TRAPS
;TURN OFF MEMORY MANAGEMENT & TRAPS
{MAP KERNEL 1 T0 1

3997
3998

104423
104424

CACHON= 104423
CACHOFF=104424

;TURN ON CACHE
; TURN OFF CACHE

3972
3973
3974
3975
3976
3977

gg?g
7

;

104401
104402
104403

CVMJAAO MSV11-J MEMORY DIAG.
DEFINE
TRAPS
3999
4000
4001
4002
4003
4004
4005

4006
4007
4008
4009
4010
4011
4012

4013
4014
4015
4016
4017
4018
4019
4020
4021
4022
4023
4024

4025
4026
4027
4028
4029
4030
4031
4032
4033
4034
4035
4036
4037
4038
4039
4040

4041
4042

4043
4044
4045
4046

4047

4048
4049
4050
4051
4052
4053
4054
4055

MACRO V05.01b friday

15 Feb-85 16:10

Page 98

SEQ 0096

104425
104426

LOADCSR=104425
READCSR=104426

;LOAD CORRECT CSR
;READ CORRECT CSR

104427
104430
104431
104432
104433
104434
104435
104436
104437
104440
104441
104442
104443
104444
104445
104446
104447
104450
104451
104452
104453
104454
104455

PERRO1=
PERRO2=
PERRO3=
PERRO4=
PERRO7=
PERR10=
PERR11=
PERR12=
PERR13=
PERR14=
PERR1S=
PERR16=
PERR17=
PERR20=
PERR21=
PERR22=
PERR23=
PERR24=
PERR25=
PERR26=
PERR27=
PERR30=
PERR31=

; PROGRAM DETECTED ERROR
:PROGRAM DETECTED ERROR

104456

104457
104460
104461
104462
104463
104464
104465
104466
104467

104470
104471
104472
104473
104474
104475
104476
104477
104500
104501
104502
104503
104504
104505
104506
104507
104510
104511
104512

PERR32=
PERR33=
PERR34=
PERR35=
PERR36=
PERR37=
PERR40=
PERR41=

104427
104430
104431
104432
104433
104434
104435
104436
104437
104440
104441
104442
104443
104444
104445
104446
104447
104450
104451
104452
104453
104454
104455

104456
104457
104460
104461
104462
104463
104464
104465
PERR42= 104466
PERR43= 104467

ECCDIS= 104470
ECC1D1S=104471
ECCINIT=104472
ECC1INIT=104473
104474
CBCSR=
CB1CSR= 104475

WASSBE= 104476
WAS1SBE=104477
WASDBE= 104500
WAS1DBE=104501

CLRCSR= 104502
CLR1CSR=104503
CHKDIS= 104504
CHK1DIS=104505
ENASBE= 104506
ENA1SBE=104507
TSTREAD=104510
INVALID=104511
ERRGEN =104512

; PROGRAM DETECTED ERROR
;PROGRAM DETECTED ERROR
; PROGRAM DETECTED ERROR

; PROGRAM DETECTED ERROR
; PROGRAM DETECTED ERROR

;PROGRAM DETECTED ERROR

; PROGRAM DETECTED ERROR

;PROGRAM DETECTED ERROR

:PROGRAM DETECTED ERROR
; PROGRAM DETECTED ERROR

; PROGRAM DETECTED ERROR

;PROGRAM DETECTED ERROR
; PROGRAM DETECTED ERROR

; PROGRAM DETECTED ERROR
; PROGRAM DETECTED ERROR

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

; PROGRAM
; PROGRAM
; PROGRAM
; PROGRAM
;PROGRAM
; PROGRAM
; PROGRAM

DETECTED
DETECTED
DETECTED
DETECTED
DETECTZD
DETECTED
DETECTED

;PROGRAM
:PROGRAM
; PROGRAM
; PROGRAM
; PROGRAM
;PROGRAM
:PROGRAM
;PROGRAM

DETECTED ERROR
DETECTED ERROR
DETECTED ERROR
DETECTED ERROR
DETECTED ERROR
DETECTED ERROR
DETECTED ERROR
DETECTED ERROR

;PROGRAM DETECTED ERROR

;:DISABLE ECC ON ALL CSR'S
;DISABLE ECC ON 1 SELECTED CSR
; INITIALIZE ALL ECC CSR'S
;INITIALIZE 1 SELECTED ECC CSR

;WRITE GENERATED CHECKBITS IN ALL CSR'S

;WRITE GENERATED CHECKBITS IN 1 SELECTED CSR
;WAS THERE A SBE ON ANY CSR?

;WAS THERE A SBE ON 1 SELECTED CSR?

;WAS THERE A DBE ON ANY CSR?

;WAS THERE A DBE ON 1 SELECTED CSR?

;CLEAR ALL CSR’'S
;CLEAR 1 SELECTED CSR

;DISABLE ECC & WRITE CHECKBITS FROM ALL CSR'S

;:DISABLE ECC & WRITE CHECKBITS FROM 1 SELECTED CSR
;ENABLE TRAPS ON SBE'S FROM ALL CSR'S
;ENABLE TRAPS ON SBE'S FROM 1 SELECTED CSR
;TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES)

; INVALIDATE BACKGROUND PATTERN ON “BANK"

;CHECK ERROR ADDRESS

CVMJAAO MSV11-J MEMORY DIAG.

DEFINE

4056
4057

TRAPS

104513
104514

MACRO V05.01b Friday 15-Feb-85 16:10
CBREG
=104513
SYNREG
=104514

Page 98-2

;ENABLES CHECKBIT REGISTER
;ENABLES SYNDROME BIT REGISTER

SEQ 0097

CVMJARO MSV11-J MEMORY DIAG.
DEFINE BASIC PDP11 STUFF
4060
4061
4062

4063

4064
4065
4066
4067
4068
4069
4070
4071
4072
4073
4074
4075
4076
4077
4078
4079
4080
4081
4082
4083
4084
4085
4086
4087
4088
4089
4090
4091
4092
4093
4094
4095
4096
4097
4098
4099
4100
4101
4102
4103
4104
4105
4106
4107
4108
4109

4110
4111
4112

4113

4114
4115

4116

MACRO v05.01b Friday

15-Feb-85

100

DEFINE

BASIC PDP11 STUFF

; *INITIAL ADDRESS OF THE STACK POINTER
2000
; ;FIRST ADDRESS OF THE STACK
KERSTK= STACK
; sKERNEL STACK
SUPSTK= 740
;: ; SUPERVISOR STACK
USESTK= 700
; ;sUSER STACK
ERROR=EMT
; ;BASIC DEFINITION OF ERROR CALL
SCOPE=I0T
; ;BASIC DEFINITION OF SCOPE CALL
PSW=
177776
; ;PROCESSOR STATUS WORD
s STKLMT=177774
; sSTACK LIMIT REGISTER
:PIRQ=
177772
: ;PROGRAM INTERRUPT REQUEST REGISTER
STACK="

177570
177570
177546

DSWR=
DDISP=
LKS=

000011
000012
000015
000200
000007

HT=

000006
000006

Page

SEQ 0098

.SBTTL
002000
002000
000740
000700
104000
000004
177776

16:10

177570
177570
177546

; sHARDWARE SWITCH REGISTER
; ;HARDWARE DISPLAY REGISTER

; sLINE CLOCK (KW11-L) STATUS REGISTER

; *MISCELLANEQUS DEFINITIONS
11
; ;:CODE FOR HORIZONTAL TAB
LF=
12
; ;CODE LINE FEED
CR=
15
: :CODE CARRIAGE RETURN
CRLF=

MFPT=

200
7

: ;CODE FOR CARRIAGE RETURN-LINE FEED

; ;CODE FOR PROCESSOR TYPE INSTRUCTION

; *GENERAL PURPOSE REGISTER DEFINITIONS
;SP=R6
; iSTACK POINTER
:KSP=SP
: sKERNEL STACK POINTER
SSP=SP
; : SUPERVISOR STACK POINTER
usP=5pP
; sUSER STACK POINTER
:PC=R7
; :PROGRAM COUNTER
;*"SWITCH REGISTER” SWITCH DEFINITIONS

SW15=
SWi4=
SW13=
SW12=
SWil=
SW10=
SW9=
SW8=
SW7=
SW6=
SW5=

100000
40000
20000
10000
4000
2000
1000
400
200
100
40

SW3=
SWe=
SW1=

10
4
2

100000
040000
020000
010000
004000
002000
001000
000400
000200
000100
000040
000020
000010
000004
000002
000001

SWo-=

100000
040000
020000
010000
004000
002000
001000
000400

BIT15=
BIT14=
BIT13=
BIT12=
BIT11=
BIT10=
8IT9=
BIT8=

SW4-=

; *DATA BIT DEFINITIONS (BITOO TO BIT1S)
100000
40000
20000
10000
4000
2000
1000
400

CVMJUAAO MSV11-J MEMORY DIAG.
DEFINE BASIC PDP11 STUFF
4117

4118
4119
4120
412}
4122
4123
4124
4125
4126
4127
4128
4129
4130
4131
4132
4133

4134
4135
4136
4137
4138
4139

4140
4141
4142
4143
4144
4145
4146
4147
4148
4149
4150
4151
4152

4153
4154
4155
4156
4157

4158
4159
4160
4161
4162
4163
4164
4165
4166
4167
4168
4169
4170
4171
4172
4173

MACRO V05.01b Friday

BIT7=
BIT6=
BIT5=
BIT4=
BIT3=
BIT2=
BITl=
BITO=

000004
000010

ERRVEC= 4
RESVEC= 10
; TBITVEC=14
: TRTVEC=

000020
000024
000030
000034
000060
000114
000114
000250

Page

100-1

SEQ 0099

000200
000100
000040
000020
000010
000004

000202
000001

15 Feb-85 16:10

200
100
40
20
10
4
2
1

; *BASIC "CPU" TRAP VECTOR ADDRESSES

;BPTVEC=

JOTVEC= 20

PWRVEC= 24
SMTVEC= 30
TRAPVEC=34
TKVEC=
60

;s TTY PRINTER VECTOR
;sLINE CLOCK (KW1l-L) VECTER
; :CACHE ERROR INTERRUPT VECTOR

CACHVEC=114

PARVEC=CACHVEC
; PIRQVEC =240
MMVEC=
250

.SBTTL

: MEMERR ="177744

DEFINE

177746
177750
177752
177754

177746
177750

MAINT

177754

DATARG

177766

.SBTTL
DEFINE
CPUERR = 177766

; HITMIS

.SBTTL

; ;sBREAKPOINT TRAP (BPT)

3 ; INPUT/0UTPUT TRAP (IQT) ##SCOPE#s
; s POWER FAIL
; sEMULATOR TRAP (EMT) #*ERROR#*#
i: "TRAP" TRAP
;:1TY KEYBOARD VECTOR

; TPVEC= 64
;LKVEC= 100

CONTRL

;: TIME OUT AND OTHER ERRORS
; sRESERVED AND ILLEGAL INSTRUCTIONS
;s T" BIT
; : TRACE TRAP

DEFINE

; :PROGRAM INTERRUPT REQUEST VECTOR
; sMEMORY MANAGEMENT VECTOR

CACHE REGISTERS

; ;CACHE ERROR REGISTER
; ;MEMORY CONTROL REGISTER
; sMEMORY MAINTENENCE REGISTER
; sHIT MISS REGISTER *1* IMPLIES HIT IN CACHE
; ;DATA REGISTER

CPU REGISTERS

; ;CPU ERROR REGISTER HOLDS CONDITION THAT CAUSED

MEMORY MANAGEMENT REGISTERS

; *MEMORY MANAGEMENT STATUS REGISTER ADDRESSES

177572
177574
177576
172516

MMRO=
MMR1-=
MMR2=
MMR3=

177600

UIPDRO= 177600

;sUSER "I" PAGE DESCRIPTOR REGISTERS

;UIPDR1=

;UIPDR2=

; UIPDR3=
;UIPDR4=
;UIPDRS=
;UIPDR6=
;UIPDR7=
; UDPDRO=
;UDPOR1=
; UDPDR2=

177602
177604
177606
177610
177612
177614
177616

;*USER "D" PAGE DESCRIPTOR REGISTORS
177620
177622
177624

CVMJARO MSV11-J MEMORY DIAG.
DEFINE
MEMORY MANAGEMENT REGISTERS

MACRO V05.01b Friday 15-Feb-85 16:10

4174
4175
4176
4177
4178
4179
4180
4181
4182

4183
4184
4185
4186
4187
4188
4189
4190
4191
4192
4193

4194
4195
4196
4197
4198
4199
4200
4201
4202
4203
4204

;UDPDR3-=

; UDPDR6=

;UDPDR7=

FASTCITY=UIPARO

177660

UDPARO= 177660

UIPARC= 177640
UIPAR1= 177642
UIPAR2= 177644
UIPAR3= 177646
UIPAR4= 177650
UIPARS= 177652
UIPAR6= 177654
;UIPAR7=

; UDPAR1=
;UDPAR2=

; UDPAR4=
; UDPARS=
;UDPAR6=

177656

;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE

; *USER "D" FAGE ADDRESS REGISTERS
; PATTERN PROGRAM SPACE

;UDPAR3=

177676

UDPAR7=

172200

SIPDRO= 172200

177676

177662
177664
177666
177670
177672
177674

;PATTERN
:PATTERN
;PATTERN
;PATTERN
;PATTERN
;PATTERN

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

;PATTERN PROGRAM SPACE

SPACE
SPACE
SPACE
SPACE
SPACE
SPACE

; *SUPERVISOR “I” PAGE DESCRIPTOR REGISTERS

; SIPDR1=
; SIPDR2=
; SIPDR3=
: SIPDR4=
: SIPDRS=
: SIPDR6=

; SIPDR7=

172202
172204
172206
172210
172212
172214

172216

; »SUPERVISOR "D" PAGE DESCRIPTOR REGISTERS
172220
: SOPDRO=

: SOPDR1~=

; SDPDR2=
: SOPDR3=
: SDPDR4 =
; SOPDRS=
; SOPDR6=
; SDPDR7=

4216

4229
4230

;*USER "I" PAGE ADDRESS REGISTERS

177640
177640
177642
177644
177646
177650
177652
177654

4213
4214
4215

4228

177626
177630
177632
177634
177636

; UDPDRS=

4205

4217
4218
4219
4220
4221
4222
4223
4224
4225
4226
4227

SEQ 0100

=
;UDPDR4

4206
4207
4208
4209
4210
4211
4212

Page 100-2

172240

172246
172252
172254

SIPARO=

; SIPARL=

172222

172224
172226
172230
172232
172234
172236

: *SUPERVICSIR “I" PAGE ADDRESS REGISTERS
17.240

172242

;i SIPAR2=

172244

; SIPAR4 =

172250

SIPAR3=

SIPARS=

SIPARG6=
;SIPAR7=

172246

172252

172254
172256

; TEST AREA

; TEST AREA
; TEST ARER
; TEST AREA

K38

CVMJAAO MSV11-J MEMORY DIAG.
MACRO v05.01b Friday 15-Feb-85 16:10
GEFINE
MEMORY MANAGEMENT REGISTERS

4231

4232

4233

172260

4234

4236

4238

4239
4241
4242
4243
4244
4245
4246
4247
4248

172272

SDPARS-

172272

; SDPARA4 =

172300

KIPDRO;KIPDR1=
:KIPDR2=
;KIPDR3=
;KIPDR4 =
:KIPDRS=
;KIPDR6=

172276

172274

SOPAR7=

;KDPDRO=

4254

: KDPDR2=

172276
;#KERNEL

;#KERNEL

4259

172326

172330
172332
172334

:KDPDR7=
172340

172350
172352
172354

4270

172360

4275

KIPARO=
;KIPAR1=
;KIPAR2=
;KIPAR3=
KIPAR4=
KIPARS=
KIPARG=
;KIPART=
KDPARO=
;KDPAR1 =
:KDPAR2=

:KDPAR3=

4276

:KDPARS =
172374

172376

: KDPARS =
KDPARG=
KDPAR7=

172320

172324

:KDPDR4 =
:KDPDRS =
:KDPDR6 =

4260

“D” PAGE DESCRIPTOR REGISTERS

172322

:KDPDR3=

4256
4257
4258

"I" PAGE DESCRIPTOR REGISTERS
172300
172302
172304
172306
172310
172312
172314

172316

:KOPDR1 =

4255

4280

172270

;KIPDR7=

4253

4277
4278
4279

172264

172266

4252

42171

172262

; SOPAR3=

SDPARG =

4251

4272
4273
4274

172260

:SDPAR] =

172274

4249

4261
4262
4263
4264
4265
4266
4267
4268
4269

; #SUPERVISOR “D* PAGE ADDRESS REGISTERS

: SDPAR2=

4235

4237

SDPARO-

Page 100-3

172336
;#KERNEL

“I" PAGE ADDRESS REGISTERS
172340
172342
172344
172346
172350
172352
172354
172356

;#*KERNEL “D” PAGE ADDRESS REGISTERS
172360
172362
172364
172366

172370
172372
172374
172376

SEQ 0101

CVMJUAARO MSV11-J MEMORY DIAG.
DEFINE
Q-BUS MAP REGISTERS

MACRO v05.01b Friday 15-Feb 85 16:10

4283
4284

4285
4286

4287

4288
4289
4290
4291
4292
4293
4294

4295

429
4297
4298
4299

4300

4301
4302

4303
4304
4305
4306
4307
4308

4309
4310

4311
4312
4313
4314
4315
4316

.SBTTL
DEFINE
Q-BUS MAP REGISTERS
:«THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED
170200

170202
170204

MAPLO =

170200

MAPHO = 170202

MAPL1
;MAPH1
iMAPL2
iMAPH2
:MAPL3
:MAPH3
:MAPLA

=
=
=
=
=
=
=

170204
170206
170210
170212
170214
170216
170220

iMAPLS
;MAPH5
:MAPL6
iMAPH6

= 170224
= 170226
= 170230
= 170232

iMAPH4 = 170222

:MAPL7 = 170234

;MAPH7 = 170236
iMAPL10 = 170240

:MAPH10
:MAPLI1
:MAPH11
iMAPL12
iMAPH12
iMAPL13

=
=
=
=
=
=

170242
170244
170246
170250
170252
170254

iMAPH14
iMAPL15
iMAPH15
;MAPL16
iMAPH16
:MAPL17

=
=
=
=
=
=

170262
170264
170266
170270
170272
170274

iMAPH13 = 170256
iMAPL14 = 170260

:MAPH17 = 170276
iMAPL20 = 170300

4320
4321

iMAPL21 = 170304
iMAPH21 = 170306

4323
4324
4325

iMAPH22 = 170312
iMAPL23 = 170314
iMAPH23 = 170316

4327

:MAPH24 = 170320

4322

4326
4328

4329
4330
433}

4332
4313
4334
4335

4336
4337
4338
4339

SEQ 0102
'MAPLXX'

:«THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED 'MAPHXX'

4317
4318

4319

Page 102

iMAPH20 = 170302

iMAPL22 = 170310

:MAPL24 = 170320
:MAPL2S = 170324

;MAPH2S = 170326
iMAPL26 = 170330
iMAPH26 = 170332

iMAPL27 = 170334
:MAPH27 = 170336

:MAPL30 - 170340
;:MAPH30 = 170342
;MAPL31 =
iMAPH31 =
;MAPL32 =
;MAPH32 =

170344
170346
170350
170352

CVHMJAAO MSV11-J MEMORY DIAG.
DEFINE
Q-BUS MAP REGISTERS

;MAPH33
;MAPL34
:MAPH34
;MAPL3S
; MAPH3S

;MAPL36

4347

4355
4356
4357
4358
43359
4360
4361
4362

15 Feb-85 16:10

Page 102-1

SEQ 0103

;MAPL33

4340
4341
4342
4342
4344
4345
4346

4348
4349
4350
4351
4352
4353
4354

MACRO V05.01b Fridey

;MAPH36

;MAPL3?

;sMAPH37

170354
170356
170360
170362
170364
170366
170370
170372
170374
170376

000174
000176

.SBTTL
DISPREG=174
SWREG=
176

DEFINE

SOFTWARE SWITCH & DISPLAY REGISTERS

172100

.SBTTL
CSRADD=172100

DEFINE

CCNTROL STATUS REGISTERS

060000

FIRST=60000

.SBTTL

DEFINE

PARAMETERS

157776

040000

LAST=157776
SIZE=40000

;START OF THE 16K TEST PATTERN AREA
;END OF THE 16K TEST PATTERN AREA
;SIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS)

CVMJAAD MSV11-J MEMORY DIAG.
DEFINE
PARAMETERS

MACRO V05.01b Friday 15-Feb-85 16:10

4365

4366

4%6;

LIST

.SBTTL

;

:g;?

;

4372
4373
4374

4375
4376

4377

MACRO

.ENABL

CRF

.ENABL
CRF
LIST
.IF B ARG

4401

sstsssssskssassdsssssstnes

SEREERRRREREREER
SRR RN SRR R R AR RN bR bRk b kbR bR Ry
.MACRO
FATAL
ARG
; ***MACRO*+*MACRO*+«MACROs
¢¢
.NLIST
.DSABL
CRF
JIIF DF LST$S LIST
ME

4391
4392
4393

4395
4396
4397
4398
4399
4400

:BE NICE TO SEE MY DEFINITIONS

THE PROGRAM FROM CONTINUING).

LIST
INC
ERROR
.DSABL
JIIF DF
.ENABL
.ENDM

4394

SEQ 0104

;FATAL IS USED TO REPORT FATAL ERRORS (ERRORS THAT PREVENT

4378
4379
4380
4381
4382
4383
4384
4385
4386
4387
4388
4389

41390

FATAL

seestsssksshdssbbstttnd FATAL

436

4369

Page 104

.SBTTL
.MACRO
.NLIST
.DSABL

FATALS
+«ARG
CRF
LST$$ .NLIST
CRF
FATAL
MACRO
TYPE

CRF

JIIF DF LST$$

;SET FATAL INDICATOR
ME

TYPE
ARG

.LIST

.NLIST

TYPEIT

.IFF
TYPEIT
ARG
.ENDC
.DSABL
CRF
JIIF DF LST$¢$
.ENABL CRF

.ENDM

TYPE

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO

4404

NEWTST

MACRO Vv05.01b Friday 15 Feb-85 16:10

.SBTTL

MACRO

Pege 106

NEWTST

4405

;esssssesessssastsesess

4407
4408
4409
4410
441}
4412
4413
4414
4415

;2) PUT STARS BEFORE AND AFTER A MESSAGE
; ARGUMENTS
31)
ASCII
-THIS IS THE MESSAGE THAT WILL APPEAR
;
ON THE LISTING
;2)
ICOUNT -IF NON-BLANK AND BIT 11 OF $SWR = 1 IT WILL BE

4406

4416

4417
4418
4419
4420
4421
4422
4423
4424
4425
4426
4427
4428
4429

4430
4431
443%2
4433
4434
44315
4436
443%7
4438
4439
4440

444)
4442

4443
4444
4445
4446

4447
4448
4449
4450
44s)

NEWTST

SEQ 0105 ;

seessssssnssnssnseesse

:?$HL§ELIS USED AS THE FIRST INSTRUCTION OF A TEST.

;1)

GENERATE A TEST NUMBER FOR THE LABEL OF THIS TEST

:3)

RETURN --

i4)

COMAND --

THE NUMBER OF ITERATIONS TO MAKE ON THIS TEST
IF NON-BLANK WILL BE THE ADDRESS T0
WHICH THE NEXT SCOPE STATEMENT WILL
LOOP BACK T70.

IF NON-BLANK WILL BE THE FIRST
INSTRUCTION OF THE TEST
IF BLANK SCOPE WILL BE THE

FIRST INSTRUCTION
HiA2 222222222222

222222222t

i 2 2322222222232
2222 ] )

.MACRO
NEWTST
$STN=1
$NWTST=0
.NLIST
MC
.IF B <COMAND>
SinHTEST

ASCII,ICOUNT,RETURN,COMAND

$ $NEWTEST

\$TN, <ASCII>, <COMAND>

.ENDC

\$TN, <ASCII>,SCOPE

.NLIST
.LIST
ME
LIST
.IF NE 4000&$SWR
.IF NB ICOUNT
JJF LE <ICOUNT-1>
HggF
#1,$TIMES

;:00 1 ITERATION

ngoc

;D0 ICOUNT ITERATIONS

#ICOUNT,$TIMES

.ENDC
.IF N8 RETURN

ngoc

.ENDC
.NLIST
.LIST
.LIST
MNLIST
.ENDM

#RETURN, $LPADR

MC
ME
NEWTSTY

;;SET

SCOPE LOOP ADDRESS

CVMJAAO M5V11-J MEMORY DIAG.

MACRO

$ INEWTEST

C9o

MACRO V05.01b Friday 15-Feb-85 16:10

4464
4465
4466
4467

;#TEST A

4504
4505
4506

ASCI

IFF

.ENDC
.ENDM

T T
T YT T T T

TST'A:

COMND
.NLIST

ME
$TN=$TN.1
.ENDM
$$NEWTEST

.SBTTL

shknekkkekrknrdk

MACRO

SUBTST

#ksassrsssnsshbrbshbkbsbsbbkis

:THIS MACRO WILL FORMAT A SUBTEST HEADING WITH STARS

;A .SBTTL WILL BE FORCED & .NLISTED FOR THE TABLE OF CONTENTS.

: ARGUMENT:

1) TXT --

THIS IS THE MESSAGE THAT WILL APPEAR IN THE TABLE OF CONTENTS & LISTING.

:EXAMPLE ;

SUBTST <<THIS IS A FUN SUBTST>>

RESE L2122 2222

2322

-MACRO
.NLIST
$SUBTST
.LIST
.ENDM

.SBTTL
.HMACRO
.IRP
.SBTTL
.NLIST
.LIST
LLIST

4497
4498

449¢
4500
4501
4502
4503

ASCI

4468

4469
4470
4471
4472
4473
4474
4475
4476
4477
4478
4479
4480
4481
4482
4483
4484
4485
4486
4487
4488
4489
4490
4491
4492
4493
4494
4495
4496

SEQ 0106

.SBTTL
MACRO
$$NEWTEST
.MACRO
$$NEWTEST
R,ASC,COMND
.IRP
ASCI, <ASC>
CIF EQ $NWTST
$NWTST=1
LSBTTL
T'A’
RSCI
CNLIST
ME
.LIST
LIST

4454
4455
4456
4457
4458
4459
4460
4461
4462

4463

Page 108

BRI

SUBTST

MC
<ASCII>
MC

.ENDM
2

2222222222322

2 2322331332312

ASCII

5uUBTST

MACRO
$SUBTST
$SUBTST ASC
ASCI, <ASC>
ASCI

222232322 2222232

; *SUBTEST

2220223

2222322232

322232122232 222 22223333 3332322322334 22}

ASCI
S

NLIST
.ENDM

2342

ME
$SUBTST

222

222 32

2222222222222

2222

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO

4509

421?

a5]

4512
:giz

4515

TYPOCT

MACRO VO05.01b Friday 15 Feb-85 16:10
.SBTTL

MACRO

tttttttttttttttttttt

Page 110

TYPOCT

ssssscesssssstdsbtns

TYPOCT IS USED TO CHANGE A BINARY NUMBER
;
70 A 6 DIGIT OCTAL NUMBER AND TYPE IT

| ARGUMENTS:

4516

i1)

NUM

THE NUMBER TO BE TYPED

2353

:2)

REMARK

ALLOWS A COMMENT TO BE MADE

:ggé

:ROUTINES REQUIRED

:gg}
4252

i1)
:2)

4527

{EXAMPLES:

:gi;

4528
4529

SEQ 0107

:
i1)

CONVERT BINARY TO OCTAL AND TYPE (.$TYPOCT)
TYPE AN ASCIZ STRING (.$TYPE)
TYPOCT

:ggg

:2)

4532

B PP,

4533

4533
4535
4536
4537
4538
4539

TYPOCT

HILMT,<TYPES THE CONTENTS OF HILMT>

#5.<TYPES '

_MACRO
'NLIST
DSABL
JIIF DF
ENABL

CRF
LST$$
CRF

4530

MOV

NUM, - (SP)

4542

TYPOC

4544
4545
4546

JIIF DF LST$$ .NLIST
JENABL
CRF
.ENDM
TYPOCT

4541

4543

LIST

TYPOCT

000005'
>

NUM,REMARK

.LIST

: ;SAVE NUM FOR TYPEQUT

"IIF NB <REMARK>

.DSABL

CRF

; s REMARK

;:G0 TYPE--OCTAL ASCIICALL DIGITS)
ME

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO

4549
4550
4551
4552
4553
4554

4555
4556
4557
4558
4559

4560
4561
4562
4563
4564

4565
4566
4567
4568
4569
4570
4571
4572
4573
4574
4575
4376
4377
4578
4579
4580
4581
4582
4583
4584
4385
4586
4587
4588
4589
4590
4591
4592
4593
4594
4595
4596
4597
4598
4599
4600

4601
4602

TYPOCS

MACRO V05.01b Friday

15-Feb-85 16:10

Pesge 112

SEQ 0108
.SBTTL

MACRO

sesssdsassssnkinnssts

TYPOCS

stsstssssssssssnrtany

TYPOCS IS USED TO CHANGE A BINARY NUMBER TC AN OCTAL
NUMBER AND TYPE 1 TO 6 DIGITS
WITH OR WITHOUT LEADING ZEROS.

:ARGUHENTS:
:1)
NUM
:2)
REMARK
:3)
N
:4)
z

NUMBER TO BE TYPED
ALLOWS A COMMENT TO BE MADE
NUMBER OF DIGITS (1 TO 6) TO BE TYPED
BLANK=SUPPRESS LEADING ZERQOS (TYPES SPACES)

NON-BLANK-TYPE LEADING ZEROS

:ROUTINES REQUIRED

CONVERT BINARY TO OCTAL AND TYPE (.$TYPOCT)

:2)

TYPE AN ASCIZ STRING (.$TYPE)

:EXAMPLES:

i1)
:2)

TYPOCS
TYPOCS

#004,<TYPES * 4">,2

TYPOCS

i3)

#12345,<TYPES "S5">,1
#0083, <TYPES "08">,2,X

krk

kb kR bk

.MACRO
.NLIST
.DSABL
LIIF DF
.ENABL
.LIST

MOV

TYPOCS
CRF
LST$$
CRF

ko k

.LIST

NUM, -(SP)

; :SAVE NUM FOR TYPEOQUT

TYPOS

;GO TYPE--OCTAL ASCII

.IF NB N
.BYTE
N
IFF
.BYTE
6
.ENDC
IF NB Z
BYTE
1
IFF

.ENDC
.DSABL _
LIIF DF
.ENABL
.ENDM

kb kb kR bRk

NUM,REMARK,N,Z

.IIF NB <REMARK>,

.BYTE

ko k kb

;s TYPE N DIGIT(S)

;:TYPE 6 DIGITS
;s TYPE LEADING ZEROS

CRF
LST$$ .NLIST
CRF
TYPOCS

; : SUPPRESS LEADING ZEROS
ME

; : REMARK

CVMJUARO MSV11-J MEMORY DIAG.

MACRO

4605
4606
4607
4608

4609
4610
4611
4612

4613
4614
4615
4616
4617
4618
4619
4620
4621
4622
4623
4624
4625
4626
4627
4628
4629
4630
4631
4632
4633
4634
4635
4636
4637
4638
4639
4640
4641
4642
4643

4644
4645

TYPDEC

MACRO V05.01b Friday 15-Feb-85 16:10

Page 114

SEQ 0109

.SBTTL

MACRO

senssknskshshnkahkdk

TYPDEC

ssvskrshkkdbnkskksnkes

TYPDEC IS USE TO CHANGE A BINARY NUMBER TO A SIGNED

i
;NOTE:

;

DECIMAL NUMBER AND TYPE IT REPLACING LEADING ZERO

WITH SPACES.
IF THE NUMBER IS NEGATIVE A

MINUS SIGN WILL BE TYPED.

:ARGUHENTS:
:1)
NUM
NUMBER TO BE TYPED
:2)
REMARK ALLOWS A COMMENT TO BE MADE
:ROUTINES REQUIRED
:1)
CONVERT BINARY TO DECIMAL AND TYPE (.$TYPDEC)
:2)

TYPE AN ASCIZ STRING (.$TYPE)

:EXAMPLES
i1)
TYPDEC
:2)

TYPDEC

SIZE,<TYPE THE CONTENTS OF SIZE>
#-10.,<TYPE A MINUS TEN>

shkkkkkkkkkkkkk ok kkkkkkk kR kkkkkkkkkkkk ko

.MACRO
.NLIST
.DSABL
LIIF DF
.ENRBL
.LIST

MOV

TYPDEC

CRF
LST$$
CRF

NUM,REMARK
.LIST

NUM, -(SP)

; sSAVE NUM FOR TYPFOUT

.IIF NB <REMARK>,

TYPDS

.DSABL
LIIF DF
.ENABL
.ENDM

kk kb kb hk bbbk bk kg &

CRF
LST4$ .NLIST
CRF
TYPDEC

: : REMARK

;:G0 TYPE -DECIMAL ASCII WITH SIGN
ME

CVMJARO MSV11-J MEMORY DIAG.
8Mov

MACRO

4647
4648
4649
4650
4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662
4663
4664
4665
4666
4667
4668
4669
4670

4671
4672
4673
4674
4675
4676
4677
4678
4679
4680

4681
4682
4683
4684
4685
4686

4687

4688
4689
4690
4691
4692
4693
4694
4695
4696
4697
4698
4699
4700
4701
4702
4703

MACRO V05.01b Friday

15-Feb-85 16:10

Pege 115

SEQ 0110
PR

.SBTTL
e

MACRO

BMOV

L o)

: THIS MACRO MOVES A BLOCK OF DATA.
: ARGUEMENTS:
i1)

FROMHERE

THE FIRST ADDRESS OF THE SOURCE BLOCK.

:2)

TOHERE

THE FIRST ADDRESS OF THE DESTINATION BLOCK.

i3)

SIZE

THE SIZE OF THE SOURCE BLOCK.

g
;

i
;

H
:

IF BLANK THE 1ST ADDRESS OF THE USER INSTRUCTION
PAR'S IS USED (FASTCITY).

IF BLANK A 16 WORD TRANSFER IS ASSUMED.
"WHY DEFAULT TO 16 WORDS?* YQU ASK!

"BECAUSE THAT'S HOW MANY WORDS TO THE USER PAR

REGISTERS & THAT'S WHERE I INTEND TO MOVE LOTS

OF STUFF." I REPLY!

T
e
e e
T

.MACRO
BMOV
FROMHERE, TOHERE , SIZE
.IF B8 TOHERE
.NLIST
.DSABL
CRF
LIIF DF LST$$ .LIST
ME
.ENABL
CRF
LLIST
JSR R5,BLOCK1
FROMHERE
CRF
.DSABL
LIIF DF LST$$ .NLIST
ME
CRF
.ENABL
.MEXIT
.ENDC
IF B SIZE
NLIST
CRF
.DSABL
JIIF DF LST$$ .LIST
ME
CRF
.ENABL
LLIST
JSR_RS5,BLOCKZ2
TOHERE
FROMHERE
CRF
.DSABL
LIIF DF LST$$ .NLIST
ME
CRF
.ENABL
.MEXIT
IFF
.NLIST
CRF
.DSABL
JIIF DF LST$$ .LIST
ME
CRF
.ENABL
LLIST
JSR R5,BLOCK3
SIZE

CVMJAAO MSV11-J MEMORY DIAG.
sMov

MACRO

4704
4705
4706
4707
4708
4709
4710

MACRO V05.01b Friday

15 Feb-85 16:10

Page

115

SEQ 0111
TOHERE
FROMHERE

.OSABL
CRF
JIIF DF LST$$ .NLIST
CRF
.ENABL
.ENDC
.ENDM
BMOV

TVMJAAQ MSV11-J MEMORY DIAG.

MACRO

MAP

4713

:;1;

MACRO v05.01b Friday 15-Feb-85 16:10
.SBTTL

MACRO

shkkkkkdbkbnkditt

;

Page 117

SEQ 0112

MAP

sbsdkdbrbtsddnkbhbnhhkbkbhk

4716

;

4719
4720
4721

; ARGUEMENTS:
H
;1)
BANK

4724

;EXAMPLES

2;59

;

MAP

LoC

;LOCATION “LOC" CONTAINS THE # OF THE BANK TO MAP

:;gg

MAP

#28.

;BANK 34 (OCTAL) WILL BE MAPPED

:;30

5 Aok ROk

2;{;

:;gg
4725

1
4732
4733
4734
4735
4736
4737
4738

THIS MACRO MAPS A MEMORY BANK (16K) INTQ THE

; TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000-157777)).

;
i

Rk R

THE BANIKK OF 16K WORDS 70 BE MAPPED.

THERE ARE 120 BANKS OF 16K WORDS

ok KRRk ok ok

.MACRO
PUSH
NLIST
.DSABL
JIIF DF
.ENABL
.LIST

MAP
R3

4740

MOV

#200,R3

4741
4742
4743

- IFF
MOV
.ENDC

BANK,R3

4739

4744
4745
4746
4747
4748

4749

CRF
LST$S
CRF

ok Rk ok Kol

BANK

.LIST

.IF B BANK

CALL
.DSABL
JIIF DF
.ENABL

POP

.ENDM

MAPPER
CRF
LST$$ .NLIST
CRF

MAP

Rk Rk kR kK

CVMUAAD MSV11-J MEMORY DIAG.

MACRO

SUPERVISOR

MACRO V05.01b Fridey 15-Feb 85 16:10

Page 119

SEQ 0113

4752
4753
4754

.SBTTL
MACRO
SUPERVISOR
shssknsksdtsddens SUPERVISOR #sxksrdkrkdnhbbkhbhbrss
H

:;g;

: ARGUEMENTS: NONE.

4;58

;tttt*tttttt#tt#ttt*ttt#tttttt#t*t##ttttttttttttttt

:;gg

476
4761
4762
4763
4764

; THIS MACRO SWITCHES TO SUPERVISOR MODE.

.MACRO
SUPERVISOR
.NLIST
.DSABL
CRF
JIIF DF LST$$ .LIST
.ENABL
CRF
.LIST

4765
4766

4767

BIS

4768
4769
4770
4771

4772
4773

#81T714,PSUW

.DSALL
JIIF DF
.ENABL
.ENDM

CRF
LST$$ .NLIST
CRF
SUPERVISOR

.SBTTL

MACRO

4774

jRkkkhhkkbhkkkakkk

4775

USER

;GO TO SUPERVISOR MODE
ME

USER

kkkkbkrkbkkkkbdkbhabahakakad

2;;9

; THIS MACRO SWITCHES TO USER MODE.

:;;g

: ARGUEMENTS: NONE.

4780

;*ttt*#t#tttt#tttttt*ttitttt#ttt#ttttttt#ttttttt#tt

4781

4782
4783

4784
4785
4786
4787
4788

4789
4790
4791
4792

4793

.MACRO
NLIST

USER

.DSABL
CRF
JIIF DF LST$S
.ENABL
CRF
LIST

BIS

.DSABL
JJIF DF
.ENABL
.ENDM

.LIST

#8IT15'BIT14,PSU

CRF
LST$$
CRF
USER

. NLIST

;GO TO USER MODE

CVMJAARO MSV11-J MEMORY DIAG.

MACRO

4795
4796
4797
4798
4799
4800
4801
4802

4803
4804
4805
4806
4807
4808
4809
4810
4811
4812
4813
4814

TESTAREA

MACRO V05.01b Friday 15-Feb-85 16:10

Page 120

SEQ 0114
.SBTTL

MACRO

;ssssnssnrstsstdd

TESTAREA

JESTAREA

sxssssssssdsbusssssdnns

; THIS MACRO SWITCHES TO THE SPECIFIED TEST MODE.

:ARGUEMENTS: NONE.
i

2222322232333 3232222233333 2823322222 3

.MACRO
.NLIST
.DSABL
.IIF DF
.ENABL
LIST
BIS
.DSABL
.IIF DF
.ENABL
.ENDM

TESTAREA

CRF
LST$$
CRF

.LIST

TESTMODE ,PSW
CRF
LST$$ .NLIST
CRF
TESTAREA

ME
;G0 TO SYSTEM TEST MODE

CVMJUAAD MSV1 -J MEMORY DIAG.
MACRO
SET4 & RES4
4817
4818
4819
4820
4821
4822

4823
4824
4825
4826
4827

4828
4829

4830
4831
4832
4833
4834
4835
4836
4837
4838
4839
4840
4841
4842
4843
4844
4845
4846
4847
48438
4849
4850
4851
4852
4853
4854
4835
4856
4857
4858
4859

MACRO vV05.01b Friday 15-Feb 85 16:10

Page 122
SEQ 0115

.SBTTL

MACRO

sokskknkaxkinkknsk

SET4

SET4 & RES4
€ RESE

wssxsrvsrnsrrssssnss

; THESE MACROS SET & RESTORE VECTOR 4(TIMEOUT TRAP)
14

’

;

IN IT'S RESTORED MODE TRAPS ARE REPORTED AS SUCH.

: ARGUEMENTS .

LOC

: THE LOCATION TO VECTOR TO (ONLY USED IN “SET4" NOT

;I USE THE SET4 AND RES4 MACROS AROUND CODE THAT I EXPECT 7O TRAP 10 4
;LIKE LOOKING FOR ALL POSSIBLE CSR'S AND ETC.
WHENEVER CODE IS NOT

"RES4')

:SURROUNDED BY SET4 AND RES4 THEN ANY TRAPS TO 4 WILL CAUSE AN ERROR
;PRINTOUT THAT SAYS "UNEXPFCTED TRAP TO 4" AND ALL THE ASSOCIATED REGISTER JUNK
e

.MACRO
.NLIST
.DSABL _
IIF DF
.ENABL
.LIST

MOV

SET4

ARG

CRF
LST¢$
CRF

.LIST

ARG,
4

.DSABL _ CRF
JIIF DF LST$$
.ENABL
CRF
SET4
.ENDM

101%:

.NLIST

RES4

.MACRO
.NLIST
.DSABL
JIIF DF
.ENABL
.LIST
MOV
cMP
BNE
CLR

#TIMEQUT,
4
#5,PROTYP
1014
CPUERR

.DSABL
JIIF DF
.ENABL
-ENDM

CRF
LST$$
CRF
RES4

CRF
LST$$
CRF

.LIST

;IS THIS AN 11/83/84 ?
;BRANCH IF NOT
;CLEAR QUT THE CPU ERROR REGISTER BITS

; THAT A EXPECTED TRAP COULD HAVE SET
_NLIST

CVMJAAD MSV11-U MEMORY DIAG.

MACRO

DLEFT

MACRO V05.01b Friday 15-Feb-85 16:10

Page 124

SEQ 0116

4862
4862
486
:ggg

.SBTTL
MACRO
DLEFT
;sessssstssssissst DLEFT ssssssnsressessessssssssss
;
; THIS MACRO DOES A DOUBLE WORD LEFT SHIFT

:gg;

; ARGUEMENTS :

:ggg

4871
4872
4873
4874
4875
4876
4877
4878
4879
4880
4881
4882
4883
4884
4885

.MACRO
OLEFT
ARG
NLIST
.DSABL
CRF
JIIF DF LST$$ .LIST
ME
.ENABL
CRF
LIST
ROL
ARG
ROL
ARG+2
.DSABL
CRF
JIIF DF LSTS$$ .NLIST
ME
.ENABL
CRF
.ENDM
OLEFT
LNLIST
TMMD
;DOON'T NEED TO SEE THEM ANY MORE
R
T P
T T T T e
.SBTTL
ABORT ROUTINE FOR ORION UFD MODE (VMK)

4886

4888 000000

105737

056732

4890 000006

013737

003706

4892 000022

104042

4889 000004
4891 000014

4893 000024

4898
4899

;THE LOCATION TO BE SHIFTED LEFT (CARRY TO LOC+2)
L

L L

T T T

T T

I3t 12122222 2282223832223
2223333338

4887

4894
4895
4896
4837

LOC

000032
000036
000042
000046

001420

013737

012760

013700
005037
000137
000207

003710

177777

000042
000042
014042

ABORT:

T7S78

$DOW7

;TEST FOR USER FRIENDLY MODE

SAV30,30

;RESTORE EMT LOCATION (30)

BEQ

ABORTZ2

000032

MOV

SAV3Z2,32

000042

MOV

$-1,42(R0O)

000030

MOV

EMT

ABORT1: MOV
CLR
JMP
ABORT2: RTS

+42

42 ,R0
42
$ENDAD
PC

;JF NOT UFD THEN CONTINUE NORMAL OPERATION
;RESTORE EMT PRIORITY LOCATION (32)

;GET OCA LOCATION INTO RO FROM MONITOR

;SET A -1 INTO LOCATION DRSERR IN MONITOR

;AND PUT THE MONITOR RETURN ADDRESS IN RO
;+CLEAR MONITOR RETURN FLAG
;RETURN TO MONITOR DO NOT PUSH STACK HERE
;sIF NOTUFD RETURN TO MAINLINE

CVMJUAARO MSV11-J MEMORY DIAG.
TRAP CATCHER

MACRO V05.01b Fridey

000310

4943 000316
4944

Page

126

SEQ 0117

4902

4903
4904 000000
4905
4909
4910
4911
4912
4913
4914
4915
4916
4917
4918
4919
4920
4921
4922
4923
4924
4925
4926 000046
4927
4928 000052
4929
4930
4931 000024
4932
4933 000042
4934
4935 000044
4936
4937 000200
4938 000202
4939
4940 000300
4941 000304
4942 000310

15-Feb-85 16:10

000177

.SgTTL

TRAP CATCHER

.WORD
.REPT

0,0
177

.SBTTL

ACT11 HOOKS

; WORD

. +2,HALT

;#THE HOOKS REQUIRED BY ACT11 ARE DEFINED AND SETUP BELOM:
DEFINITIONS:
e
3*
1)L0C.46
“END OF -PASS" HOOK
1 *

=ADDRESS OF END OF PASS ROUTINE

2)L0C.52

i*
i.
¥
i*
i *
in
i%

000046
014042
000052

000024
000200
000042
002000
000044
056750
000200
000437
000442
000300
005037
000137

012737
000137
002000

START3:
002626
003670

177777

003670

002626

BIT

15=1

PROGRAM NEEDS HOOK

PROGRAM SHOULD BE POWER

FAILED WHILE RUNNING
=0 NO POWER FAIL
BIT 14=1 PROGRAM MEMORY SIZE DEPENDENT
=0 NOT MEMORY SIZE DEPENDENT
BIT 13=1 PROGRAM REQUIRES MANUAL INTERVENTION
=0 MANUAL INTERVENTION NOT REQUIRED
BITS 12-0 MUST BE ZERO'S

26
SEggAD

000020

MODIFIED BY ACT1l.

;:1)SET LOC.46 TO ADDRESS OF

$ENDAD IN

.$EOQP

.WORD
.SBTTL
.=24
2022

BIT4
+32)SET L0C.52 TO INDICATE MEMORY SIZE DEPENDANT
APT11 HOOKS
;;SET POWER FAIL TO POINT TO START OF PROGRAM
;;FOR APT START UP

STACK
.=44
SASSSDR

;SO RT11 CAN START WITH RUN COMMAND
; ;POINT TO APT INDIRECT ADDRESS PNTR.
; :POINT TO APT HEADER BLOCK

START1

BR3°°

START1: CLR
JMP
START2: SET

START?2
RESTART
START
RESTART

START
JMP
.=STACK

; "NORMAL* START

;RESTART (SAVE ERROR ACCOUNTING)

MOV

#-1,RESTART

MACRO V05.01b Fridey

CVMUAAD MSV11-J MEMORY DIAG.
VARIABLES
INITIALIZED TO ZERO
4947
4948
4949

;sTHIS

4959
4960
4961
4962
4963
4964
4965
4966
4967

4968
4969
4970
4971
4972
4973
4974
4975
4976
4977
4978
4979

002014
002015
002016
002020
002022
002024
002026
002030
002032
002034
002036
002040
002044
002046
002050

002052

002054

002056
002060
002062
002064
4980 002066
4981 002070
4982 002072
4983 0020/4
4984 002076
4985 002100
4986 002102
4987 002104
4988 002106
4989 002110
4990 002112
4991 002114
4992 002116
4993 002120
4994 002122
4995 002124
4996 002126
4997 002130
4998 002132
4999 002134
5000 002136
5001 002140
5002 002142
5003 002144

VARIABLES

VARIOUS

Page 128

INITIALIZED TO ZERQ

COMMON STORAGE LOCATIONS

;#USED IN THE PROGRAM.

$CMTAG:
UFDSET:0
SELONLY:
O
DIAGFLAG: 0

;;START OF COMMON TAGS
;USER FRIENDLY FLAG
;SELECT ONLY BANKS MARKED BY FIELD SERVICE MODE FLAG
;:SET FOR SHIFTING DIAGONAL TEST
KAMIKAZE
:0
;:SET FOR KAMIKAZE MODE TESTING
SKIPKAMI:O
;USED TO SKIP RESTORING KAMIKAZE MODE WHEN MODIFIED
sNEXT TWO BYTES ARE DISPLAYED IN THE DISPLAY REGISTER

000000
000000
000000
000000
000000

000
000
000
000
000000

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
0000C0
000000
000000
000000
000000

000000

000000
000000
000000
000000
000000
000000

$PATMAR: .BYTE
$BANK:
.BYTE
$ERFLG: .BYTE
$ITEMB: .BYTE
LASTERROR
: . WORD
ERRPC:
.WORD
BADPC:
.WORD
ERRSP:
.WORD
BADSP:
.WORD
ERRPSW: .WORD

BADPSW:

000000

.WORD

ADDRES
: . WORD
S
PADDRESS
. WORD
:

PHYADD:

GOOD:
GO0D2:
GOOD3:
BAD:
BAD2:
BAD3:
BADXOR:
$AUTO:

FATALS:

SKPERR:
NEMCNT:

.WORD

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

.WORD

.WORD
O
PARCNT: O
PATERR: 0
NOPAR:
O
NONEM:
O
BANK :
0
BANKINDEX:
0
CPUBIT: 0

MUT :

ACFLAG:
MKFLAG:
PFLAG:

.WORD
.WORD
.WORD

PATTERN:O
KPFLAG: ,WORD

RRFLAG:
RLFLAG:

.WORD
.WORD

EQFLAG:

.WORD

;PATTERN NUMBER UNDER TEST

0
0
0
0

;BANK IS PROTECTED RLGION OF ECC
;BANK CAN BE ACCESSED BY THIS CPU
;:IF SET INDICATES MSV11-J OR MF115-K UNDER TESTssssessses
;:BANK IS IN PROGRAM SPACE

;PROGRAM IS RELOCATED FLAG

TMFLAG: .WORD
INTFLAG: .WORD

0
0
0
0

.WORD

;22 BIT PHYSICAL ADDRESS

; ;CONTRINS ’GOOD' DATA
: ;:CONTAINS 'GO0D2' DATA
; ;CONTAINS 'GOOD3' DATA
; ;:CONTAINS 'BAD' DATA
; ;CONTAINS 'BAD2’' DATA
; :CONTAINS 'BAD3' DATA
;XOR OF GOOD & BAD = BAD BITS!
; ;AUTOMATIC MODE INDICATOR FOR APT,ACT, & XXDP
;FATAL ERROR INDICATOR
;USED TO SKIP ERROR MESSAGE IN “$ERRGEN"
;NON-EXISTANT MEMORY COUNTER (HOLES)

;NO NON-EXISTANT MEMORY (HOLES) MODE INDICATOR
;MEMORY BANK UNDER TEST
;USED TO INDEX INTO CONFIG TABLE
;CONTAINS 1 BIT TO IDENTIFY CPU TO CONFIGURATION TABLE
;MEMORY UNDER TEST FLAG

INT64K:

;BANK & SIGN
; ;CONTAINS ERROR FLAG
; ;CONTAINS ITEM CONTROL BYTE
;NUMBER OF ERRORS ON LAST PASS
; CONTAINS PC OF ERROR FOR TYPEQUY
;CONTAINS PC OF ERROR
;CONTAINS SP OF ERROR FOR TYPEOUT
;CONTAINS SP OF ERROR
;CONTAINS PSW OF ERROR FOR TYPEOUT
;CONTAINS PSW OF ERROR
; ;CONTAINS ADDRESS OF 'BAD‘ DATA
; ADDRESS OF PARITY ERROR

;PARITY ERROR COUNTER
;PATTERN ERROR COUNTER
;NO PARITY ERROR MODE INDICATOR

.WORD

BMFLAG:

;PATTERN NUMBER

49%6
49%7 002012
4938 002013

.SBTTL

TABLE CONTAINS

[efelelolofolotolotototololoteolotatetetolooYoYol

4950 002000
4931 002000
4932 002002
4953 002004
4954 002006
4955 002010

B10

1S5-Feb-8S5 16:10

PMEMFLG:
. WORD
ABORTFLAG: .WORD 0

;BANK IS WHERE PROGRAM RELOCATION IS REQUIRED TO TEST

; "BANK IS IDENTIFIED AS BAD MEMORY' FLAG
; "BANK HAS EQB MEMORY" FLAG

; “TYPE OF MEMORY TO TEST” FLAG; 0 = PARITY, 1 = £CC

; "BANK IS INTERLEAVED" FLAG##sessssssssesssssssssssssse ) oo
: "BANK IS 64K INTERLEAVED: FLAG##ssssssssssessssssssess ) oa
; "MEMORY UNDER TEST IS A MSV11-J" FLAG
; "ABORT OCCURED' FLAG

CVMJAARO MSV11-J MEMORY DIAG.
VARIABLES

5004 002146

5005 002150

5006 002152
5007 002154
5008 002156
5009
5010 002160
5011 002162
5012 002164
5013 002166
5014 002170
5015 002172
5016 002174
5017 002176
5018
5019 002200
5020 002202
5021 002204
5022 002206
5023 002210
5024 002212
5025 002214
5026 002216
5027 002220

5028 002222
5029 002224
5030

5031 002226
5032 002230
5033 002232
5034 002234
5035 002236
5036 002240
5037 002242
5038 002246
5039 002252
5040 002256
5041 002262
5042 002264
5043 002265
5044 002266
5045 002270
5046 002272
5047 002274
5048 002276
5049 002300

C10

MACRO v05.01b Friday 15 Feb 85 16:10

INITIALIZED TO ZERO

000000

CTLKVEC:.WORD

000000
000000
000000

CSRND:
0
:CSR ADDRESS NUMBER (4 LSB'S)
SAVCSR: .WORD
0
:LOCATION TO SAVE CSRNO DURING FS COMMAND
OLDCSR: .WORD
O
:0LD CSR NUMBER(USED IN INH PTR TEST)
: THESE LOCATIONS STORE GPR’'S DURING SUPERVISOR TESTS
SUPDRO: 0
SUPDR1: 0
SUPDR2: 0
SUPDR3: 0
SUPDRA: 0
SUPDRS: 0
SUPDRG: O
DUMMY:
O
:DUMMY LOCATION FOR ADDRESS PASSING
: THESE LOCATIONS STORE GPR'S & PSW DURING DETAILED ERROR PRIN:OUTS
DETRO:
O
DETR1:
0©
DETR2:
0
DETR3:
0
DETR4:
0
DETRS:
0
DETSP:
0
DETPSW: 0
DETFLAG:0
;DETAILED REPORT FLAG

000000

CSR:

000000

000000
000000
000000

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

000000
000000

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000
000
000000
000000
000000
000000
000000
000000

000000
000000
000000
000000

.WORD

CSRFIRST:.WORD
CSRLAST: .WORD
CSRFBANK: .WORD
CSRLBANK: .WORD
.WORD
CSRINT:
SPLTCSR: .WORD
DATBUF: .WORD
TSTDAT: .WORD
SBEMSK: .WORD
DBEMSK: .WORD
SUPDOADD: .WORD
PASFLG: .BYTE
UPPFLG: .BYTE
PASSNO: .WORD
SAVA:
.WORD
SAVPAR: .WORD
SAVMON: _WORD
MONFLG: .WORD
REALPAT: .WORD

O
O
O
O
O
O
0,0
0.0
0.0
0.0
0
0
0
O
O
O
©
O
O

002302
002304
002306
002310

000000
000000
000000
000000

OLDCACHE: .WORD
PARTHERE: .WORD
FSSTACK: .WORD
NEWBANK: .WORD

5055
5056
5057
5058
5059

002314
002316
002320
002322
002324

000000
000000
000000
000000
000000

CHECK:
CBITS:
MASK:
CSR1S:
BITNO:

5060 002326

000000

CONTFLAG:0
TOTCSRS: .WORD

5050
5051
5052
5053

5054 002312

Page 128-1

SOURCE:

PCBUMP:

.WORD

.WORD
.WORD
.WORD
.WORD
.WORD

.WORD

0
0
0
O

O
O
O
O
O

;
SEQ 0119

;HOLDS OLD KERNAL STACK POINTER IN CASE OF CNTL/K

:DATA TO OR FROM CSR

:CSR'S
:1 BIT
:CSR_0
:FIRST
:
:
:

HAVE BEEN TESTED FLAG
PER EXISTING CSR, EGREPRESENTED BY BIiT 15, ETC.
ADDRESS UNDER CONTROL OF THIS CSR

:
:
:TWO WORD DATA BUFFER
;TWO WORD TEST DATA
:THO WORD SINGLE BIT ERROR MASK
:TWO WORD DOUBLE BIT ERROR MASK
;ADDRESS OF SUBROUTINE TO EXECUTE IN SUPERVISOR MODE
:LOCAL LOOP PASS CONTROL
:LOCAL LOOP PASS CONTROL
:LOCAL LOOP PASS CONTROL

:USED TO SAVE KERNAL PAR S
s:1.L.C.:REV
{USED TO SAVE KERNAL PAR 5
:XXDP MONITOR RETURN ADDRESS
:RETURN TO MONITOR FLAG
:REAL PATTERN UNDER TEST
:BACKED UP VALUE OF CACHE CONTROL REGISTER
:PARITY TRAPS SOMETIMES GO T0 ADDRESS STORED HERE
:STACK SAVED HERE IF IN FIELD SERVICE MODE
:USED FOR RELGCATION TO A NEW BANK
:SOURCE OF DATA WORDS FOR CHECKBIT GENERATION SUBROUTINE

;CHECKBITS TO BE LOADED INTO CSR
:CHECK BITS TO BE WRITTEN
;BIT MASK FOR CSR
:CSR ALL 1'S PATTERN
‘531 POINTER

:VALUE TO BUMP THE PC BY TO RECOVER AFTER A PARITY TRAP

D10

MACRO vV05.01b Fridey 15-Feb 85 16:10
CVMUAAQ MSVi1-J MEMORY DIAG.
INITIALIZED TO ZERO

VARIABLES

000000
5061 002330
000000
5062 002332
000000
5063 002334
000000
5064 002336
000000
5065 002340
000000
5066 002342
000000
5067 002344
5068 002346 000000
5069 002350 000000
000000
5070 002352
000000
5071 002354
5072
000
5073 002356
000
5074 002357
000
5075 002360
5076
000000
5077 002362
5078 002364 000000
5079 002366 000000
5080 002370 000000
000000
S081 002372
000000
5082 002374
000000
5083 002376
000000
5084 002400
000000
5085 002402
000000
5086 002404
000000
5087 002406
000000
5088 002410
000000
000000
002412
5089
000000
5090 002416
5091 002420 000000
000000
5092 002422
000000
5093 002424
000000
5094 002426
5095 002430 000000
000000
5096 002432
5097 002434 000000
000000
5098 002436
000000
5099 002440
000000
5100 002442
000000
S101 002444
000000
5102 002446
5103 002450 000000
000000
5104 002452
5105 002454 000000
5106 002456
000000
000000
5107 002460
000000
5108 002462
000000
000000
002470
000000
002476
000000
000000
5109 0023502
000000
000000
002510 000000 000000
002516 000000 000000
5110 002522
000000
5111 002524
000000
S112 002526
000000
S113 002530
000000

CSRINC: .WORD
CSRLOOP: .WORD
SUCCESS: .WORD
ZEROS:
.WORD

TIME:
LWORD
SKIPMK: .WORD
NULLFLAG: .WORD

QVFLAG:

O
©
O

O
O
O
O

Page

128-2

SEQ 0120

;VALUE TO INCREMENT ADDRESS BY TO REMAIN IN THE SAME (SR
;LOOP CONTROL FOR CSR TESTING
;FLAG SET B8Y SUCCESSFULL TASK OR SUBROUTINE

;FOR AID IN "MOV" INSTRUCTIONS
; SECONDS THAT BATTERIES SHOULD LAST
;FLAG TO SKIP MKCONTROL SUBROUTINE
;SET WHEN RUNNING NULL PATTERNS
;FLAGS QUICK VERIFY PASS UNDER APT, ACT, OR “XDP CHAIN MODE
;FLAGS ACT AUTOMATIC MODE PROGRAMMING RULES

ACTFLAG:0
APTFLAG: 0
;:FLAGS APT AUTOMATIC MODE PROGRAMMING RULES
XXDPCHAIN: O
;FLAGS XXDP CHAIN MODE PROGRAMMING RULES
;NOTE: THESE TWO BYTES MUST STAY TOGETHER
$NULL:
.BYTE
0
; s CONTAINS NULL CHARACTER FOR FILLS
$FILLS: .BYTE
O
; ;CONTAINS # OF FILL CHARACTERS
$TPFLG: .EYES
0
; : ' TERMINAL NOT AVAILABLE" FLAG
LEV

$ESCAPE: 0
EVEN:
0

; :ESCAPE ON ERROR ADDRESS
;USED FOR ALTERNATE DATA PATTERNS
;COUNTS DIAGONAL STRIPES
;BACKED UP COPY OF STRIPES
;NO TABLE BEING PRINTED - NOW
;SIZE OF 11/45 MDS MEMORY IN K WORDSsxsssssesssssss
;SIZE OF MF11S-K MEMORY IN K WORDS*#sssssssesssssss
;SIZE OF MSV11-L/P MEMORY IN K WORDS
;SIZE OF MSV11-J MEMORY IN K WORDS
;SIZE OF Q-BUS PARITY MEMORY IN K WORDS

STRIPES: O
COUNT:
O
NOTAB:
O
BSIZE:
O
KSIZE:
O
LSIZE:
O
MSIZE:
O
PSIZE:
O

TOOMANY: 0
READONLY: 0
TESTADD:0,0
UNITOP: O
STOPOK: O
APTPAR: .WORD
APTECC: .WORD
NOF SMODE : 0
NOERROR: 0
LOADBANK : 0
TEMP:
0

;FLAGS WHEN TOO MANY ERRORS HAVE BEEN PRINTED FOR A BANK
;FLAG TO PATTERNS TO READ ONLY
; THE ADDRESS TO RUN CSR TESTS ON

0
O

QUICK:
O
NOSCOPE : 0

FSINFLAG:0

000000
000000

APTSIZE:O
FS7FLAG: 0
CONFGERROR: 0
1:
0
N02281T:0
NOSUPER: 0
ERRADD: .WORD

O
CSRINF0:0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0

000000
000000

0
LINKL:
LINK2:
O
CSRHOLD: 0

KFLAG:

? sessss
? sesens

;HIGHEST ACCESSABLE BANK OF MEMORY THRU Q-BUS MAP
;FLAG TO ALLOW STOPPING WITH SWITCH REGISTER
; AMOUNT OF PARITY MEMORY ACCORDING TO APT
; AMOUNT OF ECC MEMORY ACCORDING TO APT
;FLAG TO DISABLE FIELD SERVICE MODE

; "THIS IS NOT AN ERROR” FLAG
;BANK LOADERS ARE RELOCATED TO
;USED FOR JUNK
;QUICK STOP FLAG FOR APT POWER FAIL
; "NO SCOPE LOOP ALLOWED" FLAG

; "FIELD SERVICE

NO INTERNAL

INTERLEAVE" FLAG

;APT SIZING INFO FLAG
; TRUE WHEN IN FIELD SERVICE COMMAND 7
;CONFIGURATION ERROR FLAG
;USED FOR GENERAL PURPOSE INDEXING
;NO 22-BIT MODE FLAG
;:NO SUPERVISOR MODE FLAG
;HOLDS THE CSR'S ERROR ADDRESS

;USED TO STORE INFORMATION ABOUT THE 16
;POSSIBLE CSR'S

;USED TO HOLD LINKS TO PATTERNS WHICH
;CAN EXECUTE IN THE PAR/PUR'S CR NOT
;USED TO STORE CSR VALUES FOR CSR TESTS

;USED TO FLAG MF11S-K MEMORY TO TESTSeessscesessscessecnseese

MACRO V05.01b Fridey

CVMJUAAO MSV11-J MEMORY DIAG.
INITIALIZED TO ZERO

VARIABLES

5114
5115
5116
5117
S118

002532
002536
002540
002542
002544

000000
000000
000000
000000

000000

15 Feb-85

E10

16:10

Page

128

SEQ 0121
PGMCSR.

.WORD

INHECC: .WORD
INHBANK:
. WORD

FULLREL: .WORD

O .0

O
O
O

$CMTGE: ;+END OF COMMON TAGS

;POINTS TO PROGRAM CSR
;FLAGS INHIBIT ECC TESTS ON RELOCATION

CVMUAAD MSV11-J MEMORY DIAG.
VARIABLES
5121

5122 002544
5123 002550
5124 002552
5125 002554
5126 002556
5127 002560
5128 002562
5129 002564
5130 002566
$131 002570
5132 0028572
$133 002574

$134 002576

5135 002600
5136 002602
5137 002604
$138 002606
5139 002610
5140 002612
$141 002614
5142 002615
5143 002620
5144 002622
5145 002624
5146 002626
gi:; 002630

F10

MACRO V05.01b Fridey 15-Feb 85 16:10

INITIALIZED TO NOt« ZERO

000401
001014
040000
000012
000177
177000
160000
000000
000000
000000
000031
002000

.SBTTL

000000

CACHKN: 401,0
CACHKF: 1014
TESTMODE : 40000
ERRMAX: 10.
LASTBANK:177
LASTBLOCK:177000
ENDADD: 160000
ENDFLG: O
SWRFLG: 0O
PASCNT: O
SOBK:
25.
KSTACK: STACK

000001

YARIABLES

0u03%77
177400

BAKPAT:
SWAPAT:

5154 002636
5155 002640
5156 002642
S157 002644
5158 002646
5159 002650
5160 002652
5161 002623

177570
177570
177560
177562
177564
177566
012
goz

SWR:
.WORD
DISPLAY: .WORD
$TKS:
177560
$TKD:
177562
$TPS:
177564
$TPB:
177566
$FILLC: .BYTE
$BELL:
.ASCIZ

DSWR
ODISP

5162 002657
5163 002660
5164 002661

077
015
012

$QUES:
$CRLF:
$LF:

/?/
<«15>
<«12»

5152

5153

002656

5165

;CACHE CONSTANT (MOVED TO CONTRL TO TURN ON CACHE)
;CACHE CONSTANT (MOVED TO CONTRL TO TURN OFF CACHE)
;USED TO SELECT THE PROPER TEST MODE FOR A PATTERN RUN
;MAX & OF ERRORS PER BANK WITH SW11l
;HIGHEST BANK OF MEMORY
;HIGHEST BANK OF MEMORY+1 (IN PAR FORMAT)
;ENDING ADDRESS
;END FLAG
;:USED TQ BUMP STACK ON FIRST CALL TO GTSWR
;PASS COUNTER
;508 CONSTANT
: STACK BEGINNING

;HOME BANK OF LOADERS

WORST:
177777
SEEDHI: 176543
SEEDLO: 123456
MSEEDH: 176543
MSEEDL: 123456
HEADER: 177777
ONES:
177777
FLIPLOC:3
SOFTPAT : 52525
$LPADR: .WORD
$LPERR: .WORD
RESTART:0
$ERTTL: .WORD

5150 002632
S151 002634

SEQ 0122

INITIALIZED TO NON ZERO

L OADHOME : 1

177777
176543
123456
176543
123456
177777
177777
000003
052525
000000
000000
000000
000000

S149

Page 130

;SET IF TESTING BANKS IN WORST FIRST MODE(1ST PASS)
;sWORKING SEED HI (USED FOR RANDOM NUMBER GENERATOR)
;WORKING SEED LO (USED FOR RANDQOM NUMBER GENERATOR)
;MASTER SEED HI (USED FOR RANDOM NUMBER GENERATOR)
;MASTER SEED LO (USED FOR RANDOM NUMBER GENERATOR)
;USED TO PRINT HEADINGS ONLY ONCE
;FOR AID IN "MOV" INSTRUCTIONS
;COUNTER FOR FLIPING DATA ON WORST CASE NOISE TEST
;PATTERN FOR SOFT ERROR BACKGROUND TESTS
; ; CONTAINS SCOPE LOOP ADDRESS
; ; CONTAINS SCOPE RETURN FOR ERRORS
;RESTART (START ADD 202) FLAG
; sCONTAINS TOTAL ERRORS

O
O

sekkkkkkkkkdkhkaksbekkkk NOTE THESE TWO LOCATIONS MUST STAY TOGETHER ssxssssnesss
R

377

000

377

L Ll

.WORD
.WORD
L

.ASCII
.ASCII
.ASCIZ
.EVEN

377
177400

;BACKGROUND PATTERN
; SWAPPED BAKPAT

T IS T

LTM

; ; ADDRESS OF SWITCH REGISTER
; ; ADDRESS OF DISPLAY REGISTER
;:TTY KBD STATUS
:;TTY KBD BUFFER
;:TTY PRINTER STATUS REG. ADDRESS
;s TTY PRINTER BUFFER REG. ADDRESS
12
;s INSERT FILL CHARS. AFTER A “LINE FEED"
<207><377><377> ;;CODE FOR BELL
; ; QUESTION MARK
; ;sCARRIAGE RETURN
: :LINE FEED

*
*

CVMJARO MSV11-J MEMORY DIAG.
CONFIGURATION TABLE
5168
5169
5170
5171
5172
5173
5174
5175
5176
5177
5178
5179
5180
5181
5182
5183
5184

Page 132

SEQ 0123

.SBTTL

CONFIGURATION TABLE

2ND

16K CONFIGURATION WORDS (2 EACH)

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

200TH

16K CONFIGURATION WORDS (2 EACH)

CONFIGURATION WORDS:
LOW:

HIGH:

@¢

.CONFIG:FIRST 16K CONFIGURATION WORDS (2 EACH)

5185
5186
5187
5188
5189
5190 002664
5193 003670

G10

MACRO V05.01b Friday 15-Feb-85 16:10

000201

CONFIG: .REPT
CONFIEND:

201

BIT
B8IT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT

ERRORS PRESENT

MEMORY SUCESSFULLY ACCESSED
RESERVED

SKIP ECC LOGIC TESTS FLAG (1=SKIP)

PROTECTED REGION OF ECC MEMORY
PROTECTED (PROGRAM SPACE)

CSR _CODE
RESERVED
NUMBER OF ERRORS
MEMORY TYPE
RESERVED
RESERVED

"BACKGROUND PATTERN VALID”" FLAG

BANK SELECTED FOR TEST B8Y FIELD SERVICE MODE
LOADERS HOME BANK

CVMJUARO MSV11-J MEMORY DIAG.
sasssssssesessssstssy MAIN

H10

MACRO v05.01b Friday 15-Feb 85 16:10

Page 133

sestsosstsstssssstntshbbss

5195
5196 003670

SEQ 01.4

.SBTTL
SUBTST

START:
T

skhnkkkkkkkhnkhphhhkbrk MAIN *xsbessssnssrssasensseness
<<INITIALIZE VARIABLES TO ZERO>>

; *SUBTEST

SUBTST
S

; *SUBTEST

2233223233228

5213
5214
5215
5216
3217
5218

003736
003742
003744
003750
003752
003760

331223 32

ISt

YY)

I T

SAVEMT
el

; SAVEMT SAVES THE EMULATOR AND PRIORITY LOCATION
;UNDER THE NAMES OF SAV30 AND SAV32.
013737
013737

000402
000000
000000

000030
000032

105737
001001
000005

056666

005037
010637
013706
012700
005020
022700
001374
012737

002276
002274
002574
002000

003706
003710

MOV

VMKOR:
NORES:

002556

; ;CLEAR RETURN TO MONITOR FLAG

SP, SAVMON

; i SAVE XXDP MONITOR RESTART ADDRESS
;s SETUP THE STACK POINTER
:;FIRST LOCATION TO BE CLEARED
; ;CLEAR MEMORY LOCATION
; ;DONE?
;L0O0P BACK IF NO
;RESTORE LASTBANK (THIS MUST BE DONE PRIOR TO SYSTEM SIZING)

KSTACK,
SP
#$CMTAG,RO

Mov

#$CMTGE
RO
1$
#177,LASTBANK

(RO)+

N L

R d

CLR

MONFLG

<<CLEAR NON-PROGRAM SPACE>>

SUBTST

MONFLG

MOV
MOV
MoV

CLR
cMP
BNE

1$:

; ; SAVE EMULATOR ADDRESS
: ;SAVE EMULATOR PRIORITY LEVEL
: :GET AROUND TAG AREA
; :PUT EMULATOR INFO HERE
: :PUT PRIORITY LOCATION HERE

30,S5AV30
32,5Av32
VMKOR
0
0
$ENV
NORES

MOV

BR
.WORD
.WORD
15718
BNE
RESET
CLEAR

SAV30:
SAV32:

002544

000177

EMTSAV:

; *SUBTEST

I I

CLEAR NON-PROGRAM SPACE

5219
5220
5221
3222 003760
5223 003766
5224 003770
5225 003772
5226 003774
Se27 004000
5228 004002
5229

<<SAVEMT>>

5199
5200
5201
3202 003670
5203 003676
5204 003704
5205 003706
5206 003710
5207 003712
3208 003716
3209 003720
5210 003722
003722
5211 003726
Se12 003732

INITIALIZE VARIABLES TO ZERO

BRI 2222121323223 222222

5197
5198 003670

;:THIS ATTEMPS TO GET RID OF ANY PARITY ERRORS BY WRITING INTO
;EVERY LOCATION THAT IS NOT LOADED INTO B8Y THE PROGRAM OR ALLOCATED

012737
005000
000241
005520
020027

000001

005037

002076

103773

002076

2%:
160000

;TO THE XXDP LOADERS
MOV
#1,NOPAR
RO
CLR

CLC

ADC
CMP
BLO

CLR

;:PARITY ACTION = COUNT & IGNORE

(RO)+

RO, #160000

NOPAR

;RESTORE DEFAULT PARITY ACTION

CVMJARQ MSV11-J MEMORY DIAG.
CLEAR NON-PROGRAM SPACE

110

MACRO VO0S5.01b Friday 15 Feb-85 16:10

5231 004006

SUBTST

5232 004006
5233 004010
5234 004012
004012

012737

004074

000004

5235 004020
5236 004026

012737
000007

004032

000010

3537

22222

222

st it

TYPE OF SYSTEM SIZER

222222222

BR
PROTYP: .WORD
SYSSIZ: SET4
Moy|
.DSABL

MOV
MFPT

2ttt

ittt it

it i

ittt

000406
012737

047122

104401

071474

000034

000000
012737
110037

000012
004010

000010

012737

004074

000004

5248 004066
5249 004072
5250 004074

177746

5251 004100
5252 004106
5253 004114
5254 004116
004116

005737
000447
005037

002544

002336
000005

060342
004010

012737

004146

000004

5255
5256
5257
5258

004124
004130
004136
004144

005037
052737
032737
001005

172516
000020
000020

172516
172516

5260 004152
5261 004160
5262 004166

012737
012737
005237

000007
140000
002456

5264
5265
5266
5267

005037
005037
005037
022737

060352
060214
060354
000005

004010

000020

172516
000004

5259 004146 005237 002454

002556
002552

2%:

5268 004220
5269 004222
5270 004230
004230

001003
052737

012737

004254

5271
5272
5273
5274

005037
005737
012737

052314
177766
177777

004236
004242
004246
004254

212,10
RO,PROTYP
#3$
434.4

.DSABL

4%:
S¢:

5263 004172 005037 060212
004176
004202
004206
004212

HALT
MOV
MOVB
SET4
MOV

MOV
CMP
BEQ
SET4
MOV

052314

CRF

22¢:

7%:

CONTRL
6%
CACHKN
#ZEROS,DT14
#5,PROTYP
63
84
#4%,4

CRF

NEWER

PROCESSORS

ONLY)

;LOAD TRAP VECTOR
:TELL THEM BAD PROCESSOR TYPE

;NO NEED TO GO ON
;RESTORE TRAPS T0 10
;MOV THE CODE TO PROTYP
;

;SEE_IF CACHE REGISTER RESPONDS
;BRANCH IF CACHE AVAILABLE
iNO CACHE ON SYSTEM

:D0 NOT PRINT CONTRL ERROR MESSAGES
;IS THIS A 11/83/84
:YES - BRANCH
:

MMR3
#8174 ,MMR3
#8174 ,MMR3
5$

;SEE IF THERE IS 22-BIT ADDRESSING
:
:
:BRANCH IF 22-BIT_RELOCATION

MOV
MOV
INC

#7, LASTBANK
#140000, TESTMODE
NOSUPER

;HIGHEST BANK OF MEMORY
iMAKE TESTMODE USER
:

DT14+10
DT5+12
DT14+12
#5,PROTYP

:
;
;
iCPU TYPE = 11/83/84

INC

CLR
CLR
CLR
CMP

BNE
BIS
SET4
MOV
.DSABL
CLR
TST
MOV
RES4

N0228BI7
DT15+10

224
#BIT4 ,MMR3
07$
#74.4
CRF
CPERRF
3177766
#-1,CPERRF

PLACES

;A CODE_IN THE LOWER BYTE OF RO THAT
; INDICATES THE PROCESSOR TYPE. 1=11/44
;3=11/23, 5=11/83/84 (Orion)

CLR
BIS
BIT
BNE

CLR

65:

ittt

;TRAPS TO 10 = BAD PROCESSOR TYPE
;TYPE_OF PROCESSOR TEST: THIS INSTRUCTION

.DSABL.. CRF

3$:

#1%,10

24
#$TYPE, 34
MSG130
,MSG130

TST
BR
CLR

:SKIP OVER VARIABLE LOCATION

BR
MOV
TYPE _
TYPEIT
.DSABL

004044
004046
004054
004060
004060

012737
022737
001436

1%:

i ittt it

SYSSIZ
O
#3$
E3%.

: (AVAILABLE

5238
5239
5240
5241 004030
5242 004032
5243 004040
004040

5244
5245
5246
5247

000401
000000

SEQ 0125

<<TYPE OF SYSTEM SIZER>>

223222322222

; *SUBTEST

Page 134

iSET FOR NO 22 BIT ADDRESSING

;CLEAR SOME ERROR DATA TAGS

iNO_ BRANCH
:SET UP 22 BIT ADDRESSING
:TRAPS GO TO 43

:CLEAR THE FLAG
:IS THERE A CPU ERROR REGISTER?
: YES- TRAPPED
;ENABLE TRAPS 10 4

CVMJUARQ MSV11-J MEMORY DIAG.
TYPE OF

SYSTEM SIZER

004254
004262
004270
88:5;2

5275

012737
022737
001002
005037

034114
000005
177766

J10

MACRO V05.01b Fridey 15-Feb 85 16:10
000004
004010
lo1s

MOV
CMF
BNE
CLR

#TIMEOUT,4
#5,PROTYP
101¢
CPUERR

.DSABL

CRF

Page 134-1

;1S THIS AN 11/83/84 ?
;:BRANCH IF NOT
;CLEAR OUT THE CPU ERROR REGISTER BITS
; THAT A EXPECTED TRAP COULD HAVE SET

SEQ 0126

CVMJAAQ MSV11-J MEMORY DIAG.
TYPE OF SYSTEM SIZER

K10

MACRO V05.01b Friday 15-Feb-85 16:10

5278 004276

SUBTST

; #SUBTEST
L

5279 004276

004276
5280 004304
5281 004312
004312
5282 004320

5283 004326

5284 004334
5285 004342
5286 004350

5287 004356
5288 004364

WORST

MOV

012737
012737

177777
176543

002612
002606

SET

#3,FLIPLOC

HEADER

MOV

#176543 ,MSEEDH

013737
013737
012737

002606
002610
000377

002602
002604
002632

MOV
MoV
MOV

MSEEDH, SEEDHI
MSEEDL ,SEEDLO
#377,BAKPAT

012737

123456

177400

002610

MOV

002634

MOV
SUBTST
T

012737

5291
5292
5293
5294
5295
5296

012737
012737
012737
012737
012737
012737

5304 004516
5305 004524

012737

012737
012737
012737
012737
012737
012737
012737
012737
104423

051146

000020

051502
000340
056764
000340
045352
000340

000030
000032
000034
000036
000024
000026

000340

033744
000340
034140
000340
034114
000340
034126
000340

000022

000114
000116
000010
000012
000004
000006
000250

000252

YIS

#123456 ,MSEEDL

MOV

#-1,WORST

MOV

#-1,HEADER

;PRIME THE RANDOM NUMBER GENERATOR
;80TH HIGH AND LOW WORDS

#177400, SWAPAT
<<INITIALIZE VECTORS>>

INITIALIZE VECTORS
s

T
e

MOV

#$SCOPE, JIOTVEC

;10T VECTOR FOR SCOPE ROUTINE

MOV
MOV
MOV
MOV
MOV
MOV

#$ERROR, EMTVEC
#340,EMTVEC.2
#$TRAP, TRAPVEC
#340, TRAPVEC+2
#$PWRDN, PWRVEC
#340,PURVEC+2

; ;EMT VECTOR FOR ERROR ROUTINE
;sLEVEL 7
;: : TRAP VECTOR FOR TRAP CALLS
;LEVEL 7
; ;POWER FAILURE VECTOR
;sLEVEL 7

MOV

MOV
MoV
MoV
MOV
MOV
MOV
MOV
MoV
CACHON

e T
Y I
Ty

SET

5289 004364

5297 004444
5298 004452
5299 004460
5300 004466
5301 004474
5302 004502
5303 004510

002600
002616

;#SLLTEST

004400
004406
004414
004422
004430
004436

INITIALIZE VARIABLES TO NON ZERO

177777
000003

012737

SEQ 0127

<«<INITIALIZE VARIABLES TO NON ZERO>>

012737
012737

5290 004372

Page 136

#340,I0TVEC.2

#PARITY,PARVEC
#340,PARVEC+2
#PDP1105,RESVEC
#340,RESVEC+2
#1IMEOUT ,ERRVEC
#340,ERRVEC+2
#MMTRAP ,MMVEC
#340,MMVEC+2

;sLEVEL 7

;GET READY FOR PARITY ERRORS
;RESERVED INSTRUCTION TRAP

:SETUP TIMEOUT ERRORS
;SET PRIORITY OF ERROR TRAPS
; VECTOR FOR MEMORY MANAGEMENT
; TURN CACHE ON

T TY T D)
e

CVMJAAQD MSV11-J MEMORY DIAG.
INITIALIZE VECTORS

L10

MACRO v05.01b Friday 15-Feb-85 16:10

SUBTST
R

ii i1t 122 LR

; *SUBTEST
;S8

S315 004534
5316 004540

5317 004544
5318 004550
5319 004552
5320 004556
5321 004562
5322 004564
5323 004570
5324 004574
5325 004600
5326 004602
5327 004606
5328 004612
5329 004614
5330 004620
5331 004624
5332 004630
5333 004632
5334 004636
5335 004642
5336
5337 004644

A RS EE SR AL R

<<INITIALIZE PATTERNS>>
222238222222t

d 2222223ttt

INITIALIZE PATTERNS

RS A SRS LR R LR

EERRRERERESERERA SRS

it ittt

i itz

IR}

SRR R ERES AR RS C RS RO E LRSS ARG SRS

OE S

;THE APT E TABLE DETERMINES WHICH PATTERNS ARE GOING TO BE RUN.

;EACH BIT SET REPRESENTS A PATTERN TABLE ENTRY THAT IS TO BE LEFT
;ALONE (TO BE RUN).
EACH BIT CLEARED REPRESENTS A PATTERN TABLE ENTRY

012700
012001
012703
012702
004737
012001
012702
004737
012001
012703
012702
004737
012001
012702
004737
012001
012703
012702
004737
012001
012702
004737
000417

; THAT
MOV

056734

MOV
MOV
MOV
CALL
MoV

017014

000020
004644
000010
004644

MOV

CALL
MOV
MOV
MOV
CALL
MOV
MOV
CALL
MOV
MOV
MOV
CALL
MOV
MOV

017244
000020
004644
000010
004644
017430
000020
004644

000010
004644

IS TO BE OVERLAYED WITH THE ADDRESS OF A NULL PATTERN.
#$0DWO,RO
(RO)+,R1
#MKCSRT ,R3
#16. ,R2
PATPLUG
(RO)+,R1
#8. ,R2
PATPLUG
(RO)+,R1
#MKPAT ,R3
#16. ,R2
PATPLUG
(RO)+,R1
#8.,Re
PATPLUG
(RO)+,R1
#MUPAT ,R3
#16. ,R2
PATPLUG

(RO)+,R1

#8.,R2

CALL
BR

PATPLUG
SUBAAA

PATPLUG:SUBTST
BRAl

SRR

012737

000001

012713

PLUG IN NULL PATTERNS>>

FOR I

024220

000002

005237
023702
003765

002452
002452

R R

R RN

R SRR R R R R AR

2222333222323 23
AR SRRSO

#1 TO R2
Ri

MOV #MT0999,(R3)
END ;OF ON.ERROR
ADD #2,R3
END ;OF FOR

RETURN

i s

PLUG IN NULL PATTERNS

ON.NOERROR

062703

000207

SUBR

ROR

006001

103402

002452

«<SUBR

31312 23 22 P L2 222222232ttt

; *SUBTEST

5338 004644
004644
004652
5339 004652
5340 004654
004654
5341 004656
5342 004662
004662
5343 004662
5344 004666
004666
004672
004676
004700
5345 004700

138

SEQ 0128

5308 004526

5309
5310
5311
5312
5313 004526
5314 004532

Peage

E R R SRS AR R R e

MOV 21,1

BO:::::::
:IF CARRY CLEAR

8CS LO
o

LO:::::::

INC I
cMP 1I,.R2
BLE BO

EO:;::::::

P22
b O

CVMJUARQ MSV11l-J MEMORY DIAG.
SUBR
PLUG IN NULL PATTERNS

M10

MACRC V05.01b Friday 15 Feb-85 16:10

S348 004702

SUBAAA:

SUBTST

Page 140

SEQ 0129

«<<CLEAR THE CONFIGURATION TABLE>>

I
e T
I
OO ImmMmMmTamTanInmMmmTTII MMM

; *SUBTEST

5349

S350
5351
5352 004702
004702
004706
S353 004710
5354 004714
5355 004716
5356 004722
5357 004724

CLEAR Ti& CONFIGURATION TABLE
I

; THIS ZEROS (UNLESS WE STARTED AT ADDRESS 202) THE CONFIG TABLE

005737
001006
012700
005020
022700
001374

;WHICH IS FULLY DISCRIBED AT LOCATION "CONFIG”.
.ENABLE LSB
IF RESTART IS FALSE

002626
002664

1¢:

003670

004724

MOV
CLR
CMP
BNE
END ;0F

OCONFIG,RO
(RO)«
#CONFIEND,RO
14
IF RESTART

.DSABL

LSB

SUBTST

«<«<SIZE FOR A HARDWARE SWITCH REGISTER>>

TST RESTART
BNE L1

Ll:sssiss

5358

5359 004724
5360 004732

012737

000002

002106

MOV
SRR

; *SUBTEST

5361
5362
5363

5364 004732

I R

#B8IT1,CPUBIT

RN R

SET4

$#33

004766

000004

HggABL

5365 004740
5366 004746
5367 004754
004754

012737
012737

177570
177570

002636
002640

022777
001023
000403

177777

175654

MOV
#DSUR, SWR
MOV
#DDISP,DISPLAY
IF #-1 EQ aSUR

5368 004764

S370 004772

012716

000002

004774

004774
005002

012737
022737

034114
000005

5371 004774
005010
Ooggig

5372 005016
S373 005024
5374 005032
5375

005032

R R

E N R R

R AR E

R R

SRS

E SIS E S S &S

;3
IF NOT FOUND OR IT 1S
;;EQUAL TO A "-1", SETUP FOR A SOFTWARE SWITCH REGISTER.
.ENABL
LSB

012737

5369 004766

SIZE FOR A HARDWARE SWITCH REGISTER

004732

004762

;SET ID BIT

001002
005037

012737
012737

000004
004010

177766

000176
000174

RTI

2%:

101

002636
002640

MOV
RESS

MOV
CMP

ggé.4

$#24,(SP)
#TIMEOUT,4
#5,PROTYP

BNE
CLR

1014
CPUERR

.DSABL

CRF

.DSABL

LSB

;TRAPS TO 4 GOTO 3¢

;;SETUP FOR A HARDWARE SWITCH REGISTER
;;AND A HARDWARE DISPLAY REGISTER
;IF NO TRAP FROM REFERENCE TO aSWR AND aSWR = #-1
CMP #-1,8SWR
BNE L2
; ;BRANCH IF NO TIMEQUT

;:SET UP FOR TRAP RETURN

;RESET TRAPS T0 4 TO DEFAULT

;IS THIS AN 11/83/84 ?

;BRANCH IF NOT
;CLEAR QUT THE CPU ERROR REGISTER BITS
; THAT A EXPECTED TRAP COULD HAVE SET

MOV
#SWREG, SWR
; ;POINT TO SOFTWARE SWR
MOV
#DISPREG,DISPLAY
END ;OF IF #-1
L2

N10

MACRO V05.01b Fridey

15-Feb-85 16:10

CVMUAAQ MSV11-J MEMORY [IAG.
SIZE FOR A HARDWARE SWITCH REGISTER

SEQ 0130
SUBAAB:

5378 005032

SUBTST

s FER SRS R

APT,

& XXDP>>

SETUP ACT, APT, & XXDP

005044
5383 005046
005046
5384 005054
005054
5385 005054
005054
005062
5386 005064
005064
5387 005072
005072
5388 005072
005072
005100
5389 005102
005102
005110
005116
005124
3390 005132
5391 005140

<<SETUP ACT,

AR ESEREREERE SRR RSN R SRR REEER KSR R R R AR

; *SUBTEST
5379
5380
5381 005032
5382 005036
005036

Page 142

A AR SRR

E RS R UG SRR NGRS SO

0000NS

; THIS SETS UP A BUNCH OF FLAGS TO TELL THE PROGRAM EVERYTHING

005037

056654

132737

000040

001403

056667

012737

177777

002360

132737
001403

000200

056667

012737

177777

002444

123727
001023

056666

000001

012737
012737
012737

1717777
177777
177777
17771717
040720
056670

012737

012737
012737

002352
002346
002062

002436

000024
002636

; IT CARES TO KNOW ABOUT APT, ACT, & XXDP.
CLR
$PASS
;CLEAR PASS COUNT
IFB #BITS SET.IN $ENVM
SET
END

$TPFLG

IFB 4BIT7 SET.IN $ENVM

END

BEQ L3

; INDICATE NO TERMINAL

;OF IFB #BITS

SET

BITB #BITS, $ENVM
MOV

@-1,8TPFLG

BITB 4BIT7, $ENVM
BEQ L4

APTSIZE

MOV

;OF IFB #BIT?

#-1,APTSIZE

IFB $ENV EQ #1

SET

APTFLAG,QVFLAG,
$AUTO, QUICK

MOV
MOV

#APTDOWN,PWRVEC
#$SWREG,
SWP

;USE APT SWR

BNE LS
MOV
MOV
MOV
MOV

#-1,APTFLAG
#-1,QVFLAG
#-1,$AUTO
@-1,QUICK

CVMUAAQ MSV1]-J MEMORY DI1AG.
SETUP ACT, APT, £ XXDP
5392 005146

005146
003130
5393 005130
005150
005136
003160
005164
5394 003166
003166
005174
5393 0035202
005202

003210
3396 003212
003212
5397 005220
005220
005222
5398 005222
005222
5399 005230
005230
5400 005230
005230
5401 005230
005230

MACRO v05.01b Fridey

000042

002000

005737
001421

000042

012737
012737

177777
177777

002346
002062

023727
001004

000042

014042

012737

1mnm

002350

Pege 142-1}

1777717

002354

IF 42 NE OSTACK AND 42 NE #0

CMP 42,0STACK
8EQ L?
TST 42

SET QVFLAG, $AUTO
IF 42 EQ #$ENDAD

SET

ACTFLAG

ELSE

000403
012737

Bl1l

16:10

ELSE

000430
023727
001424

15-Feb-B85

SE”
END
END
END

XXDPCHAIN

;OF IF 42

;0F IFB $ENV

BEQ L7
MOV

MOV

6-1,QVFLAG
@-1,$AUTO

CHP 42, 0$ENDAD
BNE L10
MOV

@-1,ACTFLAG

CVMJARO MSV1]-J MEMORY DIAG.
SETUF ACT, APT, £ XXDP

Cll

MACRO v05.01b Friday 15-Feb 85 16:10

S403 005230

SUBTST

; #SUBTEST

5404 005230

5406 005244
005244
005252
S407 005254
005254
005260
5408 005262
005262
S409 005270
S410 005272
005272
005274
S411 005274
005274

052737

000200

002664

000200

002670

022737
001412

014042

000042

005737
001405

002454

012737
104064

77777

BIS

T T

#BIT77,CONFIG

BI1S

SET

END

SUBTST

T T

CMP #$ENDAD,
42
BEQ L12

MONFLG

TST NO22BIT
BEQ L13

;RETURN TO XXDP MONITOR

MOV

; ILLEGAL PROCESSOR
:

&-1,MONFLG

BR L14
L13:::::::
; TYPE PROGRAM TITLE

CRF

L14:5::::;
L12:::::::

<«<CHECK FOR CACHE AND MEMORY MANAGEMENT>>

; *SUBTEST

END ;0F IF #$ENDAD

5415 005300

;NOT ACT-117?

TYPE
MSGOOO
TYPEIT
,MSGOOO
.DSABL

;PROTECT LOADER SPACE (BANK 1)

ERROR +64
ELSE

5412 005300
005300
5413 005300
sa14 005300

I I

;PROTECT PROGRAM SPACE (BANK 0)

#BIT7,CONFIG+4

IF N022BIT NE #0

071422

N N I

IF #$ENDAD NE 42

002276

PROTECT PROGRAM & LOADERS

000402
104401

SEQ 0132

<«<PROTECT PROGRAM & LOADERS>:

S40S 005236

Page 143

I I T

I N

CHECK FOR CACHE AND MEMORY MANAGEMENT

Inm

I
N I
I
N N
N
I
nIImMmTr

5416

;¢

S417
S418 005300
005300

000004

:* ON THE SYSTEM, AND WHETHER IT IS ENABLED OR DISABLED.
SET4
234
#34.4
MOV

000004

18T
SET4
MOV

012737

005500

005737

177746

012737

005412

005737
013746
012737
032737
001415

172516
000004
005400
001000

005346

104401

071100

5427 005352
5428 005360
5429 005366
005366

052737
042737

000400
000077

104401

071547

5430 005372
5431 005376
5432 00540

012637
000411
012637

000004

104401

071112

5419 005306
5420 005312
005312
5421
5422
S423
5424
5425
5426

005320
005324
005330
005336
005344
005346

S433 005404
005404

000004

THIS

.DSABL

12¢:

CRF

THERE

CACHE

AND MEMORY

MANAGEMENT

187
MOV
MOV
BIT
BEQ
TYPE

MMR3
4,-(SP)
2144 .4
08179,3#177750
144
M1184

:IS
::V
;:;V
;:V
::;V
::V

.DSABL

CRF

8IS
8IC
TYPE
TYPEIT

.DSABL

144

;IS THERE A CONTROL REGISTER?

TYPEIT

177730
177734

OUT

CONTRL
#1¢
#14,4

.OSABL

000004
177750

FIGURES

MOV
BR
MOV

TYPE
TYPEIT

CRF

,M1184

#BI78,a8177730
#77,94177734
NOUBMT
,NQUBMT

CRF

(SP).,4
44
(SP). .4
MSG117
,MSG117

THERE A MMR3 REGISTER?
SAVE OLD TIME OUT
PASS ON KTJl11
TEST FOR 1184
ELSE REPORT 1183
REPORT 1184

;:V SET ABILITY TO CLEAR
;:V UNIBUS MEMORY ACCESS
;:V TO UNIBUS
;:V AND REPORT NO UNIBUS
; sV MEMORY ACCESS AND CONTINUE
;:V ALSO RESTORE OLD TIME OUT
;

11783

CVHMJAAQ MSV11-J MEMORY DIAG.
CHECK FOR CACHE AND MEMORY MANAGEMENT

MACRO V05.01b Friday

5434 005410
5435 005412
005412
5436 005420
5437 005422
5438 005430
5439 005436
5440 005444
5441 005446
5442 005454
5443 005456

5444
5445
5446
5447
5448

000404

012737
104064
052737
042737
032737
001004
032737
001413

177777

002276

000014
000014
000004

177746
177746
177746

000010

177746

005456

104401

071154

005462
005464
005472
005476
005500
005500

104424
013737
005037

002544
002544

5449 005504
005504

000404

104401

071124

104401

071133

15 Feb

D11

1A:10

Pege

143

SEQ 0133

18:
4¢:

.DSABL
BR
SET

CRF
4%
MONFLG

ERROR
BIS
8IC
BIT
BNE

+64
#BIT2'BIT3,CONTRL
#8I172'8IT3, CONTRL
#BIT2,CONTRL
74

BEQ

BIT

7%:

TYPE
TYPEIT

#BIT3,CONTRL

MSG121
,MSG121

CRF
.DSABL
CACHOFF
Mov
CACHKN,CACHKN+2
CLR
CACHKN

002546

3s:
6%:

BR
TYPE

TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL

8¢
MSG119
,MSG119
CRF
MSG120

,MSG120

CRF

;PROCESSOR NOT

SUPPORTED BY THIS DIAGNOSTIC
MOV
&-1,MONFLG

;NO MEMORY MANAGEMENT
;SET CACHE DISABLE BITS
;CLEAR CACHE DISABLE BITS
;IS THE BIT SET?
;BRANCH IF THE BIT IS SE:
;IS THE BIT SET?
;BRANCH IF THE BIT IS SET
; CACHE BYPASSED

; SAVE INFG ABOUT CACHE
; CACHE CANNOT BE USED - IT'S BYPASSED
:

;CACHE AVAILABLE

CVMJAAQ MSV11-J MEMORY DIAG.
CHECK FOR CACHE AND MEMORY MANAGEMENT

MACRO V05.01b Friday

16:10

5462
5463
5464 005542

5465
5466 005550
005550
5467 005554
5468
5469 005556

002456

042737
052737

030000
010000

012746
006606

000740

052737

030000

012746
006606

000700

001011

8%:

002636

000176

012737
104407
005037

177777

002566

5%:

BIC
BIS

#BIT13!8IT12,PSW
#B8IT12,PSW

PUSH

#SUPSTK

MTPI

SSP

PUSH

#USESTK

MTPI

usP

SET

104420

P e

T e

TST $AUTO
BNE L15
:IF SOFTWARE SWITCH REG SELECTED
CMP SWR, #SWREG
BNE L16
:;SET FLG TO BUMP STACK

SWRFLG

MOV

GTSWR

; ;CLEAR IT FOR REST OF PROGRAM
L16:;:::::

;0F IF $AUTO
<<GET MEMORY MANAGEMENT READY>>
s

CALL
.DSABL

ENERGIZE

GET MEMORY MANAGEMENT READY
T

KMAP
MAP
MoV

#-1,SWRFLG

; :GET SOFT-SWR SETTINGS

CLR
SWRFLG
END :OF IF SWR

012603

;IF NOTCAPT OR ACT)

IF SWR EQ #SWREG

SUBTST

005624

GET SOFTWARE SWITCH REGISTER IF NECESSARY

; *SUBTEST

5481 005626

kb kkkkkkkkkkkkkkkkkkkkk
kg kk bk bk
kb
kkkkk ks bbb b kr bt bbb n b

000200
035716

MOV @USESTK, -(SP)

<<GET SOFTWARE SWITCH REGISTER IF NECESSARY>>

END

010346
012703
004737

MOV OSUPSTK,-(SP)

; SET PREVIOUS MODE TO USER
BIS
#BIT13!BIT12,PSW

002566

104422

e Lt

;NO-SKIP SUPERVISOR SETUP.

IF $AUTO IS FALSE

023727
001006

IImMmmnmnmmT

;IS THERE A SUPERVISQOR MODE?

; #SUBTEST

002062

BNE

NOSUPER

shkkkrkkk

005737
001012

; TURN OFF MEMORY MANAGEMENT

757

SUBTST

5479 005610
5480 005612
005612
005614
005620

DEENERGIZE

5470 005556
005556
005562
5471 005564
005564
005572
5472 005574
005574
5473 0035602
5474 005604
5475 005610
005610
5476 005610
005610
5477
5478 005610

; SET PREVIOUS MODE TO SUPERVISOR

177776
177776

177776

SETUP USER & SUPERVISOR STACK

104421
005737

144

«<«<SETUP USER & SUPERVISOR STACK>>

; *SUBTEST
5452 005510
5453 005512
5454 005516
5455
5456
5457 005520
5458 005526
5459
5460 005534
005534
5461 005540

Page

SEQ 0134
SUBTST

5451 005510

E11

15 Feb-85

#200,R3

T
T

;MAP KERNEL SPACE 1 T0 1
;MAP SUPERVISOR SPACE (TEST AREA) 1 TQ 1
MOV R3,-(SP)

MAPPER
CRF

; TURN ON MEMORY MANAGEMENT

MOV (SP).,R3

Y
Y Y

CVMUAAQ MSV11-J MEMORY DIAG.
GET MEMORY MANAGEMENT READY

F11

MACRO V05.01b Friday 15-Feb-85 16:10

SEQ 0135

5484 005630

NEWTST
HAA

5508 005656
005656
5509 005656
5510 005660
5511 005664
5512 005666
5313 005674
5514 005702
5515 005704
005704
5516 003710
005710
005714
3317 005716
5518 005724

005724

5519 005724
5320 005726
5521 005732
005732
005740
5322 005742
5523 005750
5524 005752
005752
5325 005752
5526 005756

000004

®e
Wb
we
W
we
W
W
We
W
Be
B
e
Bs
We
e

002076

012737

006024

000004

E S SR E S AL

R 000 G002 OGS

G SN

232

222

2222222322222 2223222222232t

42331

332

020000
000001

"TOTCSRS"”.

TESTS THE BITS PARTICULAR TO THAT TYPE OF CSR.

5) IF ANY BITS TEST BAD IN THE CSR UNDER TEST, THE CSR OK BIT IN THE
CSR INFORMATION TABLE IS CLEARED.
Bgecggronnnvxon BITS ONE THROUGH THREE FORM A CODE WHICH GIVES THE TYPE

ECC

TYPE

BITO

MSV11-L/P
MSV11-J

0
1

PARITY
ECC

THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS

CLR
CLR
MOV
MOV
SET4
MOV
.DSABL
REPEAT

RS
RO
#CSRADD,R3
#1,NOPAR
#CSRBMP
#CSRBMP
4
CRF

TST (R3)

;RS IS THE TOTAL CSR NUMBER
:RO IS A TABLE INDEX

;R3 HAS THE CSR ADDRESS

: IGNORE PARITY ERRORS

8
;DOES THIS CSR RESPOND???

IF #BIT13 SET.IN (R3):IS BIT 13 SET

002462

002052

000002
000002

L17:55::::

CLR (R3)
;CLEAR CSR UNDER TEST
CALL RWCSR
;BIT TEST OF ALL BITS IN CSR'S
IF CSRINFO(RO) MI #30 ;D0 WE HAVE A LEGAL CONFIGURATION?
CMP CSRINFO(RO),#30
BPL L20
MOV CSRINFO(RO),BAD ;MOVE IN BAD DATA
ERROR +21
H
END
H

006220

000030

MOV #BIT13,(R3)

BIT #8IT13,(R3)
BEQ L17
Eggs #BITO,CSRINFO(RO);MARK IT IN THE TABLE AS BEING
A ECC MEMORY

002462

150554

BIS
#1,RS
;MARKK IT IN CSR MAP
CLR
R4
;CLEAR THE LAST CSR INDICATOR
BIC
#6,CSRINFOCRO)
;CLEAR UNUSED BITS
BIS
#BIT4!BIT3,CSRINFO(RO) ;YES-MARK IT IN CSR INFORMATION TABLE
CLR
(R3)
;CLEAR THE CSR UNDER TEST
LET (R3) := #BIT13
;IS THIS AN ECC MEMORY???

002462

032713
001403
052760

AND STORES ANOTHER BIT FOR

2) TESTS THE CSR BITS COMMON TO ALL CSR'S.
3) FIGURES OUT IF THE MODULE IS A €ECC, OR PARITY MEMORY

o 002462
020000

062700
062703

TABLE,

000001

012713

026027
100004
016037
104021

Q*i’**'.ifi.*i..‘.

172100
000001

005013
004737

R EREE KNSR SRS

SCOPE
;s THE F IRST PART OF THE CONFIGURATION ANALYSIS DOES THE FOLLOWING:
1) FINDS WHICH CSR'S RESPOND, AND PUTS THEM INTO THE CSR INFORMATION

005005
005000
012703
012737

005713
052705
005004
042760
052760
005013

RN R

BIT TEST OF ALL CSR'S

TST1:

5485
5486
5487
5488
5489
5490
5491
5492
5493
5494
5495
5496
5497
5498
5499
5500
5501
5502
5503 005632
5504 005634
5505 005636
5506 005642
5507 005650
005650

«<«<BIT TEST OF ALL CSR'S>>

;980SR RS RERES AR RS RAR AR R RS SRS KRR

;oTEST 1
005630

Pege 146

NXTCSR:

ADD #2,RO
ADD #2,R3

;GO TO NEXT CSR
;G0 TO NEXT CSR

Le0:;5:5::

CVMJUAAQ MSV11-J MEMORY DIAG.
T
BIT TEST OF ALL CSR’S
5527 00576¢
5528 005764
005764
5529 005766
5530 005770

005770
005770
005770
005774
005776
5532 005776
5533 006000
5534 006002
006002
5535 006004
5536 006010
006010
5537 006014
5538 006020
006020
5539
5540 006024
5541 006030
5542
5531

MACRO v05.01b Friday

ASL

ON.ERROR

103001
005204

000040

006005
005704

001402
052705

100000

010537
004737

002224
006034

000137

006714

062706
000137

000004
005752

Page

146-1)

SeQ 0136

006305

020027
001330

G1l1

15-Feb-85 16:10

22%:

;SHIFT CSR MAP

;IS THERE A CSR O

INC R4
END

;YES SET CSR PRESENT FLAG
:
L

UNTIL RO €Q #40

;UNTIL ALL CSR'S ARE DONE

ROR
187
RNE

;RESYNC RS
;WAS THERE A CSR 0?
;BRANCH IF NOT EQUAL

RS
R4
224

CMP RO, %40
BNE B1
Elesissss

BIS
#BIT15,R5
LET TOTCSRS := RS

;:YES SET IT IN CSR TABLE
;:STORE CSR MAP IN TOTCSRS

CALL CSRMAP
JUMPTO
CTEST

;PRINT CSR MAP
;

CSRBMP: ADD
JMP

#4 ,SP
NXTCSR -

BCC L2}

BEQ 224
MOV RS, TOTCSRS

JMP CTESTY

;FIX STACK POINTER FOR NON-EXISTANT CSR TRAP
;GO ON TO NEXT CSR

CVMUARN MS5V11-J MEMORY DIAG.
BIT TEST OF ALL CSR'S

H11

MACRO v05.01b Friday 15-Feb-85 16:10

SEQ 0137

CSRMAP: SUBTST

5544 006034

<<PRINT

s EEREERRE SRR RS R ARk R R

; *SUBTEST

i L2322

5545 006034
5546 006036
006036
5547 006042
006042

5548 006046
5549 006050
006050
5350 006050
5551 006052
5552 006056
5553 006060
5554 006064
5555 006070
5556 006074
006074

5557 006100
006100
5358 006104
5559 006106
006106
006112
006114
5560 006114
006114

005000
104401
104401

.DSABL
TYPE
TYPEIT

066064

. DSABL
CLR

REPEAT

MoV

CMP

000011

000007
000060
066062

104401

066062

104401

066060

1$:

005201

020127
001356

000020

104401

065544

006134
5564 006136

5565 006144
006144
006146
3566 006146
5567 006154
006154
5568 006154
006154
006156
5569 006156
5570 006164
006164
Ss1 006164
006164

BPL
ADD
ADD
MOvB
TYPE
TYPEIT

2222232222322

AR EC R R A C RN AR

23232322233

22222222233

;CLEAR CSR INFO POINTER
;PRINT TITLE

MSGO16

;PRINT

CRF

.MSGO16
CRF

YT L)

: TYPE SINGLE SPACE

CMP R1,%16.
BNE B2

; TYPE MEMTYPE
-

;IS CSR NONEXSISTANT????

066062

MOVEB
ELSE

4#'E,MSGO15

;IT IS A MSV1i-J

000120

066062

MOVB

#'P,MSGO1S

;IT IS A MSV11-L/P

IF #BITO SET.IN CSRINFO(RQ)

000403
END

MOvB

TST CSRINFO(RO)
BEQ L24

BIT #BIT0,CSRINFO(RO)
BEQ L2S

L2S5:::::3:
L26::i::::

ELSE

066062

’

,MSGO15

000105

104401

002462

END

2331

:MAKE IT ASCII

000001

066062

:JUMP AROUND NEX: INSTRUCTION

#7,R2
#60,R2
R2,MSGO15
MSGO15S

032760
001404
112737

000040

B2:s:::s

002462

112737

R1,R2
#9.,R2

IF CSRINFO(RO) NE #0

000403

O RS S

CSR NUMBERS

005760

112737

b e SR A

CRF

.DSABL

REPEAT

001414

R AR RE

TYPE
MSGO09
TYPEIT
,MSGO09

006120

RE R RE

RO
MSG008
,MSG008

.DSABL
CRF
TYPE MSGO14
TYPEIT
,M5G014
.DSABL
CRF
R1
INC
UNTIL R1 EQ #16.

5561 006120
5562 006120
006120
006124
5563 006126
006126

222322

CLR

071370

CSR REGISTER MAP>>

AR AR AR A KRR KRR R B

PRINT CSR REGISTER MAP

TYPE
TYPEIT

005001
010102
022702
100002
062702
062702
110237

Page 147

,MSGO1S

TYPE MSGO15
TYPEIT
.MSGO15

L2d:;;::::
L7555
;: TYPE MEMORY TYPE

CVMJARO MSV11-J MEMORY DIAG.
PRINT CSR REGISTER MAP

5572 006170
006170

104401

066060

000240
062700

000002

5573 006174
5574 006176
5575 006202
006202
006206
006210
5576 006210
006210

020027
001344

000040

104401

071471

5577 006214
5578 006216

000207
000000

MACRO V05.01b Friday

111

15-Feb 85 16:10

Page 147-1

SEQ 0138

.DSABL
CRF
TYPE MSGO14
TYPEIT
,MSGO14
.DSABL
CRF
NOP
ADD
#2,RO
UNTIL RO EQ #40

TRACE
:

TYPE
MSG129
TYPEIT
,MSG129
CRF
.DSABL
RETURN
.WORD
O

; TYPE SPACE
:
;POINT
;

TO NEXT E} RY

CMP RO, 040
BNE B3

CVMJAARQ MSV11-J MEMORY DIAG.

PRINT CSR REGISTER MAP

J11

MACRO V05.01b Fridey 15-Feb 85 16:10

SUBTST
il

5595 006240

006240
5596 006244
006244
006252
5597 006254
006254
5598 006260
006260
006262
5599 006262
006262
5600 006266
006266
5601 006266
006266

5602 006274
5603 006300
006300
5604 006302

Jas we w0 me e ®e we we W

002152

010337

002034

032760
001403

000001

012705

017740

040537

006306
006310
5607 006312
006312

0035704
001410

5611 006332
006332
5612 006332

PUSH R4,RS,UIPARO

002044

010437
104035
042760

002150
000010

ittt

It I

:SAVE R4,R5,

ONES

AND UIPARO ON STACK

:= R3

;GET ADDRESS FOR POSSIBLE ERROR

IF #BIT0 SET.IN CSRINFO(RO)
:= #017740

:= #070032

;MASK FOR MSV11-L/P

;SET CSR1S TO ALL ONES

MOV #017740,RS

BR L32
L3l::55::5
MOV #070032.RS

L32:;;::::

;CLEAR BITS FOR GOOD DATA
;0 ---->CSR

LET R4

;MASK OUT UNWANTED BITS

H
;00 WE HAVE A CORRECT READ

LET GOOD

LET CSR

:= R4

ERROR

+35

;GOOD DATA=0'S

;BAD DATA=CSR
;B8IT SET ERROR

ENgIC #BIT3,CSRINFO(RO)

;CLEAR CSR OK BIT

LET (R3)

;ONES

:= CSR1S

;:GET BIT MASKS FOR D

BEQ L31

;MASK FOR MSVi11-J

BIC RS,CSR1S
LET (R3) := #0
:= (R3)

MOV R3,ADDRESS

BIT #8170,CSRINFO(RO)

;

:= #177777

MOV RS,CSRNO

;WHAT KIND OF MEMORY IS THIS?2?

:IT IS A MSVi1-L/P

LET CSR1S

MOV R4, (SP)
MOV RS, (SP)
MOV UIPARO, -(SP)

END

002462

BIC RS,R4
IF R4 NE #0

005037

MOV RO,RS

LET RS

002322

ittt

;GET CSR NUMBER FOR POSSIBLE ERROR

:= RO

ELSE

005013

011304
040504

5608 006316
006316
5609 006322
5610 006324

177777

002322

4-SHIFTING A ZEROS THROUGH A FIELD OF

LET RS

070032

1-ZEROS
2-0ONES
3-SHIFTING A ONE THROUGH A FIELD OF ZEROS

LET ADDRESS
002462

222222222222t

THIS ROUTINE "RWCSR” CHECK 7O SEE THAT THE CSR CAN BEWRITTEN ON CORRECTLY
BY WRITING PND CHECKING FOR THE FOLLOWING PATTERNS:

LET CSRNO

000402

012737

READ AND WRITE ALL CSR BITS

1322122222

ASR RS

010537

012705

LET R5

010005
006205

006302

5605 006304
5606 006306

WCSR:

177640

<<READ AND WRITE ALL CSR BITS»>>»

2222222322322233222222222
i
it
it g i il
it IT I
TITY

; *SUBTEST

010446
010546
013746

148

SEQ 0139

5580 006220

5581
5582
5583
5584
5585
5586
5587
5588
5589
5390 006220
5591 006220
006220
006222
006224
5592 006230
006230
5593 006232
5594 006234
006234

Page

>(R3)

MOV #177777,CSR1S

CLR (R3)
MOV (R3).R4

TST R4

BEQ L33

CLR GOOD
MQV R4,CSR

L33:5:504

CVMJAAO MSV11-J MEMORY DIAG.

READ AND WRITE ALL SR BITS

006332
5613 006336
006336
5614 006340
5615 006342
5616 006344
006344
006350
S617 006352
006352
5618 006360
006360
5619 006364
5620 006366
5621 006374
006374
5622 006374
006374
S623 006400
006400

5624

5625 006400
5626 006404
006404
5627 006412
006412
006420
5628 006422
006422
5629 006426
006426
006430

5630 006430
006430
5631 006434
006434

013713

K11

MACRO V05.01b Fridey 15-Feb 85 16:10

002322

LET R4

011304
005013
040504
002322

013737

002322

010437
104010
042760

002150
000010

005037

002264

005237

002264

012737

177777

177640

023727
001003

002264

000001

012702

000001

002044

002462

006434

5633 006434
5634 006440

005237

177640

006440

023727

002264

00000.

006450

032760

000001

002462

S63S 006460
5636 006464
006464
5637 006464
006464
006472

042702

040000

023727
001006

002264

000002

006502

032760
001002

000001

002462

042702

040004

006446
006456

006474

5638 006504

5639 006510
006510

5640 006510
006510

001006
001002

010213

0'S THROUGH 1°'S

INC PASFLG
LET UIPARQ := #-1

; INCREMENT LOOF COUNTER
;USE USER PAR FOR BIT COUNTER

IF PASFLG EG #1

;PASS 1

;0----- >FIELD OF ONES

END

REPEAT

;00 BITS 0-4 AND 13-15

MOV #-1,UIPARO
CMP PASFLG,91
BNE L35

:1-- -->FIELD OF ZEROS
;PASS 2

LET R2 := #177776

5632 006434

MOV (R3),R4

CMP R4,CSR1S
BEQ L34
LET GOOD := CSR1S
;GOOD DATA = ALL LEGAL BITS SET IN CSR
MOV CSR1S,G00D
LET CSR := R4
;:BAD DATA=CSR
MOV R4.CSR
ERROR +10
:8IT CLEAR ERROR
B8IC #BIT3,CSRINFO(RO) ;CLEAR CSR OK BIT
END
H
L34:;;:;:;:;
LET PASFLG := #0
;SET UP LOOP COUNTER
CLR PASFLG
REPEAT
;REPEAT WITH A FIELD OF 1'S THROUGH 0'S
B4:;;:;::

ELSE

177776

MOV CSR1S,(R3)

;CLEAR OUT CSR
;
;WAS PATTERN WRITTEN CORRECTLY?

LET R2 := #1

000402

SEQ 0140

;MASK OUT CORRECT FIELD

CLR
(R3)
8IC RS,R4
IF R4 NE CSR1S

020437
001411

012702

:= (R3)

Page 148-1

MOV #1.R2
BR L36
L3S:;;:::::

MOV #177776,.R2
L36:;;:::;
BS::5::::

INC UIPARO
; INCREMENT BIT POINTER
IF PASFLG EQ #1 AND #BITO OFF.IN CSRINFO(RO) ;

CMP PASFLG,#1

BNE L37

BIT #B1T0,CSRINFO(RO)
BNE L37

BIC #81T714,R2

;IF THIS IS PASS 1 ON A MSV1i1-L/P,.CLEAR BIT 14
END
:
L37:5:5::::
IF PASFLG EQ #2 AND #BITO OFF.IN CSRINFO(RQO) ;
CMP PASFLG,
@2
BNE L40

BIT #BITO,CSRINFO(RO)

END
LET

BIC #BIT14!BIT2,R2
;

(R3)

:= R2

BNE L40

;IF THIS IS PASS 2 ON A MSV11i-L/P, CLEAR ECRSRD BIT AND

;WRITE DATA

LeO:;::5:::
MOV R2,(R3)

CVMJAARO MSV11-J MEMORY DIAG.

READ AND WRITE ALL CSR BITS

S641 006512
006512
5642 006514
5643 006516
006516
5644 006520
5645 006522
006522
006524
5646 006526
00652€
5647 006532
006532
5648 006536
006536
006544
5649 006546
5650 006550
006550
006552
5651 006552
5652 006554
006554
5653 006554
5654 006562
006562
5655 006562
006562
006570

MACRO V05.01b Fridey 15-Feb-85 16:10
LET Rl

010201
040501
011304
040504
020104
001416

010137

002044

010437

0C2150

023727
001002
104035

002264

023727
001002

006302

S658 006576
5659 006600
5660 006602

000261
006102

000010

002264

000001

000402

177640

023727
001267

002264

000002

032760
001402
000137

000001

002462

006636

012713

140005

006642
5666 006644
5667 006650

011302
042702

037772

020227

140005

006612

5662 006612
006612
006620

006622

5663 006622

006622
006630
006632
006636
5664 006636
5665 006642

006650

;BAD DATA = CSR CONTENTS

LET CSR

;GET GOOD DATA

MOV R2,R1
MOV (R3).R4
CMP Ri,.R4
BEQ L41

MOV R1,G00D

IF PASFLG EQ #1

;SELECT ERROR DEPENDING ON PASS

ERROR +35
ELSE

;81T SET ERROR
;PASS 2

ERROR +10
END

;BIT CLEAR ERROR
;CLEAR CSR 0K BIT

IF PASFLG EQ #1

;:GET DATA FOR NEXT LOOP

ASL
ELSE

;SHIFT 1 ACROSS 0'S
;

R?2

SEC
ROL R2

MOV R4,CSR

CMP PASFLG,
¢1
BNE L42
BR L43

L43:;;:::::
L41:;::::;

CMP PASFLG,#1
BNE L44
BR LA4S

;SET CARRY
;ROTATE A O ACROSS A FIELD OF ONES
i
Las
.......

023727
001311

006610

LET GOOD := R1

BIC #BIT3,CSRINFO(RO)
END
:

END

006602

5661 006602
006602

;MASK QUT CSR BITS
;IS DATA CORRECT???

:= R4

SEQ 0141

;:GET GOOD DATA AND MASK IT QuT

BIC R5,R4
IF R1 NE R4

000001

002462

:= R2

;GET GOOD DATA
;GET DATA THAT IS READ

104010
042760

Page 148-2

BIC RS,R1
LET R4 := (R3)

000401

5656 006572
5657 006574

006574
006576

L11

000017

UNTIL UIPARO EQ #15.

UNTIL PASFLG EQ @2

;UNTIL ALL BITS ARE DONE

;DONE WITH 2 PASSES

CMP UIPARO,#1S.
BNE BS

CMP PASFLG,
82
BNE B4
Y VP

IF #BITO SET.IN CSRINFOCRO) THEN JUMPTO DONE ;IF MSVii-L/P DO ONE LAST WRITE

006700
LET (R3)
LET R2

:= #140005

:= (R3)

BIC #37772,R2
IF R2 NE #140005

BIT #8IT0,CSRINFO(RO)
BEQ LS50
Ls0
JMP DONE
RN EN]
;WRITE ONES TO CSR WITH ECSRRD BIT ENABLED

;READ CSR FOR CORRECT BITS
; CLEAR UNWANTED BITS
;WAS WRITE CORRECT

MOV #14000S,(R3)
MOV (R3).R2

CMP R2,4140005

CVMJARQ MSV11-U MEMORY DIAG.

READ AND WRITE ALL CSR BITS

006654
5668 006656

006656
5669 006664
006664
5670 006670
5671 006672
5672 006700
006700
5673 006700
006700
5674 006702
006702
006706
006710
5675 006712

M1l

MACRO V05.01b Fridey 15-Feb-85 16:10

140005

010237
104010
042760

002150
000010

012637
012605
012604
000207

002044

177640

LET GOOD

#14000S

LET CSR

:= R2

ERROR +10

002462

ENDBIC #BIT3,CSRINFO(RO)
OONE:

005013

148-3

SEQ 0142

001411
012737

Page

LET (R3)

:= #0

POP UIPARO,RS,R4

RETURN

BEQ LS1

;GOOD DATA

MOV ©140005,G000

;BAD DATA

MOV R2,CSR

;BIT CLEAR ERROR

;CLEAR CSR OK BIT!

;CLEAR OUT CSR
;RESTORE UIPARO,R4,

LS1:55:3:5
AND RS

CLR (R3)
MOV (SP).,UIPARO
MOV (SP)+,RS
MOV (SP)+.Ra

CVMJAAQ MSV11-J MEMORY DIAG.

READ AND WRITE ALL CSR 8IT1S

MACRO V05.01b Friday

Page

150

SEQ 0143

; THE FOLLOWING ROUTINE DETERMINES WHICH CSR CONTROLS PROGRAM SPACE

5678

5679
5680 006714
5681 006716
5682 006724
5683 006732
5684 006736
5685 006744
5686 006732
5687 006754
5688 006760
5689 006764
5690 006766
7691 006770
3692 006772
3693 006776
5694 007002
5695 007004
5696 007006
5697 007010
5698 007012
5699 007014
$700 007022
$701 007024
5702 007032
5703 007040
5704 007046
5705 007052
5706 007054
5707 007062
5708 007070
5709 007076
5710 007104
5711 007110
5712 007114
5713 007122
5714 007124
5715 007126
5716 007130

N11

15-Feb-85 16:10

104424
012737
012737
012701
012737
012737
005000
005037
013703

000240
006303

103407

062700
010037
005703
001465
000767
000240
000241
032760
001014
052760
012771
012771
005060
000414
012760
012771
012771
012760
005771
016004
032760
001003
005704
100412
000720

177777
002000
002412
100000
100002

002532

ETEST:

172350

MOV

MOV
MoV
MoV

002412
002414

CLR
CLR

002152
002224
44
:

000002
002152

14:

2%:

000001

002462

000004
123456
123456
172100

172100
000000
000002

000000

172100
000000
000002
172100

123456
123456

020006
000000
172100
000001

002462

CACHOFF

MoV

MOV
NOP
ASL

BCS

ADD
MOV

157
BEQ
BR
NOP
CLC
BIT
BNE
BIS

MOV
MOV

S$:

6$:

CLR
BR
MOV

MOV
MOV
MOV

TST

MOV

BIT
BNE
TST

BMT
BR

#177777,PGMCSR
#2000,KIPAR4
#TESTADD,R1

#100000, TESTADD
2100002, TESTADD+2
RO
CSRNO
TOTCSRS,R3
R3
2%
#2,R0
RO, CSRNO
R3

QgITO.CSRINFO(RO)
S
#B8172,CSRADD(RO)
#123456,3(R1)
#123456,32(R1)

;SET UP MAP REGISTER

;CLEAR CSR COUNTER
;OBTAIN CSR MAP

;:DEBUG AID

;PUT HIGH ORDER BIT INTO C 817
;BRANCH IF CSR EXISTS
;UPDATE CSR COUNTER
;IS MAP EMPTY?

;BRANCH IF SO

;DEBUG AID
;CLEAR CARRY
;IS THIS PARITY MEMORY?
;BRACH IF NOT
;SET WRITE WRONG PARITY
;WRITE DATA

g?RADD(RO)

;RESTORE CSR

#0,CSRADD(RO)
#123456,3(R1)
#123456,82(R1)
#20006, CSRADD(RO)

;CLEAR THE CSR UNDER TEST

;WRITE DATA

a(R1)
CSRADD(RO),R4

;:SET DIAG CHECK MODE
;WRITE CHECKBITS TO CSR
;WRITE CSR TO R4

74
R4

;:BRANCH IF NOQT
;PARITY ERROR?

#B81T0,CSRINFO(RO)

8
14

;PARITY MEMORY?
;BRACH IF SO
; TRY NEXT CSR

CVMJAAQ MSV11-J MEMORY

READ AND WRITE ALL

5717 007132
5718 007134
3719 007140
3720 007144
$721 007130
5722 007132
5723 007154
S724 007160
5723 007162
3726 007164
5727 007172
5728 007200
3729 007206
5730 007210
5731 007214
5732 00722¢
007222

5733 007226

CSR B17S

000240

072427
042704
0127.2
020204
001307
010037
000240
104502
012771
012771
023727
001402
000137
012737

007232
001000

10440}

071264

005037

002532

MACRO V0S5.01b Fridey 15 Feb 85

Pege 150 1

SEQ 0144
7%:

177773
177700
000040
002532
000000
000000
002532

Bl2

16:10

8¢:
3¢

000000
000002

177717

172350

FINT$:

NOP

ASH

BIC
MOV
cHe
BNE
MOV
NOP
CLRCSR
MOV
MoV
CcHP
BEQ
JHP

MoV
TYPE
TYPEIT
.DSABL

CLR

¢ S,R4
#1C77 R4
#40,R2
R2,.R4

1%
RO,PGMCSR

#0,3(R1)
20,a32(R1)

PGMCSR, 9177777
FINTS

CLRMEM

21000,KIPARS
MSG126

,M5G126

CRF

PGMCSR

;DEBUG AID

;LOAD IN CORRECT CHECK BITS FOR MSV11-J
;CORRECT CHECKBITS?
;BRANCH IF NOT

;DEBUG AID
;CLEAR ALL CSR'S
;RESTORE TEST LOCATIONS
.IF PROGRAM CSR NOT FOUND GO TO FINT
:GO TO SIZING ROUTINE IF FOUND

:ERROR - PROGRAM CSR NOT FOUND'
:SET TO DEFAULT OF O

TVMJAAQ MSV11-U MEMORY DIAG.

READ AND WRITE ALL CSR BITS

Cle

MACRO V05.01b Friday 15-Feb-85 16:10

5735 007232

SUBTST

Page 151

<<CLEAR ALL MEMORY SPACE FROM BANK 2 ON>>

T
I
I T I
T ImMmMmmmIImMmMmTTTTM
; sSUBTEST
CLEAR ALL MEMORY SPACE FROM BANK 2 ON
R
I I
e T
I mMmI ImMmMmT II,mnmImmmmmTTT

5736
5737
5738
5739

:
; THIS ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200,000 AND
;CONTINUES UNTIL THERE IS NO MEMORY LEFT, IT SHOULD CLEAR ANY PARITY ERRORS
;CREATED BY THE LAST ROUTINE, AND CLEAN UP ANY JUNK LEFT HANGING AROUND IN

g;:?

;HIGHER MEMORY.

5742 007232
007232

012737

007342

5743 007240
5744 007244
5745 007252
5746 007260
5747 007264
S748 007270
$749 007272
S750 007300
5751 007302
5752 007306
S753 007310
5754 007312
5755 007320

005037
012737
012737
012701
020127
001003
012737
005021
005737
001001
000765
062737
022737

006216
000001
002000
100C00
117776

S757
5758
5759
5760
5761
5762

005037
012701
000751
000240
005037

5756 007326

007330
007334
007340
007342
007344
007350
007350

007356
007364
007396

007372

001405

012737
022737
001002
005037

177777

000004

.DSABL

14:
006216

172350
172750

2%:

3$:

BEQG

006216
100000

CLREX:

006216
034114
000005
177766

SET4
MOV

CLR
MOV
MOV
MOV
cMP
BNE
MOV
CLR
TST
BNE
BR
ADD
cMP

002076
172350

006216
000200
177600

CLRMEM:

000004
004010
101

CLR
MOV
BR
NOP
CLR
RES4
MOV

#CLREX
#CLREX,
4

;NONEM TRAPS GO TO CLREX

CRF

TRACE
#1 ,NOPAR
#2000, KIPAR4
#100000,R1
R1,#117776
24
#-1,TRACE
(R1)TRACE
34
14
#200,KIPARS
#177600,KIPAR4

CLREX

TRACE
#100000,R1
14

; IGNORE PARITY ERRORS
;SET UP MAP TO START AT BANK 2
;R1 MAPS TO KIPAR4
;sWHOLE 16K BANK DONE?
;KEEP GOING IF NOT
;USE TRACE FLAG TO FLAG END OF BANK
;CLEAR CONTENTS & INCREMENT
;EOB FLAG SET?
:GO TO NEXT BANK IF SO
;SET MAP FOR NEXT BANK
;ARE WE AT THE PERPHERIAL PAGE

;YES-GO ON

;RESET FLAG
;RESET R1
;CLEAR NEXT BANK

TRACE

cMP
BNE
CLR

#TIMEOQUT,
4
#5,PROTYP
1014
CPUERR

.DSABL

CRF

;IS THIS AN 11/83/84 ?
;BRANCH IF NOT
;CLEAR QUT THE CPU ERROR REGISTER BITS
s THAT A EXPECTED TRAP COULD HAVE SET

SEQ 014S

|
!

D12

MACRO V05.01b Friday 15-Feb-85 16:10
CVMJUAARQ MSV11-J MEMORY DIAG.
CLEAR ALL MEMORY SPACE FROM BANK 2 ON

ANAZ2:

5765 007372

SUBTST

At i 22

5766
S767
5768
$769
5770

;#
;¢
;#
;®*
;#

SEQ 0146

<<MATCH ALL CSR'S WITH MEMORY>>

R R R SR A RN SR AR

; *SUBTEST

Page 153

R R

RN E AR EE R

RS R SRS S AR SR SR A SR AR NS R A

S SO S

bSO e RS

MATCH ALL CSR'S WITH MEMORY

23 21222223322

223233

sttt

i g

it i

S771
§772

;* WRITTEN WITH DATA AND DIAGNOSTIC CHECK MODE SET IN THE CSR AND ARE CHECKED
;* FOR EACH BANK THROUGH USE OF TESTADD AND KERNEL INSTRUCTION PAGE ADDRESS

S774

;* IF NOT,

5773

;* REGISTERS 4 AND S.

§775
5776

THE SECOND PART OF THE ANALYSIS MATCHES UP THE CSR’'S WITH THE MEMORY, AND
INSTALLS ALL THE INFORMATION FOUND 1IN THE CONFIGURATION TABLE.
FOR ECC,
THIS IS DONE BY TAKING EACH CSR FOUND IN THE PREVIOUS SECTION SEQUENTIALLY
AND CHECKING THROUGH ALL OF MEMORY, ONE BANK AT AT TIME, TO SEE WHICH BANKS
RESPOND TO THE CSR IN QUESTION. THE FIRST DOUBLE WORD PAIR IN EACH BANK IS
IF WE GET THE PROPER CHECKBITS BACK,

WE HAVE A MATCH.

THE ROUTINE CHECKS FOR SINGLE OR DOUBLE BIT ERRORS.

:* JF ONE OR THE OTHER IS FOUND, THE ERROR ADDRESS IS CHECKED
;¢ TO SEE IF IT IS THAT BANK.
IF IT7 IS, WE HAVE A MATCH.
AT THE END OF EACH

5777

;* BANK PASS,

g;;g

FOR EACH CSR PASS,

THE PROGRAM FOMFS UP WITH A NUMBER,

;* "I", WHICH DENOTES THE FOLLOWING:

STORED IN

5780
5781
S782
5783
5784
5785
5786
5787

i¥
i*
i *
i ¥
;%
i
i
;* NOTE

g;gg

I
=
0
1
2

MEMORY DESCRIPTION
eeeeseceosasocao-o
NON-EXISTANT MEMORY
MSV11-L/P MEMORY
MSV11-J MEMORY

THAT PARITY MEMORY WRITES WRONG PARITY TO THE DOUBLE WORDS,

;¢ FOR THE PARITY ERROR BIT

TO BE SET.

THE BIT

IS SET,

THEN LOOKS

WE HAVE A MATCH.

s %

5790 007372
007372

012737

010444

5791 007400
5792 007404
§793 007410

005037
012701
013703

002314
002412
002224

S794 007414
5795 007416
5796 007420

5797 007424
5798 007426
5799 007432
5800 007434
5801 007442
5802 007444
5803 007450
S804 007452
5805 007456
5806 007462
5807 007466

S808
5809
5810
5811
5812
5813
5814
5815

007472
007500
007506

007510
007512
007516
007522
007524

5816 007526

005000
005005
005737

001403
005037
000413
022737
001407
013702
005202
072227
010237
012702
005037
012737
012737
006303
103420
062700
010037
005703
001370
012737

SET4
MOV

000004

.DSABL

002454
002560
000177

002556

7%:

002556
000011
002560
000004
002564
001000
001000

1$:
172350
172352

000002
002152
001000

172350

2%:

CLR
MOV
MOV
CLR
CLR
187
BEQ
CLR
BR
CMP
BEQ
MOV
INC
ASH

MOV
MOV
CLR
MOV
MOV
ASL
BCS
ADD
MOV
187
BNE
MOV

£100¢
#1004 ,4

;NE MEMORY TRAPS GO TO 1003

CHECK
#TESTADD,R2
TOTCSRS,R3

;CLEAR CHECK
;SET UP THE VIRTUAL ADDR. POINTER
;MOVE CSR MAP INTO R3
;CLEAR THE CSR POINTER
;CLEAR THE PROGRAM CSR STATUS POINTER
;D0 WE HAVE 22 BIT ADDRESSING ?
;BRANCH IF WE DO
;ADJUST LASTBLOCK INDICATOR FOR 124K MACHINE
;BRANCH OVER NEXT PIECE OF CODE
;IS THERE Q-BUS MEMORY ABOVE 17776000?
;:BRANCH IF NOT
;SET UP A NEW LAST BLOCK INDICATOR

CRF

RO
RS
NO22BIT

T4
LASTBLOCK
14
#177 ,LASTBANK
14
LASTBANK,R2
R2
#9.,R2

R2,LASTBLOCK
#4 ,R2
ENDFLG
#1000,KIPAR«
#1000,KIPARS
R3
3
#2,R0
RO, CSRNO
R3
24
#1000,KIPARS

:R2 IS INDEX FOR CONFIG TABLE
;CLEAR END OF MEMORY FLAG
:SET KIPAR4 FOR BANK 1
:SET KIPARS FOR BANK 1
;DOES THIS CSR EXIST?
;BRANCH IF IT DOES EXIST
;sINCREMENT THE CSR POINTER
;STORE IT IN CSRNO ALSO
:ARE THERE ANY MORE CSR'S T0 DQ?
;BRANCH IF ALL CSRS NOT DONE
;RESTORE KIPAR4

CVMJARO MSV1l-J MEMORY DIAG.

MATCH ALL

CSR'S WITH MEMORY

5817 007534

5818 007542
5819 007546
5820 007552

5821 007556
5822 007560
5823 007562
5824 007570
5825 007576
5826 007604
5827 007606

5828 007612
5829 007616
5830 007622
5831 007626
007626
007632
5832 007636
5833 007644
5834 007646
5835 007654
5836 007662

5837 007670
5838 007674

5839 007676
5840 007704
5841 007712
5842 007714
5843 007716
5844 007720
5845 007724
5846 007726

5847
5848
5849
5850

007730
007734
007736
007742

012737

013706
000137
010037

104424
000240
012737
012737
032762
001402
000137

005037
005771
005237
017146
017146
032760
001014
052760
012771
012771
005060
000411
012771
012771
104503
104475

000240
005771
104426
000240
013704
000240

001200

002574
010454
002152
100000
120002
000040

000000
000002
000001

002412
00241
002664

45$:

a3s:
as:

002462

000000
000002

000000

34$:

a1$:

002150

000002
000000

5854 007764
5855 007766
5856 007770
54357 007774
5858 010000
5859 010004
5860 010012
5861 010014
5862 010020
5863 010020

005704
100420
000137
072827
042704
012737
000240
023704
000240
001402
000137

3¢:

123456
123456

012671
012671

3864 010024

MOV

13§:

172100
000000
000002

007744
007750

032760
001004

172352

000004
123456
123456
172100

002434

5852 007754
5853 007762

MACRO V05.01b Fridey 15-Feb-85 16:10

010342
002452
000000
002452

010437
104503

5851 007744

El2

000001

010342
177773
177700
000040
002316

Page 153 1

#1200,KIPARS

MOV
JHP
MOV

KSTACK,SP
SUBAAS
RO,CSRNO

CR
TST
INC
PUSH

#100000,TESTADD
#120002,TESTADD:2
#BITS,CONFIG(R2)
43
6
I
&(R1)
T
@(R1),d2(R1)

CACHOFF
NOP
MOV
MOV
BIT
BEG
JMP

BIT
BNE
BIS
MOV
MOV
CLR
BR
MOV
MOV
CLR1CSR
CBLCSR

#BITO,CSRINFOCRO)
34%
#BIT2,CSRADD(RO)
#123456,3(R1)
#123456,32(R1)
CSRADD(RO)
413
#123456,a(R1)
#123456.32(R1)

NOP
TST
@(R1)
READCSR
NOP
MOV
CSR.Ra
NOP

MOV
R4, TEMP
CLR1CSR
POP
§2(R1),@(R1)
002462

BIT
BNE

42¢:
002316
77¢:

010170

ST
BMI
JMP
ASH
BIC
MOV
NOP
CMP
NOP
BEQ
MP

4BITO,CSRINFOCRO)
423
R4
258
6
4-5,R4
#1C77,Ré
#40.CBITS

CBITS,R4
258
228

SEQ 0147

;RESTORE KIPARS

[RESTORE STACK
;JUMP TO SUBAAS IF ALL CSR'S ARE DONE
;MAKE SURE CSRNO IS UPDATED
;TURN THE CACHE OFF

;SET UP VIRTUAL ADDRESS TO KIPAR4
:SET_UP VIRTUAL ADDPESS T KIPARS
;IS THIS A BANK TO SKIP ECC/LOGIC_TESTS?
iNO - BRANCH AROUND NEXT INSTRUCTION
;YES - GO _T0 END OF BANK
;CLEAR_THE MEMORY CONFIGURATION COUNTER
.TEST TO SEE_THAT THERE IS MEMORY PRESENT
;MEMORY PRESENT
;SAVE THE LOCATIONS UNDER TEST
MOV 3(R1),-(SP)
MOV 82(Ri},-CSP)
;1S THIS PARITY MEMORY?
iNO_- BRANCH
:SET WRITE_WRONG PARITY
;SET THE FIRST LOCATION UNDER TEST
;SET THE SECOND LUT
iCLEAR THE CSR
; TEST_LOCATIONS
;SET THE FIRST LOCATION UNDER TFST
;SET_THE SECOND LUT
:RESET CSR
;SET DIAG. CHECK MODE IN CSR UNDER TEST

;DEBUG_AID
iREAD THE FIRST LUT T0 WRITE CKBITS. INTO CSR
;READ THE CSR UNDER TEST
:DEBUG AID
;GET THE_CHECKBITS FROM THE CSR
;DEBUG_AID

;SAVE_IN TEMP FOR LATER
:RESET CSR
;RESTORE LOCATIONS UNDER TEST
;IS THIS PARITY MEMORY?
:NO - BRANCH

:DID WE GET A PARITY ERROR?
:YES - FILL IN CONFIG_ TABLE
iNO - JUMP T END OF BANK
;MANIPULATE THE CSR BITS
;INTO A USABLE FORM.
:MSV11-J CHECK BITS
;DEBBUGGING AIDE
;D0 THE CHECKBITS COMPARE TO WHAT WAS WRITTEN?
:DEBBUG AIDE
:BRANCH IF THERE IS A MATCH
;ELSE BRANCH IF NOT THE SAME

gggg
5868 010050

5869 010032

i* WE COME HERE IF THERE IS A MATCH
HE

010004

000240

25$:

MOV
NOP

RO,R4

Hov ¢3P2-.32(R1)
MOV (SP)+.a(R1)

;GET THE CSR NUMBER
;

CVMJAAQ MSV11-J MEMORY DIAG.

MATCH ALL

CSR'S WITH MEMORY

5870 010034
5871 010036
5872 010040
5873 010044
5674 010050
5875 010054
5876 010060
5877 010062
5878

5879
5880
5881 010066
5882 010074
3883 010076
5884 010102
5885 010110
3886 010112
5887 010116
5888 010122
5889 010126
5890 010130
5891 010136
5892 010142
010142
5893 010150
5894 010156
5895 010164
5896 010166
5897
5898
5899
3900 010170
5901 010176
5902 010200
5903 010202
5904 010206
5905 010214
010214
010216
5906 010220
5907 010224
5908 010230
5909 010234
5910 010242
5911 010246
5912 010254
5913 010260
5914 010262
5915 010264
5916 010266
5917 010270
010270
010272
5918 010274
5919 010300
3920 010304
5921 010306

006204
000304
042704
050462
016004
042704
000304
050462

MACRO V05.01b Fridey

F1e2

15-Feb-85 16:10

Page

153-2

SEQ 0148

170377

15¢:

002664
002462
177770
002666

ASR
SWAB
BIC
81S
MOV
BIC
SWAB
BIS

R4
R4
#170377,R4
R4,CONFIG(R2)

CSRINFO(RO),R4

#1C7,R4
R4
R4 ,CONFIG+2(R2)

;SET _IT UP FOR USE IN THE
; CONFIGURATION TABLE.

;:CLEAR OFF EXTRANEQUS BITS
;PUT CSR NUMBER IN CONFIG. TABLE
;GET MEMORY TYPE
:CLEAR OFF THE EXTRANEOQUS BITS
;MOVE INTO PROPER POSITION
;SET IT INTO THE CONFIG TABLE

;*x THIS SECTION IS EXECUTED ONLY WHEN THE BANK=1
14

022737
001402
000137
032737
001417
013704
072427
022704
003010
052762
105262

000001
002666

002664

012737
053737
053737

177777
002670
002672

002450
002664

000240

001000

172350

244
:

010342
100020

002434

304:

002434

CcMP
BEQ
JMP
BIT
BEQ

#1000, KIPAR4
304
64

;IS THIS BANK 1 ?
;:BRANCH IF TRUE
;ELSE JUMP TO END OF THIS BANK

ASH
CMP
BGT
81S
INCB
SET

10¢
TEMP,R4

#-9..R4
#1,R4

;BRANCH IF NOT
;GET CSR CONTENTS

#BIT1S5!BIT4, TEMP

MOV

177767

000001

002666

10¢:

000465

BIS
BIS
NOP
BR

;WAS THERE A SBE OR DBE?

;MAKE ERROR ADDRESS INTO BANK #
;ERROR IN BANKS 0 OR 1?

104

;BRANCH IF NOT

CONFIG+2(R2)
CONFGERRGR

;ADD ONE TO BANK ERROR COUNT
;PRINT CONFIG TABLE

#B8IT0,CONFIG(R2)

CONFIG+4,CONFIG
CONFIG+6,CONFIG+2

;SET ERROR FLAG IN CONFIG TABLE
MOV

1,CONFGERROR

;SET UP INFORMATION IN BANK ZERO

;DEBUG AID
: BRANCH

CHECKBITS DID NOT MATCH,

WE COME HERE

032737
001001
000460
013704
042764
010046
010146
016401

072127
042701
052764

016400
042764
042700
006300

100020

002150

002152
000006

172100

172100
177773
177600
040000
172100
040000
177037

22%:
8$:

012601
012600
072427
020437
001001
000403

MoV
ASH

172100

#BIT15!8174,CSR
84
6%
CSRNO,R4

#6,CSRADD(R4)
RO,R1

CSRADD(R4) ,R1

#-5,R1
#1C177,R1

;SBE OR DBE FLAGS SET?
:BRANCH IF TRUE
;CHECK TO SEE IF IT IS MSV11 J
;GET CSRNO
; TURN OFF DIAG CHECK & ECC DISABLE
;SAVE RO & R1

;GET CSR_INFORMATION

MOV RO, (SP)
MOV R1,-(SP)

;:SET UP ERROR ADDRESS

BIC
BIS

#B8IT14,CSRADD(R4)

;GET EXTENDED ERROR ADDRESS BITS

BIC
BIC

#tC740,R0

;SET UP EXTENDED BITS

RO,R1
R1,R4
R1.RO

;SET UP TOTAL ERROR ADDRESS
:SAVE IN R4
;RESTORE RO & R1
MOV (SP)+,R1
MOV (SP)+,RO

MoV

274:

000005
172350

MOV

BIC

PUSH

006300

060001
010104

BIT
BNE
BR

CSRADD(R4),RQ
#81714,CSRADD(R4)

ASL
ASL
ADD
MOV
popP

ASH

#5,R4
R4 ,KIPARS

CMP
BNE
BR

284
35¢

;READ FROM CSR
; TURN OFF EQB BIT

;SET ERROR ADDRESS UP IN PAR NOTATION
;:DOES IT EQUAL KIPAR4?

;BRANCH IF FALSE
;YES - MARK INFO IN CONFIG TABLE

CVMJUAAQ MSV11-J MEMORY DIAG.

MATCH ALL CSR'S WITH MEMORY

Gl2

MACRO V05.01b Friday 15-Feb 85 16:10

5922 010310

020437

172352

5924 010316

052762

000001

002664

012737
000137

177777
010030

002450

5923 010314

$925 010324
5926 010330
010330
ggg; 010336

001012

105262

002666

28%:

35%:

Page 153-3

SEQ 0149

cMP

R4 ,KIPARS

;DOES IT EQUAL KIPARS?

BIS

#*BITQ,CONFIG(R2)

;SET BANK ERROR FLAG

BNE

INCB
SET
JMP

CONFIG+2(R2)
CONFGERROR
254

;BRANCH IF FALSE

; INCREMENT BANK ERROR COUNTER
;PRINT CONFIG TABLE
MOV
#-1,CONFGERROR
;YES
MARK INFO IN CONFIG TABLE

i %

gggg

; *END OF BANK ROUTINE
i %

5931 010342
5932 010344
5933 010350
5934 010352
5935 010356
5936 010364
5937 010372
5938 010400
5939 010402
010402
5940 010410
$941 010414

012737
000137
023737

177777
007562
002560

5943
5944
5945
5946
ggzg

010424
010430
010434
010436
010440

000137
062700
000240
104423
000137

007562
000002

007462

5949 010444
5950 010450

062706
000137

000004
010342

5942 010422

104503
005737
001021
062702
062737
013737
022737
001005

101402

6$:

002564

000004
001000
172350
177000

172350
172352
172350
002564
172350

704:
194:

100¢:

CLR1CSR
TST
BNE
ADD
ADD
MOV
CMP
BNE
SET

ENDFLG
704
#4 ,R2
#1000,KIPAR4
KIPAR4 ,KIPARS
#177000,KIPAR4
704
ENDFLG

JMP
cMP

45$
LASTBLOCK,KIPAR4

JMP
ADD
NOP
CACHON
JMP

454
#2,R0

ADD
JMP

B8LOS

194

;CLEAR THE CSR UNDER TES]
;ARE WE AT TOP QF MEMORY?
;IF SO THEN EXIT
;UPDATE CONFIGURATION POINTER
;UPDATE KIPAR4 TO NEXT BANK
;AND UPDATE KIPAR4
;ARE WE AT BANK 177
;BRANCH IF NOT
;WERE AT LAST BANK
MOV
#-1,ENDFLG
:
;HAVE WE DONE THE WHOLE MEMORY SPACE?

;BRANCH IF DONE

:R-C

; JUMP IF NOT DONE
; INCREMENT CSR POINTER
;DEBUG AID
; TURN ON THE CACHE
;JUMP TO TRY NEXT CSR

#4,5P
6

;RESTORE STACK
;GO TO END OF BANK ROUTINE

;R-C
;R-C

CVMJARQ MSV11-J MEMORY DIAG.

MATCH ALL CSR'S WITH MEMORY

5952 010454
5953 010456
5954 010460

H12

MACRO V05.01b Friday 15-Feb 85 16:10

104423
104472

SUBAAS:
Rl
BRA

010460

5955
5956
5957
5958
5959
5960
5961 010462
5962 010466
5963 010474
5964 010500
5965 010506
010506
5966
5967
5968
5969
5970
5971
5972

000004

005037
012737
005037
012737

002072
000001
002070
000001

012737

034050

010514
010516
010522
010524
010526
010530

005000
012701
104424
005720
077102
104423

5973 010532
5974 010536
5975 010540
010540
010544

005737
001403

002072

005237
104003

002064

005737
001406
162737

002070

5976
5977
5978
5979

010546
010552
010554
010562
010562
010566

5980 010570
5981 010576
010576
010604
010612
010614

002076
002100
000004

TEST
22 2

1$:

.DSABL

st
BEQ
SUB
FATAL
INC
ERROR

002034

005237
104004

002064

053737

002106

002664

012737
022737
001002
005037

034114
000005

000004
004010

177766

.DSABL

BIS
RES4
MOV
CHP

rors.

5983 010620
RE

032777

001003

000001

172010

it ittt ittt

il ittt

It ITI IR

BANK O ACCESSES

21233333

2323321733333 8 3222222222213

1332333222328 232

322333

23222

CRF

RO
#SI1ZE,R1

;TURN CACHE OFF

(RO)+
R1,1$

{SEE IF I CAN DO A READ ACCESS WITHOUT A PARITY TRAP

;TURN CACHE ON

ANY FAILURES
PARCNT
24
3

;ANY PARITY ERRORS?
iNO - SKIP

FATAL $
+3

;SET FATAL INDICATOR

NEMCNT
3
#2, RDDRESS
4
FATAL$
+4

;ANY NON EXISTANT MEMORY (HOLES)?
:SKIP IF EQUAL
:UPDATE 1ST ADDRESS FAILURE FROM AUTO INCREMENT #

CRF

;SET FATAL INDICATOR

CRF

CPUBIT,CONFIG
#TIMEOUT,4
45, PROTYP

sSET_CORRECT ACCESSED BIT ON BANK O
;RESET TRAPS TO 4 TO DEFAULT
;IS THIS AN 11/83/84 ?
:BRANCH IF NOT
:CLEAR OUT THE CPU ERROR REGISTER BITS

1013
CPUERR

.DSABL

CRF

SUBTST

<<ENABLE ECC FOR CORRECT TRAPS>>

22231223241

H kR kR

010626

sttt

BNE
CF

: #SUBTEST
010620

;THIS DOES A "TST* INSTRUCTION ON EVERY LOCATION IN BANK 00 TO SEE
:IF IT GETS ANY PARITY TRAPS.
:SINCE EVERY LOCATION IS EITHER LOADED OR WRITTEN INTO BY THE PROGRAM
:PRIOR TO THIS POINT - THEN A PARITY ERROR IMPLIES THAT THERE IS A
;HARDWARE FAILURE IN THE MEMORY.
: THESE ERRORS ARE COUNTED AND A FATAL ACTION IS TAKEN
CLR
PARCNT
;CLEAR PARITY ERROR COUNTER
MOV
#1,NOPAR
:SET THE NO PARITY ERROR FLAG
CLR
NEMCNT
:CLEAR NON-EXISTANT MEMORY ERROR COUNTER
MOV
21, NONEM
:SET_THE NON-EXISTANT MEMORY ERROR MODE TO COUNT
SET4
#NONEXIST
;TRAPS TO 4 GOTO NONEXIST
MOV
ANONEXIST,
4

1sT
BEQ
FATAL
INC
ERROR

2¢:

2ttt

SCOPE

.DSABL

so82

5984 010620

CLR
MOV
CACHOFF
TsT
S0B
CACHON
:SEE IF

040000

000002

2222 22283233233

222t t

1ST2:

SEQ 0150

CACHON
;MAKE SURE THE CACHE IS ON
ECCINIT
:TRAP ON DOUBLE BIT ERRORS (NORMAL)
NEWTST
<<TEST BANK O ACCESSES>>

22333

;#TEST

Page 154

;THAT A EXPECTED TRAP COULD HAVE SET

i s

2223222322322 323 2222232322222

ENABLE ECC FOR CORRECT TRAPS

Rk kR ko kKK

kR kK kb kR kR kR Rk kb Rk kR Rk k kbR

IF #5W0 SET.IN @SWR OR ACTFLAG IS TRUE

b b s

22222222222

bR S

Re b b but e s

BIT #50,35WR

CVMJUAAQ MSV11-J MEMORY DIAG.
ENRBLE ECC FOR CORRECT TRAPS
010630
010634

010636
5985 010636
5986 010640
010640
010642
5987 010642
5988 010644
010644

005737
001402
104506
000401
104472

112

MACRO V05.01b Friday 15-Feb 85 16:10

002350

Pege 154-1

SEQ 01S1

TST ACTFLAG
BEQ LS3

ENASBE
ELSE
ECCINIT
END ;0F IF #SWO

LS2:;:::::3
; TRAP ON SINGLE BIT ERRORS

BR LS4
LS3:;::::::
; TRAP ON DOUBLE BIT ERRORS (NORMAL)
sq
L
.......
R

CVMJARO MSV11-JU MEMORY DIAG.
ENABLE ECC FOR CORRECT TRAPS

MACRO v05.01b Friday

15-Feb-85

NEWTST
RIS IRt

;*TEST

TS73:

000004

5993
5994
5995
5996

5997
5998
5999
6000
6001
6002

010646
010652
010660
010666
010666

005037
012737
012737

002102
000001
000002

002076
002100

012737

034050

000004

6003 010674
6004 010702
6005 010710
6006 010714
6007 010722
6008 010724
6009 010730
6010 010732
6011 010734
6012 010740
6013 010744
6014 010750
6015 010754
010754
010756
010762

012737
012737
005237
023737
103451
013701
006301
006301
010137
005037
005037
005037

011420
011422
002102

002522
002524

002104
002074
002072
002070

010346
013703
004737

010766

6016 010770

6017
6018
6019
6020
6021
6022
6023
6024
6025

010774
010776
011004
011010
011012
011016
011020
011022
011024
011024

011032
011036
011040
011042
011044
011046
6032 011052
011052
011060
6026
6027
6028
6029
6030
6031

012603
105761
100542
012777
012700
010004
012701
010103
005002
104424

002556

383 222222222t

TEST

TAG9¢:

MOV
INC

CMP
BLO
MOV

LASTBANK , BANK
TAG2$
BANK,R1

CONFIG(R1)

MAP

WARN1:

040000

034114
000005

177776
24:

TAG2¢:

000004

004010

it il

ZEROS

& ONES

I T

BMI
MOV

TSTBANK
#207,
3L INK1

MOV
#FIRST,RO
MOV
RO,R4
MOV
#SIZE,R1
MOV
R1,R3
CLR
R2
CACHOFF
TESTAREA

BIS
.DSABL
CALL
KERNEL
CACHON
NOP
BR

CLR
RES4

MOV
cMP

;DONE?
;YES

SKIP TO NEXT

T Iy

TEST

;MAP SUPERVISOR SPACE

TST8

012737
022737

BANK

002664

002102

I I

FOR

;BANK x 4

BANK,R3
MAPPER
CRF

000240
000416
005037

R1
R1
R1,BANKINDEX

MOV
CALL
.DSABL

011414

(OCTAL)

#MMTST3+6,LINK2

BANK

002102
035716

004737

200

;EACH BANK IS TESTED FOR EXISTANCE AND IF IT EXISTS
;THEN IT IS TESTED FOR ZEROS & ONES.
;EXCEPT -

ASL
ASL
MOV

171516

SCOPE

PATERR
PARCNT
NEMCNT

002552

104417
104423

002102

BANKS

CLR
CLR
CLR

053737

156

PROTECTED BANKS (WHERE THE PROGRAM IS) ARE ONLY TESTED BY
“TST" INSTRUCTIONS LIKE BANK #0
ANY BAD BANKS ARE LOGGED IN THE CONFIGURATION TABLE.
;THIS ROUTINE IS ONLY DOING A SMART SIZE
NOT ACTUAL TESTING!
BANK
CLR
MOV
#1,NOPAR
;SET NO PARITY ERROR FLAG
MOV
#2 ,NONEM
;:SET NON-EXISTANT MEMORY MODE TO EXIT TEST LOOP
SET4
#NONEXIST
; TRAPS TO 4 GOTO NONEXIST
MOV
#NONEXIST,4
.DSABL
CRF
MOV
#MTST3+4 ,LINKL
;SET UP LINKS

002102

000207
060000

Page

<<TEST BANKS 1 200 (OCTAL) FOR ZERQS & ONES>>

22222

5992

16:10

SEQ 0152

5991 010644

010644

J12

TESTMODE ,PSW
CRF
MTST3

TAG3$
BANK

#TIMEQUT,4
#5,PROTYP

;CLEAR PATTERN ERROR COUNTER
;:CLEAR PARITY ERROR COUNTER
; CLEAR NON-EXISTANT MEMORY COUNTER (HOLES)
(TEST AREA) TO BANK
MOV R3, (SP)

MOV (SP).+,R3

;IS THIS BANK PROTECTED?
;YES - GO TEST BANK SPECIAL
;PUT "RETURN" INSTRUCTION AFTER WRITE ROUTINE

;DATA 1S ZEROS
; TURN CACHE OFF
;ENTER SUPERVISOR MODE
;GO TO SYSTEM TEST MODE
:ENTER KERNEL MODE
; TURN CACHE ON

;SKIP NEXT INSTRUCTION

;RESET TRAPS TO 4 TO DEFAULT
;IS THIS AN 11/83/84

CVMUAAQ MSV11-J MEMORY DIAG.
T3

K12

MACRO V05.01b Friday 15 Feb-85 16:10

TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES

011066

011070

6033
6034
6035
6036
6037
6038
6039

001002
005037

005037
000557
005737
001401
000677
104424

177766

tors.

011074
011100
011102
011106
011110
011112
011114
011114

002076

053737

002552

6040 011122
6041 011126
6042 011130
6043 011132
6044 011134
6045 011140
6046 011142
6047 011146
6048 011150
6049 011154
6050 011156
6051 011162
6052 011164
6053 011170

004777
104417
104423
000240
005737
001032
005737
001027
005737
001024
012700
010004
012701
010103

171376

6055 011176
6056 C11204
6057 011206

012777
104424

000240

171316

011206

053737

002552

177776

6058 011214
6059 011220
6060 011222
6061 011224

004737
104417
104423
000240

011414

6063
6064
6065
6066
6067
6068
6069

005737
001006
005737
001003
005737
001406
052760

002074

000001

002664

012737
053760
000137

177777
002106
010710

002450
002664

002070

TAG3$:
1%:
177776

002070
060000

6070 011262
011262
6071 0311270
6072 011276
6074
6075 011302

011302
6076 011304

6077 011312
6078 011316

010146
012737

012700
012701

.DSABL
CLR

CRF
NOPAR

2¢:

PATERR

23
PARCNT
23
NEMCNT
24
#FIRST,RO

MOV

ONES , R2

RO,R3
8S1Z€,R1
R1,R3

BIS
o

LESTMODE,PSK

CALL
KERNEL
CACHON
NOP

MTST3

MOV

BANKINDEX
, RO

3§-

TST
BNE
TST
BNE
TST
BEQ
BIS

PATERR
34
PARCNT
3
NEMCNT
a$
#8170, CONFIG(RO)

4%:

BIS

CPUBIT,CONFIG(RO)

002070

SET

JMP

CONFGERROR
TAGY$

;TEST A PROTECTED BANK
TSTBANK:PUSH
Rl
060000
020000

002100

;THAT A EXPECTED TRAP COULD HAVE SET

MOV
#000240, 3L INK1
CACHOFF
TESTAREA

002072

000001

:CLEAR OUT THE CPU ERROR REGISTER BITS

&LINK2

BNE
TST
BNE
TST
BNE
MOV

MOV

MOV
MOV

#1, NONEM

#FIRST,RO
#20000,R1

SEQ 0153

;BRANCH IF NOT

BR
SUBAAI
TST
NEMCNT
BEQ
1%
BR
TAG9$
CACHOFF
TESTAREA
BIS
| LESTHODE.PS

MOV
MOV
MOV

040000

6062 011226 013700 002104
011232
011236
011240
011244
011246
011252
011254

CPUERR

TST

002072

101$

CALL
KERNEL
CACHON
NOP

002074

6054 011172 013702 002614

BNE

Page 156-1

; INDICATE DEFAULT PARITY ACTION

;ANY TRAPS?
iNO - SKIP
:NOW - TRY NEXT BANK
:TURN CACHE OFF
;ENTER SUPERVISOR MODE
:G0 TO SYSTEM TEST MODE
:FINISH PATTERN
;ENTER KERNEL MODE
; TURN_CACHE ON
;DEBUG AID
:ANY PATTERN ERRORS
:YES - SKIP
:ANY PARITY ERRORS
;YES - SKIP
;ANY NON EXISTANT MEMORY
;YES - SKIP

;DATA IS ONES

:PUT “NOP“ INSTRUCTION BACK IN SUBROUTINE
: TURN CACHE OFF
:ENTER TEST MODE

;G0 TO SYSTEM TEST MODE

;00 _IN MEMORY IF NOT
;ENTER KERNEL MODE
: TURN_CACHE ON
:DEBUG AID
:ANY PATTERN ERRORS?
iYES
SKIP
;ANY PARITY ERRORS?
iYES - SKIP
;ANY HOLES?
;NONE - SKIP
:SET_ERROR BIT IN THIS BANK

:FORCE PRINTING OF CONFIGURATION TABLE
MOV # 1,CONFGERROR
;SET ACCESSED BIT

MOV R1,-(SP)
;SET NON-EXISTANT MEMORY TO COUNT

CVMUARO MSV11-J MEMORY DIAG.
13

L12

MACRO V05.01b Friday 1S Feb 85 16:10

TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES

6079 011322
6080 011324

104424

011324

053737

011332
011334
011336
011340
011342
011350
011350
6087 011352
011352
011356
6088 011360
6089 011366
011366
6090 011374
011374
6091 011374
011374
011400
6092 011402
6093 011410
011410
6094 011410

005720
077102
104417
104423
012737

005737
001003
053761

002106

000137

010710

6096 011416

077102

6081
6082
6083
6084
6085
6086

6095 011414

6097 011420
6098 011422
6099 011424
6100 011426
6101 011430
6102 011434
6103 011436

002552

CACHOFF
TESTAREA
ngABL
ESETHODE.PSU

177776
4%:

000002

002100

012601

000001

002664

012737

177777

002450

000240
012401
020102
001402
005237
077306
000207

002072

BIS
SET
END

(RO)+
R1,4¢
#2 ,NONEM
R1

: TURN CACHE OFF
;ENTER TEST MODE
;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE
; TURN CACHE ON
;RESET NON-EXISTANT MEMORY TO EXIT TEST LOOP

MOV (SP).,R1

#BITO,CONFIG(R1)
CONFGERROR

002664

MOV

;0F IF PARCNT

BIS
CPUBIT,CONFIG(R1l)
END ;OF IF NEMCNT

MTST3:
2%:

3¢

JMP

TAG9$

MOV

R2,(RO)+

NOP
MOV
cMP
BEQ
INC
S0B
RETURN

(R4)+,R1
R1,R2
34
PATERR
R3,2$

S0B

R1,MTST3

TST PARCNT
BEQ LSS

;ERROR BANK

&-1,CONFGERROR

LSS::;::::

IF NEMCNT €EQ #0

002070

002074

TST
508
KERNEL
CACHON
MOV
POP

SEQ 0154

IF PARCNT NE #0

005737
001406
052761

010220

Page 156-2

TST NEMCNT
BNE LS6

; ACCESSED BANK

LS6:;:::::

;WRITE MEMORY TQ PATTERN

;D0 TILL DONE

; THIS IS EITHER A NOP OR RETURN
;:READ DATA
;DOES IT MATCH ?
:
;IF NOT COUNT ERRORS
;ANY WAY DO ALL MEMORY
;DONE.
.. .RETURN

CVMJAAQD MSV11-J MEMORY DIAG.

Page 157

TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES

M12

MACRO V05.01b Friday 15-Feb-85 16:10

6105 011440

SUBAAI:

SEQ 0155

SUBTST

; sSUBTEST

I I

FIND SHADOW INHIBIT MODE POINTERS

6106
6107
6108
6109
6110
6111
6112

<«<FIND SHADOW INHIBIT MODE POINTERS>>
e
L

I
T

T T

Iy
TR Y T Y

;# THIS SECTION LOOKS FOR INTERLEAVED MSV1i1-J MEMORIES AND FIGURES OUT
;* WHERE THE SHADOW INHIBIT MODE POINTERS ARE LOCATED.
THESE AREAS

011440

005037

002102

011454
011460
011462
011466
6113 011470

005737
001414
005737
001411
062702

002116

011510

000402

011444
011450
011454

6114 011474
6115 011502
6116 011510

011512
6117 011512
6118 011516

011516

6119 011516
6120 011524

004737
013700

062737
052760

;* ARE THEN MARKED AS PROGRAM SPACE.

040052
002104

SHADL1:

CLR

BANK

;RESET BANK TQ ZERO

CALL
EXBANK
:SET BANK PARAMETERS
MOV
BANKINDEX,RO
IF ACFLAG IS TRUE AND INTFLAG IS TRUE

002136

000040

000020
000200

005237

002102

023737
002347

002556

002102
002664

002102

ADD

ADD
8IS

ELSE

#40,R2

#20,BANK
#BIT7,CONFIG(RO)

;POINT TO BANKINDEX + 8

TST
BEQ
TS1
BEQ

ACFLAG
L57
INTFLAG
LS7

;POINT TO BANK + 16
;MAKE NEW BANK PROGRAM SPACE

BR L60

LS57:::5::53

INC
BANK
END; OF IF ACFLAG

;GO TO NEXT BANK

CMP
BGE

;HAVE WE DONE ALL THE BANKS?
;BRANCH IF NOT

LASTBANK , BANK
SHADL 1

L60:;::::5

N12

MACRO V05.01b Fridey 15-Feb-85 16:10
CVMJARO MSV11-J MEMORY DIAG.
FIND SHADOW INHIBIT MOOE POINTERS

NEWTST

0123 011526

Page 159

SEQ 0156

<<ECC INHIBIT MODE POINTER TEST>>

Ry T

;sTEST 4
L

011526

6124
6125
6126
6127
6128
6129
6130
6131
6132
6133
6134
6135
6136
6137
6138
6139
6140
6141 011530
6142 011532
6143 011540
011540
011544
6144 011544
6145 011550
6146 011554
6147 011560
011560
011564
6148 011566

011566
011572
6149 011574
011574
6150
6151
6152

6153
6154
6155
6156
6157

6158
6159

011600
011602
011606
011612
011614
011620
011624
011624
011632
011634
011642
011642
011646
011650
011656
011656
011656

6160
6161 011662
011662

000004

TST4:

ECC INHIBIT MODE POINTER TEST

;THE MSV11-J OR MF11S-K INHIBIT ECC DISABLE AND DIAGNOSTIC CHECK MODE
;ON THE BOTTOM FIRST OR SECOND 16K WORDS CONTROLLED BY A CSR.
THIS
;IS CONSIDERED 70 BE A
PROTECTED BANK BY THE PROGRAM.
IT MAY BE
;QUITE COMPLEX TO DETERMINE ON A GIVEN SYSTEM CONFIGURATION WHICH
;ESNKS CAN BE PROTECTED;
; THIS ROUTINE ATTEMPS TO

;:0F

EVERY ECC BANK,

;%:E gggégg;EgSBANKS

CREATE A DOUBLE BIT ERROR IN ADDRESS 0 & 2

ECC HARDWARE WILL PREVENT THIS
WHICH SHOULD ALWAYS

IN CASE OF HARDWARE FAILURE IT IS COMMON

;
WILL BE CREATED ON
;DURING THIS ROUTINE.

104424
012737

177777

005037

002102

012701
004737
013700

060000

002156

005737
001436

002116

005737
001433

002120

005737
001030
012703
116002
006302
042702
010237

002342

MOV
#-1,0LOCSR
FOR BANK := $#0 TO LASTBANK

#FIRST,R1

EXBANK
CALL
MOV
BANKINDEX,RO
IF ACFLAG IS TRUE
IF MKFLAG IS TRUE
IF SKIPMK IS FALSE

000002
002665

MOV
MOVB
ASL

#2.R3
CONFIG+1(RO),R2
R2

MOV

R2,CSRNO

B8IC

177741
002152

023737
001413
013737

002152

002156

002152

002156

005737
001003
052760

002122

004737

011750

000100

THAT A DOUBLE BIT ERROR

THE KERNEL
STACK & "“CRASH"
THE DIAGNOSTIC
YOUR ONLY CLUE IS THAT YOU CAN GET AS FAR AS

; THIS ROUTINE BUT NOT PAST IT!
CACHOFF

MOV

002664

FROM HAPPENING

INCLUDE BANK ZERO - WHERE

;: TURN CACHE OFF

040052
002104

LTIy

SCOPE

CLR BANK

;SET UP VIRT ADDR POINTER

TST ACFLAG

B8EQ L61

TST MKFLAG
BEQ L62

TST SKIPMK
BNE L63
;SET INDEX COUNTER

#1+C36,R2

IF CSRNO NE OLDCSR
MOV

CSRNO,OLDCSR

IF PFLAG IS FALSE

BIS

END;

#BIT6,CONFIG(RO)

OF IF PFLAG

IMPTEST
CALL
END; OF IF CSRNO

CMP CSRNO,OLDCSR
BEQ L64
1ST PFLAG

BNE L6S
L65:;;::::
L64:;;:::::

CVMUAAO MSVi1-J MEMORY DIAG.
T4

B13

MACRO V05.01b Friday 1S-Feb-85 16:10

ecc INHIBIT MOOE POINTER TEST

005237
023737
003723

6166 011676
011676
011700
011704

010346
012703
004737

000200
035716

MOV
CALL

012603
005037

002102

CLR
BANK
IF 4SWO SET.IN aSWR OR ACTFLAG IS TRUE

011710
6167 011712
6168 011716
011716
011724
011726

011732
011734
6169 011734
6170 011736
011756
011740

6171 011740

6172 011742
011742

6173 011742
6174 011744

OF IF SKIPMK

END;

OF IF MKFLAG

SEQ 0157

6162 011662
011“2
6163 011662
011662
6164 011662
011662
6165 011662
011662
011666
011674

011676

END;

Page 159 1

L63-non‘.o
L62:5:::::

END; OF IF ACFLAG

032777
001003
005737

001402

002102
002102

104472
000137

170712

MOV (SP)+,R3

L66-

ECCINIT

CACHON
JMP

BIT #SW0,aSWR
BNE L66
TST ACTFLAG

BEQ L67

:TRAP ON SINGLE BIT ERRORS

END; OF IF #SW0
012172

;MAP TEST SPACE TO BANK 0
MOV R3,-(SP)

CRF

ENASBE
ELSE

000401

104423

.DSARBL

2#200,R3
MAPPER

002350

104506

INC BANK
CMP BANK ,LASTBANK
BLE B6

002556
MAP

000001

Lél:::::::

END; OF FOR BANK

SUBAAR

L67:

BR L70

; TRAP ON DOUBLE BIT ER RORS (NORMAL)
L70:;::5:::

; TURN THE CACHE BACK ON

; JUMP OVER THE SUBROUTINE

Cl3

MACRO V05.01b Friday 15-Feb-85 16:10
CVHJAAO MSV11-J MEMORY DIAG.
ECC INHIBIT MODE POINTER TEST

6176 011750
6177 011752
011752
011754
011760
011764
6178 011766
6179 011770
6180 011776
011776
6181 012004

012004
6182 012006
6183 012010
012010
6184 012012
6185 012014
6186 012016
6187 012020
6188 012022
6189 012024
6190 012026
6191
6'92
6193
6194 012030

012030

6195 012032
6196 012040
6197 012042
6198 012046
6199 012050
6200 012052
6201 012054
012054
6202 012056
6203 012060
6204 012066
6205 012070
6206 012072
6207 012074
6208 012076
6209 012100
012100
6210 012102
6211 012104
6212 012112
6213 012114
6214 012116
6215 012120
6216 012122
6217 012124
012124
6218 0l2124
012124

IMPTEST:CLR

005004

010346
013703

004737

MAP BANK

002102

035716

012603
005005
012737

020000

002150

053737

002552

177776

CLR

BIS
.DSABL

TESTMODE,
PSW
CRF

ADD

R3,R1

(SP)

AREA)

TO BANK

;ENTER TEST MODE
:GO TO SYSTEM TEST MODE
; SAVE TEST LOCATION

(R1)

;INDEX TO NEXT LOCATION
;SAVE TEST LOCATION

(R1)

CLRICSR

104503
005711
104501

(TEST

MOV (SP).,R3

MOV
#BIT13,CSR
TESTAREA

MoV
suB
MoV

010411
160301
010411

SUPERVISOR SPACE

MOV R3,

.DSABL

CHK1DIS

104505

;MAP

BANK,R3
MAPPER
CRF

PUSH

011146

SEQ 0158

MOV
CALL

PUSH

011146
060301

Page 160

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

MOV (R1),-(SP)

;DISABLE ECC & WRITE CHECKBITS FOR 1 CSR
;WRITE CHECKBITS (ALL ZEROS)
;:CLEAR CSR
;READ CHECKBITS INTO REAL CSR

18T
(R1)
WAS1DBE

;WAS THERE A DOUBLE BIT ERROR

; THIS MAKES SURE THAT SBE'S DON'T LOOK LIKE PROTECTED AREAS
103435

012737
104505
013711
104503
005711

ON.NOERROR

020000

002150

002614

023140

002150

010411
104503
005711
104501

#BIT13,CSR

MOV~

ONES,(R1)

BCS L71

CHK1DIS

;DISABLE ECC & WRITE CHECKBITS FOR 1 CSR

CLR1CSR

;CLEAR CSR
;WAS THERE A DOUBLE BIT ERROR

BCS L72

CBREG

;ENABLE CHECK/SYNDROME BIT REGISTER
;WRITE DBE'S IN CSR
;DISABLE ECC & WRITE CHECKBITS FOR 1 CSR

MOV #23140,CSR

CHK1DIS

MOV R4,(R1)

010411
104503
005711
104501

103411
104513
012737
104505

MOV

TST
(R1)
WAS1DBE
ON.NOERROR

104501

103423
104513
012737
104505

:CLEAR CSR

CLRICSR

TST (R1)
WAS1D8BE

ON_.NOERROR

023604

002150

;WAS THERE A DOUBLE BIT ERROR

BCS L73

CBREG

MOV #23604,CSR
CHK1DIS
MOV
R4,(R1)
R
CLRICS
TST
(R1)
WAS1DBE
END ;O0F ON.NOERROR ;3

END ;OF ON.NOERROR

;ENABLE CHECK/SYNDROME BIT REGISTER
;WRITE DBE'S IN CSR

;DISABLE ECC & WRITE CHECKBITS FOR 1 CSR
;CLEAR CSR

;WAS THERE A DOUBLE BIT ERROR

L7255

CVMUARQ MSV11-J MEMORY DIAG.
T4

D13

MACRO V05.01b Friday 15 Feb 85 16:10

ECC INHIBIT MODE POINTER TEST

6219 012124

012124
6220 012124
012124

6221 012126

6222 012130
012130
6223 012130

END ;OF ON.NOERROR ;1
ON.ERROR

103001

005205

INC

END ;0F ON.ERROR

104471

ECC101S

6225 012134

060301

ADD

R3,R1

6227 012140
6228 012142
6229 012144
6230 012146
6231 012152
6232 012156
6233 012160
012160
6234 012162
6235 012164
012164
6236 012166
25%3 012170

104503
005705
001405
050560
105260
104036

CLRICSR
TST
BEQ
BIS
INCB
ERROR
0P

RS
14
RS,CONFIG(RO)
CONFIG+2(RO)
+36
(R1)

000207

6239 012172
012172

012737

6224 012132

6226 012136

010411

MOV

010411

MOV

002664
002666
14:

012611
160301

SUB

POP

012611
104417

R4,(R1)
R4,(R1)

R3,R1

(R1)

KERNEL
RETURN
177777

002420

SUBAAR: SET

STOPOK

Page 160 1

SEQ 0159

L71:55::::

8CC L74

;IDENTIFY AS BAD BANK

L74:;;::::;
;DISABLE ERROR CORRECTION

;CLEAR OUT DOUBLE BIT ERROR?

;INDEX TO SECOND WORD

;CLEAR OUT DOUBLE BIT ERROR!

;RESTORE TEST LOCATION (2ND
MOV
;GO BACK TO FIRST WORD
;RESTORE TEST LOCATION (1ST
MOV

;PROGRAM CAN NOW BE HALTED

MOV

WORD)
(SP).+,(R1)

WORD)

(SP)+,(R1)

#-1,STOPOK

CVMUARO MSV11-J MEMORY DIAG.
74

E13

MACRO V05.01b Friday 15-Feb 85 16:10

ECC INHIBIT MODE POINTER TEST

6242 012200

At I

SUBTST

13112222

; *SUBTEST

Page 162

SEQ 0160

<<LEGAL CONFIGURATION CHECK>>

8222 2223328222222 222333333

22321313

LEGAL CONFIGURATION CHECK

stttz

T
N I
N N L
I s I
MmN

6243
6244
6245
6246
6247

012200
012204
012210
012212
012214
012214
012220
6248 012220
gggg 012224
6251 012230
012230
012234
6252 012236
6253 012242
6254 012246
6255 012250
6256 012254
012254
012260

6257
6258 012262

012700
012701
005021
077002

000020
002462

005037

002102

004737
013700

040052
002104

005737
001444
116003
042703
006303
005263

002116

005737
001432

14:

CALL
EXBANIK
MOV BANKINDEX,RO

6261 012274
6262 012276
6263 012302
6264 012306
6265 012312
012312
012314

005737
001423
116003

010304
042703
072427
042704
020304
001007

6266 012316

042760

012332

000405

6267 012324
6268 012332
6269 012334

012334
6270 012334
012334
012336
6271 012336
012336
6272 012340

012340
6273 012340

012340

6274 012346
012346
6275 012346

012346

042760

002665
177760

MOVB
BIC
ASL
INC
IF MKFLAG

002462
002120

TST ACFLAG
BEQ L7S

CONFIG+1(RO),R3
#4C17,R3
R3
CSRINFO(R3)
IS TRUE

:MAKE SURE THAT EACH BANK HAS NO MORE THAN 2 CSRS
BEGIN
LEGALCSR
IF INTFLAG IS TRUE

002136
002665

MOVB

MOV R3,R4
BIC #tC17,R3
ASH #-4 R4
BIC #tC17,R4
IF R3 EQ R4

177760
177774
177760

014000
170000

002666

B8IC

002664

ELSE
LEAVE

000403

LEGALCSR

END; OF IF INTFLAG

177777

002450

SET

CONFGERROR

END

LEGALCSR

END

;0F IF MKFLAG

TST INTFLAG
BEQ L77

#BIT11!'BIT12,CONFIG+2(RO)

END; OF IF R3

TST MKFLAG
BEQ L76

B10:;;::::

CONFIG+1(RO),R3

81C
#170000, CONFIG(RO)
LEAVE LEGALCSR

000401

012737

CLR BANK
B7:5::::5

IF ACFLAG IS TRUE

012262

6259 012262
012262
012266
6260 012270

MOV
#16.,R0O
MOV
#CSRINFO,R1
CLR
(R1)+
S0B
RO,1$
FOR BANK := #0 TO LASTBANK

CMP R3,R4
BNE L100

BR E10

L100:;:::::

BR L101
L77:;5:::::
BR E10
L10Y:;5::5::5:

MOV
E10:;::::::

L76::35553:

#-1,CONFGERROR

CVMJUARQ MSV11-J MEMORY DIAG.
LEGAL CONFIGURATION CHECK
6276 012346
012346
6277 012346
012346
012352
012360
012362

6278 012362
012362

012364
6279 012366
6280 012370
6281 012372
6282 012374
6283 012400
6284 012406
6285 012410
6286 012416
6287 012420
6288 012424
6289 012426
6290 012432
6291 012436
6292 012440
6293 012444
6294 012450
6295 012452
6296 012454
6297 012462
6298 012464
6299 012472
6300 012476
6301 012502
6302 012504
6303 0123510
6304 012512
6305 012516
6306 012520
6307 012524
6308 012530
6309 012534
6310 012536
012536
012540
6311 012542
6312 012546
6313 012352
6314 012560
6315 012562
6316 012566
6317 012570
6318 012572
6319 012574
6320 012600
6321 012602
6322 012604
6323 012606

F13

MACRO V05.01b Friday 15-Feb 85 16:10

010546
010046
005000
005001
005005
005037
022761
002043
022761
002003
004737
000434
016005
032705
001415
042705
072527
020501
001007
032760

001003

012737
062700
022700
001351
005737
001402
004737
005000
005037
062701
022701
001321

012600
012605
005037
012700
032760
001003
162700
000771
006200
006200
010037
000402
000000
000000
005000

002102

END;

:OF IF ACFLAG
OF FOR BANK

002556

012602
000177

002462

000010

002462

2%:

012724
002664
000002

34:

170377

177771

010000

002666

000001
000004
000340

012602

012724

54¢:

012602
000002
000040

012602
000774
000002

162

SEQ 0161
END

005237
023737
003717

Page

PUSH

R5,RO

;SAVE CONTENTS OF RS, RO

CLR
CLR
CLR
CLR
CMP
BGE
cMp
BGE
CALL
BR

RO
R1
RS
MBERR
g%??.CSRINFO(Pl)

;CLEAR REGISTERS

BIT
BEQ
BIC
ASH
cMP
BNE
BIT
BNE

#B8IT1,RS
44
#tC7400,R5
#-7,RS

MOV

Mov
ADD

CMP
BNE
157
BEQ
CALL
CLR
CLR

#10,CSRINFO(R1)

CONFIG(RO),RS5

R5,R1

44
2§IT12.C0NF1602(90)

#1,MBERR
#4,R0
#340,R0

CLR

6$:

000004
74:

002556
MBERR:
PHEBE:

SKUJ:

ASR

MOV
BR

MOV RS
- (SP)
,
MOV RO, -(SP)

;CLEAR ERROR INDICATOR
;IS CURRENT CSR <= 177
;BRANCH IF SO
;IS CURRENT CSR < 10
;:BRANCH IF SO
;CALL ERROR ROUTINE
; TRY NEXT CSR
;MOVE LOW WORD TO RS
;:DOES MEMORY EXIST HERE?
;BRANCH IF NOT

; ISOLATE CSR NUMBER IN

;REGISTER S
;IS IT THE CURRENT CSR?

; TRY NEXT WORD OF CONFIG IF NOTY

;IS IT INTERLEAVED?

;:BRANCH IF SO
;SET ERROR INDICATOR
;UPDATE CONFIG COUNTER
;CONFIG TABLE ALL DONE?
;:BRANCH IF NOT
;ERRORS FOUND?
;CALL ERROR ROUTINE
;REINITIALIZE CONFIG COUNTER
;CLEAR ERROR INDICATOR
;UPDATE CSR COUNTER
;ALL CSR'S DONE?
;BRANCH IF NOT
;RESTORE REGISTERS

CcMP
BNE
pPaopP

Mov
BIT
BNE
SuB
BR
ASR

‘

; TRY NEXT CSR IF NOT

ADD

002664

INC BANK
CMP BANK,LASTBANK
BLE 87

MBERR
#774,R0

??ITI.CONFIG(RO)

#4,R0
6%
RO
RO
RO,LASTBANK
SKUJ

.WORD 0O
.WORD 0O
RO
CLR

MOV (SP).,RO
MOV (SP)+,RS

;RESET ERROR INDICATOR
;INDEX TO TOP OF CONFIG TABLE
;MEMORY PRESENT?
;BRANCH IF SO

;:R-C
;:R-C

iR-C

:TRY NEXT LOWER ENTRY IN CONFIG TSB%E

:R-C

;R C

;DIVIDE INDEX BY 4 TO GET BANK &;:R-C
:R-C
;STORE IN LASTBANK
;:SAVE SPACE FOR ERROR INDICATOR

: SAVE SPACE FOR 0DD BOUNDARY IMTERLEAVED INDICATOR

;:CLEAR CONFIG COUNTER

CVMJUAAO MSV11-J MEMORY DIAG.
LEGAL CONFIGURATION CHECK
6324 012610

005037

6326 012622
6327 012624
6328 012632
6329 012634
6330 012680
6331 012644
6332 012646
6333 012654

001431
032760
001005
005237
062700
000763
023727
001417

G13

MACRO VO0S.01b Friday 15 Feb 85 16:10

(12604

PHEBE

;CLEAR COUNTER

BEQ
BIT
BNE
INC
ADD
BR
cHP
BEQ

3¢
#BIT12, CONFIG+2(RO)
2¢
PHEBE
#4 RO
1$
PHEBE, #10
4%

:BRANCH IF NOT
:IS IT INTERLEAVED?
:BRANCH IF SO
: INCREMENT COUNTER
: INCREMENT CONFIG COUNTER
: TRY NEXT BANK
;IS THE COUNTER EQUAL TO...
;ONE OF THE SPECIAL VALUES.

6334 012656

6335
6336
6337
6338
6339
6340

023727

BEQ
CHP
BEQ
CHP
BEQ
CLR

43
PHEBE
, #50
44
PHEBE
, #70
44
PHEBE

4$:
MOV
5%
BR
ILLCSR: MOV
ASR
CHP
BPL
ADD
14
ADD
MOVB

#1,PHEBE
SUBAAP
R1,R2
R2
#10.,R2
1%
#7,R2
#60,R2
R2,MSGA122

012604
000004

000010

012604

000030

012604

000050

012604

000070

012664
012666
012674
012676
012704
012706

001413
023727
001407
023727
001403
005037

6342 012714
6343 012722
6344 012724
6345 012726
6346 012730
6347 012734
6348 012736
6349 012742
6350 012746

012737
000421
010102
006202
022702
100002
062702
062702
110237

000007
000060
071210

104401

071174

012737
000207

177777

6341 012712 000403

6351 012752
012752

6352 012756
012756
6353 012764

002666

012604

012604
000001

2%:

000012

BIT

CHP

34
012604

B8R

TYPE
TYPEIT
.DSABL

002450

SEQ 0162

CLR

6325 012614 032760 000002 002664 1$:
010000

Page 162-2

SET

RETURN

#B8IT1,CONFIG(RO)

PHEBE , #30

)

MSG122
,MSG122

:IS THERE MEMORY PRESENT?

:IF IT IS...

:BRANCH T0 4¢

;CLEAR INDICATOR
;SET INDICATOR
;BRANCH 70 NEXT SUBTEST
;iR2 HAS CSR NUMBER
:MAKE ACCEPTABLE FOR PRINTING

;PUT NUMBER INTO ERROR MESSAGE

CRF

CONFGERROR

MOV

#-1,CONFGERROR

CVMJUARQ MSV11-J MEMORY DIAG.
LEGAL CONFIGURATION CHECK

H13

MACRO V05.01b fFriday 15-Feb 85 16:10

SEQ 0163
SUBAAP:

6356 012766

SUBTST

(R ER R R R
REi

013034
013036
6366 013036
013036
6367 013042
013042
6368 013042
013042
6369 013042
013042
013046
013050
013052
6370
6371 013052
6372 013056
013056
013060
6373 013060
6374 013064
6375 013070
6376 013074
6377 013100
6378 013106
013106
013112
013116
013120
6379 013120
013120
013122
6380 013122
013122
013130
6381 013132

005037
005037
013702
006302
006302

002400
002402
002556

223 222

002664

032761
001403

000460

002666

005237

002402

LASTBANK,R2

:= MSIZE + #1

ELSE

ittt itttz

it s

LSIZE
MSIZE

BIT CPUBIT,CONFIG(R1)
BEQ L102
BIT oBIT8,CONFIG+2(R1)
BEQ L103

INC MSIZE
BR L104

LET LSIZE

:= LSIZE « #

END;IF BIT8

END

OF IF CPUBIT

;0F FOR ALL BANXS IN TABLE

ADD #4,R1

CMP R1,R2

BLE B11

CLR

FOR R1

005001

006361
006361
006361
006361
066137

002374
002374
002374
002374
002374

062701
020127
003760

000002
000010

002452

#0 TO #10 BY 2

ASL
BSIZE(R1)
ASL
BSIZE(R1)
ASL
BSIZE(R1)
ASL
BSIZE(R1)
ADD
BSIZE(R1),I
END; FOR R1

FOR R1

002106

;BSIZE(R1) := BSIZE(R1) = 16.
;I <- I + BSIZE(R1)
ADD #2.R1

CMP R1,#10
BLE Bl12

005001

033761
001402

R2
R2
:= #0 TO R2 BY #

LET MSIZE

END;

002452

R SRR SRR PSS S

CLR
CLR

IF #BIT8 SET.IN CONFIG+2(R1)

002400

005037

R E R R R E SRR AR SRR RO E

ittt

IF CPUBIT SET.IN CONFIG(R1)

000402

000004

22232

LSIZE,MSIZE

MOV

002106

062701
020102
003757

2232223222232

ASL
ASL
FOR R1

033761
001411

R AR AR AR R A SRR

PRINT CONFIGURATICN DETAILS

CLEAR

005001

005237

<<PRINT CONFIGURATION DETAILS>>

R R AR SRR R AR AR

: *SUBTEST
6357 012766
012766
012772
6358 012776
6359 013002
6360 013004
6361 013006
013006
013010
6362 013010
013010
013016
6363 013020
013020
013026
6364 013030
013030
6365 013034

Peage 164

002064

:= #0 10 #200 BY #

IF CPUBIT SET.IN CONFIG(R1)
LET UNITOP

:= UNITOP +

8IT CPUBIT,CONFIG(R1)
BEQ L105

CVMJUAARQ MSV11-J MEMORY DIAG.

CONFIGURATION DETAILS

013132
6382 013136
013136
6383 013136
013136

005237

062701

MACRO V05.01b Friday

002416

END;
END;

000004

000200

6386 013160
6387 013164
6388 013170
013170
013176
013200
013206
6389 013206
013206

006337
006337
006337
006337

002416
002416

023737
002003
013737

002452

002416

002452

104401

002660

6390 013212
6391 013216

005737
001414

002400

6385 013154

6392
6393
6394
6395

013220
013226
013230
013236
013236
013242

002416
002416

2$:

004000

002400

000004

002400

013746
104405

002400

013244

104401

071025

013250
013254
013256
013264

005737
001414
022737
001003

002402

6396 013244

6397
6398
6399
6400

022737
001003
162737

004000

Page 164-1

SEQ 0164

020127
003765

013142
013146
013150
5384 013150

113

15-Febh-85 16:10

12%:

34:
002402

INC UNITOP

OF IF CPUBIT

L105:;;::3:

OF FOR R1

ASL
ASL
ASL
ASL
IF I LT

UNITOP
UNITOP
UNITOP
UNITOP
;UNITOP := UNITOP #* 16.
UNITOP THEN LET I := UNITOP

TYPE
TYPEIT

$CRLF
,$CRLF

.DSABL
TST
BEQ
CMP
BNE

CRF
LSIZE
3¢
#2048, ,LSIZE
124

TYPDEC
MOV

LSIZE
LSIZE,-(SP)

SuUB

TYPDS
.DSABL
TYPE
TYPEIT
.DSABL
187

BEQ
ZMP
BNE

#4 ,LSIZE

CRF
MSGl12
,MSGl12
CRF
MSIZE

5S¢
#2048. ,MS1ZE
13¢

ADD #4,R1
CMP k!, 8200
BLE B13
E13:;:::::3

CMP I,UNITOP
BGE L106
MOV UNITOP,I
L106:;:;:;::::

; SUBTRACT 4K FOR THE I1/0 PAGE
; :SAVE LSIZE FOR TYPEQUT
; ;GO TYPE--DECIMAL ASCII WITH SIGN

CVMUARQ MSV1l1-J MEMORY DIAG.

CONFIGURATION DETAILS

6401 013266
6402 013274
013274
013300

6403 013302
013302
6404
6405
6406
6407

162737

000004

013746
104405

002402

MACRO V05.01b Friday 15-Feb-85 16:10

002402

104401

071057

022737
001003
162737

004000

002452

000004

002452

013306
013314
013316
013324
013324
013330

013746
104405

002452

6408 013332
013332

104401

070127

032777
001002
004737

000100

6409 013336
013336
013334
6410 013346
6411 013352
013352

J13

032722

167272

13$:

5%:
6%:

SuB
TYPDEC
MOV
TYPDS
.DSABL
JYPE
TYPEIT
.DSABL
cMP
BNE
SUB
TYPDEC
MOV
TYPDS
.DSABL
TYPE
TYPEIT
.DSABL
IF #SW6

#4 ,MSIZE
MSizE
MSIZE,-(SP)
CRF

Page 164-2

;

SEQ 0165

SUBTRACT 4K FOR THE 1/0 PAGE

; ;SAVE MSIZE FOR TYPEOUT
::1G0 TYPE--DECIMAL ASCII WITH SIGN

MSG113
,MSG113

CRF
#2048.,1
63
24,1
; SUBTRACT 4K FOR THE I/0 PAGE
I
1,-(SP) ;:iSAVE I FOR TYPEOUT
;:GO TYPE--DECIMAL ASCII WITH SIGN
CRF

MSGO70
,MSGO70

CRF

OFF.IN @SWR

CALL
PCONFIG
END; OF IF #SW6

BIT #SW6,aSWR
BNE L107
L107:55:54:

CVMUAAQ MSV11 J MEMORY DIAG.

CONFIGURATION DETAILS

MACRO V05.01b Friday

15-Feb-85

SUBTST
R
I

013376

013400
6419 013400
013400
013404
6420 013406
6421 013410
6422 013414
013414
013420
6423 013422
6424 013424
013424
013426
6425 013426
6426 013430
013430
6427 013430
6428 013432
6429 013434
6430 013436
6431 013440
6432 013442
6433 013444
6434 013450
6435 013454
013454
013462
6436 013464
6437 013470

013470
6438 013470
013470
013476
6439 013500
6440 013504
013504
6441 013504
6442 013510
013510
6443 013510
013510
013512
013516
013520

001441
111001
042701

005760
002002
000261

002352

CHECK APT SIZING

CLR

TEMP

IFB 1(RO) NE #0
MOVB

(RQ),R1

B8IC

177400

SEC
ELSE

000401

CLC
END ;0F IF 2(RO)

006101
005201
006301
006301
006301
006301

ROL
INC
ASL
ASL
ASL
ASL

R1
R1
Ri
R1
R1
R1

MOV

R1,TEMP

062700

000004

005202
020227
003730

suB

ADD

END

R1,APTPAR

;0F IFB 1(RO)

IFB 1(RO) EQ #»4

000004

ADD

002424

END

R1,APTECC

;0OF IFB 1(RO)

ADD
#4 RO
END ;OF IFB 1(RO)

END

000004

TST APTFLAG

CLR R2
Bl4::;::::
7STB 1(RO)
BEQ L111

TST 2(R0O)
BGE L112

L112:::::::

L113:::::::
;7O COMPENSATE FOR 4 BANKS BEING (0-3)

TEMP,R1

IFB 1(RO) EQ #3

000003

002422

000001

BR L113

000241

126027
001002
060137

#177400,R1

IF 2(RO) LT #

000002

000001

BEQ L110

MOV
#$MAMS1,RO
FOR R2 := #0 TO #4

000001

126027
001002
060137

TST APTSIZE

002434
056676

002434
002434

BEQ L110

002444

163701
010137

L L L Lt

IF APTFLAG IS TRUE AND APTSIZE IS TRUE

005002

105760

166

<<CHECK APT SIZING>>
T

;*SUBTEST
005737
001475
005737
001472
005037
012700

Page

SEQ 0166

6414 013352

6415 013352
013352
013356
013360
013364
6416 013366
6417 013372
6418 013376

K13

16:10

;0F FOR R2

CMPB 1(R0O),
a3
BNE L114
L114:;5:5:;

CMPB 1(R0O),%4
BNE L115
L115:::::::
Li1lY:;;::::

INC R2

CMP R2.%4

BLE B14
El4:;::::::

CVMJAAQ MSV11-J MEMORY DIAG.

CHECK APT SIZING

6444 013520
013520
013526
013530
013536

013540

013546

013550
6445 013550
6446 013552
013552
6447 013552
013552

023737
001010
023737
001004
023737
001401

104046

L13

MACRO V05.01b Friday 15-Feb-85 16:10

002422

002400

002424

002402

002424

002404

Page 166-1

SEQ 0167

IF APTPAR NE LSIZE OR APTECC NE MSIZE OR APTECC NE PSIZE
CMP
BNE
CMP
BNE

APTPAR,LSIZE
L116
APTECC,MSIZE
L116

CMP APTECC,PSIZE

BEQ L117

ERROR
+46
END ;0F IF APTPAR
END

;0F IF APTFLAG

L116:::5:::

L117:5::5::
L110

CVMJUAAQ MSV11-J MEMORY DIAG.
CHECK APT SIZING

MACRO V05.01b Friday 15-Feb-85 16:10

SEQ 0168
LOOP:

6449 013552

NEWTST

;60 EESSAER SRR

;*TEST S

USRS SRR

013552

6450 013554
6451 013560
6432 013564
6453 013570
6434 013574

6455 013600
6456 013602
6457 013604
6458 013606
6459 013610
6460 013612
6461 013614
6462 013616
6463
6464 013620
6465
6466 013624

000004
005037
017700
042700
004770
000137
014262
014370
014476
014626
014756
015106
015260
015410

004737

TSTS:

002222
167052

177761
013600
013620

<<DIAGNOSTIC MODE DISPATCH ROUTINE>>
AEFEARREERAEE SRS

ERE

AR SRR EEE R

SCOPE
CLR
MoV
BIC

CALL
JMP
BAFPAF
DISP:TBL
BAFPAR
BAWPAF
BAWPAR

PAFBAF
PAFBAW
PARBAF
PARBAW

CONTFLAG
aSWR,RO
#1C16,R0
@DISPTBL(RO)
MEMDONE

;MODE
;MODE
;MODE
:MODE

6471
6472
6473
6474

6475

013642
013650
013654
013654
013662
013666
013666
013666

6479
6480 013672

AR R

R RS

R SRR E

R E SRS R R A RS

OP RO

;GET SWITCHES
;MASK TO ONLY MODE BITS
;:DISPATCH TO ROUTINE THROUGH NEXT TABLE
;G0 TO NEXT TEST

FORWARD, PATTERNS FORWARD
FORWARD, PATTERNS REVERSE
WORST FIRST, PATTERNS FORWARD
WORST FIRST, PATTERNS REVERSE
BANKS FORWARD

;MODE 7;PATTERNS RFVERSE,

BANKS WORST FIRST

;MODE S;PATTERNS FORWARD, BANKS WORST :"IRST
;MODE 6;:PATTERNS REVERSE, BANKS FORWARD

; CHECK BACKGROUND PATTERN

ittt

TST6:

000004

005737
001015

002002

012737
012737
004737

177777
1mmn
021610

002612
002110

012737
005037

002110

177777

002612

004737

014162

2222223222222

22222t d

ittt

MT0027
HEADER

END

MUT
;OF IF SELONLY

CALL

DOBACK

SUBTST

<<FLUSH QUT DBE'S»>>

CLR

BRA

BRI

022200

T T

ittt

SCOPE
;MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA
;WRITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS)
IF SELONLY IS FALSE
TST SELONLY
BNE L120
HEADER ,MUT
SET
MOV
#-1,HEADER

CALL
SET

FLUSH:

004737

it L

UNIQUE BANK TEST

; *SUBTEST
6481 013672

0;BANKS
1;BANKS
2:BANKS
3:BANKS

R AER

;MODE 4;PATTERNS FORWARD,

BRidi i1 i3 32222232

013632
6470 013634
013634

RS AR R AR R

Rt eRboy

NEWTST<<UNIQUE BANK TEST>>
;#TEST 6

6467
6468
6469 013626
013626

R R R

DOBACK

MEMDONE
: CALL

014162

R EARR R SRR SRR S SRR ESEE S S ES RSP NG EN B RGO d e

DIAGNOSTIC MODE DISPATCH ROUTINE

013624

Page 167

R 22

222

R it

MOV

@-1,MUT

MOV

@#-1,HERDER

L120:;:::::
;RESTORE BACKROUND PATTERN
i

sttt

03322222232

FLUSH OUT DBE'S
2 233

CALL

222222222222

MT0030

iRat

it s

a2l

llly)

CVMUAAO HMSV11-J MEMORY DIAG.
END OF PASS ROUTINE
6484
6485
6486
6487
6488
6489
6490
6491 013676
6492 013702
6493 013706
6494 013712

64935
6496
6497
6498
6499
6500

013716
013722
013724
013732
013736
013744
013744

6501 013750
013750

013756
013760

013764
013766
013774
013776
6502 013776
013776

63503 014002
6504 V14006
014006
6305 014006
014006
014012

6506
6307
6308
6309
6310
6511
6312
6513
6314
63135
6316
6317
6318
6319
6520
6521
6522
6523

014014
014020
014022
014026
014030
014030
014032
014036
014036
014040
014042
014044
014046
014050
014052

MACRO V0S.01b Friday

15 Feb-85

N13

16:10

Page

169

SEQ 0169
.SBTTL

END OF PASS ROUTINE

;»INCREMENT THE PASS NUMBER ($PASS)
;sINDICATE END-OF -PROGRAM AFTER EACH PASSES THRU THE PROGRAM

005037
012700
042710
062700
020027
003771
013737
003237
042737

002630
056654
100000

104401

070251

032777
001007
005737
001004
023727
001004

004000

056654

005037

002346

013746

056654

013700
001456
022700
001453

000042

012600
000005
004710
000240
000240
000240

#XXXXX"

(WHERE

$EOP:

CLR

FSINFLAG

14:

81C

#81713,(RO)

MOV

;MOVE 2ND WORD OF CONFIG TO RO

ADD
cMP

#4 ,R0O
RO, #3620

; INCREMENT TO NEXT BANK
;DONE?

MOV

$ERTTL,LASTERROR

INC
81C

056654

IS A DECIMAL NUMBER)

SCONFIG+2,R0

BLE

002016

XXXXX

TYPE
TYPEIT

;CLEAR BACKGROUND VALID BIT

;NO - BRANCH

$PASS
#100000, $PASS

; ; INCREMENT THE PASS NUMBER
;:DON'T ALLOW A NEG. NUMBER
;; TYPE "END PASS #o*

MSGO77
,MSGO77
CRF
.DSABL
IF #SW11 SET.IN aSWR OR QVFLAG IS TRUE OR $PASS £Q @1

166660

002000

BIT

#SW11,3SWR

BNE Li21
187 QVFLAG
BNE L121
01
CMP $PASS,
BNE L122

002346

067273

010046
004737

“END PASS

;#IF THERES A MONITOR GO TO IV
;#IF THERE ISN'T JuMP TO LOOP

002442
002666
020000
000004
003620

104401

104405

;sTYPE

000001
TYPE
TYPEIT
.DSABL

MSGO3S
,M5GO3S
CRF

TYPDEC
MOV
TYPDS
.DSABL

$PASS
$PASS, -(SP)

;QV

CLR
QVFLAG
END ;OF IF SWi11l

$ZAP42:

040636

$00AGN:

L122:::::::

; ; SAVE $PASS FOR TYPEOUT
; ;G0 TYPE--DECIMAL ASCII WITH SIGN

MOV

42,R0O

; ;GET MONITOR ADDRESS

CcMP

#STACK,RO

;ARE WE UNDER RT11

PUSH

CALL

SHUTUP

BEQ

$D0AGAIN

; ;BRANCH IF NO MONITOR

BEQ
$DOAGAIN
;YES - BRANCH
:WE ARE UNDER (HEAVEN HELP US) XXDP!

POP

$ENDAD:

CRF

L121:5:::::

RESET

CALL

NOP
NOP
NOP

MOV RO, -(SP)

(RO)

;UNDO SHUTUP STUFF

; ;CLEAR THE WORLD

;GO TO MONITOR
; ; SAVE ROOM
::FOR
;;ACT11

RESTORE STACK

ENERGIZE Q-8BUS MAP & 22 BIT ADDRESSING
ENERGIZE MEMORY MANAGEMENT
PUT LOADERS BACK HOME

MOV

(SP).,RO

ENO OF PASS ROUTINE

6524
6323
6526
6327
6528

014052
014056
014062
014064
014072
6329 014074
6530 014100
6331 014104
6532 014110
014110
014114
6533 014116
014116
014124
6334 014126
6335 014132
6336 014134
6337 014142
6338 014146
6339 014130

6340 014154
6541 014156
014156
6542 014136
014136
6343 014156

013706
005737
001003
052737
104420
013700
012701

002574
002454

172516

002576

004737

037442

003737
001420

002352

023737
001014
012701
077001

056672

062737
005537
077107
005237
000764

MACRO v05.01b Fr:cey 15 Feb 85 16:1"
KSTACK,SP
NO22BIT

MOV

LOADHOME , RO

056654

056656

APTHANG :
24:

;IS THIS AN 11-83,11723 B8 OR

TST

CMP SUSHR, $PASS
BNE L124

RDD @1, $DEVCY
ADC $UNIT

S08 R1,24
INC $PASS
BR
APTHANG
END ;0F IF $USWR

$D0AGAIN:

JMP

L128:;:::::

IF APTFLAG

LOOP

APTFLAG

BEQ L123

$USWR EQ $PASS

;0F

11/2%?

sTURN ON MEMORY MANAGEMENT
;:DESTINATION BANK
: SOURCE BANK

MOV 450,R1
S08 RO,2¢

056654

013552

SEQ 0170

BNE
1s
81S
08175:8174,MMR3
ENERGIZE

END

000137

169

MOV
¢1,R1
EANKMOV
CALL
IF APTFLAS IS TRUE

000050
000001
056660

1%:

MOY
157

Page

CVMUAAQ MSVLi]-J MEMORY DIAG.

Bid

;RETURN

CVMUAARQ MSV11-J MEMORY DIAG.

EMDY OF PASS ROUTINE

Cl4

MACRO v0S5.01b Friday 15-Feb-85 16:10

SEQ 0171

DOBACK:

6546 014162

<<WRITE BACKGROUND PATTERNS»>>

SUBTST

;088005

HSSE SRR S RSN

; sSUBTEST

014176
014202
014204
014210
6551 014212
014212
014220
6552 014226
6353 014232
6554 014236
014236
6555 014244
014244
6556 014244
014244
014250
014256
014260
6557 014260

005037

002112

005037

002102

004737

040052

005737
001420
005737
001015

002116

CLR

FOR BANK

22213333333 3

3221323

#0 TO LASTBANK

333 2131133322231

XY)

1ST ACFLAG
BEQ L125

TST RRFLAG

002612
002110

002110

012737

1777717

002612

002102
002102

kPO RORSOOR

CLR BANK

002124

177777
177777
017104

000207

2224832113233

NSRS O S S0

PATTERN

CALL
EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

012737
012737
004737
005037

005237
023737
003745

S OSI RS LS EBBEELENEB LR RN RN UE RS LR R RNV

WRITE BACKGROUND PATTERNS

RA2 2222t 2223 2L 2322233

6547 014162
6548 014166
014166
014172
6549 014172
6550 014176

Page 171

SET

CALL
CLR
SET
END
END

HEADER ,MUT

MKTEST
MUT
HEADER

;0F IF ACFLAG

;0F FOR BANK

BNE L125

; CALL

MJTEST

MOV

#-1,HEADER

MOV

#-1,HEADER

MOV
#2-1,MUT
WOULD ALSO WORK

L12S:::::::
INC BANK

CMP BANK,LASTBANK
BLE B1S

002556
RETURN

E1S:::::5::

CVMJAAO MSV11-J MEMORY DIAG.

MTEST MODES

MACRO V05.01b Friday

BAFPAF:

MTEST MODES

SUBTST

<<BANKS FORWARD,PATTERNS FORWARD

: *SUBTEST

6586
6587 014356
6588 014362
6589 014366

173

.SBTTL

6585 014352
014352
014354
014356

Page

SEQ 0172

6560
6561
6562 014262

6563 014262
6564
6565 014266
6566 014272
6567 014276
6568 014300
6569 014304
6570 014306
6571
6572 014312
6573
6574 014316
6575 014322
6576
6577 014324
6578 014330
6579 014334
6580
6581 014336
6582 014342
6583 014344
6584 014346

D14

1S Feb-85 16:10

005037

002102

004737
005737
001412
005737
001007
005037

040052
002116

002112

004737

015562

004737
001373

040474

005037
004737

002222
040520

002354

005737
001401
000207
004737

002124

036402

014262
037214

BANKS FORWARD ,PATTERNS FORWARD

*4RECURSIVE
#¢>>
T

BANK

;SET BANK T0 0

CALL
TST
BEQ
TST
BNE
CLR

EXBANK
ACFLAG
44
RRFLAG
44
PATTERN

; EXAMINE BANK
;:CAN WE ACCESS THIS BANK?
iNO - GO TO BANK LOOP TERMINATION

:START OF BANK LOOP

;START OF PATTERN LOOP

;RELOCATION REQUIRED?

:YES - GO TO BANK LOOP TERMINATION
;SET PATTERN TO O

CALL
MTEST
;G0 TEST CORRECT MEMORY
; TERMINATION OF PATTERN LOOP
INCPAT
CALL
;GO SEE IF THIS IS THE LAST PATTERN
BNE
2%
LOOP ON THIS PATTERN
;NO

4%:

CLR

; TERMINATION OF BANK LOOP
CONTFLAG

CALL
BGE

INCBNK
14

TST
BEQ

RLFLAG
5%

;:END OF LOOPS

5%:

CALL
RELOCATE
ON.ERROR THEN $RETURN

; ##*NOTE++ RECURSIVE CALL

CALL
CALL

RETURN

]

LI
Lty

CLR

RETURN

*#RECURSIVE
s+

2%:

002126

103001
000207
004737
004737
000207

1¢:

BAFPAF
UNRELOCATE

;NEXT HIGHER BANK

;IF NOT DONE - LOOP ON THIS BANK
;HAVE WE BEEN RELOCATED?

:NO

;YES

SKIP

- RETURN

;:MOVE & MAP PROGRAM
BCC L126

RTS PC
L126:;::::::

;CALL SELF
;UNMOVE € UNMAP PROGRAM

CVMJAAQ MSV11-J MEMORY DIAG.
BANKS FORWARD,PATTERNS FORWARD

El4

MACRC V05.0lb Fridey i5 Feb 85 16:10
*sRECURSIV*»
E

BAFPAR:

6592 014370

SEQ 0173

SUBTST

<«<BANKS FORWARD,PATTERNS REVERSE

«sRECURSIVEs#>>

I
I I
T
I
O
T T
N I
T T I
N I T I I
I
T

; *SUBTEST
T

014370

005037

002102

014374
014400
014404
014406
6599 014412
6600 014414
6601
6602 014420
6603
6604 014424
6605 014430
6606
6607 014432
6608 014436
6609 014432
6610
6611 014444
6612 014450
6613 014452
6614 014454
6615 014460
014460
014462
014464
6616
6617 014464
6618 014470
6619 014474

004737
005737
001412
005737
001007
004737

040052
002116

040510

004737

015562

005337
100373

002112

005037
004737
002354

002222
040520

005737
001401
000207
004737

002126

6593
6594
6595
6596
6597
6598

Page 175

036402

014370

037214

N I

T I

;SET BANK TO O

CALL

EXBANK

;EXAMINE BANK

BEQ

;NO

;:START OF BANK LOOP

TST

ACFLAG

RRFLAG
44
SETPAT

;START OF PATTERN LOOP

**RECURSIVE
s+»
T

I I

;CAN WE ACCESS THIS BANK?

GO TO BANK LOOP TERMINATION

sRELOCATION REQUIRED?

;YES - GO TO BANK LOOP TERMINATION
;SET HIGH PATTERN FOR CORRECT MEMORY

CALL

MTEST

;GO TEST CORRECT MEMORY

DEC
BPL

PATTERN
2%

;IS THIS THE LAST PATTERN?
;NO
LOOP ON THIS PATTERN

; TERMINATION OF PATTERN LOOP
; TERMINATION OF BANK LOOP

CLR

CALL

BGE

CONTFLAG

INCBNK
1$

;END OF LOOPS

5¢:

T I

BANK

BNE
CALL
2$:

CLR

TS7T

002124

103001
000207
004737
004737
000207

1¢:

BANKS FORWARD,PATTERNS REVERSE
T

ST
RLFLAG
BEQ
S$
RETURN
CALL
RELOCATE
ON.ERROR THEN $RETURN

; **NOTE*» RECURSIVE CALL

CALL
gé%bRN

BAFPAR
UNRELOCATE

{NEXT HIGHER BANK

;IF NOT DONE - LOOP ON THIS BANK
;HAVE WE BEEN RELOCATED?
:NO - SKIP
;:YES - RETURN
:MOVE & MAP PROGRAM

BCC Lic7
RTS PC

L127:::::::
;CALL SELF
;UNMOVE & UNMAP PROGRAM

CVMUAAQ MSV11-J MEMORY DIAG.

BANKS FORWARD,PATTERNS REVERSE

MACRO V05.01b Friday
ssRECURSIVE
s«

BAWPAF: SUBTST

6622 014476

s EERKRRR AR

F14

15-Feb-85 16:10

SEQ 0174
<<BANKS

WORST

R R A SR AR AR AR R ECE R R

; #SUBTEST

Page 177

FIRST,PATTERNS FORWARD
LA RE R A

SRR R SR

##RECURSIVEss>>

AR ERE SR

BANKS WORST FIRST,PATTERNS FORWARD

RS E S RSSO R IR

U SN

SUR S S SO

#*+RECURSIVEs*»

T
T
s
I
I

005037

002102

004737
005737
001415
005737

040052
002116

014526
014530

005737
001007
005037

002124
002112

014534

004737

015562

014540
014544

004737
001373

040474

014546
014552

014556

005037
004737
002351

002222
040520

014560
014564

005137
001003

014566
6647 014572
6648 014574
6649 014600
6650 014602
6651 014604
6652 014610
014610
014612
014614

004737
000207
005737
001401
000207
004737

6623 014476
6624
6625 014502
6626 014506
6627 014512
6628 014514
6629 014520

6630 014522

6631
6632
6633
6634
6635
6636
6637

6638

6639
6640
6641
6642
6643
6644
6645
6646

66353
6654 014614
6655 014620
6656 014624

001412

2$:

;SET BANK TO O

BEQ

;EXAMINE BANK
;CAN WE ACCESS THIS BANK?
;NO - GO TO BANK LOOP TERMINATION

BEQ
18T
BNE
CLR

43
RRFLAG
44
PATTERN

;NO - GO TQO BANK LOOP TERMINATION
;RELOCATION REQUIRED?
;YES - GO TO BANK LOOP TERMINATION
;SET PATTERN TO O

CALL

MTEST

;60 TEST CORRECT MEMORY

CALL
BNE

INCPAT
28

;GO SEE IF THIS IS THE LAST PATTERN
;NO - LOOP ON THIS PATTERN

T1ST

002130

ACFLAG

BMFLAG

;START OF PATTERN LOOP

;IS THIS BAD MEMORY (WORST FIRST)?

; TERMINATION OF PATTERN LOOP
; TERMINATION OF BANK LOOP

CLR

CONTFLAG

CALL
BGE

INCBNK
14

;:NEXT HIGHER BANK
;IF NOT DONE - LOOP ON THIS BANK

002600

COM
BNE

WORST
S$

:IS THIS AN EVEN NUMBERED PASS?
;YES - SKIP

014476

CALL
BAWPAF
RETURN
TS7
RLFLAG
BEQ
64
RETURN
CALL
RELOCATE
ON.ERROR THEN $RETURN

;END OF LOOPS

; **NOTE**« RECURSIVE CALL

002126

5¢:

036402

6$:

103001
000207
004737
004737
000207

14:

CLR
BANK
;START OF BANK LOOP
CALL
EXBANK

;CALL SELF
;HAVE WE BEEN RELOCATED?
:NO - SKIP
;YES

- RETURN

;MOVE & MAP PROGRAM

BCC L130
RTS PC

014476
037214

; #xNOTE*» RECURSIVE CALL

CALL
gé%bRN

BAWPAF
UNRELOCATE

L130:;;::::

;CALL SELF
;UNMOVE & UNMAP PROGRAM

Gl4

MACRO VO5.01b Friday 15 Feb 85 16:10
CVMJUARO MSV11-J MEMORY DIAG.
ssRECURSIVE*»
BANKS WORST FIRST,PATTERNS FORWARD

6659 014626

BAWPAR:

SUBTST

s EEERAR

R RERR R R AR AR AR KRR

; «SUBTEST

JERRRERE

6660 014626
6661
6662 014632
6663 014636
6664 014642
6665 014644
6666 014650
6667 014652
6668 014656
6669 014660
6670
6671 014664
6672
6673 014670
6674 014674

005037

002102

004737
005737
001415
005737
001412
005737
001007
004737

040052
002116

002130

015562
002112

6675
6676 014676
6677 014702
6678 014706

005337
100373

005037
004737
002351

002222
040520

014719
014714

005137
001003

014716
014722
6685 014724
6686 014730
6687 014732
6688 014734
6689 014740

004737
000207
005737

014740
014742
014744

6690
6691 014744
6692 014750
6693 014754

001401

000207
004737

»sRECURSIVE*#*>>

KR AR

R E R

EEC OGS OREC R
RS R L E

RS EREE S

CLR

BANK

;SET BANK T0 O

CALL

EXBANK

;EXAMINE BANK

BEQ
TST
BEQ

44
BMFLAG
44

:NO - GO TO BANK LOOP TERMINATION

; START OF BANK LOOP

IS8T

ACFLAG

RRFLAG
4%
SETPAT

;:START OF PATTERN LOOP

E S

;RELOCATION REQUIRED?
;:YES - GO TO BANK LOOP TERMINATION
;:SET HIGH PATTERN FOR CORRECT MEMORY

MTEST
;GO TEST CORRECT MEMORY
; TERMINATION OF PATTERN LOOP
DEC
PATTERN
;IS THIS THE LAST PATTERN?
CALL

23
;:NO - LOOP ON THIS PATTERN
; TERMINATION OF BANK LOOP

BPL

002600

COM
BNE

WORST
5¢

;IS THIS AN EVEN NUMBERED PASS?
;YES - SKIP

014626

CALL
RETURN
TST
BEQ
RETURN

BAWPAR

;CALL SELF

RLFLAG

;HAVE WE BEEN RELOCATED?

;END OF LOOPS

; #xNOTE*» RECURSIVE CALL

S$:
6%:

CALL
RELOCATE
ON.ERROR THEN $SRETURN

;NC

:YES

SKIP

- RETURN

;MOVE & MAP PROGRAM
BCC L131

RTS PC
; »*NOTE+x RECURSIVE CALL

014626
037214

DS S RGO

;IS THIS BAD MEMORY (WORST FIRST)

;NEXT HIGHER BANK
;IF NOT DONE - LOOP ON THIS BANK

036402

S S S0 0000000

;CAN WE ACCESS THIS BANK?
:NO - GO TO BANK LOOP TERMINATION

CONTFLAG
INCBNK
1¢

002126

»++RECURSIVEss

KR EREERRERR R RS

CLR
CALL
BGE

103001
000207
004737
004737
000207

2%:

FIRST,PATTERNS REVERSE

ERERERERE R KA E R AR R AR R EER GRS RS

F AR R KRR

BNE
CALL

040510

SEQ 0175

BANKS WORST FIRST,PATTERNS REVERSE
RN

T1S87

002124

004737

6679
6680
6681
6682
6683
6684

1%:

<<BANKS WORST

Page 179

CALL
CALL

RETURN

BAWPAR
UNRELOCATE

; CALL SELF

;UNMOVE & UNMAP PROGRAM

CVMUAAQ MSV11-J MEMORY DIAG.
BANKS WORST FIRST,PATTERNS REVERSE

H14

MACRO VO05.01b Friday 15-Feb-85 16:10
PAFBAF:

6696 014756

Page 181

ssRECURSIVs«
E

SUBTST

SEQ 0176
<«<PATTERNS FORWARD,BANKS FORWARD

«*RECURSIVE#+#>>

I
T
T
T
T T
TTnmTTIImMmMmmmTMT

; *SUBTEST

PATTERNS FORWARD,BANKS FORWARD

««RECURSIVE#»

I
N
I
I
I
I
m

6697 014756
6698
6699 014762
6700
6701 014766
6702 014772

6703 014776
6704 015000
6705 015004
6706 015006
6707 015012
6708 015014
6709

6710 015020
6711 015024
6712 015030
6713
6714 015032
6715 015036
6716
6717 015040
6718
6719 015044
6720
6721 015046
6722 015052
6723 015054
6724 015060
6725 015062
6726 015064
6727 015070
015070
015072
015074
6728
6729 015074
6730 015100
6731 015104

005037

002112

005037

002102

1¢:

004737
004737
001010
005737
001405
005737
001002
004737

040052
040456

2%:

CLR
PATTERN
:START OF PATTERN LOOP
CLR
BANK

;SET PATTERN T0 O

CALL
CALL
BNE

EXBANK
BANKOK
44

:EXAMINE BANK
;CORRECT MEMORY FOR THIS BANK?
;NO - GO TO BANK LOOP TERMINATOR

BEQ
187
BNE
CALL

44
RRFLAG
44
MTEST

;:START OF BANK LOOP

TST

002116
002124

015562
44:

ACFLAG

002222
040520

004737
001351

040474

CALL
BNE

INCRPT
14

005137

002134

COM

TMFLAG

BEQ

CALL
RETURN
TST

PAFLAF

; TERMINATION OF PATTERN LOOP

; **NOTE*x RECURSIVE

014756

036402

103001
000207
004737
004737
000207

014756
037214

;sNEXT HIGHER PATTERN
;0K - LOOP; ELSE CONTINUE

;END OF LOOPS

001403

002126

;CAN WE ACCESS THIS BANK?

;NO - GO TO BANK LOOP TERMINATION
;RELOCATION REQUIRED?
;YES - GO TO BANK LOOP TERMINATION
;GO TEST CORRECT MEMORY
; TERMINATION OF BANK LOOP
CLR
CONTFLAG
CALL
INCBNK
;NEXT HIGHER BANK
BGE
2$
;IF NOT DONE - LOOP ON THIS BANK

005037
004737
002356

004737
000207
005737
001401
000207
004737

;SET BANK T0 0O

S$:

6%:

BEQG

RETURN

;COMPLEMENT TYPE OF MEMORY

;IS THIS AN EVEN NUMBER PASS?
CALL

RLFLAG

CALL
RELOCATE
ON.ERROR THEN $RETURN

; **NOTE** RECURSIVE CALL

CALL
ge%bRN

PAFBAF
UNRELOCATE

;YES - SKIP
;CALL SELF

;HAVE WE BEEN RELOCATED?

;:NO - SKIP

;YES - RETURN

;MOVE & MAP PROGRAM
BCC L132

RTS PC
L132::::::;

;CALL SELF
;UNMOVE & UNMAP PROGRAM

CVMJUAAQ MSV11-J MEMORY DIAG.

PATTERNS FORWARD,BANKS FORWARD

6734 015106

114

MACRO v05.01b Friday 15 Feb-85 16:10
PAFBAW:

SEQ 0177

SUBTST

R
i

6776 015256

005037

002112

005037

002102

004737
004737
001013
005737
001410
005737
001405
005737
001002
004737

040052
040456

005137

002134

004737
000207
005737
001401
000207
004737

036402

2$:

CALL
CALL
BNE

EXBANK
BANKOK
44

;EXAMINE BANK
;CORRECT MEMORY FOR THIS BANK?
;NO - GO TO BANK LOOP TERMINATOR

BEQ
157
BEQ
TS7
BNE
CALL

44
BMFLAG
44
RRFLAG
44
MTEST

+NO - GO TO BANK LOOP TERMINATION
;IS THIS BAD MEMORY (WORST FIRST)
;NO - GO TO BANK LOOP TERMINATION
;RELOCATION REQUIRED?
:YES - GO TO BANK LOOP TERMINATION
;GO0 TEST CORRECT MEMORY

CLR
CALL

CONTFLAG
INCBNK

;START OF BANK LOOP

TST

44
:

ACFLAG

i s

;CAN WE ACCESS THIS BANK?

; TERMINATION OF BANK LOOP

BGE

;NEXT HIGHER BANK
;IF NOT DONE - LOOP ON THIS BANK

CALL
BNE

INCRPT
14

;NEXT HIGHER PATTERN
;OK - LOOP; ELSE CONTINUE

;END OF LOOPS
comM
TMFLAG

5¢:

;COMPLEMENT TYPE OF MEMORY

CALL

PAFBAW

coM
BNE

WORST
6$

;4TH PASS?
; YES - SKIP

CALL
PAFBAW
RETURN
TST
RLFLAG
BEQ
74
RETURN
CALL
RELOCATE
ON.ERROR THEN $RETURN

;CALL SELF

RETURN

CALL

; **NOTExx RECURSIVE CALL

64:
78:

;IS THIS AN EVEN NUMBER PASS?
;:YES - SKIP

BEQ

;CALL SELF

;HAVE WE BEEN RELOCATED?

;NO - SKIP

;YES - RETURN

:MOVE & MAP PROGRAM
B8CC L133

RTS PC

015106
037214

; TERMINATION OF PATTERN LOOP

015106
002126

;SET BANK TO O

;START OF PATTERN L.UOP

; **NOTE** RECURSIVE

002600

222

#»+RECURSIVEss

BANK

015106

103001
000207

004737
004737
000207

PATTERNS FORWARD,BANKS WORST FIRST

1222 2222222 2222222322222

##RECURSIVEss>>

CLR

001403
004737
000207
005137
001003

1¢:

015562

040474

;SET PATTERN T0 0

002124

004737
001346

PATTERN

002130

002222
040520

CLR

002116

005037
004737
002353

<<PATTERNS FORWARD,BANKS WORST FIRST

; *SUBTEST
6735 015106
6736
6737 015112
6738
6739 015116
6740 015122
6741 015126
6742 015130
6743 015134
6744 015136
6745 015142
6746 01144
6747 015150
6748 015152
6749
6750 015156
6751 015162
6752 015166
6753
6754 015170
6755 015174
6756
6757 015176
6758
6759 015202
6760
6761 015204
6762 015210
6763 015212
6764 015216
6765
6766 015220
6767 015224
6768 015226
6769 015232
6770 015234
6771 015236
6772 015242
015242
015244
015246
6773
6774 015246
6775 015252

Page 183

*sRECURSIVs+
E

; **NOTE** RECURSIVE CALL

CALL
gé%bRN

PAFBAW
UNRELOCATE

L133:;::::::

;CALL SELF
;UNMOVE & UNMAP PROGRAM

It
aYY

J14

CVMJAAO MSV11-J MEMORY DIAG.

MACRO vV05.01b Friday
ssRECURSIVE
PATTERNS FORWARD,BANKS WORST FIRST
s+

6811
6812 015376
6813 015402
6814 015406

185

<<PATTERNS

REVERSE ,BANKS

ssRECURSIVEs+>>

FORWARD

FEEEEAASRREERSEELEERRTERRER
AR EERAR SRR AEEREEEES SRS SSRRRREGEAISS
02008000000

;*SUBTEST

015372
015374
015376

Page

SEQ 0178

PARBAF: SUBTST

6779 015260

6780 015260
6781
6782 015264
6783
6784 015270
6785 015274
6786 015300
6787 015302
6788 015306
6789 015310
6790 015314
6791 015316
6792
6793 015322
6794 015326
6795 015332
6796
6797 015334
6798 015340
6799
6800 015342
6801
6802 015346
6803
6804 015350
6805 015354
6806 015356
6807 015362
6808 015364
6809 015366
6810 015372

1S Feb-85 16:10

004737

040510

005037

002102

004737
004737
001010
005737
001405
005737
001002
004737

040052
040456

i 2123

PATTERNS REVERSE,BANKS FORWARD
3

2222

222

82t

a2l

ddti i

*sRECURSIVE
¢+
it i

;SET HIGHTEST PATTERNS

1%:

CLR

BANK

;:SET BANK TO O

24:

CALL
CALL
BNE

EXBANK
BANKOK
43

;EXAMINE BANK
;CORRECT MEMORY FOR THIS BANK?
:NO - GO TO BANK LOOP TERMINATOR

BEQ
TS7T
BNE
CALL

44
RRFLAG
44
MTEST

;:NO - GO TO BANK LOOP TERMINATION
;RELOCATION REQUIRED?
;YES - GO TO BANK LOOP TERMINATION
;GO TEST CORRECT MEMORY

002116

;START OF PATTERN LOOP

;START OF BANK LOOP

TST

002124

015562

ACFLAG

; TERMINATION OF BANK LOOP
CLR
CONTFLAG
CALL
INCBNK
;sNEXT HIGHER BANK
BGE
24
;:IF_NOT DONE - LOOP ON THIS BANK

005337
100351

002112

DEC
BPL

PATTERN
1$

;NEXT LOWER PATTERN
;0K - LOOP; ELSE CONTINUE

005137

002134

CoM

TMFLAG

BEQ

;COMPLEMENT TYPE OF MEMORY
;IS THIS AN EVEN NUMBER PASS?
;YES - SKIP

CALL

PARBAF

44:;

; TERMINATION OF PATTERN LOOP

;END OF LOOPS

001403

004737
004737
000207

Iy IR

;CAN WE ACCESS THIS BANK?

002222
040520

; **NOTE+*

015260
002126

S$:

036402

64:

103001
000207

HIPAT

005037
004737
002356

004737
000207
005737
001401
000207
004737

lIl I

CALL

RETURN
TST
BEQ
RETURN
CALL

RECURSIVE

CALL

RLFLAG
64

RELOCATE
ON.ERROR THEN $RETURN

;CALL SELF
;HAVE WE BEEN RELOCATED?
;:NO
SKIP
;:YES - RETURN
:MOVE & MAP PROGRAM
BCC L134

RTS PC

015260
037214

; ##NOTE+x RECURSIVE CALL

CALL
gé#bRN

PARBAF
UNRELOCATE

L134:;::::;
;CALL SELF
;UNMOVE & UNMAP PROGRAM

YTy}

CVMUARD MSV11-J MEMORY DIAG.

PATTERNS REVERSE,BANKS “ORWARD

6817 015410

K14

MACRO V05.01b Fridey 15-Feb-85 16:10
*sRECURSIVE
¢»
PARBAW:
B

SUBTST

6818
6819
6820
6821
6822
6823
6824

015410

004737

040510

015414

005037

002102

015420
015424
015430
015432
015436
015440
015444
015446
015452
015454

004737
004737
001013
005737
001410
005737
001405
005737
001002
004737

040052
040456

6825
6826
6827
6828
6829
6830
6831
6832
6833 015460
6834 015464
6835 015470
6836
6837 015472
6838 015476
6839
6840 015500
6841
6842 015504
6843
6844 015506
6845 015512
6846 015514
6847 015520
6848
6849 015522
6850 015526
6851 015530
6852 015534
6853 015536
6854 015540
6855 015544
015544
015546
015550
6856
6857 015550
6858 015554
6859 015560

187

SEQ 0179

<<PATTERNS REVERSE,BANKS WORST FIRSTM

; *SUBTEST

Page

it adtnidaat

#+RECURSIVE##>>

PATTERNS REVERSE,BANKS WORST FIRST

CALL

HIPAT

; SET HIGHTEST PATTERN

1%:

CLR

BANK

;SET BANK TO 0

2$:

CALL
CALL
BNE

EXBANK
BANKOK
44

; EXAMINE BANK
;CORRECT MEMORY FOR THIS BANk?
:NO - GO TO BANK LOOP TERMINATOR

BEQ
157
BEQ

44
BMFLAG
44

:NO - GO TO BANK LOOP TERMINATION
;IS THIS BAD MEMORY (WORST FIRST)
;:NO - GO TO BANK LOOP TERMINATION

;START OF PATTERN LOOP

; START OF BANK LOOP

TS7T

002116

002130

TST

002124

015562
4%:

ACFLAG

RRFLAG

;CAN WE ACCESS THIS BANK?

;RELOCATION REQUIRED?

BNE
43
;YES - GO TO BANK LOOP TERMIMNATION
CALL
MTEST
;GO TEST CORRECT MEMORY
; TERMINATION OF BANK LOOP
CLR CONTFLAG
CALL
INCBNK
;NEXT HIGHER BANK
BGE
28
;IF NOT DONE - LOOP ON THIS BANK

002222
040520

005337
100346

002112

DEC
BPL

PATTERN
14

;NEXT LOWER PATTERN
;0K - LOOP; ELSE CONTINUE

005137

002134

COM

TMFLAG

; COMPLEMENT TYPE OF MEMORY

BEQ

;IS THIS AN EVEN NUMBER PASS?
;:YES - SKIP

CALL
RETURN
COM
BNE

PARBAW

;CALL SELF

WORST
6$

:4TH PASS?
;YES - SKIP

CALL

PARBAW

;CALL SELF

TS7T

RLFLAG

; TERMINATION OF PATTERN LOOP

;END OF LOOPS

001403
004737
000207
005137
001003
004737
000207
005737
001401
000207
004737

; #*NOTE*+ RECURSIVE CALL

015410

002600

S¢:

; **NOTE**x RECURSIVE CALL

015410
002126

6%:

036402

7$:

103001

RETURN

BEQ

RETURN

CALL
RELOCATE
ON.ERROR THEN $RETURN

;HAVE WE BEEN RELOCATED?

;NO - SKIP
:YES

RETURN

;MOVE & MAP PROGRAM
B8CC L135

RTS PC

000207
004737
004737
000207

015410
037214

TT
Y
L
L

005037

004737
002353

#«RECURSIVEes

; #*NOTE=* RECURSIVE CALL

CALL
CALL

RETURN

PARBAW
UNRELOCATE

L135:5:::::
;CALL SELF
;UNMOVE & UNMAP PROGRAM

CVMUAAQ MSV11-J MEMORY DIAG.

L14

MACRO v05.01b Friday 15 Feb 85 16:10

PATTERNS REVERSE ,BANKS WORST FIRST

esRECURSIVEss

6862 015562

MTEST:

SUBTST

<<SUBR

; sSUBTEST

SUBR

Page 189

SEQ 0180

SETUP MEMORY TEST»>>
I

MmN

SETUP MEMORY TEST

T
L I T
I
I
I
I

6863 015562
015562
6864 015570
015570
6865 015576
6866 015602
6867 015606
6868 015610
015610
6869 015610
015610
015614
6870 015616
015616
015622
6871 015624
6872 015630
015630
6873 015630
015630

6874
6875
6876
6877

015630
015634
015636
015642

6878 015646
015646
6879 015654

012737

177777

002612

012737
005037
005737
001413

177777
002264
002120

002110

005737
001005

002222

005737
00100~
00477

002342

017324
002110

012737
000207

177777
.

HEADER

SET

MUT

CLR
187
BEQ
BEGIN

PASFLG
MKFLAG
MT1
HOLDLOOP

;INITIALIZE HEADER MESSAGE TYPEOUT
MOV
0-1,HEADER
;INDICATE THERE IS A MEMORY UNDER TEST
MOV
@-1,.MUT

;ECC?
;:NO - SKIP

IF CONTFLAG IS TRUE THEN LEAVE HOLDLOOP

Bl6:;:::::
TST CONTFLAG
BNE El6

IF SKIPMK IS FALSE

015656

004737
000402
004737
005037

SET

CALL
MIKCONTROL
END; OF IF SKIPMK

017104
MT1:
MT2:

002612

END

HOLDLOOP

CALL
BR
CALL
CLR

MKTEST
MT2
MJTEST
MUT

SET

RETURN

HEADER

TST SKIPMK
BNE L136
L136:;:;:::::
E16:::::::
;YES - DO ECC TESTS

;00 PARITY TESTS
;NOW - NO MEMORY UNDER TEST

;ALLOW HEADERS NORMAL

MOV

#-1,HEADER

CVMJAARO MSV11-J MEMORY DIAG.
SETUP MEMORY TEST
SUBR

M14

MACRO v05.01b Fridey 15-Feb-85 16.10

6882 015656

MKCONTROL : SUBTST

Page 191

<<SUBR

SEQ 0181

TEST ECC CSR LOGIC DISPATCH»>>

T
L
T
T
I
T I I
I
T
T

; sSUBTEST

6883
233;

SUBR

TEST ECC CSR LOGIC DISPATCH

N e

I I

; THE NEXT TWO MODULES SOLVE THE PROBLEM OF
;sHOW TO RUN THE CSR TESTS ON EACH ECC MEMORY

6886 015656
015656
015662
015664
015666
6887 C15666
015666
015672
015674
015676
6888 015676
015676
015702
015704
015706
015710
6889 15712
6890 015720

6891 015726
6892 015732
6893 015736
6894 015742

6895 015746
6896 015752
6897 015754
6898 015760
6899 015762
6900 015766
6901 015772
6902 015774
€903 016000
6904 016006
6905 016012
6906 016016
6907 016022
6908 016026
6909 016032
6910 016036

6911 016040
6912 016046
6913 016054
016054
016060

005737
001401
000207

002002

005737
001401
000207

002536

013746
010046
010146
010246
010346
012737
012737
005037
005037

002102

005037
013700
016001
000301
042701
006301
010137
005737
001421
005237
012737

005237

005237
016001
072127
042701
050137
005003
116337
042737

060000
157776
002236
002240

002240
120000
002332
002236
002664
177775
160777
002526
002526
177741

013737

002232

016066

010346
013703
004737

PUSH

BANK,RO,R1,R2,R3

MOV
MOV
CLR
CLR

#FIRST,CSRFBANK
#LAST, CSRLBANK
CSRINT
SPLTCSR

002234

CLR
MOV
MOV
SWAB
8IC
ASL
MOV
TST
BEQ
INC
MOV

CSRLOOP
BANKINDEX ,RO
CONFIG(RO),R1
R1
#tC17,R1
R1
R1,CSRHOLD
INTFLAG
13
SPLTCSR
#120000, CSRLBANK

002152
002152

INC
MOV
ASH
8IC
BIS
14:
CLR
MKLOOP: MOVB
BIC

CSRINT
CONFIG(RO),R1
-3 ,R1
#tC17000,R1
R1,CSRHOLD
R3
CSRHOLD(R3),CSRNO
#tC36,CSRNO

002526
002136

016060

016070
016074

002232
002234

177760

016476

016066
6915 016066

IF INHECC IS TRUC THEN $RETURN

002332
002104
002664

005037

6914 016060

IF SELONLY IS TRUE THEN $RETURN

INC

CSRLOOP

FOR MKCNT

:= #0 TO CSRINT

FOR CSRFIRST

002226

MAP BANK
002102
035716

MOV
CALL

BANK ,R3
MAPPER

TST SELONLY
BEQ L137
RTS PC
L137:5:::::
TST INHECC
BEQ L140
RTS PC
L140:;;;:::;

MOV BANK, -(SP)
MOV RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)
MOV R3,-(SP)
;SET FIRST TEST ADDRESS TO FIRST ADDR.

; AND ZERO THE LOOP COUNTER
;GET THE BANK INDEX
;GET CSR NUMBER

;STORE IN THE LOW BYTE
;IS THIS BANK INTERLEAVED?
;BRANCK IF NOT INTERLEAVED

;WE MUST LOOP TWICE FOR AN INTERLEAVED BANK
:GET THE INTERLEAVE CSR NUMBER
;STORE IT IN CSRHOLD'S UPPER BYTE
;CLEAR ANY UNNECESSARY BITS

CLR MKCNT

Bl7:::::::
:= CSRFBANK TO CSRLBANK BY #4000

MOV CSRFBANK ,CSRFIRST

B20:;:::::
;MAP TEST SPACE TO BANK

MOV R3, (SP)

N14

CVMUAAQD MSV]
SUBR
TEST

016100
6916 016102
6917 016104

016104
6918 016104
6919 016110
016110
016114
016116

016122
6920 016124

IAG,
MACRO v05.01b Fridey 15-Feb-85 16:10
IC DISPATCH

.DSABL

012603
104511
005037

002334

005737
001503
005737
001100
013737

002116

002226

002230

002226

002412

6923
6924
6925
6926
6927
6928
6929
6930

013737
005737
001404
062737
000403
062737
004737

002412
002240

002414

040000

002414

000002
016500

002414

002076

005037

002452

012737
005037

177777
002264

013700

002452

010346

016256

012603

016260
016264
016272

005237
023727
003752

6942 016260

016274
6943 016274
6944 016276
016276
6945 016304
016304
6946 016306
016306
6947 016306

016306
016314

004000

103440
104424
005037

010637
162737
004737

002146
000002
017004

002452
002452

002230

MOV

177777

1¢:
24:

MOV
TESTADD, TESTADD+2
157
SPLTCSR
BEQ
14
ADD
#40000, TESTADD +2
BR
24
ADD
#2,TESTADD+2
CALL
SBETEST
ON.NOERROR

SET

002612

BCS L1472

HEADER

MOV
SP,CTLKVEC
SuB
#2,CTLKVEC
CALL CSRCASE
POP
R3

002146

MOV I,RO

;RESTORE LOOP COUNTER

MOV (SP).,R3

000027

002334

SUCCESS

LEAVE CSRSTUFF

002412
002230

END

;OF FOR TESTADD

4-1,HEADER

;SAVE LOOP COUNTER
MOV R3,-(SP)
;SAVE VECTOR IN CSR OF tK

END ;OF FOR I

CACHON
SET

CLR I
MOV

CLR
PASFLG
LET RO := I

PUSH

MOV CSRFIRST,TESTADD

;:TURN CACHE OFF
; INDICATE PARITY ACTION
.

END ;0F ON.NOERROR

000004
002412

BNE L141

ADD
#4000,CSRLAST
FOR TESTADD := CSRFIRST TO CSRLAST BY #4

CACHOFF
CLR
NOPAR
FOR I := #0 TO #27

000407

062737
023737

TST ACFLAG
BEQ L141
TST RRFLAG

CSRFIRST,CSRLAST

104423
012737

B21::;::::;

002124

013737

6936 016232
016232
6937 016236
016236
6938 016240
6939 016244
6940 016252
6941 016256

MOV (SP).,R3

;INVALIOATE BACKROUND PATTERN

CLR
SUCCESS
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

062737

6933 016214
016214
016220
6934 016220
016220
6935 016226

SEQ 0182

CRF

INVALIOATE
BEGIN CSRSTUFF

6921 016132
6922 016140
8%2{:2

016146
016154
016160
016162
016170
016172
016200
016204
016204
6931 016206
6932 016210

Page 191-1

£23:;
;:TURN CACHE ON

INC I
CMP 1,027
BLE 823

MOV

#-1,SUCCESS

BR E21
L142:;:::::

ADD 94 ,TESTADD
CMP TESTADO,CSRLAST

B15

MACRO V05.01b Fr dey 15-Feb-85 16:10
CVMJUAAQ MSV11-J MEMORY Y DIAG.
D]
TEST ECC CSk LOGI C DISPAICH
SUBR
016322
016324
6948 016324

6952 016336
016336

016342
016344

BLE B2¢

002334

104401

067207

TYPEIT

013746

002102

MOV

004737

050446

6967 016454
6968 016460
016460
016462
016464
016466
016470
6969 016474
6970 016476

005237

002240

005237
023737
003627

016476
016476

002236

062737
012737
005203
020337
003002
000137
104472

000002
000001

002232
002240

002332

012737

177777

01260%
012602
012601
012600
012637
000207

000000

002226

3
O
CRF

TYPEIT

,MSGB34

TYPE

CRF

CALL

END;

002226

MSGAl4e

;0F IF

: : TYPES BANK NUMBER
;:G0 TYPE--OCTAL ASCII

:;TYPE 3 DIGIT(S)
: s SUPPRESS LEADING ZEROS

MSGB34

PERBNK

SUCCESS

OF FOR CSRFIRST

L143:5:::::

ADD #4000,CSRFIRST

002234

CMP CSRFIRST,CSRLBANK
BLE 820

INC

END;

016040

002240

.BYTE
.BYTE
.DSABL

END

004000

TST SUCCESS
BNE L143

CRF
TYPOCS
BANK,<TYPES BANK NUMBER>,3
BANK , -(SP)
; ;SAVE BANK FOR TYPEOUT

.DSABL

062737

005037

,MSGA34

TYPOS

067245

023737
003635

TYPE

.DSABL

174403

104401

€2l:::::::

IF SUCCESS 1S FALSE

005737
001012

6953 016346
016346

016446

Li14Y:;::353:

EWD CSRSTUFF

003
000

016336
6956 016336
016336
016364
016372
016374
6957 016374
6958 016400
016400
016404
016412
016414
6959 016414
6960 016422
6961 016430
6962 016432
6963 016436
6964 016440
6969 016444
6966 016446

€22::::::33:

END ;OF IF

016345

6954 016352
6955 016336

SEQ 0183

00371}

016324

6949 016324
016324
6930 016324
016324
016330
6951 016332
016332

Page 191 2

ADD
MO
1
M

1$:
002222

BGY
JMP

ECCINIT
SET

CLR

POP

002102

MKCNT:

RETURN

WORD

€20::353:543

SPLTCSR

OF FOR MKCNT

#2 ,CSRFBANK
#1,5PLTCSR
R3
R3,CSRLOOP
14
MKLOOP

CONTFLAG

INC MKCNY
CMP MKCNT,CSRINT
BLE 817
El7::33:5343

; TRAP ON DOUBLE BIT ERRORS (NORMAL)
MOV

SPLTCSR

R3,R2.R1,R0,BANK

MOV
MOV
MOV
MOV
MOV

;COUNTER FOR MKLOOP

o-1,CONTFLAG

(SP)«,R3
(SP).,R2
(SP). R}
(SP). RO
(SP).,BANK

!
N

MACRO v05.01b Fri.dey 15-Feb-85 16:10
CVMJUAAD MSV11-J MEMORY DIAG.
TEST ECC CSR LOGIC DISPATCH
SUBR

SUBTST
SBET:EST

6973 016500

; *SUBTEST

6974
6975
6976
6977
6978
6979
6980
6981
6982
6983
6984
6985
6986
6987
6988
6989
6990
6991
6992
6993
6994
6995
6996
6997

<<CHECK FOR SBE FREE LOCATIONS>>
e

L R

CHECK FOR SBE FREE LOCATIONS
T

:WRITE ZEROS WITH ECC DISABLE

:READ ZEROS BACK
:IF NOT ZEROS THEN RETURN ERROR

‘WRITE ZEROS WITH ECC ENABLED BUT TRAPS DISABLED

:READ ZEROS BACK
:IF NOT ZEROS THEN RETURN ERROR

:TEST THE LOCATION FROM THE PAR’S (WITH NO PROGRAM FETCHES)
;IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR

:COMPLIMENT ZEROS TO ONES WITH ECC DISABLE

;READ ONES BACK

;:IF NOT ONES THEN RETURN ERROR

;WRITE 100,,100000,00000 (CHECKBITS COMPLIMENT OF BEFORE)
;
__WITH ECC ENABLED BUT TRAPS DISABLED
: TEST THE LOCATION FROM THE PAR’S (WITH NO PROGRAM FETCHES)
;IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR

:IF NONE OF THE ABOVE FORCES A RETURN ERROR THEN RETURN NO.ERROR

016302
016504
6999 016506
7000 016512
7001 016516
016516
7002 016324
7003 016526
7004 016530

7007

SEQ 0184

;IN ORDER TO DETERMINE IF A LOCATION IS SBE FREE I DO THIS

6998 016500
016500

7005
7006

Page 193

016330
016332
016534
016536
016540
016542

7008
7009
7010 016544
7011 016546

016546
016350

7012 016552
7013 016554
7014 016556

7015 016560
7016
7017 016562

.ENABL

PUSH

010046
010146
010446
013701
013704

002412
002414

053737

002552

104424
104471

005011
005014
005711
001107
005714
001105

104503

177776

LSB

RO,R1,R4

MOV
TESTADD,R1
MoV
TESTADD+2,R4
TESTAREA

TESTMODE ,PSUW
8IS
CRF
.DSABL
CACHOFF
ECCIDIS
CLEAR
(R1),(R4)
TST
BNE
187
BNE

TST
BNE
1S7
BNE

104510

TSTREAD

MOV RO,
-( SP)
SP)
MOV R4, -( SP)

;ENTER TEST MODE
;GO TO SYSTEM TEST MODE
; TURN CACHE OFF

;:DISABLE ECC ON 1 SELECTED CSR

(R1)
SBENT
(R4)
SBENT

CLRICSR
CLEAR
(R1),(R4)

005011
005014
005711
001100
005714
001076

;PUSH RO,R1,R4 ONTQ STACK

;CLEAR 1 SELECTED CSR

(R1)
SBENT
(R4)
SBENT

;TEST LOC (R1) & TST FOR SBE (WITHOUT FEY CHES®

CVMJRAQ MSV11-J MEMORY DIAG.
CHECK FOR SBE FREE LOCATIONS
7018 016564

032737
001415

100020

002150

016574

012737

177777

002066

016602
016604
016610
016614
016620

016620
016624

104512
013700
072027
042700

023700
001454

7025 016626
016626
7026 016626
7027 016630
7028 016632
7029 016634
7030 016640
7031 016642
7032 016646
7033
7034 016650
7035 016652
7036 016654
7037 016660

104503
005011
012714
005711

7039 016664

022714

7038 016662

7040 016670

7041

104471
005111
005114
023711
001046
023714
001043

001035
001032

002460
177774
177600

002102

CLR1CSR

CLR

100000

016704

012737

177777

002066

7050 016736

7051

7052
7053
7054
7055

023700
001410

016736

016736
016740
016742
016744

016744
016740
016750
7056 016752
016752
016754
7057

104417
104473
104423

012604
012601
012600
000241
000207

002102

BIT 0BIT1S'BIT4,CSR
BEQ L144
;DISABLE ERRGEN'S ERROR FRINTOUT
MOV
0-1,SKPERR

CMP BANK,RO

BEQ SBENT

L144:;;;:;:;::
;DISABLE ECC ON 1 SELECTED CSR

(R4)

ONES, (R1)
SBENT
ONES, (R4)
SBENT

(R1)

MOV
ST
BNE

#BI715,(R4)
(R1)
SBENT

BNE

SBENT

cMpP

100000

002150

016730
016734

OF IF #BIT1S

CMP
BNE
CMP
BNE

002614

002460
177774
177600

#tC177,R0

CcoM

002614

100020

104512
013700
072027
042700

ERRGEN
MOV
ERRADD,RO
ASH
#-4 RO

ECC1DIS
COM
(R1)

032737
001415

016712
016714
016720
016724
016730

193

SET SKPERR

END;

016674
016702

7045
7046
7047
7048
7049

Page

IF BANK EQ RO THEN GOTO SBENT

104510

7044 016704

D15

16:10

IF #BIT15!'BIT4 SET.IN CSR

B8IC

7042 016672

7043 016674

15-Feb-85

SEQ 0185

016564
016572

7019 016574

7020
7021
7022
7023
7024

MACRO v05.01b Friday

;CLEAR 1 SELECTED CSR

#BIT1S,.(R4)

TSTREAD
;TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES)
IF #BIT15'81T4 SET.IN CSR
BIT #BIT1S'B1T4,CSR
BEQ L145S

SET SKPERR

;DISABLE ERRGEN'S ERROR PRINTOUT
MOV

ERRGEN
MOV
ERRADD,RO
ASH
#-4,R0
8IC
atC177,R0
IF BANK EQ RO THEN GOTO SBENT

END; OF IF #BIT1S
KERNEL

ECCLINIT
CACHON
pPoP
R4 ,R1,RO

$RETURN NOERROR

#-1,SKPERR

CMP BANK,RO
BEQ SBENT
L145:;;;::::

;ENTER KERNEL MODE

;INITIALIZE 1 SELECTED CSR
: TURN CACHE ON

;POP RO,R1 & R4 FROM STACK

MOV (SP).,R4
MOV (SP)+,R1
MOV (SP).,RO

CLC

RTS PC

CVMJUAAQ MSV1l-J MEMORY DIAG.
CHECK FOR SBE FREE LOCATIONS
7058 016756
7059 016760

016760
016762
7060 016764
7061 016766
7062 016770
7063 016772
016772
016774
016776
7064 017000
017000
017002

7065

104503
005011
005014
104417

104473
104423

012604
012601
012600

000261
000207

MACRO V05.01b Fridey

E15

15 Feb 85 16:10

Page 193-2

SEQ 0186

SBENT:

CLRICSR
CLEAR
(R1),(R4)

;CLEAR 1 SELECTED CSR

KERNEL

;ENTER KERNEL MODE
;INITIALIZE 1 SELECTED CSR
;:TURN CACHE ON
;POP RO,R1 & R4 FROM STACK

ECCLINIT
CACHON

POP

R4,R1,RO

$RETURN ERROR
.DSABL

LSB

CLR
CLR

MOV
MOV
MOV

SEC

RTS

CVMJUARD MSV11-J MEMORY DIAG.
CHECK FOR SBE FREE LOCATIONS

MACRO V05.01b Friday

E
: SUBTST
CSRCAS

7068 017004

s ESEPRREER RS R R

017074
017074
017076

017100
7103 017102

020222

195

SEQ 0187

KRR DR E

AR R

E R EE RN AR RS S SN RS A SR G A A SIS

017074

E SRR

R R R

RA R KRR

SRR E LSRR b kSRR

ARSI E SR E R E S

;PAT
MT0006

S b

SRS O S

MOV RO, -(SP)
ASL asSP

;WARNING IF YOU CHANGE THIS TABLE ALSO
;CHANGE "$DDWO" - “$DOWS” (THE PATTERN BTIT MAP)
MKCSRT:

SRS GO OIS

CSR PATTERN CASE STATEMENT

CASE RO

7072

TIME

;<1 SEC

JSR PC,L146

DESCRIPTION
INITIAL DATA TEST

062616
013646
004736
000207

COOOCOOOOOODO
I o2t s s pt s = s N

We
e
By
We

Be
We
W2

A
A

We
Ws
W

A
A

We
WP
WS
We
e

MT0010
MT70999
MT0999
MT0999
MT0999
M70999
M70999
MT0999
MT0999
MT0999
MT0999
MT0999
END ;OF CASE RO

MT0047

MT0041
MT0042
MT0043
MT0046

MT0020
MT0037

MT0044
MT0014
MT0045
MT0036

024024
020354
024104
023560
020456
023622
023660
023740
023774
024134
024164
020320
024220
024220
024220
024220
024220
024220
024220
024220
024220
024220
024220

MSV11-J ECC TESTS

7073
7074 017014
7075
7076
7077
7078
7079 017016
7080 017020
7081 017022
7082 017024
7083 017026
7084 017030
7085 017032
7086 017034
7087 017036
7088 017040
7089 017042
7090 017044
7091 017046
7092 017050
7093 017052
7094 017054
7095 017056
7096 017060
7097 017062
7098 017064
7099 017066
7100 017070
7101 017072
7102 017074

AR AR ER R R

7070
7074

010046
006316
004737

Page

<<CSR PATTERN CASE STATEMENT>>

(EPERERERE R R AR

017004
017006
07010

16:10

RSN ER R R R R

; *SUBTEST

7069 017004

F15

15-Feb 85

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

SHIFTING 1/0'S THROUGH CHECK BITS
BASIC DOUBLE ERROR TEST
SYNDROMES TO CSR _ON DOUBLE BIT ERROR TEST
CORRECTION CODE TEST
SYNDROMES TO CSR ON SINGLE BIT ERROR TEST
ECC DISABLE TEST
ADDRESS TO CSR ON DOUBLE BIT ERROR
EXTENDED ADDRESS TG CSR ON ERROR TEST
WRITE BYTE CLEARS SBE TEST

CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST
NO CSR UPDATE ON SBE WITH EXSISTING DBE

BYTE ADDRESSING TEST
NULL TEST
NULL TEST

NULL JEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST

RDD (SP)+,asP
MOV a(SP).,-(SP}

RETURN

JSR PC,a(SP).

CVMJUAARQ MSV11-J MEMORY DIAG.
CSR PATTERN CASE STATEMENT

G15

MACRO V0S5.01b Friday 15-Feb-85 16:10

7106 017104

MKTEST:

SUBTST

«<«<«SUBR

Page 197

SEQ 0188

ECC TEST DISPATCH»>>

T
S
T
e
I IIIImMmMImmInmMm”T

SUBR

;*SUBTEST

€CC TEST DISPATCH

I
I T T
T N
I N
I
I
e I
I
I
T

7107 017104

017104
017112
017114
017120
017122

032777
001003
005737
001402

017124
017126

000401

7108 017122
7109 017124

000001

163524

002350

104470

7110 017126
7111 017130

104502

7112
7113
7114
7115
7116

012737
012737
013700
006300

000002
000002
002112

002076
002326

026027
001405
026027
001401

017244

023346

017244

024220

010637
162737

002146
000002

002146

032777
001003
005737
001402

000001

163416

017130
017130
017136
017144
017150
017152
017152
017160
017162
017170
7117 017172
7118 017174

104511

7121 017206
7122 017212
017212
017220
017222
017226
017230
7123 017230
7124 017232
017232
017234
7125 017234
7126 017236

017236

7127 017236

;igg 017242

004770

017244

104472

000207

002076

;CLEAR ALL CSR'S

MOV
suB

SP,CTLKVEC
#2,CTLKVEC

CMP
BEQ
CMP
BEQ

023346

7136 017250
7137 017252
7138 017254

020256
017544
017640

020434

— MKPAT:

MKPAT(RO),#MT0034
L1S2
MKPAT(RO),#MT0999
L1S52

; INVALIDATE BACKGROUND PATTERN ON "BANK"
L152:::::::

;SAVE VECTOR IN CASE OF tK

CALL
MKPAT(RO)
;INDEX OFF TABLE
IF #SWO SET.IN @SWR OR ACTFLAG IS TRUE

BIT
BNE
TST
BEQ
L153:;::::::
; TRAP ON SINGLE BIT ERRORS

#SW0,aSWR
L153
ACTFLAG
L154

BR L1SS

L154:;;::::

ECCINIT
END ;0F IF @Su0

; TRAP ON DOQUBLE BIT ERRORS (NORMAL)

CLR

;INDICATE PARITY ACTION

NOPAR

L1SS:::::::

;WARNING IS YOU CHANGE THIS TABLE ALSO
;CHANGE "$DDWO" - "$DDWS"” (THE PATTERN BIT MAP)

7132
7133 017244
7134 017244

OSWO,aSWR
L147
ACTFLAG
L150

BR L151
L150:;:;:::::

L1SY:5::::
MOV
#2,NOPAR
; INDICATE PARITY ACTION
MOV
#2,PCBUMP
;TRAPS ADD 2 TO PC
MOV
PATTERN,RO
;GET PATTERN NUMBER
ASL
RO
;MAKE IT A WORD ADDRESS
IF MKPAT(RO) NE #M70034 AND MKPAT(RO) NE #MT0999

RETURN

7130
7131

7135 017246

CLRCSR
END ;OF IF

ENASBE
ELSE

000401

005037

;DISABLE ERROR CORRECTION

002350

104506

BIT
BNE
TST
BEQ
L147:;;::::

ECCDIS
ELSE

INVALIDATE
END ;0F IF MKXPAT(RO)

017174

7119 017174
7120 017200

IF #SWO SET.IN aSWR OR ACTFLAG IS TRUE

; PAT
TIME
DISCRIPTION
;NOTE MTO0034 MUST BE FIRST & LAST
MT0034
;<1 SEC
;SOFT ERROR - BACKGROUND PATTERN TEST

MT0017

MT0007
MT0001
MT0002

;<1 SEC

;<1 SEC
;<1 SEC
;<1 SEC

;HOLDING 1'S & 0'S TEST

;ADDRESS BIT TEST
; ADDRESS TEST
; COMPLEMENT ADDRESS TEST

CVMJARO MSV11-J MEMORY DIAG.
SUBR
ECC TEST DISPATCH
7139
7140
7141
7142
7143
7144
7145

H15

MACRO V0S.01b Friday 15 reb-85 16:10

017256
017260
017262
017264
017266
017270
017272

020070
020140
020536
021026
021332
021124
022454

MT0004
MT0005
MT0021
MT0022
MT0026
MT0024
MT0031

: 1
: 1
: 1
:10
;<1
:20
: 3

7147 017276

023160

MT0033

;35 SEC

7146 017274

7148 017300

7149
7150
7151
7152
7153
7154
7155
7156
7157
7158

017302
017304
017306
017310
017312
017314
017316
017320
017322

022644

023346

024220
024220
024220
024220
024220
024220
024220
024220
024220

MT0032
MT0038

SEC
SEC
SEC
SEC
SEC
SEC
SEC

;<1 SEC

Page 197-1
;ROTATING ZEROS TEST
:ROTATING ONES TEST
:MARCHING 0'S & 1'S TEST
:REFRESH & SHIFTING DIAGONAL
:RANDOM DATA TEST
:FAST GALLOPING PATTERN TEST
:S0B-A-LONG TEST

SEQ 0189

TEST

:WRITE RECOVERY TEST

:BRANCH GOBBLE TEST

:SOFT ERROR - BACKGROUND PATTERN TEST

;:NOTE MT0034 MUST BE FIRST & LAST
MT0999
; O SEC
:NULL TEST
MT0999
: O SEC
:NULL TEST
MT0999
; O SEC
:NULL TEST
MT0999
: O SEC
:NULL TEST
MT0999
: O SEC
:NULL TEST
MT0999
: O SEC
:NULL TEST
MT0999
; O SEC
INULL TEST
MT0999
; O SEC
:NULL TEST
MT0999
; O SEC
:NULL TEST

CVMJAAQ MSV1l- J_MEMORY DIAG.

SUBR

ECC TEST DISPATCH

MACRO V05.01b Fr.dey

15-Feb 85

MJTEST:

SUBTST

<<SUBR

1800SR RSB SEE RN

; $SUBTEST
AL

017324
017332

017340
017346
017354
017360
017362

017362
017370
017372
017400
7169 017402
7170 017404
017404
7171 017404

7172 017410
7173 017416
7174 017422
7175 017426
7176
7177
7178
7179
7180
7181 017430
7182 017430
7183 017432
7184 017434
7185 017436
7186 017440
7187 017442
7188 017444
7189 017446
7190 017450
7191 017452

7192
7193
7194
7195
7196
7197
7198
7199
7200
7201
7202
7203
1204
7205
7206

012737
012737
012737
012737
013700
006300

000002
000002
060000
060002
002112

002076
002326
002412
002414

026027
001405
026027
001401
104511

017430

023346

017430

024220

010637
162737
004770
005037
000207

199

SUBR

MoV
MOV
MOV
MOV
MOV
ASL

PARITY TEST DISPATCH>>

ESE RS XA SR AR SRR KA

AR SE AR

RIS

R R SRR SRS EDE SRS

suB
CALL
CLR

002146

RETURN

; INDICATE PARITY ACTION
; TRAPS ADD 2 TO PC
;:GET _PATTERN NUMBER
;:MAKE IT A WORD ADDRESS

CMP MUPAT(RO), 8MT0034

BEQ L156
CMP MJUPAT(RO),oMT0999
BEQ L156
; INVALIDATE BACKGROUND PATTERN ON "BANK"
156
L

SP,CTLKVEC

tiiiiai

; SAVE VECTOR IN CASE OF

#2,CTLKVEC
aMJPAT(RO)
NOPAR

; INDEX OFF TABLE
; INDICATE PARITY ACTION

;WARNING IF YOU CHANGE THIS TABLE ALSO
;CHANGE '$DDWO" - "$DDWS" (THE PATTERN BIT MAP)

023346
020222
020434

017454
017456
017460
017462
017464
017466
017470
017472
017474

020256
017544
017640
0.7754
020070
020140
020536
023446
021026
021060
021332
021124
022454
022644
023160
023346

017476
017500
017502
017504
017506

024220
02422¢C
024220
024220
024220

MUPAT;

;PAT
TIME
CISCRIPTION
:NOTE MT0034 MUST BE FIRST & LAST
MT0034
;<1 SEC
;SOFT ERROR - BACKGROUND PATTERN TEST
MT0006
;<1 SEC
; INITIAL DATA TEST
MTO017
;<1 SEC
:HOLDING 1'S € 0'S TEST
MT0007
;<1 SEC
; ADDRESS BIT TEST
MT0001
;<1 SEC
; ADDRESS TEST
MT0002
;<1 SEC
; COMPLEMENT ADDRESS TEST
MT0003
; 1 SEC
;3 XOR 9 WORST CASE NOISE TEST
MT0004
; 1 SEC
;ROTATING ZEROS TEST
MT0005
; 1 SEC
;ROTATING ONES TEST
MT0021
; 1 SEC
;MARCHING 0'S & 1'S TEST
MT0035
;<1 SEC
; WORSE CASE NOISE PARITY TEST
MT0022
;10 SEC
;REFRESH TEST

MT0023

MT0026
MT0024
MT0031
MT0032
MT0033
MT0034

;10 SEC

;<1
;20
; 3
;<1
;35
;<1

SEC
SEC
SEC
SEC
SEC
SEC

:SHIFTING DIAGONAL

MT0999
MT0999
MT0999
MT0999

i O SEC

;
;
;
;

O
O
O
O

SEC
SEC
SEC
SEC

TEST

;RANDOM DATA TEST
;FAST GALLOPING PATTERN TEST
:SO0B-R-LONG TEST
;WRITE RECOVERY TEST
;BRANCH GOBBLE TEST
; SOFT ERROR - BACKGROUND PATTERN TEST

:NOTE MT0034 MUST BE FIRST & LAST

MT0999

G QOGS

#2 ,NOPAR
#2,PCBUMP
#FIRST, TESTADD
#FIRST+2,TESTADD+2
PATTERN,RO
RO

IF MJUPAT(RO) NE #MT0034 AND MUPAT(RO) NE #MT0999

MOV

PSR

PARITY TEST DISPATCH

INVALIDATE
END ;OF IF MJUPAT(RO)
002146
000002
017430
002076

Page

SEQ 0190

7161 017324

7162
7163
7164
7165
7166
7167
7168

115

16:10

:NULL TESY

;NULL
:NULL
sNULL
;NULL

TEST
TEST
TEST
TeST

CVMUAAQ MSV11-J MEMORY DIAG.

PATTERNS

J15

MACRO V05.01b Friday

15-Feb-85 16:10

SEQ 0191

7208
7209
7210
7211 017510

MT0000:

.SBTTL

PATTERNS

.SBTTL

MEMORY TEST SETUP ROUTINES

SUBTST

; *SUBTEST

7215
7216
7217
7218
7219

017524
017530
017536
017542
017544

005037
012700
012701
004737
012737
004737
000207

002300
060000
040000
032470
024640
024446

MT0000
L

CLR

REALPAT

CALL

REGCOPY

CALL

SUPDO3

MOV
MOV

002262

; »SUBTEST

7220 017544
7221 017552
1222 017556
7223 017562
7224 017566
7225 017570
7226 017576
1227 017600
7228 017602
7229 017610
7230 017612
7231 017616
7232 017620
7233 017624
1234 017632
7235 017636

012737
012700
012701
005737
001005
023737
001007
000404
023737
001002
012701
005002
004737
012737
004737
000207

000001
060000
040000
002456

002300

172252

172254

177652

177654

35:
4%:

030000
032470

024664
024446

MOV
MOV
Mov
TST

2%:

002262

SETUP DATA PATTERN TEST
e

<<MT0001

MT0001

SETUP ADDRESS TEST

e
L

T I
T

P e

I L

P T T

L
Y

T e

#1,REALPAT
#FIRST,RO
#SIZE,R1
NOSUPER

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

#MTPOO1, SUPDOADD

:SET UP CALLING ADDRESS

24
SIPARS,SIPARG
44
3¢
UIPARS,VIPARG
44
#30000,R1
R2
REGCOPY

CALL

SUPDO3

RETURN

SETUP ADDRESS TEST»>>
e

BNE
CMP
BNE
BR
cMP
BNE
MOV
CLR
CALL

MOV

;ELSE DO PATTERN IN MAIN MCMORY

Ty
L

;SETUP PATTERN NUMBER FOR TYPEQUT £ DISPLAY

#MTP000, SUPDOADD

RETURN
SUBTST

SETUP DATA PATTERN TEST>>

#F IRST,RO
#SIZE,R1

MOV
MT0001:

<<MT0000

e L
Tl

7212 017510
7213 017514
7214 017520

Page 200

CVMJAAO MSV11-J MEMORY DIAG.

MT0002

SETUP COMPLEMENT

IK15

MACRQO V0S.01b Fridey 15-Feb 85 16:10

ADDRESS TEST

7236 017640

MT0002:

SUBTST

<<MT0002

RA2 2123322022222

; $SUBTEST

s RRAEEEENE RN R RN

7237
7238
7239
7240
7241
7242
7243
7244
7245
7246
7247

7248
7249
7250
7251
7252
7253
7254
7255
7256

017640
017646
017652
017656
017662
017666
017672
017674
017702
017704
017706

017714
017716
017722
017726
017732
~17736
(17740
017746
017752

012737
012700
012701
012704
012705
005737
001005
023737
001013
000404
023737

001006
012701
012700
012705
012702
010103
012737
004737
000207

000002
160000
040000
060000
100001
002456

002300

172252

172254

177652

177654

030000

140000
120001
000001
024716
024446

2%:

4%:
002262

MOV
MOV
MOV
MOV
MOV
15T
BNE
CHP
BNE
BR
CHP

BNE
MOV
MOV
MOV
MOV
MOV
MOV
CALL
RETURN

Page 200-1

AR R

SETUP COMPLEMENT

03333333322 223

MT0002

SEQ 0192

0322ttt

iii

ADDRESS TEST>>

ittt

SETUP COMPLEMENT ADDRESS TEST

R R R R R

R R R R AR R

82, REALPAT
#LAST+2,RO
#SIZE,Ri
oF IRST,R4
#100001,R5
NOSUPER
24
SIPARS, SIPAR6
as
34
UIPARS, UIPARG

a3
#30000,
R1
#140000,
RO
#120001 ,RS
#1,R2
R1,R3
#MTP002, SUPDOADD
SUPDO3

R R AR

RS SRS

ittt

E SRS

231

XYY PITTR L}

SRS SRS E SO S0 OSRGOS

;SETUP PATTERN NUMBER FOR TYPEOUT

;SET UP CALLING ADDRESS

& DISPLAY

L15

MACRO V05.01b Fridey 15-Feb-85 16:10
CVMJAARO MSV11-J MEMORY DIAG.
MT0002
SETUP COMPLEMENT ADDRESS TEST
7259 017754

MT0003:

SUBTST

Page 202

SEQ 0193

<<MT0003

; #SUBTEST

MT0003

SETUP 3 XOR 9 WORST CASE NOISE TEST>>

SETUP 3 XOR 9 W RST CASE NOISE TEST

T
e
T T
T

7271
1272
7273
7274
7275
7276
7277
7278
7279
7280

020036

020042
020044
020052
020056

020064

020066

IF EQFLAG IS TRUE THEN $RETUR'

005737
001401
000207

002132

012737
005037
004737
012701
012703
072327
012702
012705
104415
012737
004737
104416
012737
004737
022737

000003
002326
032500
060000
020000
177770
000004
000100

002300

024750
024426

002262

MOV
SAVREG
MOV

025010
024462
000003

002262

RESREG
MOV

RTS PC

CLR
CALL

MOV

MT0004:

020070

;RN

1285

7286
7287
7288
7289
7290

020070
020076
020104
020110
020114
020120
020124
020132
020136
020140

012737
012737
013702
004737
012700
012701
012737
004737
000207

000004
000004
002614
032630

060000
040000
025106
024462

CALL

SUPDO4

BNE
RETURN

SUBTST

<<MTO0004

MT0004

CALL

BACKGND

CALL

SUPDO4

7293
7294
7295
7296
1297
7298
1299
7300

020154
020156
020162
020166
020172
020200
020206
020212

7301 020220

032630
060000
040000
025162
025176
024462
025122

002300
002326

d 32

025160

22ttt

123222

222

NS E S a S b d S

3232322332233 33

S S RS b e S

23333331232

;WRITE BACKGROUND OF ONES

;SET UP LINKS
SETUP ROTATING ONES TEST>>

2222322222

MTO005

A S

:SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
: TRAPS ADD 4 T0 PC

<<MT000S

22222

2222222223238

SETUP ROTATING ONES TEST
222

ettt

]

2123 11]

MOV
EOX
L

#5,REALPAT
:g,PCBUHP

;SETUP PATTERN NUMBER FOR TYPEQUI & DISPLAY
; TRAPS ADD 4 T0 PC

MOV
MOV
MOV
MOV

BACKGND

#FIRST,RO
#SIZE ,R1
#MTPO0S, SUPDOADD
MTPOOS+14, ,MTPBO4+16

sWRITE BACKGROUND OF ZEROS

CALL

002262
025160

282

#F IRST,RO
#SI1ZE,R1
#MTPAO4, SUPDOADD

RETURN
SUBTST

E RS SRR E SRR SR NS

SETUP RO TATING ZEROS TEST

#4 REALPAT
#4 ,PCBUMP
ONES,R2

000005
000004

SETUP ROTATING ZEROS TEST>>
KRR B RS SRRk

2232233222

MT0005:

;DunE WITH 4 PATTERNS
:000,177777);(177777,0);(401,177777);(177777,401)
12

:NO - LOOP

R R SRR R RS AR R R

REiE2 21222

012737
012737
005002
004737
012700
012701
012737
012737
004737
012737
000207

#MTPBO3, SUPDOADD

MOV
MOV
MOV

002262

R3 7/ 256.

;00 IT IN MAIN MEMORY

#3,FLIPLOC

MOV
MOV
MOV

;SMALL LOOP SIZE
;MEDIUM LOOP SIZE

i
I2 I BN

002300
002326

; ®SUBTEST

7291 020140
7292 020146

:R3 <--

#MTPAQ3, SUPDOADD

SUPDO3

R R

;SETUP WARNING CONSTANTS £ R2
iR1 <-- STARTING ADDRESS

#-8.,R3
#4 ,R2
#64
. ,RS

CALL

CMP

001344
000207

; TRAPS DO NOT ADD 10 PC

#20000,R3

MOV
ASH
MOV

002616

L157:5:::33
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

#3,REALPAT
pCcBUMP
FLIPWARN
#FIRST,R1

MOV

; #SUBTEST

7281
7282
7283
7284

T1ST EQFLAG

BEQ L157

“w

017754
017760
017762
017764
7261 017764
1262 017772
7263 017776
7264 020002
7265 020006
7266 020012
7267 020016
7268 020022
71269 020026
7270 020030

N -

7260 017754

CALL
gg¥UR

SUPD04
AMTPAO4+14 ,MTPBO4+16

:SET UP LINKS

;RESET TEST'S ORIGINAL VALUE

CVMJUAAQ MSV11-J MEMORY DIAG.

MT0005

M15

SETUP ROTATING ONES TEST

MACRO V05.01b Fridey 15-Feb 85 16:10

7304 020222

MT0006:
;0885

SUBTST

ER SRS

;sSUBTEST

7309 020222

7306
7307
7308
7309
7310

020230
020236
020242
020250
020254

7311 020256

012737

012737
012701
012737
004737
000207

000006

000004
002412
025216
024446

002300

;E0S NS E SN

MOV

002326
002262

MT0007:

<«<MT0006

MT0006

7312
7313
7314
7315
7316
7317
7318
7319

020256
020264
020266
020272
020276
020302
020304
0203:i2

7320 020316

7321 020320

012737
005002
004737
012701
012702
050201
012737
004737

000207

000007

002300

<<MT0007

032630
060000
000001
025416
024446

002262

«<<MT0010

; *SUBTEST

MT0010

BRI

7322 020320

7323
7324
7325
7326
7327

020326
020334
020340
020346
020352

012737

012737
013704
012737
004737
000207

000010

000004
002412
025516
024446

002300

002326
002262

1122213112222
2

MOV

MOV
MOV
MOV
CALL
RETURN

; TRAPS ADD 4 T0 PC
;D0 1,

R A S AR RS SRR RN

2222233332333

#7,REALPAT
R2
BACKGND
#FIRST,RL
#1,R2
R2,R1
#MTPOO7, SUPDOADD
SUPDO3

MT0010: SUBTST
Al i1 i1

S22

R AR OGS E GO OSSN G S

IN SUPERVISOR MODE

R AR

SETUP ADDRESS BIT TEST

MT0007

RETURN

R R E R RV SR SRR R R E SN

SETUP ADDRESS BIT TEST»>>

AR AR AR AR

133232 2111331212333

MOV
CLR
CALL
MOV
MOV
BIS
MOV
CALL

RRENEERS OO OROOSS

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

#4 ,PCBUMP
#TESTADD,R1
#MTPO06
, SUPDOADD
SUPDO3

SUBTST

030004

SETUP INITIAL DATA TEST

#6,REALPATY

MOV
MOV
MOV
CALL
RETURN

SETUP INITIAL DATA TEST>>

SN RS R SR AR SRR R RS RN R R R R RN R SRR ER R R

; *SUBTEST
i

SEQ 0194

E SR RN RRE SN REEEEE NSRS RREEREEREERBREE S

s8R NRRSERE R RN RS SRR
I

Page 204

RN RS S SSRGS

22222222222

222222131333

;00 IT IN SUPERVISOR MODE

3233333333233

SETUP BYTE ADDRESSING TEST
2ttt

#4 ,PCBUMP
TESTADD,R4
#MTPO10, SUPDOADD
SUPDO3

77}

;OF ZEROS

SETUP BYTE ADDRESSING TEST>>

S22t

22823

;SETUP PATTERN NUMBER FOR TYPFOUT & DISPLAY

22t 2322322222ttt 22ttt

#10,REALPAT

e SR SRRt ®

s it

sid

2332322233323

38232323

2233823322228

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

; TRAPS ADD 4 T0 PC

;00 IT IN SUPERVISOR MODE

N15

MACRO V05.01b Fridey 15-Feb-85 16:10

CVMJAAO MSV11-J MEMORY DIAG.
SETUP BYTE ADDRESSING TEST

MT0010

7330 020354

Page 206

SEQ 0195
MT0014;:

SUBTST

<«<MT0014

SETUP BASIC DOUBLE BIT

; *SUBTEST

MT0014

020354

020360
020362
020366
020370
7332 020370
020370
020374
020376
020400
7333 020400
020400
7334 020400
7335 020406
7336 020412
020412
7337 020416
7338 020422
73%9 020426
7340 020432

005737
001003
005737
001404
005737
001401
000207

ERROR TEST»>>

I I

AR S SRR AREREEEERESSILO SO0

EOS00C0000E0 00

1ST ACTFLAG

$PASS NE 40 THEN $RETURN

BEQ L161
L160:;:;:;::;
TST

$PASS

BEQ L1162

END;

100000
032674
025624
040026

TST APTFLAG

056654

012701
004737
004737
004737
000207

BNE L160

002352

000014
037740

IF ACTFLAG TS TRUE OR APTFLAG IS TRUE

002350

012737
004737

I I

SETUP BASIC DOUBLE BIT ERROR TEST

;OERRSERRRARSERRES KRR ER AR ERE B R R AR AR

7331

002300

MOV

OF IF ACTFLAG
#14 REALPAT

CALL
MAPKERNAL
LET R1 := #100000

CALL GETCSR
CALL MTPO14
gg%bRNUN"AP

RTS PC
L162:;::::::

L1fless::::
:SETUP PATTERN NUMGLER FOR TYPEOUT & DISPLAY

;MAP KERNAL SPACE
;SETUP TEST ADDRESS

MOV #100000,R1

;GET CSR INFO FROM CONFIGURATION TABLE
;00 BASIC DOUBLE BIT ERROR TEST
;UNMAP KERNAL SPACE

.YMJUAAQ MSV11-J MEMORY DIAG.
470014
SETUP BASIC DOUBLE BI7
7543
/344

MACRO V05.01b Fridey

ERROR TEST

H10017:

020434

+dey

Ble

15-Feb 85 16:10

SUBTST

o9e

MT0017

208

SEQ 019

SETUP HOLDING 1'S & 0'S»»

<<MT0017

;0006008089900 88¢0¢8 S¢S

; sSUBTEST

Pege

AR RRPRS

PSS

NSRSV REEEC 2000 CEESRREE0EEORRROQEROCORS

SETUP HOLDING 1'S & 0'S

;0088808638808 48804660088888888%¢R8RSSSSEERRRERECPREISRCEBEEEERAGEOCOEROSCOCCECOOOD

7345 020434

7346 020442
7347 020430
7348 020434

012737
012737
004737
000207

000017
026050
024446

002300
002262

nov
MoV
CALL

RETURN

SUPDO3

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

;00 IT IN SUPERVISOR MODE

CV/MJAAD MSVIL-J MEMORY DIAG.

MT0017

SETUP HOLDING 1°'S € 0'S

Cl6

MACRO vO05.01b Friday 15-Feb-85 16:10

7381 020456

N10020: SUBTST

<<MT0020

MT0020

SEQ 0197

SETUP SYNDROMES TO CSR ON SINGLE 81T ERROR>>

;0088005685488 8058585843 88

;*SUBTEST

Fage 210

ASRCLRENEENNERE

R A CE RN

0SB

EROREEOGRROOOOSTOTS

SETUP SYNDROMES TO CSR ON SINGLE BIT ERROR

;0080666886888 08880088¢S080EEEEtSEEREEIStEeetREatttttteetsttittttetetestonse

73%2 0204%6
020456
020462
020464
020470
020472

7353 020472

020472
020476
020500
020502

005737
001003
005737
001404
005737
001401
000207

IF ACTFLAG IS TRUE OR APTFLAG IS TRwe

002350
002352

056654

7354 020502

020502

735% 020502

012737

7356 020510
7357 020514

004737

7358 020520

004737

020%14

7359 020524
7360 020530
7361 020534

012701

004737
004737
000207

TST
BNE
TST
BEQ

000020

037740

100000

032674

026126
040026

002300

$PASS NE 20 THEN $RETURN

END;

OF IF ACTFLAG

MOV

#20,REALPAT

L163. ;5533

ACTFLAG
L163
APTFLAG
L164

TST $PASS
BEQ L16S
RTS PC
L16S:::5:55:3

L164::;::::

;SETUP PATTERN NUMBER FO

TYPEOUT € DISPLAY

CALL
MAPKERNAL
LET R1 := £100000

;MAP KERNAL SPACE
;SETUP TEST ADDRESS

CALL GETCSR

;GET CSR INFO FROM CONFIGURATION TABLE

CALL MTP020
CALL
UNMAP
RETURN

MOV @100000,R1

;D0 SYNDROMES TO CSR ON SINGLE ERRQR TEST
; UNMAP KERNAL SPACE

CVHMUAAQ MSV11-J MEMORY DIAG.

MT0020

016

MACRO VO5.01b Fridey 15-Feb-85 16:10

SETUP SYNDROMES TO CSR ON SINGLE BIT ERROR

7363 020536

SEQ 0198

MT0021: SUBTST

<<MT0021

;8898008065588

; sSUBTEST

;008

7364 020536

020536

012737

7366 020552
7367 020556

7369 020564

013702
004737
010203
000303

7371 020572
7372 020574

010105
012704

7365 020544

7368 020562

7370 020566

7373 020600
7374 027606

7375
7376
7377
7378
7379
7380

020610
020616
020620
020626
020630
020634

012737

012701

022737
001450

022737
001407
022737
001003
012701
010105

177777

000021

002632
032630

004010

000007

002102

140000

012701
010105
012737
004737
012737
004737

140000

7389
7390
7391
7392
7393
7394

7395
7396
7397
7398
7399

7400
7401
7402
7403
7404
7405
7406
7407
7408
7409

020700
020702
020710
020714
020722
020726

020730
020736
020740
020744
020746

020754
020760
020766
020772
020774

021002
021006
021014
021020
021024

010401
012737
004737
012737
004737
000434
022737
001003
012701
010105
012737

004737
012737
004737
010401
012737
004737
012737
004737
005037
000207

MOV

002102

026442
024446
026472
024462

002262

026526
024462
026562
024462

002262

000177

3$:

5¢:

002262

002102

1%:

002262

43:

140000
026442

024446
026472
024462

002262

026526

002262

024462
026562
024462
002440

MT0021

SETUP MARCHING 0'S & 1'S TEST>>
ES LSS RS LSRN CLEELREEEERR VR BRREE LR REEUESP AR A G RENVEEDOOSRE

SETUP MARCHING 0'S & 1'S TEST

S SR A RS S S SRR

S EE R

BAKPAT,R2
BACKGND
R2,R3
R3

MOV
MOV

R1,.RS
#FIRST,R4

LRSS

RNRR AR LR E LSRR RN CECERNER LU

#5,PROTYP
1s
#3,PROTYP
34
#7,BANK
34
#140000,R1
R1,R5

BNE

CcMP

MOV
MOV
MOV
CALL
MOV
CALL

MOV
MOV
CALL
MOV
CALL
BR

cMP
BNE
MOV
MOV
MOV

CALL
MOV
CALL

2%:

CALL
MoV
CALL
CLR

RETURN

MOV

#177 BANK

#140000,R1
R1,R5

#MTPA21, SUPDOADD
SUPDO3
#MTPB21, SUPDOADD
SUPDO4
R4,R1

#MTPC21, SUPDOADD
SUPDO4
#MTPD21, SUPDOADD
SUPDO4
23

#177,BANK
43
#140000,R1
R1,RS
#MTPA21, SUPDOADD

SUPDO3
#MTPB21, SUPDOADD
SUPD04
R4,R1
#MTPC21, SUPDOADD

SUPDO4
#MTPD21, SUPDOADD
SUPDO4
NOSCOPE

SR CRRQRCRSS

#-1,NOSCOPE

;SETUP PATTERN NUMBER FOR TYPEOUt & DISPLAY

#LAST+2,R1

CMP
BEQ
CMP
BEQ
CMP
BNE
MOV
MOV

MOV
MOV

002262

#21 ,REALPAT

MOV
CALL
MOV
SWAB

MOV

000003

7383
7384
7385
7386
7387
7388

020646
020652
020654
020662
020666
020674

002300

004010

000177

001003

002440

060000
000005

022737

7382 020644

S S5

E RSt

SET NOSCOPE

160000

7381 020636

Page 211

;IS THIS AN 11/83
;BRANCH IF IT IS

;IS THIS AN 11/24?
:BRANCH IF SO

MSV11-J MEMORY D IAG.

E16

MACRO V05.01b Friday 15-Feb-85 16:10

SETUP MARCHING 0°'S € 1'S TEST

SEQ 03199
MT0022:

021026

SUBTST

;00888885

A2 21312331

021026
021032
021032
021034
021036
021036
021044
021052
021056

024234

000022
026612
024446

002300
002262

MT0022

MOV
MOV

MT0023:

CALL

SuUPDO3

SUBTST

«<«<MT0023

; #SUBTEST

RSN ER R R E R R

021112

0ellleé
021122

024234

MT0023

2ttt

002300

012737
012737

000023
026612

002262

012737
004737
005037
000207

177777

002004

ittt

3333133321333

1 13133873

SRR USROS OO R

1311115

;CHECK FOR XAMIKAZE MODE
;IF NOT IN KAMIKAZE MODE RETURN
BCC L166
RTS PC
L166:;;:::::

;SETUP PATTERN NUMBER FOR TYPEOUT

& DISPLAY

;00 IT IN SUPERVISOR MODE
SHIFTING DIAGONAL TEST»>»>

SHIFTING DIAGONAL TEST

RNk Rk

R R

CALL
KAMITEST
ON.ERROR THEN $RETURN

103001

TEST»>>

RAREEREE SRR EBAOSC LA

2221233333332 2333222223333 2333328332333

000207

024446
002004

#22,REALPAT
#MTPO22, SUPDOADD

RE2 32222 222141321223t 1t 2

004737

AR RN NS SR E SRS

SETUP REFRESH & SHIFTING DIAGONAL TEST

233222 222228t 2t i1

RETURN

021060

021060
021064
021064
021066
021070
021070
021076
021104
021104

SETUP REFRESH & SHIFTING DIAGONAL

ERERRERRES S

CALL
KAMITEST
ON.ERROR THEN $RETURN

103001
000207
012737
012737
004737
000207

<<MT0022

E S SR ES SRR

;sSUBTEST
004737

Page 212

MOV
MOV
SET

#23 ,REALPAT
#MTPO22,SUPDOADD
DIAGFLAG

CALL
CLR
RETURN

SUPDO3
DIAGFLAG

R KRR

KRR TR AR

R R KRR ARk

3333317337773 3 %"

Rk E RS

;CHECK FOR KAMIKAZE MODE
;IF NOT IN KAMIKAZE MODE RETURN
8CC L167

RTS PC
L167:;:;:;:::3
:SETUP PATTERN NUMBER FNR TYPEQUT & DISPLAY

;IDENTIFY DIAGONAL TEST TO MTPOR22
MOV
#-1,DIAGFLAG
;00 IT IN SUPERVISOR MODE

CVMJAARO MSV11-J MEMORY DIAG.

MT0023

SHIFTING DIAGONAL

TEST

F16

MACRO V05.01b fFriday 15-Feb-85 16:10

7429 021124

MT0024:
2 i

SUBTST
232

;O REER R bR R

7430 021124
7431 021130

021130
021132

021134

7432 021134

021138

004737

012737

012737
013702
004737

7437
7438
7439
7440

021162
021164
021166
021172

010304
000304
012701
012705

7442
7443
7444
7445
7446
7447
7448
7449

021208
021206
021214
021216
021224
021226
021232
021240

001426
022737
001406
022737
001002
012705
022737
001003

7441 021176

7450 021242
7451 021246
7452 021250
7453 021252
7454 021260
7455 021262
7456 021270
7457 021272
7458 021276
7459 021300
7460 021306
7461
7462 021312
7463 021314
7464 021316
7465 021320

7406 021324
7467 021330

010203

022737

012701
010105
104415
012737
000412
022737
001002
012705
104415
012737
004737
104416
000302
000303
004737
005037
000207

177777

000024
002632
032630

060000
157776

002440

002300

004010

000003

004010

000007

002102

137776
000177

002102

027326

002262

000177

002556

137776

024462

833

8832

ittt

3%:

002262

74:

1%:
44;
2$:

ii i il i

is i

SETUP FAST GALLOPING PATTERN TEST

AR AR RS E AR SRR N

NOSCOPE

MOV
MoV
CALL

#24 ,REALPAT
BAKPAT ,R2
BACKGND

MOV
SWAB
MOV
MOV

R2.R4
R4
#FIRST,R1
#LAST,RS

CMpP

137776

002440

232

SET

MOV

000005

027326
024462

SETUP FAST GALLOPING PATTERN TEST>>

223

MT0024

SEQ 0200

A TR KRR R

CALL
KAMITEST
ON.ERROR THEN $RETURN

103001
000207

7433 021142
7434 021150
7435 021154

7436 021160

024234

<<MT0024

22322223 822

;*SUBTEST

Page 213

R2.R3

#5,PROTYP

8EQ
CMP
BEQ
CMP
BNE
MOV
CMP
BNE

14
#3,PROTYP
3
#7,BANK
34
#137776,RS
#177,BANK
74

CLR
RETURN

NOSCOPE

MOV
#137776
,R1
MOV
R1,RS
SAVREG
MOV
#MTPB24
, SUPDOADD
BR
23
CMP
#177,LASTBANK
ENE
4%
MOV
#137776,R5
SAVREG
MOV
#MTPB24, SUPDOADD
CALL
SuUPDO4
;00 IT AGAIN FOR COMPLEMENT DATA
RESREG
SWAB
R2
SWAB
R3
CALL
SUPDO4

R TR R E SRR R KR SR B E R

it
R

R TR

IIRsII

E AR IR C R RO

RO O

;CHECK FOR KAMIKAZE MODE
;IF NOT IN KAMIKAZE MODE RETURN

BCC L170
RYS PC

170555445

MOV

@-1,NOSCOPE

;SETUP PATTERN NUMBER FOR TYPEOQOUT & DISPLAY

CVMJAAQ MSV11-J MEMORY DIAG.

M70024

Glo

MACRO V05.01b Friday 15-Feb-85 16:10

SETUP FAST GALLOPING PATTERN TEST

7470 021332

SEQ 0201

MT0026:

SUBTST

<<MT0026

; *SUBTEST

7471 021332

7472 021340
7473 021344

7474 021350
7475 021354
7476 021356
7477 021360
7478 021364
7479 021370
7480 021376
7481 021400
7482 021406
7483 021410
7484 021416
7485 021420
7486 021424
7487 021432
7488 021434
7489 021440
7490 021442
7491 021450
7492 021456

7493
7494
7495
7496

021462
021466
021474
021502

012737

005037

002326

013702
010305
010204
012701
012700
022737
001445
022737
001406
022737
001002
012700
022737
001002
012700
104415
012737
012737
004737

002602

013703

021536
021544
021550
021554
021562
021570
021572
021576
021602

7513 021606

000003

004010

000007

002102

014000
000177

002102

014000
027364
027360
024446

000177

001002
012700
104415
012737

7504
7505
7506
7507
7508
7509
7510
7511
7512

004010

012737
004737
005037
012737
012737
104416
004737
010337
010237
000207

027464
002262

3$:
74:

024446

002102

014000

027364

027360
024446
027410
027400
027374

024446
002604
002602

027464

15%:
4%:

002262

027464
002262
2%:

MT0026

#26 ,REALPAT

MOV
MOV
MOV
MoV
MOV
CMP
BEQ
CcMP
BEQ
CMP
BNE
MoV
cMP
BNE
MOV
SAVREG
MOV
MoV
CALL

SEEDHI ,R2
R3,R5
R2,R4
#FIRST,R1
#SIZE/2,R0
#5,PROTYP
1
#3,PROTYP
3¢
#7,BANK
3
#14000,R0
#177,BANK
74
#14000,R0

SEEDLO,R3

#MTPA26+4 ,MTPD26-+14
#MTPA26
, SUPDOADD
SuPDO3

RANODD
#MTPB26+4 ,MTPD26+14
#MTPB26, SUPDOADD

CALL
BR

SUPDO3
2%

BNE
MOV
SAVREG
MOV

44
#14000,R0

CcMP

MOV
CALL
CLR
MOV
MOV
RESREG
CALL
MOV
MOV
RETURN

SETUP RANDOM DATA TEST

pCcBUMP

CLR
MoV
MoV
RESREG

027464
002262

SETUP RANDOM DATA TEST>>

CLR

MOV

020000
000005

022737

7500 021520
7501 021522
7502 021526
7503 021530

MOV

060000

027410
027400
027374

004737
000432

002300

002604

005037
012737
012737
104416

7497 021504
7498 021510

7499 021512

000026

Page 215

T
T

L
L

; TRAPS DO NOT ADD TO THE PC
;INITIALIZE RANDOM NUMBERS

;00 WE HAVE AN 11/83
;BRANCH IF WE DO
;117247
;BRANCH IF SO

;FOR ERROR REPORTING
;SET UP NEXT LINK

#177,BANK

#MTPA26+4 ,MTPD26+14

#MTPA26
, SUPDOADD
SUPDO3
RANODD
#MTPB26+4 ,MTPD26+14
#MTPB26
, SUPDOADD

SUPDQ3
R3,SEEDLO
R2,SEEDHI

;FOR ERROR REPQRTING
;SET UP NEXT LINK

;UPDATE FOR NEW RANDOM NUMBERS

YTMTM
T

CVMJAAQ MSV1l-J MEMORY DIAG.

MT0026

SETUP RANDOM DATA TEST

H16

MACRO V05.01b Friday

15-Feb 85 16:10

SEQ 0202

7516 021610

MT0027:

SUBTST

;MAKE SURE

021610
021616
021620
021626
021626
7523 021634
021634
021642
7524 021642
021642
021646
7525 021646
7526 021652
021652
021656
021660
021664
7527 021666
7528 021670
7529
7530
7531
7532
7533

MT0027

021670
021674
021700

021702
021706
021710
021710
021716
7534 021720
7535 021726
7536 021732
021732
7537 021732
021732
021740
7538 0217«+2
7539 021750
7540 021754
021754
7541 021754
021754
7542 021734
021754
021760
021766
021770
7543 021770
021770
021774
022002
022004
7544 022004

012737
104502
012737

000027

002300

024446

002522

012737

177777

002426

012737

000001

002452

005037

002102

004737

040052

005737
001436
005737
001033
104511

002116

013702
012700
010004

STAR27: FOR I

002102
060000

000001

027704
160570

002262

002452

000002

027712
024446

002262

005237
023727
003717

002452
002452

PP Pres

MOV

#-1,NOFSMODE

MOV 1,1

#0 TO LASTBANK

IFIEQ®
MOV

TST
BEQ
TST
BNE

ACFLAG
L171
RRFLAG
L171

; INVALIDATE BACKGROUND PATTERN ON "BANK"

#FIRST,RO
RO,R4
#5IZE,R1
R1,R3

#MTP034, SUPDOADD

MOV BANK,R2

CMP I,#1
BNE L172

CALL
SLINK1
END ;OF IF
IF I EQ #2
MOV

#MTP034+6,SUPDOADD

CMP I,82
BNE L173

CALL
SuUPDO3
END ;OF IF
END

002102
002102

:SET UP LINK

#1 70 #2

Mov
MOV
MOV
MOV

002452

;CLEAR CSRS

INVALIDATE
LET R2 := BANK

023727
001005
012737
004777

; WRITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM 1S)
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

002124

005237
023737
003727

THAT EACH BANK CAN HAVE UNIQUE DATA

CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

040000

004737

UNIQUE BANK TEST

MoV
#27,REALPAT
CLRCSR
MOV
#SUPDO3, LINK1
SET NOFSMODE

FOR BANK

012701
010103

023727
001005
012737

UNIQUE BANK TEST>>

<<MT0027

; *SUBTEST
7517
7518
7519
7520
7521
7522

Page 217

;OF IF

END ;0F FOR BANK
002556
END

;OF FOR I

000002

IF FS7TFLAG IS TRUE

INC BANK
CMP BANK,LASTBANK
BLE 825

INC I
CMP 1,42
BLE B24

CVMJAAQ MSV11-U MEMORY DIAG.
UNIQUE BANK TEST

MT0027

022004
022010
7545 022012
7546 022016
7547 022020
022020
7548 022020
022020
022026
7549 022026
022026

022034

7550 022034
7551 022040

022040
022044
022046
022052
7552 022054

022054
7553 022060

7554
7555
7556
7557
7558

022062
022066

022070
022074
022076
022076
022104
7559 022106
7560 022114
7561 022120
022120
7562 022120
022120
022126
7563 022130
7564 022136
7565 022142

005737
001403
005037
000207

MACRO V05.01b Friday

TST FSIFLAG

002426

CLR

RETURN

END
002452

013737

002556

002102

004737

040052

005737

002116

013702
005102
012700
010004
012701
010103
023727
001005
012737
004777

023727
001005
012737
004737

LASTBANK DOWNTO #0

TST RRFLAG

LET R2

002102

040000

002452

000001

027704
160402

002262

002452

000002

027712
024446

002262

MoV

#MTPO34, SUPDCADD
CALL
aLINK1
END ;OF IF

IF I EQ #2
MOV

005237
023727
003716

002452
002452

7569 022172
7570 022176

005037
000207

002426

#MTP034+6,SUPDOADD

BNE L175

MOV BANK,R2

cMP I,#1
BNE L176

CMP I, %2
BNE L177

CALL
SUPDO3
END ;OF IF
END

022154
022156
7568 022156
022156
022162
022170

:= BANK

R2
COM
MOV
#FIRST,RO
MOV
RO,R4
MoV
#SIZE,R1
MOV
R1,R3
IF T EQ #1

060000

002102
002102

TST ACFLAG

BEQ L17S

002124

005337
023727
002327

022172

71 TO #2

CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

022142

022146

FOR BANK

022142

NOFSMODE

BEQ L174

;OF IF FSTFLAG

FOR 1

7566 022142
7567 022142

Page 217-1

002446

000001

001033

116

16:10

SEQ 0203

012737

001436
005737

15 Feb-85

END

;OF IF

;OF FOR BANK

000000
END

;GF FOR I

000002

CLK

RETURN

NQF SMODE

DEC BANK
CMP BANK, #0
BGE B27
E27:5:::5:53:

INC I
CMP 1,02
BLE B26

CVMJUAAQ MSV11 J MEMORY DIAG.

MT0027

UNIQUE BANK TEST

J16

MACRO V0S.0l1b Friday 15 Feb 85 16:10

7573 022200

MT0030:

SUBTST

«<MT0030

;sSUBTEST

7575 022204

7576
7577
7578
7579
7580
7581

022204

022212
022220
022226
022234
022242
022244

005037
012737

002264
177777

012737
012737
012737
012737
104470

000030
000001
024446
027466

022244
022252

012737
012737

177777
177777

022260
022264

005037

002102

7583 022264

004737

040052

022270
022274

005737
001414

002120

022276
022302

005737
001411

002116

7582 022260

7584 022270

7585 022276

7586
7587
7588
7589

022304
022310

022312
022316
022322
022326
022326

7590 022326
022326
7591 022326
022326

022332
022340

022342
7592 022342
022342
022346
7593 022350
022350
7594 022356
7595 022360
7596 022364
022364
7597 022366
7598 022370

022370
022374
022400

7599 022404

7600 022406
022406
7601 022406

005737
001006

012701
012700
004777

002542

002300
002076
002522
002262

002426
002440

SEQ 0204

SETUP FLUSH QUT DBE'S
I

I T

I I

T N

PASFLG

MOV
MOV
MOV
MOV
ECCDIS
SET

#30,REALPAT
#1,NOPAR
#SUPDO3,LINK1
#MTPO30, SUPDOADD

CALL

T T

NOF SMODE
, NOSCOPE

#0 TO LASTBANK

005737
001032

002264

012737

177777

104502
004737

EXBANK

ACFLAG IS

TRUE AND RRFLAG IS FALSE

005037
005037
005037

(000207

013737

CLEAR

002426
002440
002542

END
002310

;CLEAR CSRS

002102

MOV

;0F ON.ERROR
NEWBANIK
, BANK

&-1,NOFSMODE
@-1,NOSCOPE

TST MKFLAG
BEQ L200
TST ACFLAG
BEQ L201

MOV

#-1,PASFLG

BCC L203
; TRAP ON DOUBLE BIT ERRORS (NORMAL)

NOF SMODE ,NOSCOPE ,FULLREL

RETURN

MOV
MOV

& DISPLAY

TST PASFLG
BNE L202

SET PASFLG

ECCINIT

@-1,FULLREL

INC BANK
CMP BANI,LASTBANK
BLE B30
E30:::::5:3

IF PASFLG IS FALSE

103010
104472

MOV

L200:;:;::::

;OF FOR

CLRCSR
CALL
RELOCATE
ON.ERROR

L201:;:;:::::

002556

036402

TST RRFLAG
BNE L201

MOV
#SIZE,R1
MOV
#FIRST,RO
CALL
aLINK1
END ;OF IF ACFLAG

002264

TTTmTT

CLR BANK
B30:::::::

END ;OF IF MKFLAG

002102
002102

;DISABLE ERROR CORRECTION

002124

005237
023737
003751

;SETUP PATTERN NUMBER FOR TYPEQUT
;INDICATE COUNT PARITY ERRORS

IF MKFLAG IS TRUE

END

FULLREL

FOR BANK

040000
060000
160174

TEST>>

SETUP FLUSH QUT DBE'S TEST

CLR
SET

MTA030:

MT0030

7574 022200

Page 219

CLR
CLR
CLR
L203:::::::

NOFSMODE
NOSCOPE
FULLREL

CVMJAAO MSVil-J MEMORY DIAG.

MT0030

7602
7603
7604
7605

K16

MACRO v05.01b Friday 15 Feb 85 16:10

SETUP FLUSH OUT DBE'S TEST

022414
022420
022424
022426

004737
004737
104472
004737

022434
7608 022434

104472

022436
022442
022446

005037
003037
005037

7606 022432
7607 022434

7609 022436

7610 022452

000207

040052
022212
037214

CALL
EXBANK
CALL
MTA030
ECCINIT
CALL
UNRELOCATE

SEQ 0205

; TRAP ON DOUBLE BIT ERRORS (NORMAL)

RETURN
END ;0F IF PASFLG

ECCINIT
002426
002440
002542

Page 219-1

CLEAR

RETURN

L202:::::3::
;TRAP ON DOUBLE BIT ERRORS (NORMAL)

NOFSMODE ,NOSCOPE,FULLREL

CLR
CLR
CLR

NOFSMODE
NOSCOPE
FULLREL

{ CYMJARO HSV11-J HEMORY DIAG,
MT0030

7613 022454

MT0031: SUBTST
B

;sSUBTEST

7615 022460
022460
022462

022464

7616 022464
022464

7617 022472

7618 022500
7619 022504
022504

022506
022512

022516
7620 022520
022520

—-—
—

012737

000031

005037

002076

010346
013703
004737

002102
035716

002440

002300

012603

7621 022526
022526
022532
022534
022536

004537
000027
060000
027476

041024

7622 022540
7623 022542
7624 022546
7625 022550
7626 022554

104417
013702
010200
012701
012705

012737
012737

7629 022574
7630 022600
7631 022602

005737
001005
023737

7633 022612

000407

7634 022614
7635 022622
7636 022624
7637 022632
7638 022636
7639 022642

000207

012737 ' 177777

001405

023737
001003
012737
004737
005037
000207

<<MT0031
L

SETUP S0B-A-LONG TEST>>

MT0031

T g

SETUP S0B-A-LONG TEST

CALL

KAMITEST

SET

NOSCOPE

MOV

#31,REALPAT

CLR
MAP

NOPAR
BANK

MOV
CALL
.DSABL

BANK,R3
MAPPER
CRF

177776

;CHECK FOR KAMIKAZE MODE

:IF NOT IN KAMIKAZE MODE RETURN
BCC L204
RTS PC

L204‘:::::x

TESTAREA
BgEABL EEETMODE.PSN

MOV

©-1,NOSCOPE

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
SETUP PARITY ACTION
;HAP FIRST SO BLOCK MOVE WORKS
MOV R3,-(SP)

MOV (SP).,R3
:ENTER TEST MODE
;GO TO SYSTEM TEST MODE

BMOV

MTPO31,FIRST,SOBLENGTH/2
JSR RS,BLOCK3
SOBLENGTH/?2
FIRST .
MIPQ31
.DSABL

100776
060056
060002
160000

002262
002522

172252

172254

CRF

KERNEL
.
MOV
S0BK,R2
MOV
R2,R0-.
.
MOV
$100776,R1
MOV
. ¢FIRST+SOBLENGTH,RS

002572

002456

SEQ 0206 !

ON.ERROR THEN $RETURN
.

103001

002552

7632 022610

024234

053737

7627 022560
7628 022566

004737

L16

MACRO V0S5.01b Fridey 15-Feb-85 16:10 Page 221

SETUP FLUSH OUT DBE'S TEST

7614 022454

MOV
MoV
TST

BNE
CMP
BEQ

177652

177654

1¢:

140000
024462
002440

002522

2$:
3¢:

GFIRST+2,SUPDOADD
#LAST+2,LINKL
NOSUPER - .

14
- .- - SIPARS,SIPAR6

CMP
.
BNE
MOV
CALL
CLR
RETURN

UIPARS,UIPARG
38 «
£140000,LINK1
SUPD04
NOSCOPE

;ENTER KERNEL MODE

;COMPLEMENT OF INSTRUCTION “SO0B RO,DOT"

CVMUAAO MSV11-J MEMORY DIAG.

MTO0031

SETUP SOB-A-LONG TEST

Ml6

MACRO v05.01b Friday 15-Feb-85 16:10

7642 022644

MT0032:

SUBTST

<<MT0032

HAiA 22

P2 222222

22 2

; ¢SUBTEST
;A

7643 022644

004737

022650
022652

103001
000207

7644 022650

022634

7645 022654

022654

012737

7646 022662
7647 022670

012737
005037

022674
022676

010346
013703

022706

012603

7648 022674

022702
7649 022710

7650 022714

7651 022720
7652 022724
7653 022730

7654 022734
7655 022740
7656 022744
7657 022750

7658 022752

7659
7660
7661
7662
7663
7664
7665
7666

024234

177777

000032
002076

002440
002300

it i

SETUP WRITE RECOVERY TEST

R R AR

AR RN R AR AR ER R R R

KAMITEST

E R R R

R S "SRR RS C R E

8CC L20S
RTS PC

L20S::::::3

SET

NOSCOPE

MOV
CLR

#32 ,REALPAT
NOPAR

MOV

.DSABL

BANK,R3
MAPPER

CRF

012700

010247

MOV

#10247,R0

;0P CODE OF INSTRUCTION “MOV

012702
010237
012703

020000
002522
060000

MOV
MOV
MOV

#SIZE/2,R2
R2,LINK1
#FIRST ,R3

;USED FOR 1/2 BANK LOOP

002456

TST
BNE
cMP

NOSUPER
14

012704
005037

005737
001005
023737

MOV

160000
002524
172252

172254

177652

177654

002524

7668 023016
023016

053737

002552

177776

1$:
24:

010023
010144
077203

3¢

4%:

7674 023032
7675 023040
7676
7677 023042

022737
001003

000005

023042
023046

004537
027554

040770

;g;g 023050

104417

7680 023052
7681 023056

012702
012700

004010

;MAP FIRST SO THAT THE BLOCK MOVE WORKS

MOV (SP)+,R3

R2,-(PC)*

;OP CODE OF COMPLEMENT OF INSTRUCTION "UMP (RO)*

O#LAST+2,R4
LINK2

SIPARS,SIPARG

BEQ
BR
CHP
BNE
MOV
MOV
MOV
MOV

24
34
UIPARS,UIPAR6
34
#140000,R4
#14000,R2
R2,LINK1
#1,LINK2

TESTAREA
ngABL
EEETHODE.PSH

;ENTER TEST MONE
;GO 70 LYSTEM TEST MODE

;MOVE TEST TQ MEMORY UNDER TEST
MoV
RO,(R3).
MOV
R1,-(R4)
S0B
R2,44
CMP
45,PROTYP
BNE
S$
;MOVE LAST PART OF TEST TO FASTCITY
BMOV
MTPO32

JSR R5,BLOCKI
MTPO32

S$:
005141
023156

& DISPLAY

MOV R3,-(SP)

$177667,R1

MOV
CLR

@-1,NOSCOPE

:SETUP PATTERN NUMBER FOR TYPEOUT
;:SETUP PARITY ACTION

MOV
CALL

177667

.DSABL

KERNEL
MOV
MOV

#5141 ,R2
#10$,RO

:IF NOT IN KAMIKAZE MODE RETURN

002102
035716

012701

RSO E O S C G SR G RSO

BANK

004737

;CHECK FOR KAMIKAZE MODE

MAP

140000
014000
002522
000001

;g;g 023030

22t

ON.ERRDR THEN $RETURN

001405
000415
023737
001011
012704
012702
010237
012737

7669
7670 023024
7671 023026

SNEE RN SR AR OSSR RN S AR

SEQ 0207

SETUP WRITE RECOVERY TEST>>

22222

MT0032

CALL

022760
022762
022764
022772
022774
023000
023004
023010

7667

Peage 223

CRF

;ENTER KERNEL MODE
;0P CODE OF INSTRUCTION
"COM
;ADDRESS TO RETURN TO IN RO

(R1)

CVMUAAO MSV11-J MEMORY DIAG.

MT0032

MACRO V05.01b Friday 15-Feb-85 16:10

SETUP WRITE RECOVERY TEST

7682 023062

7683
7684
7685
7686
7687
7688

023066
023074
023100
023102
023106
023112

7690
7691
7692
7693
7694
7695
7696

023122
023126
023132
023134
023140
023146
023152

7689 023116

7697 023156
1698
7699

012701

012737
005737
001402
012701
004737
012703

012705

012704
005737
001402
012703
012737
004737
005037

000207

160000

060000
002524
140000
024462
020000
000110
060000
002524
014000
027554
024462
002440

MOV

002262

64:

7%:
9%:
10¢:

OLAST.2,R1

MOV
157
BEQ
MOV
CALL
MOV

oF IRST, SUPDOADD
LINK2
64
©140000,R1
SUPDO4
@S12E/2,R3

MOV
TST
BEQ
MOV
MOV
CALL
CLR

#FIRST R4
LINK?2
78
#14000,R3
#MTPO32, SUPDOADD
SUPDO4
NOSCOPE

MOV

002262

Page 223-1

RETURN

SEQ ¢

;TOP OF BANK

; THIS RETURN ACTS AS A NORMAL

;ALSO A RETURN FROM THE

"CALL

RETURN FROM MT0032

SUPDOA" ABOVE

CVMJUARQ MSV11-J MEMORY DIAG.

MT0032

MACRO V05.01b Friday

15 Feb 85

SETUP WRITE RECOVERY TEST

MT0033:

7702 023160

SUBTST

<<MT0033

004737

012737
012737
005037

177777
000033
002076

010346
013703
004737

002102
035716

023222

012603

023224

053737

00255¢

023236
023240

041024

023242

004537
000037
060000
027606

023244

104417

023246
023252
023260
023264
023270
023276
023302
023304
023312
023314
023316
023324
023326

012705
012737
012701
012702
012737
005737
001005
023737
001405
000407
023737
001003
012737

060076
060004
060002
060003
160000
002456

7729 023340
7730 023344

004737
005037
000207

024462
002440

7706

7707
7708

7709
7710 023224
7711 023232

023232

7712
7713
7714
7715
7716
7717

7718

7719
7720
7721
71722
7723
7724
7725

7726
7727
7728 023334

7731
7732 023346

024234

023164
023166
023170
023170
023170
023176
023204
023210
023210
023212
023216

7705

MT0033

232223

103001
000207
002440
002300

SET

NOSCOPE

MOV

#33,REALPAT

CLR

023364

22232283333

0323

22313333

YYY)

;CHECK FOR KAMIKAZE MODE
:IF NOT IN KAMIKAZE MODE RETURN
8CC L206

BANK,R3

MAPPER
CRF

CALL
.DSABL

;ENTER TEST MODE

TESTAREA

CRF

.DSABL

KERNEL

#FIRST+GBLENGTH,RS
#FIRST+4,SUPDOADD
#FIRST+2,R1
#FIRST+3,R2
#LAST+2,LINK1
NOSUPER

CcMP

SIPARS,SIPARG

CHP

UIPARS,UIPARG

3$:

CALL
CLR
RETURN

SUPD0O4
NOSCOPE

MT0034:

SUBTST

002522

BNE

172254

177652

177654

13%:

140000

002522

2%:

002300

BEQ
BR

2%
3$

BNE
MOV

MOV
MOV
MOV
MOV

;GO TO SYSTEM TEST MODE

;ENTER IKERNEL MODE

MOV
MoV
MOV
MOV
MoV
TST

002262

172252

000034
060000
040000
002620

MOV (SP)+,R3

BIS
TESTMODE ,PSW
.DSABL
CRF
BMOV
MTPO33,FIRST,GBLENGTH/2
JSR R5,BLOCK3
GBLENGTH/2
FIRST
MTPO33

@&-1,NOSCOPE

:MAP FIRST SO THAT 8LOCK MOVE WORKS
MOV R3,-(SP)

BANK

MOV

177776

MOV

;SETUP PATTERN NUMBER FOR TYPEQUT & DISPLAY
;SETUP PARITY ACTION

NOPAR

MAP

RN EE AR RS

012737
012700
012701
013702

SETUP BRANCH GOBBLE TEST

2223333 3322232

RTS PC

; sSUBTEST

7736

SEQ 0209

SETUP BRANCH GOBBLE TEST»>>

KAMITEST
CALL
ON.ERROR THEN $RETURN

7733 023346
7734 023354
7738 023360

Page 225

(EREEAEEREESERERNRERRE
AR NN R RN ER R RS R R RSB R E R R SRS AR E R AR B E RS S H RO RS e S0 SO S oL

;sSUBTEST
7703 0231690
7704 023164

16:10

34
#140000,
L INK1

SOFT ERROR - BACKGROUND PATTERN TEST>>

<<MT0034
Ty

MT0034
R

SOFT ERROR

kbR

RN bR AR AR AR

#34 REALPAT
#FIRST,RO
#SIZE,R1
SOFTPPTM ,R2

Y Y Y

- BACKGROUND PATTERN TEST
SRS

RS R AR

S b SRS

56 6055605858880 88688800 ¢

CVMUAAD MSV11-J MEMORY DIAG.

MT0034

7737 023370
7738 023372

010103
013705
010004

023400
023406

032765
001406

020000

012737
004737

027712
024446

7739 023376
7740 023400
7741
7742 023410
7743 023416
7744 023422

023422
023424

000410

023424
023432
023436
023444
023444
7750 023444

012737
004737
052765

7745
7746
7747
7748
7749

MACRO V05.01b Friday

SOFT ERROR - BACKGROUND PATTERN TEST

7751
7752 023446

15 Feb-85

027704
024446
020000

16:10

Page 225 1

SEQ 0210
MOV

002104

MOV

R1,R3

BANKINDEX
,RS

RO.R4

IF #B8IT13 SET.IN CONFIG+2(R5)

002666

BIT MBIT13,CONFIG«2(RS)

BEQ L207

;BACKGROUND PATTERN IS VALID

002262

MOV

CALL

ELSE

#MTP034+6, SUPDOADD

SuPDO3

;READ IT
BR L210

;BACKGROUND PATTERN HAS BEEN INVALIDATED

002262

MOV
CALL
1S
END ;0F

002666

#MTP0O34,SUPDOADD
SuPDO3
#BIT13,CONFIG+2(RS)
IF #BIT13

;:VALIDATE IT

L210:;:::::

RETURN

000207
MT0035:
R

SUBTST

«<«<MT003S

22222 332222222

; *SUBTEST

SETUP WORST CASE NOISE PARITY TEST>>

2222222222

MT0035

L207:;::5:::

22ttt

2ttt 2233332122222

2222222 F 2

SETUP WORST CASE NOISE PARITY TEST

il 238222233ttt
it st id s sttt
ettt stttz tgd
i3s3 2332233 3202]

7753 023446
7754 023454
7755 023460

7756 023464

7757
7758
7759
7760
7761
7762
7763
7764
7765
7766
7767

7768
7769
7770
AR

023466

023472
023474
023500
023506
023510
023512
023516
023522
023530
023534
023534
023540
023542
023544
023544
02354¢€
023552
023556

012737
013703

016301
000301
042701
006201
010137
023737
001001
000207
012702
004737
012737
004737

005737
001401
000207
005102
004737
004737
000207

000035
002104
002664

002300

MOV
MOV
MOV

SWAB
BIC

177760
002152
002152

052524
032630
027730
024446
002346

032630
024462

ASL
MOV

002532

cMP
BNE

1s$:
002262

RETURN

MOV

#35,REALPAT
BANKINDEX
,R3
CONFIG(R3),R1

R1
#1tC17,R1

R1
R1,CSRNO

CSRNQ,PGMCSR
1$

#52524 ,R2

CALL
BACKGND
MOV
#MTPQ35, SUPDOADD
CALL
SUPDO3
IF QVFLAG IS TRUE THEN $RETURN

COoM

CALL
CALL

RETURN

;SET UP TEST NUMBER FOR DISPLAY

BACKGND
SuUPDO4

;WRITE BACKROUND OF ALMOST ALT.

1'S AND 0'S

TST QVFLAG
BEQ L211
RTS PC

L2dl:;5::::

sWRITE COMPLEMENT PATTERN INTO MUT

MACRO V05.01b Friday 15 Feb 85 16:10
CVMJARO MSV11-u MEMORY DIAG.
SETUP WORST CASE NOISE PARITY TEST

Page 226

MTCO35

MT0036:

7773 023560

SUBTST

7774 023560

1778
7776
7777
7778
7779
7780
7781
7782

023566
023572
023576
023600

023604
023610
023614
023620

012737
004737
005037
005000
012701
004737
004737
004737
000207

000036
032674
002264

100C00
037740
030072
040026

002300

<<MT0036

SETUP CORRECTION CODE TEST>>

. *SUBTEST

MoV

MT0036

A T

#36,REALPAT

;SET UP TEST NUMBER FOR TYPEQUT AND DISPLAY

#100000,R1

;GET FIRST ADDRESS IN BANK

GETCSR
PASFLG
RO

CALL
CALL
CALL

MAPKERNAL
MTPO36
UNMAP

RETURN

SETUP CORRECTION CODE TEST

CALL
CLR
CLR

MoV

SEQ 0211

;GET CSR INFO FROM CONFIG TABLE
;CLEAR LOOP COUNTER
;:GET TEST DATA
;MAP KIPARS AND 6 TO BANK
;EXECUTE TEST
;REMAP KERNAL SPACE

CVMJAAQ MSV11-J MEMORY DIAG.

M10036

MACRO V05.01b Friday 15-Feb-35 16:10

SETUP CORRECTION CODE TEST

7784 023€22

MT0037: SUBTST
A A2t

122

222

: $SUBTEST
A2

7785
7786
7787
7788
7789
7790
7791
7792

023622
023630
023634
023636
023642
023646
023652
023656

012737
012701
005000
004737
004737
004737
004737
000207

000037
100000
037740
032674
030316
040026

002300

232223232322

MOV
MOV
CLR
CALL
CALL
CALL
CALL
RETURN

<<MT0037

222

Page 227

32 122223223222

MT0037

22 22

223

SEQ 0212

SETUP ECC DISABLE TEST>>
33222

2232223322222 23233323323

SETUP ECC DISABLE TEST
2222222222332

237, REALPAT
$100000,R1
RO
MAPKERNAL
GETCSR
MTPO37
UNMAP

3333222222322

232332

323222233123

82373
2

333

;SETUP PATTERN AND NUMBER FOR TYPEQUT
:SET UP TEST ADDRESS
:CLEAR DATA TO BE WRITTEN
:MAP THIS TEST 10 KERNEL SPACE
:GET CSRINFO FROM CONFIG TABLE
:CHECK ECC DISABLE
:REMAP KERNEL SPACE

2]
3"

AND DISPLAY

CVMJARO MSV11-J MEMORY DIAG.

MT0037

SETUP ECC DISABLE TEST

MACRO v05.01b Friday 15-Feb-35 16:10

7794 023660

MT0041:

SUBTST

Page 228

< <MT0041

SEQ 0213

SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST>>

;“‘t“ttt*“t“t‘*‘#*"*tttitttt“*‘t‘#i‘“‘t‘t““““‘..".““‘t‘.t..‘..“‘.

; sSUBTEST

MTO0041

7795 023660
7796 023666
7797 023672
023672
7798 023700

012737
004737

000041
032674

002300

012737

030370

002262

023700

012701

060000

023704
023712

023727
001004

002102

000177

012737

000014

002570

7799 023704

7800 023714
023714
7801 023722

023722
023724

000403

023724

012737

000020

004737
000207

024446

7802 023724

7803 023732

023732

7804 023732
7805 023736

002570

SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST

MOV
#41 ,REALPAT
CALL
GETCSR
LET SUPDOADD := #MTPO41
LET R1

#FIRST

IF BANK EQ #177

LET PASCNT

:= 212,

END

CALL SUPDO3
RETURN

N I

I A

#16.

;SETUP PATTERN AND NUMBER FOR TYPEQUT AND DISPLAY
;GET CSR NUMBER AND ADDRESS FROM CONFIGURATION TABLE
;+SET UP TEST ADDRESS
MOV OMTPO41, SUPDOADD
;SET UP FIRST ADDRESS
;ARE WE AT BANK 177?

ELSE

LET PASCNT

I N

MOV @FIRST,R1

CMP BANK, 8177
BNE L212
MOV #12.,PASCNT

BR L213
L2l2:::::::
MOV #16.,PASCNT
Lel3:;:::::

;EXECUTE ADDDRESS TO CSR TEST IN SUPVISIOR MODE
;

CVMJUARO MSV11-J MEMORY DIAG.

MT0041

MACRO v05.01b Fr.da gTIS-Feb-BS

SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TE

MT0042:

7807 023740

SUBTST

7808 023740

7809
7810
7811
7812
7813
7814

023746
023752
023756
023762
023766
023772

012737
012701
004737
004737
004737
004737
000207

000042

100000
037740
032674
030542
040026

002300

CALL
CALL
CALL

gA%LR
ETURN

Page 229

MT0042

SEQ 0214

SETUP EXTENDED Q BUS ADDRESS TO CSR TEST>»

MOV
MoV

16-10

<<MT0042

; #SUBTEST

L LT

SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST
T

I L)

#42 ,REALPAT
#100000,R1

;SETUP PATTERN AND NUMBER FOR TYPEQOUT AND DISPLAY
;SET UP TEST ADDRESS

UNMAP

;REMAP KERNEL SPACE

MAPKERNAL
GETCSR
MTPO42

;MAP TO KERNEL SPACE
;SET UP CSRINFO FROM CONFIGURATION TABLE
; CHECK EXTENDED Q-BUS ADDRESS TO CSR

CVMUAAQ MSV11-J MEMORY DIAG.

MT0042

7316

MACRO vV05.01b Friday 15-Feb-85 16:10

SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST

023774

MT0043: SUBTST

<«<MT0043

; *SUBTEST

MT0043

Page 230

SEQ 0215

SETUP WRITE BYTE CLEARS SBE TEST>>

N I

SETUP WRITE BYTE CLEARS SBE TEST

S EEERARREEEEREREREERRRAERERRARR
R R AR R RR R AR EBERREERERABEREACSEEELE SIS
0020008000

7817 023774
7818 024002
7819 024006

7820
7821
7822
7823

024006
024012
024016
024022
024024

012737

000043

004737

037740

012701
004737
004737
000207

100000
031030
.040026

002300

MOV

CALL

LET Rl

MT0044:

012737
004737

000744
032674

002300

024036

012737

031224

002262

024044
7828 024050
024050
024056
7829 024060
024060
7830 024066
024066
024070

012701

060000

023727
001004

002102

000177

012737

120000

002562

012737

160000

7833 024076

004737

024446

7834 024102
7835 024104

000207

024076

7836 024104
7837 024112
7838 024116
7839
7840
7841
7842

024116
024122
024126
024132
024134

00004S
037740

012701
004737
004737
000207

100000
031546
040026

7843 024134

012737

024146

012701

7848 024162

000207

7846 024152
7847 024156

004737

000046

037740

100000

031734
040026

SETUP SHIFTING 1/0'S THROUGH THE CHECK BITS TEST»>»

I T

T I I

I T

T I T

;SET UP FIRST ADDRESS

:= #FIRST

MOV #MTPO44,SUPDOADD
MOV #FIRST,R1

;ARE WE AT BANK 1772

BR L215
L214:;;::;;;

LET ENDADD := #160000

MOV #160000,ENDADD

END

LelS:;:::3;
;:EXECUTE ADDDRESS TO CSR TEST IN SUPVISIOR MQDE

RETURN
MT0045: SUBTST

<<MTQ045

; *SUBTEST

MT0045

MOV
CALL

LET Rl

SETUP SYNDROMES TO CSR ON DOUBLE BIT ERROR>>

L L

CALL MTPO4S
CALL UNMAP
RETURN
MT0046: SUBTST
<<MT0046
T

MOV

CALL
LET R1

T T

MT0046

e e

M e

mre

;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
;MAP TO KERNEL SPACE
;SET UP TEST ADDRESS

MOV #100000,R1
;PERFORM SYNDROMES TO CSR ON DOUBLE BIT ERROR
;REMAP KERNEL SPACE
;
SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET»>»

I T

#46 ,REALPAT

CALL UNMAP

SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET

MAPKERNAL
:= #100000

CALL MTPO46
RETURN

:= #100000

SETUP SYNDROMES TO CSR ON DOUBLE BIT ERROR

#45S,REALPAT
MAPICERNAL

MOV #120000,ENDADD

ELSE

CMP BANK,#177
BNE L214

LET ENDADD := #120000

mmnm:s

LET Rl

CALL SUPDO3

002300

;SET UP TEST ADDRESS

IF BANK EQ #177

002562

002300

SETUP SHIFTING 1/0'S THROUGH THE CHECK BITS TEST

;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
;GET CSR NUMBER AND ADDRESS FROM CONFIGURATION TABLE

012737
004737

MT0044

MOV #100000,R}1

;PERFORM WRITE BYTE TEST
;:REMAP KERNEL SPACE

#44 REALPAT
GETCSR
LET SUPDOADD := #MTPO44

; *SUBTEST

7844 024142
7845 024146

;SET UP TEST ADDRESS

;MAP T0O KERNEL SPACE

MOV
CALL

000403

024070
024070
7832 024076
7831

:= #100000

I
R

7827 024044

;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY

CALL MTPO43
CALL UNMAP
RETURN
SUBTST
<«<MT0044

; *SUBTEST
7824 024024
7825 024032
7826 024036

243 ,REALPAT

MAPIKERNAL

;SET UP TEST NUMBER FOR TYPEQUT AND DISPLAY

;MAP TO KERNEL SPACE
;:SET UP TEST ADDRESS

MOV ¢100000,R1

;PERFORM TRAPS DECTECTED ON SBE WITH ECC DISABLED TE
:REMAP KERNEL SPACE

CVMUARO MSV11-J MEMORY DIAG.

M10046

MACRO V0S.0lb Fridaé 15-Feb 85 16:10

SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET

7849 024164

MT0047: SUBTST
BRI

7850 024168
7851 024172
7852 024176
7853

024176
024202

024202
7854 024206

7855 024212
7856 024216

012737
004737

000047
037740

012701

100000

012702
004737

120000
032274

004737
000207

030026

002300

2222

MOV
CALL
LET R1

MTO047

222

332332222ttt il

ittt 1323221330322

SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST

2222222ttt

#47,REALPAT
MAPKERNAL
:= #100000

LET R2 := #120000
CALL MTP047
CALL UNMAP
RETURN

SEQ 0216

SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST»>>

3122332232323 222233222ttt

; sSUBTEST
I

<<MT0047

Page 230-1

ittt ittt i

itdizii izl

1LY

;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY
:MAP TO KERNEL SPACE
:SET UP TEST ADDRESS
MOV ©100000,R1
; "
» SECOND TEST ADDRESS

MOV #120000,R2
;PERFORM NO UPDATE TO CSR ON SBE WITH DBE
:REMAP KERNEL SPACE

CVMJUAARO MSV1l-J MEMORY DIAG.

MTQ047

MACRO v05.01b Frida

SETUP NO CSR UPDATE ON SBE WITH EXSISTING
MT0999:

7859 024220

i 2

15-Feb-85 16:10
g€ TEST

SUBTST

I Lt

024224
786¢ 024232

7863
7864 024234

005037

002300

012737
000207

1777177

223272223222 2303

002344

SET

024234

7866

7867
7868

7869

024250
024254
024256
024256
024256
024260
024262
024262
024264
024264
024264
024266
024270
024270

000241
000207
000402
000261
000207

213 232233332 ¢%)

3332232232 22t

MOV

itttz

©-1,NULLFLAG

CHECK FOR KAMIKAZE MODE

222 2332 2 3

s S

3323232322 2222222

T I T T Y

22222322 231231 3112333322

IF KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE

TST KAMIKAZE

BNE L216
TST
BNE
TST
BEQ

002350

002352
$RETURN NOERROR

;RUN THE TEST

ACTFLAG
L216
APTFLAG
L217

CLC

RTS PC

ELSE
$RETURN ERROR

END

tilgs

<<CHECK FOR KAMIKAZE MODE>>

002006

2232322232223

NULLFLAG

KAMITEST:SUBTST

005737
001006
005737
001003
005737
001403

22222232213

TEST

RETURN

22 23R

024240
024242
024246

2333323222222 2222223333

SETUP NULL

REALPAY

CLR

:*SUBTEST
7865 024234

MT0999

SEQ 0217

SETUP NULL TEST>>

«<«<MT0999

211332333 2232222322 22222223

;«SUBTEST
7860 024220
7861 024224

Page 232

;OF IF KAMIKAZE

BR L220
L217:::::::

;DON’T RUN THE TEST

CVMJAA0 MSV11-J MEMORY DIAG.

CHECK FOR KAMIKAZE MODE

MACRO v05.01b Friday 15 Feb-85 16:10

7872 024270

024302

012603
004737

051430

024310
024314

013746
013746

002624
002622

7878
7879
7880
7881

024330
024332
024334
024336

010120
010220
010320
010420

7883
7884
7885
7886
7887
7888
7889

024342
024344
024350
024356
024364
024370
024372

7882 024340

7890
7891
7892
7893

024374
024376
024400
024402

010037
012700

EXECUTE PATTERN IN SUPERVISOR>>

EXECUTE PATTERN IN SUPERVISOR

SUPDO2:

010520

010620
013700
012737
013737
012700
014006
014005

BANK

MoV
CALL

BANK ,R3
MAPPER

CALL
PUSH

GETDIS
$LPERR, $LPADR

MOV
MOV

RO, SUPDROQ
#SUPDR1,RO

002160
024364
002622
002176

002622
002624

TAG4$:

R1,(RO)
R2,(R0O)+
R3,(RO)+
R4,(RO).

MOV
MOV
MOV
MOV
MOV
MOV
MOV

SP,(RO)+
SUPDRO,RO
#TAG4
S, $LPADR
$LPADR, $LPERR
#SUPDR6+2,R0O
-(RO),SP
-(RO).R5

MOV
MOV
MOV

014000

040000

7896
7897
7898
7899
7900
7901

024414
024420
024422
024426
024430
024432

012706
104424
004737
104423
104417
000004

000740

024440

012637
012637

002622
002624

177640

177776

CRF

MOV
MOV
MoV
MOV

MOV

014004
014003
014002
014001

000207

MAP

.DSABL

002160
002162

052737

7903 024444

SUBR

002102
035716

7894 024404
7895 024406
024406

7902 024434
024434

; *SUBTEST

SEQ 0218

Y
e R
e
T
Y T
T
LT

010346
013703
004737

7876 024320
7877 024324

<<SUBR

7873 024270
024270
024272
024276
7874 024304
7875 024310

SUPDC1: SUBTST

Page 234

MOV $LPERR, -(SP)
MOV $LPADR, (SP)

-(RO),R4
-(RO),R3
-(RO),R2

MOV
#SUPSTK, SSP
CACHOFF
CALL
FASTCITY
CACHON
KERNEL
SCOPE

RETURN

MOV (SP)+,R3

R5,(R0O)+

MOV
-(RO),R1
MOV
-(R0O),RO
SUPERVISOR
ngABL ggng4.PSH

popP

;MAP SUPERVISOR SPACE (TEST AREA) TQ BANK
MOV R3,-(SP)

$LPADR, $LPERR

;ENTER SUPERVISOR MODE
;GO TO SUPERVISOR MODE
; TURN CACHE OFF
;CALL TO THE USER INSTRUCTION PAR'S
; TURN CACHE ON
;ENTER KERNEL MODE

MOV (SP).,$LPADR
MOV (SP)., $LPERR

MACRO V05.01b Fridey 15 Feb-85 16:10
CVMJAARD MSV1il-J MEMORY DIAG.
EXECUTE PATTERN IN SUPERVISOR
SUBR
7906 024446

SUPDO3:

024446
024450
024454

010346
013703
004737

002102
035716

024460
7907 024462
7908 024466
024466

012603
004737

051430

024472
7909 024476
7910 024502
7911 024506
7912 024510
7913 024512
7914 024514
7915 024516
7916 024520
7917 024522
7918 024526
7919 024534
7920 024342
7921 024546
7922 024550
7923 024352
7924 024554
7925 024356

7926 024560

7927 024562
7928 024564

013746
013746
010037
012700
010120
010220
010320
010420
010520
010620
013700

012737
013737

012700
014006
014005
014004
014003
014002
014001
014000

024542

002622
002176

024564

053737

002552

7929 024572
7930 024576

005737
001403
012706

002456

024600
024604
024606
024612
024614
024620
024622
024624
7939 024626
024626
024632
7940 024636
7931

7932
1933
7934
7935
7936
7937
7938

000402
012706
104424

SUPDO4:

000740

155442

12637
012637

002622
002624

CALL

GETDIS

PUSH

TBG4$:

177776

14:
2%:

MOV

SUPDRO,RO

000004

$LPERR, (SP)
$LPADR,-(SP)

#TBG4$, $LPADR
$LPADR, $LPERR
#SUPDR6+2,R0

SSP
#SUPSTK,
MOV
CACHOFF
CALL
aSUPDOADD
CACHON

RETURN

MOV
MOV

R2,(RO)+
R3,(RO)+
R4,(RO)+
R5,(RO)+
SP,(RO)+

MoV
-(RO),RS
MOV
-(RO),R4
MoV
-(RO),R3
MOV
-(RO),R2
MOV
-(RO),R1
MOV
-(RO),RO
TESTAREA
BIS
TESTMODE ,PSW
CRF
.0SABL
TST
NOSUPER
BEQ
14
MOV
#USESTK
, USP
BR
2%

POP

(TEST AREA) TO BANK
MOV R3,-(SP)

MOV (SP)+,R3

$LPERR, $LPADR

RO, SUPDRO
#SUPDR1,R0
R1,(RO)+

KERNEL
SCOPE

;MAP SUPERVISOR SPACE

CRF

MoV
MOV
MOV

MOV
MOV
MOV

SEQ 0219

BANK,R3

MAPPER

MOV
MOV
MOV
MOV
MOV
002622
002624

BANK

CALL

.DSABL

000700

004777
104423
104417

000207

MOV

002624
002622
002160
002162

002160

MAP

Page 236

$LPADR, $LPERR

;ENTER SUPERVISOR MODE
;GO TO SYSTEM TEST MODE

: TURN CACHE OFF
; TURN CACHE ON

;ENTER KERNEL MODE
MOV (SP).,$LPADR
MOV (SP).,$LPERR

CVMJAAO MSV1]-J MEMORY DIAG.

MEMORY TEST PATTERN ROUTINES

MACRO v05.01b Friday 15-Feb-85 16:10

.SBTTL

7943
7944
7945
7946
7947
7948
7949

FIRST ADDRESS OF PATTERN (FIRST,LAST.2,ETC)

:
:
;

R3
R4
R5

COPY OF R1 (IF NECESSARY)
COPY OF RO (IF NECESSARY)
COPY OF R2 (IF NECESSARY)

:
:

R1
R2

024644
024646
024650
024632
024634
024656

024660
024662
024664

<<MTPOOO

SUBTST

14:

R2,(RO)+
R1,MTPOOO

24:

000240
077306
000207

34:

104430

MTPOO1:
R

NOP
MOV
CMP
BEQ
PERRO2
NOP
SoB
RETURN
SUBTST

AR R

010220

062702
077104
000240
012400
020005
001401
104427
062705
077307
000207

000002

3%:

024740

024742
024744
024746

508
NOP

R1,3$

cHP

RO,R5

010540
062705
077104
000240
162702
012401
020102
001401
104430
077307
000207

000002
000002

kR kR Rk kR

ADDRESS TEST

R Y

kk ke ko kkkhkkkknhkkhkkr bbbk b bbb

bbb

;V177640

RETURN
SUBTST

(R4).,RO

; V177646
i V177650
;1V177652

: V177656

;V177654

:V177660

#2,R5
R3,1$

: V177662
; V177666

; V177672
COMPLEMENT ADDRESS TEST

<«<MTPOO2

3¢:

MOV

R3,-(RO)

1 V177640

S08
NOP
SuB
MOV
CMP
BEQ

R1,3$

:V177646
:V177650
:V177652
; V177656
:V177660
; V177662

ADD

PERRO2

S08
RETURN

#2,R2
(R4)+,R1
R1,R2
2%
R3,14

COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP)

#2,R5

(WRITE DOWN,

MTPOO2

a$:

;1 V177642

; *SUBTEST

1¢:

1 V177660
: V177662
ADDRESS TEST>>

#2,R2

ADD
S08

e
L

024716
024720
024724
024726
024730
024734
024736

R2,(RO).

PERRO1

MTPOO2:

; V177644
; V177646
: V177650
: V177652

<«<MTPOO1

MOV

2%:

eP
TR T T

BEQ
000002

: V177654
;V177656

R R KRRk

ADD

; V177640
:V177642

R3,2¢

024664
024666
024672
024674
024676
024700
024702
024704
024706
024712
024714
024716

(R4)+ ,R1
R1,R2
34

MTPOO1

BASIC DATA TEST>>
et

; *SUBTEST
MOV
S08

BASIC DATA TEST

MTPOOO

077102
000240
012401
020102
001402

NUMBER OF ADDRESSES IN PATTERN (SIZE)
DATA FOR PATTERN (ONES,52525,ETC)

MTPOOO:

010220

;i *SUBTEST

7977
7978
7979
7980
7981
7982
7983
7984
7985
7986
7987

7963
7966
7967
7968
7969
7970
7971
7972
7973
7974
7975
7976

; PATTERN REGISTER CONVENTIONS

024640
024642

SEQ 0220

MEMORY TEST PATTERN ROUTINES

7950
7951
79%2
7953 024640

7954
7985
7936
7937
7938
7959
7960
7961
7962
7963
7964

Page 238

; V177642

:V177664

;V177666
;V177670

READ UP)>>
T

L LY
T T

CVMJAAO MSv11-J MEMORY DIAG.
COMPLEMENT ADDRESS TEST (WRITE DOWN, READ

MACRO v05.01b Fridc&)lS-Feb-BS

MTP0OO2

7990 024750

MTPAO3:

SUBTST

;R1
;R2
;R3
;R4
;RS

024774

024776
025000
025004
025006

000004

000100

=
=
=
=
=

1¢:

.ENABL
MOV

WARNZ:

S08
COM
8IS
401

MOV

S08

WARN3:

MTPBO3:

025040
025044
025046

025050

1$:

WARN4:

000100

%4 ,R2

;V177654

:V177660

;V177662

(PC)+,R4

LSB

SUBTST

<«<MTPBO3

;V177664

:V177666 WARNING LOCATION IS MODIFIED BEFORE LOADING
:V177670

;V177674

;V177676

3 XOR 9 WORST

ittt

MTPBO3

3 XOR 9 WORST CASE NOISE TEST (READ)
e

LSB
ISMTPCO3
R2,14

:V177640
:V177644

BIS

(PC)+,R4

;V177650

CASE NOISE TEST

.ENABL
JMP
S08

(READ)>>
T

LTI

)

GO TQ V172360

;V177646

#4 ,R2

iV177652 WARNING LOCATION IS MODIFIED BEFORE LOADING
:V177654

iV177662

S08

R5,1¢

8IS

(PC)+,R4

#64. ,RS

S08

R3,1$

.DSABL

LSB

RETURN

(WRITE)>>
T

;V177644
;V177646
:V177650
;V177652 WARNING LOCATION IS MODIFIED BEFORE LOADING

R5,1$

.DSABL

401
MOV

;V177642

R2,1%
R4
(PC)+,R4

R3,1¢

401
MOV

CASE NOISE TEST

:V177640

R4,(R1).

S08

CcoM

WARNS:

3 XOR 9 WORST CASE NOISE TEST (MWRITE)

LSB
R4,(R1).

#64. ,RS

comM

000004

3 XOR 9 WORST

ADDRESS
SMALL LOOP CONSTANT
NUM OF ADD TO TEST (LARGE LOOP)
GOOD DATA
MEDIUM LOOP CONSTANT

000137
077203
005104
052704
000401
012702
077511
005104
052704
000401
012705
077317
000207

401
MOV

8IS

: *SUBTEST

025034
025036

025010
025014
025016
025020
025022
025024
025030
025032

MTPAO3

COoM

RETURN

025010

<«<MTPAO3

; sSUBTEST

010421
010421
077203
2104
052704
000401
012702
077511
005104
052704
000401
012705
077317
000207

Page 240

SEQ 0221

024750
02475
024754
024756
024760
024762
024764
024770
024772

16:10

;V177660

;V177664

:V177666 WARNING LOCATION IS MODIFIED BEFORE LOADING
:V177670

;V177674

iV177676

CVMJUAAO MSVil-J MEMORY DIAG.

MT1PBO3

MACRO V05.01b Friday 15 Feb 85 16:10

3 XOR 9 WORST CASE NOISE TEST (READ)

8031 025050

SEQ 0222

MTPCO3: SUBTST
T

; *SUBTEST
8032
8033
8034
8035
8036
8037
8038
8039

025050

020421

025056

005141

025052
025054

025060
025062

001401
104431

005111
000137

1%:
025066

025066

MTPDO3:

CcMP

<<MTPCO3

BEQ
PERRO3

comM

025066

025070
025072
025074
025076
025100

025102

020421

001401
104431
005127
000000
001363

000137

1¢:

025014

MTPCO3
e

R4,(R1).

SUBTST

<<MTPDO3

CcMP

BEQ
PERRO3
coM
0
BNE

JMP

:V172360

T R

:V172366

;V172370
:V172372

GO TO V172260

TEST DATA SUBSUBPROGRAM>>

MTPDO3

TEST DATA SUBSUBPROGRAM

R4,(R1).

:V172260

(PC)MTPCO3

;1V172362
iV172364

-(R1)

(R1)
asMTPDO3

TEST DATA SUBPROGRAM

COM
JMP

; *SUBTEST

TEST DATA SUBPROGRAM>>

8040
8041
8042
8043
8044
8045
8046

Page 242

arMTPBO3+4

:V172262
; V172264
1 V172266
:V172270
;V172272

iV172274

GO 70 V172360

GO TO V177644

T T TY T

CVMJAAQ MSV1i1-J MEMORY DIAG.

MTPDO3

TEST DATA SUBSUBPROGRAM

8049 025106

MACRO V05.01b Fridey 15-Feb-85 16:10

MTPAO4: SUBTST

<<MTPRO4

:#SUBTEST

MTPAO4

is:

#8. RS
RS, R4

;880

ARRE

I it

8050 025106
8051 025112
8052 025114
8053 025116
8054 025122
8055 025126

012705
010504
000241
000137
016004
103402

8056 025130
8057 025132

020204
001401

8059 025136
8060 025140

077115
000207

8058 025134

000010

MOV
MOV
cLC
JHP
MOV
BCS

CMP
BEQ

24 :

PERRO4

3$:

8062 025142

SOB
RETURN

3323333232332 333

025142
025144
025146
025150
025152

8068 025154
8069 025156

106110
077502
106120
106110
077402

; #SUBTEST

MTPBO4

is:

(RO)
RS,1$
(RO)+
(RO)
R4,2$

106120
000137

ROLB
SOB
ROLB
ROLE
SOB

2s:

ROLB
JMP

025122

8071 025162

012705
010504
000261
000137
016008
103002
020204
001401

8081 025212
8082 025214

077115
000207

8080 025210 104432

000010

MTPOOS

is:

025142
177776

28:
3$:

2 22322

#8. RS
RS, R4

SOB
RETURN

R1,1$

PERRO4

2222 22

MOV
MOV
SEC
JHP
MOV
BCC
CHP
BEQ

ROTATING BIT»>>

3321222 i

ROTATING BIT
k

bk bk

kb hk

iistist it

tte

kbbb h

Nyl y)
ke bk ®

V172372
V172374
st

ROTATION ONES TEST>>

ittt

ROTATION ONES TEST

38MTPBO4
2(RO),R4
24
R2,R4
34

2t ittt

iV172360
V172362
V172364
iV172366
V172370

(RO)+
3EMTPAO4 +14

222 22222t

SUBR

k kb

: #SUBTEST

RIS

8072 025162
8073 025166
8074 025170
8075 025172
8076 025176
8077 025202
8078 025204
8079 025206

SUBR

<<MTPQOS

:V177666

2222222322

MTPOOS: SUBTST
REi

3233333323233 222113323333 712 3317333332227

V177670
V177672

shkdkkkkk kbbb kb kb

8063
8064
8065
8066
8067

GG SO SO SR OSSR SO

V177662
V177664

R1,1$

S 22323 233233

RS SRR CER SRR EE NS S G S0 S SN

SEq 0223

;V177640
V177644
:V177646
:V177650
V177654
:V177660

3EMTPBO4
-2(R0), R4
24
R2,R4
3¢

<<MTPBO4

ROTATING ZEROS TEST>>

ROTATING ZEROS TEST

MTPBO4: SUBTST
RIS

R KSR R ARG R AR SR EERBERR SRR

12 2223233213333

025142
177776

104432

Pege 244

2ttt

ittt

i et

2222323333222
iz

3233322233

is 2232233233330 2]

;V177640
V177644
V177646
iV177650
V177654
;V177660 IF THIS HAPPENS THE GOOD & BAD MATCH
V177662
iV177664

:V177666
V177670
;V177672

CVMJUAAO MSV11-J MEMORY DIAG.

MTPOOS

ROTATION ONES TEST

MACRO V05.01b Fridey

MTPOO6:

SUBTST

012737
005037
013771
013771
017102
023702
001401
104433

000001
002244
002242
002244
000000
002242

017102
023702
001401
104434

000002
002244

005737
100405

002244

006137
006137

002242
002244

gigg 025312

000746

8107 025314
8108 025322
8109 025330
8110 025336
8111 025344
8112 025350

012737
012737
013771
013771
017102
023702

8113 025354
giig 025356

001401
104433

177776
177777
002242
002244
000000
002242

000000
000002

1%:

2%:

3%:

5¢:

017102
023702
001401
104434

000002
002244

8121 025374
8122 025400
8123 025402

005737
100005

002244

025402
025406

006137
006137

002242
002244

8124 025412
8125 025414

000746
000207

6%:

8%:

MTPO06

;

THIS TEST CHECKS THE DI/DO LINES BY

@2(R1),R2

BEQ

;BR_IF 0K

DATBUF +2

;HAS LAST BIT BEEN TESTED

DATBUF
DATBUF

;NO,

CcMP

157

DATBUF +2,R2

B8MI

ROL

DATBUF
+2

CRF
1$

MOV
MOV
MOV
MOV
MoV
CMP
BEQ

#177776,0ATBUF
#-1, DATBUF+2
DATBUF ,a(R1)
DATBUF +2,32(R1)
a(R1),R2
DATBUF ,R2
6%

MoV

@2(R1),R2

BEQ

CcMP

PERR10

74:

MoV

.DSABL
BR

4%:

INITIAL DATA TEST

SHIFTING A 1 THROUGH THE WORD.
#1,DATBUF
;SET THE FIRST TEST BIT
DATBUF +2
:CLEAR 2ND WORD
DATBUF ,3(R1)
:WRITE TEST WORD 1
DATBUF+2,82(R1) ;AND TEST WORD 2
a(R1),R2
DATBUF ,R2
;NOW READ THEM
°%
;:BR IF FIRST 16 0K
;ERROR TRAP

DLEFT
ROL

002242
002244
000000
000002

INITIAL DATA TEST>>

MOV
CLR
MOV
MoV
MoV
CMP
BEQ
PERRO7

PERRO7

025360
025364
025370
025372

8116
8117
8118
giég

002242

PERR10

8102 025274
8103 025300
8104 025302
025302
025306

Fage 246

<«<MTPOO6

; *SUBTEST

8088 025216
8089 025224
8090 025230
8091 025236
8092 025244
8093 025250
8094 025254
8095 025256
8096
8097 025260
8098 025264
8099 025270
gigg 025272

16:10

SEQ 0224

8085 025216

8086
8087

15 Feb 85

TST
BPL
DLEFT
ROL
ROL
.DSABL
BR
RETURN

;NOW READ SECOND WORD
:ERROR TRAP

;MINUS MEANS BIT 31

SHIFT TEST BIT LEFT

;GO WRITE NEW TEST DATA

;NOW GOING TO SHIFT A O IN DATA DIRECTION
;PUT A 0 IN BIT 0
;AND 1'S IN ALL OTHERS
;WRITE THE DATA
;2 WORDS WORTH
;:NOW READ FIRST WORD
:BR IF OK

DATBUF +2,R2

;NOW, READ SECOND WORD

DATBUF +2
8%
DATBUF
DATBUF
DATBUF
+2
CRF
5%

;TESTED BIT 31 YET?
;BR IF YES, WE'RE DONE

:BR IF 0K

;KEEP GOING

CVMUAARO MSV11 J MEMORY DIAG.
INITIAL DATA TEST

MTPO06

MACRO V05.01b Fridey 15 Feb 85

SUBTST

8137
8138 025426
8139 025430
8140 025432
8141 025434
8142 025436
8143
8144 025440
8145 025442
8146 025444
8147 025446
8148 025450
8149 025452
8150 025454
8151
8152 025456
8153 025460
8154 025462
8155 025464
8156 025466
8157
8158 025470
8159 025474
8160 025476
816l 025502
8162 025504
8163 025506
8164 025512
8165 025514

111100
105700
001401
104435

BEQ

PERR11

14:

001001

PERR12

040201
006302
050201
011100
005700
001401
104437

2%:

005111
011100
005700
001001
104440

3$:

022702
001407
022702
001356
006302
012701
000752
00C207

comMB

MOVB
7578

BNE

104436

BIC
ASL

8IS

MOV
TST

BEQ

PERR13

100000

44
:

010000
160000
S¢:

MTPOO7

ADORESS BIT

111233222222 222322222232

MOVB
TST8

105111
111100
105700

Page 248

ADDRESS BIT

<<MTPOO7

: «SUBTEST
8129
8130
8131
8132
8133 025416
8134 025420
8135 025422
8136 025424

16:10

SEQ 0225
MTPOO7:

8128 025416

CoM

MoV

(R1),R0

TEST>>
e

2233223322222

222222222

ittt

;READ AND COMPARE FOR ZEROS
;BR IF OK

(R1)
(R1),RO

:COMPLEMENT THE BYTE

;BR IF OK

R2,.R1

;READ FOR NON ZEROS

;MASK OFF THE ASSERTED BIT

R2
R2,R1

;SHIFT R2 FOR NEXT BIT
;SET THE NEW BIT INTO R1

;READ THE NEW ADDRESS

(R1)
(R1),RO

;COMPL THE WORD

(R1).RO

157
BNE
PERR14

RO
44

CHP
BEQ
cMP
BNE
ASL
MoV
BR
RETURN

g%OOOOO.RZ
#10000,R2
55
#160000,R1

THIS TEST CHECKS TO SEE THAT EACH ADDRESS
BIT IN EACH 16K BANK CAN BE ASSERTED UNIQUELY.
IT CHECKS FOR ADDRESS BITS THAT MAY BE STUCK
HIGH, STUCK LOW OR STUCK TOGETHER.

RO
1$

TEST

;READ FOR ZEROS

;READ IT

AGAIN

; CHECK FOR MSB IN 4K BANK
;NOT LAST BIT, BRANCH

CVMJAAO MSV11-J MEMORY DIAG.

MTPOO7

ADDRESS BIT

TEST

MACRO V05.01b Friday 15 Feb 85 16:10

Page 250

SEQ 0226
MTP010:

8168 025516

i i

SUBTST

BYTE ADDRESSING TEST>>

<<MTPO10

it 3223322 2322222222 d 22t

; *SUBTEST

MTP010

i izt yry]

BYTE ADDRESSING TEST

;ttttt‘tttt‘t‘ttitttt‘tttttt##t‘t‘*ii#tt““t.“‘.“‘“‘t‘ttt‘.t‘t‘ttt"tt“.tt‘

8169
8170
8171 025516
8172 025520
8173 025522
8174 025526
8175 025532
8176 025540
8177 025542
8178 025544

8179 025546
8180 025550
8181 025552
8182 025554
8183
8184 025556
8185 025562
8186 025564

8187
8188 025566
8189 025570
8190 025572
8191 025574
8192 025600
8193 025602
8194
8195 025604
8196 025606
8197 025610
8198 025614
8199 025616
8200 025620
8201 025622
8202

010402
010403
062702
012713
012763
105013
010401
020201
001420
020301
001007
111100

022700
001401
104435
005201
000765
111100
122700
001401
104436
005201
000756

112713

005203
020302
001347
000207

000004
177777
17717717

000002

1¢:
24:

MOV
MOV
ADD
MoV

R4 ,R3
#4,R2
# 1,(R3)

MOV

R4,R1

MoV
CLRB
CMP
BEQ
CMP
BNE
MOVB

PERR11

3$:

177777

-1,2(R3)
(R3)

R2,R1
6%
R3,R1
44
(R1),R0O

:PUT IT IN R3 ALSO
;POINT R2 TO LAST BYTE 1
;WRITE ALL ONES IN
;THE 4 TEST BYTES
;CLEAR A BYTE
;INITIALIZE R1 FOR EACH PASS
;IF EQUAL, JUST READ LAST BYTE
:BR IF EQUAL
;IS THIS THE 8YTE OF ZEROS
;BR IF NOT

;WARNING IF YOU OPTOMIZE CHANGE THE PCBUMP FOR THIS ERROR INCASE OF TRAPS
#0,RO
;IT IS, COMPARE FOR ZEROS

CHP
BEQ

000000

177777

;TEST 3 THTMS TEST CHECKS FOR PROPER
BYTE ADDRESSING WITH ECC DISABLED
;R4 HAS LOMWEST ADDRESS
R4.R2

INC
BR

44:

MOvB
CMPB
BEQ
PERR12

S¢:

INC
BR
Move
INC

6$:

cMP
BNE

RETURN

R1
2%
(R1),RO
#-1,R0
5$

;NEXT BYTE
;RETURN

R1
28
#-1,(R3)
R3

;MOVE TO NEXT BYTE

R3,R2
14

;ITS NOT THE BYTE OF 0'S, READ 1'S

;RESTORE 1'S TO BYTE JUST

;INC TO NEXT BYTE

TESTED

;WAS THAT JUST THE LAST ONE?

;BR IF NO

CVMJARO MSV11-J MEMORY DIAG.

MTPO10

BYTE ADDRESSING TEST

MACRO V05.01b Friday 15-Feb 85 16:10
MTPO14:

8205 025624

SUBTST

<<MTPO14

Page 252

SEQ 0227

BASIC DOUBLE BIT ERROR TEST>>

RS EE SN SRR R SRR R R AR R R R RSk 1R RS E AR R R RS SRR EE SR SRR R

; *SUBTEST

MTP014

8206

;

gg?g

; WILL BE ABOTRED.

8207
8208

R SRR E S S E eSS SRR E RS R RO eSO RN

OGS

BASIC DOUBLE BIT ERROR TEST
T I

NI I

; THIS TEST CHECKS THAT A DOUBLE ERROR WILL BE DETECTED
; A BYTE WRITE WITH A DOUBLE ERROR ON A MSV11-P

8211 025624
8212 025626
025626
8213 025632
025632
8214 025640
025640
8215 025646
8216 025650
025650
8217 025656
8218 025660

025660
8219 025666
025666
8220 025670
8221 025672
025672
025700
8222 025702
8223 025704

104424

CACHOFF
LET PARCNT

005037

002072

012737

000001

002076

012737
104513

060000

002034

012737
104425

003145

002150

012737

103145

002044

005011
005711
023727
001401
104055

002072

000001

8239 025770

025770
025776

8240 026000

104426
042737

020000

002150

023737
001407

002150

002044

012737

177777

002612

013737

002150

002052

104065

002266

104473
005237
005037

002266
002072

112711

000377

023727

002072

105711

001411

:= #FIRST

CLR PARCNT

;SET PARITY ACTION

;SET ADDRESS FOR ERROR REPORT

MOV #1,NOPAR

MOV #FIRST,ADDRESS
;ENABLE CHECK/SYNDROME BIT REGISTER
;DBE CHECK BITS FOR CSR

LOADCSR
LET GOOD

:= #103145

;WRITE DBE CHECK BITS T0 CSR
-GOCD DATA

LET (R1)

:= #0

TST (R1)
IF PARCNT NE #1

ERRQR +SS

READCSR
BIC #BIT13,CSR
IF CSR NE GOOD THEN

SET HEADER
LET BAD := CSR
ERROR +65

ECCLINIT
CLR PASSNO
REPEAT
ECC1INIT
INC PASSNO
CLR PARCNT
LET (R1) :B= #377
TSTE (R1)

000001

; TURN OFF CACHE
;CLEAR PARCNT

CBREG
LET CSR := #3145

END

104473
005037

:= #1

LET ADDRESS

END

055704

8224 025704
8225 025706
8226 025714
025714
025722
8227 025724
025724
8228 025732
025732
8229 025740
8230 025742
025742
8231 025742
8232 025744
8233 025750
025750
8234 025750
2235 025752
8236 025756
8237 025762
025762
8238 025766

LET NOPAR

:= #0

IF PARCNT NE #
SET HEADER

MOV #314S,CSR

MOV
;WRITE ZEROS AND DBL ERROR CHK BITS
CLR
;READ A=0 TO GET DOUBLE BIT ERROR
;:WAS BUSPBL ASSERTED????
CMP
BEQ
;ERROR CALL ;;MISSED EXPECTED TRAP

#103145,G00D
A=0
(R1)
PARCNT,#1
L221

L22Y:::::::

;READ CSR FOR CORRECT CHECK BITS AND DBE INDICATOR
;CLEAR INHIBIT MODE POINTER FROM DATA IF IT EXSISTS!
;CHECK IF DOUBLE ERROR BIT IS SET
CMP CSR,GOOD
BEQ L222
:
MOV
#-1,HEADER
;:BAD DATA
MOV CSR,BAD
;
:
L222:;::i:::
;ENABLE BUSPBL
;CLEAR LOOP COUNTER
;
B31:::::::
;ENABLE BUSPBL
; INCREMENT LOCP COUNTER
;:CLEAR PARITY ACTION COUNTER
;WRITE BYTE SHOULD BE ABORTED
MOVB ¢377,(R1)
;READ R1 TO SEE IF IT IS STILL O
;WAS WRITE ABORTED???

CMP PARCNT,
81

BEQ L223

CVHJARO MSV11-J MEMORY DIAG.

MTPO14

026000

012737

177777

026006

005037

002044

026012
026020
026022
026022
026022
026024
026024

012737
104056

000377

8242 026012

8245

8246

026032
026034
8247 026034

8248
8249
8250
8251
8252

MACRO V0S5.01b Friday 15-Feb-85 16:10

BASIC DOUBLE BIT ERROR TES T

8241 026006

8243
8244

026036
026040
026044
026046

002612

002082

023727
001346

005037

104423

000207

:= #0

;GOOD DATA

LET BAD

:= @377

;:BAC DATA

END

002266

005041

104503

LET GOOD

ERROR +56

005201

002072

000002

Page 252-1

SEQ 0228
MOV

CLR GOOD
MOV

#377,.BAD

L223::;:::::

INC
R1
UNTIL PASSNO EQ #2

;AND REPEAT ON HIGH BYTE
H

CLR
-(R1)
CLR1CSR
CLR
PARCNT
CACHON

;CLEAR LUT
;CLEAR CSR
;sCLEAR PARITY TRAP COUNTER
;:TURN ON CACHE

RETURN

@-1,HEADER

;

CMP PASSNO,
92
BNE 831
E31:::::::

CVMJARO MSV11-J MEMORY DIAG.

MTPO14

MACRO VO0S.01b Friday 15-Feb 85 16:10

BASIC DOUBLE BIT ERROR TEST

8255 026050

MTPO17- SUBTST

<<MTPO17

; $SUBTEST

MTP017

HALtI1 3233222222
B

8256

8268
8269
8270
gg;g

026072
026074
026076
026100

012701
010104
012705
012700
010003
000303
110021
110321
020105
103774

8273
8274
8275
8276
gg;g

026102
026104

014102
020002

026106
026110

001401
104446

8257
8258
8259
8260
8261
8262 026050
8263 026054
8264 026056
8265 026062
8266 026066
8267 026070

8279 026112 020104

8280 026114
8281 026116
8282 026120
8283 026122
8284
8285 026124

8287

101372
000303
000300
001763

000207

060000
160000
000377

SEQ 0229

HOLDING 1'S & 0'S TEST>>

22222 2323222322221 23

322222t 2

HOLDING 1'S & 0'5 TEST

i11 133232323332 2232332222222

;#(1)

Page 254

2222323233333 3

a2ttt

322322211l 3

il
233

ittt
32

il
i

Y
ISR

T
Y]

THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY

i*
.
:#(2)
:#(3)
:NOTE:
MOV
MOV
MOV
MOV
MOV
SWAB

OF HOLDING 1'S AND 0'S BY WRITING A BACKGROUNC
OF 000377 AND READING IT
MEMORY IS WRITTEN USING A BYTE AT A TIME
STEPS 1 & 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN
THIS TEST WRITES BYTES & READS WORDS
#FIRST,R1
R1,R4
#LAST+2,RS
#377,R0
;GET THE PATTERN INTO RO
RO,R3
R3

RO,(R1)+
R3.(R1)s
R1.RS
1%

;WRITE A BYTE
:WRITE THE MEMORY WITH THE BYTE STORED IN BAKPAT.1
; COMPARE TEST LOC TO TOP « 2
;BRANCH IF LOWER

MOV
CHP

-(R1),R2
RO,R2

;TEST THE MEMORY TO SEE IF IT CONTAINS

BEQ
PERR22

CcMP

R1,R4

MOVE
MOVB
CHP
BLO

BHI
SWAB
SWAB
BEQ

RETURN

24
R3
RO
1$

:THE WORD STORED IN BAKPAT

;KEEP ON TESTII, THE MEMORY UNTIL
iRl EQUALS THE LOWEST ADDRESS
:CHANGE THE DA/A PATTERN

;IF THE DATA PATTERN DOES NOT HAVE LOW
: BYTE =0 THEN FALL THRU

CVMUAAQ MSV11-J MEHORY DIAG.
HOLOING 1'S €& 0’5 TEST

MTPO17

I<2

MACRO V05.01b Friday 15-Feb-85 16:10

8289 026126

MTP020: SUBTST

< <MTPQ20

; *SUBTEST

MTPO20

T
T

8290
8291
8292
8293
8294
8295 026126
8296 026130
8297 026132
8298 026136
8299 026140

;
;
;
104424
005000
105037
104513

002264

026164
8305 026170
026170
026172

8306 026172

026172
8307 06176
026176

105237

002264

012704

177777

005037

002324

123727
001003

002264

012705

000001

026176

005237
005204

026204
8312 026210
8313 026214
8314 026220
026220
8315 026224
8316 026226
026226

116402
072227
052702

030276
000005
000004

010237
104425

002150

8317
8318
8319
8320
8321

026204

026230

026232
026234
026236
026244

IFB PASFLG EQ #1

002150

000020

026254

012737

000020

002044

MMNIIT

B32:;::5:4:

;sINCREMENT LOOP COUNTER

INCB PASFLG
;INDEX TO SINGLE BIT ERROR TABLE
MOV #-1,R4
;CLEAR INNER LOOP COUNTER
CLR BITNO

;SELECT DATA TO BE CORRECTED BY PASSNO
CMPB PASFLG,
#1
BNE L225
;DATA-_ ;BIT TO BE CORRECTED IS A ONE
MOV #1,RS
;
BR L226
L225:::;:::3:

;DATA=177776;8IT TO BE CORRECTED IS A ZERO

REPEAT

;

CLRI1CSkK

002150

;

LOADCSR
LET (R1) := RO

177757

END

ASH #5,R2
8IS #BIT2,R2
LET CSR := Re2

023727
001407

8323 026262

:= #0

LET R2 :B= PTABLE(R4G)

026244
026252

8322 026254

:= #-1

INC BITNO
LET R4 := R4 + #1

104503

; TURN OFF CACHE
;CLEAR DATA
;CLEAR PASFLG
;ENABLE CHECK/SYNDROME BIT REGISTER
:

LET RS := #177776

010011

005711
104426
042737

ELSE

002324

026202

8311

LET RS := #1

177776

THIS TEST CHECKS TO SEE IF THE SINGLE BIT ERRORS CAUSE THE SBE
BIT IN THE CSR TO BE SET AND CORRECT SYNDROME BITS ARE GENERATED FOR
ALL 16 DATA BITS.

LET BITNO

8308 026176

8309 026176
8310 026202

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST

LET R4

000001

SEQ 0230

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST»>>

LET PASFLG :B- PASFLG + #

000402
012705

CACHOFF
CLR
RO
CLRB PASFLG
CBREG
REPEAT

026140

8300 026140
026140
8301 026144
026144
8302 026150
026150
8303 026154
026154
026162
8304 026164

Page 256

TST (R1)
READCSR
BIC #tC20,CSR
JF CSR NE #20
LET GOOD
LET BAD

:= #20
:= CSR

MOV #177776,RS

L226:;:;::::

833::;::::
; INCREMENT BIT POINTER
;POINT TQ NEXT SET OF CHECK BITS
INC R4

;GET NEXT SET OF CHECK BITS

MOVB PTABLE(R4),R2
;SHIFT TO LINE UP IN CSR
;ENABLE DIAG MODE
;GET CHECK BITS 10 BE WRITTEN
MOV R2,.CSR
;LOAD CSR WITH DATA
;WRITE DATA TO TEST ADDRESS
MOV RO,(R1)
;CLEAR CSR
;CORRECT SBE
;READ CSR FOR CORRECT SBE BIT AND SYNDROMES
;CLEAR ALL BUT SBE INDICATOR
;WAS DATA CORRECTED???
:
;

CMP CSR, 420
BEQ L227
MOV #20,G00D

013737
104060

8326
8327
8328
8329

104514
104426
042737

174033

116403
072327
052703

026422
000005
000004

026320

020337

002150

8333 (26326
026326
8334 026334

012737

177777

010337

002044

013737
104042

00215C

026272

026272
026274
026276
026304
026304
8330 026310
8331 026314
8332 026320
026324

026334
8335 026340
026340
8336 C26346
8337 026350

026350
8338 026350
8339 026352
026352
026360
8340 026362

8341 026364
026364
026366

8342 026366
8343 026370
8343 026372

001411

002150

002052
END

002150

123721
001002
006305

026372
026400

026402
8346 026402

005100

026404

123727

8347 026404

026412
026414

8348 026414
8349 026416
8350 026420
8351

001252

END
002324

016

02644}

064

026425
026430
026433
026436

835s

025
032
045
0S2

:- R3

;

LET BAD

:= CSR

;

ERROR +42

SEC
ROL

002264

UNTILB PASFLG EQ #2

000002

MOVB SBESYN(R4),R3

RS, CSR
M
.
BEQ L230
MOV

MOV CSR,BAD

;
;

L230:;:::3:
;CLEAR LUT
;SHIFT NEW DATA DEPENDING ON PASFLG
CMPB PASFLG,
@1
BNE L231
;SHIFT BITNO TO THE LEFT

BR L232
L231:55:035

;SET CARRY BIT AND......
:ROTATE LEFT
:
L3

;UNTIL ALL BITS ARE DONE

CMP BITNO,®fl16.
BNE 833

; COMPLEMENT DATA AND REPEAT

;UNTIL 2 PASSES ARE COMPLETE!

SSEBBQSSFLG,OZ

E32:::::::

013

026
034
046
054

023

031
043
051
061

CLR1CSR
CACHON
RETURN

;CLEAR CSR
;:TURN CACHE

;

MSV11-P SINGLE BIT ERROR SYNDROME BIT TABLE

SBESYN:

.BYTE

6-1,HEADER

MOV R3,G00D

£33
COM RO

104503
104423
000207

8354 026422

LET GOOD

UNTIL BITNO EQ #16.

000020

8352

8353

ASL

000261
006105

023727
001276

SET HEADER

ELSE

026372

8345 026372

;:SHIFT INTO POSITION
;SET DIAG MODE IN DATA
;00 SYNDROME BITS AGREE %

CLR (R1)
IFB PASFLG EQ #1

000402

L227

ASH #5,R3
BIS #8IT2,R3
IF R3 NE CSR

002052

000001

MOV CSR,.BAD

;ENABLE SYNDROME BIT RE
;:GET SYNDROMES FROM CSR
;MASK SYNDROME BITS
:GET GOOD SYNDROMES

END

002264

;NO ERROR
H

SYNREG
READCSR
BIC #1C3744,CSR
LET R3 :B= SBESYN(R4)

002612

005011

ERROR +60

SEQ 0231

N
m
Pe

026262
8324 026270
8325 026272

Page 256 1

MACRO vV05.0lb Friday 1S Feb-85 16:10

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST

CVMJAAO MSV11-J MEMORY DIAG.

MTP020

16.13.23,25,26,31,32.34,43,45,46,51,52,54,61,64

CVMJAAO MSV11-U MEMORY DIAG.

MTPO20

MACRO v0S5.01b Fridey 15 Feb-85 16:10

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST

8357 026442

MTPA21: SUBTST

<«<MTPA21

;SUBTEST

MTPA21

8358
8359 026442
8360 026444
8361 026446

Page 257

MARCHING 1'S & 0'S PATTERN TEST>>

gggg 026450

8364
8365
8366
8367

026452
026454
026456
026460
gggg 026462

000311
011100
020300
001401

2%:

8370 026464

020401

3$:

€374
8375
8376
8377

026472
026472
026474
026476

011100
020300
001401

MTPB21: ;READ,BYTESWAP-MODIFY,READ,UP
1¢:
MOV
(R1),R0 ;V177640
CHP
R3,RO
;V177642
BEQ
2%
;V177644

8380 026502
8381 026504
8382 026506

000311
011100
020200

g;gg 026512

104443

gg;g 026500

8383 026510

8386
8387
8388
Gggg
8

026514
026520
026522
026524

8391 026526
8392 026526
8393 026530
8394 026532
gggg 026534

104444

2%:

000311
011100

g:gé 026546

020300
001401
104444

8403
8404
8405
8406

026550
026554
026556
026560

062701
020501
001363
000207

R4,R1

SWAB
MOV
cMP

PERR17
000002

ADD
cMP
BNE
RETURN

;V177650
;V177652
;V177654
; V177656
;V177660

;V177662

;V177664
;V177666

;DONE?

;NO - LOOP
;YES - RETURN

:V177646

(R1)
:V177650
(R1),RO ;V177652
R2,RO0
;V177654

#2,R1
R5,R1
14

:V177656

;1 V177660

V177662
;V177666
:V177670
;V177672

;DONE?
;NO - LOOP
:YES - RETURN

MTPC21: ;READ,BYTESWAP-MODIFY,READ,UP
(R1),R0 ;V177640
MOV
1$:
cMP
R2,RO
;V1i77642
;V177644
2
BEQ
PERR17
: V177646

011100

026536
026540
026342
026544

CcMP

BNE
RETURN

BEQ

020200
001401
104443

8397
8398
8399
8400

(R1)
(R1),R0
R3,RO
34

PERR20

001401
062701
020501
001363
000207

SWAB
MOV
cHp
BEQ

PERR20

001365
000207

;READ ,BYTESWAP -MODIFY,READ, DOWN
MoV
-(R1),R0;V177640
cHP
R2,R0
;V177642
BEQ
2%
;V177644
PERR17
:V177646

1%:

8371 026466
gg;g 026470

MARCHING 1'S &€ 0'S PATTERN TEST

014100
020200
001401
104443

104444

SEQ 0232

24:

SWAB
MoV

(R1)
(R1),RO
R3,RO0
3%

:V177650
;V177652

ADD
cMp
BNE
RETURN

#2,R1
RS,R1
1

;V177662
;V177666
;V177670
;V177672

CMP
BEQ
PERR20
000002

3¢:

;V177654
;V177656
;V177660

;DONE?
:NO - LOOP
;YES - RETURN

T O

T T

L
T

Ly
T I L)

CVMUAAO MSV11-U MEMORY DIAG.

HTPA21

MACRO V05.01b Friday 15-Feb-85 16:10

MARCHING 1'S € 0'S PATTERN TEST

Peage 259

8409
8410
8411
8412
g:iz

026562
026562
026°64
026566
026570

014100
020300
001401

8415
8416
8417
8418
3253

026572
026774
026576
026600
026602

000311
011100
020200
001401
104443

24:

SWAB
HOV
cHP
BEQ
PERR17

(R1)
(R1),RO
R2,R0
38

;V177650
;V177652
V177654
V177656
:V177660

8421 026604
8422 026606
8423 026610

020401
001365
000207

cHP
BNE
RETURN

R4,R1
1$

;V177662
V177664
V177666

8424

104444

SEQ 0233

MTPD21: ;READ,BYTESWAP-MODIFY,READ,DOWN
1$:
MOV
-(R1),R0; V177640
cHP
R3,R0°
V177642
3EQ
28
V177644
PERR20
V177646

;DONE?
:NO - LOOP
:YES - RETURN

MACRO V05.01b Fridey 15-Feb-85 16:10
CVMJAAQ MSV11-J MEMORY DIAG.
MTPA21
MARCHING 1°'S € 0'S PATTERN TEST
8427 026612

MTP022: SUBTST

8430
8431
8432
8433 026612

000010

KOIAG=8.

026612
026620

012737

000001

002364

026620
026626
8435 026630
026630
8436 026634
026634
8437 026640
026640
026642
8438 026642
026642
8439 026646
026646
8440 026652
026652
8441 026652
026652
026656

023727
001005

002364

000001

013702

002336

013703

002614

8434 026620

MTPO22

002614

013703

002336

005037

104423

026660

013737

002366

026666

012701

060000

026672
026672
026676

020127
101032

157776

005737
002003
012737

002370

8445 026660
8446 026666

8447 026672

8448 026700

026700
026704
026706
026714
8449 026714
026714
026720
026722
026726
8450 026726

032701
001002
005337

026726
026732

005737
001404

026734

010211

8451 026734

000374

I N T O

TN I

T N

T
I

WE WRITE A DIAGONAL PATTERN IN MEMORY (MITH CACHE ON).
IF A REFRESH TEST WE DISTURB ALL ROMWS FOR > 2 MS (MITH CACHE ON).
WE READ & CHECK FOR CORRECTNESS THE DIAGONAL PATTERN
(WITH CACHE OFF).

;HOW OFTEN A DIAGONAL STRIPE OCCURS (MUST BE A POMER OF 2)
FOR EVEN := €1 T0 &2
:FOR DATA & COMPLEMENT DATA

MOV &1 ,EVEN
B34:;::;::

IF EVEN EQ ¢}

LET R2

CMP EVEN,
@)
BNE L235
MOV ZEROS,R2
MOV ONES,R3
BR L236
L235:::::::

:= ONES

MOV ONES,.R2

LET R3 := ZEROS

MOV ZERQS,.R3

END ;0F IF EVEN

L236:;5;5::::

FOR STRIPES := #0 TO #KDIAG 1

;FOR THE NUMBER OF STRIPES
CLR STRIPES
B3S:::::::

;WRITE LOOP

002370

CACHON
LET COUNT := STRIPES

;sTURN CACHE ON

MOV STRIPES.COUNT

LET Rl := OFIRST

MOV OFIRST,R1

WHILE R1 LOS #LAST

IF COUNT LT #0 THEN LET COUNT := #KDIAG-1
002370
IF #374 OFF.IN R1 THEN LET COUNT

002370

ELSE

_—

000007

REFRESH & SHIFTING DIAGONAL TEST

LET R3 := ONES

002366

8442
8443
8444 026656

:(1)
;(2)
:(3)
H

LET R2 := ZEROS

000404
013702

REFRESH & SHIFTING DIAGONAL TEST>>

T T I N

0428
8429

SEQ 0234

<«<MTPQ22

; sSUBTEST

Page 261

IF COUNT NE #0
LET (R1)

:- R2

B36:;::::::
CMP R1,0LAST
BHI L237

TST
BGE
MOV
L280:;:::::
:= COUNT - #1
BIT
BNE
DEC
L281::;:::::

COUNT
L240
oKDIAG-1,COUNT

#374,R1
L243
COUNT

TST COUNT
BEQ L242
MOV R2,(R1)

MACRO V05.01b Friday

CVMJAAQ MSV11-J MEMORY DIAG.
REFRESH & SHIFTING DIAGONAL TEST

15-Feb 85 16:10

Page 261

MTPO22

8452 026736
026736
8453 026742
026742
026744
44
4
0267
845
026744

8455 026746
026746
8456 026752
026752
8457 026752
026752
8458 026756
026756
8459 026762
026762
026764
026764
8460
8461
8462 026764
026764
026770
026772
026776
8463
8464 026776
026776
8465 027004
027004
8466 027010

010261

SEQ 0235
LET 2(R1)

000002

LET 2(R1)

000002

002370

062701

000004

END

LET Rl

000743

MOV R3,(R1)

:= R3

MOV R3,2(R1)

;OF IF COUNT

LET COUNT

END

BR L243
L242::::::;

:= R3

LET (R1)

010311

005337

MOV R2,2(R1)

ELSE

000403

010361

:= R2

:= COUNT

:= Rl

L243:;:;:::

OEC COUNT

ADD #4,R}1

;OF WHILE

BR B36
L237:;::::::
€E36:::::::

;END OF WRITE LOOP
005737
001002
004737

IF DIAGFLAG IS FALSE THEN $CALL REFRESH

002004
027166

013737

002366

012701
104424

060000

002370

L244:;;;;:;

;READ LOOP
LET COUNT := STRIPES

LET Rl
CACHOFF

TST DIAGFLAG
8NE L244
JSR PC,REFRESH

MOV STRIPES,COUNT

:= #FIRST
; TURN CACHE OFF

MOV #FIRST,.R1

MACRO V05.01b Friday 15-Feb-85 16:10
CVMJUARO MSV11-J MEMORY DIAG.
MIP0O22
REFRESH & SHIFTING DIAGONAL TEST

8468 027012
027012

027012
027016
8469 027020
027020
027224
027026
027034
8470 027034
027034
027040
027042
027046
8471 027046
027046
027052
8472 027054
027054
8473 027056
027056
027060
8474 027062
8475 027064
027064
8476 027064
027064
8477 027070
027070
027072
8478 027074
8479 027076
027076
8480 027076
027076
027100
8481 027100
027100
8482 027102
027102
027104
027106
027110
027110
8485 027110
027110
8486 027114
027114
027116
8487 027120
8488 027122
027122
8489 027122
027122
8490 027122
027122
849) 027126

8484

Page 262

SEQ 0236

WHILE R1 LOS #LAST

020127
101046

157776

005737
002003
012737

002370

032701
001002
005337

005737
001412

000007
000374

002370

IF #374 OFF.IN R1 THEN LET COUNT

IF COUNT NE #

020200
001401

103443

LET RO

:= COUNT

BIT @374 ,R1
BNE L247
DEC COUNT

MOV (R1),RO

CMP R2,RO
BEQ L251

:= 2(R1)

MOV 2(R1),RO

IF R2 NE RO

CMP R2,RO
BEQ L252

PERR17

END

;OF IF R2

ELSE

000411

LET RO := (R1)

011100

MOV (R1),RO

IF R3 NE RO

020300
001401
104444

CMP R3,R0
BEQ L254

PERR20
END ;OF IF R3

000002

020300

001401

LET RO := 2(R1)

MOV 2(R1),R0O

IF R3 NE RO

CMP R3,RO
BEQ L255

ENSETSEOIF R3

104444

END
005337

:= (R1)

PERR17
END :OF IF R2
000002

TST COUNT

TST COUNT
BEQ L250

IF R2 NE RO

104443

016100

002370

LET RO

020200
001401

:= #KDIAG-1

BGE L246
MOV OKDIAG-1,COUNT

002370

011100

016100

IF COUNT LT #0 THEN LET COUNT

B37:5:5::5::
CMP R, ALAST
BHI LZ24S

002370

;O0F IF COUNT

LET COUNT
LET R1

:= COUNT

:= R1

- #1

DEC COUNT

MACRO V0S5.01b Fr.day
REFRESH & SHIFTING DIAGONAL TEST

15-Feb-85

CVMJUARO MSV11-J MEMORY DIAG.

MTPO22

027126
8492 027132
027132
027134
027134
8493
8494
8495 027134
027134
027140
027146
027150

8496 027150
027150
027154

027162
027164
8497 027164
8498
8499 027166

062701

300004

Pege 262-1

ADD o4,R1

;0F WHILE

E37:;;;;:;

;:END OF READ LOOP
005237
023727
003643

002366
002366

005237
023727
003616

002364
002364

END

;OF FOR STRIPES

INC STRIPES
CMP STRIPES, #KDIAG-1
6LE B35

000007
END

;OF FOR EVEN

INC EVEN
CMP EVEN, 82
BLE B34

000002
RETURN

000207

; *SUBTEST

REFRESH DELAY>>

<<SUBR

REFRESH: SUBTST
sk kkkkkkkkkkkkk

SUBR

it 2222322322222

8500
8501 027166
027166
027172
8502 027172
8503 027176
027176
027202
027206
027210
8504 027210
027210
8505 027214
027214
027214
027220
8506 027222
8507 027226
027226
8508 027232
027232
027234
027234
8509 027234
8510 027236
8511 027242
8512 027246
8513 027231
8514 02725¢2
8515 027254
8316 027256
8517 027260
8518 027264

16:10

SEQ 0237
END

000727

kR kR

ko k kR kkkh

kb kb k kb hkk bk

k ks

kbbb bbb oot

REFRESH DELAY
222223

3323222

223232223323

23283

11t

2331

2233323233322 333

;DISTURB EACH ROW FOR > 3.2 MS

012700

060000

004737

027236

062700

000004
060374

020027

003771

012700

120000

020027
101005
004737

020372
027236

062700

000004

FOR RO

000640
000002

000002

#FIRST

TO #FIRST+374 BY #4

MOV &FIRST,RO

B40:;:;:;::;

CALL REFSUB
END ;0F FOR RO

ADD %4 ,RO

CMP RO,#FIRST+374
BLE B40

LET RO

E40:::::5::

:= #FIRST+BIT14

WHILE RO LOS #LAST+BIT14.374

B4l:;;:::;
CMP RO, #LAST.BIT14.374
BHI L256

CALL REFSUB
LET RO := RO +» #4
END

000770

000207
012704
062700
005140
005120
005110
005110
077405
162700
000207

REFSUB:

1¢:

RETURN
MoV
ADD

CoM
COM
coM
COM

S08
SuB

ADD #4,.R0

;OF WHILE

RETURN

#640,R4
#2,R0

-(RO)
(RO)+
(RO)
(RO)
R4,1¢
#2,R0

BR B4l
L256:::::::
E41:;:;::::
;:TIME FOR A

3.2 MS LOOP

CVMJAAQ MSV11-J MEMORY DIAG.
REFRESH DELAY
SUBR

MACRO V0S.01b Friday 15-Feb-85 16:10

SEd 0238
MTPA24:

8521 027266

Page 264

SUBTST

<<MTPA24

FAST GALLOPING PATTERN TEST>>

;*SUBTEST

MTPA24

8559 027314
8360
8561 027316
8562 027322

; THE TOTAL TEST (INCLUDING SETUP) IS AS FOLLOWS
THIS TEST WRITES THE MEMORY WITH A BACK GROUND PATTERN
t(l)

8522
8523
8524
8525
8526
8527
8528
8529
8530
8531
8532
8533
8534
8535
8536
8537
8538
8539
8540
8541
8542
8543
8544
8545

8546
8547 027266
83548 027270
8549 027272
8550 027274
8551
8552 027276
8553 027300
8554 027302
8555 027304
8556
8557 027306
8558 027312

FAST GALLOPING PATTERN TEST

STORED AT LOCATION BAKPAT
TEST BEGINS AT LOWEST LOCATION BEING TESTED

t(2)

(LETS NAME IT

;¥

;%(3)

'A’')

LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS
SWAPS BYTES FOR LOCATION ‘A'.

;t(4)

:#(S)

READS

;t(6)
;t(7)

‘B’

‘A',

READS

’'B!’

'8'+400 _ (ADDS 64 DOUBLE WORDS TO 'B’')

REPEATS STEPS 5 AND 6 UNTIL 'B' IS GREATER THAN THE
END OF THE BANK
A.2
REPEATS
STEPS 3-8 UNTILL 'A’' REACHES THE END OF THE BANK
AFTER EXECUTING THE TEST
DATA IS COMPLEMENTED
AND STEPS 1-9 ARE REPEATED

t(lO)

REGISTERS ARE USED AS FOLLOWS

;RO
:Rl
;:R2
:R3
;R4
:RS

011100
020004
001401
104447

011200
020003
001401
104450

2%:

MOV

CcMP

PERR24

000400

062701
000137

000002
027326

IAI
'8’

BAKPAT
SWAPAT
LAST

;sUIPAR’S

MoV
CMP
BEQ
PERR23

8EQ

062702
020205
101764

TEST DATA

ADD

CMP
BLOS
ADD

JMP

(R1),RO
RO,R4
2%

; V177640
;V177642
; V177644

;READ 'A’
; CHECK ' A’
:BR IF OK

(R2),RO

;V177650

;READ

;V177654

;BR IF OK

#400,R2

:V177660

;8UMP

‘B!’

#2,R1

;V177670

;BUMP

'A’

RO,R3
34

R2,R5
1$

IMTPB24

;V177646

;1 V177652
; V177656

:V177664
;V177666
;V177674

;REPORT ERROR

'B’

; CHECK 'B’

:REPORT ERROR

;AT END YET?
;BR IF NO
:GOTO V177260

'B'.

MACRO V05.01b Friday 15-Feb 85 16:10
CVMUAAQO MSV11-J MEMORY DIAG.
MTPA24
FAST GALLOPING PATTERN TEST

8565 027326

MTPB24: SUBTST

<<MTPB24

SEC 0239

FAST GALLOP PART B>>

; sSUBTEST

Page 266

MTPB24

FAST GALLOP PART B

;tttttttt;s;;;t;ttttttttttttttttttttttttttttttttttttttttttttttttt‘ttttt‘ttt‘o:to

8566
8567
8568
8569
8570
8571
8572
8573

027326

027330

027332
027334
027336

010411

MOV

R4,(R1)

V172260

;WRITE A’

001001
000207
000137

1¢

1%:

BNE
RETURN
JMP

; V172264
:V172266
V172270

;BR IF NO
;YES
RETURN
;GOTO V172360

MTPC24:

SUBTST

020105

CcMP

027342

;V172262

a#MTPC24
<<MTPC24

; *SUBTEST
8574
8575
8576
8577
8578
8579
8580
8581

R1,R5

MTPC24

;DONE?

FAST GALLOP PART C»>>
T

FAST GALLOP PART C

)

g
T
T
T T
LY

027342
027344
027346
027350
027352
027354

010102
011100
020004
001401
104447
000137

;KDPAR'S

027306

1¢:

MoV
MOV
cMP
BEQ
PERR23
JMP

R1,R2
(R1),RO
RO,R4
14
atMTPA24+20

V172360
;V172362
1 V172364
:V172366
1 V172370
;V172372

;RESET ‘B' <«;:READ 'A’
;CHECK 'A!
:BR IF OK
;REPORT ERROR
;GOTO V177660

'A’

CVMJUAROD MSV11-J MEMORY DIAG.
FAST GALLOP PART (

MTPC24

3584 027360

MACRO V0S.01b Friday

15 Feb 85 16:10

SEQ 0240
MTPA26:
BRI I I

SUBTST

<<MTPA26

I3 3433282223

22232222

; sSUBTEST

MTPA26

;66 Sd SR SRR SR AR RS R

8585 027360
8586 027364
8587 027366
8588 027370
8389 027372
8590
8591 027374

000137
010221
010321
077005
000207

027430

MOV

S08

RETURN
MTPB26:
Al

SUBTST

000137
020221
001401
104451
005127
000000
020321
001401

027430

05167
077015
000207

177764

104451

RERR

kAR

.DSABL
.ENABL
JMP
CMP
BEQ
PERR2S
COoM

14:

2%:

RANODD:

MTPC26:
R

027430
027434
027436
027440
027442
027446

073427
060305
005504
060204
062705
000240

000007

001057

MTPD26:

027450

BRI IL

005504
062704
010503
010402
000137

047401

027364

RANDOM DATA

R R

RS SRR ER

R AR

R R AR SRR RN SRS

R SRS S S

AMA

LSB
arMTPC26
R2,(R1)+
2%

;V177640
;V177644

(PC).

; V177652

GOTO V172360

;V177646

; V177650

:V177654

R3,(R1)+
34

FOR ERROR REPORTING

:V177656
:V177660

;V177662
:V177664
:V177670

;V177672

LSB
AMA

SUBPROGRAM>>
i

is st

RANDOM NUMBER SUBPROGRAM
e

MUST SETUP
SEEDLO,R3
MOV
SEEDHI ,R2
MOV
R3.RS
MOV
R2,R4
MOV

; V172360
;V172364
; V172366
;V172370
;V172372
:V172376

<<RANDOM NUMBER SUBSUBPROGRAM>>
i

i3t

SUBTST

JMP

22T

(READ)>>

#7,R4
R3,RS
R4
R2,R4
#1057,RS

2232222232223 3322222222322 3322222133323 3312 3]1]

ASHC
ADD
ADC
ADD
ADD
NOP

ADC
ADD
MOV
MOV

RANDOM DATA (READ)

kR Rk kR R KRR

L2222 2232222232t Rt

S22

027450
027452
027456
027460
027462

<<MTPB26

3832222 2222222222222t

; *SUBTEST
8623
8624
8625
8626
8627

: V177650
; V177652

<<RANDOM NUMBER

;CALLER
H
;
;
H

it it

GOTO V172360

RO,1$

SUBTST

8613
8614
8613
8616
8617
8618
8619
8620
8621
8622

; V177640
;V177644
; V177646

RANODD
RO, 14

XTI

AT SRR A SRR KRS R R R KL KRR E R AR SR A RS E SRS SRS S SRS SR NSO O GO S

CMP
BEQ
PERR2S
COM
S08
RETURN
.DSABL
.ENABL

; *SUBTEST
8610
8611
8612

AR R

MTPB26
R

(WRITE)>.

RANDOM DATA (WRITE)

2231322222332 222 ¢2 233223

; *SUBTEST
(R

RANDOM DATA

222 2122 32223222222t

IMTPC26
R2,(R1)+
R3,(R1).

JMP
MOV

1¢:

8592
8593
8594 027374
8595 027400
8396 027402
83597 027404
8598 027406
8599 027410
8600 027412
8601 027414
8602 027416
8603 027420
8604 027424
8605 027426
8606
8607
8608
8609 027430

Page 268

8222233332331 333238233

I T I

GOTO V172260

22203 2232222222222 0232122222222t

RANDOM NUMBER SUBSUBPROGRAM
3323

PR32

332322

R4
#47401,R4

2222322223313 2233231212222 032322222222 % 22

;V172260
1 V172262

RS5,R3

; V172266

MTPA26+4

:V172272

R4 ,R2

V172270

GOTO V177644

CVMJUAAO MSV11-J MEMORY DIAG.

RANODOM NUMBER SUBSUBPROGRAM

MACRO v05.01b Fridasy 15-Feb-85 16:10

SEQ 024)
MTPO30:

8630 027466

SUBTST

027466
027470
027472
027474

1s¢:

011002
010220
077103
000207

MOV
MOV

S08

RETURN

MTPO31:

027476

SUBTST

MTO0030

8653 027544

8654
8655 027546
8656 027550
8657 027552
8658
8659

104454
010167
005167
010200
010503
005725
010504
020537
001001
000207

014344
001376
000752
000056

177772
177766

177756
177752

13:

2%:

0¢2522

.DSABL
0
s0B
comM
CMP
BEQ
PERR3O
MOV
COM
MOV

sttt

:V177640

R1,1¢

;V177644

<<MTPO3i

SOB-A-LONG TEST>>

:V177642

;V177646

MTPO31

sttt

it idisti

ittt sttt i

sy]

SOB-A-LONG TEST

AMA

RO,1$

R1,1$

R2,RO
; UPDATE MOVE REGISTERS
MOV
R5,R3
157
(R5).
MOV
R5,R4
RS, 3#LINK]
CMP
34
BNE
RETURN

MOV
-(R3),-(R3)
3¢
BNE
BR
14
SOBLENGTH=. -MTP0O31
AMA
.ENABL
3%:

(RO),R2

R2,(RO)«

000000
077001
005167
020167
001403

3ttt

FLUSH OUT DBE'S

A3 1221222 238222132 22322228

; #SUBTEST
8637
8638 027476
8639 027500
8640 027502
8641 027506
8642 027512
8643 027514
8644 027516
8645 027522
8646 027526
8647
8648 027530
8649 027532
8650 027534
86351 027536
8652 027542

FLUSH OUT DBE’'S->

<<MT0030

i1 i1 3322222222322 23222222 222222 d

; *SUBTEST

8631
8632
8633
8634
86335
8636

Page 270

:MOVE TERMINATOR

;S0B TILL RO UNDERFLOWS
;WRITE COMPLEMENT OF S0B
;READ & CHECK FOR NOT "S0B RO,DOT"

;0K

- SKIP

;CORRECT SOB INSTRUCTION
;REINITIALIZE SOB CONSTANT

;:BUMP (SAFELY) BY 2

;DONE?
:NO - SKIP

; YES

II T

CVMJUARO MSV11-J MEMORY DIAG.

MTPO31

S0B A-LONG TEST

MACRO VOS5.01b Friday

SUBTST

; sSUBTEST

;8888 S

8693 027554
8694 027556
8695 027560
8696 027562
8697 027564
8698 027566
8699 027572
8700 027574
8701 027576
8702 027600
8703 027602
8704 027604

WRITE RECOVERY TEST>>

<<MTPO32

8688
8689
8690
8691
8692

Page 272

SEQ 0242
MTPO32:

8687 027554

15-Feb 85 16:10

MTP0O32

T L

WRITE RECOVERY TEST

NSRS RRE SNSRI SRR EEAR SRR A

RERREE SRR EEREE SRR E RS S

S E SRS

S EC

R OSRGOSO OGS

;THE TEST ACTUALLY EXECUTED ALREADY IN THE MEMORY UNDER TEST.

; THIS CODE INSURES THAT 1T CHANGED MEMORY TO HAVE
WHICH IS A “COM -(R1)* INSTRUCTION AND
:1/2 BANK OF #5141

;172 BANK OF #110
012401
020102
001401

104430
077305
013703
012400
020005
001401
104427
077305
000207

1¢:

002522

2%:
3

MOV
CHP
BEQ
PERRO2
S08
MOV
MOV
CHP
BEQ
PERRO1
S08
RETURN

(R4)+,R1
R1,R2

R3,14

atLINK1,R3

(R4)+,RO
RO,RS
44
R3,3$

WHICH IS A

:V177640

; V177642

; V177644

:V177646

:V177650
:V177652
; V177656
: V177660
: V177662

: V177664

; V177666

[ J"P

(RO)"

INSTRUCTION.

;GET DATA FROM LOWER 1/2 BANK
;IS IT 851417
;YES

SKIP

:NO - TAKE ERROR TRAP
;LOOP FOR 1/2 BANK
;:RESTORE LOOP SIZE

;GET DATA FROM UPPER 1/2 BANK
;IS IT #1107
;YES - SKIP

:NO- TAKE ERROR TRAP
;LOOP FOR 1/2 BANK

CVMJAAO MSV11-J MEMORY DIAG.

MTPO32

WRITE RECOVERY TEST

8707 027606

I<'3

MACRO V05.01b Fridey 15-Feb 85 16:10

SEQ 0243
MTPO33:
i

SUBTST

221313223

; sSUBTEST

8723 027634
8724 027636
8725 027640
8726 027642
8727

8728
8729
8730 027644
8731 027646

8732 027652
8733 027654
8734
8735
8736 027656
8737 027660
8738 027662
8739
8740
874} 027664
8742 027670
8743 027672
8744
8745
8746 027674
8747 027676
8748 027700
8749 027702
8750
8751

<.)DSI\BL

000000
000000
000261
105511
100402
105212
000773

BGTEST. O
BRGOBB: SEC

ADCB

BMI
INCB
BR

224222222 2122112133333

MTPO33

(R1)

14
(R2)
BRGOBB

24:

34:

CLv
INCB
BCS
BvC
BMI
PERR3S

44:

MOV

PC,R1

MOV
INC

R1,R2
R2

020537
001001
000207
014344
001376
005011
000743
000076

;:SET CARRY (T0 BE ADDED TO "BGTEST")
; INCREMENT LOW BYTE OF

“"BGTEST"

;BRANCH WHEN BIT7 IS SET
; INCREMENT HIGH BYTE OF

;LOOP 128 TIMES

"BGTEST"

(R2)
34
34
4%

;COND CODES NOT EQUAL TO 1010
;CLEAR V-BIT
; INCREMENT HIGH BYTE OF “BGTEST" ONCE MORE
;BR IF C-BIT SET (SHOULD NOT BE)
;BR IF V-BIT CLEAR (SHOULD NOT BE)
;BR IF N-BIT SET (SHOULD BE)
;NO - REPORT ERROR AND ABORT TEST
:COND CODES NOT EQUAL TO 1010

;UPDATE TEST POINTERS

suB

002522

#5$-BGTEST,R1

MOV
TST
MOV

RS,R3
(RS)»
RS,R4

;DONE?
CMP

RS, IMLINK1

BNE

RETURN

64:

;BUMP (SAFELY) BY 2

;DONE?

:NO - SKIP

;YES - RETURN

;MOVE CODE 1 LQCATION

MOV

bbb e et SOt

;MOVE TERMINATOR

;UPDATE MOVE REGISTERS

010503
005725
010504

b kb b

;NOW CHECK FOR CORRECT CONDITION CODES
2%
;BR IF V-BIT SET (SHOULD BE)
:NO - REPORT ERROR AND ABORT TEST

000242

S$:

3323321218233 SRR )Y

; TEST WORD (TWO BYTES)

Bvs
PERR3S

000036

3213233223

RN AR R AR ARG R ER RS RARKEE KA R AR R R AR RE R b E ks

1%:

010701
162701
010102
005202

332233 3

BRANCH GOBBLE TEST

AMA

102401
104461

105212
103402
102001
100401
104461

BRANCH COBBLE TEST>»>

<«<MTPO33

22222

;S8R RSN SRS SRS AR RS

8708
8709 027606
8710 027610
8711 027612
8712 027614
8713 027616
8714 027620
8715 027622
8716
8717
8/18 027624
8719 027626
8720
8721 027630
8722 027632

Pege 274

-(R3),-(R4)

BNE
6%
CLR
(R1)
BR
BRGOBB
GBLENGTH=, -MTP0O33
AMA
.ENARBL

;CLEAR TEST WORD "BGTEST"
;RUN MOVED CODE AGAIN

CVMJARO MSV11-U MEMORY DIAG.

MTPO33

BRANCH GOBBLE TEST

8753 027704

MACRO V05.01b Friday 15-Feb-8S 16:10

MTPO34: SUBTST

<<MTPO34

; *SUBTEST

MTP0O34

1s:

R2,(RO).
R1,MTPO34

8754 027704
8755 027706
8756 027710
8757 027712
8758 027714
8759 027716
8760 027720
8761 027722
8762 027724
8763 027726

010220
077102
000207
012401
020102
001402

104430
000240
077306
000207

2%:

3¢:

MOV
S08
RETURN
MOV
CMP
BEQ
PERRO2
NOP
508
RETURN

R3,2¢

SEQ 0244

SOFT ERROR - BACKROUND PATTERN TEST>>
Y

SOFT ERROR - BACKROUND PATTERN TEST

(R4)+,R1
R1,R2
3¢

Page 275

;V177640
:V177642
;V177644
;V177646
;V177650
;V177652
;V177654
:V177656
;V177660
;V177662

CVMUAARQ MSV11-J MEMORY DIAG.

MTPO34

SOFT ERROR

MACRO vV05.01b Friday 15-Feb-85 16:10

- BACKROUND PATTERN TEST

8765 027730

MTPO3S:SUBTST

<<MTPO3S

; sSUBTEST

MTPO3S

g;g? 027730

012737

000093

85;;22

012700

060000

8769 027742
8770 027750
8771 027752
8772 027760
8773 027762
8774 027764
8778 027770
8776 027772
8777 027776
8778 030004
8779 030006
g;gg 030010

012737
104425
012737
011010
005710
010037
104050
004737
032763
001002
104426
104512

000005

002150

030006

002304

8782
8783
8784
8785
8786

104503
011010
012737
104425
012737

8768 027736

030012
030014
030016
030024
030026

2787 030034

8788 030036
8789 030040
8790 030044
8791 030046
8792 030052
030052
030056
030062
8793 030064

8794 030064
8795 030070

005710

000405
010037
104050
004737

002076

002666
14:

2$:
000001

002150

030040

002304

002034

050446

062700
020027
003727

004000
157776

005037
000207

002076

4%:

T T

#3,NOPAR

N e

CLR1CSR
MOV
(RO),(RO)
MOV
#BITO,CSR
LOADCSR
MOV
#3$,PARTHERE

842

MOV ®FIRST,RO

TRAPS INTO CSR

;CLEAR WRONG PARITY IN MEMORY

(RO)

BR
43
MOV
RO,ADDRESS
ERROR +S0
CALL PERBNK
END; OF FOR

CLR
RETURN

;SET PARITY TRAPS TO RETURN TO "PARTHERE'

MOV
#BIT2!'BITO,CSR
;SET WRITE WRONG PARITY & PAR.
LOADCSR
MOV
#1$,PARTHERE
MOV
(RO),(RO)
;WWP TEST LOCATION
TST
(RO)
MOV
RO,ADDRESS
ERROR +50
CALL
PERBNK
BIT
#BIT10,CONFIG+2(R3)
BNE
2%
READCSR
ERRGEN

TIST

3$:

WORST CASE NOISE PARITY TEST

FOR RO := #FIRST TO SLAST B8Y #4000

002034

050446
002000

SEQ 0245

WORST CASE NOISE PARITY TEST>>

MOV

Page 276

NOPAR

ADD #4000,R0O
CMP RO, 8LAST
BLE 842
€42:;::::;;

;RESET PARITY TRAP ACTION

CVMJUAAD MSV11

MTPO3S

J MEMORY DIAG.

MACRO VOS.01b Fridey

15-Feb-8S 16:10

WORST CASE NOISE PARITY TEST

SEQ 0246
MIPO36:

8797 030072

Page 277

SUBTST

;0886888588808

<<MTPO36
S8R

MTPO36

;#SUBTEST

CORRECTION CODE TEST>>

ERIERREESEER SR RRERREEREER RS EEE RO EECOCOSE200ESEPCCEOEOODS

CORRECTION CODE TEST

;0885 EESEREESESRERRNERRAU SR EREERERERESREEEERRAREEREEER
SO RN SRI S 200000000 O

8798
8799
8800
8801
8802 030072
8803 030074
8804 030100
8805 030102
030102
8806 030102
030102
8807 030106
030106
8808 030112
030112
8809 030116
030116
030124
8810 030126
030126
8811 030132
030132
030134
8812 030134

030134
8813 030140
030140

: THIS TEST CHECKS TO SEE THAT EACH BIT OF A DATA WORD

104424
105037
104513

002264

REPEAT

105237

002264

012704

177777

005037

002324

123727

002264

012705

000001

001003

; CAN BE CORRECTED INDIVIDUALLY FROM A ZERO TO A ONE AND
; VISA VERSA.
CACHOFF
; TURN OFF CACHE
CLRB PASFLG
;CLEAR PASFLG
CBREG
;ENABLE CHECK/SYNDROME BIT REGISTER
LET PASFLG
LET R4

012705

030176

8826 030200
030200
8827 030206
030206
8828 030212
030212
8829 030216

CLR BITNO

;SELECT DATA TO BE CORRECTED BY PASSNO

IFB PASFLG EQ #1

CHMPB PASFLG,
@1
BNE L257

:= #1

;DATA=0;BIT TO BE CORRECTED IS A ONE

:= 8177776

BR L260
'
;DATA=177776;8IT T0 BE CORRECTED IS A ZERO

MOV 01,RS

L257 .......

L=T RS

177776

MOV #177776,RS

ENC
REPEAT

8814 030140

030140
8815
8816 030140
8817 030144
030144
8818 030146
030146
8819 030152
4820 030156
88c1 030162
030162
8822 030166
8823 030170
030170
8824 030172
8825 030174
030174

MOV @-1,R4

ELSE

000402

005237

INCB PASFLG

;CLEAR INNER LOOP COUNTER

:= #0

LET RS

B43:;5::::

; INCREMENT LOOP COUNTER

;INDEX TO SINGLE BIT ERROR TABLE

:= ¢-1

LET BITNO
000001

:B= PASFLG + #1

002324

005204

116402
072227
052702

030276
000005
000004

010237
104425

002150

B44:;;::::
; INCREMENT BIT PQOINTER

INC BITNO
LET R4 := R4 - &1

;POINT TO NEXT SET OF CHECK BITS

LET R2

;GET NEXT SET OF CHECK BITS

:B= PTABLE(RS)

;SHIFT TO LINE UP IN CSR
;ENABLE DIAG MODE
;GET CHECK BITS TO BE WRITTEN

LOADCSR
LET (R1)

;LOAD CSR WITH DATA

:= RO

001412

012737

060000

010237

002314

010537

002246

002034

; CORRECY 3BE

;WAS DATA CORRECTED???

LET ADDRESS
LET CHECK
LET TSTDAT

MOV R2,CSR

;WRITE DATA TO TEST ADDRESS
MOV RO,(R1)

}ET(éfig)NE RS

021105

MOVB PTABLE(R4),R2

ASH #5,R2

8IS #BIT2,R2
LET CSR := R2

010011
005711

INC R4

#60000

:= R2
:= RS

LET TSTDAT.2

(R1)

CMP (R1),RS
BEQ L261

;MOV ERROR INFORMATION IN

MOV 960000, ADORESS

MOV R2,CHECK

‘

MOV RS,TSTOAT

CVMJAAOQ HSV11-J MEMORY DIAG.

MTPO36

CORRECTION CODE TEST

030216
8830 030222
8831 030224
030224
8832 030224
8833 030226
030226

030234

8834 030236

8835 030240
030240
030242
8836 030242
8837 030244
8838 030246
030246
8839 030246
030246
030254
030256
8840 030256
8841 030260
030260
030266
030270
8842 030270
8843 030272
8844 030274
8845
8846
8847
8848 030276
030301
030304
030307
030312
030315

011137
104052

MACRO v05.01b Friday 15-Feb-85 16:10

SEQ 0247

002250

001002
006305

002264

000001

000261
006105

046
070

;CLEAR LUT

END

002324

002264

000020

000002

020
052
040

075

Lebl:;::::;

;SHIFT NEW DATA DEPENDING ON PASFLG
CMPB PASFLG,
91
BNE L262

sSHIFT BITNO TO THE LEFT

BR L263

;:SET CARRY BIT AND......
;ROTATE LEFT

’

L263:;:::::

;UNTIL ALL BITS ARE DONE

CMP BITNO,&16.
BNE B44
E44:;;;::;

; COMPLEMENT DATA AND REPEAT
sUNTIL 2 PASSES ARE COMPLETE!

CMPB PASFLG,
#2

BNE B43

RETURN

037
025
057
045

MOV (R1),TSTOAT.2

L262:::::::

COM RO
UNTILB PASFLG EQ #2

CLR1CSR
CACHON

007
032

ROL

UNTIL BITNC EQ #16.

104503
104423
000207

002
031
026
051

CLR (R1)
IFB PASFLG EQ )

SEC

005100
123727
001305

;NO ERROR

ASt
ELSE

000402

023727
001331

ERROR +S52

END

005011

123727

Page 277-1

;:CLEAR CSR
; TURN CACHE

MSV11-P SINGLE BIT ERROR CHECK BIT TABLE

PTABLE: .BYTE

2,7,37,31,32,25,26,20,57,51,52,45,46,40,75,70

CVMJAAQ MSV11-J MEMORY DIAG.

MTPO36

CORRECTION CODE TEST

MACRO Vv05.01b Friday 15-Feb-85 16:10

8850 030316

MTPO37:

SUBTST

<<MTPO37

; ¢SUBTEST

MTPQO37

:
;

gggg

8855 030316
8856 030320
030320
8857 030324
030324
8858 030330
8859 030332
030332
8860 030340
8861 030342

8862
8863

8864

030342
030344
030344
030346
030350
030350
030354
030354
030362

8865
8866 030364
030364
8867 030364
8868 030366

T N

CHECK ECC DISABLE TEST
T T

T N T

T
I

T TN
I

THIS TEST CHECKS THAT ECC CAN 3E DISABLED AND THAT

; NO CORRECTION TAKES PLACE WITH ECC DISABLED.

104424

005037

002044

005037
104475

002314

012737
104475

000100

CACHOFF
LET GOOD

002314

:= &0

LET CHECK

:= #0

CB1CSR
LET CHECK

:= #100

CB1CSR

LET (R1)

005011

:= #0

IF (R1) NE #0

005711
001406
011137

002052

012737
104037

060000

104423
000207

T T

SEQ 0248

CHECK ECC DISABLE TEST>>

8851
8852

Peage 278

LET BAD

:= (R1)

; TURN OFF CACHE
;GO0D DATA FOR ERROR PRINT 0QuT
;CLEAR CHECK BIT FIELD

CLR CHECK
;ENABLE SYNDROME/CHECK BIT REGISTER
;SBE CHECK BITS
MOV #100,CHECK
;WRITE CHECK BITS TO CB REGISTER
;WRITE CHECK BITS TO MEMORY

;WAS CORRECTION MADE????
;YES IT WAS..... ERROR

LET ADDRESS := #60000 ;

002034

END

ERROR 37

CACHON
RETURN

CLR GOOD

:
;
;TURN ON CACHE
:

CLR (R1)
TST (R1)
BEQ L266
MOV (R1),BAD

MOV #60000,ADDRESS
L266:;:::::

CVMJAARO MSV11-J MEMORY DIAG.

MTPO37

CHECK ECC DISABLE TEST

MACRO V05.01b Friday 15-Feb-85 16:10

SEQ 0249

8871 030370

MTP0O41:

SUBTST

RALi 2222222

030504

8900

8901
8902
8903
8904
890%
8906

030506
030510
030510
030514
030514
030520
030522
030522
030522
030522
030524
030526

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST>>

<<MTPO4l

s HERE SRR R R R RN R KRR R

: *SUBTEST
8872
8873
8874
8875
8876 030370
030370
8877 030374
0878 030400
8879 030404
030404
8880 030410
030410
030414
8881 030420
030420
8882 030424
8883 030430
8884 030432
030432
8885 030432
8886 030436
030436
8887 030442
030442
8888 030446
030446
8889 030454
8890 030456
030456
8891 030460
8892 030462
8893 030464
8894 030466
030466
8895 030472
8896 030476
030476
8897 030500
8898 030502
8899 030304

Page 280

R RS R R

MTPO41

22322232

SRR AR

E R E

KRN R R AR TSR RSN R P RS E

S EE R S0

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST

22222222

222222t

ISy

E RSSO RSO
I

IR I

THIS TEST CHECKS TO SEE IF THE CORRECT ADDRESS APPEARS

IN CSR BITS 5-11 ON A DOUBLE ERROR.

013704
072427
042704

002102
000011

012700

177740

012701
162701

060000
004000

105037
005037
104475

002264
002314

105237

002264

062700

000040

062701

004000

012737
104475

001340

;GET STARTING BANK NUMBER

MOV BANK,R4
;SHIFT INTO POSTION TO MATCH ADDRESS IN CSR

BIC #tC7740,R4
LET RO := #-40
LET R1

;CLEAR OFF EXTRANEQUS BITS
; INIT CSR ADDRESS TO 0 - 1K (BIT S5 = 1K ADD.)

#FIRST

LET PASFLG

#4000

:B= #0

002314

INCB
PASFLG
LET RO := RO +

#40

LET R1

#4000

LET CHECK
CB1CSR
LET (R1)

:= #1340
:= #0

CLRI1CSR

002150
170037

010002
060402
000240

002052

010537
104455

002044

SUB #4000,R1

B45:;:::::
:INC LOOP COUNTER
;INC CSR ADDRESS TO BE EXPECTED
ADD #40,RO

;DOUBLE ERROR CHECK BITS

ADD #4000,R1
MOV #1340,CHECK

;WRITE DOUBLE ERROR CHECK BITS
;WRITE DATA AND D.E. CHK BITS AT A=0
CLR (R1)

;:CLEAR CSR

;READ ADDRESS 70 GET DOUBLE ERROR
;READ CSR FOR CORRECT ADDRESS
;

BIC #tC7720,RS
LET R2 := RO

:
;GET CORRECT ADDRESS

IF R2 NE RS

010237

MOV &FIRST,R1

TST (R1)
READCSR
LET RS := CSR

ADD R4 ,Re
NOP

020205
001405

MOV #-40,R0

CLRB PASFLG
:CLEAR CHECK BIT FIELD TO BE LOADED
;ENABLE CHECK/SYNDROME BIT REGISTER

CLR CHECK
CB1CSR

:= R1

;GET LOW ADDRESS IN BANK

; INIT PASFLG

REPEAT

104503
005711
104426

005011
104475

:= BANK

ASH #9.,R4

170037

005011

013705
042705

LET R4

END

MOV RO,R2
;ADD STARTING BANK TO DOUBLE BIT ADDRESS
;DEBUG AIDE

;00 ADDRESSES AGREE?

LET BAD := R2

;

LET GOOD

:= RS

PERR31

LET (R1)

CB1CSR

:NO ERROR
:

:= #0

UNTILB PASFLG EQ PASCNT

MOV CSR,RS

CMP R2,RS
BEQ L267
MOV R2,BAD

MOV RS,G00D

L267:::::::

CLR (R1)

;ENABLE CHECK/SYNDROME BIT REGISTER

;D0 16K AT A TIME

CVMJAAQ MSV11-J MEMORY DIAG.

MTPO41

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST

030526
030534
030536
8907 030536
8908 030540
8909

MACRO v05.01b Friday 15-Feb-85 16:10

123737
001336
104503
000207

002264

Page 280-1

002570
CLRICSR
RETURN

;
:

SEQ 0250
CMPB PASFLG,PASCNT
BNE B4S
EAS: HER R

Fd4

MACRO V0S5.01b Friday 15-Feb-85 16:10
CVMJAAQ MSV11-J MEMORY DIAG.
ADDRESS TO CSR ON DOUBLE BIT ERROR TEST

MTPO41

8912 030542

MTP042:
L

SUBTST

<<MTPO42

030544
8920 030550
030550
030556
8921 030560
030560
8922 030566
030566
030570
8923 030570
030570
8924 030576
030576
8925 030576
8926 030602
8927 030606
8928 030612
8929 030620

030620
8930 030624
030624
8931 030630
8932 030634

8933 030640
8934 030644
8935 030646
030646
8936 030646
8937 030652
030652
8938 030660
8939 030662
8940
8941
8942
8943
8944

;

104424

002102

023727
001004

002102

000177

012737

000001

002570

000403

012737

000002

042704
072427
052704
062737

177607
000002
040000
000400

105037

002264

013705

002102

105237

002264

012737

000104

042705
072527
052705
104513

104425

005011
104503
005711
104426
042737

030706

013737

002150

030714

010537

002044

104023

002570

172352

177770
000011
000020

002150

8947 030720
8948 030722

020000

FOR THE PROPER

ADDRESS

I T T

I T N I

T I

T
I

IN THE CSR.

CACHOFF
LET R4 := BANK

013704

023705
001406

8946 030714

EXTENDED ADDRESS TO CSR ON ERROR TEST

; THIS TESTS THE EXTENDED Q BUS ADDRESS IN THE
; CSR BY CAUSING A SINGLE ERROR, ENABLING BIT # 14, THEN CHECKING

030662
030664
030666
030670
030672
030700
030700
030704

8945 030706

I T

MTP0O42

SEQ 0251

EXTENDED ADDRESS TO CSR ON ERROR TEST>>

; *SUBTEST
8913
8914
8915
8916
8917
8918 030542
8919 030544

Page 282

; TURN OFF CACHE MEMORY
;GET BANK NUMBER TO FIGURE OUYT EXTENDED ADDRESS
MOV BANK,R4

IF BANK EQ #177
LET PASCNT

:= #1

ELSE
LET PASCNT
END

B8IC
ASH
BIS
ADD

#tC170,R4
#2,R4
#BIT14,R4
#400,KIPARS

LET PASFLG :B8= #0

002150

MOV #1,PASCNT
BR L272
LeTY:;::5:

:= #2

MOV #2,PASCNT
L272:::::::
;CLEAR OFF LOWER BITS
;SHIFT TO LINE UP WITH CSR
;SET EXTENDED ADDRESS BIT
:SET UP PAR TO POINT TO TOP OF A BANK

;INIT LOOP COUNTER

CLRB PASFLG

LET R5 := BANK

;RS GETS THE BANK NUMBER

BIC #tC7.RS
ASH #9.,RS
BIS #BIT4,RS
CBREG
REPEAT

;CLEAR ALL BUT THE LOWER BITS
;ROTATE INTO POSTION
;SET UP SBE INDICATOR ;;DATA TO BE EXPECTED
;ENABLE CHECIK/SYNDROME BIT REGISTER

INCB PASFLG

002150

;00 ONCE IN LAST BANK

CMP BANK, 8177
BNE L271

LET CSR

:= #104

LOADCSR
LET (R1) := #0
CLRICSR
TST (R1)
READCSR
BIC #BIT713,CSR
IF CSR NE RS THEN

002052

END

;INCR LOOP COUNTER

B46:;;;;:::

;WRITE CHECK BITS TO CSR WITH DIAG MODE
MOV #104,CSR

;LOAD CSR WITH DATA
;WRT ZEROS AT A=0 AND SINGLE ERROR BITS
CLR (R1)
;CLEAR CSR
;READ A=0;DATA BIT O SHOULD BE CORRECTED TO A 1
sREAD CSR FOR DATA
;CLEAR POSSIBLE INHIBIT MODE IN DATA "CSR*"
;HAS SINGLE ERROR BITS SET IN CSR?
CMP CSR,RS
BEQ L273

LET BAD

:= CSR

LET GOOD

:= RS

ERROR +23

MOV BANK,RS

;
:

MOV CSR,BAD
MOV RS,GOOD

[}

MACRO V05.01b Friday 15-Feb 85 16:10
CVMJAAQ MSV11-J MEMORY DIAG.
EXTENDED ADDRESS TO CSR ON ERROR TEST

MTPO42

030722
8949 030722
030722
8950 030730

8951 030732
8952 030734
8953 030742
030742
030746
8954 030750
030750
8955 030756
030756
8956 030762
030762
8957 030770
8958 030772
030772
8959 030772
030772
8960 030774
030774
8961 031000
8962 031004
8963 031010
8964 031012
031012
031020

031022
8965 031022
8966 031024
8967 031026

012737

040000

002150

042737

020000

002150

023704
001411

002150

013737

002150

010437

002044

012737
104023

177777

104425
104426

137776
000740
001000

123737
001312

002264

#40000

LET BAD

LET GOOD

002612

;WRITE EQB BIT TO CSR

;CLEAR INHIBIT MODE POINTER IN DATA
;READ EQB ADDRESS
CMP CSR,R4
BEQ L274

CSR

MOV CSR,BAD

:- R4

LET (R1)

LET R1

#137776

BIS #BIT9,R4
CBREG
UNTILB PASFLG EQ PASCNT

CLRI1CSR
CACHON
RETURN

MOV #40000,CSR

;READ FOR CORRECT EXTENDED Q-BUS ADDRESS

MOV R4,G0O0D
MOV

ERROR +23

ADD #740,R5

002570

SEQ 0252

SET HEADER

END

012701
062705
052704
104513

LOADCSR
READCSR
BIC #B8IT13,CSR
IF CSR NE R4 THEN

002052

005011

104503
104423
000207

LET CSR

Page 282-1

;CLEAR LUT
;SET UP NEW ADDRESS

&#-1,HEADER

CLR (R1)
MOV #137776,.R1

;ADD TO GET NEW ADDRESS
;SET BIT 9 SINCE WE ARE ASSERTING Al ON PASS2
;ENABLE CHECK/SYNDROME BIT REGISTER
;LOOP 2 TIMES

CMPB PASFLG,PASCNT
BNE B46

;:CLEAR CSR
;TURN ON CACHE

MACRO V0S.0lb Friday 15-Feb-85 16:10
CVMJUAAO MSV11-J MEMORY DIAG.
EXTENDED ADDRESS 10O CSR ON ERROR TEST

MTPO42

MTPO43:

8969 031030

; sSUBTEST

8972
8973
8974
8975 031030
8976 031032
8977 031034
8978 031040

031040
031042
8979 031044
031044
8980 031050
031050
8981 031050
8982 031054
031054
8983 031062
8984 031064
031064
8985 031066
8986 031070
031070
8987 031074
8988 031076
8989 031104
031104
031112
8990 031114
031114
8991 031122
031122
8992 031130
8993 031132
031132
8994 031132
8995 031134
8996 031136
8997 031140
8998 031146
031146
031154
8999 031156
031156
9000 031164
031164
9001 031172

031172

9002 031200
9003 031202

031202
9004 031202

SEQ 0253

SUBTST <<MTP043 WRITE BYTE CLEARS SINGLE BIT ERROR TEST>>

8970
8971

Page 283

MTPO43

WRITE BYTE CLEARS SINGLE BIT ERROR TESI
L

T
T

: THIS TEST CHECKS TO SEE IF A SINGLE BIT ERROR WILL BE CORRECTED DURING
THE READ PORTION OF A WRITE BYTE AND THAT THE CORRECT CHECK BITS WILL

; BE GENERATED ON A WRITE.
104424
104513
105037

éACHOFF

002264

010102
005202
012704

000001

105237

002264

012737
104425

000604

LET R4

002150

177757

002150

023727
001407

002150

000020

012737

000020

002044

013737
104060

002150

002052

LOADCSR
LET (R1)

104513

005711

174037

002150

023727
001412

002150

000300

012737

1777717

002612

012737

000300

002044

013737
104061

002150

002052

:= R4
:B= #377

READCSR
BIC #tC20,CSR
IF CSR NE #20

LET GOOD

END

:= #20

;:READ CSR
;SEE IF SBE INDICATOR IS SET
;IS SBE SET?2???

:
;

LET GOOD

LET BAD

:= #300

:= CSR

ERROR +61

DEC R2

B47:::::::

;WRITE BYTE OF WORD

ERROR +60

SET HEADER

MOV #]1,.R4

;WRITE CSR TO NORMAL MODE

;

BIC #tC3740,CSR
IF CSR NE #300

INC R2

;sINCREMENT LOOP COUNTER
;WRITE CHECK BITS CORRESPONDING TO DATA OF O
MOV #604,CSR
;WRITE CSR
;WRITE DATA OF 1 CREATING A SINGLE BIT ERROR
MOV R4,(R1)

LET BAD := CSR

CBREG
TST (R1)
READCSR

END

MOV R1.R2

;INITIAL DATA

INCB PASFLG
LET CSR := #604

CLRI1CSR

000377

;ENABLE CHECK/SYNDROME BIT REGISTER
;CLEAR LOOP COUNTER
:R2 POINTS TO HIGH BYTE

;

LET (R2)

112712
104426
042737

005302

REPEAT

010411
104503

104426
042737

:TURN OFF CACHE

CBREG
CLRB PASFLG
LET R2 := R1

MOVB #377.(R2)

CMP CSR, #20
BEQ L276
MOV #20,G00D

MOV CSR,BAD

L276:;::::::

;WRITE CSR TO DIAG MODE
;READ SAO FOR CORRECT CHECK BITS
;READ CSR

;MASK QUT CHECK BIT FIELD
;WERE CORRECT CHECK BITS GENERATED?22??
CMP CSR, #300
BEQ L2777
;
MOV
#-1,HEADER
;
MOV #300,G00D
:
;
:

MOV CSR,BAD

L2?7:;3::::

;POINT TO HIGH BYTE AND REPEAT

CVMJUAAO MSV11-J MEMORY DIAG.

MTPO43

MACRO v05.01b Friday 15-Feb-85 16:10

WRITE BYTE CLEARS SINGLE BIT ERROR TEST

9005 031204

031204
9006 031210
031210
031216
031220
9007 031220
9008 031222

012708

000400

123727
001314

002264

104423
000207

000002

Page 283-1

LET R4 := 2400

;8IT O OF HIGH BYTE

UNTILB PASFLG EQ &2

;D0 HIGH AND LOW BYTE

CACHON
RETURN

;TURN ON CACHE
i

SEQ 0254

MOV 0400,R4
CMPB PASFLG,
@82
BNE B47
€E47:;;:::::

CVMJUAAO MSV11-J MEMORY DIAG.

MTP043

MACRO V05.01b Friday 15-Feb-85 16:10

WRITE BYTE CLEARS SINGLE BIT ERROR TEST

9010 031224

MTP044: SUBTST

<«<MTPO44

; sSUBTEST

MTP044

Ty T

SHIFTING CHECK BITS THROUGH THE CSR TEST

LI Ty

:
;

THIS TEST CHECKS THE ABILITY TO READ AND WRITE CHECKBITS INTO MEMORY
; BY SHIFTING A ONE BIT THROUGH A FIELD OF ZEROS. THE CSR IS RcAD FOR THE
; CORRECT PATTERNS. THE TEST IS THEN REPEATED ON A ZERO BIT THROUGH A

9013
9014

ggiz

; FIELD OF ALL ONES.

9017 031224
031224
9018 031224
9019 031226

031226
9020 031232
031232
9021 031236

9022 031240
031240
9023 031244

031244
9024 031244
031244
9025
9026
9027 031250

REPEAT

104424

105037

002264

012705
104475

174037

012702

000046

105237

002264

005037

002266

031250
9028 031254
031254
9029 031254
031254
9030 031260
031260
9031 031262
031262
9032 031266

010237
104425

031270

005011

9033 031270
9034
9035
9036
9037
9038
9039

SEQ 0255

SHIFTING CHECK BITS THROUGH THE CSR TEST>>

9011
9012

Page 284

031272
031274
031276
031300
031302
031304

005237
010204

010437
104425
104426

9043 031320

042703

031314

013703

9044 031324
031324
031326

020304
001412

031330

010137

9046 031334

002150

CACHOFF
LET PASFLG

;TURN OFF CACHE
;INIT PASFLG

:B= #

LET RS := #174037
CB1CSR

LET R2

002150

020000

002034

CLRB PASFLG

MOV #174037,RS
;ENABLE CHECK/SYNDROME BIT REGISTER

:= #46

;SET UP INITIAL CSR DATA

REPEAT
LET PASFLG

BSO::;::::

;CHECK BIT MASK FOR CSR

:B= PASFLG +« #1

LET PASSNO := #0

MOV #46,R2

BS1:;:::5:
;INC LOOP COUNTER
INCB PASFLG
;CHK BITS = 1
;DISABLE ECC;DIAG CHK SET
;INIT PASSNOCINNER LOOP COUNTER)

CLR PASSNO

REPEAT

LET PASSND := PASSNO + #1
LET R4 := R2

BS2:::5::::
;INC LOOP COUNTER
INC PASSNO
;COPY R2 T0 R4
MOV R2,R4

LET CSR := R2
LOADCSR

;GET CSR DATA TO BE WRITTEN
_
MOV R2,CSR
;WRITE SBE CHECK BITS TO CSR

COM RS
MOV RS, -(SP)
BIC R4,(SP)
BIC RS,R4
8IS (SP).,R4
LET CSR := R4

; COMPLEMENT MASK
;SAVE RS ON STACK
;CREATE AN XOR FUNCTION
:
:
:

LET (R1) := #0

005105
010546
040416
040504
052604

031304
9040 031310
9041 031312
9042 031314

9045 031330

002266

;ILC; ;REV B

;WRITE DATA AND CHECK BITS AT A=0
CLR (R1)

LOADCSR
READCSR
LET R3 := CSR

MOV R4,CSR
;LOAD CSR WITH COMPLEMENT CHECK BITS
+READ CSR FOR COMPLEMENT CHECK BITS
;COPY CSR DATA T0O R3

BIC #BIT13,R3

;CLEAR ANY POSSIBLE INHIBIT MODE POINTER

MOV CSR,R3

IF R3 NE R4 THEN
LET ADDRESS
LET GOOD

:= R1

:= R4

;READ CSR FOR PROPER CHECK BITS
CMP R3,R4
BEQ L301

MOV R1,ADDRESS

IK4

MACRO V05.01b Friday 15-Feb-85 16:10
CVMUAAO MSV11-J MEMORY DIAG.
MTPO44
SHIFTING CHECK BITS THROUGH THE CSR TEST

031334
9047 031340
031340
9048 031344
031344
9049 031352
9050 031354
031354
9051 031354
9052 031356
9053 031360
9054 031362
9055 031264
9056 031370
031370
9057 031372
9058 031374
031374
031400
9059 031402
031402
9060 031406
031406
9061 031414
031414
9062 031420
031420
9063 031426
9064 031430

031430

9065 031430
9066 031432

031432
031440

9067
9068 031442
9069 031444
031444

031446
9070 031446
907 031450
9072 031452
9073 031454
9074 031456
9075 031460
9076 031462
9077 031464
9078 031466
9079 031470
9080 031472
9081 031474
031474
9082 031474
031474
9083 031500
031500
031506

010437

002044

010337

002052

012737
104463

177777

005105
005711
000240
104426
040537

LET BAD

002612
END

002150

010437

002044

013737

002150

010137

002034

012737
104464

177777

PERR37

;ERROR CALL

SET HEADER

MOV
;MASK OUT CHECK BIT FIELD
;ARE CHECK BITS THE SAME?
CMP
BEQ
;
MOV
;
MOV
;
MOV
;

PERR4O

:ERROR CALL

LET GOOD

:= R4

LET BAD

:= CSR

LET ADDRESS

:= R1

BIC RS,R2
IFB PASFLG EQ #1

MOV
8IC
BIC
8IS

010546

040216
040502
052602
006302
010546
040216
040502
052602
005105

RS, -(SP)
R2,(SP)
RS5,R2
(SP).,R2

ASL R2
MOV R5,-(SP)

BIC R2,(SP)
BIC RS,R2
BIS (SP)+.R2

ENSOH R5

062702

000006

123727

002266

LET R2 := R2 + #6
000006

#-1,HEADER

;:ILC; ;REVB

;MASK OUT CHECK BIT FIELD
;:GET CHECK BITS THAT WERE WRITTEN

COM RS

005105

MOV

;READ CSR FOR CORRECT CHECK BITS

ASL R2
ELSE

000413

MOV R3,BAD

READCSR

002612

006302

001262

;

R4 ,G0OOD

L301:;:::::
; COMPLEMENT MASK
;READ CHECK BITS AT A=0 INTO CSR

002052

000001

MOV

COM RS
ng (R1)

END

002264

SEQ 0256

SET HEADER

BIC RS,R4
IF R4 NE CSR

040502

123727
001002

B8IC RS,CSR
LET R4 := R2

010204
040504
020437
001413

Page 284 1

UNTILB PASSNO EQ #6

MOV

R2.R4

R4,CSR
L302
R4,G00D
CSR,BAD
R1,ADDRESS

&-1,HEADER

;sILC; ;REVS

L302:;:;;::::
;SHIFT CHECK BITS AND CREATE NEW DATA FOR CSR
:SELECT FUNCTION
CMPB PASFLG,
#1
BNE L303

;D0 A FIELD OF ZEROS--->ONES

;SHIFT CHECK BITS
;00 A FIELD OF ONES --->ZEROS
BR L304

L303:;:::::

; TAKE OUT CHECK BIT FIELD
;
:
:
;SHIFT CHECK BITS
;PUT BACK CHECK BIT FIELD

:
:
:

; COMPLEMENENT DATA PATTERN

L308:;:;;:::

:ADD 6 SO THAT WRITE ON CSR WILL ENABLE DIAG MODE
ADD #6,R2
;D0 ALL CHECK BITS

g:EBBgSSSN0.06

CVMUAARO MSV11-J MEMORY DIAG.

MTP044

SHIFTING CHECK BITS THROUGH THE CSR TEST

031510
9084 031510

031510

012702

003706

031514
031522
031524
031524
031526
031530
031534
031534
031540
031542
031542
031544

123727
001250

002264

9085 031514

9086
9087
9088
9089

9090
9091

MACRO V05.01b Friday 15-Feb-85 16:10

104503
005011
062701

020137
001231
104423
000207

000100

002562

LET R2

000002

:= #3706

Page 284-2

SEQ 0257

;REPEAT WITH FIELD OF ONES

MOV #3706.R2

UNTILB PASFLG EQ #2

CLRICSR
CLR (R1)
ADD #100,R1
UNTIL R1 EQ ENDADD

CACHON
RETURN

: TURN ON CACHE
:

CMPB PASFLG,
#2
BNE 851
ESY:;:i::

;ALL 256 TO ADDRESS
;

:ILC; ;REVB
; ILC; ;REVB
CMP R1,ENDADD
BNE 850
€50:5:::::

CVMJUARO MSV11-J MEMORY DIAG.

MTP044

MACRO V05.01b Fridey 15-Feb-85 16:10

SHIFTING CHECK BITS THROUGH THE CSR TEST

9093 031546

MTPO4S:

SUBTST

Page 285

<<MTPOA4S

; *SUBTEST

N T

MTPO4S

SEQ 0258

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST>>»
S

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST

I
I
I N I
I
I
I T
I

9094

;

ggg;

;

9095
9096

;
;

9099 031546
9100 031550
9101 031552
031552
9102 031556
031556
9103 031564
031564
9104 N31572
031572
910S 031572
9106 031576
9107 031600

031600
9108 031602
9109 031604

9110 031606
9111 031610

9112
9113
9114

9115

031610
031616
031620
031620
031626
031626
031634
031636

031636

9116 031636
9117 031640
9118 031642
9119 031644
9120 031652

104424
104513

002266

012737

003744

002044

012737

003144

002150

005237

002266

032737
001007

100000

002150

012737

177777

002612

013737
104063

002150

002052

:= #3144

REPEAT

:= #0

174033

002150
002044

013737

002150

002052

012737
104042

177777

002612

031700
9125 031700
9126 031702

005011

012737

003604

002044

031710
9128 031716

012737

003004

002150

023727

002266

000002

PASSNO
#3744 ,G00D
#3144 ,CSR

A=0

CLR (R1)
;CLEAR CSR QuUT
;READ A=0 TO GET DOUBLE BIT ERROR

IF #BIT15 OFF.IN CSR

;

;:WAS UNCORRECABLE ERROR BIT SET???

SET HEADER

LET BAD := CSR

ERROR +63

;B8IT NOT SET

SYNREG
READCSR
NOP
BIC #1C3744,CSR
IF CSR NE GOOD THEN

END

031702

: TURN OFF CACHE
;ENABLE CHECK/SYNDROME BIT REGISTER
;CLEAR LOOP COUNTER
CLR
;GOOD DATA
MOV
;DBE CHECK BITS FOR CSR
HOV
i
B53::::::;
:
;WRITE DBE CHECK BITS TO CSR
;WRITE ZEROS AND DBL ERROR CHK BITS

CLRICSR
TST (R1)

END

002150

031716

LET CSR

:= #3744

READCSR

023737
001407

9127 031710

LET GOOD

:= #0

INC PASSNO

031652
031660
9121 031662
031662
9122 031670
031670
9123 031676
9124 031700

THIS TEST IS THEN REPEATED WITH MULTIPLE ERROR CHECK/SYNDROME BITS

LOADCSR
LET (R1)

005011
104503
005711
104426

104514
104426
000240
042737

CSR.

CACHOFF
CBREG
LET PASSNDO

005037

104425

THIS TEST CHECKS TO SEE IF THE DOUBLE BIT ERROR INDICATOR IS SET
ON A DOUBLE BIT ERROR AND THE CORRECT SYNDROMES ARE LATCHED INTQ THE

;

;BAD DATA

SET HEADER

ERROR +42

:
:

LET CSR

:= 93604
:= #3004

UNTIL PASSNO EQ #2

MOV

&-1,HEADER

MOV CSR,BAD
L310:;;::::;

;ENABLE SYNDROME BIT REGISTER
;READ CSR FOR CORRECT SYNDROME BITS
;DEBUG AIDE
;MASK SYNDROMES OUT
;CHECK IF DOUBLE ERROR BIT IS SET

LET BAD := CSR

CLR (R1)
LET GOOD

BIT #BIT15,CSR
BNE L310

CMP CSR,GO0D
BEQ L311
MOV CSR,BAD
MOV

¢-1,HEADER

L311:5::5:
;CLEAR LUT
;REPEAT WITH MULTIPLE ERROR SYNDROMES
;MULTIPLE ERROR CHECK BITS

;

HOV #3604,6000
MOV #3004,CSR
CMP PASSNO,
02

CVMJUAAO MSV11-J MEMORY OIAG.

HTPO4S

MACRO v05.01b Friday 1S Feb 85 16:10

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST

031724

031726
9129 031726

001322

SEQ 0259

BNE 853

104503

CLR1CSR

000207

RETURN

9130 031730 1044223

9131 031732

Page 285-1

CACHON

;

ES3:iisis

CVMJUAAO MSV11-J MEMORY DIAG.

HTPO4S

MACRO V05.01b Fridey 15-Feb-85 16:10

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST

9133 031734

MTIPO46: SUBTST

<« <MTPO46

; *SUBTEST

MTP046

I I

9134
9135
9136
g{gg

H
;
:
;

9139 031734
9140 031740
9141 031742

031742
9142 031742
031742
9143 031746
9144 031750
9145 031754
9146 031756
031756
9147 031756
031756

9148 031762
031762
9149 031766
031766

9150 031774
031774
9151 032000
032000
032006
9152 032010
032010
9153 032014
032014
032016

9154 032016
032016
9155 032022

005037
104424

005237
005000
105037
104513

002266

002264

012704

177777

012737

000001

005037

002324

123727
001003

002264

012705

000001

000402

012705

177776

032022

9156 032022

032022
9157 032022
032022
9158 032026
9159 032032
032032
9160 032034
032034

005037
005237

002072
002324

005204

116402

030276

032050

010237

002150

032056

010011

9161 032040
9162 032044
9163 032050

072227
052702

9164 032054
9165 032056

104425

9166 032060

000005
000006

NI N I

T T

T I

T T

I T

T T T

T I

THIS TEST CHECKS T0O SEE THAT FOR EACH BIT OF A DATA WORD THAT A SBE
IS TREATED LIKE A UNCORRECTABLE ERROR WITH ECC DISABLED AND TRAPS
ARE DETECTED.

CLR
PASSNO
CACHOFF
REPEAT

;CLEAR OUTER LOOP COUNTER
; TURN OFF CACHE
:

LET PASSNO := PASSNO + #1

;

LET R4

000001

I I NI I N N N

CHECK SINGLE BIT ERRORS MITH ECC DISABLED

LET PASFLG :B= PASFLG + #1

002076

S€q 0260

CHECK SINGLE BIT ERRORS WITH ECC DISABLED>>

T I

CLR
RO
CLRB PASFLG
CBREG
REPEAT

002264

105237

Page 286

LET NOPAR

#-1

:= #1

LET BITNO := #0
IFE PASFLG EQ #1
LET RS := #1
ELSE

LET RS := 8177776

BS4:;:::::;

INC PASSNO
;CLEAR DATA
;:CLEAR PASFLG
;ENABLE CHECK/SYNDROME BIT REGISTER
:
B55:::::::
; INCREMENT LOOP COUNTER
INCB PASFLG
;INDEX TO SINGLE BIT ERROR TABLE
MOV #-1,R4
;ENABLE PARITY ACTION
MOV &1,NOPAR

;CLEAR INNER LOOP COUNTER
CLR BITNO
;SELECT DATA TO BE CORRECTED BY PASSNO
o1
CMPB PASFLG,
BNE L313
:DATA=0;8IT T0O BE CORRECTED IS A ONE
MOV #1,RS
:
BR L314
L313:;:55:3

END

;DATR=177776;8IT TO BE CORRECTED IS A ZERO
MOV 2177776,.RS
:

REPEAT

LET PARCNT := 80
INC BITNO
LET R4 := R4 + 21
LET R2 :B= PTABLE(R4)

L314:;;:;;;

BS6:::::::
;CLEAR PARITY COUNTER
CLR PARCNT
;sINCREMENT BIT POINTER
;POINT TO NEXT SET OF CHECK BITS
INC R4
;:GET NEXT SET OF CHECK BITS
MOVB PTABLE(R4),R2

ASH 85,R2
B81S #B8IT12!81I71,R2
LET CSR := R2

;SHIFT TO LINE UP IN CSR
;ENABLE DIAG MODE
;:GET CHECK BITS TO BE WRITTEN

LOADCSR
LET (R1)

;:LOAD CSR WITH DATA
;WRITE DATA TO TEST ADCRESS

:= RO

IF PASSNO EQ #)

MOV R2,CSR

sWRITE CSR

MOV RO,(R1)

‘

CVMUAARO MSV11-J MEMORY DIAG.

MTPO46

MACRO V0S5.01b Friday 15-Feb-85 16:10

CHECK SINGLE BIT ERRORS WITH E£CC DISABLED

032060

023727

002266

000401

9171 032076
9172 032100

005711
004737

032106
032114

032737
001007

100000

002150

032116
9176 032124
032124
9177 032132
9178 032134
032134

013737

002150

002052

012737
104045

177777

002612

9167

9169
9170

032076

9173 032104
9174 032106
9175 032116

9179 032134

9180 032136
9181 032140
032140
032146
9182 032150
9183 032152
032152
032154
9184 032154

9185 032156
9186 032160

CMP PASSNO,
01

ECC1DIS

END
032220

END

032170

9188 032170
9189 032172

032172
032200
032202
9190 032202
032202
032210
032212
9191 032212
9192 032214
9193 032216
9194
9195
9196 032220

032220

032226

002264

000001

END

9197 032230

002324

005100
123727
001266

002264

000002

023727
001254

002266

000002

;
H

002266

000301

SEC
ROL

UNTIL PASSNO EQ #2

CHKTRP:

817 #BIT1S,CSR
BNE L317

ERROR +45

COM RO
UNTILB PASFLG EQ #2

104503
104423
000207

;READ THE CSR FOR UNCORRECTABLE ERROR
;IS UNCORRECTABLE ERROR BIT SET?2?2?

;

UNTIL BITNO E£Q #16.

000020

;CORRECT SBE
;CHECK FOR CORRECT TRAP

SET HEADER

ASL
ELSE

000261
006105

001011

:= CSR

CLR (R1)
IFB PASFLG EQ 21

000402

023727

L316:::5:::

CLR1CSR

005011

023727
001315

ENA1SBE

LET BAD

BNE L31S
;ECC DISABLE,NO PBL

BR L316
L31S::::::;
;SECOND PASS ;ECC DISABLE,®BL ENABLED
;

READCSR
IF #BIT1S OFF.IN CSR

032160

9187 032160
032160
032166

TST (R1)
CALL CHKTRP

104503

123727
001002
006305

;FIRST PASS

ELSE

104507

104426

SEQ 0261

000001

032066
032070
032072
032072
032074
032074
032076

9168

001002
104471

Page 286 1

MOV CSR,BAD
MOV
L317:5:::::

;CLEAR LUT
;SHIFT NEW DATA DEPENDING ON PASFLG
CMPB PASFLG,#)
BNE L320
;SHIFT BITNO TO THE LEFT
:
BR L321
L320:;:::::
;SET CARRY BIT AND......

;ROTATE LEFT
H

L321:::::::

;UNTIL ALL BITS ARE OONE

CMP BITNO,®16.
BNE BS6
ES6::::::3
;COMPLEMENT DATA AND REPEAT
;UNTIL 2 PASSES ARE COMPLETE!
CMPB PASFLG,#2
BNE 855
ES5S5:;5::::
;
CMP PASSNQ,
#2
BNE BS54
ES4:::::::

CLR1CSR
CACHON
RETURN

;
; TURN CACHE
:

IF PASSNO EQ 21

;PASS 1 CHECK FOR NO TRAP

IF PARCNT £Q #1

&-1,HEADER

gng fgggNG.ol

;

CVMUAAO MSV11-J MEMORY DIAG.

MTP046

MACRO V05.01b Friday 15-Feb-8S 16:10

CHECK SINGLE BIT ERRORS WITH ECC DISABLED

032230
032236
9198 032240

023727
001004

002072

9199 032246
9200 032250
032250
9201 032250
032250
032252
9202 032252
032252
032260
9203 032262
032262
9204 032270
9205 032272
032272
9206 032272
032272
9207 032272

012737
104057

177777

032240

SEQ 0262

000001

002612
END

SET HEADER

ERROR +57

:
H

ELSE

000410
023727
001404

002072

G00001

012737
104064

177777

002612

000207

Page 286-2

;

IF PARCNT NE #1

SET HERDER

;

ERROR +64

;
;

END

;

RETURN

;

CMP PARCNT,
a1
BNE L326

MOV

@-1,HEADER

L326
BR L327
L325'0.l
L39S
.0'
CMP PARCNT,
81
BEQ L330
MOV
L330:::::::
L327

#-1,HERDER

CVMJAAQ MSV11-J MEMORY DIAG.

MTPO46

MACRO V05.01b Friday 15 Feb-85 16:10

CHECK SINGLE BIT ERRORS WITH ECC DISABLED

9209 032274

MTP0O47:
Al

SUBTST

9210

9215 032274

9225 032340
9226 032342
032342
032344

032346
032350
032352
032360
032360

104424
013704
072427
042704
052704
104513

002102
000011
170037
100000

012737
104425

003144

005011
012737
104425

000104

023704

002150

9232 032366
032366

013737

002150

032374

010437

002044

012737
104063

177777

052704
005712
104426
042737

000020

9233 032374
9234 032400
032400
9235 032406
9236 032410

9242
9243

032410
032410
032414
032416
032420
032426
032426
032432
032434
032434
032442
032442

9244 032445

032446

9245 032454

9246 032456

002150

005012
104503

020000

032364

LET R4

002150

001411

020000

002150

013737

002150

010437

002044

012737

177777

3033

:= BANK

:= #0

LET CSR

:= #104

LOADCSR
LET (R2)

:= #0

CLRICSR
TST (R1)
READCSR
BIC #BIT13,CSR
IF CSR NE R4

LET BAD := CSR

002612

2332

it ittt

11312

ettt it

s s

233

TILY]

;:TURN OFF CACHE

;GET BANK NUMBER

MOV BANK,R4
;SHIFT INTO PLACE
;MASK OUT UNWANTED BITS
;SET UP GOOD DATA
;ENABLE CHECK/SYNDROME BIT REGISTER
;CHFCK BITS FOR DOUBLE BIT ERROR
MOV #3144,CSR
:
;WRITE DBE CHECK BITS
CLR (R1)
;WRITE SBE CHECK BITS
MOV #104,CSR

:
;WRITE SBE CHECK BITS AT ADDRESS + 4K

CLR (R2)
;CLEAR CSR
;READ DBE LOCATION
;READ FOR CSR DBE INDICATOR
;CLEAR INHIBIT MODE POINTER
:
CMP CSR,.R4
BEQ L33!}

SET HEADER

;

ERROR +63

:
:

:= CSR

LET GOOD := R4
SET HEADER
END

LET BAD

002012

23333 23313

LET GOOD := R4

BIS #20,R4
TST (R2)
READCSR
BIC #BIT13,CSR
IF CSR NE R4

002052

i1 133232222

NO CSR UPDATE ON SBE WITH EXSISTING DBE

3332 2

LOADCSR
LET (R1)

002052

002150

NO CSR UPDATE ON SBE WITH EXSISTING DBE>>

ASH #9.,R4
BIC #tC7740,R4
BIS #BIT1S,R4
CBREG
LET CSR := #3144

END

023704
001411

104051

002150

MTP047

SEQ 0263

THIS TEST CHECKS TO SEE THAT THE CSR CONTENTS WILL NOT CHANGE
WITH A SINGLE BIT ERROR WHEN A DOUBLE BIT ERROR ALREADY
EXISTS.

CACHOFF

005711
104426
042737

9237
9238
9239
9240
9241

333

.
:
;

9216 032276
032276
9217 032302
9218 032306
9219 032312
9220 032316
9221 032320
032320
9222 032326
9223 032330
032330
9224 032332
03¢332

9227
9228
9229
9230
9231

22212

;

9211
9212
ggiz

<«<MIP047

1322223 2322 222282 222

; *SUBTEST

Page 287

ERROR +51

MOV CSR,BAD
MOV R4,G0O0D

MOV

L331:::::::
;SET BIT IN GOOD DATA
;READ SBE
;READ CSR FOR NO CHANGE
;CLEAR INHIBIT MODE POINTER
:
CMP
BEQ
H
MOV
H
MOV
:
:

MOV

#-1,HEADER

CSR,R4
L332
CSR,BAD
R4,G0O0D

#-1,HEADER

MACRO v05.01b Friday 15-Feb-85 16:10
NO CSR UPDATE ON SBE WITH EXSISTING DBE

CVMJAARO MSV11-J MEMORY DIAG.

MTPO47

9247
9248
9249
9250
9251

032456
032456
032460
032462
032464
032466

Page 287

SEQ 0264
.......

104503
005011

005012

104423
000207

CLR1CSR
CLR (R1)
CLR (R2)
CACHON

RETURN

;CLEAR 1 CSR

:TURN ON CACHE

CVMJARQ MSV11-J MEMORY DIAG.

MISC

MACRO V05.01b Fridey

15-Feb-85 16:10

Page 288

SUBROUTINES

SEQ 0265

9253
9254
9255 032470

.SBTTL
REGCOPY:SUBTST

032470
032472
032474
032476

010103
010205
000207

010046
005237
042737
022737
001414
022737
001413
022737
001414
005000
013704
000414
005000
005004
000411
012700
013704
000404
012700
012704

010037
010037

012600
000207

002616
177774
000001

002616
002616

000002

002616

000003

002616

COPY RO TO R4,R1

TO R3,

SUBR
s

& R2 TO RS>>

T NI

RO,R4
R1,R3
R2.R5
<<FLIP WARNING CONSTANTS IN WORST

; *SUBTEST

FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS

002614

1¢:

000401
002614

2%:

000401
000401
024762
024776
025022
025036

3$:
44

INC
BIC
cMP
BEQ
CMP
BEQ

FLIPLOC
#+C3,FLIPLOC
#1,FLIPLOC
14
#2,FLIPLOC
2%

BEQ
CLR
MOV
BR

34
RO
ONES,R4
4%
RO,R4

CLEAR

BR
MOV
MOV
BR
MOV

MoV
MOV
MOV
MOV
MOV
POP

RETURN

PUSH

CcMP

T I

COPY RO TO R4,R1 TO R3, &€ R2 TO RS

FLIPWARN:SUBTST

032500
9263 032502
9264 032506
9265 032514
9266 032522
9267 032524
9268 032532
9269 032534
9270 032542
9271 032544
9272 032546
9273 032552
9274 032554
032554
032556
9275 032560
9276 032562
9277 032566
9278 032572
9279 032574
9280 032600
9281 032604
9282 032610
9283 032614
9284 032620
9285 032624
032624
9286 032626

MOV
MOV
MOV
RETURN

010004

032500

9262 032500

«<SUBR

; »SUBTEST
92356
9257
9258
9259
9260
9261

MISC SUBROUTINES

CASE NOISE TESTS>>

MOV RO,

RO, WARNS
RO

CLR
CLR

Iy T

(SP)

#3,FLIPLOC

44
#401,R0
ONES,R4
44
#401,R0
#401,R4
RO, WARNZ2
RO, WARN3
RO, WARN4

RO
R4

MOV (SP)+,RO

MACRO V05.01b Fridey
CVMJAAO MSV11-J MEMORY DIAG.
FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS

15-Feb-85 16:10

D
: SUBTST
BACKGN

9288 032630

3SR ERR AR

SRS

; ¢SUBTEST
2

9289
9290 032630
9291 032632

9292
9293
9294
9295
9296
9297
9298
9299

032636
032642
032650
032656
032662
032670
032672

104415
012700
012701
012737
012737
004737

012737
104416
000207

Page 289

SEQ 0266
<<SUBR
R R RN

AR R

SUBR

WRIIE BACKGROUND>>
SRR RS R

R R E

AR R AR

AR R

R SRR

SRR S

H e RGO

i3 22223 2222328222222t

sttt

i i

;WRITES DATA FROM R2

060000
040000
000207
024640
024446
000240

024644
002262

024644

SAVREG
MOV
MOV
MOV
MOV

CALL
MOV
RESREG

RETURN

#F IRST,RO
#SIZE ,R1
#207,MTP000+4
#MTP00O, SUPDOADD

SUPDO3

WRI
E BACKGROUND

#240,MTP000-+4

;WARNING PUTTING “RETURL." AFTER WRITE

;RESTORE 'NOP’

AFTER WRITE

CVMJARO MSV11-J MEMORY DIAG.

SUBR

WRITE BACKGROUND

9301 032674

MACRO VO0S.01b Friday 15-Feb-85 16:10 Page 290
GETCSR:
Al

SUBTST
s

gggg

9306 032674
9307 032700
9308 032704

9309
9310
9311
9312

032706
032710
032714
032720

013702
016203
000303

006303
042703
010337
000207

002104
002664

177741
002152

GET CSR INFORMATION FROM CONFIGURATION TABLE>>

222222223222 2421123312

; *SUBTEST

9302
9303

<«<SUBR

SUBR

3323323

3t i

221333333 132333331122

GET CSR INFORMATION FROM CONFIGURATION TABLE
I

; INPUTS
;

;OUTPUT

: CSRNO = CSR NUMBER

MOV
MOV
SWAB

BANKINDEX,R2
CONFIG(R2),R3
R3

ASL
BIC
MOV
RETURN

SEQ 0267

e MmN

NONE

R3
#tC36,R3
R3,CSRNO

;GET INDEX INTO CONFIG TABLE
;MOV IT INTO R3
;

;
;CLEAR OFF SOME BITS
;SAVE CSR NUMBER

CVMJUAAQ MSV11-J MEMORY DIAG.
MACRO v05.01b Fridag 15 Feb-85 16:10
SUBR
GET CSR INFORMATION FROM CONFIGURATION TABL
9315 032722

PCONFIG:SUBTST
L

Page 292

<<SUBR

PRINT CONFIGURATION MAP>>

SUBR

PRINT CONFIGURATION MAP

Ll L

; *SUBTEST

SEQ 0268

T T

I I,T,mm

, I ImMmMITmMmMMTTMTM

T
I
T T T
I
T I
I
e
ImNnNImnmMmmmmITTIT

9316 032722
032722
032726
032734
032740
032746
032754
032760
032766

013746
013746
010046
010637
012737
012737
017700
042737
052777

033334
033302
000340
147664
000200
000100

9324 032774
032774

104401

065123

9325 033000
033000

104401

065205

9326 033004
033004

104401

065262

022737
002006

000060

032777
001402
000137

000020

9317
9318
9319
9320
9321
gggg

032732

9327 033010
9328 033016
9329

9330 033020
033020
033026
033030
033034
9331 033034
9332 033040

9333 033042

012700
010004

000060
000062

MOV
MOV
MOV
MOV
BIC
BIS

SP,PCONFS
#PCONF2, TKVEC
#340,TKVEC+2
3$TKB,RO
#BIT7,PSW
#B176,9¢TKS

TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
TYPE

MSGOO1
,MSGOO1
CRF
MSGO02
,MSGO02
CRF
MSGO03

.DSABL
cMP
BGE

CRF
#60,LASTBANK
NOOJ

TYPEIT

002556

;SAVE LAST GOOD SP

NOOU:

MOV
MOV

CLEAR

033046

104401

065367

9335
9336
9337
9338

033052
033056
033064
033066
033066

004737
022737
002106

033336
000060

,MSGO0O3

104401

002660

9339 033072
033072

104401

066076

9340 033076
033076

104401

065570

9341 033102
033102

104401

002660

104401

066076

BIT #S5W4,aSWR
BEQ L333
JMP PCONF1

L333:;:;::::

#60. ,R0O
RO,R4

R1,R3

CLR
CLP

R1
R3

TYPE
TYPEIT

MSGO04
,MSGO04

CALL
cMP
BGE
TYPE
TYPEIT

TCONFIG
#60,LASTBANK
PCONF2
$CRLF
,$CRLF

;GO TYPE CONFIGURATION (1ST HALF)

M3G017
,MSGO17

;PRINT SPACE(S)

.DSABL

002556

MOV TKVEC, -(SP)
MOV TKVEC+2,-(SP)
MOV RO, -(SP)

;IKILL ANY OLD INTERRUPT
;LOWER CPyU PRIORITY TO 140
;ENABLE KEYBOARD INTERRUPTS

;IF FAT PAPER ON TERMINAL GOTO 1¢
IF #SW4 SET.IN aSWR THEN JUMPTO PCCNF1

147610

000074

005001
005003

033106

177776
147646

TKVEC,TKVEC+2,R0

033242

033042
033044
9334 033046

9342 033106

000060
000062

PUSH

.DSABL

TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
TYPE

TYPEIT

CRF

CRF
MSG11A
,MSG11A
CRF
$CRLF
,S$CRLF
CRF
MSGO17
,MS5G017

;PRINT SPACE(S)

CVMUAAQ MSV11-J MEMORY DIAG.
PRINT CONFIGURATION MAP
SUBR

MACRO v05.01b Friday

15 Feb-85 16:10

104401

065656

.DSABL
TYPE
TYPEIT

033116

104401

002660

TYPE
TYPEIT

9345 033122
033122

103401

066076

033112

9344 033116

9346 033126

9347
9348
9349
9350
9351
9352

033126

104401

065744

033132
033136
033140
033144
033152
033154
033154

012701
010103
004737
022737
002053

000360

9353 033160

033160

9354 033164
033164
9355 033170

033170

9356 033174

033174

9357 033200

033200

9358 033204

033204

9359 033210

033210

9360 033214

033336
000170

104401

002660

104401

066076

.DSABL

CRF

TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
MoV
MOV
CALL
CMP
BGE
TYPE
TYPEIT
.DSABL
TYPE
TYPEIT

.DSABL

066041

104401

002660

104401

066076

TYPEIT

.DSABL
TYPE

104401

066043

.DSABL
TYPE
TYPEIT

104401

002660

TYPE
TYPEIT

066076

TYPE
TYPEIT

104401

066045

033220
033224
033226
033232
033234
033240

012701
010103
012700
010004
004737
000420

000740

9368 033242
9369 033246
9370 033250

012700
010004

033250
033252

NOOJ1:

005001
0050C3

000170

,M5G017

CRF

,M5G012

CRF
#60.%2%2,R1
R1,R3

TCONFIG
#170,LASTBANK
PCONF2

$CRLF

+$CRLF

CRF

MSGO17

,M5GO17

CLEAR

;PRINT SPACE(S)

CRF

MSG11B

,MSG11B

CRF
$CRLF

, $CRLF

CRF

MSGO17

,MSGO17

;PRINT SPACE(S)

CRF

MSG11C

,M5G11C

CRF

MOV
MOV

;PRINT SPACE(S)

M5GO12

.DSABL

CALL
BR

PCONF1:

MSGO17

CRF
$CRLF

MOV
MOV

033336

. $CRLF

.DSABL

.DSABL
TYPE
TYPEIT
.DSABL
MOV
MOV

000010

,MSGO11

CRF
$CRLF

104401

033214

9361
9362
9363
9364
9365
9366
9367

002556

CRF
MSGO11

.DSABL

TYPE
TYPEIT
.DSABL
TYPE
TYPEIT

104401

Page 292-1

SEQ 0269

I
9343 033112

, $CRLF

MSGO17

,MSGO17

;PRINT SPACE(S)

CRF

MSG11D

,MS5G11D

CRF

#740,R1

R1,R3
#8.,RO

RO,R4
TCONFIG
PCONF2

#120. ,RO
RO,R4
R1,R3

CLR
CLR

Rl
R3

)

CVHJARO MSV11-J MEMORY DIAG.
MACRO v05.01b Friday 15 Feb-85 16:10
SUBR
PRINT CONFIGURATION MAP
9371 033254
033254

104401

066060

9372 033260
033260

104401

065656

9373 033264
033264

104401

065367

9374 033270
033270

104401

065744

9375 033274
gg;g 033300

004737
000721

033336

9378 033302
9379 033306

013706
042777

033334
000100

012600
012637
012637
000207

000062
000060

9380 033314
9381 033320
033320
033322
033326
9382 033332
9383
9384 033334

117700

000000

147324

TYPE
TYPEIT
.0SABL
TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
CALL
BR

147326

PCONF2: MOV
BIiC

MovB
PoP

Page 292 2

SEQ 0270

MSGO14
,MS5GO14
CRF
MSGO11
,MSGO11
CRF
MSG004
,MSGOO4
CRF
MSGO12
,MSGO12
CRF
TCONFIG
NOOJ1

: SPACE

PCONFS, SP
#BIT6,d$TKS

;RESTORE STACK

3$TKB,RO
RO, TKVEC+2, TKVEC

;READ CHAR TO KILL FLAG
MOV (SP)+,RO
MOV (SP)+,TKVEC.?2
MOV (SP).,TKVEC

RETURN
PCONFS:

;STACK SAVED HERE!

CVMJUAAO MSV1l-J ME MORY DIAG.

SUBR

C ONF IGURATION MAP

MACRO V05.01b Friday 15-Feb-85 16:10

Pege 294

SEQ 0271
SuUBTST

9387 033336

<<SUBR

TYPE CONFIGURATION>>

;58S SRS S SRR SR SRR R A SRS REEREE

;*sSUBTEST
Al

9388
9389
9390

9391
9392
9393
9394
9395
9396
9397
9398
9399
9400 033336
9401 033344

IS i3 22 222223222233 323 3238 2222

382232223

34333232

;CALL:
H
;

MOV
MOV
MOV

aN,RO
RO,R4
SK.R1

;N=NUMBER OF CHARACTERS
; BACKUP
;sINDEX CONSTANT

H
H

CALL
RETURN

TCONFIG

;ACTUAL CALL
sONLY RETURN

MOV
L

3233

SR AS R A SRR RS R R AT R RA AR

R1,.R3

;%% ERROR

033344

104401

065475

9402 033350
9403 033356
9404 033360
033360

032761
001403

000001

104401

066056

9405 033364
9406 033366

000402

033366

104401

066060

9407 033372

000004

010400
010301

TCONFIG:MOV
TYPE
TYPEIT

x»xx

002664

14:

.DSABL
BIT
BEQ
TYPE

CRF
#BIT0,CONFIG(R1)
2%
MSGO13

.DSABL
BR

CRF
34

TYPEIT
.DSABL
ADD
soB

,MSGO14
CRF
#4 R1
RO,1$

TYPEIT

2%:
3¢

#340,PSW
MS5G00S
,MSGOOS

TYPE

MOV
MOV

,MSGO13

MSGO014

R4 ,RO
R3.R1

SUCGREOE SO OOOOS

EEE GOS0 OO0 R

: BACKUP

R Il
s ]

177776

R U

R EREREREEREEREEEEEERE LRSS ST E R ER OS2

sekRkRRkEREk

000340

9409 033400
9410 033402

S SRS RERRARERE B EREEEEBREENE RN

TYPE CONFIGURATION

s 05 RE S

012737

9408 033376

I AL

SUBR

;DISABLE INTERUPTS

;ERROR ON THIS BANK?
;NO - SKIP
:PRINT "x*

:PRINT SPACE
;BUMP POINTER
;LOOP YWTIL DONE

LTI

CVMJUAAO MSV11-J MEMORY DIAG.
TYPE CONFIGURATION
SUBR

MACRO v05.01b Fridey 15-Feb-85 16:10

Peage 296

SEQ 0272

9413
9414

;6685608
kE Sk ¢S

9415
9416
9417 033404
9418 033412
9419 033420
033420
9420 033424

033424
033430
033432
033434
9421 033434
9422 033436
9423
9424
9425

;8% INTERLEAVE #s
BRit

012737
112737

000340
000040

104401

066062

005737
001401
000207

002372

177776
066062

TCFIG1:

¢’

,MSGO15

MSGO15
,MSGO15

MOV
MoV

;MOVE AR BLANK IN TO BE PRINTED

TST NOTAB
BEQ L334

R4,RO
R3,R1

(REERRERRRERRkR
Rk

065544

033444
033452
033454
033460
033462
033466
033472
033474
033474
033500
9437 033502
033502
033506
9438 033510
9439 033516
033516
033520
9440 033520
9441 033526
033526
9442 033526
033326
0333530
9443 033530
9444 033536
033536
9445 033536
9446 033540
9447 033546
033546

033761
001432
016105
000305
042705
020527
003022

002106

033552

;THIS IS AN ENTRY POINT FROM ERROR REPORTS
#340,PSW
;DISABLE INTERUPTS

MOV
Move

.DSABL
CRF
IF NOTAB NE #0 THEN $RETURN

010400
010301

104401

9448 033552

d Lt

RTS PC

033440

9429
9430
9431
9432
9433
9434
9435
9436

TYPE
TYPEIT

9426
9427

9428 033440

002664

TCFIG2:

177770
000003
000001

032705
001404
112737

000002
000120

MEMORY

il Ittt
ILs

.ENABL
TYPE
TYPEIT

002666

032705
001413

;«%x

000105

LSB
MSGO09

,MSGOOS

CRF

BEQ
MOV
SWAB
8IC
cMP

174
CONFIG+2(R1),RS
RS
#tC7,RS
RS, 03

B8IT

CPUBIT,CONFIG(R1)

B8GT

174

IF #BITO SET.IN RS
IF #BIT1 SET.IN RS
MOvB
ELSE

066062

¢'P,MSGO1S

#'E,M56015

000403
112737

000040

104401

066062

005737

002372

066062

#'P,MSGO15

END
17%:
8

;IT IS A MSV11-P

;IT IS A MSVIL1-JU

TYPE
TYPEIT
.DSABL

MSGO15S
,MSGO15
CRF

BR L337

L336::::::;

L337:5:3:543

BR L340

L335:::::::
;IT IS A MSVii-L/P

)

B8R

MOvVB

B8IT #BITO,RS
BEQ L335
;IS IT A MSV11-P OR A MSV11-U?2?
BIT #8IT1,RS
BEQ L336

)

MOovB

066062

;IS IT AN ECC MEMORY??7??

ELSE
000120

;GET MEMORY TYPE
;CLEAR NON INTERESTING BITS
;IS IT A LEGAL MEMORY TYPE

Move
END

066062

00C403

112737

=»x

.OSABL

000403

112737

TYPE

L340:;:;::::4

,MSG015

IF NOTAB NE #0 THEN $RETURN

15T NCTAB

’CVHJAAO MSV11-J MEMORY DIAG.
SUBR
TYPE CONFIGURATION
033556
033560
033562
9449 033562
9450 033566

9451 033570

062701
077052
010400
010301

000004

066064

9459 033600
9460 033606

112737
016105

000040
002664

MOV
.DSABL

032705

001414
042705

062705
062705
110537

000007
000060
066062

104401

066062

005737

002372

9471 033654
033654
033660
033662
033664

9472
9473
9474
g:;g

033664
033670
033672
033674

001401

TYPE
TYPEIT
.DSABL
TCFIG3: MOVB
MOV

B8IT

8EQ
BIC

170377

9467
9468
9469
9470

100002

066062

000002

000011

033650

10¢:
164

;BUMP POINTER
;LOOP UNTIL DONE

MSGO16
,MS5016
CRF
#' ,MSGO1S
CONFIG(R1),RS

#8IT1,RS

SWAB
CMP

RS
#9.,RS

ADD
ADD
MOVB
TYPE

#7,RS
#60,RS
RS,MSGO1S
MSGO1S

104

TYPEIT

;MAKE ASCII
;PLUG INTO MEMORY

,MS5G015

CRF
.DSABL
IF NOTAB NE #0 THEN $RETURN

TST NOTAB

BEQ L342

000207

062701
077035
010400
010301

000004

ADD
s0B
MOV
MOV
R

9478

#4,R1
RO, TCFIG3
R4 ,RO
R3.R1
ITI T IT

;BUMP POINTER

;%% PROTECTED =

9479

9480 033676
033676

94 ,R1
RO, TCFIG2
R4,RO
R3,R1
LSB

BEQ L34}
RTS PC
L341:;::;;;:;

164
#tC7400,R5

BPL.

9477

104401

065556

033702
033706
033710
033716
033716

105761
100006
112737

002664
000120

104401

066062

9485 033722
9486 033724

000402

033724

104401

066060

9487 033730
9488 033734

062701
077016

000004

9481
9482
9483
9484

SEQ 0273

;SRR RERES

000305
022705

033634
033640
033644
033650

Page 296-1

seRRRRREES
;*¢ CSR »s

9464 033624
9465 033626

9466 033632

RDD
S08

MOV

104401

9462 033616
9463 033620

MACRO V05.01b Friday 15-Feb-85 16:10

001401
000207

9452 033572
9453
9454
9455
9456
9457
9458 033574
033574

9461 033612

TYPE
TYPEIT

11%:
066062

13¢:

14$:
15¢:

.DSABL.
1578
8PL
MOV8
TYPE
TYPEIT
.DSABL
BR
TYPE

TYPEIT
.DSABL
ADD
508

MSGO10
,MSGO10

CRF
CONFIG(R1)

144
#'P,M5G015

MSGO15
,MSGO1S
CRF
15¢
MSGO14
,MSGO14
CRF

#4 R1
RO, 11¢

;BANK PROTECTED?
;NO - SKIP

;PRINT SPACE
;BUMP POINTER
;:LOOP UNTIL DONE

RTS PC
L342:;:::::

CVMJAARO MSvV11-J MEMORY DIAG.
SUBR
TYPE CONFIGURATION
9489 033736
9490 033740
9491 033742

010400
010301
000207

MACRO V05.01b Friday 1S feb-85 16:10
MOV
MOV
RETURN

R4,RO
R3,R1

Page 296 2

SEQ 0274

CVMJAAQ MSV11-J MEMORY DIAG.
TRAP

PARITY ERROR HANDLER

MACRO V05.01b Friday

Page 298

SEQ 0275
.SBTTL

9494
9495
9496
9497
9498
9199
9500
9501
9502
9503
9504
9305

9506
9507 033744
9508 033752
9509 033754
9510 033760
9511 033762
9512 033770
9513 033772
033772
9514 034000
9515 034004
9516 034010
9517 034016
9518 034020
9519 034026
9520 034030
9521 034034
9522 034036
9523 034042
034042
034046

15-Feb-85 16:10

TRAP

PARITY ERROR HANDLER
s

;VECTOR TO HERE FROM TRAPS T0 114
; IGNORE ERRORS BUT COUNT IF NOPAR FLAG = 1.
e

CoDE

022737
001003
005237
000002
022737
001013
012737
004737
063716
042766
000002
022737
001003
013716
000002
004737

005237
104032

002076

P ARITY: cHP

000002

002076

14:

177777
034152
002326

002144

000001
002072

000004

000002

000003

002076

2%:

002304

034152
002064

COUNT ERROR
SET "ABORT" / SETUF

RETURN VIA

"BADPC” / RETURN VIA PCBUMP
;COUNTING PARITY ERRORS?
;NO - SKIP
;PARITY ERROR COUNTER + 1

CMP
BNE
SET

#2 ,NOPAR
2%
ABORTFLAG

;ACTION CODE = 2 ?
;NO
SKIP
; YES

CALL
ADD
BIC
RTI
CMP
BNE
MOV
RTI

BADSTACK
PCBUMP, (SP)
#8IT2,2(SP)

CALL

"PARTHERE"

#1,NOPAR
14
PARCNT

FATAL
INC
ERROR
.DSABL

TRAP

BNE
INC

RT1

ACTION
PRINT UNEXPECTED PARITY

1
2
3

MOV
#-1,ARBORTFLAG
;FIND BAD SP,PC,PSW OFF STACK
;UPDATE RETURN PC
:SHOW FAILURE BY .NE.

#3,NOPAR
34
PARTHERE, (SP)

;ACTION CODE - 3 ?
iNO - SKIP

ggDSTACK

;FIND BAD SP,PC,PSW OFF STACK

FggAL$

;SET FATAL

CRF

INDICATOR

MACRO V05.01b Friday 15 Feb-85 16:10
CVMJAROD M5V11-J MEMORY DIAG.
TRAP
NON-EXISTANT MEMORY (HOLES) HANDLER

9526
9527
9528
9529
9530
9531
9532
9533
9534 034050
9535 034056
9536 034060
9537 034064
9538 034072
9539 034074

9540
9541
9542
9543
9544
9545

034100
034102
034106
034112

.SBTTL

9549
9550

;
i 1)
; 2)

022737
001011

005237
022737
001002
010037
000002
005237
012701
000002

000001

002100

002070
000001

002070

NONEXIST:CMP

002070
000001

2%:

004737

034152

005237
104006

002064

#1,NEMCNT

;FIRST ERROR?

BNE

2$¥

RO, ADDRESS

INC

NEMCNT

g?¥

;COUNTING NON EXISTANT MEMORY ERRORS?

24
NEMCNT

CMP

002034

#1,NONEM

BNE
INC

.SBTTL

TIMEOUT :CALL
FATAL
INC

ERRCR
.OSABL

.SBTTL

MMTRAP:

CALL
FATAL

034132
034136

005237
104007

002064

9553
9554 034140

004737

034152

INC
ERROR
.DSABL
.SBTTL
PDP1105:CALL

005237
104005

002064

FATAL

INC
ERROR
.DSABL

9556
9562
9563 034152

:NO - SKIP
;BUMP NON-EXISTANT MEMORY COUNTER
:NO - SKIP

;ASSUME RO CONTAINS THE ADDRESS ACCESSED

;:BUMP NON-EXISTANT MEMORY COUNTER

#1,R1

2232222222222

034152

;:DUMMY UP R1 FOR A FORCED SOB EXIT

23222232

TRAP

BADSTACK
6
FATAL $

FATALS
+7
CRF
TRAP

BADSTACK
5
FATALS
+5
CRF

ittt

it ittt

;SET FATAL INDICATOR

BADSTACK
7

:FIND BAD SP,PC,PSW OFF STACK

+6
CRF

TRAP

TIMEOUT (TRAP TO 4) HANDLER

MEMORY MANAGEMENT (TRAP TO 250) HANDLER

;FIND BAD SP,PC,PSW OFF STACK

;SET FATAL INDICATOR
RESERVED INSTRUCTION HANDLER

;FIND BAD SP,PC,PSW OFF STACK

;:SET FATAL INDICATOR

BADSTACK:SUBTST <<FIND BAD SP, PC, & PSW FROM STACK»>>
e

; *SUBTEST

034152
034156
034164
034172
034200

LTI ITTY

T
L
Y
A
e
N
T T
T

004737

9555 034144
034144
034150

CODE IN NONEM DETERMINES ACTION AS FOLLOWS:
IGNORE ERRORS BUT COUNT IF NONEM (NO NON-EXISTANT MEMORY) FLAG = 1.
TO EXIT PATTERN O DURING SIZING IF NON-EXIST MEM ERROR

9551 034126

9564
9565
9566
93567
9568

;VECTOR TO HERE (SOMETIMES) FROM TRAPS TO 4

9552 034132

SEQ 0276

NON-EXISTANT MEMORY (HOLES) HANDLER

9546
9547 034114
9548 034120
034120
034124

TRAP

Page 300

010637
062737
016637
016637
000207

002026
000002
000002
000004

002026
002022
002032

FIND BAD SP, PC, & PSW FROM STACK
T

MOV
ADD

SP,BADSP
#2,BADSP

MOV
RETURN

4(SP),BADPSW

MOV

2(SP),BADPC

Ity

LTI

I
|

CVMJARQ MSV11-J_MEMORY DIAG.
KERNEL TRAP HANDLER
TRAP

9571
9572
9573
9574
9575
9576 034202
9577 034210
9578
9579
9580 034212
93581 034220
9582
9583
9584 034222
9585 034230
9586
9587
9588 034232
9589 034236
9590 034240
9591 034246
9592 034254
9593
9594
9595 034256
9596 034262
9597
9598 034264
9599 034272

MACRO V05.01b Friday

Fo6

15-Feb-85 16:10

Psge 302

SEQ 0277
.SBTTL
R

TRAP

KERNEL TRAP HANDLER
T

;KERNEL IS A TRAP THAT COMES HERE
R

042766
000002

140000

000002

$KERNEL :
Rii 22t

052737
000002

000001

177572

000001

177572

BIC

222222

.SBTTL
$ENERGIZE:BIS
RTI
it

042737
000002

RTI

222222222

002544

000001

002544

053737
000002

002550

177746

it it d

22y

TRAP
ENERGIZE TRAP HANDLER
#BITO,MMRO
2

Rttt

1¢:

.SBTTL
TST
BEQ
MOV
BIS
RTI

ittt

sttt

22222

2222223232332

223

1122322132332 31387]

TRAP
CACHON TRAP HANDLER
CACHKN
;IS THERE A CACHE
1$
;NO_- RETURN
CACHKN, CONTRL
;:SETUP CACHE AS PER CONSTANT (USUALLY 1 = FULLY ON)
#8170, CONTRL
;DISABLE TRAPS (BUT NOT ABORTS)

005737
001403

.SBTTL
TRAP
DEENERGIZE TRAP HANDLER
$DEENERGIZE
:BIC #BITO,MMRO
RTI
$CACHN:

177746
177746

#140000,2(SP)

i3 323323232 2328232333232

005737
001406
013737
052737
000002

$CACHF:

.SBTTL
TST
BEQ

TRAP
CACHKN
14

g%?

CACHKF ,CONTRL

CACHOFF TRAP HANDLER
;IS THERE A CACHE?
iNO - RETURN

; DISABLE TRAPS (NOT ABORTS), FORCE MISSES, FLUSH, BYPASS

CVMJAAO MSV11-J MEMORY DIAG.
TRAP

LOAD CSR TRAP HANDLER

MACRO VO05.0lb Friday 15-Feb-85 16:10

9602

9603
9604
9605 034274
034274
034276

9606 034300
9607 034304

034304
034310
9608 034312
9609 034316
9610 034320
9611 034324
9612 034330
9613 034334

9614
9615
9616
9617
9618

034336
034344
034346
034354
034362

034362
034364
3253 034366

9621
9622
9623 034370
034370
9624 034372
9625 034376
9626 034404
034404
9627 034406

.SBTTL

010046
010146

$LOADC:

013700

002152

005737
001021
005737
100007
113701
042701
020137
001404

002536

123737
001003
052737
013760

012600
000002

LOAD CSR TRAP HANDLER

002533
177740
002152
002532

002152

1%$:

020000
002150

002150
172100

2%:
3$:

;CREATE CSR ADDRESS

ST
BPL
MOVE
BIC
CMP

PGMCSR
14
PGMCSR+1,R1
#1C37,R1
R1,CSRNO

TST INHECC
BNE 3$
;PROGRAM IN INTERLEAVED SPACE?
:BRANCH IF NOT
; CHECK SECOND CSR
;CLEAR _UNNECESSARY BITS
;IS THIS THE CURRENT CSR?

CMPB
BNE
BIS
MOV
POP

PGMCSR,CSRNO
3$
#BIT13,CSR
CSR, CSRADD(RO)
R1,RO

;IS THIS THE CURRENT CSR?
:BRANCH IF NOT
;SET THE INHIBIT MODE POINTER TO
;LOAD THE CSR
;:RESTORE REGISTERS

BEQ

;DON'T WANT INH.

002150

RTI

CSRNO,
RO
CSRADD(RO),CSR
RO

1ST 16K

MOV (SP)+,R1
MOV (SP)+,RO

.SBTTL_
TRAP _ READ CSR TRAP HANDLER
;:READ THE CORRECT CSR INTO LOCATIONS CSR
$READC: PUSH
RO
MOV
MOV
POP

MODE POINTER ON

;BRANCH IF IT IS

RTI

002152
172100

MOV RO, -(SP)
MOV R1,-(SP)

CSRNO, RO

IF INHECC IS TRUE THEN GOTO 3$

002532

SEQ 0278

;LOAD CORRECT CSR WITH DATA IN CSR
;PROGRAM CSR'S ASSERT INHIBIT MODE POINTER WHEN LOADED
PUSH
RO,R1
: SAVE REGISTERS

MOV

012601
012600
000002

010046
013700
016037

TRAP

Page 304

MOV RO, -(SP)

;READ IT
MOV (SP)+,RO

CVMJARO MSV11-J MEMORY DIAG.
TRAP

TEST

MACRO V05.01b Friday 15-Feb 85 16:10

(R1) & READ CSR CAREFULLY

9629

9630 034410
034410
034412

9639 034452

010046
010246
010346
012700
063700
005002
005737
100007
113703
042703
020337
001404

9641 034462
9642 034464
9643 034470

001002
012702
004737

034414

9631 034416
9632 034422

9633 034426
9634 034430
9635 034434
9636 034436
9637 034442
9638 034446

9640 034454

9644
9645 034474

034474
034476
034500
9646 034502

123737

$TSTRD:

172100
002152

MOV
ADD

002533
000200
002152

002152

020000
034542

24:
38
5§

012603
012602
012600

034502
034510
034512
034520
9647 034522
9648 034530
034530

032737
001410
032737
001004
052766

9649 034532
9650 034540

042766

3625 034540

000002

9653 034542
9654 034544
034544

010210
053737

002552

177776

9655
9656
9657
9658

105711
042737
011037
000207

140000
002150

177776

034532

034540

034552
034554
034562
034566

1%:

000020

002150

100000

002150

000001

000002

000403

000001

000002

TRAP

RO,R2,R3

BEQ

BNE
MOV
CALL

3$
#BIT13,R2
TSTRD1

CMPB

SEQ 0279

TEST (R1) & READ CSR CAREFULLY

#CSRADD , RO
CSRNO,
RO
R2
PGMCSR
1$
PGMCSR+1,R3
#BIT7,R3
R3,CSRNO
2$

CLR
15T
BPL
MOVB
BIC
CHP

002532

.SBTTL

PUSH

Page 305

;CREATE CSR ADDRESS

PGMCSR,CSRNO

;IF SINGLE BIT ERROR ONLY POP
R3,R2,R0

SET CARRY BIT

IF #BIT4 SET.IN CSR AND #BIT1S5 OFF.IN CSR

BIS
ELSE

#BIT0,2(SP)

(R1)
#8I715!B1714,PSU
(RO),CSR

BIT
BEQ
BIT
BNE

#BIT4,CSR
L343
#BIT15,CSR
L343

L344:;;:;:;:;:;

RTI
TSTRD1: MOV
R2,(RO)
TESTAREA
ngABL gggTHODE.Psu

MOV (SP)+,R3
MOV (SP).,R2
MOV (SP).,RO

BR L344
L343:;;:;::;

BIC
#BITO0,2(SP)
END ;OF IF #BIT4

1578
BIC
MOV
RETURN

MOV RO, (SP)
MOV R2.-(5P)
MOV R3.-(SP)

;
:
;
;
;

;G0 TO SYSTEM TEST MODE

CVMJUAAQ MSV11-J MEMORY DIAG.
TRAP

_ MACRO V0S.01b Friday 15-Feb-85 16:10

ECC DISABLE ALL CSR'S TRAP HANDLER

9661

9662 034570
9663 034576
9664 034602

96635
9666 034604
9667 034612
9668 034614

9669
9670 034616
9671 034624
9672 034630

9673
9674 034632
9675 034640
9676 034642
9677
9678 034644
9679 034652
9680 034656
9681
9682 034660
9683 034666
9684 034670
9685
9686 034672
9687 034700
968’ 034706
968Y 034712
9690
9691 034714
9692 ,34722
9693 034730
9694 034732

012737
004737
000002

000002
035314

002150

012737
104425
000002

000002

002150

012737
004737
000002

000001
035314

002150

012737
104425
000002

000001

002150

012737
004737
000002

000003
035314

002150

012737
104425
000002

000003

002150

013737

002314

002150

052737

000006

013737

002314

004737
000002

052737

104425
000002

035314

000006

002150

Page 307

SEQ 0280

.SBTTL
$ECCDIS:MOV
CALL
RTI
.SBTTL
$ECCIDIS:MOV
LOADCSR
RTI
.SBTTL
$ECCINIT:MOV
CALL
RTI
.SBTTL
$ECCI1INIT:MOV
LOADCSR
RTI
.SBTTL
$ENASBE:MOV
CALL
RTI
.SBTTL
$ENA1SBE:MOV
LOADCSR
RTI
.SBTTL
$CBCSR: MOV

BIS

TRAP
ECC DISABLE ALL CSR'S TRAP HANDLER
#8IT1,CSR

CSROUT
TRAP

TRAP
INITIALIZE ALL CSR'S TRAP HANDLER
#BITO,CSR
CSRoUT
TRAP
INITIALIZE 1 SELECTED CSR TRAP HANDLER
#BITO,CSR
TRAP
ENABLE SBE PARITY TRAPS ON ALL CSR'S
#BITO!BIT1,CSR

CSROUT

TRAP
ENABLE SBE PARITY TRAPS ON 1 SELECTED CSR
#BITO!BIT1,CSR

TRAP
WRITE CHECKBITS THRU ALL CSR'S TRAP HANDLER
CHECK,CSR
;BITS 11-5

#B8I71!BIT2,CSR

CALL CSROUT
RTI
.SBTTL

$CB1CSR:MOV

BIS

LOADCSR
RTI

ECC DISABLE OF 1 SELECTED CSR TRAP HANDLER

#BIT1,CSR

TRAP

; CHECK MODE

WRITE CHECKBITS THRU 1 SELECTED CSR TRAP HANDLER

CHECK,CSR

#BIT1!'BIT2,CSR

;8ITS 11-5

; CHECK MODE

CVMJAAO MSV11-J MEMORY DIAG.
TRAP
WAS THERE A SBE ON ANY CSR TRAP HANDLER

MACRO v05.01b Friday

9697
9698 034734

034734
034736
9699 034740
9700 034744
9701 034746
034746
9702 034746
034746
034752
9703 034752
9704 034754

.SBTTL

010146
010446
013701
005004

005037

002224

WAS THERE A SBE ON ANY CSR

iRAP HANDLER
MOV R1,-(SP)

TOTCSRS,R1

CLR

FOR CSRNO

002152

ASL

ON.ERROR

034760
034766
9707 034770
034770
9708 034774
034774
9709 034776
034776
9710 034776
034776
9711 034776
034776
035000
9712 035002
035002
035010
035016
035020
9713 035020
035020
9714 035020
9715 035022
035022
035024
9716 035026
035026
9717 035030
9718 035036
035036
035040
9719 035040
9720 035046
035046
9721 035046

032737
001403

000020

012704

177777

035050
035052
035060
035066
035070

309

;:GET CSR'S BYTE

BEGIN LWSBE

103010
104426

9722
9723
9724
9725
9726
9727
9728

;§A54

MoV

006301

#0 TO #36 BY #2

IF #BIT4 SET.IN CSR

002150

SET

END

000002
002152

002152
000036

EMD

;0F FOR CSRNO

ROR
POP

012604
012601

103004
052766

000002

000403
042766

000001

000002

000001
000020

000002

000001

000002

002150

L345::;:::::
TST Rl
BEQ ES7?

CMP CSRNO, #36
BLE 860
€60::::::::

R4
R4,R1

;SET C BIT FOR ERROR

ES7:55::4:
MOV (SP).,R4
MOV (SP).,R1

BCC L347

#BIT0,2(SP)

BR L350

L347:55555:

BIC
#BIT0,2(SP)
END ;O0F ON.ERROR

RTI

000002

104426
042766
032737
001403
052766

BIS
ELSE

#-1,R4

ADD #2,CSRNQ

ON.ERROR
000001

BIT #BIT4,CSR
BEQ L346

L346:::::::

;0F ON.ERROR

END LWSBE

006004

CLR CSRNO
B60:;:::::

BR ES57

;OF IF #BIT4

IF R1 EQ #0 THEN LEAVE LWSBE

005701
001407

BS?::5::55

MOV

LEAVE LWSBE
END

MOV R4, -(SP)

BCC L34S

READCSR

000411

062737
023727
003755

Page

SEQ 0281

$WASSBE
: PUSH

034754

9705 034756
9706 034760

15-Feb-85 16:10

.SBTTL

TRAP

BIT
BEQ
BIS

g?IT4.CSR

L350:;:::::

WAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER

;ON RETURN IF CARRY IS SET THERE WAS A SBE
SBE
: READCSR
$WAS1
#B8170,2(SP)
;CLR C BIT ON STACK
8IC

#B8I70,2(SP)

;SET C BIT ON STACK

CVMUAAO MSV11-J MEMORY DIAG.
TRAP

WAS

THERE A SBE IN 1

9729 035076

000002

MACRO V05.01b Friday 15-Feb 85 16:10

SELECTED CSR TRAP HANDLER

1$:

RTI

Page 309 1

SEQ 0282

MACRO V05.01b Friday 1S Feb 85 16:10
CVMJAAQD MSV11-J MEMORY DIAG.
TRAP
WA> IMERE A DBE ON ANY CSR TRAP HANDLZR

9732
9733 035100

9734
9735
9736

9737

035100
035102
035104
035110
035i12
035112
035112

035112

035116
9738 035116
9739 035120
035120
9740 035122
9741 035124
035124
035132
9742 035134
035134
9743 035140
035140
9744 035142
035142
9745 035142
035142
9746 035142
035142
035144
9747 035146
035146
035154
035162
035164
9748 035164
035164
9749 035164
9750 035166
035166
035170
9751 035172
035172
9752 035174
9753 035202
035202
035204
9754 035204
9755 035212
035212
9756 035212

9757
9758
9759 035214
9760 035216
9761 035222
9762 035224

9763 035232

010146
010446
013701
005004

005037

.SBTTL
$WASDBE : PUSH
002224

TRAP
R1,R4

MOV

002152

006301

ASL

032737
001403

100000

012704

1777717

CSR'S BYTE

READCSR
IF #BIT15 SET.IN CSR

002150

SET

END

;OF IF

000002
002152

002152
000036

END

012604
012601

103004
052766

000002

000403
042766

000001

000002

ELSE

;SET C BIT FOR ERROR

000002

#BIT0,2(SP

E6l::5:5:::

BCC L353

L353:5::54:

#BIT0,2(SP)

TRAP

: READCSR
$WAS1DBE
TST
CSR
BPL
3

g%%

TST Rl

MOV (SP)+,.R4
MOV (SP).,R1

L354:;::::;
WAS THERE A DBE ON 1 SELECTED CSR TRAP HANDLER

;ON RETURN IF CARRY IS SET THERE WAS A DBE

000001

L35 :55::::

ADD #2,CSRNO
CMP CSRNO, #36
BLE B62

;OF ON.ERROR

.SBTTL

002150

#-1,R4

BR L354

BIC

END

RTI

000002

104426
005737
100004
052766

R4
R4,R1

BIS

B8IT #BIT15,CSR
BEQ L352

E62:;::::::

ON.ERROR
000001

8CC L351

BEQ E61

;0F FOR CSRNO

ROR
POP

CLR CSRNO
B62:;;:::::

L352:::::3::

;0F ON.ERROR

END LWDBE

006004

B6l:::::::

BR E61

#BIT4

IF R1 EQ #0 THEN LEAVE LWDBE

005701
001407

(SP;

MOV R4, -(SP

MOV

LEAVE LWDBE

000411

062737
023727
003755

:GET

#0 TO #36 BY

ON.ERROR

103010
104426

SEQ 0283

MOV R1,

TOTCSRS,R1

311

WAS THERE A DBE ON ANY CSR TRAP HANDLER

R4
CLR
BEGIN LWDBE

FCR CSRNO

Page

#B8170,2(SP)

;DBE?

;NO - SKIP

;SET C BIT ON STACK

CVHMJUAAQ MSV11-J MEMORY DIAG.
TRAP

MACRO v05.01b Friday

15-Feb-85 16:10

WAS THERE A DBE ON 1 SELECTED CSR TRAP HANDLER

9764 035234
9765 035242

042766
000002

000001

000002

3%:

8IC
RTI

#8170,2(SP)

Page 311-1
;CLR C BIT ON STACK

SEQ 0284

CVMJAAQ MSV11-J MEMORY DIAG.
TRAP
CLEAR ALL ECC CSR‘'S TRAP HANDLER

MACRC V05.01b Fridey

9768
9769 035244

035244

9770 033250
9771 035254
9772
9773 035256

9774
977%
9776
9777
9778
9779
9780
9781
9782

035256

035262
035264

035266
035274
035300

9783 035302
9784 035310
9785 035312

15-Feb-8S5

002150
035314

005037
104425
000002

002150

052737
004737
000002
052737
104425
000002

$CLRCSR:CLEAR

g?%L

.SBTTL
$CLRICSR:CLEAR

.SBTTL

000006

313

TRAP

CSR

CLEAR ALL ECC CSR'S TRAP HANDLER

CSROUT

TRAP
CSR

CLEAR 1 SELECTED CSR TRAP HANDLER

TRAP

ECC DISABLE,

LOADCSR
RT1

000006
035314

Page

SEQ 0285
.SBTTL

005037
004737
000002

16:10

002150

CHECK MODE,

;CHECKBITS ALREADY IN LOC “CSR*

$CHKDIS-B.S
CALL
RTI
.SBTTL

08IT1!BIT2,CSR
CSROUT

TRAP

CLR

CSR

CLR

CSR

& WRITE CHECKBITS IN ALL CSR'S TRAP HANDLER

;ECC DISABLE & DIAG CHECK MODE

ECC DISABLE, CHECK MODE, &€ WRITE CHECKBITS IN 1 SELECTED CSR

;CHECKBITS ALREADY IN LOC "CSR"
$CHK1DIS:BIS
#B8IT71!8172,CSR
;ECC DISABLE & DIAG CHECK MODE
k?gDCSR

CVMJUARO MSV11-J MEMORY DIAC.
TRAP

MACRO V05.01b Fridafnls-Feb-OS 16:10

ECC DISABLE, CHECK MODE, & WRITE CHECKBITS

9788 035314

1 SELECTED

CSROUT:

SUBTST

EE SRR ERERE R E RS RO

<<SUBR

; ¢SUBTEST

SUBR

9789 035314
035314
9790 035316
9791 035322
035322
9792 035322

035322
035326
9793 035326
9794 035330
035330
9795 035332
9796 035334
035334
9797 035334
035334
035336
9798 035340
035340
035346
035354
035356
9799 035356
035356
9800 035356
035356

9801 035360
9802
9803 035362

010146
013701

005037

103001
104425

035366
035372
035374
035376
9809 035404

9805
9806
9807
9808

035404
035406
9810 035410

T I

GRS R
I

000002
002152

END

002152
000036

PoP

8CC L35S

L355:;::::::
75T R1
BEG E63
ADD #2,CSRNO
CMP CSRNO,#36
BLE B64
£E64:;::::::

012601
012600
000002

MOV (SP).,R1

RETURN

PUSH

013701
006301
006301
042761

E63:;:::::

002102
020000

002666

MOV
ASL
ASL
8IC
poP
RTI

T T

CLR CSRNO
B64:;;;::;

;0F FOR CSRNO

$INVALID:

010046
010146

B63:::::::

:= #0 TO #36 8Y &2

END LCSROUT

012601
000207

GC SRR SRR OS OGNSR

MOV R1,-(SP)

IF R1 EQ #0 THEN LEAVE LCSROUT

005701
001407

RSN

;GET CSR'S BYTE

LOADCSR
END ;0F ON.ERROR

035362
035364

C S0 SR C RN

WRITE IN ALL CSR'S

ASL
ON.ERROR

; *SUBTEST
9804 035362

S S SR VS E R RN

FOR CSRNO

006301

062737
023727
003764

R LS RS

MOV
TOTCSRS ,R1
BEGIN LCSROUT

002152

SEQ 0286

WRITE IN ALL CSR'S>>

PUSH
002224

Peage 315

SUBTST

«<TRAP

TRAP

INVALIDATE BACKGROUND PATTERN

I
T

INVALIDATE BACKGROUND PATTERN>>
I

N I I N

T T

T
I

RO.R1

BANK,R1
R1
R1
#BIT13,CONFIG+2(R1)
R1,.RO

MOV RO,-(SP)
MOV R1,-(SP)

MOV (SP).,R1
MOV (SP).,.RO

CVMJAAD MSV11-J MEMORY DIAG.
TRAP

MACRO v0S5.01b Friday 15-Feb-85 16:10

INVALIDATE BACKGROUND PATTERN

9812 035412

$ERRGEN:
1 0880

SUBTST<<TRAP

SR ERR RSB R R EAS RS RER SRR

; ¢SUBTEST
I E

9813 035412
035412
035414

9814
9815

9816
9817

9818
9819
9820
9821

035416
035420
035422
035426
035432
035434

035440
035442
035446
035452

010046
010146
010246
010346
013703
005737

001003
013700

000402
013700
072027
005737

7822 035456
9823 035460

001002
042700

9825
9826
9827
9828
9829

006201
006201
006201
042701
060100

9824 035464
035466
035470
035472
035474
035500

9830
9831 035502

9832 035506
9833 035512

9834 035516
9835 035522
9836 035524
9837 035530
9838 035532
035532

9839 035534
9840 035540
9841 035546
9842 035552

9843
9844
9845
9846
9847
9848
9849
9850
9851
9852
9853
9854
9855
9856
9857
9858
9859

035560
035564
035566
035570
035572
035572

035574
035576
035600
035604
035606
035612
035616
035620
035624
035626
035630
035634

000301

002104
002456

2233322 23

177646
177773
002132

63:
74

177600

1$:

2232228132

RO,R1,R2,R3

MOV
TST

BANKINDEX
,R3
NOSUPER

BR
MOV
ASH
TST

78
UIPAR3,RO
#-5,R0
EQFLAG

SWAB

BNE
BIC

SEQ 0287

GENERATE AND TEST ERROR ADDRESS>>
SR SRR R E RV R

AR SNBSS S E RO NS RNC SR A S RERAARBES GGG O ORS

GENERATE AND TEST ERROR ADDRESS

PUSH

BNE
MOV

172246

TRAP

Page 316

233322222332t 3311

6%
SIPAR3,RO

1
#1C177,R0

I 22

813233313

MOV
MOV
MOV
MOV

RO, -(SP)
R1,-(SP)
R2,-(SP)
R3,-(5P)

;GENERATE WHAT ERRCR ADDR SHOULD BE

:GET CURRENT ADDRESS BITS 11 AND 12

ASR
ASR
ASR
BIC
ADD

R1
R1
R1
21C2,R1
R1,RO

ASH

#-5,R1

002132

157
BNE
ST
BEQ
PUSH

NO22BIT
24
EQFLAG
23
RO

;IS THIS AN 11/83,11/23-B OR 11/23 ?
:BRANCH IF NOT NECESSARY
;IS IT EQB?
:BRANCH IF NOT
:SAVE GENERATED ERROR ADDRESS

002152
040000
172100
040000

MOV
8IS
MOV
BIC

CSRNO,R2
#BIT14,CSRADD(R2)
CSRADD(R2),RO
#BIT14,CSRADD(R2)

;GET CSR NUMBER
: TURN ON EQB BIT CAREFULLY
iGET CSR_CONTENTS
;TURN OFF EQB BIT CAREFULLY

177775

013701

002150

;ADD THEM TO THE ADJUSTED PAR VALUE
;GET ERROR ADDRESS FROM CSR UNDER TEST
MOV
CSR,R1

042701

177600

BIC

072127

005737
001024
005737
001421
010046

013702
052762
016200
042762

042700
006300
006300
060001
012600
020001
001420
005737
001411
062700
005737
001002
062700
020001
001404

005737
001001

177773

002454

177037

172100
172100

24:

002136
000100
002140

000100
002066

as:

#1C177.R1

BIC
ASL
ASL
ADD
POP

#1C740,R0
RO
RO
RO,R1
RO

cHP
BEQ
ST
BEQ
ADD
157
BNE
ADD
CHP
BEQ
TST
BNE

RO,R1
54
INTFLAG
)
£100,R0
INT64K
43
#100,R0
RO,R1
5%
SKPERR
5%

MOV RO, -(SP)

;CLEAR EVERYTHING BUT ERROR ADDR

;SHIFT ADDR BITS 18-21 INTO POSITION
;ADD TO CURRENT ERROR ADDRESS
MOV (SP)+,RO
;COMPARE REAL AND GENERATED ERR. ADDR.
:BRANCH IF THEY ARE THE SAME
: INTERLEAVED?
iNO - WE HAVE AN ERROR
;64K INTERLEAVED MEMORY?

;ARE WE SUPPOSED TO SKIP ERROR P.0.?
;YES - SKIP ERROR PRINTOUT

CVMJARO MSV11-J MEMORY DIAG.
TRAP

MACRO V0S.01b Friday 15-Feb 85 16:10

GENERATE AND TEST ERROR ADDRESS

9860 035636
9861 035640
9862 035644

104462
010137
005037

035650
035652
035654
035656
3864 035660

012603
012602
012601
012600
000002

9863 035650

002460
002066

PERR36
MOV
CLR

S$:

POP

$CBREG:
I3

SUBTST

221322 2333

; #SUBTEST
it

035662
035666
035674
035676

005037
052737
104425
000002

002150
000004

22233

$SYNREG:
i

21 E

223

SUBTST
i

; #SUBTEST

R3,R2,R1,R0O

9877

005037
052737
104425
000002

:RESTORE REGISTERS

<<TRAP
33332332223

MOV
MOV
MOV
MOV

2323223322322 2

002150
040004

002150

332222332223

323332233333 23 ]

ENABLE CHECKBIT REGISTER

2222223322333

2222222313232 2221223233

222322/

;
:ENABLE DIAGNOSTIC MODE
:LOAD CSR REGISTER
;

<<TRAP
822 233ttt

TRAP

(SP)<,R3
(SP)«.R2
(5P)-.R1
(5P)«.RO

ENABLE CHECKBIT REGISTER>>
0332222323222 33322

TRAP

A STt 22222 233222t

035700
035704
035712
035714

;ELSE PRINT ERROR ADDRESS ERROR
:SAVE CSR'S ERROR ADDRESS
:ENRBLE THE ERROR PRINTOUT AGAIN

R1,ERRADD
SKPERR

CLR
CSR
BIS
#8IT2,CSR
LOADCSR
RTI

002150

9872 035700

9873
9874
9875
9876

SEQ 0288

RTI

9866 035662

9867
9868
9869
gg;g

Page 316 1

ENABLE SYNDROME BIT REGISTER>>
i

ittt

CLR
CSR
BIS
#BIT14!BIT2,CSR
LOADCSR
RTI

s i

sl ii s

titisi

ittt

ENABLE SYNDROME BIT REGISTER
it

ittt

ettt

;
;ENABLE DIAGNOSTIC MODE
:LOAD CSR REGISTER
;

estsssiisiisyays
s

st issssy]

MACRO V05.01b friday 15-Feb 85 16:10

CVHMJAAQ MSV11-J MEMORY DIAG.
TRAP
ENABLE SYNODROME BIT REGISTER

SEQ 0289
SUBTST<<SUBR

9880 035716
HRAdd

T2 223

; sSUBTEST

i d

i1 2223

MAPPER>
>

2223222202332

2222332322

MAPPER

SUBR

232

ittt

22322

sttt

9884
9885
9886
9887
9888
9889
9890
9891 035716
035716
035720
035722
035724
035726
9892 035730
9893 035734
9894 035740
9895 035744
9896 035750
9897 035752
9898 035756
9899 035762
9900 035766
9901 035772
9902 035774
9903 035776
9904 036000
9905 036004
9906 036012
9907 036014
9908 036020
9909 036024
9910 0356030

1 BANK)

;IN R3 TO THE TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000 ;THE 11/83 ; USER VIRTUAL (60000 - 157777) FOR ALL OTHERS.

:CALL

MOV

;

RETURN

MAPPER:

PUSH

010046
010146
010246
010446

010546
012700

012701
012704
005737
001404
012701
012704
012702

012705

012021
010224
077503
012741
022737
001007
012704
012705
052724

077503

036032
036036
036040

022703
001516
072327

036044
036050
036054
036056
036062
036066
036070
036074

012701
005737
001402
012701
012702
010321
062703
077204

9924 036076
9925 036102
9926 036104
9927 036110
9928 036112

Rttt

ittt itttz i

; THIS SUBROUTINE MAPS THE MEMORY BANK (16K WORDS =

9881
9882
9883

9911
9912
9913
9914
9915
9916
9917
9918
9919
9920
9921
9922
9923

Page 318

005737

001442
162701
010102
062702

CALL

BANKNO , R3
MAPPER

I
il

2132
I

13T T Y

IgIY

Tt Y]

157777) FOR

;SET UP BANK ARGUEMENT
:ACTUAL CALL

:ONLY RETURN

; SET SUPERVISOR/USER UP FOR 1 TO 1 MAP
RO,R1,R2,R4,RS

MOV R2,-(
MOV R4, -(

172340
172240
172200
002456
177640
177600
077406
000010

177600
000005

44:

1$:

004010

30¢:

172206
000004
100000

35%:

000200

404

MOV
MOV
MOV
TST
BEQ
MOV
MoV
MOV
MOV

#KIPARO,RO
#SIPARO,R1
#SIPDRO,R4
NOSUPER
43
#UIPARO,R1
#UIPDRO,R4
#77406,R2
#8.,R5

;FIRST ADDRESS REGISTER
;FIRST DESCRIPTOR REGISTER
;CONSTANT FOR 4K PAGE, UP, R/W
; COUNTER

MOV
508
MoV
CMP
BNE
MOV
MOV

R2,(R4)+
R3,1¢
#177600, (R1)
#5,PROTYP
404
#SIPDRO+6,R4
#4.,RS

;PUT IN SUPERVISOR DESCRIPTOR
;LOOP TILL DONE
;CORRECT LAST FIELD FOR PERIPHERALS PAGE
;IS THIS A 11/73?
:BRANCH IF NOT
:POINT TO PDR 3
; COUNTER=4

MoV

ggg

(RO)+,(R1)+

ggl;%?.(R4)0
#200,R3

ASH

#9.,R3

172246
002456

MOV
TST

177646

MOV

#SIPAR3,R1
NOSUPER
5%
#UIPAR3 ,R1
#4 ,R2

000004

000200
002240
000010

000004

BEQ

5%:

2%:

; YES,

BRANCH

;PUT IN SUPERVISOR ADDRESS

;SET UNCONDITIONAL CACHE BYPASS IN PDR3-6

:SET UP SUPERVISOR/USER FOR TEST AREA

CHP

000011

;:FIRST AREA TO MAP TO
;FIRST ADDRESS REGISTER
;FIRST DESCRIPTOR REGISTER
; CAN WE USE SUPERVISOR MQDE?

MOV

3¢

MOV

R3,(R1)+

S0B
TST
8EQ
SuB

R2,2%
SPLTCSR
9%
#10,R1

ADD

MOV
ADD

#200,R3

R1,R2
#4 ,R2

;MAP NOTHING (1 TO 1)7?

;YES - SKIP

;BANK 1 SiARTS AT 100,000 LESS 6 LSB'S

;:FOR MEMORY MANAGEMENT = 1000
:SETUP FOR AUTO INCREMENTING
;D0 WE HAVE SUPERVISOR MODE?

;: YES - BRANCH

:SETUP FOR AUTO INCREMENTING

: COUNTER

;PLUG IN PAR INFO
:BUMP ADDRESS 4K

;LOOP TILL DONE

CVMJAAQ MSV11-J MEMORY DIAG.
MAPPER
SUBR

036276
036300
036302
036304
9969 036306
9970
9971 036310
036310
036312
036314
036316
036320
9972 036322
9973 036324
9974 036330
9975 036334

022737
001403
010200
010102

010001
012122
011112
013700
005737
001403
012700
000402
012700
005737
001403
012701
000402
012701
060021
060011

000001

15-Feb-85 16:10

cHP
BEQ

002240

10¢$:

002104
002140

MOV
MoV
MOV
MOV
MOV
MOV
TST

R2,RO
R1,R2
RO,R1
(R1)+,(R2)+
(R1),(R2)
BANKINDEX,RO
INT64K

MOV
BR
MoV
157

#4000,R0
12¢
#10000,R0
NOSUPER

MoV

#UIPARS,R1

MoV
ADD
RDD

#SIPARS,R1
RO, (R1)+
RO, (R1)

BEQ

004000
114:
12¢:

010000
002456

177652
172252

134
144

#1,SPLTCSR
104

BEQ
BR

114

134

144

;IF WE ONLY HAVE AN 124K SYSTEM, WE DON'T WANT TO TEST THE
;LAST 4K,

002556

94:

002454
000007

002102

000177

002102

002456

7%:

8%:

177652

177654

172252

172254

012605
012604
012602
012601
012600
000207
010046
010146
010246
010346
010446
005000
012701
012702
012703

CMP
BNE
757
BEQ

#7 ,LASTBANK
74
N022BIT
3¢

BNE
BR

34
8¢

chHpP

BNE
TST
BEQ
MoV
BR
MOV
poP

RETURN

$KMAP;

172340
077406
172300

WHERE THE @ BUS DEVICE PAGE IS.

INSTEAD,

THE

:PROGRAM WILL REMAP THE LAST 4K TO 8-12K. ALSQO, IF THERE
;IS A BANK 177 ON AN 11/83, THE PROGRAM WILL REMAP THE LAST
;4 TO 8-12K FOR THE SAME REASON.

CcMP

013737
000403
013737

000007

022737
001010
005737
001423
022737
001017
000404
022737
001012
005737
001404

Page 318-1

SEQ 0290

“w

9929 036116
9930 036124
9931 036126
9932 036130
9933 036132
9934 036134
9935 036136
9936 036140
9937 036144
9938 036150
9939 036152
9940 036156
9941 036160
9942 036164
9943 036170
9944 036172
9945 036176
9946 036200
9947 036204
9948 036206
9949
9950
9951
9952
9953
9954 036210
9955 036216
9956 036220
9957 036224
9958 036226
9959 036234
9960 036236
9961 036240
9962 036246
9963 036250
9964 036254
9965 036256
9966 036264
9967 036266
9968 036274
036274

MACRO V05.0'b Friday

.SBTTL

#7,BANK

:BANK 7?

:NO - BRANCH

#177,BANK

34
NOSUPER
6%
UIPARS,UIPARG

SIPARS,SIPARG
R5,R4,R2,R1,R0O
MOV
MOV
MOV
MOV

(SP).,RS
(SP)+,R4
(SP).,R2
(SP)+,R1

MOV
MOV
MOV
MOV
MOV

RO, -(SP)
R1,-(SP)
R2,-(SP)
R3,-(SP)
R4,-(SP)

MOV (SP).,RO

TRAP

MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER

PUSH

RO,R1,R2,R3,R4

CLR

MOV
MOV
MOV

;11/83,11/23-8 OR 23?
;BRANCH IF SO

#KIPARO,R1
#77406,R2
#KIPDRO,R3

:1ST ARER T0 MAP TO
;FIRST ADDRESS

;CONSTANT FOR 4K PAGE,UP,R/W
;1ST PAGE DESCRIPTOR REGISTER

CVHMJUAARO MSV11-J MEMORY DIAG.
TRAP

MAP KERNEL

9976 036340
9977 036344
9978 036346
9979 036350
9980 036354
9981 036356
9982 036362
9989 036366
036366

036370
036372
036374
036376
9990 036400

(ALMOST

012704
010021

010223
062700
077405
012741
012741
012604
012603
012602

012601
012600
000002

MACRO V05.01b Friday

1 TO 1)

000010
000200

177600
177400

TRAP HANDLER

15-Feb-85 16:10

Page 318-2

SEQ 0291
MOV
MOV
Mov
ADD

S08

MOV
MOV
PoOP

RTI

#8.,R4
RO,(R1)+
R2,(R3)#200,R0
R4,1¢
#177600, -(R1)
#177400, (R1)

R4,R3,R2,R1,R0

; COUNTER
;:PUT IN KERNEL ADDRESS
;PUT IN KERNEL DISCRIPTOR
:ADD ADDRESS CONSTANT FOR 4K CHANGE
;LOOP TILL DONE
; THE PERIPHERALS PAGE 70 KIPAR7
;AND NEXT LOWER PAGE TO KIPAR6

MOV (SP).,.R4
MOV (SP).,R3
MOV (SP).,R2
MOV (SP).,R1

MOV (SP)+,RO

CVMJRAQ MSV11-J MEMORY DIAG.
TRAP

MACRO V05.01b Friday 15-Feb 85 16:10

MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER

9993 036402

RELOCATE:SUBTST
R

036416
036422
036424
036430
036432
9996 036432
036432
036436
036440
036442
036444
9997 036444

036444
9998 036444
036444
9999 036444

036444
036452

10000 036452

10001 036456
036456
036462
036464
036470
036472
036476

10002
10007
10004
10005
10006
10007

032777
001402
000261
000207

010000

005737
001003
005737
001405

002352

005737
001402
000261
000207

056654

N N

012737

000001

004737

040052

005737
001431
005737
001026
005737
001023

002116

IF APTFLAG IS TRUE OR ACTFLAG IS TRUE

IF $PASS NE #0 THEN $RETURN ERROR

020000

100000

FOR BANK

I I I
I

MmO

IIImMmMT

NTn

B8IT &SW12,aSWR
BEQ L356
SEC
RTS PC
L356:;::::3:

TST
BNE
TST
BEQ
L357:;:::::

APTFLAG
L3357
ACTFLAG
L360

TST $PASS
BEQ L361
SEC
RTS PC
L361:;:::::
L360:;;::::

B65:::::::

:= #1 TO LASTBANK

MOV #1,BANK
B66:;;::::

CALL EXBANK

IF ACFLAG IS TRUE AND PFLAG IS FALSE AND BMFLAG IS FALSE
TST ACFLAG
BEQ L362
TST PFLAG
BNE L362
TST BMFLAG
BNE L362

002130

042761

052761

002102

002122

10009 036536

JF #SW12 SET.IN 3SWR THEN $RETURN ERROR

BEGIN LOADERBANK

002102
002432
002576
037442
037774
002104

002666
002606

000416

MOV
MOV
MOV
CALL
CALL
MOV

BANK,RO
RO, LOADBANK
LOADHOME
,R1
BANKMOV
NEWLOAD
BANKINDEX,R1

BIC

#BIT13,CONFIG+2(R1)

BIS

005237
023737
003734

002102
002102

002556

036570

032777
001002

020000

144046

;MAP NEW LOADER BANK IN KERNEL

#B8IT715,CONFIG+2(R1)

LEAVE LOADERBANK
END ;0F IF ACFLAG

036546
10012 036546
036546
036552
036560
036562
10013 036562

036562

END; OF IF APTFLAG

013700
010037
013701
004737
004737
013701

10010 036544
036544
10011 036546

002350

036500
036504
036510
036514
036520
036524

10008 036530

144226

RELOCATE PROGRAM

9994 036402
036402
036410
036412
036414
036416
9995 036416

SEQ 0292

<<RELOCATE PROGRAM>>

; *SUBTEST

Page 320

END ;0F FOR BANK

IF #5W13 OFF.IN QSWR

;MARK LOADER

; INVALIDATE BACKGROUND PATTERN
BR E65
L362:;:::::

INC BANK
CMP BANK,LASTBANK
BLE B66
E66:;::::3:

gag f§g§3.GSUR

CVMJAAQ MSV11-J MEMORY DIAG.

RELOCATE PROGRAM

10014 036572
036572

10015 036576
036576
10016 036576
036576
036600
10017 036602
036602
10018 036602

036602

036602
036606
036610
036612
036612
036616
10023 036616
036616
036624
10024 036626
036626
036634
10025 036636
036636
036644
10026 036646
036646
036654
10027 036656
036656
036664
036666
036674
10028
10029 036676

10019
10020
10021
10022

036676
10030 036700
036700
10031 036700
036700
036704
10032 036706
036706
10033 036714
10034 036720
036720
10035 036720
036720
10036 036720
036720
10037 036720
036720
10038 036720
036720
036724

104401

MACRO V05.01b Friday

15-Feb 85

16:10

Page

320-1

SEQ 0293
TYPE
MSGO75
TYPEIT
,MSGO75
CRF
.OSABL
END ;OF IF #SW13

070176

;RELOCATION NOT POSSIBLE

L363:;::::;

$RETURN ERROR

000261
000207

SEC

RTS PC

END LOADERBANK

E65:::::::

BEGIN FINDBANK

013702
006302
006302

002556

012701

000004

032761
001035

000201

032761
001031

100000

002666

033761
001425

002106

002664

032761
001460

000400

002666

032761
001405
032761
001001

000100

002664

000200

002664

MOV
LASTBANK,R2
ASL
R2
ASL
R2
;R2 <FOR Rl := #2%2 TO R2 BY #4

R2 *+ 4
MOV #2#2,R1

B70:::::::

002664

IF #BIT7!BITO OFF.IN CONFIG(R1)
IF #BIT1S5 OFF.IN CONFIG+2(R1)

IF CPUBIT SET.IN CONFIG(R1)

o'.llll’
;IF NO ERRORS & NOT PROGRAM SPACE
BIT @BIT7!BITO,CONFIG(R1)

:IF NOT LOADER BANK
; IF ACCESSABLE

BNE L364

BIT #BIT15,CONFIG+2(R1)
BNE L365

BIT CPUBIT,CONFIG(R1)
BEQ L366
IF #BIT8 OFF.IN CONFIG+2(R1) THEN LEAVE FINDBANK ;IF PARITY
BIT #BIT8,CONFIG+2(R1)
BEQ E67
IF #BITS SET.IN CONFIG(R1) AND #BIT7 OFF .IN CONFIG(R1)
BIT #BIT6,CONFIG(R1)
BEQ L367
BIT #BIT7,CONFIG(R1)
BNE L367

;IF 1ST PROTECTABLE ECC BANK

LEAVE FINDBANK

000447

END

005737
001005

002536

012737
010137

1777717
002540

002536

SET

INHECC

MOV

R1, INHBANK

END;

END

END
000004

;OF IF #BITé

IF INHECC IS FALSE

END

062701
020102

B67::::::;

END

MOV

& 1,INHECC

OF IF INHECC

;OF IF CPUBIT

;0F IF #BIT1S

;OF IF #BIT7

;0F FOR

ADD #4,R1

CMP R1,R2

CVMJAAO MSV11-J MEMORY DIAG.

MACRO V0S.01b Fridey

15-Feb 85 16:10

Page

320-2

RELOCATE PROGRAM

036726
036730
10039 036730
036730
036734
10040 036736
036736
036742
10041 036744
10042 036750
10043 036756
10044 036760
10045 036762
036762
10046 036762
036762
10047 036762
10048 036766
036766
036774
10049 036776
10050 037004
10051 037006
037006
10052 037012
037012
10053 037012

037012
037014
10054 037016
037016
10055 037016
10056
10057
10058
10059

037016
037022
037030
037032
037036
037036
037042
037050
037054
037054

SEQ 0294

003733

BLE 870

005737
001012

002542

005737
001407
013701
023727
001421
000420

002536
002540
002300

IF FULLREL IS FALSE

005037

002536

032777
001006
023727
001402

020000

143642

002300

000030

104401

070176

CLR
INHECC
IF #SW13 OFF.IN aSWR

cMP
BEQ

SKUB:

000261
000207

TST INHECC
BEQ L372

;IS THIS PATTERN 30?

:YES

SKIP MESSAGE

OF IF FULLREL

REALPAT,
#30
SKUB

MSGO75
TYPE
TYPEIT
,MSGO75
.DSABL
CRF
END ;OF IF #SW13

;MAKE SURE FLAG IS TURNED OFF!

;IS THIS PATTERN 307
;YES - SKIP MESSAGE
;RELOCATION NOT POSSIBLE

BIT #SW13,aSuWR
BNE L373

$RETURN ERROR
END FINDBANK

002536
020000

CLEAR
002666

000004

010037
013737
004737

002310
002532
037610

002534

052737

140000

177776

10063 037062
037062
037066
037070
037072

004537
040000
100000
000000

041024

037074
037076
037104
037110
037114
037116
037120

104417
042737
004737
013700
006300
006300
016002

10064
100635
10066
10067
10068
10069
10070

INHBANK,R1
REALPAT,
#30
CHP
BEQ
RELENT1
BR
RELENT1
END; OF IF INHECC
MOV

000030

071027

10060
10061
10062

BNE L371

IF INHECC IS TRUE

END;

005037
042761
005000

TST FULLREL

RELENT1:
RELOC1:

INHECC

CLR

; INVALIDATE BACKGROUND PATTERN

MOV

: SAVE CURRENT PGM. CSR

CALL
USER
8IS
.DSABL
BMOV

PGMCSR,PGMCSR+2

USERMAP

#B8IT15!81714,PSW
CRF
0,100000,SIZE
JSR R5,BLOCK3
SIZE

MOV RO, NEWBANK

;MAP NEWBANK TO USER PAR

;ENTER USER MODE
;GO 70 USER MODE

;MOVE PROGRAM

800000

.DSABL

000001
037672
002310
002664

177572

INHECC

BIC
#B8IT13,CONFIG+2(R1)
RO
CLR
DIV
#4,RO
LET NEWBANK := RO

KERNEL

JMPRL1: BIC
CALL
MOV

ASL
ASL
MOV

CRF

#B8IT70,MMRO
NEWIKERNEL
NEWBANK,RO

RO
RO
CONFI

R0),R2

;ENTER KERNEL MODE
;DEENERGIZE MEMORY MANAGEMENT

;RO <

RO * 4

CVMUAAQ MSV11-J MEMORY DIAG.

RELOCATE PRCGRAM

10071
10072
10073
10074
10075

037124
037126
037132
037134
037142

000302
042702
006302
052737
010237

10077
10078
10079
10080

037154
037156
037162
037166

001412
016002
042702
072227

002664
007777
17777S

10082 037176
10083 037202

050237

002532

012737

177777

10076 037146

10081 037172

037202
10084 037210
037210
037212

032760

052702

000241
000207

MACRO V05.01b Friday 15-Feb-85 16:10

177760

000001
002532

010000

177572

002666

SWAB
BIC
ASL
BIS
MOV

R2
#tC17,R2
R2
#BIT0,MMRO
R2,PGMCSR

BEQ
MOV
8IC
ASH

14
CONFIG(RO),R2
#tC170000,R2
#-3,R2

BIS
SET

R2,PGMCSR
RLFLAG

BIT

100000

BI1S
002126

14:

Page 320-3

#B1T712,CONFIG+2(RO)

SEQ 0295

;ENERGIZE MEMORY MANAGEMENT
;PUT NEW PGM. CSR INTO PGMCSR

;IS THE NEW BANK INTERLEAVED?
;BRANCH IF NOT INTERLEAVED

#BIT15,R2

$RETURN NOERROR

MOV
cLC

#-1,RLFLAG

RTS PC

CVMUAAQ MSV11-J MEMORY DIAG.

RFLOCATE PROGRAM

MACRO V05.01b Friday 15-Feb-85 16:10

SEQ 0296

UNRELOCATE - SUBTST

10087 037214

010046
013701
013700
004737
004737

002432
002576
037442
037774

013746
013737
004737
013701
042761
013737
004737
013701
042761

002102
002432
040052
002104
100000
002576
040052
002104
020000

012637

002102

005037

002536

042737

020000

005037
004737

002310
037610

052737

140000

10111 037346
037346

004537

041024

037360
037362
037370
037374
037402
037410
037414
037420
037424
037430
037434
037436
037436
10124 037440
10125

10112
10113
10114
10115
10116
10117
10118
10119
10120
10121
10122
10123

223t

U R SRR R

R R SR E R R XA SRR

RS R RS SRR R E RS kS e 000 ROeRR OGS

UNRELOCATE PROGRAM
L

s 22242

23223322322 2222

3203222322332

332 2314133331223

;RESTORE LOADERS

037236
10095 037242
10096 037250
10097 037254
10098 037260
10099 037266
10100 037274
10101 037300
10102 037304
10103 037312
037312
10104 037316
037316
10105
10106
10107 037322
10108 037330
037330
10109 037334
10110 037340
037340

037352
037354
037356

<<UNRELOCATE PROGRAM>>

RS EE SR AR SRS R AR A KSR ESE AR

; sSUBTEST

10088
10089 037214
037214
10090 037216
10091 037222
10092 037226
10093 037232
10094 037236

Page 322

040000

PUSH

MOV
MoV

LOADBANK,R1
LOADHOME
,RO

PUSH

BANK

002102

MoV

LOADBANIC, BANK

002666
002102

BIC

012600
000207

EXBANK
BANKINDEX,R1

MOV
CALL
Mov
BIC

LOADHOME
, BANK
EXBANK
BANKINDEX,R1
#BIT13,CONFIG+2(R1)

CLEAR

INHECC

#BIT15,CONFIG+2(R1)

BANK

MOV _(SP)«,BANK
;MAKE SURE ECC TESTS ARE NOT INHIBITED!
CLR
INHECC

CALL
USER

:MAP NEWBANK TO USER PAR
;ENTER USER MODE

USERMAP

#8IT715!81714,PSW

.DSABL
CRF
BMov
0,100000,SIZE
JSR RS,BLOCK3
SIZE
600000
KERNEL

BIC

177572
002532
177572

1¢:

2%:

; INVALIDATE BACKGROUND PATTERN

8IS

177776

;CLEAR LOADER FLAG

BIC
#BIT13,CONFIG+2
LET NEWBANK := #0

.DSABL

000001
037672
002534
000001
002126
002666
020000
000004
003620

MOV BANK, -(SP)

;RESTORE BANK 0

002666

;MOVE PROGRAM

CRF

#8IT0,MMRO

;ENTER KERNEL MODE

;DEENERGIZE MEMORY MANAGEMENT

NEWKERNEL
PGMCSR+2,PGMCSR
#8I70,MMRO
RLFLAG

BIC

#B8I713,(RO)

;CLEAR BACKGROUND VALID BIT

RO, #3620
2$

;DONE?
:NO - BRANCH

ADD

cHp
BLE

POP

RETURN

#CONFIG+2,R0
#4 ,RO

CLR NEWBANK

;GO TO USER MODE

CALL
MOV
BIS
CLR

Mov

(SP)

;MAP NEW LOADER BANK IN KERNEL SPACE

CALL
MOV

pPopP

100000
000000

104417
042737
004737
013737
052737
005037
012700
042710
062700
020027
003771

BANKMOV
NEWLOAD

CALL
CALL

002666

MOV RO,

;RESTORE PREVIQUS PGM. CSR
;ENERGIZE MEMORY MANAGEMENT

;MOVE 2ND WORD OF CONFIG TO RO

; INCREMENT TO NEXT BANK

MOV (SP).,RO

CVMJUAAQ MSV11-J MEMORY DIAG.
UNRELOCATE PROGRAM

MACRO V05.01b Friday 15-Feb 85 16:10

BANKMOV:SUBTST

10128 037442

Page 324

SEQ 0297

<<MOVE BANKS>>

;S48 EE SRS S SR RRE B AR S SRR AR AR BN EE S AR RS EC R R LU E SR RSB

N NN KNS AR

n b

MOVE BANKS

; sSUBTEST

dd RS0 0B OERROQ

e
T
T
T

10129
10130
10131
10132
10133 037442
10134 037444
10135 037450
10136 037452
10137 037454
10138 037460
10139 037464
10140 037470
10141
10142 037474
10143 037476
10144 037500

104415

004737
104416

104415
072027
072127
012702
012703

;MOVE 3/4 OF A BANK
;CALLING SEQUENCE
;RO = DESTINATION BANK
;R1 = SOURCE BANK

000011
000011

177650
000200

#UIPAR4 ,R2
#200,R3
R3,R1
R1,(R2)+
R3.R1

010022
060300
010022
060300

MOV
ADD
MOV
ADD

RO,(R2)+
R3,RO
RO, (R2)+
R3,R0

140000

10153 037522
0373522
037526
037530
037532

004537
020000
140000
100000

041024

037570
037574
037576

#9.,R0
#9.,R1

ADD
MOV
ADD

MOV

052737

10169 037570

MOV
MOV

USERMAP

010122
060301
010122
060301

10145 037502
10146
10147 037504
10148 037506
10149 037510
10150 037512
10151
10152 037514
037514

10154 037534
10155
10156 037536
10157
10158 037542
10139 037544
10160 037546
10161 037550
10162
10163 037552
10164 037554
10165 037556
10166 037560
10167
10168 037562
037562

SAVREG
CALL
RESREG
SAVREG
ASH
ASH

037610

177776

R1,(R2)+

USER

8IS

.DSABL
BMOV

#B8IT15!BIT14,PSW

MoV

AUIPAR4
,R2

010122
060301
010122
060301

MoV
ADD
MOV
ADD

R1,(R2)+
R3,R1
R1,(R2)+
R? R1

010022
060300
010022
060300

MOV
ADD
MOV
ADD

RO,(R2)+
R3,RO
RO,(R2)+
R3,R0

012702

177650

052737

140000

004537
010000
140000

041024

177776

USER

ngAB
.

B8MOV

:BUMP BY 4K

CRF
100000,140000,SIZE/2

JSR R5,BLOCK3
SIZE/2
140000
100000
CRF
.DSABL
KERNEL

104417

;MAP 1ST HALF BANK

;MOV 1ST HALF BANK

;ENTER KERNEL MODE

ggngS!BIT14.PSN

100000, 140000,S1ZE/4

JSR RS5,BLOCK3
SI1ZE/4
140000

;GO TO USER MODE

;MAP 2ND HALF BANK
;BUMP BY 4K

;GO TO USER MODE

;MOV 3ND FOURTH OF BANK

CVMJAAQ MSV11-JU MEMORY DIAG.
MOVE BANKS

MACRO v05.01b Fridey

N7/

15-Feb-85 16:10

Page

324-1

SEQ 0298

037600

100000

10170 037602
10171
10172 037604
10173 037606

104417

KERNEL

104416
000207

RESREG
RETURN

100000
. DSABL

CRF

;ENTER KERNEL MODE

CVMJAAQ MSV11-U MEMORY DIAG.
MOVE BANKS

MACRO V05.01b Fridey

10176 037610

15-Feb-85 16:10

1568088

S R ERE RN AP R RSN A

; *SUBTEST
10177 037610
10178 037614
10179 037620
10180 037624
10181 037630
10182 037634
10183 037636
10184 037640
10185
10186 037642
10187 037646
10188
10189 037652
10190 037656
10191 037660
10192 037664
10193 037666
10194 037670
1195
10196 037672

;RN

0127C1
012702
012703
012704
012705
012221
011423
077503

177640
172340
177600
172300
000004

013700
072027

002310
000011

012705
010021
062700
011423
077505
000207

000004

SUBR

000200

ERE RSN ERER RS SR RN R SRS NS S DR

SUIPARO,R1

MOV

2%:

MKIPARO,R2

037672
037674
037676
10198 037700
10199 037704
10200 037710
10201
10202 037714
10203 037720
10204 037722
10205 037726
10206 037730
037730
037732
037734
10207 037736
10208
10209 037740

MOV

S0B

(R2)+,(R1).
(R4),(R3).
RS5,1$

MoV
ASH

NEWBANK ,RO
#3.,RO

MOV

#4 ,RS
RO,(R1)#200,R0

S08

R5.,2$

ADD
MOV

012705
010120
062701
077504

RETURN

; SETUP UIPAR(4-7)
;BUMP ADDRESS 4K
; SETUP UIPDR(4-7)

<<SUBR

SERERAREER

R B SRR R R AR AR RN R

; *SUBTEST

SUBR

R R AR

SETUP KERNEL PAR'S FOR NEW BANK>>
R AR AR

R SRR R RN E R

NEWBANK,R1

000004

MOV

#4 RS

MOV

508

POP

012605
012601
012600
000207

ER RO kN

222233232233

MOV RO, -(SP)

MOV RS, -(SP)

#9.,R1

:BANK 1 STARTS AT 100,000 LESS 6 LSB'S

;:FOR MEMORY MANAGEMENT

R1,(RO)«

1000

:SETUP KIPAR(0-3)

#200,R1
R5,1$
R5,R1,RO

MOV (SP)«,R5
MOV (SP).,R1
MOV (SP)«,RO

MAPKERNAL
: SUBTST <<SUBR MAP KERNAL PARS 4 AND S TO A BANK>>
RAEII

222 223 22 2222222223 222222232

BRAEi 21T 1222

037740
037744
037750
037756
037762
037766
037772

i i

RETURN

; *SUBTEST
10210
10211
10212
10213
10214
10215
10216
10217

#KIPARO,RO

MOV
ASH

ADD

AN S SR RS

RO,R1,RS

MOV

1%:

RSSO R R

SETUP KERNEL PAR'S FOR NEW BANK

172340
002310
000011

000200

seét b0

;BANK 1 STARTS AT 100,000 LESS 6 LSB'S
:FOR MEMORY MANAGEMENT = 1000

(R4),(R3)+

NEWKERNEL
: SUBTST

010046
010146
010546
012700
013701
072127

n bbb

@UIPORO,R3
#KIPDRO,
R4
#4 RS

MOV
MOV
MOV
MOV

PUSH

0 SRRSO

;COPY KERNEL PAR‘'S & PDR'S (0-3)

2l 2222223 2222322222222 32222222222ttt

10197 037672

DRSS E LS00 400G GOS0

MAP USER TO NEW BANK

RE SR SRR R RS SRR SRR R LA SRR RN X R R SRR EE RN RERNEE PR ES SRS

MOV

1$:

SEQ 0299 |

MAP USER TO NEW BANK>>

<<SUBR

USERMAP
: SUBTST

Page 326

013705
072527
013737

010537
062705
010537
000207

002102
000011
172350
172350
000200
172352

002272

SUBR

122120222

22234222

23222022222

)

MAP KERNAL PARS 4 AND S TO A BANK

221222223 2Rl

MOV BANK,RS
ASH #9, RS
MOV KIPAR4,SAVPAR
MOV RS,KIPAR4
ADD #200,R5
MOV R5,KIPARS
RETURN

2222222322222 222222232233 2233 222222222 2222222 ]

;MOV_BANK NUMBER TO RS
;RS ENTERS 100000 LESS SHIFT TO CREATE MAPPING

;:SAVE OLD PAR
;:GET NEW PAR’S

CVMUARO MSV11-J MEMORY DIAG.
MACRO V05.01b Friday 15 Feb-85 16:10
SUBR
MAP KERNAL PARS 4 AND 5 TO A BANK
10218
10219 037774

NEWLOAD:SUBTST

<<SUBR

22222222322ttt

212223222223

; #SUBTEST

2233123332232 2

10220

1022: 037774

037774
037776
10222 040000
10223 040004
10224 040010
10225 040012
10226 040016
10227 040020
040020
040022
}8553 080024

010046
010146
012701
072027
010021
062700
010021

SETUP KERNEL PAR'S FOR NEW LOADER BANK>>
st

sttt i

i i

SETUP KERNEL PAR'S FOR NEW LOADER BANK

22 223322 2222t

172350
000011
000200

012601
012600
000207

PUSH

RO,R1

MOV
ASH
MOV
RDD
MOV
POP

9KIPAR4 ,R1
29.,R0
RO,(R1)+
#200,R0
RO, (R1)+
R1,RO

ittt

Y IzRIT]

ITYI Y

UNMAP:
R

IL LI

013737
062737
013737
000207

MOV RO, -(SP)
Mu/ R1,-(SP)

;BANK 1 STARTS AT 100000 LESS 6 LSB'S (1000)
:SETUP KIPARG
;SETUP KIPARS
MOV (SP)+,R1
MOV (SP)+,RO

RETURN

SUBTST

3232

002272
000200
002272

172350
002272
172352

<<SUBR

UNMAP KERNAL PAR'S 4 AND S>>

SUBR

UNMAP KERNAL PAR'S 4 AND S

23S E 2t

:#SUBTEST
080026
040034
040042
040050

SUBR

SEQ 0300

;RO CONTAINS THE DESTINATION BANK

10230 040026

10231
10232
10233
10234

Page 326 1

P22t

ittt

2222322222422 222232t 22

MOV
ADD
MOV
RETURN

SAVPAR, KIPAR4
2200, SAVPAR
SAVPAR, KIPARS

i3t

ettt

8 32

st ittt
3

33232223

;RESTORE KIPAR4
:ADD 200 FOR NEXT PAR
:RESTORE KIPARS
:

22 22232333220

2333323332333

333 7% 2

CVMUARQ MSV1i1-J MEMORY DIAG.

SUBR

MACRO v05.01b Fridey 15 Feb 85 16:10

UNMAP KERNAL PAR'S 4 AND S

SEQ 0301
EXBANK:

10237 040052

SUBTST

sRREEEREEN

; *SUBTEST
HRAd i

1322

EXAMINE BANK>>

<<SUBR

R R AR A YRR T SRR AR R R AR R SRR R AR AR RN SRR A

SUBR

SR E bR SR 2R OSSOSO GRS

EXAMINE BANK

3222222223232

222322223232

2232222222222

23332

2322221332222

21T

U
H W

;

;DOES THE FOLLOWING:
SETS uP "BANKINDEX" AND R1 BASED ON VALUE OF "BANK".
;(1)
elalalale

10238
10239
10240
10241
10242
10243
10244
10245
10246
10247
10248
10249
10250
10251
10252
10253
10254
10255
10256
10257 040052
040052
040054
040056
10258 040060
040060
040064
10259 040070
040070
10260 040076
040076
040102
040106
10261 040112
040112
040116
040122
10262 040126
10263 040132
10264 040134
10265 040136
10266 040142
10267 040150
10268 040152
040152
10269 040160
10270 040164
040164
040170
040172
040176
10271 040200
10272 040204
040204

Page 328

(7)

SETS THE "MKFLAG" IF THE BANK IS ECC.
SETS THE "KPFLAG” IF THE BANK IS THE PROTECTED REGION OF ECC MEMORY.
SETS THE "ACFLAG" IF THE BANK CAN BE ACCESSED BY THIS CPUL.
SETS THE “PFLAG” IF THE BANK IS IN PROGRAM SPACE.
"RRFLAG" IF RELOCATION IS REQUIRED TO TEST THIS BANK; HOWEVER,
SETS THE
IT COMPLEMENTS THIS FLAG IF THE RELOCATION FLAG "RLFLAG" IS SET (THIS IS
NECESSARY FOR THE USE OF THE RECURSIVE "MODE” SUBROUTINES). THE "RRFLAG"
IS ALWAYS SET TO DISABLE TESTING IF FIELD SERVICE MODE
“SELECTED BANKS*
ARE BEING TESTED AND THIS BANK IS NOT SELECTED.

SETS THE "BMFLAG" IF THE BANK IS A BAD MEMORY;
THIS FLAG IF THE
OF THE RECURSIVE

"WORST” FLAG IS NOT SET
"MODE" SUBROUTINES).

HOWEVER,

COMPLEMENTS

(THIS IS NECESSARY FOR THE USE

(8) SETS THE "INTFLAG" IF THE BANK IS INTERLEAVED.
;(9) SETS THE "INT64K" FLAG IF THE BANK IS INTERLEAVED ON 64K WORD BOUNDS.

;(10) SETS THE "SKIPMK" FLAG IF THIS BANK IS INTERLEAVED, AND HAS ALREADY
BEEN TESTED.
;
PUSH

010046
010146
010246

005037
005037

002120
002114

012737

177777

005037
005037
005037

002122
002124
002130

005037
005037
005037
013701
006301
006301
010137
032761
001403

002136
002140
002342
002102
002104
000100

012737
012700

177777
000002

030037
001405
030061

002106

001002
005037

002116

002114

MKFLAG,KPFLAG

SET

ACFLAG

CLEAR

PFLAG,RRFLAG,BMFLAG

CLEAR

INTFLAG,INT64K, SKIPMK

BIT
BEQ
SET
1¢.

BANK,R1
R1
R1
R1,BANKINDEX

#BI76,CONFIG(RL)
13
KPFLAG

iR1

CLR
ACFLAG
END ;OF IF RO

CLR
CLR

MKFLAG
KPFLAG

MOV

#-1,ACFLAG

CLR
CLR
CLR

PFLAG
RRFLAG
BMFLAG

CLR
CLR
CLR

INTFLAG
INT64K
SKIPMK

= 4

;PROTECTED REGION OF ECC MEMORY?
:NO - SKIP

MOV
#BIT1,R0O
IF RO SET.IN CPUBIT AND RO OFF.IN CONFIG(R1)

002664

002116

MOV R1,-(SP)
MOV R2,-(SP)

CLEAR

MOV
ASL
ASL
MoV

002664

RO,R1,R2

MOV

#-1,KPFLAG

81T
BEQ
BIT
BNE

RO,CPUBIT
L374
RQ,CONFIG(RL)
L374

L374:;:::::

CVMJAAO MSV11-J MEMORY DIAG.
SUBR
EXAMINE BANK
10273
10274
10275
20276
10277
10278
10279
10280

040204
040210
040212
040216
040220
040224
040230
040232
040232
10281 040240
10282 040244
10283 040252
10284 040254
040254
10285 040262
10286 040270
10287 040272
040272
040300
10288 040306
10289 040312

10290 040314

10291 040320
10292 040326
10293 040330
040330

10294 040336

005737
001415
016102
000302
042702
020227
003405

MACRO V05.01b Friday 15-Feb-85 16:10

002116

TST
BEQ

RLFLAG
64

;IS PROGRAM RELOCATED?
;NO - SKIP

64:

BIT
BEQ
SET

#BIT0,CONFIG(R1)
8$
BMFLAG

;ERRORS PRESENT IN THIS BANK?
iNO - SKIP

84¢:

TST

WORST

177777
000200

002120
002664

3$:

012737
012737
005737
001402

177777
177777
002126

002122
002124

032761
001403

000001

002664

177777

002130

012737

005737

001002
005137

002600
002130

9¢:

002002

012737

177777

002124

10300 040374
10301 040402

032761
001421

010000

002666

040404

012737

032761
001403

177777

004000

002136

040422
10306 040430
10307 040436
10308 040440
040440
10309 040446
040446
040450
040452

012737
032761
001403

177777
000040

002140
002664

012737

177777

002342

10310 040454

5¢:

012737
032761
001406

040366

10303 040412
10304 040420
10305 040422

#BIT7,CONFIG(R1)
54
PFLAG,RRFLAG

24:

002666

10302 040404

BIT
BEQ
SET

002130

040000

040374

ENEXBK
#BI78,CONFIG+2(R1)
3¢
MKFLAG

002666

005737
001407
032761
001003

10299 040374

JMP
BIT
BEQ
SET

177770
000003
177777
040446
000400

10295 040342
10296 040344
10297 040350
040350
040354
040356
040364

10298 040366

ACFLAG
28
CONFIG+2(R1),R2
R2
#1C7,R2
R2,#3
2%
BMFLAG

002666

002124

012602
012601
012600
000207

SEQ 0302

TST
BEQ
MOV
SWAB
8IC
cHP
BLE
SET

012737
000137
032761
001403

005137

Page 328-1

CcoM

RRFLAG

;ACTIVE MEMORY?
;:BRANCH IF NOT
:
; ISOLATE MEM TYPE BITS
;IS THIS AN ILLEGAL MEM TYPE?
;BRANCH IF NOT
:SET BAD BANK FLAG
MOV
9-1,BMFLAG
;JUMP OVER REST OF FLAG TESTS
;IS THERE ECC THERE?
;:NO - SKIP
;YES - SET MKFLAG
MOV
9-1,MKFLAG
;BANK = PROGRAM SPACE?
;NO - SKIP
MOV
MOV

;YES - COMPLEMENT RELOCATION REQUIRED FLAG

MOV

;IS THIS A WORST FIRST PASS?

BNE
94
;YES - SKIP
CoM
BMFLAG
;NO - COMPLEMENT BAD MEMORY
IF SELONLY IS TRUE AND #BIT14 OFF.IN CONFIG+2(R1)
TST
BEQ
BIT
BNE

SET

RRFLAG

END ;OF IF SELONLY

#-1,PFLAG
#-1,RRFLAG

MOV

#-1,BMFLAG

FLAG
SELONLY
L375
#BIT14,CONFIG+2(R1)
L375

& 1,RRFLAG

L375:5:5::::

BIT
BEQ

¢BIT12,CONFIG+2(R1)
ENEXBK

;IS THIS BANK INTERLEAVED?
;BRANCH IF IT IS NOT

BIT
BEQ
SET

#BIT11,CONFIG+2(R1)
104
INT64K

;IS THIS BANK INTERLEAVED WITH 64K BOARDS?
;BRANCH IF IT IS NOT

10¢:

BIT
BEQ
SET

#BITS,CONFIG(R1)
ENEXBK
SKIPMK

ENEXBK:

POP

R2,R1,R0

SET

002666

RETURN

INTFLAG

MOV

&-1,INTFLAG

MOV #-1,INT64K
; SHOULD THIS BANK BE TESTED?
;BRANCH IF IT SHOULD
;RESTORE REGISTERS

MOV

@-1,SKIPMK

MOV (SP). ,R2
MOV (SP).,R1

MOV (SP).,RO

CVMJAAQ MSV11-J MEMORY DIAG.

SUBR

EXAMINE BANK

MACRO V05.01b Fridey

15 Feb-85

BANKOK:

SUBTST

SUBR

BANK OK?

;IS OF THE TYPE WE ARE TESTING "TMFLAG".

013700
005100
013701
074001
000207

;RESULT IS RETURNED IN THE CONDITION CODES (OK = (=0)).

002134

MOV

002120

MOV
XOR

MKFLAG,R1
RO,R1

SUBTST

<<SUBR

INCREMENT PATTERN TESTING >>

SUBR

INCREMENT PATTERN TESTING

TMFLAG,RO

CoM

RETURN

INCRPT:
INCPAT:

; *SUBTEST
R

005237
022737
000207

002112
000030

RETURN

SUBTST

; *SUBTEST
T

000027

002112
INCBNK:
R

<<SUBR
L

s e

i i

<<SUBR
T

SUBR

ittt

SUBTST
L

:NOT EQUAL

002102

CcMP

RETURN

BANK

T T

T
T

T T

;SET HIGHEST PATTERN

INCREMENT BANK & TEST>>
T

INCREMENT BANK & TEST
S

ittt

;RESULTS RETURNED IN CONDITION CODES

INC

TO ZERO IS GOOD (NO OVERFLOW)

SET HIGHEST PATTERN TESTING TYPE

#27,PATTERN

;:SET UP CONDITION CODES

SET HIGHEST PATTERN TESTING TYPE>>

MOV
RETURN

002102
002556

i d

(=0K)

PATTERN
#30,PATTERN

SUBR

; *SUBTEST
005237
023737
000207

ety

INC
CMP

002112
SETPAT:
HIPAT:

012737
000207

;0K =

; INCREMENT THE PATTERN & SET UP THE CONDITION CODES
;RESULT - Z BIT SET INDICATES OVERFLOW

10337
10338 040520
10339 040524
10340 040532

;TEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANK

10333 040510
10334 040516
10335
10336 040520

330

BANK OK?>>

<<SUBR

; *SUBTEST

10325
10326
10327 040474
10328 040500
10329 040506
10330
10331 040510
10332 040510

Page

SEQ 0303

10313 040456

10314
10315
10316
10317 040456
10318 040462
10319 040464
10320 040470
10321 040472
10322
10323 040474
10324 040474

16:10

LASTBANIK , BANK

;:T00 FAR?

I T
T

T
R

T T

CVMJAAO MSV11-J MEMORY DIAG.
SUBR
INCREMENT BANK & TEST

MACRO V05.01b Friday 15-Feb 85 16:10

SEQ 0304

10343 040534

QUIT:
Hidld i

SUBTST

10352 040544
040544
040550
040552
040556
10353 040556
10354 040562
10355 040564
10356 040570
10357 040572
10358 040600
10359 040602
10360

<<QUIT ROUTINE>>

212132222 2322333

; *SUBTEST
10344
10345
10346
10347
10348
10349
10350 040534
10351 040536
040536

Page 332

2323

22l

YTy

QUIT ROUTINE
e

;INITIALIZE ALL CSR'S
;UNRELOCATE IF NECESSARY
;FLUSH QUT ANY DBE'S
; JURN OFF MEMORY MANAGEMENT
: TURN OFF THE Q-BUS MAP
;HALT

104472
012737

040600

005737
001402
004737

002126

004737
104421
005737
001003
042737
000005
000000

022200

ECCINIT
SET4
#QUITL
MOV
.DSABL

; TRAP ON DCUBLE BIT ERRORS (NORMAL)
;TRAPS TO 4 GOTO QUITI1

#QUIT1,4
CRF
IF RLFLAG IS TRUE THEN $CALL UNRELOQOCATE

000004

037214
CALL
MT0030
DEENERGIZE
15T
NO22BIT
BNE
QUIT1

002454

000040

172516

QUIT1:

8IC

figng

#B8ITS,MMR3

TST RLFLAG
BEQ L376
JSR PC,UNRELOCATE
L376:;:;:5:::

;FLUSH OUT DBE'S
; TURN OFF MEMORY MANAGEMENT
;IS THIS AN 11/83,11/23-B OR 11/23?

;:TURN OFF THE Q-BUS MAP

CVMJUAAQ MSV11-J MEMORY DIAG.
QUIT ROUTINE

MACRO V05.01b Friday

15-Feb-85 16:10

Page

334

SEQ 0305
EXIT:

10363 040604

SUBTST

<<HALT PROGRAM>>
I

; sSUBTEST

HALT PROGRAM

I I

T, ImMmMmM

MmO

T
I
I
NIl
MM

10364 040604
10365 040610
040610

040614
040616
040622
040624
10366 040624
10367 040626
040626
040630
10368 040630

10369 040632
10370 040636
040636
10371
10372 040636

004737

040636

005737
001003
005737
001402

002352

CALL
SHUTUP
1IF APTFLAG IS TRUE OR ACTFLAG IS TRUE

EXIT2:

002350

TST ACTFLAG
BEQ L400

000777

L377:5:5::4:

BR
ELSE

000403
000000
000137

$EXHALT:

003670

SHUTUP:
R

BR L4011

SUBTST

L401::5::::

<<SHUTDOWN DIAGNOSTIC>>

SHUTDOWN DIAGNOSTIC

S S

I e

T I

;INITIALIZE ALL CSR'S
; UNRELOCATE
;FLUSH OUT DBE'S
;RESTORE LOADERS

;:TURN OFF MEMORY MANAGEMENT

;UNMAP THE @-BUS MAP

ECCINIT

104472
005737
001402
004737

; TRAP ON DOUBLE BIT ERRORS (NORMAL)

IF RLFLAG IS TRUE THEN $CALL UNRELOCATE

002126

TST RLFLAG
BEQ L402
JSR PC,UNRELOCATE
L402:;::::::

037214

IF QUICK IS FALSE

005737
001002
004737

002436
022200

CALL
MT0030
END ;0F IF QUICK

;FLUSH OUT DBE'S

012700
013701
004737
104421
005737
001003
042737
000207

000001
002576
037442

MOV
MOV

;DESTINATION BANK
: SOURCE BANK

002454

000040

172516

1¢:

BIC
RETURN

APTDOWN:SUBTST
N

; *SUBTEST

010346

TST QUICK

#1,R0
LOADHOME ,R1

BANKMOV
CALL
DEENERGIZE
TST
NO22BIT
BNE
14

10400 040720
040720

L400:;;::;;:

HALT
START
JMP
END ;0F IF APTFLAG

; *SUBTEST
10373
10374
10375
10376
10377
10378
10382 040636
10383 040640
040640
040644
040646
040652
10384 040652
040652
040656
10385 040660
10386 040664
040664
10387 040664
10388 040670
10389 040674
10390 040700
10391 040702
10392 040706
10393 040710
10397 040716
10398
10399 040720

TST APTFLAG
BNE L377

MAP

BNE L403
L803:;::5::

; TURN OFF MEMORY MANAGEMENT
;DOES THIS PDP-11 HAVE 22-BIT ADDR?
;BRANCH IF NOT

#BITS ,MMR3

; TURN OFF Q-BUS MAP

<<APT SHUTDOWN SEQUENCE>>
L

APT SHUTDOWN SEQUENCE
#0

I I

T P

T T

;:MAP SUPERVISOR SPACE (TEST AREA) T0Q BANK #0
MOV R3,-(SP)

CVMJUAARO MSV11-J MEMORY DIAG.
APT

SHUTDOWN SEQUENCE

040722
040726

012703
004737

040732
10401 040734

012603

MACRO V05.01b Friday

15-Feb-85 16:10

Page

334-1

SEQ 0306
000000
035716

MOV
CALL
.DSABL

040734

053737

002552

177776

10402 040742
10403 040750
10404 040756
10405 040764
10406 040766

012737
012737
012737
104417
000000

040720
000340
000000

060024
060026
120720

TESTAREA

BIS
.DSABL

APTHLT:

MoV
MOV
MOV
KERNEL
HALT

#0,R3
MAPPER

CRF

EEETHODE.PSH

;ENTER TEST MODE

#APTOOWN,FIRST+24
#340,FIRST+26
#0,FIRST +APTDOWN

MOV (SP).,R3
;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

CVMJAAO MSV1l-J MEMORY DIAG.
APT

MACRO V05.01b Friday 15-Feb-85 16:10

Page 336

SEQ 0307

SHUTDOWN SEQUENCE

10409 040770

SUBTST
it il

<<BLOCK MOVE SUBROUTINE>>

22322232222

; *SUBTEST

8222333222223 2

A2l 13331333222 222

041012

041014

10422 041016
10423 041022
10424
10425 041024
041024

041026
041030
10426 041032
10427 041034
10428 041036
10429
10430 041040
10431 041042
10432 041044
041044
041046
041050
10433 041052
10434

a2t

082

2382

224

33332 3222333323233

32 3323213133

2332

:ALL ARE CALLED BY THE BMOV MACRO
010046
010146
010246
012702
012701
000413

010046
010146
010246
012701
000404
010046
010146
010246
012501
012502
012500
012022
077102

012602
012601
012600
000205

BLOCK1:

177640

000020

BLOCK2:

000020
BLOCK3:

. ENABL

PUSH

LSB

RO,R1,R2

MOV
MoV

#FASTCITY,R2
#16. ,R1
3¢

PUSH

RO,R1,R2

MOV

#16.,R1
2%

PUSH

RO,R1,R2

MOV
MOV
MoV

MOV
MOV
MOV

MoV
MOV
MOV

MOV
MOV
MOV

MOV

S0B

POP

RTS
.DSABL

TSI

337X

;BLOCK3 HAS 3 ARGUEMENTS
;BLOCK2 HAS 2 ARGUEMENTS
;BLOCK1 HAS 1 ARGUEMENTS

10410
10411
10412

10413
10414
10415
10416 040770
040770
040772
040774
10417 040776
10418 041002
10419 041006
10420
10421 041010
041010

22 23 33223

BLOCK MOVE SUBROUTINE

MOV
MOV
Mov

CVMUARQ MSV11-J MEMORY DIAG.
FIELD SERVICE MODE

MACRO V05.01b Fridey

15-Feb 85 16:10

.SBTTL

10436
10437
10438 041054

1044}
10442 041062
041062
041066
041070
041074
041076
10443 041076
041076

10444 041102
10445 041104
10446 041106
041106
10447 041106
10448 041112
10449 041114
041114
10450 041120
041120
041124
10451 041130
10452 041132
041132
10453 041140
041140
10454 041144
10455 041146
041146
10456 041150
10457 041154
10458 041156
041156
10459 041162
10460 041164
041164
041166
041170
10461 041174
10462 041176
10463 041200
10464 041202
10465 041204
10466 041206
10467 041210

104401

066116

005737
001003
005737
001404

002126

SUBR

i2 1313221223333

104415

<<SUBR

R AR AR AR R

;*SUBTEST

10439 041054
10440 041056
041056

SAVREG
TYPE
TYPEIT
.DSABL

R E R

R R R R R EERE SRR A S RSS2 4R

3323232221133

MSG020
,MSG020
CRF

222222222

2222221t

322

ittt

MSGO48

005737
001402

002544

757

013746

177746

013746
013746
104424

002152
002006

012737

177717

104401

067007

1%:

002006

FS1:

PUSH

CSRNO, IKAMIKAZE

;SAVE CSR & KAMIKAZE STATUS

RDDEC
POP

012600
020027
101403

000022

104401

066137

000766

CHP
BLOS

1%:
041242

TYPE
TYPEIT
.DSABL
BR

CASE RO

FSCMDO
FSCMD1
FSCMD2
FSCMD3
FSCMD4
FSCMD5

FSCMD6

MSG026

,M5G026

CRF
RO

)]

RLFLAG
L4404
NOFSMODE
L40S

L805:;;:::::

: SAVE CACHE STATUS

.DSABL

104414

L404:;;;::::

BEQ
PUSH

TYPE
TYPEIT

221333221

;NOT AVAILABLE NOW - TRY LATER!

CACHKN
14
CONTRL

CACHOFF
KAMIKAZE
SET

2232

TST
BNE
TST
BEQ

002426

104416
000207

OORES

;FIELD SERVICE COMMAND MODE

IF RLFLAG IS TRUE OR NOFSMODE IS TRUE

TYPE

C RS GO0 SO0

FIELD SERVICE COMMAND MODE

TYPEIT
.MSGO48
CRF
.DSABL
RESREG
RETURN
END ;OF IF RLFLAG

010046
006316
004737
041252
041354
041464
041632
042106
042426
043344

SEQ 0308 !

FIELD SERVICE COMMAND MODE>>

R AL SR EER AR R R R

067557

104401

337

FIELD SERVICE MODE

FIELDSERVICE:SUBTST
s ESEEREE RN SRR R

Page

; TURN CACHE OFF

MOV CONTRL, -(SP)
MOV CSRNO, -(SP)
MOV KAMIKAZE, -(SP)
MOV

: COMMAND;

#-1,KAMIKAZE

;READ A DECIMAL NUMBER
;COMMAND -

> RO

RO, #18.

MOV (SP).,RO

MSGO21

,M5G021

CRF

FS1
MOV RO, -(SP)
ASL aSP

;EXIT FIELD SERVICE COMMANDS
;READ CSR

;LOAD CSR
;EXAMINE MEMORY
;MODIFY MEMORY
;SELECT BANK & PATTERN
; TYPE CONFIGURATION MAP

JSR PC,L406

MACRO V05.01b Friday
CVMJUAAOQ MSV11-J MEMORY DIAG.
FIELD
SERVICE
COMMAND
MODE
SUBR

10468 041212
10469 041214
10470 041216
10471 041220
10472 041222
10473 041224
10474 041226
10475 041230
10476 041232
10477 041234
10478 041236
10479 041240
10480 041242
041242
041242
041244
041246
10481 041250

043352
043644
044072
044364
0444)12
044434
044454

044476
044514
044600
044642
044656
062616
013646
004736
000733

15 Feb 85 16:10

SEQ 0309

FSCMD7
FSCMD8
FSCMD9
FCMD10
FCMD11
FCMD12
FCMD13

FCMD14
FCMD1S

FCMD16
FCMD17
FCMD18
END ;0OF CASE

Page 337

FS1

;S0B-A-LONG TEST
;ERROR SUMMARY
;REFRESH TEST
:SET FILL COUNT
;ENTER KAMIKAZE MODE
;EXIT KAMIKAZE MODE
; TURN CACHE OFF
; TURN CACHE ON
; TEST ONLY SELECTED BANKS
;RESUME TESTING ALL BANKS
;ENABLE TRACE
;DISABLE TRACE
LA06:;;;::::

ADD (SP).,asP
MOV a(SP).,-(SP)
JSR PC,a(5P).

CVMJUAAO MSV11-J MEMORY DIAG,
MACRO v05.01b Friday 15-Feb-85 16:10
SUBR
FIELD SERVICE COMMAND MODE
10484 041252

FSCMDO:

SUBTST

<<COMMAND O

Page 339

SEQ 0310

EXIT>>

T
I
T
I
T I
T
T
T
YT

;*SUBTEST

COMMAND O

EXIT

MSG103
,MSG103

;LEAVING FIELD SERVICE MOODE

T
I
I
N
I T
T
I I
I
TIIY

10485 041252
041252
10486 041256
10487 041262
041262
041266
10488 041270
10489 041274
10490 041300
041300
041302
10491 041302
041302
10492 041306
041306

10493 041306

041306
10494 041312
10495 041316
10496 041320
041320
041326

10497 041330
10498 041334
041334
041336
10499 041336
10500 041342
10501 041344
041344
10502 041350
041350

10503 041350
lgggg 041352

104401

070535

062706

000002

005737
001405
062706
005037

002010

TYPE
TYPEIT
.DSABL

000002
002010

000402
012637

002006

012637
005737
001414

002152
002544

023737
001003
062706

002544

012637

177746

#2,SP
SKIPKAMI

POP

KAMIKAZE

RESO:

104416
000207

ADD
ELSE

#2,SP

TST
BEQ
POP

CACHKN
RESO
CONTRL

044670
002306

041364

012737

041430

000004

10510 041372
10511 041374

104426

012737
104026

177777

002430

012737

034114

000004

022737
001002

000005

;IF CACHE IS OFF

; THROW AWAY CACHE STATUS

<««FS

; *SUBTEST

004010

CALL
MOV
SET4

MOV

;RESTORE CACHE STATUS

COMMAND 1
COMMAND 1

WHICHCSR
SP,FSSTACK
#RES]
#RES1,4

+26

RES4
MOV

#TIMEQUT
4

BNE

101$

CcMP

#5,PROTYP

MOV (SP)+,CONTRL

L412:;:;:;::::

READ CSR»>>

READ CSR

I
e

I
nmmmm

; TRAPS TO 4 GOTO RES1

CRF
.DSABL
READCSR
SET
NOERROR

ERROR

CMP CACHKN,CACHKF
BNE L411}

BR L412
L411:;:;:::::

RESREG
RETURN

FSCMD1: SUBTST
I

004737
010637

041420

MOV (SP).,CSRNO

END ;0F IF CACHKN

10507 041354
10508 041360
10509 041364

041412

L810:;;:::::

CSRNO

10513 041404
041404

B8R L410
L807:;:;:::::
;RESTORE OLD KAMIKAZE FLAG
MOV (SP).,KAMIKAZE

TST
CACHKN
BEQ
RESO
IF CACHKN EQ CACHKF

002550

10506 041354

041374
10512 041402

TST SKIPKAMI
BEQ L4&407?
; THROW AWAY OLD KAMIKAZE FLAG

;OF IF SKIPKAMI

pPoP

000405

002544

ADD
CLR
ELSE

END

000002

005737
001402

CRF

ADD
#2,5P
IF SKIPKAMI IS TRUE

;USE ERROR ROUTINE FOR PRINTOUT
;RESET TRAPS 10 4 T0O DEFAULT

;IS THIS AN 11/83/84 ?

;BRANCH IF NOT

MOV

#-1,NOERROR

MACRO V0S.01b Fridasy 15-Feb 85 16:10
CVMJUAAO MSV11-J MEMORY DIAG.
READ CSR
COMMAND 1

Page 339-1

041422
041426

005037

177766

041426
041430
041430

000207

104401

066763

041434
041440
041440
041446
041454

013706

002306

012737
022737
001002
005037

034114
000005

041456

041462

10518 041462

000207

177766

101%:

RES1:

CLR

CPUERR

.CSABL

CRF

RETURN
TYPE
TYPEIT

.DSABL

MOV
RES4
MOV

000004
004010

101¢:

CMP
BNE
CLR

.DSABL

RETURN

MSGO25

,MSG025

SEQ 0311

;CLEAR OUT THE CPU ERROR REGISTER BITS
;THAT A EXPECTED TRAP COULD HAVE SET
; THIS CSR DOES NOT EXIST

CRF

FSSTACK,SP

#TIMEOUT,
4
#5,PROTYP

101§
CPUERR
CRF

;RESET TRAPS TO 4 TO DEFAWLT

;IS THIS AN 11/83/84 ?
;BRANCH IF NOT
;CLEAR QUT THE CPU ERROR REGISTER BITS
; THAT R EXPECTED TRAP COULD HAVE SET

MACRO v05.01b Friday 15-Feb-85 16:10
CVMJUAAQ MSV11-J MEMORY DIAG.
FS
READ CSR
COMMAND 1

10821 041464

F5CMD2:

SUBTST

10588800

103525 041502
10526 041504
041504
10527 041510
041510
10528 041516
10529 041520
041520
041526
041534
041536
041542

10530 041542
041542
10531 041546
10532 041550
041550
10533 041554
10534 041556
10535 041560
041560

10536 041564
041564
10537 041572
10538 041574
10539 041576
041576

10540 041602
10541 041606
041606
041614
041622
041624

041630

10542 041630

004737
010637

044670
002306

012737

041576

067021

012737
104026

177777

012737
022737
001002
005037

034114
000005

104401

002430
000004
004010

1018

067036

012737

1777717

104401

066763

013706

002306

012737
22737
001002
005037

034114
000005

104026
000207

000207

177766

MOV
.DSABL

ORES2,4
CRF

ORES2

3331311131

33311113

LOAD CSR

RO SRR PR EERE RS NN

YY1

SN C R R NS

000 00 R GEEC eSS

MOV

4-1,NOERROR

;TRAPS TO 4 GOTO RES?2

.DSABL
SET

CRF
NOERROR

ERROR

+26

;USE ERROR ROUTINE FOR PRINTOUT

#TIMEOUT,4
#5,PROTYP

;IS THIS AN 11/83/84

BNE
CLR

101
CPUERR

.DSABL

CRF

TYPE
TYPEIT

.DSABL
RDOCT
POP

104413

104401

COMMAND 2

WHICHCSR
SP,FSSTACK

RES4
MOV
CMP

066747

002150

LOAD CSR>>

333 333ttt

READCSR
TYPE
MSGO27
TYPEIT
,MSGO27

177766

012637
104425
104426

SRR SRR ERARES R RS S S A SR ENEBAE

CALL
MOV

SET4

000004

104426
104401

R RN

SEQ 031,

COMMAND 2

HAd 1232432233222 22 28231 133

; ¢SUBTEST
10522 041464
10523 041470
10524 041474
041474

<<FS

Pege 341

MSG023
,MSGO23

CRF

CSR

;RESET

TRAPS TO 4 TO DEFAULT

;BRANCH IF NOT
;CLEAR OUT THE CPU ERROR REGISTER BITS
:THAT A EXPECTED TRAP COULD HAVE SET
;FIRST CSR WORD

;READ AN OCTAL NUMBER
;PUT IN IN LOC “CSR"”
MOV (SP)+,CSR

LOADCSR

READCSR
TYPE
MSG028
TYPEIT
,MSG028

002430
RES2:

.DSABL
SET

CRF
NOERROR

gggggN

+26

;USE FOR PRINTOUT - NOT AN ERROR

TYPE
TYPEIT
.DSABL
MOV

MSGO2S
,MSGO2S
CRF
FSSTACK,SP

; THIS CSR DOES NOT EXIST

MOV
cMP

#TIMEOUT
,4
#5,PROTYP

RES4

000004
004010
1

;RESET

BNE
CLR

101 ¢
CPUERR

.DSABL

CRF

RETURN

TRAPS

;IS THIS AN 11/83/84

MOV

#-1,NOERROR

DEFAULT

;BRANCH IF NOT
;CLEAR OUT THE CPU ERROR REGISTER BITS
;THAT

A EXPECTED TRAP COULD HAVE SET

CVMUAARO MSV11-J MEMORY DIAG.

COMMAND 2

LOAD CSR

MACRO V05.01b Fr 'day 15-Feb-85

;KSR

SUBTST

(RS R SR SRR AR

041646
10547 041652
10548 041660
041660

10549 041664
041664

002102
002076
002304
000004
000002

104401

067052

104401

067111

002076

002304

012737

042026

000004

10567 041762
041762
041764
041770

010346
013703
004737

10569 042004
10570 042006
10571 042010
042010
042012
042014
042015

10572 042016
10573
10574 042020
042020

002102

TYPEIT
.DSABL
TYPE

,MSGO29
CRF
MSGO31

.0SABL

CRF

TYPEIT

002556

$HIOCT,BANK

SRR RN B S SR RGP

eSS R EO G

R R

E S A S E S E SRR R A E SRS S EIIE RS

RO
BANK
, LASTBANK
14
#FIRST,RO

#BIT0,R0O

BNE
cMP

1$
RO, #LAST

BHI
MOV
SET4
MOV
.DSABL

13
#3$ ,PARTHERE
244
#44,4
CRF

MOV

BANK,R3

MAP

002102
035716

BANK

CALL
.DSABL

BIS

.DSABL
MOV

010146
104403
006
000

000410

3$:

TESTMODE ,PSW

CRF
(RO),R1

KERNEL
TYPOCS
MOV
TYPOS

Rl
R1,-(SP)

.BYTE
.BYTE
.DSABL
BR

6
0
CRF
EXCMD3

TYPE

MSGO32

TYPEIT

;PHYSICAL ADDRESS (0-17775776)12?

;READ OCTAL NUMBER ONTO STACK & $HIOCT
;PUT MSB'S IN BANK

;PUT LSB'S IN RO

MOV (SP)+,RO

;CHECK FOR BANK TOQ HIGH
;BRANCH IF TRUE

;CHECK FOR
;BRANCH IF
;:CHECK FOR
;BRANCH IF
: INCASE _OF

0ODD ADORESS
ODD ADDRESS
ADDRESS OVER 16K
OVER 16K
ABORTS

; TRAPS T0O 4 GOTO 4

sMAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)

MAPPER
CRF

TESTAREA

177776

;INDICATE PARITY ACTION
; EXAMINE MEMORY

RO
BANK

BIT

157776

067151

AR R R R E R SRR

EXAMINE MEMORY

,MSGO31

CLC
ROL
ROL
CLC
ROR
CMP
BGT
ADD

011001
104417

104401

EXAMINE MEMORY>>

R R E RS R AR R XA R R R TR

#2,NOPAR

pPoP

060000
000001

002552

COMMAND 3

M5G029

RDOCT
MOV

012603
053737

R R R R AR R

BANK ,NOPAR,PARTHERE
,4

TYPE

002102

MOV

1¢:

042020

056146

COMMAND 3
REEREE AR R

MOV BANK, -(SP)
MOV NOPAR, -(SP)
MOV PARTHERE,- (5P)

012600
000241
006100
006137
000241
006000
023737
003357
062700
032700
001352
020027
101347
012737

104413
013737

AR SRR R R R R AR

PUSH

10550 041670
10551 041672
10552 041700
041700
10553 041702
10554 041704
10555 041706
10556 041712
10557 041714
10558 041716
10559 041724
10560 041726
10561 041732
10562 041736
10563 041740
10564 041744
10565 041746
10566 041754
041754

041774
10568 041776
041776

013746
013746
013746
013746
012737

«<FS

R R AR R AR ER R R R R

; *SUBTEST
10546 041632
041632
041636
041642

Page 343

SEQ 0313
FSCMD3:

10545 041632

16:10

,MSGO32

;ENTER TEST MODE

MOV (SP)+,R3

;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

; sSAVE R1 FOR TYPEQUT
::G0 TYPE--OCTAL ASCII
;s TYPE 6 DIGITS
; : SUPPRESS LEADING ZEROS

;PARITY ABORT

MACRO v05.01b Fridey 15 Feb-55 16:10
CVMJAARO MSV11-J MEMORY DIAG.
FS
EXAMINE MEMORY
COMMAND 3

10575 042024
10576
10577 042026
10578 042032
042032
10579 042036
10580
10581 042040
1058¢2 042042
042042
042046
042052
042056
10583 042062
042062
042070
042076
042100
042104
10584 042104

000405

062706

000004

104401

067170

104417

EXCMD3:

000004
002304
002076
002102

012737
022737
001002
005037

034114
000005

000207

177766

CRF
EXCMD3

ADD
TYPE
TYPEIT

MSGO33

.DSABL
BR

000400

012637
012637
012637
012637

.DSABL
BR

KERNEL

POP

RES4
MOV

000004
004010

101¢:

CMP
BNE
CLR

.DSABL

RETURN

Page

343-1

SEQ 0314

#4,5P

;FIX STACK

; TIMEOUT TRAP

,M5G033

CRF
EXCMD3

;:ENTER KERNEL MODE

4 ,PARTHERE ,NOPAR , BANK

#TIMEOUT,4
#5,PROTYP

;:RESET TRAPS 70 4 TO DEFAULT

MOV
MOV
MOV
MOV

(SP).,.4
(SP).,PARTHERE
(SP). ,NOPAR
(SP).,BANK

1014
CPUERR

;1S THIS AN 11/83/84 ?
;BRANCH IF NOT
;CLEAR QUT THE CPU ERROR REGISTER BITS

CRE

; THAT A EXPECTED TRAP COULD HAVE SET

MACRO V0S5.01b Fridey 15-Feb-85 16:10
CVMJARO MSV11-J MEMORY DIAG.
EXAMINE MEMORY
COMMAND 3

10587 042106

FSCMD4:
B

SUBTST

; #SUBTEST
Bl

10588 042106
042106
042112
042116
042122
10589 042126
10590 042134
042134
10591 042140
042140
10592 042144
10593 042146
10594 042154
042154
10595 042156
10596 042160
10597 042162
10598 042166
10599 042170
10600 042172
042172
042200
10601 042202
10602 042206
042206
042212
10603 042214
042214
042220
10604 042222
10605 042230
042230
10606 042236
042236
042240
042244

013746
013746
013746
013746
012737

002102
002076
002304
000004
000003

104401

067276

104401

104413
013737
012600
000241
006100
006137

000241
006000

023737
003357
062700

1$:

COMMAND 4

22 2 2324 222 22

TYPEIT

,MSGO31

.DSABL
TYPE

CRF
MSGO31

.DSABL

CRF

MOV

$HIOCT ,BANK

CLC
ROL

22 33

I TII1]]

it it

1131t i1
T Y]

;sINDICATE PARITY ACTION
;MODIFY MEMORY

;PHYSICAL ADDRESS (0-17775776)2?
;READ OCTAL NUMBER ONTO STACK & $HIOCT

;PUT MSB'S IN BANK
;PUT LSB'S IN RO

RO
BANK

ROR

IF BANK GV LASTBANK THEN GOTO 1$¢

002556

ADD
#FIRST,RO
IF #BITO SET.IN RO THEN GOTO 14

042270

002304

012737

042276

000004

;CHECK FOR BANK TOO HIGH
CMP BANK,LASTBANK
BGT 1¢
;CHECK FOR ODD ADDRESS

BIT
BNE
IF RO HI #LAST THEN GOTO 1¢
;CHECK FOR ADDRESS QVER 16K
CMP
BHI
MOV
#3$ ,PARTHERE
; INCASE OF ABORTS
SET4
#4%
; TRAPS TQ 4 GOTO 44
MOV
#44$ .4
CRF
.DSABL
MAP
BANK
;MAP SUPERVISOR SPACE (TEST
MOV
MOV
BANK,R3
MAPPER
CALL
.DSABL
CRF
MOV
INVALIDATE
TESTAREA
;ENTER TEST MODE

002102
035716

012603
104511

177776

BIS

TESTMODE ,PSW

011001

.DSABL
MoV

CRF
(RO),R1

042264
042266

104417
000410

KERNEL
BR

5¢

042270
042270

104401}

TYPE

MSGO32

.DSRBL

CRF

3¢

TYPEIT

,MSGO32

#BITO,RO
1¢

RO, #LAST
1%

AREA) TO BANK
R3,-(SP)

(SP)+,R3

;GO TO SYSTEM TEST MODE

;GETTING HERE MEANS WE GOT LUCKY - NO TRAPS

067151

MODIFY MEMORY

MOV (SP).,RO

ROL

CLC

157776

042262

MODIFY MEMORY>>
3

BANK ,NOPAR ,PARTHERE .4

#3,NOPAR
MSGO36
,MSGO36

POP

060000

002552

MoV
TYPE
TYPEIT

RDOCT

002102

020027
101347
012737

053737

10609
10610
10611
10612
10613
10614

002076

000001

042250
10607 042252
10608 042254
042254

COMMAND 4
2283 222 22 22

MOV PARTHERE,
- (SP)

032700
001352

010346
013703
004737

111222222 23

SEQ 0315

MOV BANK, -(SP)
MOV NOPAR,-(SP)

002102

PUSH

067111
056146

«<<FS

1231222232233 23333

Page 345

;ENTER KERNEL MODE

;PARITY ABORT

MACRO v05.01b Friday 15 Feb-85 16:10
CVMJUAAQ MSV11-U MEMORY DIAG.
MODIFY MEMORY
COMMAND 4

“FS

10615 042274
10616
10617 042276
10618 042302
042302
10619 C42306
10620
10621 042310
042310

000431
062706

000004

104401

067170

104401
010146
104403
006
000

10623 042322
042322

104401

10627
10628
10629
10630

042340
042342
042344
042346
042346

10631 042352
042352
042354
042356
042357
10632
10633 042360
10634 042362
042362
042366
042372
042376
10635 042402
042402
042410
042416
042420
042424

10636 042424

S$:

067315

067352

104413
012601

053737

002552

010110
011001

104417
104401

067334

EXCMD4:

012637

012737
022737

034114
000005

001002
005037

000207

#4,SP
MSGO33

;FIX STACK
; TIMEQUT TRAP

.DSABL
BR

CRF
EXCMD4

;EXIT

TYPE
TYPEIT
.DSABL
TYPOCS
MOV
TYPQS

MSGO37
,MSGO37
CRF
Rl
R1,-(SP)

TYPE
TYPEIT
.DSABL

MSGO39
,MSGO39
CRF

177766

,MSGO33

.BYTE
BYTE
.DSABL

6
O
CRF

RDOCT
POP

TYPOCS
MOV
TYPQS

000004
002304
002076
002102

012637

ADD
TYPE

TYPEIT
.DSABL

104417
012637

LEXTT

KERNEL
TYPE

010146
104403
006
000

012637

EXCMDA

TESTAREA
BIS
TESTMODE ,PSW
.DSABL
CRF
MOV
R1,(RO)
MOV
(RO).R1

177776

o1s

,MSGO38
CRF

Rl
R1,-(SP)

;PRINT IT
:;SAVE R1 FOR TYPEQUT
::60 TYPE--OCTAL ASCII

;:TYPE 6 DIGITS
; ; SUPPRESS LEADING ZEROS
;INPUT NEW DATA
READ ON OCTAL NUMBER ONTO THE STACK
;GET NEW NUMBER
MOV (SP)+,R1
;ENTER TEST MODE

;GO TO SYSTEM TEST MODE

;PUT IT IN MEMORY
;READ IT AGAIN

;ENTFR KERNEL MODE
;DATA IS NOW

;PRINT I7
; ;SAVE R1 FOR TYPEOQUT
;:6G0 TYPE--OCTAL ASCII

6
©
CRF

KERNEL
POP

;ENTER KERNEL MODE
4 ,PARTHERE ,NOPAR , BANK

MOV
CMP

#TIMEQUT
.4
#5,PROTYP

CLR

CPUERR

.DSABL

CRF

BNE
:

MSGO38

;0LD DATA WAS

.BYTE
.BYTE
.DSABL

RES4

000004
004010

SEQ 0316

TYPEIT

000424

10622 042314
042314
042316
042320
042321

10624 042326
10625 042330
042330
10626 042332
042332

Page 345-1

RETURN

101%

;:TYPE 6 DIGITS
; :SUPPRESS LEADING ZEROS

;RESET TRAPS TJ 4 TO DEFAULT

MOV
MOV
MOV
MOV

(SP).,4
(SP).+,PARTHERE
(SP).,NOPAR
(SP).,BANK

;IS THIS AN 11/83/84 ?
;BRANCH IF NOT
;CLEAR QUT THE CPU ERROR REGISTER BITS
; THAT A EXPECTED TRAP COULD HAVE SET

CVMUAARO MSV11-J MEMORY DIAG.

COMMAND 4

MACRO V05.01b Friday

15-Feb-85

MODIFY MEMORY

SUBTST

s REREE RN R R

<<FS§

KRR AR R R

AR R

R AR AR SRR R

002102
002112
002412
002326
000060
000062
002306

104401

067374

042466

104401

067072

10644 042472
10645 042474
042474
10646 042500
042500
042506
10647

104413

042432
042436
042442
042446
042452
10641 042456
10642 042462
042462

10643 042466

10648
10649
10650
10651

042510
042514
042516
042520

042520
042526
10652 042530
042530

10653 042534
042534
10654 042536
042536
10655
10656 042536
042536
10657 042542
10658 042544
042544
10659 042550
042550
042556
10660 042560
042560
042564
10661 042566
042566
10662 042572
10663 042574
042574

012637

002102

023737
003367

002102

013701
006301
006301

002102

033761
001003

002106

104401

067420

023727
003367

002112

005737

002112

104401

067463

012602

RS R

RS R E R R E RN SN E

RDOCT
POP

BANK

TYPE
TYPEIT

CRF

MSGO41
,MSGO41

RN SR E S S

st I

Yyl

MOV BANK, -(SP)
P
MOV PATTERN, (SP)

[
MOV TESTADD, -(SP)
MOV PCBUMP,
- (SP )
MOV TKVEC, (SP)
Y
MOV TKVEC.2,-(S P J

;SAVE LAST GOOD STACK POINTER
;SELECT BANK & PATTERN TEST
;BANK(0-177)?

;:READ AN OCTAL NUMBER ONTO THE STACK
;PUT IT IN BANK
MOV

;CHECK FOR BANK TOO HIGH

(SP)+,BANK

CMP BANK,LASTBANK
BGT 1¢

Mov
BANK,R1
ASL
R1
ASL
R1
IF CPUBIT OFF.IN CONFIG(R1)

002664

;BANIK NOT ACCESSABLE

BIT CPUBIT,CONFIG(R1)
BNE L413

CRF
.DSABL
GOTO 14

2$:

067445

002112

104413

TYPEIT

SP,FSSTACK
MSG0O40
,MSGO40
CRF
MSGO30
,MSGO30

END

012637

IF BANK GT LASTBANK THEN GOTO 1$

002556

104413

001004

MOV
TYPE
TYPEIT
.DSABL
TYPE

.DSABL

000754

104401

KR E R R R R R

SELECT BANK & PATTERN

BANK,PATTERN, TESTADD,PCBUMP, TKVEC, TKVEC+2

PUSH

1¢:

SELECT BANK & PATTERN>>
R

COMMAND S

Ri22 222222 232222222222ttt

013746
013746
013746
013746
013746
013746
010637

347

COMMAND S5
R R

; *SUBTEST
10640 042426
042426

Page

SEQ 0317
FSCHMDS:

10639 042426

16:10

000047

;OF IF

TYPE
TYPEIY
.DSABL
RDOCT
poP

MSGO42

,M5G042

CRF

PATTERN

IF PATTERN GT #47 THEN GOTO 2%

;PATTERN(0-45)?

;READ AN OCTAL NUMBER ONT0 THE STACK
;PUT IT IN PATTERN

MOV (SP)+,PATTERN

;CHECK FOR PATTERN TO HIGH
,
#47
CMP PATTERN
BGT 2%

IF PATTERN EQ #
TYPE
TYPEIT

MSGO43
,MSGO43

.DSABL _ CRF
RDOCT
POP
R2

;PATTERN O DATA IS?

TST PATTERN
BNE L414

;READ AN OCTAL NUMBER CNTO THE STACK

;PUT IT IN R2

MOV (SP).,.R2

CVMJUARQO MSV11-J MEMORY DIAG.

COMMAND 5

10664 042576
042576
10665
10666
10667 042576
042576
042600
042604

010346
013703
004737

042610
10668 042612

012603
104511

10669 042614

002102
035716

005737
001404

002124

104401

067617

10672 042632
10673 042636
042636
10674 042636
042636

000137

043246

104401

067505

10675
10676
10677
10678
10679
10680
10681

013737
013702
072227
016203
072327
042703
006303

002152
002102
000002
002664
177770
177760

10682
10683
10684
10685

042676
042702
042710
042716

010337
012737
012737
017700

1063; 042730

052777

10686 042722
106
10689

10690 042736

10691
10692
10693
10694
10695
10696
10697
10698

042736
042744
042752
042756
042760
042762
042766
042772
043000
043006
043006
043014
043016

10699
10700 043022
043022
043024
043030

Page 347-1

SEQ 0318

END ;OF IF

040052

042642
042650
042654
042660
042664
042670
042674

MACRO V05.01b Fridey 15-Feb-85 16:10

SELECT BANK & PATTERN

004737

10670 042620
042620
042624
10671 042626
042626

CRF

MOV (SP)+,R3

EXBANK

;SET NEW MARGINS

IF RRFLAG IS TRUE

TST RRFLAG
BEQ L415
; BANK REQUIRES RELOCATION

TYPE
MSGO49
TYPEIT
,MSG049
CRF
.DSABL
JMP CMDSC

END ;OF IF RRFLAG

002154

000060
000062

000100

137704

177776

012737
012737
013701
006301
006301
005037
005037
012737
012737

177777
177777
002102

002612
002110

002240
002264
060000
060002

002412
002414

032761

010000

002666

002102
035716

BANK,R3
MAPPER

CALL

000200

010346
013703
004737

MOV
CALL

;MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)

INVALIDATE

002152
043246
000340
137722

002240

BANK

.DSABL

042737

001413
005237

MAP

L414:;;;:;;:

MSG046
6226046

:TO ESCAPE TYPE ANY KEY!

MOV
MOV
ASH
MOV
ASH
gIC
ASL

CSRNO, SAVCSR
BANK,R2
#2,R2
CONFIG(R2),R3
#-10,R3
#1C17,R3
R3

;SAVE OLD CSR NUMBER
:
;GENERATE INDEX INTO CONFIGURATION TABLE
;:R3 = LOW WORD OF CONFIGURATION TABLE FOR THIS BANK
;POSITION CSR CODE IN BITS 0 3
;CLEAR ALL BUT THE CSR CODE
;ADJUST CSR NUMBER

MOV
MOV
MOV
MOV

R3,CSRNO
#CMDSC, TKVEC
#340, TKVEC+2
9$TKB,RO

B1S

#B176,3$TKS

SET

HEADER, MUT

MOV
ASL
ASL
CLR
CLR
MOV
MOV

BANI(,R1
R1
R1
SPLTCSR
PASFLG
#FIRST,TESTADD
#FIRST+2,TESTADD+2

BIC

CMDSB:

L815:;;:::;;

TYPE
ng%gl

#B8I77,PSW

IF #BIT12 SET.IN CONFIG+2(R1)
INC
MAP

MOV
CALL

SPLTCSR
BANK
BANK ,R3
MAPPER

;I KILL ANY OLD INTERRUPT

;LOWER CPU PRICRITY TO 140

;ENABLE KEYBOARD INTERRUPTS

MOV
MOV

#-1,HEADFR
@-1,MUT

BIT #BIT12,CONFIG.2(R1)
BEQ L416

MOV R3,-(SP)

CVHJAAO MSV11-J MEMORY DIAG.

COMMAND S

043034
10701 043036
10702 043044

012603
012737

043072

10710 043072
10711 043100
10712 043106
10713 043112
10714 043114
10715 043120
10716 043124
10717
10718 043126
10719 043130

10720 043132
10721 043134
10722 043136
10723 043140
10724 043142
10725 043144
10726 043146
10727 043150
10728 043152
10729 043154
10730 043156
10731 043160

10732 043162
10733 043164
10734 043166
10735 043170
10736 043172
10737 043174
10738 043176
10739 043200
10740 043202
1074} 043204
10742 043206
10743 043210
10744 043212
1074S 043214
10746 043216
10747 043220

032777
001402

120000

002414

000001

002152

012637

002152

012737
012737
013700
006300
004770
005037
000712

000002
000002
002112

MOV (SP)+,R3

MoV
#120000, TESTADD.2
END; OF IF #B8IT12

IF €SWO0 SET.IN aSuR

137564

000405

017640
017754
020070
020140
020222
020256
020320
024220
024220
024220
020354
024220
024220
020434
020456
020536
021026
021060
021124
024220
021332
021610
022200
022454
022644
023160
023346
023446

CRF

ECCDIS
ELSE

013746
104502

Page 347-2

SEQ 0319
.DSABL

104470

017510
017544

15-Feb-85 16:10

SELECT BANK & PATTERN

043044

10703 043044
043044
043052
10704 043054
10705 043056
043056
043060
10706 043060
043060
10707 043064
10708 043066
043066
10709 043072

MACRO V0S5.01b Friday

PUSH

CLRCSR

POP

END

002076
002326

043126
002076

CLR
BR
FSPAT:

MT0000
MT0001
MT0002
MTO0003
MT0004
MT0005
MT0006
MT0007
MT0010
MT0999
MT0999
MT0999
MTO014
MT0999
MT0999
MT0017
MT0020
MTO0021
MT0022
MT0023
MT0024
MT0999
MT0026
MT0027
MT0030
MTO0031
MT0032
MT0033
MT0034
MT0035

BIT &SWO,8SWR
BEQ L4117
;DISABLE ERROR CORRECTION

BR LA420

L417:5;:::::

CSRNO

;0F IF

MOV
MOV
MOV
ASL
CALL

LA16:;;::::

#2 ,NOPAR
#2,PCBUMP
PATTERN,RO
RO
F SPAT(RO)

NOPAR
CMDSB

;<1
;<1
;<1
; 1
; 1
; 1
;<1
;<1
;<1
;<1
;<1
;<1
; 1
;<1
;<1
;<1
: 1
; 1
;10
;10
;20
;<1
;<1
; 1
; 1
; 3
;<1
;35
; 1
;<1

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

MOV CSRNO, -(SP)

;:CLEAR CSRS

MOV (SP)+,CSRNOC

L420:;:::::

;PARITY ACTION
; TRAPS ADD 2 TO PC

;LOOP TILL KEYBOARD INTERRUPT
DATA PATTERN TEST
ADDRESS TEST
COMPLEMENT ADDRESS TEST
3 XOR 9 WORST CASE NOISE TEST
ROTATING ZEROS TEST
ROTATING ONES TEST
INITIAL DATA TEST
ADDRESS BIT TEST
BYTE ADDRESSING TEST
NULL TEST TO KEEP TABLE ORDER
NULL TEST TO KEEP TABLE ORDER
NULL TEST TO KEEP TABLE ORDER
BASIC DOUBLE BIT ERROR TEST
NULL TEST TO KEEP 1ABLE ORDER
NULL TEST TO KEEP TABLE ORDER
HOLDING 1'S & 0'S TEST
SYNDROMES TO CSR ON SBE TEST
MARCHING 0'S & 1'S TEST
REFRESH & SHIFTING DIAGONAL TEST
SHIFTING DIAGONAL TEST
FAST GALLOPING PATTERN TEST
NULL TEST TO KEEP TABLE ORDER
RANDOM DATA TEST
UNIQUE BANK TEST
FLUSH OUT DBE'S TEST
S0B-A-LONG TEST
WRITE RECOVERY TEST
BRANCH GOBBLE TEST
SOFT ERROR TEST
WORST CASE NOISE PARITY TEST

CVMJARO MSV11-J MEMORY DIAG.
MACRO V05.01b Friday 15-Feb-85 16:10
Fs
COMMAND S
SELECT BANK & PATTERN

10748 043222
10749 043224
10750 043226
10751 043230
10752 043232
10753 043234
10754 043236
10755 043240
10756 043242

023560
023622
024220
023660
023740
023774
024024
024104
024134

MT0036
MT0037
MT0999
MT0041
MT0042
MT0043
MT0044
MT0045
MT0046

ig;g; 043244

024164

10759 043246
10760 043252
10761 043260
043260
043264
10762 043270
10763 043274
043274
043300
10764 043304
043304
043310
10765 043214
043314
043316
043322

013706
082777

002306
000100

012637
012637
117700

000062
000060
137350

012637
012637

002326
002412

012637
012637

002112
002102

010346
013703
004737

043326

012603

10766 043330
10767 043334
10768 043342

004737
013737
000207

; 1
;<1
.<1
; 1
;<1
; 1
: S
; 1
; 1

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

MT0047

;<1 SEC

MOV
BIC
POP

FSSTACK, SP
#B176,3$TKS
TKVEC+2, TKVEC

MOVB
POP

@$TKB,RO
PCBUMP, TESTADD

POP

PATTERN, BANK

MAP

BANK

002102
035716

MOV
CALL
_DSRBL

BANK ,R3
MAPPER
CRF

040052
002154

CALL
MOV
RETURN

EXBANK
SAVCSR, CSRND

137362

002152

CMDSC:

Page 347 3

SEQ 0320

CORRECTION CODE TEST
ECC DISABLE TEST
NULL TEST TO KEEP TABLE ORDER
ADDRESS TO CSR ON DOUBLE BIT ERROR TEST
EXTENDED Q-BUS ADDRESS TEST
WRITE BYTE CLEARS SBE TEST
SHIFTING 1/0'S THROUGH THE CHECK BITS
SYNDROMES TO CSR ON DBE TEST
CHECK SINGLE BIT ERROR WITH ECC DISABLED TEST
NO CSR UPDATE WITH SBE ON DBE TEST

;RECOVER OLD STACK POINTER
MOV (SP)e,TKVEC.2
MOV (SP)e,TKVEC
;GET CHARACTER TO GET RID OF FLAG
MOV (SP)+,PCBUMP
MOV (SP).,TESTADD

;REMAP OLD BANK

MOV (SP)+,PATTERN
MOV (SP)+,BANK
MOV R3,-(SP)

MOV (SP)+,R3

;RESTORE CSRNO.

MACRO V05.01b Friday 15-Feb-85 16:10
C VMJAAD MSV11-J MEMORY DIAG.
S
COMMAND S
SELECT BANK & PATTERN

10770 043344

FSCMD6:
b

SUBTST

;sSUBTEST

10771 043344
10772 043350
10773

004737
100207

032722

«<FS

CALL

RETURN

PCONFIG

Page 348

COMMAND 6
R

COMMAND 6

SEQ 0321
TYPE CONFIGURATION MAP>>
e

TYPE CONFIGURATION MAP

TT
T I
LI

C VMJUAAQ MSV11-J MEMORY DIAG.

COMMAND 6

MACRO V05.01b Friday 15-Feb 85 16:10

TYPE CONFIGURATION MAP

10776 043352

)

10780
10781 043406
043406
043414
10782 043416
10783 043420
043420
043422
10784 043422
10785 043424
043424
10786 043424
043424

013746
013746
013746
013746
013746
010637

002102
002112
000060
000062
002076
002306

104401

067671

032777
001402
104470

000001

«<FS

COMMAND 7

SOB-A-LONG TEST>>

;*SUBTEST

COMMAND 7

SOB-A-LONG TEST

1112113323338 322223 2

000401

104502

067505

10789 043434
10790 043442
10791 043450

012737
012737
017700

043560
000340
137170

000060
000062

000200
000100

177776
137152

012737
012737

177777
177777

002612
002110

005037

002102

004737

040052

005737
001406
005737
001003
104511
004737

002i16

10796 043470

043470
10797 043476

10798 043504
10799
10800

10801
10802
10803

043504
043510
043510
043514
043514
043520
043522
043526
043530
043532
043536
043536

10804 043536

MSGOS6
,MSGO56

.DSABL

CRF

TYPE

MSG046

.DSABL

CRF

,MSGO46

MOV
MOV
MOV

#CMD7C, TKVEC
#340,TKVEC+2
3$TKB,RO

SET

HEADER,MUT

13333

N e

33817

T I

YY)

MOV BANK, -(SP)
MOV PATTERN, -(SP)
MOV TKVEC,-(SP)
MOV TKVEC+2,-(SP)
MOV NOPAR,-(SP)
;SAVE LAST GOOD STACK POINTER
;S0B-A-LONG TEST

#B8I7T7,PSW
#BIT6,83$TKS

BIT #S5WO0,dSWR
BEQ L421
;DISABLE ERROR CORRECTION

;:CLEAR CSRS

;0F FOR BANK

; TO ESCAPE TYPE ANY KEY!

:KILL ANY OLD INTERRUPT

;LOWER CPU PRIORITY TO 140
;ENABLE KEYBOARD INTERRUPTS

CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

INVALIDATE
CALL MTO0031
END ;0F IF ACFLAG

BR L422
La21:::;:::;

L822:;:::::
;BELL = EACH PASS COMPLETE

FOR BANK := #0 TO LASTBANK

END

CRF

002124
022454

SP,FSSTACK
MSGOSS
,MSGOSS

8IC
BIS

CMD7B:

MOV
TYPE
TYPEIT

TYPEIT

10795

BANK ,PATTERN,
TKVEC, TKVEC+2,NOPAR

TYPE
TYPEIT

104401

CLRCSR
END :OF IF

043430

042737
052777

ECCDIS
ELSE

10787

10792 043454
18;32 043462

22 2233333332

IF #SWO SET.IN aSWR

137222

067712

10788 043430

T T

PUSH

.DSABL

104401

SEQ 0322

FSCMD7: SUBTST

10577 043352
043352
043356
043362
043366
043372
10778 043376
10779 043402
043402

Page 350

MOV
MOV

&-1,HEADER
8-1,MUT

CLR BANK
B7L:::::5:
TST ACFLAG
BEQ LA423
TST RRFLAG
BNE L423

L823:::::5::

MACRO V05.01b Friday

_VMJARO MSV1il-J MEMORY DIAG.
S0B-A-LONG TEST
COMMAND 7

043536
043542
043550
043552
10805 043552
043552
10806 043556

005237
023737
003757

002102
002102

104401

002653

043634
10813 043636
10814 043642

012603
004737
000207

013706
042777
117700

002306
000100
137046

012637
012637
012637
012637
012637

002076
000062
000060
002112
002102

010346
013703
004737

002102
035716

040052

Page 350 1

SEQ 0323

002556
TYPE
TYPEIT

000752

043556
10807
10808 043560
10809 043564
10810 043572
10811 043576
043576
043602
043606
043612
043616
10812 043622
043622
043624
043630

15-Feb-85 16:10

137050

CMD7C:

$BELL

, $BELL

;RING BELL

INC BANK
CMP BANK,LASTBANK
BLE 871
ETl:555444

.DSABL
GOTO0

CRF
CMD78

MOV

FSSTACK, SP

MOVB

3$TKB,RO
;READ CHAR TO KILL FLAG
NOPAR, TKVEC+2, TKVEC,PATTERN,
BANK
MOV (SP).+ ,NOPAR
MOV (SP)+, TKVEC.2
MOV (SP).,TKVEC
MOV (SP)+ ,PATTERN
MOV (SP)+,BANK
BANK
:MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)
BANK,R3
MAPPER
CRF
MOV (SP)Y+,R3
EXBANK

BIC

POP

MAP

MoV

CALL
.DSABL
CALL

RETURN

#8IT6,3$TKS

BR CMD7B

;RECOVER OLD STACK POINTER

Mgl

VMJAAQ MSV11-J MEMORY DIAG.

MACRO VOS.0lb Friday 15-Feb 85 16:10
SOB-A-LONG TEST

COMMAND 7

10817 043644

FSCMDB:
i

SUBTST

22122433

; sSUBTEST

<<FS
1t 3

10818 043644

043644
043646
043630
043652
10819 043656
10820 043664
10821 043670
043670
043674

PUSH

010046
010246

010346
013746
013737
005337

002102
056654
002434

013746
104405

002434

013737
012737

172350
001000

043712

104401

071242

10825 043716
043716
043722

013746
104405

002630

104401

070265

005737

002630

10822 043676
10823 043704
10824 043712

10826 043724

043724

10827 043730

043730
043734
10828 043736
10829 043742
043742
043746
10830 043746
10831 043752
10832 043756
043756
043762
10833 043764
043764
043770

10834 043772
043772

10835 043776
043776
10836 044004
044004

10837 044004
044004

001445
005037

002102

013703
070327

002102
000004

105763
001424

002666

005737
001005

002334

104401

070230

012737

177777

044010
044012
044013

104403

10838 044014

116300

002102

006
000

002666

MOV

TEMP, -(SP)

.DSABL
MOV
MOV

TYPE
TYPEIT
.DSABL
TYPDEC
MOV
TYPDS
.DSABL

il Il

TEMP

CRF
KIPAR4,SAV4
#1000,KIPARS

IS IYYYITIIL)

RO, -(SP)
R2,-(SP)
R3,-(SP)

BANK, -(SP)

;PASSES COMPLETED

CRF

$ERTTL

$ERTTL,-(SP)

CRF

; ;SAVE $ERTTL FOR TYPEOQUT

; ;G0 TYPE--DECIMAL ASCII WITH SIGN

MSGO79

;ERROR(S) DETECTED

TST $ERTTL
BEQ L424

SUCCESS
:=

TYPE

40 TO LASTBANK

M5G076

872

ERRORS

BANK,3

BANK, -(SP)

6
0O
CRF
MOVB

TST SUCCESS
BNE L4&26

MOV

:0F IF SUCCESS

TYPOCS

CLR BANK

TSTB CONFIG+2(R3)
BEQ L425S

;BANK

,MSGO76
CRF
SET SUCCESS
END

TYPOS
.BYTE
.BYTE
.DSABL

;:3I.L.C.;REV B
;::I.L.C.;REV B

IF SUCCESS IS FALSE

MOV

; :SAVE TEMP FOR TYPEQUT

MOV BANK,R3
MUL 94,R3
IFB CONFIG+2(R3) NE #0

002334

: ;G0 TYPE--DECIMAL ASCII WITH SIGN

MSG12S
,MS5G12S

FOR BANK

TYPEIT
.DSABL

MOV
MOV
MOV
MOV

TYPEIT
,MSGO79
CRF
.DSABL
IF SERTTL NE 90

CLR

ERROR SUMMARY

I i
T
T eI LI

$PASS, TEMP
TEMP

TYPE

ERROR SUMMARY>>

22222 231 2t

COMMAND 8

MOV
DEC

TYPDS

002270
172350

SEQ 0324

RO,R2,R3,BANK

TYPDEC

002334

005037

013746

002434

COMMAND 8

22223112 2322

Page 352

L426::;:::::

::gAVE BANK FOR TYPEOUT
::G0 TYPE--QOCTAL ASCII
;:TYPE 6 DIGITS
; s SUPPRESS LEADING ZEROS

CONFIG+2(R3),RO

#-1,SUCCESS

——

B10

MACRO V05.01b Fridey 15-Feb-85 16:10
CVMJUAAD MSV11-J MEMORY DIAG.
FS
ERROR SUMMARY
COMMAND 8

10839 044020
10840 044024
044024
044026
10841 044030
044030

042700

177400

8IC

005237
023737
003737

002102
002102

10842 044034

044034
10843 044034
044034
044040
044046
044050
10844 044050
044050
10845 044050
10846 044056
044056
044062
044064
044066
10847 044070

END

002270

012637
012603
012602
012600
000207

002102

#tC377.R0

;OF FOR BANK

INC BANK

CHpP BANK A ,LASTBANK

002556

BLE

END

013737

SEQ 0325

MOV
: :SAVE RO FOR TYPEOUTY
TYPDS
::60 TYPE--DECIMAL ASCII WITH SIGN
.DSABL _ CRF
TYPE
$CRLF
TYPEIT
,$CRLF
CRF
.DSABL
END ;OF IFB CONFIG(R3)

104405
002660

352-1

TYPDEC
RO
RO, -(SP)

010046

104401

Page

172350

;OF IF

MOV
POP

RETURN

$ERTTL

SAV4 KIPAR4
BANK,R3,R2,R0

;:I.L.C.;;;REV B

C10

MACRO VO05.01b Friday 15-Feb-85 16:10
CVMJUARO MSV11-J MEMORY DIAG.
FS
ERROR SUMMARY
COMMAND 8

FSCMD9:

10850 044072

SUBTST

;«SUBTEST

SR SRR RN

10851 044072
044072
044076
044102
044106
044112
10852 044116

013746
010637

002102
002112
000060
000062
002076
002306

044122

104401

070160

032777
001402
104470

000001

10853 044122
10854
10855 044126

044126
044134
10856 044136
10857 044140
044140
044142
10858 044142
10859 044144
044144
10860 044144
044144

013746
013746

R R R R AR R

PUSH

MOV
TYPE
TYPEIT
.DSABL

COMMAND 9

AR S AR ER

SEQ 0326

REFRESH TEST>>

RS R R A SRR EREE AR SRR A SR EERE S A

COMMAND 9

RS SRR EERE R SR G R R R R

A S S SRS S SRS

R R R

R SRR S ER

RS R A

S SRS

BANK,PATTERN,
TKVEC, TKVEC+2,NOPAR

SP,FSSTACK
MSGO73
,MSGO73
CRF

000401

104502

A SN

BIT ASWO,aSWR
BEQ L427

;DISABLE ERROR CORRECTION

CLRCSR
END ;OF IF

;:CLEAR CSRS

BR L430

TYPE
TYPEIT

:BELL = EACH PASS COMPLETE

.DSABL

MSGOS6
,MSGOS6
CRF

104401

067505

TYPE
TYPEIT

MSG046
,MSGO46

:TO ESCAPE TYPE ANY KEY!

044154
044162
044170
044174
044202

012737
012737
017700
042737
052777

044300
000340
136450
000200
000100

000060
000062

MOV
MOV
MOV

#CMDIC, TKVEC
+ 340, TKVEC+2
$TKB,RO

044210
044210
044216

012737
012737

117
177777

002612
002110

10870
10871 044224
044224
044230
10872 044230
10873 044234
044234

044240
044242
044246
10874 044250
10875 044252
10876 044256

005037

002102

004737

040052

005737
001406
005737
001003
104511
004737

002116

005237

002102

044256

10877 044236

044256

FOR BANK

€0 TO LASTBANK

CALL EXBANK

IF ACFLAG IS TRUE AND RRFLAG IS FALSE

002124
021026

sKILL ANY OLD INTERRUPT
;LOWER CPU PRIORITY T0O 140
;ENABLE KEYBOARD INTERRUPTS

HEADER ,MUT

SET

CMD9B:

CRF

3. 3IT7,PSUW
#5176,3$TKS

BIC
BIS

177776
136432

INVALIDATE
CALL MT0022
END ;0F IF ACFLAG
END

d SO U PRGSO SR

;REFRESH TEST

ECCDIS
ELSE

.DSABL

SC OO SO OO O N

;SAVE LAST GOOD STACK POINTER

067712

044150

MOV BANK, -(SP)
MOV PATTERN,
- (SP)
MOV 1KVEC, (SP)
MOV TKVEC+2,-(SP)
MOV _NOPAR, -(SP)

IF #SWO SET.IN aSWR

136502

REFRESH TEST

104401

10861
10862 044150

10863
10864
10865
10866
10867
10868
10869

<«<FS

sEEEREEER RN NSRS E N

Page 354

;OF FOR BANK

MOV
MOV

#-1,HEADER
2-1, MUT

CLR BANK
B73:::::::
TST1

ACFLAG

BEG L431
TST RRFLAG
BNE L431

INC BANK

D10

MACRO v05.01b Friday 15 Feb 85 16:10
CVMUAAO MSV11-u MEMORY DIAG.
REFRESH TEST
COMMAND 9

Page

354 1}

044262
044270
044272
10878 044272
044272

10879 044276
044276
10880
10881 044300
10882 044304
10883 044312
10884 044316
044316
044322
044326
044332
044336
10885 044342
044342
044344
044350

044354
10886 044356
10887 044362
10888

023737

002102

104401

002653

003757

002556

CMP BANK,LASTBANK

BLE B73
TYPE
TYPEIT
.DSABL

GOTO0

000752
013706
042777

117700

002306
000100
136326

012637
012637
012637
012637
012637

002076
000062
000060
002112
002102

010346
013703
004737

012603
004737
000207

SEQ 0327

136330

cMD9C:

MOV

BIC
MOvB
POP

$BELL

. $BELL

CRF
CMD9B

FSSTACK,
SP
#BI76,ad$
TKS

BANK

002102
035716

MOV

BANK,R3

040052

CALL

RETURN

BR CHMD9B
;RECOVER OLD STACK POINTER

d$TKB,RO
:READ CHAR TO KILL FLAG
NOPAR, TKVEC+2, TKVEC,PATTERN,
BANK

MAP

CALL
.DSABL

;RING BELL

MoV
MoV
MOV
MOV
Mov

(SP)+ ,NOPAR
(SP)+,TKVEC.2
(SP).,TKVEC
(SP)+,PATTERN

;MAP SUPERVISOR SPACE (nga AREA) TO BANK
R3,-(SP)

MAPPER

CRF

EXBANK

MoV (5P)+,R3

E10

MACRO V05.01b Friday 15-Feb-85 16:10
CVMUARO MSV11-J MEMORY DIAG.
REFRESH
TEST
9
COMMAND
FS

SUBTST

«<<FS

222222322

2222222222222

; sSUBTEST
i3

10892 044364
044364
10893 044366
044366

10894 044372
10895 044374
044374
10896 044376
10897 044302
10898 044406
044406
10899 044410
10900
10901 044412

4323333333232

010046

104401

070311

104413
012600
042700
110037

177760

002357

32332

TYPE
TYPEIT
.DSABL
ROOCT
POP

MSGO8S
,MSGO8S
CRF

8IC

#tC17,R0O

MOvB

SET FILL COUNT>>

12232 222

COMMAND 10

PUSH

popP

012600
000207

COMMAND 10

32822

220

312

SET FILL COUNT

3833333

it 11213

33 i

SUBTST

TTITIT

]

MOV (SP).,RO

RO, $FILLS

MOV (SP).,RO

«<<FS

COMMAND 11

2223382223223 32 223

; *SUBTEST

I T

ITITIYYI L)

:FILL COUNT(OCTAL)?

RETURN

FCMD11:

ENTER KAMIKAZE MODE>>

22322ttt is

COMMAND 11

st it

ittt ittt

iiistdi

3133230 3%31%]

ENTER KAMIKAZE MODE

RE2 2222 1224322222222t
sttt it id
it
st
2322232313223 338}

10902 044412
044412

10903 044416
044416
044424
10904 044432
10905
10906 044434

104401

070456

012737
012737

177777
177777

000207

TYPE
TYPEIT

.DSABL
SET

002006
002010

MSG101
;ENTERING KAMIKAZE MODE
,MSG101
CRF
KAMIKAZE
, SKIPKAMI

RETURN
FCMD12:
BRiii

SUBTST

<«<FS

BRALi 3133222222222

10908 044440
10909 044444
044444
10910 044452
10911
10912 044454

104401

070506

005037

002006

012737
000207

177777

TYPE
TYPEIT

.DSABL
CLR
SET

002010
FCMD13:

SUBTST

sk
A

10914
10915
10916
10917
10918
10919

044460
044462
044470
044474

044476

104401

070634

104424
013737
005037
000207

002544
002544

122ttt

COMMAND 12

ittt

i stttz es

<<FS

13323t

COMMAND 13
kkkhk ok

COMMAND 13

a2 222222

TYPE
TYPEIT

MSG106
,MSG106

MOV
CLR

CACHKN, CACHKN+2
CACHKN

SUBTST

«<<FS

RETURN
FCMD14:

; #*SUBTEST

s iss i

3383323333322 38 232232333331

MOV

73F% 3]

#-1,SKIPKAMI

TURN CACHE OFF>>
k

bk kk kb

kk kb kb bk h kb

TURN CACHE OFF

sttt

kR kbR

2222222223222

kbR dr

B EE S

2222221223112 % 1]

;CACHE IS OFF

CRF
.DSABL
CACHOFF

002546

;LEAVING KAMIKAZE MODE

CRF
KAMIKAZE
SKIPKAMI

ke bk kb

EXIT KAMIKAZE MODE

2332222232223 223322332232

MSG102
,MSG102

#-1,.KAMIKAZE
#-1,SKIPKAMI

EXIT KAMIKAZE MODE>>
st

RETURN

; *SUBTEST
10913 044454
044454

COMMAND 12

1332113322232t

; * SUBTEST
10907 044434
044434

MOV
MOV

;:TURN CACHE OFF

;SAVE OLD CACHE ON STATE
;KEEP CACHE OFF

COMMAND 14

TURN CACHE ON>>

CuMMAND 14

TURN CACHE ON

T A

e T L A

T T P L DR ]

—

FCMD10:

SEQ 0328

10891 044364

Page 356

CVMJUAAO MSV11-J MEMORY DIAG.

COMMAND 14

F10

MACRO VOS.01b Fridey 15-Feb 385 16:10

TURN CACHE ON

10920 044476
044476

104401

070652

10921 044502

013737

002546

10922 044510
10923 044512
10924

104423
000207

002544

222322222

Page 356-1

22322 2222222422223

SEQ 0329

232223322

ittt

TI T I}

TYPE
ngggl

MSG107
ég§6107

;:CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)

MOV

CACHKN+2,CACHKN

;RESTORE OLD CACHE ON STATE

CACHON
RETURN

;:TURN CACHE ON

G10

MACRO V05.01b fFridey 15 Feb-85 16:10
CVMUARO MSV11-J MEMORY DIAG.
TURN CACHE ON
FS
COMMAND 14

Page 357

SEQ 0330
1

10937

FCMD15: SUBTST

10938 044514

<<FS

it 212232222

; sSUBTEST

10939 044514
044514
10940 044520
10941 044524
044524
10942 044524
044524
044524
10943
044524

10944 044530
10945 044532
044532
10946 044534
044534
044540
044542
044544
044546
10947 044546
044546
10948 044550
044550
10949 044550
10950 044552
10951 044554
10952 044562
044562
044564
10953 044564
044564
10954 044564
044564
10955 044570
044570
10956 044576
10957
10958 044600

104401

070561

004737

044610

COMMAND 15

COMMAND 1S

AL 23322322 12222

A 2323323322

TYPE
TYPEIT

MSG105
,MSG105

ittt i

040000

END

;OF IF R1

000760

I Iz I Y

ASL
ASL

Rl
Ri

CMP
BGT
TST
BGE

R1,#177
L432
R1
L433

;R1 <- Rl x 4

END CMD16LOOP

104401

070727

012737
000207

177777

TYPE
TYPEIT
.DSABL
SET

002002

MSG110
,MSG110
CRF
SEL ONLY

MOV

RETURN

FCMD16:

SUBTST

shRkkkkkk kR

<<FS

COMMAND 16

ko kkkkokkkok

COMMAND 16

044600

104401

070773

10960 044604
10961
10962
10963 044610
10964 044614

005037

002002

013702
006302
006302

002556

TYPE
TYPEIT
.DSABL
CLR

CMD16A:

MSG111
,MSG1i1ll
CRF
SELONLY

;ENTRY POINT FROM CMD15S
MOV
LASTBANK,R2
ASL
R2
ASL
R2

#-1,SELONLY

RESUME TESTING ALL BANKS>>

kdokkkkk Rk kkkkkkkkkkk kb

kb hk kb s kbbb bksbbbb s bbb

RESUME TESTING ALL BANKS

kkkkkkkkkkkk kb kb

|
|

BR E74

BIS #81T14,CONFIG+2(R1)
END ;OF REPEAT

002666

MOV (SP)«,R1

LEAVE CMD16L0OOP

000406
006301
006301
052761

it s

IF R1 GT #177 OR R1 LT #0

000177

TITITITYY

;READ AN OCTAL NUMBER ONTO THE STACK
;PUT IT IN R1

RDOCT
POP R1

012601
020127
003002
005701
002001

CRF

.DSABL

104413

B7S:::::::

;BANK(0-177)?

TYPE
MSGO30
TYPEIT
,MSGO30

067072

II IS IS

TEST ONLY SELECTED BANKS
it sttt

REPEAT

104401

;ERASE OLD SELECTIONS

skdkkdokkk ko kok ko kdokkkokok kR kk ko

10965 044616

23332222t d is

;ENTER BANKS IN OCTAL - USE NUMBER OUTSIDE RANGE TO TERMINAT

CRF
.DSABL
CALL
CMD16A
BEGIN CMD16LOOP

; *SUBTEST
10959 044600

TEST ONLY SELECTED BANKS>>

2322232232222 2223232823

kkkkk kb kbbb sk bbb kb kbbb b

;ALL BANKS WILL BE TESTED

H10

MACRO V05.01b Friday 15-Feb 85 16:10
cv MJAAQ MSV1l-J MEMORY DIAG.
RESUME TESTING ALL BANKS
COMMAND 16

Page 357

10966 044620
044620

044622
10967 044622
10968 044630
044630
044634
044636
044640
10969 044640

FOR R1

005001
042761

040000

062701

000004

020102

002666

B8IC

END

#0 TO R2 BY

#B8IT14,CONFIG+2(R1)

;0F FOR R1

ADD o4 ,R1

CMP R1,R2
BLE B76

003771

000207

SEQ 0331

RETURN

CVMJARQ MSV11-J MEMORY DIAG.

COMMAND 16

110

MACRO VOS.0lb Fridey 15-Feb-85 16:10

RESUME TESTING ALL BANKS

10972 044642

FCMD17:
A i

SUBTST
L2332t 2

i +SUBTEST

10973 044642

044645

104401

071331

10974 044646
10975 044654

012737
000207

177777

223323313

TYPE

222333

TYPEIT

006216

<<FS

22 22 23

.DSABL

MOV~
RETURN

COMMAND 17

322 83

833

22 22

COMMAND 17

,MSG127

#-1,TRACE

SEQ 0332

ENABLE TRACE>>

320333333 33 212 3

3232322323232

MSG127
CRF

Page 359

33113

ENABLE TRACE

3323333342

233233 323

321 3 3

1133333333133

Y TTIXsY)

377323 17727137

CVMURAO MSV11-J MEMORY DIAG.

COMMAND 17

J10

MACRO VO05.01b Friday 15-Feb-85 16:10

ENABLE TRACE

10978 044656

FCMD18: SUBTST

<<FS

COMMAND 18

Hiii11 21323323222 22232233222

; #SUBTEST
i

10979 044656
044656

104401

071350

10980 044662
10981 044666

005037
000207

006216

233323233

TYPE
TYPEIT

.DSABL
CLR
RETURN

Page 361

CRF
TRACE

DISABLE TRACE>>

2312322232222

COMMAND 18

8121313334332

MSG128
,MSG128

SEQ 0333

2 2233112333223

DISABLE TRACE

22 313333333323

2212

31323333 2

2233331333323 13111

33222317
73273727327

K10

CVMUAAOQ MSV11-J MEMORY DIAG.

COMMAND 18

MACRO V05.01b Friday 15-Feb-85 16:10
DISABLE TRACE

10984 044670

WHICHCSR:SUBTST
A2 i

; «SUBTEST

044670
044674
044700
044702
10989 044706
10990
10991 044710
044710

013700
022700
001003
005037
000207

10992 044714
10993 044716
044716
10994 044720
10995 044722
10996 044726
10397 044730
10998 044734
10999 044736
11000 044742
11001 044746
11002 044750
11003 044754

104412

10985
10986
10987
10988

104401

012600
011000
020027
101370
022700
103002
162700
162700
006300
010037
000207

002224
100000

002152

066725

1%.

000106

000007
000060

002152

2$:

SEQ 0334

DETERMINE CORRECT CSR>>
8332423222332 3213332322322 32231233

SUBR

DETERMINE CORRECT CSR
e

MoV
CHP
BNE
CLR
RETURN

TOTCSR<,RO
#BIT15,R0
1¢
CSRNO

:GET CSR'S FLAG
;:CSR 0?
:NO - SKIP
;YES - SET IT uwpP

TYPE

MSGO022

;WHICH CSR(O-F)

3333

TYPEIT
.DSABL
ROLIN

,MSGO22
CRF

POP

;GET CHARACTER
;PUT IN RO

MOV

(RO),RO

;PUT CHAR IN RO

;IF BAD LOOP TILL HE TYPES IT RIGHT

CcMP

RO, #106

CcHP

#'A,RO

BHI

000101

<<SUBR

il 1212223322282

Page 363

BHIS
suB
sus
ASL

MoV

RETURN

2%
#7,R0
#60,R0O

RO, CSRNO

; CHECK LIMIT

eIy
L

MOV (SP).,RO

L10

CVMJUAAQ MSV11-J MEMORY DIAG.
ERROR DATA (SUPERVISOR) SETUP STUFF

MACRO V05.01b Friday 15-Feb 85 16:10

11469
11470 044756
044756
'
044762
11471 044770
044770
044774
11472 044776
044776

11473 045004
045004
11474 045012
11475 045014
045014
11476 045014
045014
045020
11477 045022
045022
11478 045026
045026
045030
11479 045030
045030
11480 045034
045034
11481 045034
11482
11483 045040

002034
000002

005737
001007

002144

053737

002552

177776

016137
104417

177776

002052

177654

010237

002044

SEQ 0335

.SBTTL
ERROR DATA (SUPERVISOR) SETUP STUFF
$PER2S: LET ADDRESS := R1 - #2

010137
162737

005737
001003

002034

002044

000137

050212

TESTAREA

BIS
TESTMODE ,PSW
CRF
.DSABL
LET BAD := -2(R1)
KERNEL
END ;0F IF

LET GOOD

ABORTFLAG

LET GOOD
END

BRA3

045070
045072

045074
045076
045102
045104
045110
045114
045114
11497 045120
11498 045124
045124

053737

002552

177776

005711

104417
104426
013700
104503
072027
042700

002150
177773
177600

010137
005037

002034
002044

053737

002552

177776

-2(R1),BAD

TST

177654

BNE L43S

MOV R2,G00D

BR L4436
L435:;;:;::::

:= R3

;OF IF

JMP

PERRAW

SUBTST

<<DATA WAS 3 WORDS>>

1212332222222

PUSH

002150

MOV

L434:;;;:::;

22214223282 232

ittt ittt et sisissssI s

sl s lisesizsys

DATA WAS 3 WORDS
e

034152

010046
005037
104505

;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

IF BADPC EQ #0 THEN $CALL BADSTACK

002022

TST ABORTFLAG
BNE L434

:= R2

11489
11490
11491
11492
11493
11494
11495
11496

;ENTER TEST MODE

ELSE

PERRA3:

005737
001002
004737

SUB @2,ADDRESS

IF 177654 EQ #0

; *SUBTEST

11484 045040
045040
045044
045046
045052
11485 045052
045052
11486 045054
11487 045060
11488 045062
045062

MOV R1,ADDRESS

IF ABORTFLAG IS FALSE

000402

010337

Page 377

L L]

TST BADPC
BNE L437
JSR PC,BADSTACK

MOV RO, -(SP)
;MAKE SURE CSR BIT HOLDER IS CLEAR

CLR
CSR
CHK1DIS
TESTAREA
BIS
TESTMODE ,PSW
CRF
.DSABL
TST
(R1)
KERNEL
READCSR
MOV
CSR,RO
CLR1CSR
#-5,R0
ASH
#tC177,R0O
BIC
LET ADORESS := R1

;GET _CSR CONTENTS
:SAVE CSR CONTENTS IN RO
;RETURN CSR TO NORMAL MODE
;MOVE CHECK BITS TO BOTTOM OF WORD
;CLEAR OFF EXTRANEQUS GARBAGE
; SAVE VIRTUAL ADDRESS FOR PRINTOUT

CLR

GOoD

;FIRST TEST WORD WRITTEN SHOULC ALWAYS BE ZERO

8IS

TESTMODE
, PSW

TESTAREA

;DISABLE ECC & WRITE CHECKBITS FROM 1 SELECTED CSR
;60 TO SYSTEM TEST MODE
;READ LOCATION TO READ CHECKBITS INTO CSR

MOV R1,ADDRESS

;ENTER TEST MODE

;GO TO SYSTEM TEST MODE

CVMJAAO MSV11-J MEMORY DIAG.
DATA WAS 3 WORDS

11499 045132
11500 045136
11501 045142
11502 045144
11503 045150
11504 045154
11505 045160
11506 045162
045162
11507 045164

11508
11509

11510
11511
11512

045164
045172
045174
(45176
045176
045200
045200
045202
045202
045202

011137
011437
104417
110037
105037
004737
104033

M1O

MACRO v05.01b Friday 15-Feb-85 16:10
.DSABL

002052
002054

MOV
MOV
KERNEL
MOV8
CLRB
CALL
ERROR
POP

002056
002057
050446

012600

032777
001402
104506
000401
104472
000002

000001

135444

CRF

(R1),BAD
(R4),BAD2

RO,BAD3
BAD3.1
PERBNK
+33
RO

Page 377-1

SEQ 0336

;:GET BAD DATA FROM MUT - FIRST WORD
;AND SECOND WORD
;ENTER KERNEL MODE
;MOVE BAD CHECKBITS FOR PRINTQUT
;CLEAR OFF THE OTHER UNUSED BITS
;MARK BANK AS BAD IN CONFIG TABLE
;RESTORE RO

MOV (SP).,.RO

IF #SU0 SET.IN aSWR

ENASBE
ELSE

ECCINIT
END; OF IF #SWO
RTI

; TRAP ON SINGLE BIT ERRORS

BIT #SWO0,dSWR
BEQ L440

BR L4431
L840:;;;:;:;;
; TRAP ON UNCORRECTABLE ERRORS
L441:3;:::;

CVMJUAAO MSV11-J MEMORY DIAG.
DATA WAS 3 WORDS
11515 043204
045204
11516 045210
045210
043214
11517 045222
043222
045226
11518 045230
045230

11519 045236
043236
11520 045244
11521 045246
045246
11522 045246
11523
11524 045252

MACRO v05.01b Friday 15-Feb-85

$PER30:

002044

011637

002034
000016

005737
001007

002144

053737

002552

177776

017737
104417

134572

002052

000137

050212

LET GOOD

002034

045334

045340
045344
6 045345
7 045350

010046
013746
013746
010637
012737
012737
013700

045330
045330
002034

000004
000114

053737

002552

177776

011037
104417
005037

002052

012637
012637
012600
000207
000000

TST ABORTFLAG

;ENTER TEST MODE

BNE LA442

;GO TO SYSTEM TEST MODE

;ENTER KERNEL MODE

MOV SRDDRESS,BAD

JMP PERRAW
T2

PUSH

002144
045350

MOV (SP),ADDRESS
SUB 16,ADDRESS

;OF IF ABORTFLAG

GETDATA:SUBTST

013706

MOV R1,G00D

KERNEL

045316
045322
045324
045330
045334

TESTAREA
BIS
TESTMODE ,PSW
CRF
.DSABL
LET BAD := @ADDRESS

; *SUBTEST

043276
045304
045310
045310

:= (SP)

IF ABORTFLAG IS FALSE

END

000004
000114
045350

:= R1

LET ADDRESS

REII I

11525 045252
045252
045254
045260
045264
045270

Page 379

SEQ 0337

010137

163737

N10

16:10

<<GET DATA FROM ABORTED AREA IF POSSIBLE>>
2

E 22222222

MOV
KERNEL

1$:

000114
000004
GETDAL:

CLR

MOV
POP

gETURN

22t

222

GET DATA FROM ABORTED AREA IF POSSIBLE
e

RO,4,114

MOV
SP,GETDAL
MOV
14,4
MOV
014,114
MOV
ADDRESS ,RO
TESTAREA

8IS
.DSABL

22222ttt

TESTMODE , PSW
CRF

T T

MOV RO, -(SP)
MOV 4,-(SP)
MOV 114, (SP)

;GO TO SYSTEM TEST MODE

(RO),BAD

ABORTFLAG

GETDAL,SP
114,4 R0

:RESTORE KNOWN GOOD STACK POINTER
MOV (SP).,114
MOV (SP). .4
MOV (SP).,RO

CVMJAARQ MSV11-J MEMORY DIAG.
11540
11341
11542
11543

AUTO RESTART

12122323352

POWER FAIL AUTO RESTART
ROUTINE POWER DOWN AND UP
228 2422222202333

2223230232

0323323222 223

ITYYXL

; POWEP DOWN ROUTINE

$PWRDN:

045352

11560
11561 045422
11562 045426
11563 045432
045432
11564 045434
11365
11566 045436
11567 045442
11568 045444
11569 045450
11570 045454
045454
11571 045456
11572 045460
045460
045464
045466
045472
11573
11574 045472
11575 045476
11576 045502
11577 045506
11578 045512
11579 045514
11580 045516

Page 381

SEQ 0338

.SBYTL
.SBTTL

045352
043336
045360
045360
045364
045366
045374
045402
045402
045404
045406
045410
045412
045414
045416

B1l1l

15-Feb-85 16:10

005737
001403

002544

013746

177746

012737
012737

046300
000340

104423

010046
010146
010246
010346
010446
010546
013746

012700
012701

000024
000026

S¢:

1¢:

077102

005737
001013
012700
012701
014046
077102
005737
001402
004737

012700
012701
012702
012703
011021
012022
077303

CONTRL

CACHON
MOV
MOV
PUSH

; TURN CACHE ON

#$ILLUP,PWRVEC ;;SET FOR FAST UP
9340, ,PWRVEC+2
;;PRIO:7
RO,R1,R2,R3,R4,R5,CSRNO

MOV
MOV

PUSH

24:

MOV
MoV
PUSH

-(RO)

#172300,R0
#16.,R1
-(RO)

soB
R1,2¢
IF RLFLAG IS TRUE THEN $CALL WOOPS

002126

000040

MOV RO, (S )
MOV R1,-(S )
MOV R2,-(S )

)
)

MOV RS, -(SP)
MOV CSRNO, -(SP)

MOV

-(RO),-(SP)

MOV

-(RO),-(SP)

TST RLFLAG

BEQ L443
JSR PC,WOOPS

046306

172300
177600
172200

MOV CONTRL, -(SP)

#177700,R0
#17. ,R1

S08
R1,1¢
: SAVE SUPERVISOR PAR'S
TST
NOSUPER
BNE
PD1

002456
172300
000020

PUSH

;SAVE USER PAR'S & PDR7

177700

014046

CACHKN

8eQ

002152
000021

; SAVE CACHE STATUS

TST

VOYVOVVO

POWER FAIL

MACRO V0S5.01b Fricay

PD1:

3$:

;COPY KERNEL MAP TO USER & SUPERVISOR

MOV
MOV
MOV
MOV
MOV
MOV

S0B

#KIPDRO,RO
#UIPDORO,R1
#SIPDRO,R2
#32. ,R3
(RO),(R1)(RO)+,(R2)+

R3,3$

CVMJAAQ MSV1l-J MEMORY DIAG.
ROUTINE POWER DOWN AND uP

11582
11583 045520
045520

11584 045526
11585 045530
11586 045532
045532
11587 045534
11588 045540
11589 045542
045542

11590 045550
11591 045552
11592 045554

045554
11593
11594 045556
11595 045562
045562
11596 045562
045562
045566
11597 045566
11598 045570
045570
11599 045572
11600 045574
045574
11601 045600
045600
11602 045600
045600
045602
11603 045604
045604
045612
045620
045622
11604 045622
045622
11605
11606 045622
045622

045626
045632
11607 045636
11608 045642
11609 045644
045644

11610
11611 045650
11612 045654
11613 045660

045660
11614 045662

Cll

MACRO V05.01b Friday

15-Feb-85 16:10

Page 382

SEQ 0339

; SAVE USER & SUPERVISOR STACK PQINTERS

052737

140000

USER
BIS
.DSABL

177776

010600

104417

010046
005737
001006

002456

052737

040000

MOV
KERNEL
PUSH

USP,RO

7157

NOSUPER

177776

PUSH

010046

013701

002224

005037

002152

7¢:

; SAVE ECC REGISTERS
TOTCSRS,R1
LCSRSAVE

FOR CSRNO

103003
104426

READCSR
PUSH

002150

END

;ENTER SUPERVISOR MODE

;GO TO SUPERVISOR MODE

;ENTER KERNEL MODE

MOV RO, -(SP)

;GET CSR'S

BCC L444
CSR

;OF ON.ERROR

IF Rl EQ #0 THEN LEAVE LCSRSAVE

005701
001407
000002
002152

END

002152
000036

(SP)

#0 TO #36 BY #2

ASL
ON.ERROR

006301

062737
023727
003762

MOV RO,

MOV
BEGIN

;GO TO USER MOOE
;:ENTER KERNEL MODE

BNE
74
SUPERVISOR
#8IT14,PSW
BIS
.DSABL
CRF
MoV
SSP,RO
KERNEL

010600
104417

013746

281T15!8IT14,PSW
CRF

;0F FOR CSRNO

MOV CSR,-(SP)

TST Rl

BEQ E77
RDD #2,CSRNO

CMP CSRNO, #36
BLE B100
END LCSRSAVE
: SAVE MMRO,1,2,3

PUSH

013746
013746
013746
005737
001002

1771572
177574
177576
002456

013746

172516

012700
012701

172400
000020

014046
077102

157
BNE
PUSH

8s$:
44
:

MMRO ,MMR1 ,MMR2

NOSUPER
8¢
MMR3

; SAVE KERNEL PAR'S

MoV
MoV
PUSH

#172400,R0
#16.,R1
-(RO)

S0e

R1,4%

MOV MMRO,-(SP)
MOV MMR1,-(SP)
MOV MMRZ, -(SP)

MOV MMR3,-(SP)

MOV

(RO),

(SP)

CVMJARQ MSV11-J MEMORY DIAG.

ROUTINE POWER DOWN AND UP

D11

MACRO VOS.01b Friday 15-Feb-85 16:10

11615

;SAVE @-BUS MAP REGISTERS

11616 045664 022737 000005 004010
11617 045672 001004

11618 045674
045674
045700

11619

11620 045704
11621

11622
11623
11628
11625
11626

013746
013746

CHP
BNE

PUSH

170202
170200

045704

017746

134726

045710

010637

046304

045714
045722
045724

012737
000000
000776

045726

9¢:

85, PROTYP
9%

MAPHO ,MAPLO

$DOWN:

SEQ 0340

;IS THIS AN 11/83 ?
:BRANCH IF NOT

; SAVE POSSIBLE SOFTWARE SWITCH REGISTER
PUSH
ASWR
; SAVE STACK POINTER

000024

Page 382-1

MOV
SP, $SAVR6
: :SAVE SP
;:NOW SET UP REAL VECTOR
MOV
#$PWRUP ,PWRVEC
;;SET UP VECTOR
HALT
BR
$DOWN
; iHANG UP

MOV MAPHO, -(SP)
MOV MAPLO,
- (SP)

MOV &SWR,-(SP)

CVMJAAQ MSV11-J MEMORY DIAG.
ROUTINE POWER DOWN AND w

11629
11630
11631 045726
11635 045726
11636
11637 045734
11638 045740
11639 045744
11640 045750
11641
11642 045752
045752
11643 045756
11644 045762
11645 045766
11646 045772
045772
11647 045774
11648 046000
11649
11650 046002
11651 046006
11652 046010
046010
11653 046014
046014
046020
046024

11654
11655 046030
11656 046034

11657 046040
046040
11658 046040
046040
046046
11659 046046
11660 046050
046050
11661 046052
046052
11662 046056
11663 046060
046060
11664 046060
046060
046062
11665 046064
046064
046072
046100
046102
11666 046102
046102
11667
11668 046102
11669 046106

E11

MACRO V05.01b Friday 15-Feb-85 16:10

Page 384

SEQ 034)
;RS
S SR A A R0 R Rk

JTEEAEREERRA R T RN

R R R

R R RS SRR

U DR RN R

R RO

HNOEGORER

;POWER UP ROUTINE

012737

046300

013706
005037
005237
001375

046304
046304
046304

012677
012700
012702
012701

134660
172340
172300

012620

$PURUP:

MOV

#$ILLUP,PURVEC

MOV
CLR
INC

$SAVR6, SP
$SAVR6
$SAVR6

;RESTORE STACK POINTER

1$:

BNE

POP

ISWR

MOV

#172340,R0

104:

000020

077406

005737
001002

002456

012637

172516

01263/
012637

012637

177576
177574
177572

013701
042701

002224
177400

000036

6$:

MOV
MOV

#KIPDRO,R2
#16.,R1

MOV

#77406,(R2)+

POP

11¢:

R1,6$

TST
BNE

POP

NOSUPER
114
MMR3

POP

MMR2,MMR1,MMRO

;RESTORE ECC REGISTERS

MOV

TOTCSRS,R1

BIC
#177400,R1
BEGIN LCSRRESTORE
002152

FOR CSRNO

MCV (SP)«,a3SWR

MOV (SP)+,(RO).

MOV

ON.ERROR
POP

002150

MOV (SP)+ ,MMR2
MOV (SP)+ ,MMR1
MOV (SP)+,MMRO
;GET CSR'S

#36 DOWNTO #0 BY #2

CSR

LOADCSR
END ;0OF ON.ERROR

IF R1 EQ #0 THEN LEAVE LCSRRESTORE

000002
002152

002152
000000

END

;0F FOR CSRNO

END LCSRRESTORE
012700
012701

172300
177600

(SP)+ ,MMR3

#36,CSRNO
ASR

005701
001407

002362

;:0OF A WORD

;RESTORE MMR3,2,1,0

103003

162737
023727

;;GET SP
; ;WAIT LOOP FOR THE TTY
;s WAIT FOR THE INC

(RO)«

sS08

006201

012637
104425

;:SET FOR FAST DOWN

;RESTORE POSSIBLE SOFTWARE SWITCH REGISTER

012722
077104

012737

000024

;:COPY KERNEL MAP TO USER & SUPERVISOR

MOV
MoV

#KIPDRO,RO
#UIPDRO,R1

L445
MOV (sP)+,CSR

TST R1

BEQ E101

sus @2, CSRNO
90
CMP CSRNO,
BGE 8102

CVMJUAAQ MSV1l-J MEMORY OIAG.
ROUTINE POWER DOWN AND UP

11670 046112
11671 046116
11672 046122

11673 046124
11674 046126

012702
012703
011021
012022
077303

172200
000040

MACRO V05.01b Fridey

15-Feb-85

F11

16:10

Page

384

SEQ 0342

MOV
MOV
MOV

#SIPDRO,R2
#32.,R3

S08

R3,3$

MOV

(RO),(R1)+
(RO)+,(R2)+

CVMJUAAQ MSVil-J MEMORY DIAG.
ROUTINE POWER DOWN AND w

11676
11677 046130
11678 046134
11679 046136
046136
11680 046140
046140

11681 046146
11682 046150
11683 046152
046132
11684 046154
046154

005737
001006

052737

11688 046166
11689 046172
11690 046176
046176
11691 046200
11692
11693 046202
11694 046206
11695 046212
046212
11696 046214
11697
11698 046216
11699 046224
11700 046232
046232
046236
046240
046242
046244
046246
046250
11701 046252
11702 046260
046260

012700
012701

11703

BIS

13$:

140000

177776

104417

172240
000020

7%:

177636
000021

8%:

012620
077102
013777
013737

002012
002012

012637
012605
012604
012603

002152

012602
012601
012600
012737

045352

NOSUPER
134
RO

.NsagL
MoV
KERNEL
POP

#BIT14,PSW

CRF
RO, SSP
RO

USER
BIS
.DSABL
MoV
KERNEL

#BIT15!BI714,PSW
CRF
RO,USP

MOV
MOV
POP

#172240,R0
#16.,R]
(RO)«

S08

R1,7¢

S08

R1,8¢

;ENTER SUPERVISOR MODE

MOV

(SP).,RO

;GO TO SUPERVISOR MODE

;ENTER KERNEL

MODE
MOV (SP).,RO

;GO TO USER MODE
;ENTER KERNEL MODE

MOV (SP)+,(RO)-

;RESTORE USER PAR’'S & PDR7
MOV
#177636,R0
MOV
#17. ,R1
(RO)+
POP

MOV (SP)+,(RO)-

;RESTORE POSSIBLE SOFTWARE DISPLAY REGISTER
MoV
$PATMAR, 3DISPLAY
MOV
$PATMAR, DISPREG
PoP
CSRNO,RS,R4,R3,R2,R1,R0

134414
000174

MOV

000024

TYPE

#$PURDN,PURVEC

MSGOS51

104401

067652

TYPEIT
.DSABL

005737
001402

002544

TST

CACHKN

012637

177746

popP

CONTRL

000002
000000
000776
000000

385

;RESTORE SUPERVISOR PAR'S

012620
077102
012700
012701

Page

SUPERVISOR

177776

012600

010006

11704 046264
11705 046270
11706 046272
046272
11707 046276
11708 046300
11709 046302
11710 046304
1un

TST
BNE
PoP

010006
104417

052737

G11

16:10

;RESTORE SUPERVISOR & USER STACK POINTERS

002456

040000

15 Feb 85

SEQ 0343

012600

11685 046162
11686 046164

11687

MACRO v05.01b Fridey

,MSGO51
CRF

;;SET UP THE POWER DOWN VECTOR

MOV
MOV
MOV
MOV
MOV
MOV
MOV

(SP).+,CSRNO
(SP)«,RS
(SP)+,R4
(SP)+,R3
(SP)«,R2
(SP).,R1
(SP)+,RO

;REPORT THE POWER FAILURE

;RESTORE CACHE STATUS

BEQ
94:
$ILLUP:

RTI

HALT

$SAVR6: 0E .
.EVEN

$ILLUP

MOV (SP)+,CONTRL
;; THE POWER UP SEQUENCE WAS STARTED

;; BEFORE THE POWER DOWN WAS COMPLETE
::PUT THE SP HERE

CVMJARQ MSV11-J MEMORY DIAG.

ROUTINE POWER DOWN AND LP

H11

MACRO V05.01b Friday 15 Feb-85 16:10

SEQ 0344

11723 046306

WOOPS:

SUBTST

Hii

21222 L

; sSUBTEST

11724 046306
046306
11725 046312
11726 046316
046316
046320
046324

046330
046332
046332
046340
046346
046354
046354
046360
046362
046364

11731 046366
11732 046374
11733 046402
046402
046406
046410
046412
11734 046414
11735 046420
11736 046424
11737 046430
11738 046432
11739 046434
11740 046440
11741 046442
11742 046446
11743 046452
11744 046456
11745 046462
11746 046464
046464
11747 046470

005037

002102
002102

010346
013703
004737

002102
035716

013746

052737

040000

177776

013737
013737

060024
060026

046704
046706

004537
000105
046710
126472

041024

012737
012737

046472
000340

004537
000071
126472
046472

041024

012700
012701
012702
012021
077202
005737
001002
013721
013721
013721
013721
104417

172340
126654

012637
000207

002102

232 2222222

223 L

BANK

CLR
MAP

BANK
BANK

MOV

BANK ,R3

el il
Y

3l ti i

ITETY)
L

MOV BANK, -(SP)
;MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3,-(SP)

MAPPER
CRF

MOV (SP).,R3

;ENTER SUPERVISOR MODE
;GO TO SUPERVISOR MODE

MOV
MOV

FIRST+PWRVEC,WOOPSAV
FIRST+PWRVEC+2,WOOPSAV+2

MOV

#8.,R2

BMov

POWER FAIL WHILE RELOCATED

SUPERVISOR
BIS
#BIT14,PSW
CRF
.DSABL

FIRST+WO0OPUP,WOOPSAV+4,WOOPEND-WOOPUP/2+12.
JSR R5,BLOCK3
WOOPEND-WOOPUP/2+12.
WOOPSAV+4
FIRST+WOOPUP
.DSABL
CRF
MOV
#WOOPUP,FIRST +PWRVEC
MoV
#340,FIRST+PWRVEC+2
BMOV
WOOPUP ,FIRST+WOOPUP
, WOOPEND -WOOPUP/2
JSR RS,BLOCK3
WOOPEND
- WOOPUP/2
FIRST+WOOPUP
WOOPUP
.DSABL
CRF
MOV
#KIPFRO,
RO
MOV
#FIRST+ JOOPEND ,R1

060024
060026

14:

002456
172516
177576
177574
177572

<«<POWER FAIL WHILE RELOCATED>»>

2222

PUSH

CALL
.DSABL

012603

000010

Page 386

2%:

MOV
so8
TST
BNE
MOV
MOV
MOV
MOV
KERNEL

pPopP

RETURN

(RO)+,(R1)+
R2,1$
NOSUPER
2$
MMR3,(R1)+
MMR2,(R1)+
MMR1,(R1)+
MMRO,(R1)+

BANK

;ENTER KERNEL MODE
MOV (SP)+,BANK

CVMJAAQ MSV11 J MEMORY DIAG

POWER FAIL

WHILE RELOCATED

111

MACRO V05.01b Friday 15-Feb-85 16:10

11750 046472

WOOPUP: SUBTST
22t

11751 046472
11752 046476
11753 046502
11754 046506
11755 046512
11756 046514
11757 046520

11758 046522
11759 046526
11760 046530
11761 046534
11762 046540
11763 046544

11764 046550
11765 046554
046554
11766 046560
11767 046564
046564
046566
046572

012700
012701
012703
012702
012021
012723
077204

046654
172340
172300
000010

1$:

077406

005737
001002
012037
012037
012037
012037
013706

002456
172516
177576
177574
177572
046304

013746
005037

002102
002102

010346
013703
004737

21132332

233

MOV
MOV
MOV
MOV
MOV
MOV
S0B

ST
BNE
MOV
MOV
MOV
MOV
MOV
PUSH

2222222ttt

22 221331 2323322232

MOV
CALL

BANK,R3
MAPPER
CRF

052737

040000

177776

1 1 769 046606
i 1770 046614

013737

046704

060024

MOV

WOOPSAV,FIRST+PWRVEC

012700
012701
012702
012022
077102

046710
000105
126472

MOV
508

(RO)+,(R2)+
R1,2%

KERNEL
POP

BANK

1 1779 046642
1 1780 046644

046644
1 1781 046650
1 1782 046654
1 1785 046704

104417
012637

000137
000014
000107

002102

045726

2%:

s YRR,

3133332333333 13227

XT3

2%3)

;MAP SUPERVISOR SPACE (TEST AREA) TO BANK
MOV R3, (SP)

SUPERVISOR
ngABL
ggnga.Psu

11776 046636
%1777 046640

MOV BANK, -(SP)

012603

1771
11772
11773 046622
11774 046626
11775 046632

31 3333321333

$SAVR6,
SP
BANK

002102
035716

060026

Bttt

NOSUPER
34
(RO)+,MMR3
(RO)+,MMR2
(RO)+,MMR1
(RO)+,MMRO

BANK
BANK

046706

iii il

#WOOPEND
, RO
#KIPARO,R1
#KIPDRO,R3
#8. ,R2
(RO)+ ,(R1)+
#77406, (R3)+
R2,1$

046576
11768 046600
046600

013737

POWER UP FROM BANK O TO RELOCATION

222

CLR
MAP

.DSABL

SEQ 0345

<<POWER UP FROM BANK O TO RELOCATION>>

il 3 32332222 22222222222

: #SUBTEST

Page 388

MOV (SP).,R3
;:ENTER SUPERVISOR MODE
;GO TO SUPERVISOR MODE

MOV
WOOPSAV+2,FIRST +PWRVEC+2
;:SIMULATE THE FOLLAWING BLOCK MOV BUT WITH NO STACK ACCESSES
;BMOV WOOPSAV+4,( IRST+«WOOPUP,WOOPEND-WOOPUP/2+12.
MOV
#WOOPSAV+4
RO
MOV
#WOOPEND-WNOPUP/2+12.
,R1
MOV
#FIRST+WOGPUP
,R2

JMP
WOOPEND: .REPT
WOOPSAV:.REPT

;ENTER KERNEL MODE

$PWRUP
12.
WOOPEND WOOPUP/2+12.+2

MOV (SP)., BANK

CVMJAARQ MSV11-J MEMORY DIAG.
10 SUBROUTINES

J11

MACRO vV05.01b Friday 15 Feb-85 16:10

Page 390

ii;g?

.SBTTL

10 SUBROUTINES

ii;gg

.SBTTL

ROUTINE TYPE
E AR TAE S KRR

11794

sEEEESEEEE NS

11795
11796
11797

;#ROUTINE TO TYPE ASCIZ MCSSAGE. MESSAGE MUST TERMINATE WITH A O BYTE.
;#THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.
;*NOTE1:
$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER.

11798
ii;gg

;:«NOTE2:
; *NOTE3:

11801
11802
11803
11804
11505
11806
11807
11808
11809 047122
11810 047126
11811 047130

;tCALL:
;#1) USING A TRAP INSTRUCTION
i
TYPE
MESADR
; *OR
;*
TYPE
;%
MESADR
i%

11812 047132
11813 047136

11814 047140

116815 047142
11816 047144

11817 047146
11818 047152
11819 047154
11820 047160
11821 047162
11822 047166
11823 047172

11824 047174

11825 047176
047176

017600
112046

002360

000002

001005

005726
012600

062716
000002
122716
001002
112716
122716
001006

$TYPE:
1¢:

BNE

;;BR IF IT ISN'T THE TERMINATOR

5¢:

7%:

000040
000200

11%:

005726

; ;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING

;:IS THERE A TERMINAL?
;BR IF NO
; ; SAVE RO

1581
MOV

000011

E RS E RS SRR R EC SRR RO C S A RGP OGO RS

$TPFLG
6$
RO,-(SP)

MOV
MOovB

6$:

R R

TSTB
BMI
MOV

000002

R R R AR

$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.
$FILLC CONTAINS THE CHARACTER TO FILL AFTER.

' ¥

105737
100407
010046

R R

SEQ 0346

a2(SP),R0O
(RO)+,-(SP)

; :GET ADDRESS OF ASCIZ STRING
; ;PUSH CHARACTER TO BE TYPED ONTO STACK

(SP)«
(SP)+,R0O

; ; JF TERMINATOR POP IT OFF THE STACK
; ;RESTORE RO

;REPLACE TAB WITH SPACE
; ;BRANCH IF NOT <CRLF>

757

#HT, (SP)
114
#' ,(5P)
#CRLF,(SP)
84
(SP).

.DSABL

CRF

ADD
RTI
CMPB
BNE
MOVB
CMPB
BNE

#2,(SP)

; i ADJUST RETURN PC
; ; RETURN
;BRANCH IF NOT <HT>

;:POP

<CR><LF> EQUIV

104401

TYPE
TYPETT

11826 047200
11827 047202
11828 047206
11829 047210

002660
105037
000753
004737

$CRLF
CLRB
BR
CALL

$CHARCNT
44
$TYPEC

; ;CLEAR CHARACTER COUNT
;;GET NEXT CHARACTER
;:6G0 TYPE THIS CHARACTER

11831 047220
11832 047222
11833

001346
013746

BNE
MOV

44
$NULL, -(SP)

;:IF NO GO GET NEXT CHAR.
:sGET # OF FILLER CHARS. NEEDED
; ;AND THE NULL CHAR.

11835
11836
11837
11838
11839

047232
047234
047240
047244
047246

002770
004737
105337
000770
000000

047250

010146

11830 047214

11834 047226

11840 047250
11841 047252
11842 047256
11843 047262

123726

105366

116601
005737
001802

047434
047250

002652

8¢:

002356

000001
047250
047434

10¢:

cMPB8

DECB

BLT
CALL
DECB
BR
XO0CHAR: .WORD O
$TYPEC: PUSH

000004
002544

MOVB
TS7
BEQ

$FILLC,(SP)»

1(spP)

94
$TYPEC
$CHARCNT
104
R1
4(SP),R1
CACHKN
24

;s TYPE A CR AND LF

;:IS IT TIME FOR FILLER CHARS.?

;;DOES A NULL NEED TO BE TYPED?

;;BR IF NO--GO POP THE NULL OFF OF STACK
;:60 TYPE A NULL
; ;D0 NOT COUNT AS A COUNT
;:LOOP
MOV R1,-(SP)

CVMJAAQ MSV11-J MEMORY DIAG.
ROUTINE TYPE
11844 047264
047264
11845 047270

047270

11846 047272
11871 047274
11872 047300
11873 047302
11874 047306
11875 047312

11876 047314
11877 047322
11878 047330
11879 047336
11880 047340
11881 047344
11882 047346
11883 047354
11884 047362
047362
047370
11885 047372
11886 047374
047374
047376
047376
047400
047400

047400
047404
047412
047414
047420
047422
047430
047432
047434
047436
047436
047440
047444
047446
047446
047452
047452

047454
047456

013746
010046
104424

105777
100375
005037
105777
100032
117737
042737
023727

001020

105777
100375
117737
042737
023727
001002
000402

MACRO v05.01b Friday

133346

PUSH

CONTRL

24:

PUSH

CACHOFF
ggTB
g:TPS

047246
133330

047246

CLR
15718
8PL

133276

CONTS3:

133272
177600

047246
047246

047246

000021

Page 390 1

a$TKB, XOCHAR
#1C177,X0CHAR

MOV CONTRL,-(SP)

; TURN CACHE OFF
; sWAIT UNTIL PRINTER IS READY

133244

000015

000002

NC:

047434
000012

000002

14¢:

: ;SKIP IF NO CHARACTER
; ;SAVE THE CHARACTER
; :STRIP OFF ASCII
;;WAS IT A CONTROL S?
; s BRANCH IF NOT
; ;WAIT FOR CHARACTER
: :GET CHARACTER
; :STRIP OFF ASCII
;s IF IT IS A tQ

012637

177746

BR L447
L446:;;:::::
.
L447:;;:;:::

R1,9$TPB
#CR,2(SP)
14
$CHARCNT
$TYPEX

; ;LOAD CHAR TO BE TYPED INTO DATA REG.
; ;IS CHARACTER A CARRIAGE RETURN?
; ;BRANCH IF NO
; ; YES--CLEAR CHARACTER COUNT
s EXIT

BEQ
INCB

$TYPEX
(PC)«

; ;BRANCH IF YES
; ;COUNT THE CHARACTER

CACHKN

;IS THERE A CACHE?

CONTRL

;POP CACHE STATUS

CMPB

#LF,2(5P)

O
RO

BEQ

POP

24:

CMP XOCHAR, #21
BNE L446

MOVB
CMPB
BNE
CLRB
BR

$CHARCNT: .WORD
$TYPEX: POP

002544

MOV RO, -(SP)

; ;CHECK FOR XOFF

BR
CONTS3
END ;0F IF XOCHAR

012600
005737
001402

012601
000207

X0OCHAR
a$TKS
NC

CMP
XOCHAR, #023
BNE
NC
TSTB
I$TKS
CONTS3
BPL
MOVB
9$TKB, XOCHAR
BIC
#1C177,X0CHAR
IF XOCHAR EQ #21
BR
ELSE

000760

122766
001003
105037
000406
122766
001402
105227
000000

MOVB
BIC

047246
047246
000023

000401

110177

15-Feb-85 16:10

SEQ 0347

177746

133324
177600

K11

RETURN

; ;IS CHARACTER A LINE FEED?

; s CHARACTER COUNT STORAGE
MOV (SP)+,RO

;BRANCH IF NOT

MOV (SP).,CONTRL

MOV (SP)+,R1

SUPLIMIT:; ettt THIS IS THE LIMIT ON SUPERVISOR MAPPED TO MUT SPACE

12585
12586
12587
12588
12589
12590
12591
12592
12593
12594
12595

12596
12597
12598
12599
12600
12601
12602
12603
12604
12605
12606
12607
12608
12609
12610
12611
12612
12613
12614
12615
12616
12617
12618
12619
12620
12621
12622
12623
12624
12625
12626
12627
12628
12629
12630
12631
12632
12633
12634
12635
12636
12637
12638
12639
12640
12641

L11

MACRO V0S.01b Friday 15-Feb 85 16:10

Page 405

SEQ 0348
.SBTTL
WP W SO Sr W0 B0 We S0 WL e Sr VT s We W @s WL WE w6 @e WE S5 €2 €0 B B W B WY Be We We Ve Ve We B2 Ve We We W We ®e G WE WS W _We WS ®e W Be W We W Wy @e

CVMJARD MSVIL J MEMORY DIAG.
ERROR DATA SET w

USE THIS
PERRO1

ERROR DATA SETLP
IF THIS CONDITION DISCRIBES THE ERROR
TRAP

6AD DATA IN RO UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY

500D DATA IN RS
PERRO2

-(R4)

TRAP

BAD DATA IN R1 UNLESS ABORTED

THEN BAD DATA IS POINTED T0 BY -(R4)
GOOD DATA IN Re
PERRO3

TRAP
BAD DATA IS POINTED TO BY -(R1)
GOOD DATA IN R4

PERRO4

TRAP
BAD DATA IN R4 UNLESS ABORTED
THEN BAD DATA IS POINTED 7O BY
GOOD DATA IN Re

PERROS

2(RO)

JSR
PC
BAD DATA IS POINTED 70 BY -(RO)
GOOD DATA IN R2

RETURN AFTER SETTING UP GOOD,BAD,ADDRESS
PERRO6

JSR
PC
BAD DATA IS POINTED TO BY -(RO)
GOOD DATA IS ZERQ
RETURN AFTER SETTING UP GOOD,BAD,ADDRESS

PERRO?

TRAP
BAD DATA IN R2 UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN DATBUF

PERR10

TRAP
BAD DATA IN R2 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY 2(R1)
GOOD DATA IN DATBUF+2
PERR11

PERR12

TRAP
BYTE TEST
BAD DATA _IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO 8Y (R1)
GOOD DATA IS A ZERO BYTE
TRAP

BYTE TEST
BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA 1S A BYTE OF ONES

PERR13

TRAP

BAD DATA IN RO UNLESS ABORTED

CVMJARD MSV11-J MEMORY DIAG.

ERROR DATA SETWP

12642
12643
12644
12645
12646
12647
12648
12049
12650
12651
12652

12653
12654
12655
12656
12657
12658
12659

12660

12661
12662
12663

12664
12665
12666
12667
12668
12669
12670
12671
12672
12673
12674
12675
12676
12677
12678
12679
12680
12681
12682
12683
12684
12685
12686
12687
12688
12689
12690

12691
12692
12693
12694
12695
12696
12697
12698

M1l

MACRO V05.01b Fridey 15-Feb 85 16:10

Page 405-1

SEQ 0349
THEN BAD DATA IS POINTED TO BY

GOOD DATA IS ZERO
PERR14

PERR1S

(R1)

TRAP

BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TQ BY (R1)
GOOD DATA IS ONES
TRAP

BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
IN TSTDAT
DATA
GOOD

PERR16

TRAP
BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO 8Y (RY)
GOOD DATA IN TSTDAT+2

PERR17

TRAP
BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED 70 BY (R1)
GOOD DATA IN R2

PERR20

TRAP

BAD DATA _IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IN R3

PERR21

TRAP
7 BIT BYTE TEST
BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED 70 BY (R1)
GOOD DATA IS A 7 BIT BYTE ON ONES

PERR22

TRAP
BAD DATA IN R2 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY (R1)

GOOD DATA IN RO
PERR23

TRAP

BAD DATA_IN RU UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY (R1)

GOOD DATA IN R4
PERR24

PERR25

TRAP

BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R2)
GOOD DATA IN R3
TRAP

BAD DATA POINTED TO BY -(R1)
GOOD DATA IN R2 UNLESS LOC V177654 IS SET
THEN GOOD DATA IS IN R3

PFRR26

TRAP

BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO
GOOD DATA IS 000000, ,100000,,100

CVMJUARD MSV1]1-J MEMORY DIAG.
ERROR DATA SETLP
12699
12700
12701

12702

N1l

MACRO V05.01b Friday 15-Feb-85 16:10

PERR27

;

Page 405-2

TRAP

BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO
GO0OD DATA IS 000000,,000000,,077

12703
12704
12705
12706
12707
12708

;
:
;
;
;
.

PERR30

TRAP
BAD DATA IS POINTED TO BY -16(SP)
GOOD DATA IS IN R1

PERR31

TRAP
SPECIAL ECC FAILURE HANDLER

12711

PERR32

TRAP

12714

PERR33

TRAP

12717

PERR34

12720

PERR3S

12723

ig;gg
ig;ig

%g;iz
%g;ig
{g;gé
12724
12725
12726

:
;

;

;
:

;
;
i2¢:

SPECIAL ECC FAILURE HANDLER

TRAP

SPECIAL ECC FAILURE HANDLER

TRAP

SPECIAL BRANCH GOBBLE FAILURE HANDLER

CALLING SEQUENCE FOR TRAP TYPES

BEQ
PERRXX
NEXT

INSTRUCTION

;NO - ERROR,BRANCH FOR CARD
:TRAP TO ERROR ROUTINE
:CONTINUE TESTING

SEQ 0350

CVMJAAQ MSV]]-J MEMORY DIAG.
ERROR DATA SETLP
12729 04745¢
12730 047462
12731 047470
12732 047474
12733 047500
12734
12735 047504
12736 047510
12737 047516
12738 047522
12739 047526
12740
12741 047532
12742 047536
12743 047544
12744 047550
12745 047556
12746
12747 C47562
12748 047566
12749 047574
12730 047600
12751 047604
12752
12733 047610
12734 047614
12735 047620
12756 047624
12757 047630
12758 047634
12739

010437

162737
010037
010537

000137

010437
162737
010137
010237
000137
010137

002034
000002
002052
002044
050212

002034
000002
002052
002044

MACRO V05.01b Friday

Bl2

15 Feb 85

16:10

SEQ 0351
002034

002034

$PEROL: MoV
R4 ,ADDRESS
suB
@2, ADDRESS
MOV
RO,BAD
MOV
RS,G0O0D
JHP PERRAU

$PEROZ:

MOV
R4, ADDRESS
suB
@2,ADDRESS
MOV
R1,BAD
MOV
R2,G00D
JMP PERRAW

$PERO3:

MOV
R1,ADDRESS
suB
#2,ADDRESS
MoV
R4,GO0D
MOV
-2(R1),BAD
JMP PERRAW

050212

016137
000137

002034
000002
002044
177776
050212

010037
162737
010437
010237
000137

002034
000002
002052
002044
050212

010237
014037
010037
062700
004737
000207

002044
002052
002¢34
000002
034152

PERROS: MOV
PERAOS: MOV
MOV
ADD

005037
000764

002044

PERRO6: CLR

GOOD
PERAOS

010137
010237
013737
000137

002034
002052
002242
050212

$PERO7: MOV
MOV
MOV
JHP

R1,ADDRESS

047666
047672

010137
062737

002034
000002

047700

010237

00205¢

047704

013737
000137

002244

010137

002034

010037

002052

005037
000137

002044
050264

12760 04636
12761 047642
12762
12763 047644
12764 047650
12765 047654
12766 047662
12767
12768 047666
12769 047700
12770 047704

12771 047712
12772
12773 047716
047716
12774 047722
047722
12775 047726
047726

12776 047732
12777
12778 047736

162737
010437

050212

Page 407

002034
002052

002034

$PERO4: MOV

RO, ADDRESS

SuUB

#2,ADDRESS

MOV
MOV

R4 ,BAD
R2,G00D

PERRAW

JMP

R2,G00D
-(R0O),BAD

RO, ADDRESS
#2,R0

RETURN

002044

$PER10:

002034

R2,BAD
DATBUF ,GOOD
PERRAW

LET ADDRESS

LET GOOD

JMP
$PER11:

:= DATBUF
.2
PERRAUW

LET ADDRESS

:= Rl

LET BAD

:= RO

LET GOOD

JMP
$PERLZ:

:= Rl

:= R2

LET BAD

002044

;RESTORE RO

BADSTACK

CALL

MOV R1,ADDRESS
ADD #2,ADDRESS
MOV R2,BAD
MOV DATBUF «2,G000

MoV R1,ADDRESS

MOV RO,BAD

CLR GOO0D

PERRAB

LET ADDRESS

CVMJARQ MSV11-J MEMORY DIAG.
ERROR DATA SETLP
047736
12779 047742
047742
12780 047746
047746
12781 047754

010137

002034

010037

002052

012737
000137

000377
050264

Cle2

MACRO V05.01b Friday 15-Feb-85 16:10

LET BAD := RO
002044

LET GOOD

JMP

:= @377

PERRAB

Page 407-1

SEQ 0352
MOV R1,ADDRESS

MOV RO,BAD
MOV #377,G000

CVMJUAAQ MSV11-J MEMORY DIAG.
ERROR DATA SETULP

12784 047760
047760
12785 047764
047764
12786 047770
047770
12787 047774
12788
12789 050000
050000
12790 050004
050008

12791 050010

050010

12792 050016
12793
12794 050022

050022
12795 050026
050026
12796 050032
050032
12797 050040
12798
12799 050044
050044
12800 050050
050050
12801 050054

010137

002034

010¢37

002052

005037
000137

002044
050212

010137

002034

010037

002052

010137

002034

010037

002052

LET BAD

013737
000453

002250

050064
12805 050070
050070
12806 050074
050074
12807 050100

010137

002034

010037

002052

010237
000444

002044

010137

002034

010037

002052

010337
000435

002044

010137

002034

010037

002052

012737
000477

000177

Page 409

$PER14:

$PERI1S:

:= RO

LET GOOD

LET ADDRESS

PERRAW

:= R1

:= RO
:= TSTDAT+2
PERRAW

LET ADDRESS
LET BAD

:= Rl

:= RO

LET GOOD

LET ADDRESS

LET BAD

:= R1

LET BAD := RO
LET GOOD

002044

$PER22:

:= #177
PERRAY

LET ADDRESS

MOV R1,ADDRESS

MOV RO,BAD

MOV TSTDAT,GOOD

MOV R1,ADDRESS

MOV RO,BAD
MOV TSTDAT.2,GO0D

MOV R1,ADDRESS

MOV R3,G00OD

PERRAW
:=

MOV ONES,GO0D

MOV RO,BAD

:= R3

LET ADDRESS

MOV RO,BAD

MOV R2,G00OD

:= RO

LET GOOD

MOV R1.ADDRESS

MOV RO,BAD

:= R2
PERRAW

$PER2L:

:- R1

:= TSTDAT

LET ADDRESS

ONES

:= RO

LET GOOD

$PER20:

CLR GOOD

PERRAW

LET BAD

$PER17:

MOV RO,BAD

:= R1

LET BAD

LET GO0D

002044

MOV R1,ADDRESS

:= %0

LET ADDRESS

LET BAD

$PER16:

:= R1

PERRAW

JMP

050054
12802 050062

D12

16:10

:= RO

-ET GOOD

013737
000137

002052

12814 050120
050120
12815 050124
050128
12816 050130
050130
12817 050136
12818
12819 050140

LEY ADDRESS

JMP

010037

12810 050106
050106
12811 050112
050112
12812 050116
12813

$PER13:

013737

002034

12808
12809 050102
050102

15-Feb-85

SEQ 0353

000137

010137

12803
12804 050064

MACRO V05.01b friday

:= Rl

MOV R1,ADDRESS

MOV RO,BAD

MOV 2177,G00D

CVMJUAAQ MSV11-J MEMORY DIAG.

ERROR DATA SETLP

050140
12820 050144
050144
12821 050150
050150
12822 050154
12823
12824 050156
050156
12825 050162
050162
12826 050166
050166
12827 050172
12828
12829 050174
050174
12830 050200
050200
12831 050204
050204
12832 050210

010137

002034

010237

002052

010037
000416

002044

010137

002034

010037

002052

010437
000407

002044

010237

002034

010037

002052

010337
000400

002044

MACRO v05.01b Fri.day

15-Feb 85

El2

16:10

Page 409-1

SEQ 0354

LET BAD

:= R2

LET GOOD

BR
$PER23:

PERRAW

LET ADDRESS

LET BAD
LET GOOD
BR
$PERZ24:

:= RO

:= RO
:= R4
PERRAW

LET ADDRESS
LET BAD
LET GOOD

:- R1

:= R2

:= RO
:= R3

PERRAW

MOV R1,ADDRESS
MOV R2,BAD
MOV RO,GOOD

MOV R1,ADDRESS
MOV RO,BAD
MOV R4,G00D

MOV R2,ADDRESS

MOV RO,BAD
MOV R3,GO0OD

CVMJAAQ MSV11-J MEMORY DIAG.
ERROR DATA SETLP
12834 050212

MACRO V05.01b Friday

15-Feb-85

P_RRAW:

SUBTST

2222222222

id 23

050230
12837 050230
050230
050234
050236
050242
12838 050242
12839 050246
050246
050252
12840 050254
12841 050256
050256
050260
12842 050260
12843 050262
050262
12844 050262
12845
12846 050264

004737

050446

005737
001402
004737

002144

<<DATA WAS A WORD>>
222322

iRt

DATA WAS A WORD

PERBNK
CALL
IF ABORTFLAG IS TRUE THEN $CALL GETDATA

034152

004737

050422

005737
001002
104011

002144

TST ABORTFLAG

045252

005737
001002
004737

RNl

BEQ LA4S0
JSR PC,GETDATA
IF BADPC EQ #0 THEN $CALL BADSTACK

002022

TST BADPC
BNE L4511
JSR PC,BADSTACK

PERXOR
CALL
IF ABORTFLAG IS FALSE

TST ABORTFLAG
BNE L452

ERROR +11
ELSE

000401

BR L4S3
-------

104012

ERROR +12
END ;OF IF ABORTFLAG

000002

RTI

SUBTST

PERRAB:
i

L2232

REL

004737

050446

005737
001402
004737

002144

034152

004737

050422

005737

002144

104014

000401

104015

L2222

02223

sttt

DATA WAS A BYTE

222

222 i

ittt i izttt

ittt

002022

ittt it

PERBNK
CALL
IF ABORTFLAG IS TRUE THEN $CALL GETDATA

is i ss

233

2222223232232 3 0]

TST ABORTFLAG

IF BADPC EQ #0 THEN $CALL BADSTACK

PERXOR
CALL
IF ABORTFLAG IS FALSE
ERROR +14
ELSE

TS7 BADPC
BNE L455
JSR PC,BADSTACK

TST ABORTFLAG
BNE L456

BR L457

ERROR +15
END ;OF IF ABORTFLAG
-------

000002

322327

BEQ L454
JSR PC.GETDATA

045252

005737
001002
004737

001002

<<DATA WAS A BYTE>>

2222222222

; sSUBTEST
12847 050264
12848 050270
050270
050274
050276
050302
12849 050302
050302
050306
050310
050314
12850 050314
12851 050320
050320
050324
12852 050326
12853 050330
050330
050332
12854 050332
12855 050334
050334
12856 050334

Page 410

SEQ 0355

; *SUBTEST
12835 050212
12836 050216
050216
050222
050224

F12

16:10

RTI

CVMJUAAQ MSV11-J MEMORY DIAG.
DATA WAS A BYTE

Gle2

MACRO V05.01b Fridey 15-Feb 85 16:10

12859 050336

12860 (50336
050336
050342

T L

005737
001002

002022

004737

034152

12862 050354
12863 050360

004737
004737
104022

050422
050446

012737

100000

002046

012737
000137

000100
045040

002050

005037

002046

012737
000137

000077
045040

igggg 050362

12866 050364
050364
12867 050372
050372

igggg 050400

12870 050404
12871 050410
050410
igg;% 050416

SEQ 0356

PERRA7: SUBTST
«<«<DATA WAS A 7 BIT BYTE>>
B
I I T
T
T I I
; *SUBTEST
DATA WAS A 7 BIT BYTE

050344

050350
12861 050350

Page 412

CALL
CALL
ERROR
RTI

000002

002050

12874 050422

:= #100000

MOV #077,G00D3

JMP PERRA3

PERXOR: SUBTST

<<DETERMINE XOR OF GOOD & BAD>>

; #SUBTEST

DETERMINE XOR OF GOOD & BAD

JSR PC,BADSTACK

MOV #100,50003

$PER27: CLR
GoOD2
LET GOOD3 := #077

‘

MOV #100000,G00D2

JMP PERRA3

L460:;;::::;

LET GOOD3 := #100

TST BADPC
BNE L460

PERXOR
PERBNK
+22

$PER26: LET GOOD2

]
'

IF BADPC EQ #0 THEN $CALL BADSTACK

I
I
T I
I
N
I I I
I

12875 050422

12876
12877
12878
12879

050422

050424
050430
050436
050442
050442

12880 050444

010046

013700
013737
074037
012600

000207

002044
002052
002060

002060

PUSH

MOV
MOV
XOR
POP

G0OD,RO
BAD,BADXOR
RO,BADXOR
RO

RETURN

MOV RO,

(SP)

MOV (SP)+,RO

CVMJAAQ MSV11 J MEMORY DIAG.
DETERMINE XOR OF GOOD & BAD

MACRO V05.01b Friday

15 Feb-85

Hie

16:10

SEQ 0357
PERBNK:

12883 050446

SUBTST<<LOG ERROR ON BAD BANK>>

(SR ERRRRE R AR RN R R NN E R

12894 050510
12895 050312
0350512
12896 050520
050520
050522
12897 050524
12898
12899 050526
12900 050532
050532
050540
12901 050542
12902 0350550
050550
050552
12903 050552
12904 050560
050560
12905 050560
12906 050564
050564
12907 050572
12908
12909 050574
050574
050602
12910 050604
12911 050606
050606
12912 050606
0350606
050612
0350614
0350620
12913 050620
12914 0%0624
050624
030632
12915 050634
12916 050636

AR E R

RN R A AR

LOG ERROR ON BAD BANK

; *SUBTEST

12884
12885 050446
050446
050450
12886 050452
12887 050456
12888 050460
12889 050462
12890 050470
12891 050474
12892 050476
12893 050502

Page 414

R AR

RN SRR AR R RN SRR RS SR E S S

00 0RO b SR

;WHILE WE'RE HERE LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE

010046
010146
013701
006301
006301
052761
105261
001002
105361

126137
101403

012737

002102

000001
002666
002666
002666

1771717

002664

002554

002406

012601
012600
000207

12%:

11¢:

002052

023737
001004
013737

002034

002412

002246

002044

PERECC:

MOV
ASL
ASL

BANI(,R1
R1
R1

B1S
INCE
BNE
DECB

CcMPB

BLOS

MOV RO, -(SP)
MOV R1,-(SP)

#BIT0,CONFIG(R1)
CONFIG+2(R1)
124
CONFIG+2(R1)

;BUMP BANK COUNTER
:NO OVERFLOW - SKIP
;SET BACK TO 255.

11%

:NO

CONFIG+2(R1),ERRMAX

SET

TOOMANY

PoP

R1,RO

;IS IT PAST MAX?
: YES

002250

004737

050422

MOV
TSTDAT.2,G00D
END ;OF IF (R1)

012737
000207

177777

002612

023727
001001
104023

002300

000041

CALL
SET

PERXOR
HEADER

RETURN

$PER31:

IF REALPAT EQ #41

END

ERROR +23

IF BADPC EQ #0 THEN $CALL BADSTACK

002022

034152

004737

050526

023727
001001
104037

002300

000011

SKIP

MOV

#-1,TOOMANY

MOV (SP).,R1
MOV (SP)+,RO

RO,BAD

IF ADDRESS EQ TESTADD
MOV TSTDAT,GOOD

002044

013737

Mav

ELSE

000403

001002
004737

RO,R1

RETURN

010037

005737

PUSH

CALL
PERECC
IF REALPAT EQ #11
ERROR +37
END ;OF IF REALPAT

CMP ADDRESS,TESTADD
BNE L461
BR L462
L461:;::::;;

L462:;;:::::
MOV

#-1,HEADER

, #41
CMP REALPAT
BNE L463

L463:;;:::::
T1ST BADPC
BNE L464
JSR PC,BADSTACK

L464:::::::

811
CMP REALPAT,
BNE L465

CVMUAAO MSV1i1l-J MEMORY DIAG.
LOG ERROR ON BAD BANK

050636
12917 050636
050636
050644
12918 050646
12919 050650
050650
12920 0350650
12921
12922

12923
12924

050650
050656
050660
030662
030662
050662
050662
050670

023727
001001

002300

112

MACRO v05.01b Friday 15-Feb 85 16:10

SEQ 0358

000015

104043

023727
001001
104044

012737
000002

IF REALPAT EQ #15
ERROR +43
END ;OF IF REALPAT

002300

000016

IF REALPAT EQ #16

ERROR +44
END ;OF IF REALPAT

177777

Page 414-1

002612

SET HEADER
RTI

LA6S:;;;:;::

cHe REALPAT,
215
BNE L466
LA66:;;::::;

CcMP REALPAT,
016
BNE L467

LA67:;;:;::::
MOV

#-1,HEADER

CVMUAAQ MSV11-J MEMORY DIAG.
LOG ERROR ON BAD BANK
12927 0850672
050672
050676
050700
050704
12928 050704
12929 050710
12930 050714
12931 050720
050720
12932 050726
12933 050730
050730
%Sggg 050736
12936 050740

12937
12938
12939
12940
12941
12942

050740
050744
050746
050752

J12

MACRO V05.01b Fr.day 15-Feb 85 16:10

002022

010137
010037
010237

002034
002052
002044

012737
104040

177777

002612

012737
000002

177777

002612

005737
001002
004737

002022

034152

012737
104041

177777

002612

051010
igg:g 051016

012737
000002

177777

002612

005737
001002
004737

002022

12948 051032
051032

051040

12949 051042
12950 051044

032737
001002
104016

002044

MOV
MOV
MOV
SET

R1,ADDRESS
RO,BAD
R2,G00D
HEADER

ERROR
SET

+40
HEADER

La70:;;::::

RTI

$PER33:

002034
002052
002053
000377
050422

051020
051024
051026
051032

IF BADPC EQ #0 THEN $CALL BADSTACK

MOV
MOV
CLRB
MOV
CALL

R1,ADDRESS
RO,BAD
BAD+1
#377,G000D
PERXOR

ERROR

+41

SET

HEADER

RTI

$PER34:1IF BADPC EQ #0 THEN $CALL BADSTACK

002150

IF #BIT15!'BIT74 OFF.IN CSR

MOV

#-1,HEADER

MOV

#-1,HEADER

TST BADPC
BNE L47}
JSR PC,BADSTACK
L871:::::::

HEADER

034152
100020

TST BADPC
BNE L4770

JSR PC,BADSTACK

010137
010037
105037
012737
004737

12947 051020

SEQ 0359

$PER32: IF BADPC EQ #0 THEN $CALL BADSTACK

005737
001002
004737

050752
050756
050762
050766
050774
051000
051000
12943 051006

12944 051010

Page 416

MOV

#-1,HEADER

MOV

#-1,HEADER

TST BADPC
BNE L472
JSR PC,BADSTACK
L872:;;;::::

B8IT #BIT15!BIT4,CSR
BNE L473

ERROR +16
ELSE

;NO SBE OR DBE

104001

;EXPECTED SBE SO DBE MUST HAVE GOTTEN SET

051050
igggz 051050

ERROR +1
END ;OF IF #BIT1S5!'BIT4

000002

RTI

12955
12956
12957
12958
12959
12960
12961

004737
004737
013737
012737
104047
062706

051044
051046

12951 051046
12952 051050

051052
051056
051062
051070
051076
051100

12962 051104

000401

000207

050446
034152
002032
000012
000004

002052
002044

;DURING
$PER3S: CALL
CALL
MOV
MOV
ERROR
ADD
RETURN

BR L474
L473:::;::::

L474:;;:;:;;:;

BRANCH GOBBLE THE CONDITION CODES WERE WRONG
PERBNK
BADSTACK
BADPSW,BAD
#12,G00D
+47
#4 5P
;FIX STACK FROM TRAP
; ABORTING TEST

CVMJUAAQ MSV11-J MEHMORY DIAG.
LOG ERROR ON BAD BANK

12963
12964 051106
12965 051112
12966 051116

031116
12967 051124
12968 051126
0351126
12969 051134
12970
12971 051136
12972 051140
12973
12974 051142
12975 051144

MACRO V0S5.01b Friday

002044
002052

012737

17717717

002612

012737
000002

177777

002612

$PER36:

MOV

SET

ERROR
SET

RO, GOOD
R1,BAD
HEADER

$PER37:

HEADER

104054
000002

$PER4O:

ERROR

+53

;ILC; ;REV B

ERROR

+54

;ILC; :REV B

RTI

MOV

&-1,HEADER

MOV

&-1,HEADER

+23

RTI

104053

000002

Page 416 1

SEQ 0360

010037
010137

104023

<12

15-Feb-85 16:10

;ILC; ;REV B

;ILC;;REV B

CVMJAAQ MSV11-J MEMORY DIAG.

ROUTINE

SCOPE HANDLER

L12

MACRO V05.01b Fridey 15-Feb 85 16:10

12978

.SBTTL

Page 418

SEQ 0361

ROUTINE SCOPE HANDLER

12979

12980

;#THIS ROUTINE

12981
12982
12983

;#*AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGISTER
;o THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
;#SW14=1
LOOP ON TEST

12985
12986
12987 05114€¢
12988 051152
051152
12989 051154
12990 051160
12991 051164
051164
12992 051164
12993 051166
12994 051172
12995 051174
12996 051200
12997 051200
12998 051204
12999 051206

;sCALL
i
$SCOPE:

005737
001410
013737

13001 051222

001401

12984

13000 051214
13002 051224

13011 051226
051226
051232
051234
051242

13012 051244
13013 051250

13014 051254
051254
051260

13016 051262
13017 051264

005237

056656

002004
005037
105237

056656
056660

051264
051272

13019
13020 051274
13021
13022 051276

13023
13024
13025
13026
13027
13028
13029

051302
051310
051314
051320
051322
051326
051334

13030 051336

THE LOOPING OF

104410
005737
001402
004737

032737

006216
055152

NOTRCE:

052314
177766

000001

052312

104177

005737
001410
032777
001404

SUBTESTS.

WILL

INCREMENT

005037
000137

005737
001401

002420
040604

012737
005737
012637
000430
062706
022737
001002
005037

BGE LA47S

; TRACE

IST
BEQ
MOV

CPERRF
SKJ
177766 ,CPSAVE

;IS THERE A CPU ERROR REGISTER?
;BRANCH IF NOT
;GET CONTENTS OF ERROR REGISTER

;R-C
:R-C
;R-C

BEQ

SKJ

;BRANCH IF NOT

iR-C

ERROR

#BITO,CPSAVE
+177

;:TEST

L87S:;:::::
FOR CHANGE IN SOFT-SWR

TRACE
NOTRCE
CONTT

;IS THE POWER FAIL MONITOR BIT SET?

051322
177060
000004
000004
000005
177766

TST
BEQ
BIT
BEQ

131344

000004

004010

TST NOSCOPE
BEQ LA4A77

IF #SW14 SET.IN 9SWR THEN GOTO $0QVER

L477:::5:::
BIT #SW14,a3SWR
BNE $OVER

;BRBGASTART OF CODE FOR THE XOR TESTER###&S
$XTSTR: BR
2$
;;IF RUNNING ON THE "XOR" TESTER CHANGE
; ; THIS INSTRUCTION TO A "NOP* (NOP=240)
MOV
ERRVEC, -(SP)
; ;SAVE THE CONTENTS OF THE ERROR VECTOR
MOV
#1$ ,ERRVEC
;:SET FOR TIMEOUT
18T
177060
;;TIME OUT ON XOR?
MO\
(SP)+ ,ERRVEC
; ;RESTORE THE ERRQR VECTOR
BR
$SVLAD
;:;6G0 TO THE NEXT TEST
1¢:
ADD
#4,5P
;FIX STACK FROM TRAP
cMP
#5,PROTYP
:IS THIS AN 11/83 ?
BNE
CLR

6
CPUERR

:R-C

STOPO
L476
#SuW8,aSWR
L476

L876:::::::

RTI
END ;OF IfF NOSCOPE

000004

:R-C

STOPOK
EXIT

IF NOSCOPE IS TRUE

1¢:

:R-C

;REPORT IF SO

END ;OF IF STOPOK

002440

040000

{

IF STOPOK IS TRUE AND #SW8 SET.IN @SWR

CLR
JMP

000425

013746

WE ARE ALIVE

131374

000002

032777
001051

; ; SCOPE=I0T
;TELL AP,

CKSWR
187
BEQ
CALL

B8IT

SKJ:

002420
000400

SCOPE
INC
$0EVCT
IF RESULT IS LT

CLR
$DEVCT
INCB
$UNIT
END ;OF IF RESULT

051264

13018 051264

CONTROLS

;*SW9=1 LOOP ON ERROR

051234

13015 051254

;BRANCH IF NOT
;RESET CPU ERROR REGISTER

CVMUAAO MSV11-J MEMORY DIAG.
ROUTINE SCOPE HANDLER
13031 051342
13032 031346
13033 031350
13034 051350
13035 051354
13036 051356
13037 031364
13038 031366
13039 031374
13040 051376
13041 051402
13042 051406
13043 051412
13044 051416
13045 051422

13046 051426

012637
000407

000004

105737
001412
032777
001404
013737
000410
105037
011637
011637
005037
004737
013716
000002

002014

MACRO

Feb

16:10

Page

418

SEQ 0362
MOV
(SP)+ ,ERRVEC
; ;RESTORE THE ERROR VECTOR
BR
4%
;;LOOP ON THE PRESENT TEST
2%: ; A0088END OF CODE FOR THE XOR TESiER0S640
7578
34:
$ERFLG
; ;HAS AN ERROR OCCURRED?
BEQ
$SVLAD
,:BR IF NO
#SUW9, ISWR
; ;LOOP ON ERROR?
8IT
8EQ
S$
;;BR IF NO
44
zbsggR.$LPADR
;:SET LOOP ADDRESS TO LAST SCOPE
MOV
BR
$ERFLG
;; ZERO THE ERROR FLAG
S$:
CLRB
$SVLAD: MoV
(SP), $LPADR
: :SAVE SCOPE LOOP ADDRESS
MoV
(SP), $LPERR
; s SAVE ERROR LOOP ADDRESS
CLR
ég%gggE
; ;CLEAR THE ESCAPE FROM ERROR ADDRESS
$OVER:
CALL
MOV
$LPADR, (SP)
; ;FUDGE RETURN ADDRESS
RTI
;sFIXES PS

64:

001000

131252

002624

002622

002014
002622
002624
002362
051430
002622

v0S.01b Friday

Mle2

CVMUAROQ MSV11-J MEMORY DIAG.
ROUTINE SCOPE HANDOLER

MACRO v0S.01b Friday 15-Feb-85

GETDIS:
Al

SUBTST

010046
005737
001403
052737
013777
013737
012600
000207

i3 2

002102
002300

002013

002012

100000

002012

002012
002012

131150
000174

SUBR

11t 1111333223

DISPLAY>>
222

2332232

3022

3333222

233

232

313133133333

BANK
, $BANK

PUSH

02232133323

211332732337 1% 22

Y11

REALPAT, $PATMAR
MOV RO, -(SP)

TST
BEQ
8IS

RLFLAG
14
#BIT15, $PATMAR

;ARE WE RELOCATED?
:NO - SKIP
;YES - SET MSB

MOV
ggg

$PATMAR,3DISPLAY
éSATHAR.DISPREG

; SOF TWARE DISPLAY REGISTER

RETURN

DISPLAY

Move

HMOVB

002126

<<SUBR

2 32332222223 222432222222

;sSUBTEST

113737
113737

Page 419

SEQ 0363

13048 051430

13049 051430
13050 051436
13051 051444
051444
13052 051446
13053 051452
13054 051454
13055 051462
13059 051462
13060 051470
13061 031476
051476
13062 051500

N12

16:10

MOV (SP)+,RO

]

CVMJAAO MSV1l-J MEMORY DIAG.

ROUTINE ERROR HANOLER

13065
13066
13067
13068
13069
13070
13071
13072
13073
13074
1307S
13076
13077
13078
13079 051502
13080 051506
13081 051510
13082 051514
13083 051520
051520
051524
13084 051526
13085 051530
13086 051530
13087 051534
13088 051536
13089 051542
13090 051550
13091 051556
13092 051560
051560

13093 051564
051564
13094 051570
13095 051574
051574

13096 051576
13097 051604
031604
13098 051604
0351604
13099 051604
13100 051610
13101 051616
13102 051622
13103 051630
031636
051644
031646

051652
051654
051660
051662
051670

513

MACRO VOS.01b Fridey 15 Feb-85 16:10

.SBTTL
A

Page 421

SEQ 0364 !

ROUTINE ERROR HANDLER

;*THIS ROUTINE

WILL

INCREMENT

THE ERROR

FLAG AND THE ERROR COUNT,

;SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL
;#AND GO TO $ERRTYP ON ERROR
;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
HALT ON ERROR
; *SW15=1

;#4SH13=1

INHIBIT ERROR TYPEQUTS

BELL ON ERROR
;#SH10=1
;3SW9=1 LOOP ON ERROR

H tCALL

i®

105737

056666

105037

052310

005737
001027
104410

002430

105237
001775
004737
013737
032777
001404

002014

001402
004737

$ERROR:

000000

051430
002012
002000

NOAPT:

BACK:
1%:

056652
131060

ERROR

.ENABL
TSTB
BEQ
JSR

LSB
$ENV
NOAPT
PC.ABORT

CLRB

CKSUWR
INCB
BEQ
CALL
MOV
81T
BEQ

TYPE
TYPEIT

104401

066060

TYPE
TYPEIT

005237

002630

100003

012737

011637
162737

077777

.DSABL

2$:
002630

010637
016637

002020
000002
002024
000002

130164

002030
002015

122737

000177

002015

117737

001431
105737
001024
005737
001423
013737
032737

002020

052310

177766
000001

052312
052312

$ERFLG
1$
GETDIS
$PATMAR,S$TESTN
#SW10,3SWR
2%
$BELL
,$BELL

CRF

MSGO14
,MSGO14

:3SET THE ERROR FLAG
;;DON'T LET THE FLAG GO TO ZERO
:SETUP DISPLAY STUFF
;FOR APT
;;BELL ON ERROR?
;:NO
SKIP

BNE LS00
;R C

: ;RING BELL
;CONTROL

; sCOUNT THE NUMBER OF ERRORS
BPL LS01

MOV #77777 ,$ERTTL

END

;R-C
TST NOERROR

;:TEST FOR CHANGE IN SOFT SWR

CRF
.DSABL
INC
$ERTTL
IF RESULT IS MI
;OF IF RESULT

LS01:5:::::

END

;OF IF NOERROR

MOV

(SP),ERRPC

: sGET ADDRESS OF ERROR INSTRUCTION

MOV
MoV
MovB

SP,ERRSP
2(SP),ERRPSW
SERRPC,$ITEMB

;;STRIP AND SAVE THE ERROR ITEM CODE

CMPB

#177,$1ITEMB

1578

IBSAVE

TS7

CPERRF

MOV

177766 ,CPSAVE

SUB

BEQ

BNE

052314

IBSAVE

;ARE WE RUNNING IN APT MODE
:YES - DO UFD ABORT
;GOT0 UFD ABORT

IF NOERROR IS FALSE

002653

104401

; s ERROR-EMT AND N=ERROR ITEM NUMBER

BEQ
BIY

#2,ERRPC

L500:;;::::

;IS THIS THE POWER FAIL CALL?

;R-C

;2ND ERROR CALL?

iR C

;IS THERE A CPU ERROR REGISTER?

iR-C

;SAVE CONTENTS

iR-C

1001¢

;BRANCH IF SO

1000¢

:BRANCH IF SO

10014

;BRANCH IF NOT

#BI70,CPSAVE

;POWER MONITOR BIT SET?

iR-C

;R-C

iR-C
iR-C

CVMUAAO MSV11-J MEMORY DIAG.

ROUTINE ERROR HANDLER

13113 051676

13114
13115
13116
13117
13118

051700
051706
051714
051722
0517284

13119 051730

13120 051730
051730
051734
13121 051736
051736
051742
13122 051744
13123 051752
13124 051760
13125 051766
13126 051774
13127 052000
052000
13128 052000
13129 052006
13130 052012
052012
052020
13131 052022

13132 052024

001414

042737
112737
112737
000402
105037

000001
002015
000177

Cl3

HACRO V05.01b Friday 15-Feb-85 16:10

052310

1000¢:

1001¢$:

052032
052034
052040

13134 052042

052042

13135 052044

052050
052054
13139 052056

13140 052062

13141 052064

052064

#8170,177766
9$1TEMB,IBSAVE
#177,$ITeMB
1001$
IBSAVE

002022

002022
000002
002026
002032
002022

002020
002020
002024
002030

MOV BADPC,ERRPC
SUB #2,ERRPC
MOV BADSP,ERRSP
MOV BADPSW,ERRPSW
CLR BADPC
END ;IF

013737
004737

002020
050446

056650

032777
001401

020000

130616

MOV ERRPC, $FATAL
CALL PERBNK
IF 4SW13 SET.IN aSWR

001401

;BRANCH IF NOT

;CLEAR THE BIT
;MAKE IBSAVE NON-ZERO FOR DuAL CALL
;SET $ITEMB TO POWER FAIL POINTER

130604

TST BADPC
BEQ LSO3

;FOR APT
;:LOG ERROR ON BANK

BIT #SW13,aSWR
BEQ LS04

IF #SWS SET.IN aSWR AND TOOMANY IS TRUE

LS04:;;:;::::;

BIT #SWS,aSWR
BEQ L505
TST TOOMANY

BEQ LSOS

GOTO 3¢

BR 3%

END ;OF IF #SWS

LS05:;::::;

END ;0F IF NOERROR
C04737

052316

005737
001403
013706

002276

000207

LS03:;;:::::

002406

000410

CALL
$ERRTYP
IF MONFLG IS TRUE

002274

MOV
END

RTS

SAVMON,
SP

;R-C
:R-C
:R-C
:R-C
iR-C

TST NOERROR
BNE LS502

BR 3¢
END ;0F IF #SW13
000040

;R-C

:R-C

IF BADPC NE #0

000420

032777
001404
005737

SEQ 0365

IF NOERROR IS FALSE

005737
001416
013737
162737
013737
013737
005037

052044

1001

002430

13136 052044
13137 052044
13138 052050

8IC
MOVB
MOVB
BR
CLRB

005737
001043

052024

13133 052024
052024

BEQ

177766
052310
002015

Page 421-1

LS02:::::::

;:G0 TO USER ERROR ROUTINE
; sSHOULD WE RETURN TO XXDP MONITOR?2??

TST MONFLG
BEQ LSO6

; ;GET MONITOR ADDRESS

::G0 TO MONITOR
HH

L506

‘

CVMJUAAQ MSV11-J MEMORY DIAG.
ROUTINE ERROR HANDLER

13143 052064
052064 005737
052070 001072
13144 052072 005777
100002
13145 052076
13146 052100 000000
104410
13147 052102
13148 052104
005737
052104
052110 001006
052112 032777
052120 001402
013716
13149 052122
13150 052126
052126
13151 052126 005737
13152 052132 001402
13153 052134 013716
13154 052140
052140 005737
052144 001043
13155 052146 022737
13156 052154 001002
13157 052156 005037
13158 052162
005737
052162
001006
052166
052170 005737
001003
052174
052176 005737
001405
052202
052204
13159 052204 012737
13160 052212 000137
13161 0352216
052216
13162 052216
005737
052216
001414
052222
023727
052224
101410
052232
13163 052234
052234
104401
13164
13165
13166
13167
13168
13169
13170
13171

052240
052244
052250
052254
032254
052254
052254
052254
052254
052256
052256
052256
052264

013700
005037
000137

MACRO VO05.01b Friday 15 Feb-85

IF NOERROR IS FALSE

T1S7T

130540
$HALT:
7%:

002440

HALT

; ;HALT ON ERROR

; sHALT

IF NOSCOPE IS FALSE AND #S5W9 SET.IN aSuR

187

002362

9$:

002220

177766

BNE 11$
CLR CPUERR

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE OR FATAL$ IS TRUE

MOV

002630

&1, $MSGTY

EXIT
JMP
END ;0F IF ACTFLAG

TST
BNE
TST
BNE
TST
BEQ
LS512:;:::5::

TYPEIT

.DSABL

000042
000042
014022

TYPE
MSGO66
,MSGO66

CRF

MOV

TST XXDPCHAIN

;0F iF DETFLAG

ELSE

002612

SET

END

;ERROR COUNT EXCEEDED 20

BEQ L514
CMP $ERTTL,®20
BLOS LS14
-

ABORTING FOR XXDP CHAIN

42,R0

42
CLR
JMP
$ZAP42
END ;0F IF XXDPCHAIN

000403

ACTFLAG
L512
APTFLAG
LS12
FATALS
LS13

513
LS13::;:::;

000020

070051

177777

;FOR APT

IF XXDPCHAIN IS TRUE AND $ERTTL HI #20

002354

TST DETFLAG
BNE L511

;IS THIS AN 11/83 ?

002064
056646

#SW9,aSuWR
L510

; ;BR IF NONE
; ;FUDGE RETURN ADDRESS FOR ESCAPE

002352

000001
040604

NOSCOPE
LS510

;: ;FUDGE RETURN FOR LOOPING
510
L
tiviis
; ;CHECK FOR AN ESCAPE ADDRESS

CMP #5,PROTYP

11$:

002350

$ESCAPE

BEQG
9$
MOV
$ESCAPE, (SP)
IF DETFLAG IS FALSE

004010

TST
BNE
BIT
BEQ

ON ERROR'

:; TEST FOR CHANGE IN SOFT SWR

MOV $LPERK,(SP)
END ;0OF IF NOSCCPE

002362

NOERROR

:;SKIP IF CONTINUE

CKSUWR

END

012737

aSWR

8PL

TST

BNE LSO?

130516

002624

000005

Page 422

SEQ 0366

002430

001000

D13

16:10

HEADER

;0F IF NOERROR

LS14:;::::::
LS11:5:5:3::

BR LS1S
LSO7::::5:33
MOV

o-1,HEADER

CVMJAAQ MSV11-J MEMORY DIAG.

ROUTINE ERROR MHANDLER
052264

13172 052264
052264
052270
13173 052274
13174 052300
13175 052302
13176 052306
13177 052310
13178 052312
13179 052314
13180

005037
005037
105737
001402
000137
000002
000000
000000
000000

002406
002430
052310

051530

E13

MACRO V05.01b Fridey 15 Feb-85 16:10

10%:

CLEAR

Pege 422 1}
LS15:::::5

TOOMANY ,NOERROR

1ST8
BEQ
JMP
213$:
RTI
IBSAVE: .WORD 0O
CPSAVE: .WORD 0
CPERRF: .WORD O
.DSABL

IBSAVE
2134
BACK

LSB

SEQ 0367

: ;RETURN

CLR
TOOMANY
CLR
NOERROR
;POWER FAIL ERROR CALL? ;R C
iR-C
;JUMP IF SO
;R-C
;R-C
R C
;R-C

CVMJAAQ MSV11-J MEMORY DIAG.

ROUTINE ERROR MESSAGE TYPEOUT

MACRO V05.01b Friday

F13

15-Feb-85 16:10

Page 424

SEQ 0368
]

.SBTTL

13183
13184
13185
13186
13187
13188
13189
13190 052316
13191 052320
052320

104401

052324
052326
052332

005000
153700
001004

002015

052334
052334

013746

002020

052340

104402

052342
052344
052350
052352
052356
052360
052362
052364
052366
052370
052374
052400
052402
052406
052410
052414
052416
052422
052424
052424

000511
122700
001003
012700
000406
005300
006300
006300
006300
062700

052430
052430

ROUTINE ERROR MESSAGE TYPEQUT
[
e LTt

;«THIS ROUTINE USES

THE

"ITEM CONTROL

;*ERROR IS 10O BE REPORTED.
;*AND REPORTS THE

012037
001417
005737
001003
005737
100011
005737

001402

104401

TYPOC

000177

100$:

057274
052432

110%:

002430
002612
002064

124

070120

2$:
3s:

052432
052434
052434

000000
104401

002660

052440
052444
052446
052452
052454
052460
052462
052462

012037

052464

104401

14:

052626

104401

001412
005737
001003
005737
100004

TYPOCT
MoV

44:

002430
002612

13¢:

.DSABL
BR
CMPB
BNE
MoV
BR

DEC

ASL
ASL
ASL
ADD
MOV

$CRLF

. $CRLF

CRF

RO
$ITE*B,RO

; ; "CARRIAGE RETURN” &

"LINE FEED"

; sPICKUP THE ITEM INDEX

;+IF ITEM NUMBER IS ZERO, JUST
;3 TYPE THE PC OF THE ERROR

ERRPC, <ERROR ADDRESS>

ERRPC, -(SP)
CRF
114

#177,R0

100$

#PFECWS,RO

1104

RO
RO
RO
RO

#$ERRTB,RO

(RO).+,3$

44
NOERROR
124
HEADER

.DSABL
. WORD

CRF

TYPE
TYPEIT
.DSABL
MOV
BEQ
TST
BNE
TST
BPL
TYPE
TYPEIT
.DSABL

IT THEN OBTAINS, FROM THE 'ERROR TABLE* ($ERRTB),

APPROPRIATE INFORMATION CONCERNING THE ERROR.

BEQ
TST
BNE
TS7
BPL
TST
BEQ
TYPE
TYPEIT
.DSABL
TYPE

TYPEIT

TO DETERMINE WHICH

: iSAVE ERRPC FOR TYPEQUT
; ;ERROR ADDRESS
;:6G0 TYPE--OCTAL ASCII(ALL DIGITS)
::GET QUT
;POWER MONITOR CALL?
;BRANCH IF NOT
;MOV ADDRESS OF PFE BIT ERROR TO RO

; ;ADJUST THE INDEX SO THAT IT WILL

WORK FOR THE ERROR TABLE

; ;sFORM TABLE POINTER
; ;PICKUP "ERROR MESSAGE" POINTER
: s SKIP TYPEQOUT IF NO POINTER
;IS THIS REALLY AN ERROR?
;YES - SKIP
; TYPE HEADER?
:NO - SKIP
;WAS IT A FATAL ERROR?

;N0

;FATAL

SKIP

;: TYPE THE

$CRLF

, $CRLF

CRF

(RO)+,5$
6¢
NOERROR
134
HEADER
6%

CRF

"ERROR MESSAGE"

:: "ERROR MESSAGE" POINTER GOES HERE

;s "CARRIAGE RETURN"

“LINE FEED"

; sPICKUP “DATA HEADER" POINTER
:;SKIP TYPEQUT IF O
;IS THIS REALLY AN ERROR?
:YES - SKIP
; TYPE HEADER?
:NO - SKIP
; ; TYPE THE

“DATA HEADER*

002660

$ERRTYP: SAVREG
TYPE
TYPEIY
.DSABL
CLR
81S6
BNE

($ITEMB)

000D

104415

BYTE"

OO0

CVMJAAQ MSV11-J MEMORY DIAG.

ROUTINE ERROR MESSAGE TYPEOUT

13226 052464
13227 052466
052466

000000

13228 052472
13229 052474
13230 052476

012001
001427
012002

104401

G13

MACRO V05.01b Fridaey 15-Feb-85 16:10

Page 424

SEQ 0369

S%:
002 .60
64:

. WORD
TYPE
TYPEITY

0
$CRLF

MOV

(RO)+,R1
104

.DSABL

BEQ
MOV

+ $CRLF

CRF

(RO)«+,R2

:; "DATA HEADER" POINTER GOES HERE

:; "CARRIAGE RETURN"

"LINE FEED*

; :PICKUP “DATA TABLE" POINTER
::BR IF NO DATA TO BE TYPED
; ;PICKUP "DATA FORMAT" POINTER

CVMJARQ MSV11-J MEMORY DIAG.
ROUTINE ERROR MESSAGE TYPEOUT
13233 052500
13234 052502
13235 052504
13236 052510
13237 052512
13238 052514
13239 052516
13240 052520
13241 052322
13242 052524
13243 052526
13244 052530
13245 052532
13246 052534
13251 052536
13252 052542
13253 052544
13254 052546
052546

13255
13256
13257
13258
13259
13260
13261

112203

006303
004773
000412
052736
052746
052756
053026
053066
053100
053112
053156
053164
053244
062701
005711
001403

104401

052552

000752

052554
032560
052562
052566
052570
052570
032576

005737
001402
005237
104416

052600

052604
052606
052612
13262 052614
13263 052620
052620
13264 052620
052620
13265 052624
13266
13267 052626
052634
13268 052636
052641
052644
052647
052652
052655
052660
052663
052666
052671
13269 052672
052675
052700
052703

MACRO V05 Olb Friday

7$:

052512
8%:

000002

9¢:

066107

10¢:

002110
002612

032777
001410
005737
001005
005737
001002
004737

053266

104401

070557

000200

11¢:

130040

120
105
115
111
122
111
106
116
123
000

124
124

040
122

MOVB
ASL

CALL
BR
TAG70$
TAG71$
TAG72$
TAG73$
TAG74
4
TAG75$
TAG76%
TAG77$
TAG78$
TAG79$
ADD
ST
BEQ
TYPE
TYPEIT
.DSABL
B8R

TST
BEQ
INC
RESREG
IF #5W7

002220
002430

TYPE
TYPEIT

.DSABL

RETURN

052672

117
122
117
124

040

(R2)+,R3

SEQ 0370 |

;MAKE IT

#2,R1

;UPDATE DATA TABLE POINTER

MSG018
.MSG018
CRF
74

;TYPE 2 SPACES

a8s$(R3)
9%

(R1)
10$

A WORD ADDRESS

; ;IS THERE ANOTHER NUMBER?
;;BR IF NO

; ;LOOP

MUT

;IS THERE A MEMORY UNDER TEST

HEADER

;YES

114

;NO - SKIP

BUMP HFADER FLAG

SET.IN 8SWR AND DETFLAG IS FALSE AND NOERROR IS FALSE
BIT #SW7, 3SWR
BEQ LS16
TS7 DETFLAG
BNE L516
TST NOERROR
BNE L516

.EVEN

M5G104

; CONTROL

,M56104

CRF

052722

PFECWS:

.WORD

PFECEM,PFECDH,PFECDT,PFECDF

127

PFECEM:

.ASCIZ

“POWER MONITOR BIT FOUND SET*

PFECDH:

.ASCIZ

“TESTNO

040

116
117
102

124
117
104
105

040

105

123
117
105

116
040
122

Page 426

DETAIL
CALL
END ;OF IF #SW7

000207

052636
052732

H13

1S5-Feb-85 16:10

125

040

124

040

ERR PC

CPUERR"

CVMJAAQ MSV11-J MEMORY DIAG.

ROUTINE ERROR MESSAGE TYPEOUT

052706
052711
052714
052717

13270
13271 052722
052730
13272 052732
052735
13273

113

MACRO vV05.01b Friday 15-Feb-85 16:10

Page 426 1

SEQ 0371

120
040
125
122

103
103
105
000

040
120
122

056652
000000
000
000

002020

052312

PFECDT:

.EVEN
.WORD

$TESTN,ERRPC,CPSAVE,O

iR-C
iR-C

000

PFECDF:

.BYTE

0,0,0,0

iR-C

CVMUAARQ MSV11-J MEHORY DIAG.

ROUTINE ERROR MESSAGE TYPEOUT

13276
13277
13278
13279 052736
052736
052742

13280 052744
13281
13282
13283
13284
13285 052746
052746
052752
13286 052754
13287
13288
13289
13290
13291 052756
052756
052760
13292 052762
13293 052766
12294 052772
052772
13295 053000
053000

13296 053004
13297 033010
13298 053014
053014
053016
13299 053020
053020
13300 053024
13301
13302
13303
13304
13305 053026
053026
053030
13306 053032
13307 053036
13308 053042
053042
13309 033050
13310 053054
13311 033060
0353060

053062
13312 053064

J13

MACRO v05.01b Friday 15-Feb-85 16:10

Page 428

SEQ 0372
;08856 EEE SRS SRR RSB EAL A RSN LR SRR

;o%% OCTAL »%x

Lt 2117 i 124332 233 3338333

017146
104402

TAG704:

000000

TYPOCT

a(R1),-(sSP)

TYPOC
.DSABL
RETURN

000207

CRF

s RRERRE R SRR E R R

A AR

SEEAR TR

R R

;e%% DECIMAL #xx

017146
104405

TAG71$:

000000

000207
SRR

AR AR

TYPDEC
MOV
TYPDS
.DSABL
RETURN
ARk

333 31 333 733333

a&(R1)

MOV

R EA SN SR

2333331311133

22223311131

SRS RN RR USROS

;s TYPE AN OCTAL NUMBER

; sSAVE 3(R1) FOR TYPEQUT

* ;:6G0 TYPE--OCTAL ASCIICALL DIGITS)

R R AR R A ARk

RS A

R LR AR EREEBEE RS E RS

AR AR

R KR kRS

a&(R1)
a(R1),-(SP)

R R AR RS SRR LRSS

EEREE R

G S S0

E SRR E SR AR B

B0S SO SE

SR E 2020

S eSO

EEE SR E RS ESE SISO SO S E OSRGOSO S

;;TYPE A DECIMAL NUMBER
:;SAVE a(R1) FOR TYPEQUT
; ;G0 TYPE--DECIMAL ASCII WITH SIGN

CRF

Rk R Rk KRR Rk KRR

R KRR AR

RSB E S EE SRS S

S S

G 00

Ud OO SSEees

;#%x INTERLEAVE **x
A

i i1

TAG72%:

010146
010546
013701
070127

002102
000004

012737

177777

104401

066060

004737
005037

033404
002372

002372

012605
012601
104401

332123222128t

PUSH

R1,RS

MOV
MUL
SET

BANK,R1
#4 ,R1
NOTAB

TYPE
TYPEIT
.DSABL
CALL
CLR
poe

MS5GO14
,MSGO14
CRF
TCFIG1
NOTAB
RS,R1

TYPE
TYPEIT
.DSABL
RETURN

066060

000207

ittt

it st i

MOV R1,-(SP)
MOV RS, -(SP)

; INDICATE NO

M5G014
,MSGO14
CRF

shkkkkkkkkkkkkkkkk ko kkk koo

ii ittt

VABLE TO BE PRINTED - NOW
MOV
& 1,NOTAB

MOV (SP)+,RS
MOV (SP)«,R1

;1 SPACE

ko ko kb

kb kR

k ko

kR kN kR

kR kAR kR

kR RS kS S kS b

S S

;#kk
CSR ux
[
L

TAG73¢-

010146
010546
013701
070127

002102
000004

012737
004737
005037

1777717
033600
002372

012605
012601
000207

002372

PUSH

P1,R5

MoV
MUL
SET

BANK,R1
#4,R1
NOTAB

&R
L

paopP

RETURN

NGTAB

R5,R.

MOV R1,-(SP)
MOV RS, -(SP)

MOV

#-1,NOTAB

MOV (SP).,RS
MOV (SP).,Rl

CVMJUAAQ MSV11-J MEMORY DIAG.
ROUTINE ERROR MESSAGE TYPEOQUT

13313
13314
13315
13316
13317 053066
053066

013746

053072
053074
053075

104403
002
001

053076

000207

MACRO V0S5.01b Friday

223

;es%

123323

PATTERN

22222 22232322ttt

(REEEEE

TYPOCS

MOV

TYPOS

.BYTE
.BYTE

.DSABL
RETURN
E

;o%x BANK

013746

053104
053106
053107

104403
003

13324 053110

000207

000

002102

R R

AR R

AE R R R R SRR

RSN EE S E S S SO RO OOl

REALPAT,<TYPE (0-77)>,2,2

REALPAT,-(SP)

;;SAVE REALPAT FOR TYPEOUT

;s TYPE (0-77)

;G0 TYPE--OCTAL ASCII

2
1

; : TYPE 2 DIGIT(S)
; s TYPE LEADING ZEROS

CRF

23 1328322332222 2222

232222232222

ittt

iEi

itz

#x%

TAG7S$:

sttt

=%#

TAG74%:

053100
053100

Page 428 1

SEQ 0373
A

002300

IK13

15 Feb 85 16:10

TYPOCS
MoV

BANK,<TYPE (0-176)>,3
BANK, -(SP)
; :SAVE BANK FOR TYPEOUT

TYPOS
.BYTE
.BYTE
.DSABL
RETURN

3
O
CRF

::TYPE (0-176)

::GO TYPE--OCTAL ASCII
;s TYPE 3 DIGIT(S)
; sSUPPRESS LEAGING ZEROS

CVMJAAQ MSVi1-J MEMORY DIAG.
ROUTINE ERROR MESSAGE TYPEOUT

13326
13327
13328
13329 053112
053112

177777

104401

066112

13334 053140

004737
005037

033444
002372

053150
053152
13337 053154
13338
13339
13340
13341
13342 053156
053156

012605
012601
000207

13343 053162
13344
13345

000207

13358 053242
13359
13360
13361
13362
13363 053244
053244
13364 053250

Page 429

1222222132223 3 2

2322222 323

PUSH

222

MOV
MUL

BANK,R1
#4 ,R1
NOTAB

TYPE
TYPEIT

MSGO19

I MmN

MOV R1,-(SP)
MOV RS, -(SP)

MOV

©-1,NOTAB

TCFIG2

NOTAB
R5,R1

MOV (SP)+,RS
MOV (SP).,R1

RETURN
i

CRF

POP

,M5G019

.DSABL
CALL
CLR

R1,RS

SET

002372

23332332

#ss

012737

13357 053236
053236

TAG764:

053126
13333 033134
053134

13346
13347
13348 053164
13349 053172
13350 053200
13351 053206
13352 053212
13353 053214
13354 053222
13355 053226
13356 053232

15-Feb 85 16:10

SEQ 0374
;o8 MTYPE

002102
000004

13335 053144
13336 053150

MACRO V05.01b Friday

010146
010546
013701
070127

053114
13330 053116
13331 033122
13332 053126

L13

2322222222222

2222

a2t

it it

ittt

;¥%x UNKNOWN DATA *#x
s ARk

104401

TAG77$:

067767

TYPE
TYPEIT

,MS5GO61

CRF

.DSABL
RETURN
il

R RN
AR SRR
AN RS SRS SRR RS

MSGO61

2222

222t

2Rt

ittt

ettt d

T s

1322222222330 % 3

;%% PHYSICAL ADDRESS **x%
AT

162737
013737
006237
103003
052737
012746
004737
062706

002034
060000
002102
002042

002040
002040
002042

100000
002040
056526
000002

002040

104401

056634

013737

E3 2 133

TAG78¢4
:

2333

MOV

suUB

ASR
BCcC
BIS

q?YADDoa

CALL

$0B20

MOV

ADD
TYPE
TYPEIT

.DSABL

RETURN

000207

shkkkkbRkk

314ttt

2332133333323

3233212333232

3 372332222

)

BANK ,PHYADD +2

MoV

1$:

232t 13 18

ADDRESS,PHYADD
#FIRST ,PHYADD

#BIT1S,PHYADD
#PHYADD, -(SP)

;POINTER TO DOUBLE WORD ON STACK

#2,SP

sFIX STACK

;CALL DOUBLE PRECISION CONVERSION ROUTINE

$0CT8

,$0CT8

CRF

kb kR kkkkkkk kbR

kk kb kbbb s s kbbb

bbb bbb bbb s s

;*%x OCTAL BYTE #xx
PRRRERRR R

104401

053250

017146

053254
053256
053257

104403
003
001

066107

000000

TAG79$:

AR RS EERRRRRRRRRRRRRRRRR

TYPE
TYPEIT

MSGO18
,MSGO18

.DSABL

CRF

MoV

a(R1),-(SP)

TYPOCS

TYPOS

.BYTE
.BYTE

RRARRRRRRARRRRRERREIRR RN SR A S S S S SR

;2 SPACES

@&(R1),<TYPE BYTE>,3,Z

3
1

: :SAVE a(R1) FOR TYPEOUT

;: TYPE BYTE

::60 TYPE--OCTAL ASCII

;s TYPE 3 DIGIT(S)
; s TYPE LEADING ZEROS

6 0o 4

CVMJAAQ MSV11-U MEMORY DIAG.

ROUTINE ERROCR MESSAGE TrPEQUT

MACRO V05.01b Friday

104401

13366 053264

000207

066060

Page 429 1

SEQ 0375

.DSABL

13365 053260
0532560

M13

15 Feb-85 16:10

TYPE
TYPEIT
.DSABL
RETURN

CRF

MSGO14
,MSGO14
CRF

; SPACE

CVMJAAQ MSV11-J MEMORY DIAG.
ROUTINE ERROR MESSAGE TYPEOQUT

MACRO V05.03b Friday

DETAIL: SUBTSTY
;08808

SSSSES

s Pt
P2 0me f

=0 3t 4t

Od L Ll Wl i

PR
LN -

L X X R Y

; sSUBTEST

033312
053316
13417 033322
053322
13418 053330
13419 053334
13420 033340
13421 033344
13422 053346
13423 053350
13424 033332
13425 053354
13426 053356
13427 033362
13428 033366
13429 053372
053372
13430 033400
13431 053402
13432 053404
053404
053410
13433 033414
053414
13434 053422
13435 053426
053426
13436 053434
13437 053436
13438 053444
13439 053446
13440 053452
053452
053456

13441
13442 053462
13443 053466

005237
022737
101473
022737
001435

;0888888 SES

002220
000003

002220

000002

002220

013746
013746

002612
002110

012737
005037
010037
012700
010120
010220
010320
010420
010520
013720
013720
013700

177777
002110
002200
002202

012737
104013
000423

177777

013746
013746

002612
002110

012737
005037

177777

002612

002430

2%:

012737
104031
022737
001002
005037

177777

002430

000005

004010

012637
012637

002110
002612

004737
000207

053266

177766

1¢:

A RS RN RSB NS

CLR

MUT

R4,(RO).
RS,(RO).
ERRSP, (RQO)+
ERRPSW, (RO)+

SET

NOERROR

PUSH

MOV HEADER, -(SP)
MOV MUT,-(SP)
MOV

@-1,HEADER

MOV

#-1,NOERROR

HEADER,MUT

CLR
SET

MUT
NOERROR

ERROR
cMp
BNE
CLR

+31
#5,PROTYP
14
CPUERR

MUT, HEADER

; WARNING RECURSIVE

RETURN

ETE SO RSB EeRbRIte GOt

«13
14

HEADER

CALL

AR E RS

DETRO,RO

SET

POP

RN RE NSRSV REE

PSSR RENROINGIGROOER

RO,DETRO
#DETR1,RO
R1,(RO).
R2,(RO).
R3,(RO).

MOV
MoV
MoV
MoV

ERROR
BR

RRA

HEADER,MUT

HEADER

MOV

002200

DETAILED ERROR REPORT

DETFLAG
#3,DETFLAG
44
92 ,DETFLAG
24

SET
MOV
MoV
MOV
MOV
MOV

002024

DETAILED ERROR REPORT>>

SUBR

PUSH

002612

<<SUBR

S S SR RN SIS SRS SRR SRS RSRNRS SR EEREREEERRTC SN G RE S

N EEE AL SRR

INC
cHe
BLOS
cre
8EQ

002030

002110

Page 432

SEQ 0376

13410 053266

053266
033272
033300
033302
053310
033312

N13

15-Feb-85 16:10

DETAIL

MOV HEADER, -(SP)
MOV MUT,-(SP)
MOV

0-1,HEADER

MOV

#-1,NOERROR

;IS THIS AN 11/83 ?

MOV (SP).,MUT
MOV (SP).« HEADER

CVMJAAO MSV11-J MEMORY DIAG.
| SUBR
DETAILED ERROR REPORT

13446
13447 053470
13448
13449
13450 033474
053474
053300
053504
13451 053506
053506

004737

002150
002152

104401

067745

053512

104401

002660

13453 053516
13454 053522
053522
13455 053522
053522
053526
13456 053526
13457 053530
053530
13458 053532
13459 053534
053534
053540

013701

002224

013746
104402

002150

13460 053542
053542

104401

066107

13452 053312

13461 053546
053546
13462 053546
053546
053550
13463 053552
053552
053560
053566
053570
13464 053570
053570
13465 053570
053570
053572
053576
13466
13467
13468 053602
053602
053604
13469 053606
053606
13470 053612
13471 053616

005037

MACRO v05.01b Friday

4%
:

;SIMAATE CONTROL

Page 434

; TYPE CONTENTS OF ALL
PUSH
CSR,CSRNO,R1

TYPE
TYPEIT

;:DISPLAY "DISPLAY"* INFO
CSR'S

MOV CSR,-(SP)
MOV CSRNG, -(SP)
MOV R1,-(SP)

MSGO58

,M5GOS8

CRF
$CRLF

.DSABL

TYPE

. $SCRLF

TYPEIT
.DSABL

CRF
MOV
TOTCSRS,R1
BEGIN DUMPCSRLOOP
FOR CSRNO

002152

ASL

ON.ERROR

103006
104426

MOV
TYPOC

#0 TO #36 BY

TYPEIT

B103:;;:;::::

CLR CSRNO
B104:;;:;;:;:;

READCSR
TYPOCT
CSR
CSR, -(SP)

.DSABL _ CRF

BCC L517

: sSAVE CSR FOR TYPEQUT
::G0 TYPE--OCTAL ASCIICALL DIGITS)

TYPE
MSGO18
,MSGO18

;@ SPACES

CRF
.DSABL
END ;OF ON.ERROR

IF Rl EQ #0 THEN LEAVE DUMPCSRLOOP

005701
001407

003757

CONTT

CALL

006301

062737
023727

15 Feb 85 16:10

SEQ 0377

055152

013746
013746
010146

Bl4a

000002

002152

002152
000036

END

;0OF FOR CSRNO

ADD #2,CSRNQ

CMP CSRNO, 836
BLE B104

E104:;:;;::::

END DUMPCSRLOOP
PoP

012601
012637
012637

R1,CSRNO,CSR

MOV (SP).,R1
MOV (SP)+,CSRNO
MOV (SP).,CSR

002152
002150
; TYPE STACKS
PUSH
RO,R1

010046
010146

104401

070336

013701
162701

002574
000002

TST Rl
BEQ €103

TYPE
TYPEIT

MSGO88
,MSGO88

MOV

KSTACK,R1

.DSABL

suB

CRF

#2,R1

MOV RO, -(SP)
MOV R1,-(SP)
sIKERNEL

STACK

CVMJARO MSV11-J MEMORY DIAG,
SueR
DETAILED ERROR REPORT
13472 053622
053622
053624
13473 053624
053624

13474 053630
053630
053632

13475 053634

104401

13476 053640
053640
053642

011046
104402

13486 053710
053710
053714
13487 053716
053716
13488 053716
053716

13489 053722
053722

FOR

002456
030000
010000

020027
002016

000740

011046
104402

13492 053736
053736
053742
053746

062700
020027
003763

TO R1

B10S::;::::

; :SAVE RO FOR TYPEQUT

; ;G0 TYPE--OCTAL ASCII(ALL DIGITS)
;2 SPACES

: :SAVE (RO) FOR TYPEQUT

::GO TYPE--OCTAL ASCII(ALL DIGITS)
ADD #2,R0O
CMP RO,R1

;SET PREVIOUS MODE TO SUPERVISOR

177776
177776

ST
BNE
BIC
BIS
MFPI

NOSUPER
ODET1
#BIT13:!8IT12,PSW
#8IT12,PSW
Ssp
R1,RO

MOV (SP).,R1

070354

1349} 053732
053732
053734

CRF

POP

104401

BLE 8105

012601
012600

13490 053726
053726

TYPE
MSG018
TYPEIT
O18
,MSG
.DSABL
CRF
TYPOCT
(RO)
MoV
(RO),-(SP)
TYPOC
CRF
.DSABL
END ;OF FOR RO

066107

005737
001036
042737
052737
006506

010046
104402

.DSABL

000002

053724

Page 434

TYPE
$CRLF
TYPEIT
. $CRLF
CRF
.DSABL
RO
TYPOCT
MoV
RO, -(SP)
TYPOC

002660

062700
020001
003764

104401

16:10

MOV SP.RO

010046
104402

104401

Cl4

15 Feb 85

SEQ 0378

010600

053634

13477 053644
053644
053650
053652
053654
13478
13479 053654
13480 053660
13481 053662
13482 053670
13483 053676
13484 053700
053700
053702
13485 053704
053704

MACRO V05.01b Friday

TYPE
TYPEIT
.DSABL

MSGO89

; SUPERVISOR STACK

éggGOB9

IF RO LT #SUPSTK
FOR RO

002660

066107

TYPOCT
RO
MOV
RO, -(SP)
TYPOC
CRF
.DSABL
TYPE
MSGO18
TYPEIT
,MSGO18

.DSABL

B106:;;:::;

$CRLF

CRF

; : SAVE RO FOR _TYPEOUT
;G0 TYPE--OCTAL ASCII(ALL DIGITS)
:2 SPACES

CRF

TYPOCT
(RO)
MoV
(RO),-(SP)

000002
000736

CHMP RQ,#SUPSTK
BGE L520

:= RO TO #SUPSTK-2 BY #

TYPE
TYPEIT
,$CRLF

MOV (SP)+,RO

TYPOC
CRF
.DSABL
END ;0F FOR RO

; :SAVE (RO) FOR TYPEQUT
;:60 TYPE--OCTAL ASCIICALL DIGITS)

AOD #2,R0

CMP RO,8SUPSTK-2
BLE B106

CVMJAAO MSV11-J MEMORY DIAG.
SUBR
DETAILED ERROR REPORT
053750
13493 053750
053750
053752
13494 053752
053752

13495 053756
053756
13496
13497 053756
13498 053764
13499 053766
053766
13500 053770
053770
13501 053774
053774
054000
13502 054002
054002
13503 054002
054002

104401

070376

020027
002016

000700

104401

002660

104401

13507 054022
054022
054026
054032
054034
13508 054034
054034
054036
13509 054036
054036
13510 054042
054042
13511 054042
054042
13512 054046
13513 054052
054052
13514 054054

030000

104401

13505 054012
054012

054020

TYPE
TYPEIT

070412

012600

010046
104402

066107

000002
000676

CRF

.DSABL

177776

DET1:

;IS EMPTY

;OF IF RO

; SET PREVIOUS MODE TO USER

BIS

#BIT13!8IT12,PSW

MFPI
PoP

usP
RO

TYPE

MSG0O90

TYPEIT
,MSG090
CRF
.DSARBL
IF RO LT #USESTK
:=

RO TO #USESTK-2 BY

TYPE
$CRLF
TYPEIT
,$CRLF
CRF
.DSABL
TYPOCT
RO
MoV
RO, -(SP)
TYPOC
CRF
.DSABL
TYPE
MSGO18
TYPEIT
,MSGO18

.DSABL

CRF

MOV

(RO)J,-(SP)

TYPOCT

TYPOC
CRF
.DSABL
END ;OF FOR RO

104401

070412

104401

002660

005037

002220

MOV (Sk)+,RO

;USER STACK

(RO)

CMP RO, SUSESTK
BGE LS522

; s SAVE RO FOR TYPEQUT
; ;GO TYPE--OCTAL ASCIICALL

DIGITS)

;2 SPACES

; ;SAVE (RO) FOR TYPEQUT
;360 TYPE-

OCTAL ASCIICALL DIGITS)

ADD #2,R0

CMP RO,SUSESTK-2
BLE B107
ELSE

000402

012600
000207

MSGO91
,MSGO91

FOR RO

011046
104402
062700
020027
003763

Page 434-2

ELSE

END

052737
006506

D14

15-Feb-85 16:10

SEQ 0379

000402

13504 054006
054006
054010

13506 054016
054016

MACRO V0S5.01b Friday

)

TYPE
TYPEIT

MSGO91
,MSGO91

TYPE
TYPEIT
.DSABL

$CRLF
,$CRLF
CRF

BR L523

;IS EMPTY

CRF
.DSABL
END ;OF IF RO

CLR

POP

RETURN

DETFLAG

MOV

(SP).,RO

CVMJAAQ MSV11-U MEMORY DIAG.

HMACRO V05.01b Friday

ROUTINE BINARY TO OCTAL (ASCII) AND TYPE

Peage 437

SEQ 0380

.SBTTL
Rl

ROUTINE BINARY TO OCTAL

(ASCII) AND TYPE

LTIy

;#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT
;#*OCTAL (ASCII) NUMBER AND TYPE 1IT.
;#$TYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE
:
;#CALL
R

MoV
TYPOS
.BYTE
.BYTE

:
;
.

’

[
.

NUM,

(SP)

; :NUMBER TO BE TYPED
; sCALL FOR TYPEQUT
;:N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE
;sM=1 OR O

N
M

::1=TYPE LEADING ZEROS
; ;0=SUPPRESS LEADING ZEROS

LK 2R 3

13552
13553
13554
13555
13556
13557
13558
13559
13560
13561
13562
13563
13564
13565
13566
13567
13568
13569
13570
13571
13572
13573
13574
13575
13576
13577 054056
13578 054062
13579 054070
13580 054074
13581 054100
13582 054102
13583 054110
13584 0541316
13585 054124
13586 054126
13587 054130
13588 054132
13589 054136
13590 054140
13591 054144
13592 054150
13593 054154
13594 054160
13595 054162
13596 054164
13597 054166
13598 054170
13599 054172
13600 054174
13601 054176
13602 054200
13603 0354204
13604 054206
13605 054212
13606 054214
13607 054216
13608 054220

El4

15-Feb-85 16:10

#$TYPON----ENTER HERE

;#$TYPOS OR $TYPOC
;#CALL:
i
MOV
NUM, -(SP)
i
TYPON

TYPE

OUT

WITH THE

SAME PARAMETERS

THE

; ;NUMBER TO BE TYPED
; :CALL FOR TYPEOQUT

;téxztoc---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER
H

017646
116637

112637

062716
000406

112737
112737
112737
010346

000000
000001
054303
000002
000001
000006
000005

010446

010546
113704
005404
062704
110437
113704
016605
005003
006105
000404
006105
006105
006105
010503
006103
105337
100016

042703
001002
005704
001403
005204

054303

054301

054301
054303
054300

TYPOC

$TYPOS:

MOV
MOVB
MOVB
ADD
BR
$TYPOC: MOVB
MOVB
$TYPON: MOVB
MOV
MOV
MOV

000006
054302
054301
000012

14:

2%:

054302

MOV

1717770

NUM, -(SP)
a(SP),-(SP)
1(SP), $OFILL
(SP)+,$0MODE+1
#2,(SP)
$TYPON
#1,80FILL
#6, $OMODE -1
#5, $OCNT
R3,-(SP)
R4,-(SP)
R5,-(SP)

; ;NUMBER TO BE TYPED

; ;CALL FOR TYPEOUT

; ;PICKUP THE MODE
;;LOAD ZERO FILL SWITCH
;;NUMBER OF DIGITS TO TYPE
; ;ADJUST RETURN ADDRESS

;:SET THE ZERO FILL SWITCH

;;SET FOR SIX(6) DIGITS

;:SET THE ITERATION COUNT
; ; SAVE R3
; ;SAVE R4
: :SAVE RS

nggB

égHODEOI.Rd

;;GET THE NUMBER OF DIGITS TO TYPE

ADD
MOVB
MOVB
MOV

#6,R4
R4, $OMODE
$OFILL ,R4
12(SP),RS

; ;SUBTRACT IT FOR MAX. ALLOWED
: ;SAVE IT FOR USE
;3;GET THE ZERO FILL SWITCH
; ;PICKUP THE INPUT NUMBER

(LR
ROL
BR
ROL

R3
RS
33
RS

; ;CLEAR THE OUTPUT WORD
; ;ROTATE MSB INTO “C"
; ;G0 DO MSB
; ;FORM THIS DIGIT

ROL
DECB
BPL
8IC
BNE
TST

R3
$0MODE
6
#177770,R3
44
R4

:3GET LSB OF THIS DIGIT
:: TYPE THIS DIGIT?
;;BR IF NO
:;GET RID OF JUNK
:;TEST FOR O
: s SUPPRESS THIS 0?

ROL
ROL
MOV

BEQ
INC

RS
RS
RS5,R3

5¢
R4

::BR IF YES
: :DON'T SUPPRESS ANYMORE 0°S

LAST

(ASCII) AND TYPE

13609 054222
13610 054226
13611 054232
13612 054236
054236

052703
052703
110337

000060
000040
054276

104401

054276

13613 054242
13614 054246
13615 054250
13616 054252
13617 054254
13618 054256
13619 054260
13620 054262
13621 054264
13622 054272
13623 054274
13624 054276
13625 054277
13626 054300
13627 054301
13628 054302

105337
003347
002402
005204
000744
012605
012604
012603
016666
012616

054300

000002
000
000
000
000
000000

Peage 437-1

SEQ 0381
S¢:

6$:

7¢:

000002

Fl4

15-Feb-85 16:10

000004
8$:

$OCNT:
$OFILL:
$OMODE
:

BIS
BIS

Move
TYPE
TYPEIT

.DSABL
DECB
B8GT
BLT
INC
BR
MOV
MOV
MOV
MOV
MOV
RTI

.BYTE
.BYTE
.BYTE
.BYTE
.WORD

#'0,R3
# ,R3
R3,8$
8%
.84
CRF
$OCNT
24
74
R4
2%

(SP)+,R5

(SP)+,R4
P)+,R3

m~h~
wn~w;m

RUUTINE BINARY TO OCTAL

MACRO V05.01b Friday

SP),4(SP)
P)+,(SP)

QCQOO0O0O0

CVMJAAQ MSV11-J MEMORY DIAG.

: sMAKE THIS DIGIT ASCII
: sMAKE ASCII

NOT

; iSAVE FOR _TYPING
:;G0 TYPE THIS DIGIT

ALREADY

; ;COUNT BY 1
; :BR IF MORE TO DO
; :BR IF DONE
: s INSURE LAST DIGIT ISN'T A BLANK
;GO DO THE LAST DIGIT

; sRESTORE
; ;RESTORE
; ;RESTORE
;:SET THE
; ;sRETURN

RS
R4
R3
STACK FOR RETURNING

; :STORAGE FOR ASCII DIGIT
; : TERMINATOR FOR TYPE ROUTINE
; ;OCTAL DIGIT COUNTER
;s ZERO FILL SWITCH
; :NUMBER OF DIGITS 10 TYPE

CVMJARO MSV11-J MEMORY DIAG.

Gl4

MACRO V0S.0lb Friday 15 Feb 85 16:10

ROUTINE CONVERT BINARY T0 DECIMAL AND TYPE

13620

.SBTTL

13631

Page 438

SEQ 0382

ROUTINE CONVERT BINARY TO DECIMAL AND TYPE

It 222222223 2223 2222202222233 2222

2 2322 233202

3321

332313333131

13632
13633
13634
13635
13636
13637

:#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER T0 A S-DIGIT
:#SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE
:#NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED
;#BEFORE_THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE
:#REPLACED WITH SPACES.
;#CALL:

13639

13638

13640 054304
054204
054306
054310
054312
054314
13641 054316
13642 054322
13643 054326
13644 054330
13645 054332
13646 054340
13647 054342
13648 054346

010046
010146
010246
010346
010546
012746
016605
100004
005405
112766
005000
012703

13650 054354
13651 054360
13652 054362
13653 054364
13654 054366
13655 054370

016001
160105
002402
005202
000774
060105

112723

13649 054352 005002

13656 054372
13657 054374
13658 054376
13659 054400

005702
001002
105716
100407

13667
13668
13669
13670
13671
13672

103003
116663
052702
052702
110223
005720
020027
002746
003002
010502
000764
105726

13660 054402
13661 054404
13662 054406
13663 054414
13664 054420
13665 054424
13666 054426

13673
13674
13675
13676

054430
054434
054436
054440
054442
054444
054446
054450
054456
054460

054460
054462
054464

012605
012603
012602

054470

012600

054466

012601

TYPDS

§TYPDS: PUSH

020200
000020
000055

000001

054520
000040

1%:

24:

054510

3$:

4s:

106316

100003
116663
105013

MOV

54
000001
000060
000040

177777

6%:
7%:

000010

8%:
177777

177776

9s:

NUM, - (SP)

RO,R1,R2,R3,RS

MOV
MOV
BPL
NEG
MOVB
CLR
MOV

#20200,-(SP)
20(SP),RS
1
RS
#'-,1(SP)
RO
#$DBLK,R3

CLR

MOVB
MOV
SUB
BLT
INC
BR
ADD

75T
BNE
1STB
BMI

ASLB

BCC
MOVE
BIS
BIS
MOVB
TST
CHP
BLT
BGT
MOV
BR
TSTB

BPL
MOVB
CLRB
POP

,(R3)s

$DTBL(RO),R1
R1.RS
43
R2
3
R1,RS

::PUT_THE BINARY NUMBER ON THE STACK
;160 TO THE ROUTINE

MOV
MOV
MOV
MOV
MOV

;;SET BLANK SWITCH AND SIGN
::GET_THE INPUT NUMBER
::BR IF INPUT IS PQS.
: iMAKE THE BINARY NUMBER POS.
i iMAKE THE ASCII NUMBER NEG.
: :ZERO_THE CONSTANTS INDEX
: :SETUP THE OUTPUT POINTER
:1SET THE FIRST CHARACTER TO A BLANK

RO, -(SP)
R1,-(5P)
R2,-(SP)
R3,-(SP)
RS, -(SP)

: iCLEAR THE BCD NUMBER

;;GET THE CONSTANT
: iFORM_THIS BCD DIGIT
: iBR_IF DONE
; : INCREASE THE BCD DIGIT BY 1

R2
53
(SP)
7%

:;ADD _BACK THE CONSTANT
: ;CHECK_IF BCD DIGIT=0
; sFALL THROUGH IF 0
:;STILL DOING LEADING 0'S?
:iBR_IF YES

63
1(SP),-1(R3)
4'0,R2
8 ,R2
R2,(R3).
(RO)+
RO, #10
24
83
RS.R2
63
(SP)+

::BR_IF NO
;;YES--SET THE SIGN
: iMAKE THE BCD DIGIT ASCII
:sMAKE IT A SPACE IF NOT ALREADY A DIGIT
: iPUT_THIS CHARACTER IN THE OUTPUT BUFFER
: :JUST INCREMENTING
: iCHECK THE TABLE INDEX
::60 DO THE_NEXT DIGIT
::60_TO EXIT
:1GET THE LSD
::60 CHANGE TO ASCII
: 1WAS THE LSD THE FIRST NON-ZERO?

(SP)

9
-1(SP),-2(R3)
(R3)
RS,R3,R2,R1,R0

: 1MSD?

:iBR_IF NO
;:YES- SET THE SIGN FOR TYPING
::SET THE TERMINATOR

MOV (SP)+,RS
MOV (SP)+.R3
MOV (SP)+.R2

MOV (SP)..R1

MOV (SP).,.R0

H14

MACRO V05.01b Friday 15-Feb-85 16:10
CVMJAAQ MSV11-J MEMORY DIAG.
ROUTINE CONVERT BINARY TO DECIMAL AND TYPE

13677 054472
054472

13678 054476
13679 054504
13680 054506
13681 054510
13682 054512
13683 054514
13684 054516
13685 054520
054526

104401

054520

016666
012616
000002
023420

000002

000004
$0TBL:

001750
000144

000012
000000
000000

000000

$DBLK:

TYPE
TYPEIT
.DSABL
MOV
MOV
RTI
10000.
1000.

100.
10.

.WORD

$DBLK
, $DBLK

CRF
2(SP),4(SP)
(SP)+,(SP)

0,0,0,0

Page 438 1}
; sNOW TYPE THE NUMBER

; : ADJUST THE STACK
; :RETURN TO USER

SEQ 0383

CVMJAROD MSV11-J MEMORY DIAG.

ROUTINE TTY INPUT

13687
13688
13689
13690
13691
13692
13693
13694 054530
13695 054530
13696 054534
13697 054536
13698 054542
13699 054546
13700 054552
13701 054556
13702 054560
13703 054564
13704 054570
13705 054574
13706 054576
13707 054602
13708 054606
13709 054610
13710 054614
13711 054620
13712 054622
13713 054626
13714 054630
13715 054634
13716 054640
13717 054642
054642

13718
13719
13720
13721
13722
13723
13724
13725
13726

054646
054652
054654
054662
054664
054670
054672
054676
054700
054700

Page 439

ROUTINE TTY INPUT
T

;*SOFTWARE SWITCH REGISTER CHANGE ROUTINE.

;sROUTINE IS ENTERED FRCM THE TRAP HANDLER, AND WILL
;#SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL
;WHEN OPERATING IN TTY FLAG MODE.
005737

047246

013746
005037
000137

047246
047246
054570
126064

001406

105777
100136
117746
042716
022716
001002
004737
022716
001002
004737
022716
001454
022716
001002
004737
022716
001005

041054
000024

1%:

055152
000003

164 :

000023

2%:

055226
000013

17¢:

055144

013706
000207
022737
001075
022716
001072
005737
001067

002146

000176

13728 054710
054710
054714

017746
104402

125722

105777

002636

6%:

002062

055755

$GTSWR:

055766

125710

.ENABLE LSB

157
BEQ
MoV
CLR
JMP
T7ST8B
BPL
MOVB
BIC
CMP
BNE
CALL
CMP
BNE
CALL
CMP
BEQ
cMP
BNE
CALL
CMP
BNE
TYPE

XOCHAR
NOCH
XOCHAR, -(SP)
XOCHAR
CONTS1
F$TKS
SWREND
a$TKB, -(SP)
#1C177,(SP)
#6,(SP)
14
FIELDSERVICE
#24,(SP)
164
CONTT
#3,(SP)
5%
#23,(SP)
17¢
CONTS
13,(SP)
6%
$CNTLK

.DSABL
MoV
RETURN

CRF
CTLKVEC,
SP

BNE
cMP
BNE
TS7
BNE
TYPE
TYPEIT
.DSABL
TYPE
TYPEIT
.DSABL
TYPOCT
Mov
TYPOC
.DSABL
TYPE
TYPEIT
.DSABL

CKEND
#7,(SP)
CKEND
$AUTO
CKEND
$CNTLG
,$CNTLG
CRF
$MSWR
, $MSWR
CRF
@SWR
aSWR, (SP)

CRF

CLR

-(SP)

TYPEIT

000007

104401

005046
005046

NOCH:

CONTS1:

104401

$CKSWR:

126060
177600
000006

054704

13730 054722
13731 054724
13732 054726

16:10

SEQ 0384
.SBTTL

055750

13729 054716
054716

15 Feb 85

104401

13727 054704

MACRO VOS5.01b Friday

114

CMP

3s$:

CLR

TST8

,$CNTLK

#SWREG, SWR

CRF
$MNEW

; ;SOMETHING THERE?
:: GO ON IF NOT
3 USE IT
; ;CHAR THERE?
;:IF NO, DON'T WAIT AROUND

; ;SAVE THE CHAR
::STRIP-OFF THE ASCII
;IS IT CONTROL F?
;NO SKIP

;IS IT CONTROL T?
:NO - SKIP
;YES - CALL CONTROL T ROUTINE
;IS IT CONTROL C?

s YES EXIT #»#4#«NOTE#+#++ STACK IS SCREWFD UP!

;IS IT CONTROL S?
;NO - SKIP
;YES - CALL CONTROL S ROUTINE
;IS IT CONTROL K?

:NO - SKIP
:TYPE A

;RESET KSP TO AFTER PATTERN EXEC ROUTINE
;RETURN TO PATTERN EXEC ROUTINE
;:IS THE SOFT-SWR SELECTED?
; iBRANCH IF NO
::;IS IT A CONTROL G?
; ;NO,

RETURN TO USER

;ARE WE RUNNING IN AUTO-MODE?
;BRANCH IF YES

; ;ECHO THE CONTROL-G (1G)
;s TYPE CURRENT CONTENTS

;;0F THE SWR

; s SAVE @SWR FOR TYPEQUT
; ;G0 TYPE--OCTAL ASCII(CALL DIGITS)

; :PROMPT FOR NEW SWR

, $MNEW

-(SP)

A$TKS

; ;CLEAR COUNTER
; ; THE NEW SWR

: ;CHAR THERE?

CVMUARQ MSVili-J MEMORY DIAG.
ROUTINE TTY INPUT

MACRO V05.01b Friday

100375
117746
042716
021627
001006

125704
177600
000003

104401

055736

13739 054756
13740 054762
13741 054766
13742 054772
13743 054774
054774

062706
000137
021627
001005

000006
040534
000025

104401

055743

13744 055000
13745 055004
13746 055006
13747 055012
13748 055014
13749 055020
13750 055022
13751 055030
055030
055034
13752 055036
13753 055042
055042
055044
13754 055044
13755 055050
055050
13756 055050
055050

062706
000746
021627
001024
005766
001403
016677

000006

84:

000015

9$:

13757 055054

005737
001403
062706

104401
000002

::IF NOT TRY AGAIN

8IC

#1C177.(SP)

; ;MAKE IT 7-BIT ASCII

CcMP

5¢:

74:

125606

10%:

000010

.DSABL
ADD
JMP
CMP
BNE

CRF
$#6,5SP
QUIT
(SP),#25
94

TYPEIT

TYPE
TYPEIT

SWREND:

,$CNTLC

$CNTLUY

TYPEIT
,$CNTLU
CRF
.DSABL
ADD
#6,SP
BR
34
CMP
(SP),#15
BNE
134
18T
4(SP)
BEQ
104
MOV
2(SP),aSWR
IF SWRFLG IS TRUE

END

002660

(SP), a3

74
$CNTLC

ADD
ELSE

000006

a$TKB, -(SP)

BNE
TYPE

TYPE

000402

062706

Page 439-1

BPL

MOVE

000004

002566

15-Feb-85 16:10

SEQ 038S

13733 054732
13734 054734
13735 054740
13736 054744
13737 054750
13738 054752
054752

000002

J14

.DSABL
RTI

¢6,SP

; ;PICK UP CHAR

;3IS IT A CONTROL-C?

; sBRANCH IF NOT
;:YES, ECHO CONTROL-C (tC)

; ;CLEAN UP STACK
: ;sCONTROL-C HALT

;:IS IT A CONTROL-U?
; iBRANCH IF NOT

;:YES, ECHO CUNTROL-U (tU)
; ; IGNORE PREVIOUS TNPUT
;:LET'S TRY IT AGAIN
:3IS IT A <CR>?
; ;BRANCH IF NO
:3YES,

IS IT THE FIRST CHAR?

; ;BRANCH IF YES
; :SAVE NEW SWR

TST SWRFLG

:;CLEAR UP STACK

#10,5P

:;CLEAR UP STACK

$CRLF
,$CRLF

; ;ECHO

CRF

BEQ L524

<CR>

: sRETURN

AND

BR LS2S
LS24:;;::::

<LF>

LS2S:::::::

CVMJUAARO MSV11-J MEMORY DIAG.

ROUTINE

TTY INPUT

13758 055056
13759 055062
13760 055064
13761 055070
13762 055074
13763 055076
13764 055102
13765 055104
13766 055110
13767 055114
13768 055116
13769 055120
13770 055122
13771 055124
13772 055130
13773 055134
13774 055136
055136

13775 055142
13776 055144
055147
13777
13778

062706
000002
004737

021627

002420
021627
003015
042726
005766
001403
006316
006316
006316
005266
056616
000674

104401
000716

136

012

MACRO V05.01b Fridey

CKEND:

047250
000060

13$:

000067
000060
000002

ADD
RTI

CALL
CHP
BLY
CHP
BGT
BIC
757
BEQ
ASL

ASL

000002
177776

144:
154

002657

000

Page 439-2

SEQ 0386

000002

113

K14

15-Feb-85 16:10

01S

$CNTLK::

ASL

INC
BIS
BR
TYPE
TYPEIT
.RSABL
B
.ASCIZ

.EVEN
.DSABL

#2,5P
$TYPEC

(SP),#60
1S¢
(SP),#67
154

#60,(SP)«

2(SP)
14$

(SP)
(SP)
(SP)
2(SP)
-2(SP),(sP)

$QUES

, $QUES

CRF
8$
/tK/<15>¢<12>

LSB

;sFIX STACK
;RETURN
; ;ECHO CHAR

:;CHAR < 0?
; ;BRANCH IF YES
::CHAR > 7?7

; ;BRANCH IF YES
: :STRIP-OFF ASCII
::IS THIS THE FIRST CHAR
; ;BRANCH IF YES
; ;NO, SHIFT PRESENT
CHAR OVER TO MAKE
i
i
ROOM FOR NEW ONE.
; ;KEEP COUNT OF ChAR
;;SET IN NEW CHAR
; ;GET THE NEXT ONE
;: TYPE

2<CR><LF>

: ;SIMULATE CONTROL-U
;CONTROL K ASCII STRING

CVMJAAQ MSV11-J MEMORY DIAG.
ROUTINE TTY INPUT

L14

MACRO V05.01b Fridey 15 Feb 85 16:10

SEQ 0387

CONTY:

13781 055152

SUBTST

13793 055160
055160

055164

13794 055166
055166

<<CONTROL T»>>

;06 SR ER AR AR LS SR

; sSUBTEST
13782 055152
055152
13783 055154
055154

SRR S FNRER

CONTROL T

Ai 2131333233223 3

PUSH

010046

Page 441

SRR E RS ER NN RSB AA RSN ESENENEC OB EEEEN GO E

3333013223222 2

2233122

220

22212

104401

002660

005737
001402

002126

104401

070424

TYPE
MSG092
TYPEIT
,MSGO92

;RELOCATED

TYPE
TYPEIT

=
:BANK

13797 055176
055176
055202
055204
055205

013746
104403
003
000

002102

13798 055206
055206

104401

070446

TYPEIT

002300

TYPOCS
REALPAT, .2
; TYPE 2 DIGITS
MOV
REALPAT, -(S°)
; s SAVE REALPAT FOR TYPEOUT
TYPOS
;3:GO_TYPE--OCTAL ASCII

055222
13804 055224
13805

012600
000207

BEQ L526

CRF
.DSABL
END ;OF IF RLFLAG

070440

13803 055222

TST RLFLAG

104401

013746
104403
002
000

MOV RO, -(SP)

TYPE
$CRLF
TYPEIT
,$CRLF
CRF
.DSABL
IF RLFLAG IS TRUE

13795 055172
05517~
13796 055172
055172

13799 055212
055212
055216
055220
055221

RGO ORGOOS

MSG093
,MSGO93
CRF

.DSABL
TYPOCS
BANK,
,3
; TYPE 3 DIGITS
MoV
BANK, -(SP)
; ;SAVE BANK FOR TYPEOUT
TYPOS

.BYTE
.BYTE
.DSABL
TYPE

3
O
CRF
MSGO9S

.DSABL

CRF

.BYTE
.BYTE
.DSABL

2
O
CRF

pPOP

RETURN

,MSGO95

::60 TYPE--OCTAL ASCII
;s TYPE 3 DIGIT(S)
: ;SUPPRESS LEADING ZEROS
;PAT=

;3 TYPE 2 DIGIT(S)
; i SUPPRESS LEADING ZEROS

MOV (SP).,RO

CVMJUAAO MSV11-J MEMORY DIAG.
CONTROL S & CONTROL Q

MACRO V05.01b Friday

SUBTST

s ESES SRR

125402
177600

021627

000021

001003
000137
000401
000762

125406

054570

«<<CONTROL S & CONTROL Q>>

CONTROL S & CONTROL Q

SRR S RS SR RS AR S AR AR A AR

012600
105777
100375
117716
042716

Page 44}

R AR RS AR R RS XS AR R RN SRR SRV R ARV RS USRS LR RGE 002

;sSUBTEST
13807 055226
055226
13808 055230
13809 055234
13810 055236
13811 035242
13812 055246
055246
055252
13813 055254
13814 055260
055260
055262
13815 055262
13816 055264
055264

16:10

SEQ 0388

CONTS:

13806 05226

15 Feb 85

M14

CONTS2:

R AR AR R R R R R

SRR B

R AR

EREEC RS EE R R

E 00O

S EER0O0CE200 OGO

C S E SR GGV LSS SO OO0 G OSSN

POF

;GET RID OF RETURN ADDRESS FROM STACK

1518
BPL
MOVB

a$TKS
CONTS2
d$TKB, (SP)

;WAIT FOR CHARACTER

B81C

#1C177.(SP)

IF (SP) EQ #21

JMP
ELSE

CONTS1

BR
CONTS2
END ;OF IF (SP)

;REPLACE OVER OLD CHARACTER ON STACK

;STRIP ALL BUT ASCII

;IF IT IS A CONTROL Q

CMP (SP),021
BNE LS27
BR LS30
LS527:;;5::3:
LS30:::::::

CVMJAAD MSV11-J MEMORY DIAG.
CONTROL S & CONTROL @Q

N14

MACRC V05.01b Fridey 15-Feb-85 16:10

13818

%ggég

SEQ 0389

IINImMmM I TIInITTTTTM

ImMmMmM

T I

:té:{f ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

13821

;¥

13822
13823
13824
13825
13826 055264
13827 055266

011646
016666

13829
13830
13831
13832

100375
117766
042766
026627

13828 055274

055300
055302
055310
055316

i
;
;

105777

13833 055324
13834 05?326
13835 0 5332

001013
105777
100375

13837 055340
13838 055344

042716
022627

13836 0° "334

117746

000004

125342

125336
177600
000004

000002

125310

125304

177600
000021

026627

000004

000021

13843 055364

026627

000004

000140

13845 055374
13846 055402
13847 055404
13848 055412

026627
003003
042766
000002

000004

000175

000040

000004

13842 055362

13844 055372

136‘9

001744

002407

ROCHR

15718

3$:

SRS

13850

3$TKS

34TKB,-(SP)

;s WAIT FOR

34
d$TKS
24

; ;A CHARACTER
; ;READ THE TTY
;;GET RID OF JUNK IF ANY
;3IS IT A CONTROL-S?
; ;BRANCH IF NO
;: s WAIT FOR A CHARACTER
;:LOOP UNTIL ITS THERE

#1C177,(SP)
(SP)+,021

;sMAKE IT 7-81T7 ASCII
:3IS IT A CONTROL-Q?

: ;GET CHARACTER

BNE

;3
IF NOT DISCARD IT

cMP

4(SP),#21

:3IS IT A RANDOM CONTROL-Q?

CHP

4(sP), #8140

8EQ

CMP
8GT
8IC
RTI

;;YES, RESUME

; ;:BRANCH BACK IF SO

;:IS IT UPPER CASE?

iR-C

‘

;R-C

; ;BRANCH IF YES

4(SP),#175
44
#40,4(SP)

REREREREREER AR R ERE R AR

‘

; ;PUSH DOWN THE PC
: ;SAVE THE PS

MOvVB

BLT

(SP),-(SP)
4(SP),2(SP)

14
84TKB,4(SP)
#1C<177>,4(SP)
4(SP),#23

; ; CHARACTER IS ON THE STACK
;s WITH PARITY B8IT STRIPPED OFy

8PL
MOVE
8IC
cHp

BNE
1578
BPL

:;INPUT A SINGLE CHARACTER FROM THE TTY

RETURN HERE

8IC
cHP

13841 055354

000750

1¢:

2%:

001366

13840 05%352

$RDCHR: MOV
MOV

000004
000004
000023

13839 055350

;IS IT A SPECIAL CHAR?
; ;BRANCH IF YES
;sMAKE IT UPPER CASE
::G0 BACK TO USER

AR SRR AR

R R R

R AR SRR R

EE SRR G E ok r bSO E bbbt e

;*THIS ROUTINE WILL INPUT A STRING FROM THE TTY

13851
138%2

;#CALL:
i*
ROLIN

13854

13883

13855 055414
13856 055416

010346
005046

13858 055424
13859 055430

122703
101477

13857 055420

13860 055432
13861 05S434
13862 055436
13863 055442
13864 055444

012703
104411
112613
122713
001016

055444

104401

13865 055450

005726

13866 055452
13867 055454
13868
13869
13870
13871

Page 442

055462
055464
055470
055474

13872 0SSS09

012603
032777

001404
005037
000137
000137

122713

055712

$ROLIN: MOV
CLR

R3,-(SP)
-(SP)

2$:

#$TTYIN.20.
,R3
8%

14:

055736

RETURN HERE

MOV

cMP
BLOS

AS$TTYIN,R3

055736

ROCHR
MOVB
CMPB
BNE
TYPE
TYPEIT
.DSABL

CRF

000400

MOV
8171

(S5P)+,R3
#8178, aSWR

000003

LE)

002420
040604
040534

000177

125154

114:

3¢

BEQ
CLR
JMP
JMP

cHMPE

(SP)+,(R3)
#3,(R3)
34
$CNTLC
,$CNTLC

s sINPUT A STRING FROM THE TTY

; ;ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK

: s TERMINATOR WILL BE A BYTE OF ALL 0'S

: ;SAVE R3
; ;CLEAR THE RUBOUT KEY

; ;GET ADDRESS

;;BUFFER FULL?
::BR IF YES

; ;GO READ ONE CHARACTER FROM THE TTY
; ;:GET CHARACTER
;315 IT A CONTROL-C?
; ;BRANCH IF NO
;s TYPE A CONTROL-C (tC)

(SP).

: ;CLEAN RUBQUT KEY OFF OF THE STACK

114
STOPOK
€XIT
QUIT

: ;:BRANCH IF NOT TO HALT ROUTINE
;:;GET READY TO HALT PROGRAM
; ;GO HALT PROGRAM
; ;GOTO CONTROL
-C HALT

#177,(R3)

; ;RESTORE R3
:;IS THERE A HALT FLAG SET IN THE SWR?

::IS IT R RUBOUT

CVMJUARQ MSV1l-J MEMORY DIAG.

CONTROL

S & CONTROL @

13873
13874
1387S
13876
13877

055504
055506
055510
055512
055520
055520

001022
005716
001007
112737

000134

104401

055710

13878
13879
13880
13881

055524
055530
055532
055536

012716
005303
020327
103434

177777

13882 055540

13883 055544
055544

055710

104401

055710

13884
13885
13886
13887
13888

055550
055552
055554
055556
055564
055564

000725
005716
001406
112737

000134

104401

055710

13889
13890
13891
13892

055570
055572
055576
055600
055600

005016
122713

000025

104401

055743

055604
055606
055612
055614
055616
055616

000705
122713
001011
105013

13893
13894
13895
13896
13897

13898 055622
055622

002660

104401

055712

000676
104401

002657

13901 055634
13902 055636
13903 055642
055642

000671
111337

055710

104401

055710

055646

122723

000015

13908
13909
13910
13911

055652
055654
0355660
055660

001264
105063

0535664
055666
055670
055672

005726
012603
011646
016666

104401

055710

6$:

7%:

CLR

CMPB

BNE

.DSABL
BR
CHPB
BNE
CLR8
TYPE
TYPEIT

.DSABL

TYPE
TYPEIT

8s$:

94:

.DSABL
BR
TYPE
TYPEIT
.DSABL
BR

MOVB
TYPE
TYPEIT

.DSABL
CMPB
BNE

CLRB

177777

002661

000004

BNE
7S7
BNE
Move
TYPE
TYPEIT
.DSABL
MOV
DEC
cHp
BLO
MOV
TYPE
TYPEIT
.DSABL
B8R
TS7
BEQ
Mov8
TYPE
TYPEIT
. DSABL

TYPE
TYPEIT

000022

104401

Page 442 1
S€Q 0390

S$:

13899 055626
13900 055630
055630

13904
13905
13906
13907

MACRO V05.01b Friday 15-Feb-85 16:10

055712

111337

001003

B15

000002

TYPE
TYPEIT
.DSABL
LEX
MoV
MoV
MOV

(sP)

'\,10¢
10%
,10%
CRF

;:BR IF NO
::1S THIS THE FIRST RUBOUT?
;:BR IF NO

;:TYPE A BACK SLASH

#-1,(5P)
R3
R3,4$TTYIN
84

;;SET THE RUBOUT KEY
; ;BACKUP BY ONE
s s STACK EMPTY?
;:BR IF YES

104
.10¢
CRF
2%
(SP)
64
#'\,10$
104
,10$
CRF

: ;GO READ ANOTHER CHAR.
: sRUBOUT KEY SET?
;:BR IF NO
::TYPE A BACK SLASH

(R3),10¢

(SP)

#25,(R3)
74
$CNTLU

+ $CNTLU
CRF

;s SETUP TO TYPEOQUT THE DELETED CHAR,
::G0 TYPE

; :CLEAR THE RUBOUT KEY
;:IS CHARACTER A CTRL U?
;:BR IF NO
;3 TYPE A CONTROL "V

(R3)

::6G0 START QVER
;31S CHARACTER A "tR"?
; ;BRANCH IF NO
:;CLEAR THE CHARACTER

, $CRLF
CRF
$TTYIN

;s TYPE THE INPUT

1
#22,(R3)
94
$CRLF

,STTYIN

CRF
2¢
$QUES

. $QUES

CRF
14
(R3),10¢
104
,104
CRF
#15,(R3).
28
-1(R3)
$LF
o SLF
CRF

(SP).
(SP)+,R3
(sP),-(SP)
4(SP),2(SF)

:;TYPE

MCRM

"LF"

STRING

; ;G0 PICKUP ANOTHER CHACTLR
;s TYPE A

' Y

; s CLEAR THE BUFFER AND LOOP
; ;ECHO THE CHARACTER

; ;CHECK FOR RETURN
::LOOP IF NOT RETURN
; ;CLEAR RETURN (THE 15)
;s TYPE A LINE FEED

; sCLEAN RUBOUT KEY FROM THE STACK
; sRESTORE R3

: sADJUST THE STACK AND PUT ADDRESS OF THE
FIRST ASCII CHARACTER ON IT

CVMUARO MSV11-J MEMORY DIAG.
CONTROL S & CONTROL @

055700
055706
055710
055711
055712
055736
055741
13920 055743
055746
13921 055750
055753
13922 055755
055760
055763
13923 055766
055771
055774
13924
13912
13913
13914
13915
13916
13919

012766

000002
000
000
000024
136
012

136

012
136
012
015

127

055712

103
000
125
000
107
000
0le
122

040
040

07s

040

127

15 Feb 85

C15

16:10

Page 442 2

SEQ 0391
000004

MOV

#$TTYIN,4(SP)

0
0
20.

;s STORAGE FOR ASCII CHAR. 10 TYPE
: s TERMINATOR
; ;RESERVE SIZE BYTES FOR TTY INPUT

RTI

; ;RETURN

015

$TTYIN:
$CNTLC:

.BYTE
.BYTE
.REPT
.ASCIZ

015

$CNTLU:

.ASCI2

/tU/7<15>¢<12>

; ;CONTROL "U"

015

$CNTLG:

.ASCIZ

/1G/<15><12>

;: ;CONTROL

123

$MSUR;

.ASCIZ

<15>¢<12>/SUR

$MNEW:

.ASCIZ

104:

075
040

105

MACRO V05.01b Fridsy

040
000
116
040
000

.EVEN

/tC/<15>¢<12>

NEW =

: ;CONTROL ~C*"

"G"

CVMJUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday
ROUTINE READ AN OCTAL NUMBER FROM THE TTY

13926
13927
13928
13929
13930
13931
13932
13933
13934
13935
13936
13937
13938 056000
13939 056002
13940 056010
056010
056012
056014
13941 056016
13942 056020
13943 056022
13944 056026
13945 056030
13946 056032
13947 056034
13948 056036
13949 056042
13950 056044
13951 056050
13952 056052
13953 056054
13954 056056
13955 056060
13956 056062
13957 056064
13958 056066
13959 056072
13960 056074
13961 056076
13962 056100
13963 056104
13964 056110
056110
056112
056114
13965 056116
13966 056120
13967 056122
13968 056124
056124

13969 056126
13970 056130
056130
13971 056134
056134

15-Feb-85

.SBTTL
(SRR EREER SRS

000004

000002

ROUTINE READ AN OCTAL NUMBER FROM THE TTY
R R R

T AR SR AR

PUSH

1¢:

056126
2%:
000060

000067

012602
012601
012600
000002
005726
105010

3$:

CLR
CLR

Move

BEQ
cHPe
BGT
CMPB
BLT
ASL

BIC
ADD
BR

TS7
MOV
MOV
Pap

RTI
TS7

(ASCII)

R E NS SRS AP0

NUMBER FROM THE

TTY

RO,R1,R2

Reed

PSR

OOeES

AND

MOV RO, -(SP)

S5§¢:

000000

; ;READ AN ASCIZ LINE

RO,5¢

; ;GET ADDRESS OF 1ST CHARACTER
; iAND SAVE IT
; :CLEAR DATA WORD

(RO)+,-(SP)

; ;PICKUP THIS CHARACTER

(SP)+,RO

R1
R2

3
#'0,(SP)
4
#'7,(SP)
44
R1

R2
R1
R2
R1
R2

#1C7,(SP)
(SP)+,R1
23

(SP)«
R1,12(SP)
R2, $HIOCT
R2,R1,RO

CLRB

(SP).
(RO)

.DSABL
.WORD

CRF
O

TYPE
TYPEIT

104401

MOV

ROL
ASL
ROL
ASL
ROL

177770

000012
056146

RDLIN

MOV

006102
006301
006102
006301

104401

EI R F AR IR TR R SRR ERE AR U

MOV R1,-(SP)

010246

006102
042716
062601
000756
005726
010166
010237

AR R

READ AN OCTAL

;sCHANGE IT7 T0 BINARY.
;#THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL
;*OCTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A *?" WILL BE TYPED
;#FOLLOWED BY A CARRIAGE RETURN-LINE FEED. THE COMPLETE NUMBER MUST
;*THEN BE RETYPED. THE INPUT IS TERMINATED BY TYPING A CARRIAGE RETURN.
;#CALL:
¥
RDOCT
; ;READ AN 0OCTAL NUMBER
¥
RETURN HERE
; ;LOW ORDER BITS ARE ON TOP OF THE STACK
%
; sHIGH ORDER BITS ARE IN $HIOCT
$RDOCT
: MOV
(SP),-(SP)
; :PROVIDE SPACE FOR THE
MoV
4(SP),2(SP)
: : INPUT NUMBER

010046
010146

104412
012600
010037
005001
005002
112046
001420
122716
003026
122716
002423
006301

Page 443

SEQ 0392

;#THIS ROUTINE WILL

011646
016666

D15

16:10

;s IF ZERO GET 0OUT

: ;MAKE SURE THIS CHFMRACTER

; ;IS AN OCTAL DIGIT

;%4
;%8
;;STRIP THE ASCII JUNK

; ;ADD IN THIS DIGIT
;;LOOP
; ;CLEAN TERMINATOR FROM STACK
; sSAVE THE RESULT

; ;RETURN

; ;CLEAN PARTIAL FROM STACK
;:SET A TERMINATOR

;:; TYPE UP THRU THE BAD CHAR.

067776

TYPE
TYPEIT

MSG062
,MSGO62

; INPUT MUST BE A

070016

TYPE
TYPEIT

MSG063
,MSGO63

;N OCTAL

.OSABL

CRF

MOV R2,-(SP)

MOV (SP)+,R2
MOV (SP).,R1
MOV (SP).,RO

CVMUAAQ MSV11-J MEMORY DIAG.

E15

MACRO V05.01b Friday 15 Feb 85 16:10

ROUTINE READ AN OCTAL NUMBER FROM THE TTY

13972 056140
056140

13973 056144
13974 056146
%gg;g

.DSABL

104401

070027

000724
000000

$HIOCT:

TYPE
TYPEIT
.DSABL
BR
.WORD
.SBTTL

Page 4343 1

SEQ 0393

CRF

MSGO64
;sNUMBER
,MSGO64
CRF
1$
; ; TRY AGAIN
0
; ;HIGH ORDER BITS GO HERE
ROUTINE READ A DECIMAL NUMBER FROM THE TTY

13977

13978
13979
$3980
13981
13982
13983
13984
13985

;«THIS ROUTINE WILL READ A DECIMAL (ASCII) NUMBER FROM THE TTY AND
;*CHANGE IT TO BINARY. IF T0J MANY CHARACTERS OR ANY ILLEGAL CHARACTERS
;#ARE READ A "?" FOLLOWED BY A CARRIAGE RETURN-LINE FEED WILL BE TYPED.
;«THE COMPLETE NUMBER MUST BE RETYPED. THE INPUT IS TERMINATED BY THE
;*USER TYPING A CARRIAGE RETURN. THE RANGE OF THE INPUT NUMBER IS
;*POSITIVE 32767 TO NEGATIVE 32768.
;«CALL:
X
RDDEC
; ;READ A DECIMAL NUMBER

igggg

13988
13989 056150
13990 056152
13991 056160
056160
056162
056164

13992
13993
13994
13995
13996

011646
016666
010046
010146
010246

056166
056170
056172
056176
056200

104412
012600
010037
005046
005002

13998 056206
13999 056210

001001
112002

13997 056202

14000 056212
14001 056214
14002 056216
1400% 056222
14004 056224
14005 056230
14006 056232
14007 056236
14008 056240
14009 056242
14010 056244
14011 056246

122710

112001
001424
122701

14012 056250

003032
122701
002427
032716
001024
006316
011646
006316
006316
062616

14014
14015
14016
14017
14018
14019
14020

162701
060116
102412
000752
005702
001401
005416

14013 056252
056254
056260
056262
056264
056266
056270
056272

14021 056274

14022 056300

000004

102416

012666

000002

056316

000055

000060
000071
170000

000012

IIIIImmMmMmImmMTIImMmM

; ;NUMBER IS ON TOP OF

; ;PROVIDE SPACE FOR

RDLIN
MOV
MOV
CLR
CLR

(SP)+,RO
RO,64
-(SP)
R2

; ;READ AN ASCIZ LINE
; ; ADDRESS OF 1ST CHAR.
; ; SAVE INCASE OF BAD INPUT
; ;CLEAR DATA WORD
: :SIGN SET POSITIVE

BNE
MOVB

24
(RO)+,R2

;:BR IF NO MINUS SIGN
: ;SAVE FOR LATER USE

ADD

S$
#4'9,R1
S$
#1C7777,(SP)
S$
(SP)
(sP),-(SP)
(sP)
(SP)
(SP)+,(SP)

;:DON'T LET NUMBER GET T0 BIG
; ;BR IF NUMBER WOULD OVERFLOW
;%2
; ;SAVE FOR LATER
;s %4
;%8
;:¢10.

MOVB
BEQ
CMPB
BGT
CMPB
BLT
BIT
BNE
ASL
MOV
ASL
ASL

#' -,(RO)

(RO)+,R1
34
#'0,R1

SuB
ADD
BvS
BR
187
BEQ
NEG

#'0,R1
R1,(SP)
S$
24
R2
44
(sP)

POP

R2,R1,R0

MOV

(SP).+,12(SP)

THE STAC(

4(sP),2(5P)
RO,R1,R2

BvVS

000060

(SP),-(SP)

MOV
PUSH

CMPB

2$:

T T

RETURN HERE

$RODEC: MOV

1$:

;s THE INPUT NUMBER

;:SEE IF A MINUS SIGN WAS TYPED

; ;PICKUP THIS CHARACTER
;;GET OUT IF ZERO
; sMAKE SURE THIS CHARACTER
;:IS A DIGIT BETWEEN O £ 9

; ;OVERFLOW ISN'T ALLOWED

:;STRIP AWAY THE ASCII JUNK
: ;ADD IN THIS DIGIY
; ;OVERFLOW ISN'T ALLOWED

; ;LOOP
; sCHECK IF NUMBER IS NEG
;;BR IF NO
: : YES--NEGATE THE NUMBER

: :SAVE THE RESULT

MOV RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)

F15

MACRO VU5.01b Fri:dey 15 Feb 85 16:10
CVMJAAQ MSV11-J MEMORY DIAG.
ROUTINE READ A DECIMAL NUMBER FROM THE TTY

056300
056302

056304
14023 056306
14024
14025 056310
14026 056312
14027 056314
056314
14028 056316
14029 056320
056320

11030 056324
056324

012602
012601
012600
000002
005726
105010

S$:

104401
000000

64:

104401

067776

104401

070037

14031 056330
056330

104401

14032 056334

000714

070027

Page 443 2
SEQ 0394

MOV (SP). R2
MOV (SP). ,R1
MOV (SP).,RO

RTI

; :RETURN

15T
CLRB
TYPE
TYPEIT
.DSABL
.WORD
TYPE

; ;CLEAN PARTIAL NUMBER FROM STACK
::SET A TERMINATOR

TYPEIT

.DSABL

TYPE
TYPEIT

.DSABL

TYPE
TYPEIT
.DSABL
BR

;:TYPE THE INPUT UP TQ BAD CHAR.

M5G062

; ;POINTER GOES HERE
: INPUT MUSST BE A

CRF
MSGO65

;DECIMAL

CRF
MS5G064

; NUMBER

CRF
14

:; TRY AGAIN

.MSGO62

,MS5G06S
,MS5G064

CVMJARO MSV11 -J MEMORY DIAG.

SAVE AND RESTORE RO-RS

056416
056420
056422
056424
056426
14068 056430

Page 444

SEQ 0395
.SBTTL
;RS EEE R

ROUTINE SAVE AND RESTORE RO-RS

R AR N AR A AR R AR AR AR A A AR

AR R R

R R R R EER RS RS

EER GO AR S E VR R C RO

ESA0SE0CCE0OS

;#SAVE RO-RS
;#CALL:

;%
SAVREG
tUPON RETURN FROM

$SAVREG THE STACK WILL

LOOK LIKE:

tTOP---(016)

.t +2---(+18)
;%

+4---RS

+8---R3

i +6---R4

t010---R2
;%+12---R1

$SAVREG:

010046
010146
010246
010346
010446
010546
016646
016646
016646
016646
000002

PUSH

MOV
MOV
MOV
MOV
RTI

000022
000022
000022
000022

RO,R1,R2,R3,R4,R5

22(SP),-(SP)
22(sP), -(sP)
22(SP),-(SP)
22(SP),-(SP)

; i SAVE
; ;SAVE
; ;SAVE
: ;SAVE

PS
PC
PS
PC

oF
OF
OF
OF

MAIN FLOW
MAIN FLOW

(SP)+,22(SP)
(SP)+,22(SP)
(SP)+,22(SP)
(SP)+,22(SP)

; ;RESTORE
; ;RESTORE
; ;RESTORE
; ;RESTORE

PC
PS
PC
PS

OF
OF
OF
OF

MOV
MOV
MOV
MOV
MOV
MOV

RO, -(
R1,-(

R2,-(

R3,-(
R4, -(
RS, -(

;t014---R0

vy
VOVOVOOVOVO

056350
056352
056356
056362
056366
14057 056372
14058
14059
14060
14061
14062 056374
14063 056374
14064 056400
14065 056404
14066 056410
14067 056414
056414
14053
14054
14055
14056

G15

16:10

CALL
CALL

; *RESTORE RO-RS

; #CALL:

012666
012666
012666
012666
012605
012604
012603
012602
012601
012600
000002

000022
000022
000022
000022

$RESREG:

RESREG

MOV
MOV
MOV
MOV
PoP

RTI

RS,R4,R3,R2,R1.RO

CALL
CALL
MAIN FLOW
MAIN FLOW
MOV
MoV
MOV
MOV
MOV
MOV

Lunonunnnn
VOVVOVOO

14034
14035
14036
14037
14038
14039
14040
14041
14042
14043
14044
14045
14046
14047
14048
14049
14050
14051 056336
14052 056336
056336
056340
056342
056344
056346

15 fFeb 85

PNINANAN AN

ROUTINE

MACRO V05.01b Friday

)+ .,RS
)+ R4

)+,R3
)+ ,R2
)+ ,R1
)+ ,RO

CVMJAARQ MSV11-J MEMORY DIAG.

ROUTINE RANDOM NUMBER GENERATOR

15-Feb 85

it i1

;#CALL:
-

IS
OF

A
O

2222 22

CALL

$RAND

PUSH

RO,.R1,R2

MOV
MOV
MOV
ASL
ROL

SEEDLO,RO
SEEDHI,R1

RETURN

012602

012601
012600
000207

$RAND:

002604

002602
001057
047401
002604
002602

1¢:

S08

ADD
ADC

ADD
ADD
ADC
ADD
MOV
MOV

POP

DOUBLE PRECISION PSEUDO RANDOM NUMBER
TO 2#%(+33)-1.

002604
002602
000007

Page 445

ROUTINE RANDOM NUMBER GENERATOR

22222222 22222

;#THIS ROUTINE
:#WITH A RANGE

010046
010146
010246
013700
013703
012702
006300
006101
077203
063700
005501
063701
062700
005501
062701
010037
010137

H15

16:10

SEQ 0396

.SBTTL

14070
14071
14072
14073
14074
14075

14076
14077
14078
14079
14080
14081 056432
056432
056434
056436
14082 056440
14083 056444
14084 056450
14085 056454
14086 056456
14087 056460
14088 056462
14089 056466
14090 056470
14091 056474
14092 056500
14093 056502
14094 056506
14095 056512
14096 056516
056516
0356520
056322
14097 056524

MACRO V0S.01b Friday

#7,R2
RO
R1
R2,1$
SEEDLO,RO
R1
SEEDHI,R1
#1057,R0
Rl
#47401,R1
RO, SEEDLO
R1, SEEDHI
R2,.R1,R0

PRI

RIY)

GENERATOR

; ;CALL THE ROUTINE
: ; RETURN HERE THE RANDOM
; sNUMBER WILL BE IN
; : $SHINUM, $LONUM

;:SET RO WITH LOW
;SET R1 WITH HIGH
;SET SHIFT COUNT
: sSHIFT RO LEFT AND
; ;ROTATE CARRY INTO R1 AND

MOV RO, -(SP)
MOV R1,-(SP)
MOV R2,-(SP)

;ADD NUMBER TO MAKE X 129
; ;PROPOGATE CARRY
;ADD NUMBER TO MAKE X 129
; ;ADD LOW _CONSTANT
; ;sPROPOGATE CARRY
; s ADD HIGH CONSTANT
;SAVE RO
;SAVE R1
MOV (SP).,R2

MOV (SP).,R1

RETURN

MOV (SP).,RO

115

MACRO VOS.Oib Friday 15 Feb 85 16:10
CVMJAAQ MSVi1-J MEMORY DIAG.
ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT

14100
14101
14102
14103
14104
14105
14106
14107
14108
14109
14110 056526
14111 056530
14112 056534
14113 056540

14114 056544
14115 056550
14116 056552
14117 056554
14118 056556
14119 056560
14120 056562
14121 056564
14122 056566
14123 056570

14124 056572

14125 056576
14126 056600
14127 056602
14128 056604
14129 056606
14130 056610
14131 056612
14132 056614
14133 056616
14134 056620
14135 056622
14136 056626
14137 056630
14140

.SBTTL
I

Page 447

SEQ 0397

ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT

;#THIS ROUTINE WILL

CONVERT

32-BIT

UNSIGNED BINARY NUMBER

TQ AN

;sUNSIGNED OCTAL ASCIZ NUMBER.

104415
(0i6601
012705
012704
012703

012100

000002
056645
000014
177770

012101
005002

110245

010002
005304
003007
001405
00520°

010566

104416
000207
006203
006001
006000

006001
006000
006001
006000
040302
062702
000753
000016
056634

;*
0*
i

MOV
CALL
RETURN

$0B20:

SAVREG
MOV
MOV
MOV
MOV

2(SP),R1
#$0CTVL+13.,R5
#12. ,R4
#1C7,.R3

MOV
CLR

(R1)+,R1
R2

MOV
DEC
8GT
BEQ
INC

RO,R2
R4
34
24
RS

MOV
1¢:

000002

MOV

2%:
3¢

000060

MOove

RESREG
RETURN
ASR
ROR
ROR

ROR
ROR
ROR
ROR
BIC
ADD
BR
$0CTVL: .REPT

$0CT8=$0CTVL +4

#PNTR, -(SP)
$0820

(R1)+,R0O

R2.-(RS)

RS5,2(SP)
R3
R1
RO
R1
RO
R1
RO
R3,R2
#'0,R2
14
14,

; ;POINTER TO LOW WORD OF BINARY NUMBER
;;CALL THE ROUTINE
;; THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK
; :; SAVE ALL REGISTERS
; :PICKUP THE POINTER TO LOW WORD
;;POINTER TO DATA TABLE
; ;00 ELEVEN CHARACTERS

; s MASK

; ;LOWER WORD
; ;HIGH WORD
; s TERMINATOR

; :PUT CHARACTER IN DATA TABLE

;;GET THIS DIGIT
; sCOUNT THIS CHARACTER
;:BR IF NOT THE LAST DIGIT
;:BR IF IT IS THE LAST DIGIT
:sALL DIGITS DONE-ADJUST POINTER FOR FIRST

; ;ASCIZ CHAR. & PUT IT ON THE STACK

; ;RESTORE ALL REGISTERS
; ;RETURN T0O USER
; ;POSITION THE MASK FOR THE LAST DIGIT
; :POSITION THE BINARY NUMBER FOR
i
THE NEXT OCTAL DIGIT

; sMASK OUT ALL JUNK
; sMAKE THIS CHAR. ASCII
;:60 PUT IT IN THE DATA TABLE
; ;RESERVE DATA TABLE
;POINTER TO 11 DIGIT NUMBER

CVMUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Fr,day

15-Feb 85

J15

16:10

Page

448

TABLES

.SBTTL

APT MAILBOX ETABLE

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

OO0O0O0O0OO0O0O0

$ETABLE:

; ;MESSAGE TYPE CODE

; ;FATAL ERROR NUMBER

; ; TEST PATTERN NUMBER
; ;PASS COUNT
; ;DEVICE COUNT
;170 UNIT NUMBER
; ;MESSAGE ADDRESS
; sMESSAGE LENGTH
; s APT ENVIRONMENT

(ERROR PC)

TABLE

000

$ENVM:

0
.BYTE
; :ENVIRONMENT BYTE
;:SET T0O A 1 FOR APT AUTO MODE
IF BIT #7 IS SET IN $ENVM THE TABLE BELOW (BEGINNING AT $MAMS1 AND
ENDING AT $MADR4) MUST BE FILLED IN TO INDICATE THE PROPER AMOUNT OF
EACH TYPE OF MEMORY,
.BYTE
0
;ENVIRONMEN( MODE

$ SWREG:
$USUWR:
$CPUOP:

.WORD
.WORD
.WORD

101

0
0

AMS]1
;

TYP1:

.BYTE
.BYTE

.WORD

000
000
000000
000
000
000000
000
000
000000
000000
000000
000000
000000

$MAMS2:
$MTYP2:
$MADRZ:
$MAMS3:
$MTYP3:
$MADR3:
VWAHS4:
$MTYP4:
$MADR4:
$VECT1:
$VECT2:
$BASE:
$DEVM:

.BYTE
.BYTE
. WORD
.BYTE
.BYTE

.WORD
.BYTE
.BYTE
.WORD
. WORD
.WORD
.WORD
.WORD

OOO0OO0OOCOOOOOOOO

000000
000000
000000

$COW1
:
$CDWe:
$DOU7:

.WORD
.WORD
.WCRD

QOO

177776

ADR1:

177776

:BIT7(200)=USE APT SIZE INFO ;BITS(40)=NO CONSOLE
; ;APT

SWITCH REGISTER

;USED TO LIMIT THE NUMBER OF PASSES

; ;CPU TYPE,OPTIONS
BITS 15-11=CPU TYPE
11/04=01,11/05=02,11/20-03,11/40=04,11/45=05%
11/70=06,PDQ=07,Q=10
BIT 10=REAL TIME CLOCK
BIT
9=FLOATING POINTM PROCESSOR
BIT
8=MEMORY MANAGEMENT

; ;HIGH ADDRESS,M.S. BYTE ;DEFAULT = 64K

001
004

B ABTe

000101
000000
000000

AT TERERERRER

$ENV:
;NOTE:

14172
14173
14174
14175
14176
14177 056700
14178
14179 056702
14180 056703
14181 056704
14182 056706
14183 056707
14184 056710
14185 056712
14186 056713
14187 056714
14188 056716
14189 056720
14190 0356722
14191 056724
14192
14193 056726
14194 056730
14195 056732

.SBTTL

000

4B
e os

14171 056677

000000
000000
000000
000000
000000
000000
000000
000000

$MAZL:
$MSGTY:
$FATAL
:
$TESTN:
$PASS:
$DEVCT:
SUNIT:
$MSGAD:
$MSGLG

% T h B

14142
14143
14144
14145 056646
14146 056646
14147 056650
14148 056652
14149 056654
14150 056656
14151 056660
14152 056662
14153 056664
14154 056666
14155 056666
14156
14157
14158
14159 056667
14160
14161 056670
14162 056672
14163 056674
14164
14165
14166
14167
14168
14169
14170 056676

SEQ 0398

;MEN. TYPE,BLK#1
MEM.TYPE BYTE
-(HIGH BYTE)
900 NSEC CORE=001
300 NSEC BIPOLAR=002
PARITY M0OS=003
ERROR CORRECTING MOS=004
; ;HIGH ADDRESS,BLK#1
MEM.LAST ADDR.=3 BYTES,THIS WORD AND LOW OF

; sHIGH ADDRESS,M.S. BYTE
,BLK#2
TYPE M.
;s ;ME
; ;sMEM.LAST ADDRESS,BLK#2

; ;HIGH ADDRESS,M.S.BYTE

: iMEM.TYPE ,BLK#3

: ;MEM.LAST ADDRESS,BLK#3
; sHIGH ADDRESS,M.S.BYTE
; sMEM.TYPE ,BLK#%4
;s sMEM.LAST ADDRESS,BLK®#4
: ; INTERRUPT VECTOR#1,8US PRIORITY#)1
; s INTERRUPT VECTOR#2BUS PRIORITY#2
; ;:BASE ADDRESS OF EQUIPMENT UNDER TEST
; :DEVICE MAP

;UFD MODE FLAG 1-UFD MODE

“TYPE"”

ARQVE

CVMJUARAQ MSV11-J MEMORY DIAG.

APT

MAILBOX-ETABLE

14197
14198
14199
14200
14201
14202
14203
14204
14205
14206 056734
14207 036736
14208 056740
14209 056742
14210 056744
1421) 056746
14215 056750
14216
14217
14218
14219 056750
14220 056750
14221 056752
14222 056754
14223 056756
14224 056760
14225 056762

MACRO V05.01b Friday

15-Feb-85

K15

16:10

Page 449

SEQ 0334

;THE FOLLOWING LOCATIONS SPECIFY WHICH PATTERNS
;ARE TO BE RUN FOR PARTICULAR MEMORIES
;REFERENCE THE TABLE LISTED BELOW TG RELATE BITS TO PATTERNS.
;BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITO SET
;IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE ...

177777
177777
177777
177777
1777717
177777

;NOTE#s NULL TESTS DO NOT TAKE ANY TIME
;

$0DWO:
$0DWY:
$DDW2:

.WORD
.WORD
.WORD

177777
177777
177777

;ECC CSR TESTS
;ECC CSR TESTS
;;ECC PATTERNS

$0DW4:
:g?gaé

.WORD
.WORD

177777
177777

;PARITY PATTERNS
;PARITY PATTERNS

$00W3:

_WORD

177777

;;ECC PATTERNS

;FIELD SERVICE VALUE
177777
1rnn
103777

TABLE
TABLE
TABLE

= MKCSRT:
= MKCSRT:
= MKPAT:

003777
177774

TABLE
TRBLE

= MJPAT:
= MJPAT:

1771777

TABLE = MKPAT:

;:SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC
; INTERFACE SPEC.
000000
056646
000043
001274
000000
000041

$APTHD
:
$HIBTS:
$MBADR:
$TSTM:
$PASTM:
$UNITM:

.WORD
.WORD
.WORD
_WORD
.WORD

.WORD

O
$MAIL
35.
700.
O

$ETEND $MAIL/2

;:TWO HIGH BITS OF 18 BIT MAILBOX AODDR.
; s ADDRESS OF AFT MAILBOX (BITS 0-15)
: ;RUN TIM OF LONGEST TEST
; sRUN TIME IN SECS. OF 1ST PASS ON 128K (QUICK VERIFY)
;;EXTRA RUN TIME OF A PASS FOR EACH ADDJTIONAL 128K (QV)

;;LENGTH MAILBOX ETABLE(WORDS)

CVMJAROD MSV11-J MEMORY DIAG.

ROUTINE

TRAP DECODER

MACRO V05.01b Friday

14251 057024

Page 450

SEQ 0400

14227
14228
14229
14230
14231
14232
14233

14234
14235 056764
14236 056766
14237 056772
14238 056774
14239 056776
14240 057000
14241 057004
14242
14243
14244
14245
14246 057006
14247 057010
14248 057016
14249
14250 057020
057020

L15

15-Feb 85 16:10

.SBTTL

ROUTINE TRAP DECODER

LL
Y L T
LYY

;*THIS ROUTINE WILL

PICKUP

THE LOWER BYTE OF

THE

"TRAP"

YNSTRUCTION

;#AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STAXTING ADDRESS
;#0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTKINFN I° WILL
;G0 TO THAT ROUTINE.
010046
016600
005740
111000
006300
016000
000200

$TRAP:

000002

MOV
MoV
TST
Move

ASL
MOV
RTS

057026

RO, -(SP)
2(SP),RO
-(RO)
(RO),RO

RO
$TRPAD(RO),RO
RO

; :SAVE RO
;;GET TRAP ADDRESS
; :BACKUP BY ¢
; sGET RIGHT BYTE OF TRAP
; ;:POSITION FOR INDEXING
;;INDEX TQ TABLE
; ;GO TO ROUTINE

; s THIS IS USE TO HANDLE THE "CETPRI" MACRO
011646
016666
000002

000004

104401

065507

000000

000002

$TRAP2:

MOV
MOV
RTI

$NOTRAP : TYPE

TYPEIT

$HALT2:

.DSABL
HALT

(SP),-(SP)
4(SP),2(SP)

: ;MOVE THE PC DOWN
; sMOVE THE PSW DOWN

MSGO06

;UNDEFINED TRAP INSTRUCTION

,MSGOO6

CRF

; sRESTORE THE FSW

CVHMJRAQ MSV11-J MEMORY DIAG.
TRAP

M15

MACRO V05.01b Friday 15-Feb-85 16:10

Page 452

TAELE

14254
14255
14256
14257
14258
14259
14260
14261 057026
14262 057030
14263 057032
14264 037034

14265 037036

SEQ 0401
.SBTTL

TRAP TABLE

;#THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED

;sBY THE

057006
047122
054102
054056

057020
14266 057040 054304
14267 057042 057020
14268
14269 057044 054704
14270 057046 0545320
14271
14272 057050 055264
14273 057052 055414
14274 057054 056000
14273 057056 056150
14276
14277 057060 056336
14278 057062 056374
14279
034202
14280 057064
034212
14281 057066
14282 057070 034222
14283
036310
14284 057072
14285
034232
14286 057074
14287 057076 034256
14288
14289 057100 034274
14290 057102 034370
14291
047456
14292 057104
14293 057106 047504
047532
14294 057110
14295 057112 047562
047644
14296 057114
14297 057116 047666
14298 057120 047716
14299 057122 047736
14300 037124 047760
14301 057126 050000
14302 057130 050022
14303 057132 050044
14304 037134 050064
14303 0357136 0350102
14306 0357140 050120
14307 057142 050140
14308 057144 050156
14309 057146
050174
14310 057150
044756

$TRPAD:

“TRAP* INSTRUCTION.

.WORD
$TYPE
$TYPOC
$TYPOS

$TRAP2
;CALL=TYPEIT
;CALL=TYPOC
;CALL=TYPQS

$NOTRAP; $TYPON

TRAP+1(104401)
TRAP+2(104402)
TRAP+3(104403)

;CALL=TYPON

TTY TYPEOUT ROUTINE
TYPE OCTAL NUMBER (WITH LEADING ZEROS)
TYPE OCTAL NUMBER (NO LEADING 2ERO0S)

TRAP+4(104404)

TYPE OCTAL NUMBER (AS PER LAST CALL)!

$TYPDS
;CALL=TYPDS
TRAP+5(104405)
TYPE DECIMAL NUMBER (WITH SIGN)
$NOTRAP; $TYPBN
;CALL=TYPBN
TRAP+6(104406)
TYPE BINARY (ASCTI) NUMBER

$GTSWR
$CKSWR

;CALL=GTSWR
;CALL=CKSWR

TRAP+7(104407)
GET SOFT-SWR SETTING
TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR

$ROCHR
;CALL=RDCHR
$ROLIN
;CALL=ROLIN
$RDOCT ; CALL=RDOCT
$RODEC
;CALL=RDDEC

TRAP+11(104411)
TRAP+12(104412)
TRAP+13(104413)
TRAP+14(104414)

TTY TYPEIN CHARACTER ROUTINE
TTY TYPEIN STRING ROUTINE
READ AN OCTAL NUMBER FROM TTY
READ A DECIMAL NUMBER FROM TTY

$SAVREG ;CALL=SAVREG
$RESREG ;CALL=RESREG

TRAP+15(104415) SAVE RO-RS ROUTINE
TRAP+16(104406) RESTORE RO-RS ROUTINE

$KERNEL
;CALL=KERNEL
TRAP+17(104417) ENTER KERNEL MODE
$ENERGIZE ; CALL=ENERGIZETRAP+20(104420) TURN ON MEMORY MANAGEMENT & TRAPS
$OEENERGI ; CALL =DEENERGITRAP+21(104421) TURN OFF MEMORY MENAGEMENT & TRAPS
$KMAP

; CALL=KMAP

$CACHN
$CACHF

;CALL=CACHON
;CALL=CACHOFF

TRAP+23(104423) TURN CACHE ON
TRAP+24(104424) TURN CACHE OFF

$LOADC
$READC

;CALL=LQADCSR
;CALL=READCSR

TRAP.25(104425) LOAD CORRECT CSR
TRAP+26(104426) READ CORRECT CSR

$PERO1
$PERO2
$PERO3
$PERO4
$PERO7
$PER1O
$PER11
$PER12
$PER13

;CALL=PERRO1
;CALL=PERRO2
;CALL=PERRO3
;CALL=PERRO4
;CALL=PERRO7
;CALL=PERR10
;CALL=PERR1l
;CALL=PERRI12
;CALL=PERR13

TRAP+27(104427)
TRAP+30(104430)
TRAP+31(104431)
TRAP+32(104432)
TRAP+33(104433)
TRAP+34(104434)
TRAP+35(104435)
TRAP+36(104436)
TRAP+37(104437)

$PER16
$PER17
$PER20
$PER21
$PER22

;CALL=PERR16
;CALL=PERR17

TRAP+42(104442) PROGRAM DETECTED
TRAP+43(104443) PROGRAM DETECTED

$PER14
$PER1S

$PER23
$PER24
$PER2S

;CALL=PERR14
;CALL=PERR1S5

;CALL=PERR20
;CALL=PERRZ21
;CALL=PERR22
;CALL=PERR23
;CALL=PERR24
;CALL=PERR25

TRAP+22(104422) MAP KERNEL ) 70 1

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED

TRAP+40(104440) PROGRAM DETECTED
TRAP+41(104441) PROGRAM DETECTED

TRAP+44(104444)
TRAP+45(104445)
TRAP+46(104446)
TRAP+47(104447)
TRAP+50(104450)
TRAP.51(104451)

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROP
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

DETECTED
DETECTED
DETECTED
DETECTED ERROR
DETECTED ERROR
DETECTED ERROR

CVMJAAO MSV11-J MEMORY DIAG.

TRAP TABLE

MACRO V05.01b Fridey

15-Feb-85

N15

16:10

Page 452-1

SEQ 04c,

$PER26
$PER27
$PER30
$PER31
$PER32
$PER33

; CALL=PERR26
;CALL=PERR27
;CALL=PERR30
;CALL=PERR31
;CALL=PERR32
;CALL=PERR33

14321 037176
14322 057200
14323 057202
14324 057204
14325
14326 057206
14327 057210
14328 057212
14329 037214
14330 0587216
14331 057220
14332 057222
14333 057224
14334 057226
14335 057230
14336 157232
14337 037234
14338 057236
14339 057240
14340 057242
14341 057244
14342 057246
14343 057250
14344 057252
14345 057254
14346 037256
14347 057260
14348 057:62
14349 057264
14350 057266
14351 057270
14352 057272

050364
050404
045204
050574
050672
050740
051020
051052
051106
051136
051142
057020
057020
057020

$PER36
$PER37

;CALL=PERR36
;CALL=PERR37

TRAP+55(104455)
TRAP+56(104456)
TRAP.57(104457)
TRAP+60(104460)
TRAP+61(104461)
TRAP+62(104462)
TRAP+63(104463)

;CALL=PERR41
;CALL=PERR42
;CALL=PERR43

TRAP+65(104465) PROGRAM DETECTED ERROR
TRAP+66(104466) PROGRAM DETECTED ERROR
TRAP+67(104467) PROGRAM DETECTED ERROR

034570
034604
034616
034632
034672
034714
034734
035050
035100
035214
035244
035256
035266
035302
034644
034660
034410
035362
035412
035662
035700
057020
057020
057020
057020
057020
057020

$ECCOIS ;CALL=ECCDIS
$ECCIDIS;CALL=ECC1IDIS
$ECCINIT
; CALL=ECCINIT
$ECCLINIT; CALL=ECCLINIT
$CBCSR
;CALL=CBCSR
$CB1CSR ;CALL=CB1CSR
$WASSBE ; CALL=WASSBE
$WAS1SBE
; CALL =WAS1SBE
$WASDBE ;CALL=WASDBE
$WAS10BE
; CALL =WAS108E
$CLRCSR ;CALL=CLRCSR
$CLRICSR; CALL=CLR1CSR
$CHKDIS ;CALL=CHKDIS
$CHK1DIS; CALL=CHK1DIS
$ENASBE ; CALL =ENASBE
$ENA1SBE
; CALL=ENA1SSE
$TSTRD
;CALL=TSTREAD
$INVALID; CALL=INVALID

14355

177776

14311 057152
14312 057154
14313 057156
14314 057160
14315 057162
14316 057164
14317 057166
14318 057170
14319 057172
14320 057174

$PER34
$PER3S

$PER4O

$NOTRAP
$NOTRAP
$NOTRAP

;CALL=PERR34
;CALL=PERR3S

;CALL=PERR4O

$ERRGEN ; CALL =ERRGEN
$CBREG ; CALL=CBREG
$SYNREG ;CALL=SYNREG
$NOTRAP
$NOTRAP
$NOTRAP
$NOTRAP

TRAP+52(104452) FROGRAM DETECTED ERROR
TRAP+53(104453) PROGRAM DETECTED ERROR
TRAP+54(104454) PROGRAM DETECTED ERROR

177776

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

13ILC;REV B8
i ILC,REV B8

TRAP+70(104470) DISABLE ECC ON ALL CSR'S
TRAP+71(104471) DISABLE ECC ON 1 SELECTED CSR
TRAP+72(104472) INITIALIZE ALL MK11 CSR'S
TRAP+73(104473) INITIALIZE 1 SELECTED MK11 CSR
TRAP+74(104474) WRITE GENERATED CHECKBITS IN ALL CSR'S
TRAP+75(104475) WRITE GENERATED CHECKBITS IN 1 SELECTED CSR
TRAP+76(104476, WAS THERE A SBE ON ANY CSR?
TRAP+77(104477) WAS THERE A SBE ON 1 SELECTED CSR?
TRAP+100(104500)WAS THERE A DBE ON ANY CSR?
TRAP+101(104501)WAS THERE A DBE ON 1 SELECTED CSR?

TRAP+102(104502)CLEAR ALL CSR'S
TRAP+103(104503)CLEAR 1 SELECTED CSR

TRAP+104(104504 )DISABLE ECC & WRITE CKBITS FROM ALL CSR S
TRAP+105(104505)DISABLE ECC & WRITE CKBITS FROM 1 CSR

TRAP+106( 104506 JENABLE TRAPS ON SBE'S FROM ALL

CSR'S

TRAP+107(104507 )ENABLE TRAPS ON SBE'S FROM 1 SELECTED CSR
TRAP+110(104510)TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES
TRAP+111(104511)INVALIDATE BACKGROUND PATTERN ON BANK
TRAP+112(104512)TEST ERROR ADDRESS
TRAP+113(104513)ENABLE CHECK BIT REGISTER
TRAP+114(104514 )ENABLE SYNDROME BIT REGISTER

$NOTRAP

DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED

TRAP+64(1044°
1) PROGRAM DETECTED ERROR

$NOTRAP

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

;STATUS REGISTER

CVMUAAO MSV11-u MEMORY DIAG.
TABLE
ERROR POINTER

14387

14388 057324
14389 057326
14390 057330
14391 057332
14392
14393 057334
14394 057336
14395 057340
14396 057342
14397
14398 057344
14399 057346
14400 057350
14401 057352
14402
14403 057354
14404 057356
14405 057360
14406 057362
14407
14408 057364
14409 057366
14410 057370
1441} 057372

15-Feb B85

Bib6

16:10

Page 456

SEQ 0407

.SBTTL

14358
14359
14360
14361
14362
14363
14364
14365
14366
14367
14368
14369
14370

14371
14372 057274
14373 057274
14374 057276
14375 057300
14376 057302
14377
14378 057304
14379 057306
14380 057310
14381 057312
14382
14383 057314
14384 057316
14385 057320
14386 057322

MACRO V05.01b Fridey

;¢THIS

TABLE

TABLE CONTAINS

ERROR POINTER
THE

INFORMATION FOR EACH ERROR

THAT

CAN OCCULR.

we
we
ws
.

061762
064172
060320
060701
060747
063501
060144
060557
061005

063561

060162
060674

061037
063561
060172
060674
061105
063615
060202
060557
061162
063615
060202
060557
061207
063615
060202
060557

063173
064714
060476
060557

LK
2N 3R 3

;¢THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN
;sLOCATION $ITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT.
IF S$ITEMB IS O THE ONLY PERTINENT DATA IS (ERRPC).
;*NOTE]:
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS:
;oNOTE2:

$ERRTB:

EM
DH
DT
DF

;;POINTS
; :POINTS
: :POINTS
: ;POINTS

:ERROR
EM24
DH13
DT13
DF11

;ERROR

EM2
DH1

0T1
DFe
;ERROR
EM3
DH3
D73
DF9

:ERROR

EM4
DH3
074
DF9
;ERROR
EMS
DHS
DTS
DF2

;ERROR

EM6
DHS
DTS
DF2
;ERROR
EM7
DHS
DTS
DF2

; ERROR
EMS3
DH2S
0125
DF2

TO
TO
TO
TO

THE
THE
THE
THE

ERROR MESSAGE
DATA HEADER
DATA
DATA FORMAT

CVMJARO MSV1l-J MEMOKY DIAG.
TABLE

ERROR POINTER

14414
14415 057374
14416 057376
14417 057400
14418 057402
14419
14420 057404
14421 057406
14422 057410
14423 057412
14424
14425 057414

14426 057416
14427 057420
14428 057422

14429
14430 057424
14431 057426
14432 057430
14433 057432
14434
14435 057434
14436 057436
14437 057440
14438 057442

14439
14430 057444
14441 057446
14442 057450

061247
063741
060234
060603
061247
063741
060234
060616
061271
064051
060264
060557
061247
063741
060234
060631
061247
063741
060234
060644

061315
064172
060320

Cl6

MACRO V05.01t Friday 15-Feb-85 16:10
;ERROR
EM11
DH7
D17
OF3
;ERROR
EM11
OH7
D17
DF4
;ERROR
EM12
DH10
DT10
DF2
;ERROR
EM11
DH?
D77
DFS
;ERROR
EM11
DH?
D17
DF6
;ERROR
EM13
DH13

14443 057452

060701

DT13
DF11

14445 057454
14446 057456

061347
064172

EM14
DH13

14444

;ERROR

14447 057460
14448 057462

060320
060701

CT13
OF1i

14450 057464
14451 057466
14452 057470
14453 057472
14454
14455 057474
14456 057476

061413
064172
060320
060701

EM1S
DH13
DT13
DF11
;ERROR
EMSS
DH26

14449

14457
14458
14459
14460
14461

057500
057502

057504
057506
14462 057510
14463 057512
14464
14465 057514
14466 057516
14467 057520
14468 057522

063222
064752
060510
060557

061461
063741
060234
060631
063042
064566
060434
060712

;ERROR

D726
DF2
;ERROR
EM17
DH7

017
DFS
:ERROR
EMS0
DH23
D723
DF13

Page 458

SEQ 0404

CVMJARO MSV11-J MEMORY DIAG.
TABLE

14471
14472
14473
14474
14475

ERROR POINTER

D16

MACRO V0S.0lb Friday 15 Feb 85 16:10

057524
057526
057530
057532

061521
064172
060320
060701

;ERROR
EM19
DH13
DT13
DF11

14477 057534

061573

EM20

14476

14478 057536
14479 05754C

14480 057542
14481
14482 057544

14483 057546
14484 057550
14485 057552

14486
14487 057554
14488 057556
14489 057560
14490 057562
14491
14492 057564
14493 057566
14494 057570
14495 057572
14496
14497 057574

14498 057576
14499 057600
14500 057602
14501
14502 057604
14503 057606
14504 057610
14505 057612
14506

14507 057614
14508 057616
14509 057620
14510 057622
14511
14512
14513
14514
14515

057624
057626
057630
057632

064172
060320

060701

000000
064165
060314
060557
061652
064147
060306
060557
061706
064172
060320
060701
000000

064267
060342
060557

061733
063615
060202
060557

062041
064346
060360
060657
062066
064465
060410
060603

;ERROR

DH13
DT13
DF1l
;ERROR
0
DH12
DT12
DF2
;ERROR
EM21
DH11
0711
DF2
;ERROR
EM22
DH13
D113
DF11
;ERROR
0

DH14
0T14
DF2
;ERROR
EM23
DHS
D15
DF2
;ERROR

EM25
DH15
DT16
DF7
;ERROR

EM26
DH16
D117
DF3

Page 460

iNO MESSAGE

;NO MESSAGE

SEQ C

CVMJUAARO MSV11-J MEMORY DJAG.
TABLE
ERROR POINTER
14518
14519 057634
14520 057636
14521 057640
14522 057642
14523
14524 057644
14525 057646
14526 057650
14527 057652
14528
14529 057654
14330 057656
14531 057660
14532 057662
14533
14534 057664
14535 057666
14536 057670
14537 057672
14538
14539 057674
14540 057676
14541 057700
14542 057702
14543
14544 057704
14545 057706
14546 057710
14347 057712
14548
14349 057714
14550 057716
14351 057720
14532 057722
14553
14554 057724
14535 057726
14556 057730
14557 057732
14558
14559 057734
14560 057736
14561 057740
14562 057742
14563
14564 057744
14565 057746
14366 057750
14567 057752

MACRO V05.01b Fridey

E16

15-Feb-85 16:10

Page 462

SEQ 0406

;ERROR

063146
064714
060476
060557

EMS2
DH2S
DT25
DF2

062137
064465
060410
060672

EM27
DH16
0717
DF8

062634
063741
060234
060603

;ERROR
£M35
DH7
D17
DF3

062227
063741
060234
060603

EM29
DH7
D17
DF3

062311
063741
060234
060631

eEM30
DH7
D17
DFS

063343
064507
060434
060712

EM60
DH20
DT23

062421
063741
060234
060603

EM32
DH7
0717
OF3

062526
063741
060234
060603
063076
064645
060456
060722

EM33
DH7
D17
DF3
; ERROR
EMS1
DH24
DT24
DF14

062721
063674
060220
060557

EM36
DH6
0T6
DF2

:ERROR

;ERROR

DF13

; ERROR

;ERROR

; ERROR

CVMJUAAO MSV11-J MEMORY DIAG.
TABLE

ERROR POINTER

14570
14571 057754
14572 057756
14573 057760

14574 057762
14575
14576 057764
14577 057766
14578 057770
14579 057772
14580
14581 057774
14582 057776
14583 060000
14584 060002
14585
14586 060008
14587 060006
14588 060010
14589 060012
14590
14591 060014
14592 060016
14593 060020
14594 060022

14595
14596 060024
14597 060026
14598 060030
14599 060032
14600
14601 060034
14602 060036
14603 060040
14604 060042
14605
14606 060044

14607 060046
14608 060050
14609 060052
14610
14611 060054
14612 060056
14613 060060
14614 060062
14615
14616 060064
14617
14618
14619
14620
14621
14622
14623

062770
063536
060416

060557
063243
064770
060516
060556

063405
064645
060456
060722
062227
064172
060320
060701
062041
065044
060536
060740

063275
065044
060536
060740
061573
064645
060456
060722

061573
065044
060536
060740
061521
064645
060456
060722
061315

060066
060070
060072

064507
060434
060712

06074
060076
060100

062311
064507
060434

14624 060102
14625
14626 060104

060712
061573

F16

MACRO V05.01b Friday 1S Feb-85 16:10

;ERROR
EM40
DH2
D720

OF2
;ERROR
EMS6
DH27
D127
DF1
;ERROR
EM61
DH24
DT24
DF14
;ERROR
EM29
DH13
0713
DF11
;ERROR
EM25
DH30
DT30
DF16
;ERROR
EM57
DH30
D730
DFi6
;ERROR
EM20

DH24
0724
DF 14
:ERROR
EM20
DH30
D730
OF16
:ERROR
EM19
DH24
D124
DF14
:ERROR
EM13

DH20
D123
DF13
;ERROR
EM30
DH20
D723
OF13
;ERROR
EM20

Page 464

SEQ 040"

CVMJUARQ MSV11-J MEMORY DIAG.

TABLE

ERROR POINTER

14627 060106
14628 060110
14629 060112
14630
14631 060114
14632 060116
14633 060120
14634 060122
14635
14636 060124
14637 060126
14638 060130
14639 060132
14640
14641 060134
14642 060136
14643 060140
14644 060142

Gib

MACRO vV05.01b fFridey 15-Feb 85 16:10

SEQ 0408

064645
060456
060722

DH24
D124
DF 14
;ERROR
£M22
DH24
D124
DF14
;ERROR
EM62
DHS
015
Df
2

061706
064645
060456
060722
063426
063615
060202
060557

061706
064507
060434
060712

Page 464-1

;ERROR

=
-

EM22
DH20
D123
DF13

CVMJAAQ MSV11-J MEMORY DIAG.
ERROR DATA TAGS (DT)
14646
14647 060144
060152
14648 060156
14649 060162

060170
14650 060172
060200
14651 060202
060210
060216
14652 060220
060226
14653 060234
060242
060250
14654 060252
060260
14655 060264
060272
060300
14656 060306
14657 060314
14658 060320
060326
060334
14659 060342
060350
060356
14660 060360
060366
14661 060374
060402
14662 060410
14663 060416
060424
64
060426
146
14665 060434
060442
060450
14666 060456
060464
060472
14667 060476
060504
14668 060510
14669 060516
060524
060532
14670 060536
060544
060552

002020
002052
002020
002020
000000
002020
000000
002020

177576
000000

002020
002424
002020
002176
002060
002176
002176
002200
002206
002214
002020
002150
002020
002176
002314
177746

177576

000000
002020
002044
002052
002176
002020
002020
000000
002020
002020
002052
002176
002020
002176
002176
002020
002152
002020
002C20
002176
002176
002020
002044
002176

MACRO V05.01b Friday

15 Feb 85

H16

16:10

Page 465

SEQ 0409

002034
000000
000000
002036

002044

ODT1:

.SBTTL
.WORD

ERROR DATA TAGS (DT)
ERRPC,ADDRESS,G00OD,BAD,0

002072

DT2:
DT3:

.WORD
.WORD

ERRPC,0
ERRPC,PADDRESS,PARCNT,0

002034

002070

DT4:

.WORD

ERRPC,ADDRESS,NEMCNT,O

177572
172516

177574
177766

DTS:

.WORD

ERRPC,MMRO,MMR1,MMR2,MMR3,CPUERR,O

002422
002402
002176
002044

888388

DT6:

.WORD

ERRPC,APTPAR,LSIZE,APTECC,MSIZE,O

002034
002052

DT7:

.WORD

ERRPC,DUMMY,ADDRESS,DUMMY,GOOD,BAD,BADX0OR

.WORD

DUMMY,DUMMY,DUMMY,DUMMY,O

.WORD

DETRO,DETR1,DETR2,DETR3,DETR4,DETRS,DETSP,DETPSW,0

002176
000000
002202
002210
002216
002150
000000
002176
002246

002176

002204
002212
000000
000000
885223

DT10:
DT11:

DT12:
DT13:

.WORD
.WORD

.WORD

ERRPC,CSR,O0

CSR,0
ERRPC,DUMMY,ADDRESS,DUMMY,TSTDAT,TSTDAT+2,CHECK,CSR,0

002150
177572
172516

000000

177574

DT14:

.WORD

CONTRL,MMRO,MMR1,MMR2,MMR3,CPUERR,O

002176

002176
002050
002056

DT16:

.WORD

ERRPC,DUMMY,DUMMY,GOOD,GO0OD2,G00D3

.WORD

BAD,BADZ2,BAD3,DUMMY,DUMMY,O

002052

DT20:

.WORD

ERRPC,DUMMY,O

000000
885?32

DT22:
DT23:

.WORD
.WORD

ERRPC,DUMMY,0
ERRPC,DUMMY,GOOD,PAD,DUMMY
,DUMMY, DUMMY , DUMMY, 0

885%;2

DT24:

.WORD

002150

DT25:

.WORD

ERRPC,GO0D,CSR,CSRNC,
0

000000
002034

DT26:
DT27:

.WORD
.WORD

ERRPC,BAD,0O
ERRPC,DUMMY,
ADDRESS, DUMMY, DUMMY , DUMMY ,DUMMY, 0

ggsigg

DT30:

.WORD

ERRPC,DUMMY,DUMMY,GOOD,BAD,CSR,DUMMY,0

002046

002054
002176
002.76
€d2044
002176
002176
002176
002176
002176
002176
000000
002044
000000
002052
002176
002176
000000
002176
002052
000000

177766

000000
000000

000000

002176

DT17:

ERRPC,GO0D,BAD,0

ERRPC,DUMMY,CSR, DUMMY,CUMMY ,DUMMY,DUMMY, O

CVMJUARQ MSV11-J MEMONY DIAG.
ERROR DATA FORMATS (DF)

14673
14674 060556
14675 060557
060562

060565

14676 060603

060606
060611
060614
14677 060616
060621
060624
060627
14678 060631
060634
060637
060642
14679 060644
060647
060652
060655
14680 060657
060662
060665
060670
14681 060672
14682 060674
060677
14683 060701
060704
060707
14684 060712
060715

060720
14685 060722
060725
060730
14686 060731
060734
060737
14687 060740
060743
060746

15-Feb-85

116

16:10

Page 467

SEQ 0410

DF1:
DF2:

.SBTTL
.BYTE
.BYTE

SRROR DATA FORMATS (DF)

000
000
006

DF3:

.BYTE

0,5,0,8.,0,0,0,3,6,2.4

000
010
006

DF4.:

.BYTE

0,5,0,8.,0,8.,8.,3,6,2,4

000
011
006

DFS:

.BYTE

0,5,0.8.,9.,9.,9.,3,6,2,4

000
010
006

DF6:

.BYTE

0,5,0,8.,9.,8.,8.,3,6,2.4

010
011
011

DF7:

.BYTE

0.5.8..0,0,9.,0,0,9.,2,4

DF8:

DF9:

.BYTE
.BYTE

0.1,1.1,1

DF11:

.BYTE

0.5,0.,8.,0,0,0,0,0

DF13:

.BYTE

0,5,0,0,3,6,2.4

000
002

OF14:

.BYTE

0.5.0.3,6,2.4

005
003

000
006

DF1S:

.BYTE

0,5.0,8..3,6.4

005
000

010
003

DF16:

.BYTE

0.5.8.,0,0,3,4

000
000
000

000

060570
060573

060576
060601

MACRO v05.01b Fri;day

0.0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

000

005
000
003
004
005
000
003
004
005
011
003
004
005
011
003
004
00S
000
000
004
005
001
001
005
000
000
005
003
004
005
006

001
000
000
000
000
006

0.5

CVMUAAO MSV11-J MEMORY DIAG.
ERROR MESSAGES (EM)

14690
14696 060747
060752

060755
000760
060763
060766
060771
060774
060777
061002
14697 061005
061010
061013
061016

061021
061024
061027
061032
061035
14698 061037
061042
061045
061050
061053
061056
061061
061064
061067

061072
061075

061100
061103

14699 061105
061110

061113
061116

06112l
061124
061127
061132
061133
061140
061143
061146
061151
061154
061157

14700 061162

061165
061170
061173
061176
061201
061204

14701 061207
061212

103
047
123

040
040

124
117

040
040

122
120
111

040

122
050

040
040
116

060
116
055
111
101

040

115
131

110

105

040
040
116
060
111

105
114
122
105
122
104

101

124
105
062
102
040

104
111
115
063
101
124
105
117
123
111
102
113
000

117
105
123

116

115
117
040
117
123
111
102
113

000
114

107
040
040
123
126
040
123
125
111

040
122
040
040

051
116
120
124
040
101
124
064
105
122

MACRO V05.01b Friday 15-Feb 85

J16

16:10

Page 469

SEQ 0411
EM2:

.SBTTL
.ASCIZ

ERROR MESSAGES (EM)
/CAN'T SET 22 BIT MODE IN MMR3/

EM3:

.ASCIZ

/PARITY ERROR(S) IN BANK 0/

116
130
124
124
105
122
050
114
051
116
101
040

EM4

.ASCIZ

/NON-EXISTANT MEMORY (HOLES) IN BANK 0/

114
101

EMS:

.ASCIZ

/ILLEGAL OR RESERVED INSTRUCTION (TRAP TO 10)/

EM6:

.ASCIZ

/UNEXPECTED TRAP TO 4/

EM7:

.ASCIZ

/MEMORY MANAGEMENT (TRAP TO 250)/

116
040
124
062
111

115
105
116
115
000
122
131
122
122
051
116
101
040

117

122
105

105

111
124
103
117
050
101
124

061
000

105
105
105
124
120
11?7

900
115
131

CVHMJAAQ MSV11-J MEMORY DIAG
ERROR MESSAGES (EM)

061215

061220

061223
061226
061231

061234
061237

061242
061245
14702 061247

061252
061253
061260
061263
061266
14703 061271
061274
061277
061302
061305
061310
061313

14704 061315
061320
061323
061326
061331
061334
061337
061342
061345
14705 061347

061352
061355
061360
061363
061366

061371
061374
061377
061402

061405
061410

14706 061413
061416
061421
061424
061427
061432
061433
061440
061441

061446
061451
061454
061457

14707 061461

040
116

105

116

050
101
124
062
051
115

117

040

124
105
117
104

101
105
105
117
104
120
115
123
107
130
103
104
102
106
107

127

124
102
105
101
105

124
103
101

123

040
101
106

114

040
040

124
116
ie?
12¢
127
119
102
106
107
115

115
101
115
124
124
120
117
065
000
105
122
104
101
122
122
105
11t
104
122
122
125
000
111
111
040
120
124

040

105
114
000
122
105
131

040
111
104

117
114
122
102
106
107
101
105
124
107

040
124
122

MACRO v05.01b Fridey

101
107
105

040
122
040
040
060

115
131
101

EML1:

.ASCIZ

/MEMORY DATA ERROR/

EM12:

.ASCIZ

/DETAILED ERROR DUMP/

EM13:

.ASCIZ

/MISSING EXPECTED SBE FLAG/

EM14:

.ASCIZ

/WRITE BYTE FAILED TO CLEAR SBE FLAG/

EM1S:

.ASCIZ

/FAILED TO GET

EM1Y:

.ASCIZ

/MEMORY DATA ERROR IN CHECK BITS/

040

122

000

124
114

040
122
040

115
123

116

105
105
105
123

040

1C2

111
040
124
106
114

040
040

105

040
105

114

000
111
104

INTERRUPT WITH DBE FLAG/

117
105

111

105
125

040

105
114

040
101

000
105

Page 469-1

SEQ 0412

124

111
040

K16

15-Feb-85 16:10

124
104

115

CVMJUAAQ MSV11-J MEMORY DIAG.
ERROR MESSAGES (EM)
061464
061467
061472
061475
061500
061503
061506
061511
061514
061317
14708 061521
061524
061527
061532
061535
061540
061543
061546
061531
061554

061557
061562
061565

061570
14709 061573
061576
061601
061604
061607
061612
061615
061620
061623
061626
061631
061634
061637
061642
061645
061650
14710 061652
061655
061660
061663
061666
061671
061674
061677
061702
061705
14711 061706
061711
061714
061717
061722
061725
061730

117
040

124
105
117
111
103
103
102
123
123
055
105
101

105
120

111

040

101
127

116
116

122
104
101
122
122
116
110
113
111
000
102
104

040

125
104
101
124
124
120
110

040

110
111
104
102
104

102
105
123
055
105
111
116
040
125

040

122
131
122

040

040
105
105
102
104
123
035
105
116
101
105
124

124
117

000
115
123

107
130
103
104
102

104
117
103
123
120
111

101

127

116
116
114
000
102
104
040
040
123
122

105

040
122

111
111
040
120

124

040

105

MACRO V05.01b Friday

15-Feb B85

L1o

16.10

Page 469 2

SEQ 0413

131
101
040
122
040
040

105

040

124

105
102
103
123

EM19:

.ASCIZ

/SBE-DBE CAUSED PARITY TRAP WHEN INHIBITED/

EM20:

.ASCIZ

/SBE-DBE DID NOT CAUSE PARITY TRAP WHEN ENABLED/

EM21:

.ASCIZ

/SBE-DBE ON MASTER TEST WORD/

EM22:

.ASCIZ

/MISSING EXFECTED DBE/

040

122
131
122

040

105
111
111
124
000
105
102
104
040
124
101
105
101
124
124
120
110

040

101
105

105
102
117
115
124
040
123

127

104

123
116

105
105
105
104

000

CVMJAAQ MSV11-J MEMORY DIAG.
ERROR MESSAGES (EM)

14712 061733
061736
061741
061744
061747
061752

061755
061760

14713 061762
061765
061770
061773
061776
062001
062004
062007
062012
062015
062020
062023
062026
062031
062034
062037
14714 062041
062044
062047
062052
062055
062060
062063
14715 062066
062071
062074
062077
062102
062105
062110
062113
062116
062121
062124
062127
062132
062135
14716 062137
062142
062145
062150
062153
062156
062161
062164
062167
062172
062175
062200

125
130
103
104
101
124
124
120
122
105
105
104
040
101
127
116
130
103
116
117
131
102
106
107
103
103
102

040

124
105
117
101
122
123
101
124
105
117

104
040
124
101

105
102
124
105
040
110
111

115
103
117
124

040
111
122
0sS

116
120
124
040
122

131
122

000

105
111
104
102
106
107
110

040

120
124
107
116
049
105
114
000
110
113
111
104
101
122
122
104
105

040

122
131
122
122
111
116
040
125

040

117

000

103

111
111
124

117

040
111

105

106
114
105
040

MACRO v05.01b Friday

M16

15-Feb-85 16:10

Page 4:3-3

SEQ 0414
105
105
105
120
111
040
101

EM23:

.ASCIZ

/UNEXPECTED PARITY TRAP/

103

EM24

.ASCIZ

/RECEIVED DBE FLAG WHEN EXPECTING ONLY SBE FLAG/

EM2S:

.ASCIZ

/CHECK BIT DATA ERROR/

EM26:

.ASCIZ

/ADDRESS PARITY ERROR DID NOT CAUSE ABORT/

EM27:

.ASCIZ

/ECC INHIBIT MODE POINTER FAILURE - DID NOT PROTECT BANK/

126
040

105
114
040
105
105
105
111
040
114

123

040
101

105

040
124
101
040

122

000
104

123
120
111

040

122

040

104

117
103
123
101
122

103

116
102
040
104
120
116

122

101
125

040

104

CVMJURAQ MSV11-J MEMORY OIAG.
ERROR MESSAGES (EM)
062203
062206
062211
062214
062217
062222
062225
14717 062227
062232
062235
062240
062243
062246
062251
062254
062257
062262
062265
062270
062273
062276
062301
062304
062307
14718 062311
062314
062317
062322
062325
062330
062333
062336
062341
062344
062347
062352
062355
062360
062363
062366
062371
062374
14719 062375
062400
062403
062406
062411
062414
062417
14720 062421
06°424
062427
062432

062435

062440
062443
062446

111
116
040

117
103
102
13
103
122
124
116
101
125
040
124
105
040
101

105
117

106
103
040

105
127
124

102
105
111

040

103
116
114
040
111
104
117
114
122
101

040

200
106
103
040
105
117
124
116
115
102
063
054

062
040

124
105

104

117
120
124
124

101
000

117
105

111
040
111
122

127

110
103
105
102
104
116

117

105
123
000
122
105
131

040

124
105

040
101

105
106
114

040
040
105
040
124
101

MACRO V05.01b Friday 15-Feb 85 16:10

105
040
116
122
103
117
106
114
105

EM29:

.ASCIZ

/CORREZTION FAILURE WITH ECC ENABLED ON FORCED SBE/

111
040
124

EM30:

.ASCII

/WRITE BYTE WITH ECC ENABLED FAILED TO CLEAR DATA AT/<CRLF>

.ASCIZ

/FORCED SBE LOCATION/

.ASCIZ

/MOVB #360,(R2)+ WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/

111
040
103
116
114
040
040
122
104
102

127
110
103
105

102
104
101
105
124
103
101
104
101
124
122
104
102

117

126
043
060
122
053
111
040
103

040
066
050
051

127
110
103

SEQ 0415

040
124
122

117
i05
123
040
103
111

000

Page 469-4

114
101
117

EM32:

CVMUAAQ MSV11-J MEMORY DIAG.
ERROR MESSAGES (EM)
062451
062454
062457
062462
062465
062470
062473
062476
062501
062504
062507
062512
062515
062520
062523
14721 062526
062531
062534
062537
062542
062545
062550
062553
062356
062561
062564
062567
062572

062575
062600
062603
062606
062611
062614
062617
062622
062625
062630
062633
14722 062634
062637
062642
062645
062650
062653
062656
062661
062664

062667
062672
062675
062700
062703
062706
062711
062714
062717

040
101
105

103
116
104
101

040
040
122
104

102
114
101
117
115

040

067

060

050
051
111
040

103

116
114
040
101

105
104
101
124
117
105
104

040

103
111
000
125

130
103
104
117
105
111
040
124
105
040

123
114
117
106
103

040

105

105
102
104
110
107
040
124
101
106
103

040

MACRO V05.01b Friday

116

000

043
067
060
122
040
124

105

040
101

105
103
116
104
101

040
040

122
104
102
112
101
117
116
120
124
040
122
103

117
127
110

103
104
101
105
116

117
105
123

000

SEQ 0416

101
105
104
101
124
117
105
104

040

117

Page 469 S

116
114
40

105

117
124

15-Feb-85 16:10

103
111

126
061

EM33:

.ASCIZ

/MOV #177400,(R1) WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/

EM35:

.ASCIZ

/UNEXPECTED CORRECTION WITH ECC DISABLE ON FORCED SBE/

064
054
061

127

110
103
105
102
104
110
107
040
124
101

106

103

040

105
117
124

116

105
105
105
103
122
124
116
111

040

103
111
102

040
040
122
104

102

CVMJAARO MSV11-J MEMORY DIAG.

ERROR MESSAGES (EM)

14723 062721

101

120

123
105
111
107
105
127

062724
062727
062732
062735
062740
062743

040
132
104
101
105
040

062757
062762

115
111

040
132

116
040
102
105
101
105
103
104
111
040

103
107
102
040
111
104
117
111
117
103

062746
062751
062754

0627635
14724 062770
062773
062776
063001
063004
063007
063012
063015
063020
063023
063026

124
120
107

116
102

110
122
122

107
122

MACRO Vv05.01b Friday 15-Feb-85 16:10

124

111
040
123
122
123
111

000

101

110
117
114
106
114
040
116
124
116
117

105
124
124

123
105
000

063045

040

105

122

063050
063053

101

063075

122
040
104
123
107
105
124
000

063101
063104
063107
063112
063115
063120
063123
063126

107
116
040
124
116
117
105
125

123
117
123
040
040
122
104
116

102

111

063056
063061
063064
063067
063072

14726 063076

106

063131
063134
063137
063142
063145

117
105
105
123
000

063151
063154
063157
063162

040
124
122
122

14727 063146

063165

116

117
101
122
123
105
122
105

114

122
103
104
102

123
040
122
040
040

.ASCIZ

/APT SIZE DISAGREES WITH PROGRAM SIZING/

EMA40:

.ASCIZ

/BRANCH GOBBLE FAILED CONDITION CODES TEST/

EMS0:

.ASCIZ

/BAD ERROR ADDRESS GENERATED/

EMS1:

.ASCIZ

/FLAGS NOT SET ON FORCED UNCORRECTED SBE/

EMS2:

.ASCIZ

/BIT SET ERROR IN CSR/

123
111

104
040
123

102

EM36:

040
117
101

063031
063034
063037

14725 063042

Page 469-6

104

122
104
105
040
116
101
104

101

040
124
105
117
106
103
040
103

122
124
040
105

124

105
105
117
111
103

SEQ 0417

CVMJUAAQ MSV11-J MEMORY DIAG.
ERROR MESSAGES (EM)
063170
14728 063173
063176
263201
063204
063207
063212
063215
063220
14729 063222

123
102
040
105
040

063246
063251
063254
063257
063262
063265
063270
063273
1473} 063275
063300
063303

105
117

111
122
104
101
040

063322
063325
063330

063404

103
101

113

063306
063311
063314
063317

14733 063405
063410
063413
063416
063421
063424
14734 063426
063431

111

111
103
000
114
107
040
122
131
000
101
120
111
040
101
107
105
124
000
122
107
110

063225
063230
063233
063236
063241
14730 063243

063333
063336
063341
14732 063343
063346
063351
063354
063357
063362
063363
063370
063373
063376
063401

122

040
104

105
122
122

120
103

EMS3:

.ASCIZ

/BIT CLEAR ERROR IN CSR/

114
101
103

EMS5:

.ASCIZ

/ILLEGAL CSR TYPE/

104
101
124
i24
120
105
122
105

EMS6:

.ASCIZ

/BAD PARITY TRAP GENERATED/

117

EMS7:

.ASCIZ

/WRONG CHECK BIT READ BACK FROM MEMORY/

EM60:

.ASCIZ

/UWRONG SYNDROME BITS READ INTO CSR/

122
120
124
105
117

EM61:

.ASCIZ

/CSR UPDATE ERRCR/

117
123

EM62:

.ASCIZ

/PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/

040

120

040

105

040
124

105

040

107
131

040
116

105

040
124
122
104
116
040
122

111
040

101
111

117
123

123
125
101

040

122
000
122
105

Page 469-7

124
114
122
122
122
116
123

117
115
117

122

124
103
000
103

000

103
106
115
105
122

000
122

040

MACRO v05.01b Friday 15-Feb-85 16:10

117

SEQ 0418

CVMJAAQ MSV11-J MEMORY DIAG.
ERROR MESSAGES (EM)
063434
063437
063442
063445
063450
063453
063456
063461
063464
063467
063472
063475
063500

123
040
124
125

117
105
102
124
123
111
116
124

000

117

116
040
120
122
104
131
110
040
101

117

111

MACRO V05.01b Fridey 15-Feb-85 16:10

122

117
123
120
124

040
040
111
104

107
123
103

Page 469 8

SEQ 0419

CVMJARO MSV11-J MEMORY DIAG.
ERROR DATA HEADERS (DH)
14737
14738 063501
063504
063507
063512
063515

063520
063523
063526
063531
063534
14739 063536
063541
063544
063547
063552
063555
063560

14740 063561
063564
063567

063572
063575
063600
063603
063606
063611

063614
1474] 063615
063620
063623
063626
063631
063634
063637
063642

063645
063650
063653
063656

063661
063664
063667
063672
14742 063674
063677
063702
063705
063710
063713
063716
063721
063724
063727
063732

063735
063740

040

040
103
040
126
104
040

040
104
0«0
104
040

040

117

040
104
040

103

040
055
040
055
000
040

103
040
124
104
040
117
105
117
000
040

103

040

115

060
040
115
040
040
122
040
115
063
040
125
122
040
103
040
124
122
040
111
040
120
103
040
111
000

117

102
000
040
040

107
103
102
103
040

040
061
040
104
043
106
122
122
040
040
040

115

040
040

122
040
115
062
040
115
040
103
105
000
040
040
101
120
040
114
132
040
124
103
115
132

MACRO V05.01b Friday 15-Feb-85 16:10

Page 471

SEQ 0420

120
040
105
101
040
107
104
040
101

DH1:

.SBTTL
.ASCIZ

ERROR DATA HEADERS (DH)
GOGD
DEV ADD
s PC

120

DH2:

.ASCIZ

GD CC BD-CC/

DH3:

.ASCIZ

1ST ADD

DHS:

.ASCIZ

MMRO

MMR1

MMR2

MMR3

DH6:

.ASCIZ

APTPAR

LSIZE

APTECC

MSIZE/

040

BAD/

104
103
104
103
120

040

# OF ERRORS/

123

101
040
040
040
122
123

120

040
040

122
040
115
061
040
115
040
040
122
040
120
122
120
040
120
101
040

123
105

101

105

040

123
105

CPUERR/

CVMJARO MSV11-J MEMORY DIAG.
ERROR DATA HEADERS (DH)
14743 063741
063744
063747
063752
063755
063760

063763
063766

063771
063774
063777
064002
14744 064005
064010
064013
064016
064021
064024

064027
064032
064035
064040
064043
064046
14745 064051
064054
064057
064062
064065
064070
064073
064076
064101
064104
064107
064112
064115
064120
064123
064126
054131
064134
064137
064142
064145
14746 064147
064152
064155
064160
064163
14747 064165
064170
14748 064172
064175
06420C
064203
064206

040

103

040

101

040

101

040

040
101
040
040

117

040
040

101
040
040
122

103

040

124
040

124

101
040
060
040
040
040
040
122
040
040
063
040
040
040
040
122
040
040
120
040
040

127

040

103

040
040
122
040
122
040
103
040
101
040

040
040
040
116

040
104
040
040
104
040
040
117
040
040
104
040
130
040
123
040
131
111
040
124
040
040
040
122
040
040

062
040
040
040
040
122
040
040
065
040

040
040
040
120
000
040
040
040

103
000
103
000
040
04¢
040
116

040

MACRO V05.01b Fridey 15-Feb-85 16:10

Page 471-1

BANK

.ASCIZ

DH10:

.ASCIZ

120
040
040
123

DH11:

.ASCIZ

CSR/

123

DH1Z2:

.ASCIZ

/ CSR/

120

DH13:

.ASCII

DH7:

PADD

VADD

.ASCII

120
040

SEQ 0421

Goon/

102
113
126

104
040
120
104
040
107
104
040
102
040
040
117
040
122
115
120
116
120
000
122
040
040
061
040
040
040
040
122
040
040
064
040
040
040
040
123
040
040
123

040
102

113
126

XOR

BAD

BANK

CSR

VADD

MTYP INT PAT/

PADD

WROTE1

WROTE2/

PSW/

CVMJURAO MSV11-J MEMORY DIAG.
ERROR DATA HEADERS (DH)
064211
064214
064217
064222
064225
064230
064233
064236
064241
064244
14749 064247
064252
064255
064260
064263
064266
14750 064267
064272
064275
064300
064303
064306
064311
064314
064317
064322
064325
064330

064333

064336
064341
064344
14751 064346
064351
064354
064357
064362
064365
064370
064373
064376
064401
064404
064407
064412
064415
064420
14752 064423
064426
064431
064434
064437
064442
064445
064450
064453
064456

101
040
040
101
040
040

117
061

127
124

C40

113
124

104
040
040
104
040

127
124

040
122

105
103
102
123

040

000
103
124
040
115
060
040
115
040
040
122
040
115
063
040
125
122
040
103
040
101
040
040
104
040
104
104
040
055
062

122
040
115
040
040
122
040
115
062
040
115
040
103
105
000
040
040
040
116
040
120
104
040
055
061
107

103

107
103

040

104
104
102
055
062
102
055
113
116

123

117

127

040
104
110
102
055
061
101
127
040
101
103
040
124

MACRO V05.0ib Fridey 15-Feb-85 16:10

Page 471-2

SEQ 0422

104
040

120
104

040
122

105

040

117
062
110
111
040
040
122
116
114

CSR/

.ASCIZ

/ CHKBITS

DH14:

.ASCIZ

/CONTRL

DH15:

.ASCII

.ASCIZ

/ BAD-WD1 BAD-WD2

MMRO

MMR1

MMR2

MMR3

CPUERR/

PADD

GD-WD1

GD-WD2

GD-CHK/

040

122
040

115

061
040

115

040
040
122

040
120
122
120
040

BANK

102
113
040
101
040
107

127

040
104
104
040
055

113
101

127

040

104
104

040
104
110
111
040

BAD-CHK INT PAT/

CVMJUAARO MSV11-J MEMORY DIAG.
ERROR DATA HEADERS (DH)
064461
064464
14753 064465

064470
064473
064476
064501
14754 064502
064505
14755 0645C7
064512
064515
064520
064523
064526
064531
064534
064537
064542
064545
064550
064553
064556
064561
064564
14756 064566
064571
064574
064577
064602
064605
064610
064613
064616
064621
064624
064627
064632
064635
064640
064643
14757 064645
064650
064653
064656
064661
064664
064667

064672
064675
064700
064703
064706
064711

14758 064714

064717
064722

120
000
040

103

040
101
000
040

103

040

103

040

101

040

055
122
050
122

040

122
115
120
116

040

124

040

103
040
101
040
055
122
101
105
040
122
115
120
116

040

124

040

103

040

101

040

103
051
123
040

131

111
040

101

040

103

040

MACRO V05.01b Friday 15-Feb-85 16:10

Page 471 3

SEQ 0423

101

124

040

120
040
102
113

DH16:

.ASCIZ

040
000

120

DH19:

.ASCIZ

PC/

120

DH20:

.ASCIZ

©PC

BANK GD-CSR

CSR

MTYP INT

PAT/

DH23:

.ASCIZ

BANK GD-ERR BAD-ERR CSR

MTYP INT

PAT/

:
DH24

.ASCIZ

BANK

(CSR) CSR

DH2S:

.ASCIZ

GD-DAT

(CSR)

040
040
116

040
040
040
116
107
103
040
103
051

103

040

124

040
124
120
000
040
040
040
116
107

105

040
104

122
103

040
124

040
124
i20
000
040
040
040
116

040

123
040
122
115
120
116
040
124

040
040

040

BANK/

(CSR)

102
113
104
123

040

123

040

123
040
131
111
040
101
120
040

102
113
104
122

102
055
122
123
040
131
111
040
101

120
040
102
113
050
122
103
040
124
040

MTYP INT

124

120
000
120
040
107

CSRNO/

PAT/

CVMJAAOQ MSV11-J MEMORY DIAG.
ERROR DATA HEADERS (DH)
064725
064730
064733
064736
064741

064744

064,47
14759 064752
064755
064760
064763
064766
14760 064770
064773
064776
065001
065004
065007
065012
065015
065020
065023
065026
065031
065034

065037
065042
14761 065044
065047
065052
065055
065060

065063

104
101

040

123

040

103
116
040
103
102
103
105

040

103
040
101
040
101
040
040
101

040

103
040
124
040

124

040

103

040
101
040
120

065066
065071
065074
065077
065102

104
040
122

065110
065113
065116
065121

040

065105

105
040
105
123

040

124

055

124

050
122
040
123
117
040
040
101
117
000
040
040
040
116
040
104
040
040
104
040
123
040
131
120
000
040
040
040
116
040
101
040
040

117

040
040
101
040
122
120
000

iK1

MACRO V0S5.01b Friday 1S5-Feb-85 16:10

Page 471-4

SEQ 0424

104
040

103
051
040
122
000
120
040

DH26:

.ASCIZ

BADCODE/

DH27:

.ASC1Z

BANK

DH30:

.ASCIZ

BANK

104
104

120
040
102
113
126
104
040
120
104
040
122

VADD

PADD

CSR

MTYP PAT/

115
120
101

120

040
102
113
040
104
040
127
124
040
122
104
103
040
101

PADD

WROTE

READ

CSR

PAT/

CVMJUAAQ MSV11-J MEMORY DIAG.

MESSAGES
14764

14765 065123
065126
065131
065134
065137
065142
065145
065150
065153
065156
065161
065164
065167
065172
065175
065200
065203
14766 065205
065210
065213
065216
065221
065224
065227
065232

065235
065240
065243
065246
065251
065254
065257
14767 065262
065265
065270
065273
065276
065301
065304
065307
065312
065315
065320
065323
14768 065324
065327
065332
065335
065340
065343
065346
065351
065354
065357
065362
065365

200
040

040
040
040
040

040
040
040

115
131
117

111
122
111
040
120
200
040
040
040
040
040

040

040
040

040

061
040
122
102

113
200
040
040

040
040

040
040
040
040
040
040

063

¢40

0<+0
040
040
040
065
040
040
040
040
040
040

040
040
040
040
040
040
040
040

115
117
040
116
107
101
117
115
000
040
040
040
040

040
040
040
040
040
040
066

127
104
101
123

040
040
040
040

040
040
040
040
062

040

040
040

064
040
040
040
040
040

040

067
000

MACRO V05.01b Fridey 15 Feb-85 16:10

040
040

MSGOO1:

.SBTTL
.ASCIZ

MESSAGES
<CRLF>/

MSGOO02:

.ASCIZ

<CKLF>/

MSGO03:

.ASCII <CRLF>/

Page 473

SEQ 0425
MEMORY

CONFIGURATION MAP/

040
040

040

040
040
040

105
122
103
106
125
124
116
101

040
040
040
040
040
040
040
040
040
040

113
117
040
116
000
040

040
040
040
040
061
040
040
040
040
040

040
040
€40
040
040
040
040
066
040
940
040

.ASCIZ

16K WORD BANKS/

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO Vv05.01b Friday 15-Feb-85 16:10

Page 473-1

SEQ 0426

MESSAGES

14769 065367
065372
065375
065400
065403
065406
065411
065414
065417
065422
065425
14770 065430
065433
065436
065441
065444
065447
065452
065455
065460
065463
065466
065471
065474
14771 065475
065500
065503

065506
14772 065507

065512
065515
065520
065523
065526
065531
065534
065537
065542
14773 065544
065547
065552
065355
14774 065356
065561
065564
065567
14775 065570
065573
065576
065601
065604
0635607
065612
065615
065620
065623
065626

200
040
040
060
063
066
061

064
067

062
065
060
063
066
061
064
067
062
065
060
063
066
061
000
200
122

123

000
200
104
111
104
122
040

123
125

111
032
200
115
120
000
200
117
103
000
040
040

040
040
061
040

040
040
040
040
040

040
040
040
062
065
060
063
066
061
064
067
062
065
060
063
066
061
064
067
062
065
060
063

MSGOO4:

105
117

122
122
040

125
105
116
040

040
040
040
061
064

067
062
065
060
063
066
061
064
067
062
065
060
063
066
06l
064
067
062

040

101
111

124
103
117

000
115

124
105

.ASCII <CRLF>/

012345670123456701234567/

.ASCIZ

/7012345670123456701234567012345670123/

MSGOOS:

.ASCIZ

<CRLF>/ERRORS

116
106
105
124
120
116
122
124
116

MSGO06:

.ASCIZ

<CRLF>/UNDEFINED TRAP INSTRUCTION/<32>

105
131

MS5G009.

.ASCIZ

<CRLF>/MEMTYPE /

;MEMORY TYPE

<CRLF>/PROTECT /

;MEMORY PROTECTED

040

120
124
124

122
105

MSG010:

.ASC1Z

040

040
061
040
040
040
040
040
040
040
061
040

040
040
040
040
040
040
061
040
040
040
040

MSG11A:

.ASCIZ

CVMJUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 473-2

MESSAGES

065631
065634
065637
065642
065645
065650
065653
14776 065656
065661
065664
065667
065672
065675
065700
065703
065706
065711
065714
065717
065722
065725
065730
065733
065736
065741
14777 065744
065747
065752
065755
065760
065763
065766
065771
065774
065777
066002
066005
066010
066013
066016
066021
066024
066027
066032
066035
066040
14778 066041
14779 066043
14780 066045
14781
14782
14783
14784

066050
066053

066056
066060
066062
066064
066067
066072

040
061
040
040
040
040
040
040
040
040
040
061
040
040
040
049
040
040
040
064
040
040
040
040
040
064
067
062
065
060
063
066
061
064

067
062
065
060
063
066

061
064

067

062
065
000
061
067
060
063
066
130
040
000
200
122
040

040
040
040
040
040
040
061
040
060
040
040
040
040
040
040

040

063

040
040
040
040
040
040
040
066
065
060

063

066
061
064

067
062
065
060
063
066
061
064
067
062
065
060
063
066
000
000
061
064

067

000
000
000

103

040
040

040
040
040
061
040
040
000
040
040
040
040
040
040
062
040
040

MSGO11:

.ASCIZ

MSGO12:

.ASCIZ

/456701234567012345670123456701234567012345670123456701234567/

MSG118B:
MSG11C:

.ASCIZ
.ASCIZ
.ASCIZ

/Y/
/7
701234567/

MSGO13:

.ASCIZ
.ASCIZ
.BYTE
.ASCIZ

/X/
/ /
0,0

040

040
040
040
040
065
040
040
000
066
061
064
067
062
065
060
063
066
061
064

067
062
065
060
063
066
061
064
067

062
065
000

123

040
040

MSG110D:

MSGO14:
MSGO1S:
MSGO16:

<CRLF>/CSR

; SPACE

:FOR SINGLE ASCII CHARACTERS & TERMINATOR

SEQ 0427

CVMUARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 473-3

SEQ 0428

MESSAGES

066075
14785 066076
066101
066104
14786 066107
14787 066112
066115
14788 066116
066121
066124
066127

066132
066135
14789 066137
066142
066145
066150
066153
066156

066161
14790 066163
066166
066171
14791 066174
066177
066202
066205

066210

14792 066211
066214
066217
066222
066225
14793 066226
066231
066234
066237
066242
066245

066250

14794 066251
066254
066257
066262
066265
066270
14795 066273
066276
066301
66304
066307
066312
066315
066320
14796 066322
066325
066330

000
040
040
040
040
040
000

200
040

115
116

115
105
200
115

116
040
101
101
105
200
075
130
200
075
105
040
122
200
075

117

040
122
200
075
130
111
040
115

131
200
075

117
106
115
117

200
075
105
103
102
113
040

123
200

075

131

040
040
040
040

040
040
000
000
040

MSGO17:

.ASCIZ

M5G018:

MSGO19:

.ASCIZ
.ASCIZ

/
/7

106
103
115
104
117
000
103
115
104
101
111
102

123
117
101
040
104

MSG020:

.ASCI1Z

<CRLF>/FS COMMAND MODE/

117

MSGO21:

.ASCII

<CRLF>/COMMANDS AVAILABLE:/

040

.ASCII

<CRLF>/0

040
122
104

.ASCII

<CRLF>/1 = READ CSR/

062
040
101

040

.ASCII

<CRLF>/2 = LOAD CSR/

063
040
101
116
115

040
105
115
105
105
122

.ASCII

<CRLF>/3 = EXAMINE MEMORY/

064
040
104
131
105
122
065
040
114

040

.ASCII

<CRLF>/4 = MODIFY MEMORY/

040
123

.ASCII

<CRLF>/S = SELECT BANK & TEST/

.ASCII

<CRLF>/6 = TYPE CONFIG MAP/

040

072
060
040
111
061
040
101

103

117

124

101
040

124
124

066
040
120

101
123
126

/
/

;8 SPACES
;2@ SPACES
;3 SPACES

114

105
124

EXIT/

123

114
104
123

115
111
040
115
131

105
040
116
046

105

040

124
105

CVMUAAQ MSV11-J MEMORY DIAG.

MESSAGES

066333
066336
066341

040
116
107

14797 066346

200

MACRO V05.01b Friday 15 Feb-85 16:10

101

103
106
040
120

066351
066354
066357
066362
066365
066370

075
117
101
117
040
123

040
102
055
116
124
124

066375
066400
066403
066406
066411

075
122
122
125
101

040
122
040
115
122

066417
066422
066425
066430
066433

040
105
105
040
123

040
106
123
124
124

066440
066443
066446

075
105
106

114
117

040
124
111

040
125

123
040
114

14801 066460

200

061

14802 066510

200

066344

14798 066372

14799 066414

14800 066435

066451
066454

066457

200

124

067

117
111
115

040

ASCII

«<CRLF>/7 = SOB A-LONG TEST/

070

040

.ASCII

<CRLF>/8 = ERROR SUMMARY/

071

075

.ASCII

<CRLF>/9=

061

060

.ASCII

<CRLF>/10= SET FILL COUNT/

061

.ASCII

<CRLF>/11= ENTER KAMIKAZE MODE/

062

.ASCII

<CRLF>/12= EXIT KAMIKAZE MCDE/

.ASCII

<CRLF>/13= TURN CACHE OFF/

.ASCII

<CRLF>/14= TURN CACHE ON/

123
055
114
107
105
105
117
123
115
131

122
122
110
105

105
105
113
111
132
115
105

040
124
040
115
101
040
104

066513
066516
066521
066524
066527
066532

075
130
040
115
101
040

040
111
113
111
132
115

14803 066537

200

061

063

066.56
066561

040
106

117

106

061

064

122
103

'16
101

066535
066542
066545
066550
066553

14804 066562

066565

066570
066573

104

075
125
040
103

200

075

125
040

061

105

040
122
103
110

can

REFRESH TEST/

103
116

075
116
122
101
113
105
117

066463
066466
066471
066474
066477
066502
066505

Page 473 4

105
124
101
113
105
117

124
116
101
105

124

SEQ 0429

CVMJUARQ MSV11-J MEMORY DIAG.

MESSAGES

066576
066601
14805 066604

066607

066612
066615
066620

066623
066626

066631

14806 066634

066637

066642

066645
066650
066653
066656
14807 066657
066662

066665
066670
066673
066676
14808 066700
066703
066706
066711
066714
066717
14809 066722
14810 066725
066730
066733
066736
066741
066744
14811 066747
066752
066755
066760

14812 066763
066766
066771
066774
066777
067002
067005
14813 067007
067012
067015
067020
14814 067021

067024
067027
067032
067035
14815 067036

MACRO V05.01b Fridey 15 Feo 85 16:10

103

110

105

200

061
040
123
123
105
105
102

065
124

040

075
105
040
114

124
040
116
200
075
105
040
114
101
123
200
075
116
114

124
103
200
075
111
102
040
101
015
200
111

040
122
055

077
200
122
117
077
200
122
117
040

124
130
124
200
115
116
000
200
104
123
127

000
200

117

113

116

Page 473-5

.ASCII

<CRLF>/15= TEST SELECTED BANKS/

124
105
103
104
101

123

061
040
123
101
040
116

066

.ASCII

<CRLF>/16= TEST ALL BANKS/

06l
040
101
105
122
105
061
040
123
114

067
105
102
040
101

.ASCII

<CRLF>/17= ENABLE TRACE/

070
104
101
105
122
105
000
110
110
123
060
051
000
123

.ASCII

<CRLF>/13= DISABLE TRACE/

MSGO22:

.BYTE
.ASCIZ

15,12,0
<CRLF>/WHICH CSR(O-F)? /

MSG023:

.ASCIZ

<CRLF>/CSR WORD? /

MSG025:

.ASCIZ

<CRLF>/CSR DOES NOT EXIST/

117
101

MSGO26:

.ASCIZ

:/
<CRLF>/COMMAND

114
103

MSGO27:

.ASCIZ

~CRLF>/70LD CSR WAS/

MS5G028:

.ASCIZ

<CRLF>/CSR IS NOW/

124
103
012
127
103
103
050
106

040

103

040
122
040
103
040
105
116
040
111
000
103
115
104

117

124
124
114
102
113

127

104
000
123
104
123

117
105
123

072

040
122
101

040

103

123

SEQ 0430

CVMJUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 475 6

MESSAGES

067041
067044
067047
14816 067052
067055
067060
067063
067066
067071
14817 067072
067075
067100
067103
067106
14818 067111
067114
067117
067122
067125
067130
067133
067136
067141
067144
067147
14819 067151

067154
067157
067162
067165
14820 067170
067173
067176
067201

0, 7204
14821 Co7207
067212
067215
067220
067223
067226
067231
067234
067237
067242
14822 067245
067250
067253
067256
067261
067264
067267

067272

14823 067273
14824 067276
067301
067304

122
123
117
200
101
116
115
117
000
200
116

060
067
077
200

121
10

040
104
123
060
067
067
066
040

200
122

131
102
124
200
115
125
124
120
200
120
123
107
103
124
124
117
102
113
040
105

117

102
114
101

117

000
121
200
104
131

040
040

127

105
115
105
105
122
102
113
055
067
040
120
123
101
101
122
123
0S5
067
067
051
000
120
111
040

117

032
124

105

124
122
032
102
101
111
040
103

105
123
116
101

111
116
000
130
111
040
115

M5G029:

.ASCIZ

<CRLF>/EXAMINE MEMORY/

101
050
061
051
000
110
111
114
104
105
050
o6l
065
067
077

MSGO30:

.ASCIZ

<CRLF>/BANK(O 177)? /

MSGO31:

.ASCIZ

<CRLF>/PHYSICAL ADDRESS(0-17757776)? /

101
124
101
122
000
111

MSGO32:

.ASCIZ

<CRLF>/PARITY ABORT/<32>

MSGO33:

.ASCIZ

<CRLF>/TIMEQUT TRAP/<32>

MSGA34:

.ASCIZ

<CRLF>/BYPASSING CCC TESTS ON BANK /

MSGB34.:

.ASCIZ

/ DUE TO SBE LOCATIONS/

MSGO35:
MSGO36:

.ASCIZ
.ASCIZ

/Qv/

131

117

040
101
000

131
123
116
105

040

123

040

040
040

105
117
124
116

040
116
000
125
124
123
040
103
111
123

126
115
111
040

000
117
106
115

040

104

<CRLF>/MODIFY MEMORY/

SEQ 0431

CVMJAAQ MSV11-U MEMORY DIAG.

MACRO V05.01b Friday 15 Feb-85 16:10

Page 473-7

MESSAGES

067307
067312
14825 067315
067320
067323
067326
067331
14826 067334
067337
067342
067345
067350
14827 067352
067355
067360
067363
067366
067371
14828 067374
067377
067402
067405
067410
067413
067416
14829 067420
067423
067426
067431
067434
067437
067442
14830 067445
067450
067453
067456
067461
14831 067463
067466
067471
067474
067477
067502
14832 067505
067510
067513
067516
067521
067524
067527
067532
067535
14833 067540
067543
067546
067551
067554

105

122
200
104
101
040
123
200

124

111
116
040
200
120
040

127

101
077
200
114
124
101
040
124
124
200
116
116
040
103

123
114
200
123

060
067
040
200
123
060
101
040
077
200
040
103

105
131

040

131
105

012
200

123
103
120
124

115
131
117

040
124
127
040
104
101

123
117
000
111
125
116
040
124
040
123
105
040
116
046
105
000
102
113

117

101

105
101
105

124

124
055
051

000

124
124

040
124
111
040
124
105
101
040
120
101
040
131
012

124

124
117
114
105

117
000
114
104
101
101
000

101

040
040

MSGO37:

.ASCIZ

<CRLF>/0LD

DATA WAS

MSGO38:

.ASCIZ

<CRLF>/DATA IS NOW /

MSGO39:

.ASCIZ

<CRLF>/INPUT NEW DATA? /

MSG040:

.ASCIZ

<CRLF>/SELECT BANK & TEST/

MSGO41:

.ASCIZ

<CRLF>/BANK NOT ACCESSABLE/

MSGO042:

.ASCIZ

<CRLF>/TEST(0-47)? /

MS5G043:

.ASCIZ

<CRLF>/TEST O DATA 1S? /

MSGO46:

.ASCIZ

<CRLF>/T0 ESCAPE TYPE ANY KEY/<CRLF><12><12>

MSGO047:

.ASCIZ

<CRLF>/TEST COMPLETE/

127

116
124
105
104
101
000
105
103
102
113
040

123
101
040

124
103
123

102
000
105
050
064
077

105
040
104
101
123
000
117
123
120
124
105
116
113
200
000
105
040

115
105
000

SEQ 0432

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15 Feb-85 16:10

Page 473-8

MESSAGES

14834 067557
067562
067565
067570

067573
067576
067601
067604
067607
067612
nN67615
14835 067617
067622
067625
067630
067633
067636
067641
067644
067647
14836
14837 067652
067655
067660
067663
067666
14838 067671
067674
067677
067702
067705
067710
14839 067712
067715
067720
067723
067726
067731
067734
067737
067742
14840 067745
067750
067753
067756
067761
067764
14841 067767
067772
067775
14842 067776
070001
070004
070007
070012
070015
14843 070016

040
124

126
114
114
116
040
124
040
124

041

200
116
122
125
105
122
117
124
116
120
105
122
117
122
200
102
055
116
124
124
200
114
075
101
040
123
103
120
124
200
103
040
040
122
056
077
077
000
111

125
115

124
105
000
116

116
040
101
101
105
117
055
122
114
105
000
102
113
105
111
123
105
103
111
000

117
122
105
126
131
123

055
114

107
105

000

102

114
040

103
120
123

117
114

105

040

123

040

103

040
056
077
077
116
124
125
040
040
040

M5G048:

.ASCIZ

/ NOT AVAILABLE NOW - TRY LPTER!/

MSG049:

.ASCIZ

<CRLF>/BANK REQUIRES RELOCATION/

MSGO51:

.EVEN
.ASCIZ

/POWER RECOVERY/

117
101
117
040
123

MSGO55:

.ASCIZ

<CRLF>/50B-A-LONG TEST/

105
0490
105
110
101
040
115
105
000
040
122
040

MSGOS56:

.ASCIZ

<CRLF>/BELL

MSG058:

.ASCIZ

<CRLF>/

MSG061:

.ASCIZ

/2227

MSG062
:

.ASCIZ

/INPUT MUST BE A/

MSG063:

.ASCIZ

/N OCTAL

117
101
111
102

040

127

040
131
101

122
101

040

121
122

040
114
101

117

127

040

103
105

000

123
056
000
077
077
120

040

CSR

123
102
101

117

EACH PASS COMPLETE/

CSR .../

SEQ 0433

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15 Feb 85 16:10

Page 473 9

MESSAGES

070021
070024
14844 070027

070032
070035
14845 070037
070042
070045
070050
14846 070051
070054
070057
070062
070065
070070
070073
070076
070101
070104

070107
070112

070115

14847 070120
070123
070126
14848 070127
070132

103

114

116
102
200
040

103
101

000

200
122
123

040
040

101
122
116
106
040
104
103
111
106
101
009
113
117

070140
070143
070146
070151

123
106
105
122
124
101

14849 070160
070163
070166

200
106
123

070135

070154
070157

070171
070174
14850 070176
070201
070204
070207
070212
070215
070220
070223
070226
14851 070230
070233
070236
070241
070244
070247
14852 070251
070254
070257

000

124
124
200
114

101
117

116
040

123
102
032
200
102
113
105
117
200
200
104
101

124
040
125
105
000
104
111
114
105
117

040
062
055
102
124

107
117
130
120
110
116
101
114
040
122
040
040
115
131

117
114
122
122
110
105
000
122
117
124
116
117
120
123
114
000

040
101
040
122
122
000

105

040

123

101
000

115
122

M5G064:

.ASCIZ

/NUMBER/ <CRLF >

105
115

MSG065:

.ASCIZ

/ DECIMAL /

122
122
076
060
040

MSGO66:

.ASCIZ

<CRLF>/ERRORS > 20 - ABORTING FOR XXDP CHAIN/

MSGO67:

.ASCIZ

/FATAL

MSGO70:

.ASCIZ

/K WORDS OF MEMORY TOTAL/<CRLF>

105
105
040
123

MSGO73:

.ASCIZ

<CRLF>/REFRESH TEST/

205
103
111

MSGO75:

.ASCIZ

<CRLF>/RELOCATION NOT POSSIBLE/<32>

040
116
040
122
123

MSGO76:

.ASCIZ

<CRLF>/

116
120
123

MSGO77:

.ASCIZ

<CRLF>/END PASS #/

040

117

111
040

122
130
040
101
000
124

040

127
104
117
115
117

040

124
200

040
124

117

111
105

BANK

ERRORS/<CRLF>

SEQ 0434

CVMJUARO MSV11-J MEMORY DIAG.

MACRO v05.01b Friday 15-Feb-85 16:10

Pege 473-10

MESSAGES

070262
14853 070265
070270
070273
070276
070301
070304
070307
14854 070311
070314
070317
070322

070325
070330
070333

14855 070336
070341
070344
070347
070352
14856 070354
070357
070362
070365
070370
070373
14857 070376
070401
070404
070407
14858 070412
070415
070420
070423
14859 070424
070427
070432
070435
14860 070440
070443
14861 070446
070451
070454
14862 070456
070461
070464
070467
070472

070475
070500
070503
14863 070506
070511
070514
070517
070522
070525

040
040

043
105

040

104
105
105

122
050

124
124
200
200
114
103
116
117
101
077
200
122
114
124
113
200
120
126
117
123
103
200
105
123
103
040
040
120
000
122
117
124

040

102
113
040
105
075
200
124
111
040
115
101
040
104
200
101
116
113
111
132

000

122
122
051
105
103
104

MSGO79:

.ASCIZ

/ ERROR(S) DETECTED/<CRLF>

111
040
125
050
124
051
000
105
105
123
103

MSGO8S:

.ASCIZ

<CRLF>/FILL COUNT(COCTAL)? /

MSG088:

.ASCIZ

<CRLF>/KERNEL STACK/

125
122
123

MSG089:

.ASCIZ

<CRLF>/SUPERVISOR STACK/

125
122
124
113
111
105
124

123
040

MSG090:

.ASCIZ

<CRLF>/USER STACK/

123
115
131

MSGO91:

.ASCIZ

/ IS EMPTY/

105
103
105

MSGO092:

.ASCIZ

/RELOCATED

MSG093:

.ASCIZ

/BANK=/

MSGO95:

.ASCIZ

123

114
101
104
000
116
000
124
124

MSG101:

.ASCIZ

<CRLF>/ENTERING KAMIKAZE MODE/

113

116
122
107
101

MSG102:

.ASCIZ

<CRLF>/LEAVING KAMIKAZE MODE/

117
123

000

106
114

117
124

103
114

040
113
116
040
101
000
123
105
111
122
124
113

040
101
075
040
000
105
105
116
111
132
115
105
114
126
107
101
113
105

040
101
000

101

000

113
105
117
000
105
111
040
115
101
040

TEST=/

SEQ 0435

CVMJAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 473-11

MESSAGES

070530
070533
14864 070535
070540
070543
070546
070551
070554

14865 070557.
14866 070561
070564
070567
070572
070575
070600
070603
070606
070611
070614
070617
070622
070625
070630
070633

14867 070634

070637
070642

070645
070650
14868 070652
070655

070660
070663
070666
070671
070674
070677
070702
070705
070710
070713
070716
070721
070724
14869 070727
070732
070735
070740
070743
070746
070751
070754

070757
070762
070765
070770
14870 070773

115
105
200
101
116
106

115
105
032
200
124

040

116
040

125

040

115
122
060
124
124
115
101
000
200
103

040
040
106
200

103
040
040
040
130
120
104
111
040
124
114
101
105
123
200
114
123
105
105
102
113
127
114
105
105
105
200

117
000
114
126

107
123
117
200
000
105
105
102
113
055
123
116
102
040
060

117
105
111

124

103
1190
111

117

000
103
110
111

117

050
103
124
125
116
101
125
040
124
122
uSl
117
131

105
103
104

101
123
111
040
040

123
104
101

104
MSG103:

.ASCIZ

<CRLF>/LEAVING FS MODE/<CRLF>

MSG104:
MSG105:

.BYTE
.ASCIZ

32,0
; CONTROL Z
<CRLF>/ENTER BANKS - USE NUMBER 200 TO TERMINATE/

101
105
123
106

MSG106:

.ASCIZ

<CRLF>/CACHE IS OFF/

101
105
123
116
105
105
040
122
107
103
101
120
124
116
000
116
040
114
124

MSG107:

.ASCIZ

<CRLF>/CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)/

MSG110:

.ASCIZ

<CRLF>/ONLY SELECTED BANKS WILL BE TESTED/

MSG111:

.ASCIZ

<CRLF>/ALL BANKS WILL BE TESTED/

105
111
040

040

104
000
116
122

101
123
040
105
125
105

062
040
040
122
116

105

040
116
040

114
102
124

124

000
114

SEQ 0436

CVMJUAAQ MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

Page 473-12

MESSAGES

070776
071001
071004
071007
071012

071015

071020
071023
14871 071025
071030
071033
071036
071041
071044
071047

071052
071055

14872 071057
071062
071065
071070
071073
071076
14873 071100
071103
071106
071111

14874 071112
071115
071120
071123
14875 071124
071127
071132
14876 071133
071136
071141
071144
071147
071152
14877 071154
071157
071162
071165
071170
071173
14878 071174
071177
071202
071205
14879 071210
14880 071211
071214
071217
071222
071225
071230

114
101

123

111
040
040

123
104
113
106
055
123
101
124
115
117
200
113
106
103
115
117
200
200

040
116
040
114
102

102
113
127
114
105
105
105

040
040

117
121
125

MSG112:

.ASCIZ

/K OF @-BUS PARITY MEMORY/<CRLF>

117
105

MSG113:

.ASCIZ

/K OF ECC MEMORY/<CRLF>

124
124
000
102
040
122
131

105

120
111
040
115
131

122
000
040
040
103
105
122
000
040
061
070

040
061
064

M1184:

.ASCIZ

<CRLF>"

11/84"

200

040
061
070

040
061
063

MSG117:

.ASCIZ

<CRLF>"

11/83"

200
040
000
040
103

040
116

040

MSG119:

.ASCIZ

<CRLF>/

NO/

103
110
101
111
102
000
103
110
102
101
105

101
105
126

MSG120:

.ASCIZ

/ CACHE AVAILABLE/

101
105
131

MSG12l:

.ASCIZ

/ CACHE BYPASSED/

123

MS5G122:

.ASCII

<CRLF>/CSR NUMBER /

040
057
000
040
057
000

040
101

101
105
040
103
040
120
123
000
200
122
125

105

000
040
116
117
040

117
101

103
040
115
122

103
124
114
124

040
116

040

115
131

117

114
114

123
104
116
102

040

117
122
123
117
115
131

MSGAl22:. BYTE

.ASCIZ

/ CONTROLS TOO MANY BANKS/

SEQ 0437

CVMJAAO MSV11-J MEMORY DIAG.

MACRO v0S5.01b Friday 15-Feb-85 16:10

Page 473-13

SEQ 0438

MESSAGES

071233
071236
071241
14881 071242
071245
071250

071253
071256
071261
14882 071264
071267
071272

071275

071300
071303
071306
071311
071314
071317
071322
071325
071330
14883 071331
071334
071337
071342
071345
14884 071350
071353
071356
071361
071364
071367
14885 071370
071373
071376
071401
071404
071407
071412
071415
071420
14886 071422
071425
071430
071433
071436
071441
071444
071447
071452
071455
071460
071463
071466
14887 071471
14888 071474

040

116
000
040

123
123
117
114
105
200
117
101
103

040

125

040

124
105
105
122
116

000
200
101
040
101
105
200
101
€40
123
114
000
200
040
040
040

040
040

123
115
200
200
126
101
040
103
101
124
115

117

040
101

117

111
200
120

102
113

101
123

120
123
040

101
105
103
120
124
000
122
122

115
105
104
120
107
115
123
103
114
116
040
040
124
115
105

MSG125:

.ASCIZ

/ PASSES COMPLETED/

MSG126:

.ASCIZ

<CRLF>/PROGRAM CSR COULD NOT BE DETERMINED/

MSG127:

.ASCIZ

<CRLF>/TRACE ENABLED/

MSG128:

.ASCIZ

<CRLF>/TRACE DISABLED/

040
040
040
040
040
103
040
120

MSGO08:

.ASCIZ

<CRLF><CRLF>/

103
112
040
103
120

MSG000:

.ASCIZ

<CRLF>" CVMJAO

MSG129:
MSG130:

.ASCTZ
.ASCIZ

<CRLF><CRLF>
/PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/

040
122

117

104
117
102
104
105
111
104

124
103
105
102
104
124

122
105
116
114
000
122

104
101
105

111
102
104

103

200

040

040
040
040
040

122
101

000
040
115
060
105
057
122
131
105
122
104

107
123
103
200
122

105

CSR MAP/<CRLF>

ECC/PARITY MEMORY DIAGNOSTIC"

111
040
115
131
111
116

124
000
000
117

CVMJUAAQ MSV11-J MEMORY DIAG.

MACRO

.73.01b Friday 15-Feb-85 16:10

Page 473-14

MESSAGES

071477
071502
071505
071510
071513
071516
071521
071524
071527
071532
071535
071540
071543
071546
14889 071547
071552
071555
071560
071563
071566
071571
071574
071577
071602
071605
071610
14890
14896 071612
14897 071612
14898 071612
14902

103
123
040
124
125
117
105
102
124
123
111
116
124
000
200
111
123
105
122
127
114
117
102
124
124
200

010322
000200

105
117
116
040
120
122
104
131
110

123
122

117
123
120
124
040
040
111

040

104
107
123
103

125
102

116
125
115
117
040
114
116

101
117
111

040

115
131
111
040
124
105
105
105
000

NOUBMT:

.ASCIZ

<CRLF>/UNIBUS MEMORY WILL NOT BE TESTED/<CRLF>

040
040

123
104

END:

.EVEN
$$END

60000-SUPLIMIT
.PRINT
.END START3

; SUPERVISOR ADDRESSES LEFT

SEQ 0439

CVMJARO MSV11-J MEMORY DIAG.

Symbol teble
ABORT
ABORTF
ABORT1
ABORTZ2
ACFLAG
ACTFLA
ADORES
ANA2
APTDOW
APTECC
APTFLA
APTHAN

APTHLT
APTPAR

APTS1Z

BACK
BACKGN
BAD
BADPC
BADPSW
BADSP
BADSTA
BADXOR
BAD2
BAD3
BAFPAF

BAFPAR
BAKPAT

BANK
BANKIN
BANKMO
BANKOK
BAWPAF

BAWPAR
BGTEST
BITNO
8170

BIT1
8IT10
BIT11
B8IT12
BIT13
BITi4
81715
8IT2
8IT3
8IT4
8IS

|BITe

8117
8IT8
8IT9
8LOCK1
BLOCK2
BLOCKS
BMFLAG
BRGOBB

000000
002144
000032
100046
002116

002350
002034
007372
040720
002424

002352

014126
040766
002422
002444
051530
032630
002052
002022
002032
002026

034152

002060
002054
002056
014262
014370

002632
002102

002104
037442

040456
014476

014626
027610
002324
000001
000002
002000
004000
010000
020000
040000
100000
000004
000010

000020
000040
000100
000200
000400
001000
040770
041010
041024
002130
027612

BSIZE
80
81
810
8100
8101
8102
8103
B104
8105
8106
8107
811
812
813
Bl4
815
B16
817
82
820
821
822
823
824
B25
826

827

83
B30
B31
832
B33
B34
835
836
B37
84
B40
841

842
843

B44
845
B46
847
85
850
851
852
853
854
855
856
857
86
860

MACRO V05.01b Friday 15-Feb-85 16:10
002374
004652
005656
012262
045566
046040
046046
053522

053526
053624
053716
054002
013010
013060
013122
013400
014172
015610
016060
006050
016066
016104
016146
016220
021642
021646
022026

022034
006120

022264
025750
026140
026176
026620

026656

026672
027012
006400
027172
027214
027742
030102
030140
030432
030646
031050
006434
031224
031244
031254
031572
031742
031756
032022
034746
011544
034752

035112
035116
035322
035326
036444
036452
036602
012220
036616
043510
043746
044230
044524
044524
044622
045562
002550
CACHKN 002544
= 104424
CACHOF
CACHON= 104423
CACHVE= 000114
CBCSR - 104474
002316
CBITS

861
862
863
864
865
B66
867
B7
870
871
872
873
B74
B75
B76
B77
CACHKF

CBREG =
CB1CSR=
CHECK
CHKDIS=
CHKTRP
CHK1DI=
CKEND
CKSWR =
CLRCSR=
CLREX
CLRMEM
CLR1CS=
CMD16A
CMD16L=
cMD58
CMDSC
cMD78
CMD7C
CMD98B
CMO9C
CONFGE
CONFIE
CONFIG
CONTFL
CONTRL=
CONTS
CONTS1
CONTS2
CONTS3
CONTT
COUNT
CPERRF
CPSAVE
CPUBIT

104513
104475
002314
104504
032220
104505
055056
104410
104502
007342
007232
104503
044610
000074

042752
043246
043504
043560
044224
044300
002450
003670
002664
002222
177746
055226
054570
055230
047340
055152
002370
052314
052312
002106

Page 473-15
CPUERR=
=
CR
=
CRLF
CSR
CSRADD=
CSRBMP
CSRCAS
CSRFBA
CSRFIR
CSRHOL
CSRINC
CSRINF
CSRINT
CSRLAS
CSRLBA
CSRLOO

CSRMAP
CSRNO
CSROUT
CSRSTU=

CSR1S
CTEST
CTLKVE
DATARG=
DATBUF
DBEMSK
DDISP =
DEENER=
DETAIL
DETFLA
DETPSW
DETRO
DETR1
DETR2
DETR3
DETR4
DETRS
DETSP
DET1
DF1

DF11
DF13
DF14
DF15
DF16

DF2

DF3

DF4
DFS

DF6
DF7

DF8
OF9
DH1
DH10
DH11
DH12

177766
000015
000200
002150
172100
006024
017004
002232
002226
002526
002330
002462
002236
002230
002234
002332
006034
002152
035314
000021
002322
006714
002146
177754
002242
002256
177570
104421
053266
002220
002216
002200
002202
002204
002206
002210
002212
002214
053756
060556
060701
060712
060722
060731
060740
060557

SEQ 0440

064172
264267
064346
064465
064502
063536
064507

064645
064714
064752
064770
063561
063615
063674
063741
002004
002640
000174
013600

014162
006700
177570
060144
060264
060306

060314
060320
060342
060360

060410
060156
060416
060426
060434
060456
060476
060510
060516
060162

060616

060536
060172
060202
060220
060234
002176
000103

060657
060672
060674
063501
0640°1
06414/
064165

104471
104473
003670
000030
061247
061271
061315

060603

060631
060644

104470
104472

—

CVMJAAO MSV11-J MEMORY DIAG.
Symbol teble

EM14
EMIS
EM17
EM19
EM2
EM20
EM21
Em22
EM23
EM24
EM2S
EM26

€EM27

EM29
£M3
EM30
EM32
EM33
EM3S
EM36
EM4
£M40
EMS
EMSO
EMS1
EMS2
EMS3
EMSS
EMS6

EMS?7

EM6
EM60
EM61
EM62
EM?

ENASBE=
ENA1SB=
END
ENDADD
ENDFLG
ENERGI=
ENEXBK
EQFLAG
ERRADD
ERRGEN=
ERRMAX

ERROR =
ERRPC
ERRPSW
ERRSP
ERRVEC=
EVEN
EXBANK
EXCMD3
EXCMDA
EXIT
Ex1T2

061347
061413
061461
061521
060747
061573
061652
061706
061733
061762
062041
062066

062137

062227
061005
062311
062421
062526
062634
062721
061037
062770
061105
063042
063076
063146
063173
063222
063243

063275

061162
063343
063405
063426
061207
104506
104507
071612
002562
002564
104420
040446
002132
002460
104512
002554
104000
002020

002030
002024
000004
002364
040052
042040
042360
040604
040610

€0
el
E10
€100
€101
€102
€103
E104
€105
E106
E107
Ell
El2
€13
El4
E15
El6
E17
€2
E20
E21
€22
E23
E24
E25
E26
E27
€3
£30
E31
E32
E33
E34
E3S
€36
E37
€40
E4l
€42
E43
E44
€45
€46
E47?
ES
ES0
ES1
ES2
€53

ES4
€SS
ES6
ES7

€6
€60
tel

MACRO V05.01b Friday 15-Feb-85 16:10

004700
005776
012346
045622
046102

046102

053570
053570
053654
053750
054034
013052
013120
013150
013520
014260
015630
016414
006114
016374
016324
016324
016274
022004
021770
022172
022156
006210
022342
02€034
026414
026402
027164
027150
026764
027134
006622
027210
027234
030064
030270
030256
030536
031022
031220
006612
031542
031524
031510
031726
032212
032202
032170
035020
011676
035020
035164

€62
£63
E64
€65
£66
£67
E7
E70
EN
€72
E73
E74
E75
E76
ET7

FASTCI=
FATAL
$
FCMD10
FCMD11
FCMD12
FCMD13
FCMD14
FCMD15
FCMD16
FCMD17
FCMD18
FIELDS
F INDBA=
FINTS
FIRST =
FLIPLO
FLIPWA
FLUSH
FSCMDO
FSCMD1
FSCMD2
FSCMD3
FSCMD4
FSCMDS
FSCMD6
FSCMD7
FSCMD8
FSCMD9
FSINFL
FSPAT
FSSTAC
FS1
FSTFLA
FULLRE

035164
035356
035356
036602
036562
037016

012362

036730
043552
044050
044272
044564
044564
044640
045622

177640

002064
044364
044412
044434
044454
044476
044514
044600
044642
044656
041054
000067

007214

060000
002616
032500

013672

041252
041354
041464
041632
042106
042426
043344
043352
043644
044072
002442
043126
002306
041140
002446
002542
GBLENG= 000076
GETCSR 032674
045252
GETDAT
045350
GETDAL
051430
GETDIS
002044
00D
002046
GO0D2
002050
GO0D3

Page 473-16

GTSWR = 104407
002612
HEADER
040510
HIPAT
HOLDLO-=- 000016
HT
= 000011
002452
1
052310
IBSAVE
III1
= 177777
012724
ILLCSR
IMPTES
011750
040520
INCBNK
040474
INCPAY
040474
INCRPT
INHBAN
002540
002536
INHECC
INTFLA 002136
002140
INT64K
INVALI= 104511
IOTVEC= 000020
037076
JMPRL1
KAMIKA
002006
KAMITE
024234
KDIAG = 000010
KOPARO= 172360
KDPAR6= 172374
KDPAR7= 172376
KERNEL
= 104417
KERSTK= 002000
KFLAG
002530
KIPARO= 172340
KIPAR4
= 172350
KIPARS= 172352
KIPARG= 172354
KIPDRO= 172300
KMAP
= 104422
KPFLAG
002114
KSIZE
002376
KSTACK
002574
= 157776
LAST
LASTBA
002556
LASTBL
002560
LASTER 002016
LBLSO
000530
LBLS1
000107
LBLS2
000520
LBLS3
000513
LBLS4
000366
000370
LBLSS
LBLS6
000023
LCSROU= 000063
LCSRRE= 000101
LCSRSA= 000077
LEGALC= 000010
= 000012
LF
LINK1
002522
002524
LINK2
LKS
= 177546

SEQ 044)

L OADBA
LOADCS=
LOADER=
LOADHO
LOOP
LSIZE
LST$¢$ =
LWOBE =
LWSBE =
Lo
L1
L10
L100
L101
L102
L103
L104
L105
L106
L107
L1l
L110
L111
L112
L113
L114
L115
L116
L117
L12
L120
L121
L122
L123
L124
L125
L126
L127
L13
L130
L131
L132
L133
L134
L135
L136
L137
L14
1140
L14)
L142
1143
L144

L145
L146
L147
L1S

002432
104425
000065
002576
013552
002400
000000
000061
000057
004662
004724
005222

012334
012340
013042
013036
013042
013136
013206
013352
005230
013552
013510
013426
013420
013470
013504
013550
013552
005300

013666
013776
014006
014156
014156
014244
014356
014464
005274
014614
014744
015074
015246
015376
015550
01563C
015666
005300
015676

016324
016306
016356
016626
016736
017074
017122
005610

CVMJAARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

- L150
L151
L1S2
L153

017126
017130
017174
017230

L237
L24
L240
L241

026764
006156
026714
026726

L334
L33S
L336
L337

033434
033530
033520
033526

L416
L417
La2
L420

043044
0430 °
0065%
04307

LSOl
L502
L503
L504

051604
052044
052000
052024

L156
L157

017404
017764

L244
L245

026776
027134

L34}
L342

033562
033664

L423
L424

043536
044050

LS07
LS

052256
006700

Symbol teble

L154
L15S

L16

017234
017236

L242
L243

005610

L246

026744
026752
27034

L34
L340
L343

006374
033536
034532

La21
L42?2
L425

L160
L161
L162
L163
L164
L16S
L166

020370
020400
020400
020472
020502
020502
021036

L247
L2S
L250
L251
L252
L253
L254

27046
006146
027100
027064
027076
027122
027110

L344
L345
L346
L347
L35
L350
L351

L17
L170
L171

005724
021134
021754

L256
L257
L26

027234
030134
006154

L353
L354
L355

L173
L174
L175
Li76

021754
022020
022142
022120

L261
L262
L263
L266

030224
030242
030246
030364

005032

L27

006164

L363

036576

L445

L272
L273
L274
L276

030576
030722
030772
031132

L365
L366
L367
L3?

036720
036720
036700
006464

L447
L4S
L450
L451

023170
023424

L301
L302

031354
031430

L372
L373

036762
037012

L454
L455

L210
L1l
L212
L213
L214
L215S
L216
L217

023444
023544
023724
023732
024070
024076
024256
024264

L304
L31
L310
L311
L313
L314
L315
L316

031474
006262
031636
031700
032016
032022
032074
032076

L375
L376
L377
L4
L40
L400
L401
L402

040374
040556
040624
005072
006510
040630
040636
040652

L457
L460
L461
L462
L463
L464
L465
L466

L222
L223
L225
L226

025742
026022
026172
026176

L320
L321
L325
L326

032154
032160
032252
032250

L40S
L406
L407
La1

041106
041242
041302
006562

L167

Li72

L177

021070

021732

022142

L2SS

L260

L267

L20

005752

L2711

L204
L205

022464
022654

L277
L3

L21

005770

L200
L201
L202
L203

L206
L207

1220
L221

L227
L230
L231
L232
L235
L236

022326
022326
022434
022406

024270
025704

026272
026350
026366
026372
026642
026652

L3063

027122

030140

030522

030570

031202
005054

031446

L317
L32

032134
006266

L327
L33
L330
L33
L332
L333

032272
006332
032272
032410
032456
033034

L352

L356
L357
L36
L360
L361

L362

L364

L370
L3711
L374

L403
L404

L410
L411
L412
L413
L414
L415

034540
034776
034776
035040
006430
035046
035142

Page 473-17

035142
035204
035212
035334

036416
036432
006434
036444
036444

036546

036720

036720
036762
040204

040664
041076

021306
041336
041350
042536
042576
042636

L426
L427
L43
L430
L431
L432
L433

L434

L435
L436
L437

L44

L440
L44]
La42
L443

L4444

L446

L4S?2
L453

L456

L4a67
L470

L471
L472
L473
L474

L47S
L476
L477
LS
LSO
L500

043422
043424

044034

044004
044142
006554
044144
044256
044546
044550

045014

045030
045034
045052

006576

045200
045202
045246
045472

045600

SEQ 0442

LS50S
L506
LS510

LS11
LS12
L513
LS14
L515
L516
L517

LS52

LS20
LS21
L522

LS523

LS24
L52S
LS26
LS27

LS3

046060

LS30

047400
006602
050230
050242

LSS
LS6
LS7
L6

047376

050260
050262

LS4

L60
L61

052044
052064

052126

052254
052204
052216
052254
052264
052620
053546

010636

053752
053756
054036

054042

055044
055050
055172
055262

010642
055264

010644

011374
011410
011512
005230

011516
011662

050302
050314

L62
L63

050334
050350
050552
050560
050606
050620
050636
050650

L6S
L66
L67
L7
L70
L71
L72
L73

050752
051032
051046
051050

L76
012346
L77
012336
MAINT = 177750
MAPHO = 170202

050332

050662
050704

051164
051254
051264
005150
006636
051604

L64

L74
L7S

MAPKER
MAPLO =
MAPL1 =
MWPPER
MASK
MBERR

011662
011662

011662

011656
011734
011740
005230
011742
012124
012124
012124

012130
012346

037740
170200
170204
035716
002320
012602

CVMJARO MSV11-J MEMORY DIAG.

Symbol table

MEMDON 013620
MFPT
= 000007
MJPAT
017430
MJTEST 017324
IHKCNT
016476
MKCONT 015656
MKCSRT 017014
MKFLAG 002120
MKLOOP 016040
MKPAT
017244
MKTEST 017104
MMRO = 177572
MMRL
= 177574
MMR2
= 177576
MMR3 = 172516
MMTRAP 034126
MMVEC = 000250
MONFLG 002276

MSEEDH
MSEEDL

MSGA12
MSGA34
MSGB34
MSGOOO
MSGO01
MSG002
MSGOO3
MSGO04
MSGOOS
MSGO06

MSGO08
MSGO09
MSGO10
MSGO11
MSGO12
MSGO13
MSGO14
MSGO15

MSGO016
MSGO17
MSGO18
M>G019
MSGO20
MSGO21

002606
002610
071210
067207
067245
071422
065123
065205
065262
065367
065475
065507

071370
065544
065556
065656
065744
066056
066060
066062
066064
066076
066107
066112
066116
066137

MSG022
MSG023

066725
066747

MSGO26
MSGO27
MSGO28
MSGO29
MSGO30
MSGO31

067007
067021
067036
067052
067072
067111

MSGO25S

MSGO32
MSGO33
MSGO3S

MSGO36

066763

067151
067170
067273

067276

MSGO37
MSGO38
MSGO39
MSGO40
MSGO41

MSG042
MSGO43
MSG046
MSGO47
MSGO48
MSGO49
MSGOS1
MSGOSS
MSGO56
MSGOS8
MSGO61
MSGO62
MSG063

MSG064
MSG065
MSG066
MSG067
MSGO70
MSGO73
MSGO7S
MSGO76
MSGO77
MSGO79
MSGO8S
MSGO88

MSGO89
MSG090
MSGO91
MSG092
MSGO93
MSG09S
MSG101
MSG102

MSG103
MSG104
MSG105
MSG106
MSG107
MSG11A

MSG1iB
MSG11C
MSG11D
MSG110
MSG111
MSGi12
MSG113
MSG117
MSG119
MSG120
MSG121
MSG122

MSG12S

MACRO V05.01b Fridey 15-Feb-85 16:10
067315
067334
067352
067374
067420

MSG126
MSG127
MSG128
MSG129
MSG130

067712
067745

MTPBO3
MTPBO4

067445
067463
067505
067540
067557
067617
067652
067671
067767
067776
070016
070027
070037
070051
070120
070127
070160
070176
070230
070251
070265
070311
070336

070354
070376
070412
070424
070440
070446
070456
070506

070535
070557
070561
070634
070652
065570

066041
066043
066045
070727
070773
071025
071057
071112
071124
071133
071154
071174

071242

MT0005
MT0006
MT0007
MT0010
MT0014

020140
020222
020256
020320
020354

OLDCSR
ONES
PADDRE
PAFBAF
PAFBAW

002156
002614
002036
014756
015106

025010
025142

MT0030
MT0031

022200
022454

PASSNO
PATERR

002266
002074

002402
022212
015562
024750
025106
026442
027266
027360

MIPB21
MTPB24
MTPB26
MTPCO3
MTPC21
MIPC24
MTPC26
MTPDO3
MTPD21
MIPD26
MTPOOO
MIP001
MTPO02
MTPOOS
MTPO06

026472
027326
027374
025050
026526
027342
027430
025066
026562
027450
024640
024664
024716
025162
025216

MTPOO7
MTPO10
MTP014
MTPO17
MTP020
MTP022
MTPO30
MTPO31
MTPO32
MTPO33
MTPO34
MTPO3S
MTPO36
MTP0O37

027554
027606
027704
027730
030072
030316

MTP043

031030

MT0001
MT0002
MT0003

017544
017640
017754

MTP044
MTP04S
MTPO46
MTP0O47
MIST3
MT0000

MT0004

SEQ 0443

071264
071331
071350
071471
071474

MSIZE
MTA030
MTEST
MTPRO3
MTPAO4
MTPA21
MTPA24
MTPA26

MTP041
MTP042

Page 473-18

025416
025516
025624
026050
026126
026612
027466
027476

030370
030542

031224
031546
031734
032274
011414
017510

020070

MT0017
MT0020
MT0021
MT0022
MT0023
MT0024
MT0026
MT0027

MT0032
MT0033
MT0034

MT0035
MT0036

MT0037
MT0041
MT0042
MT0043
MT0044

MT0045
MT0046
MT0047
MT0999
MT1
MT2
MUT
M1184
NC
NEMCNT
NEWBAN
NEWKER
NEWLOA

NOAPT
NOCH
NOERRO
NOFSMO
NONEM
NONEXI

NOOJ
NOOJ1
NOPAR
NORES
NOSCOP
NOSUPE
NOTAB
NOTRCE
NOUBMT
NO22BI
NULLFL
NXTCSR

OLDCAC

020434
020456
020536
021026
021060
021124
021332
021610
022644
023160
023346
023446
023560
023622
023660
023740
023774
024024
024104
024134
024164
024220
015636

015642
002110
071100
047400
002070
002310
037672
037774
051514
054552
002430
002426
002100
034050

033034
033144
002076
003722
002440
002456
002372
051200
071547
002454
002344
005752

002302

PARBAF
PARBAW
PARCNT
PARITY
PARTHE
PARVEC=
PASCNT
PASFLG
PATPLU
PATTER
PCBUMP
PCONFI
PCONFS
PCONF1
PCONF2
PDP110
PD1
PERAOS
PERBNK
PERECC
PERRAB
PERRAW
PERRA3

PERRA7
PERRO1=
PERRO2=
PERRO3=
PERRO4=
PERROS
PERRO6
PERRO7=
PERR10=
PERR11=
PERR12=
PERR13=
PERR14=
PERR1S=

PERR16=
PERR17=
PERR20=
PERR21=
PERR22=
PERR23=
PERR24=
PERR25=
PERR26=
PERR27=
PERR30=
PERR31=

015260
015410
002072
033744
002304
000114
002570
002264
004644
002112
002326
032722
033334
033242
033302
034140
045472
047614
050446
050526
050264
050212
045040

050336
104427
104430
104431
104432
047610
047636
104433
104434
10443S
104436
104437
104440
104441
104442
104443
104444

104445
104446
104447
104450
104451
104452

104453
104454
104455

PERR32= 104456

CVMJUAAO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15 Feb-85 16:10

Page 473-19

SEQ 0444

Symbol table

PERRA
L~ 104465
PERR42- 104466
PERR4 3= 104467
PERXOR
050422
PFECDF
052732
PFECDH
052672
PFECDT
052722
PFECEM
052636
PFECWS
052626
PFLAG
002122
PGMCSR
002532
PHEBE
012604
PHYADD
002040
PMEMFL
002142
PROTYP
004010
PSIZE
002404

= 177776
PTABLE
030276
PWRVEC= 000024
002436
QUICK
040534
QUIT
040600
QUITL
QVFLAG 002346
PSW

RANODD
027410
ROCHR = 104411
RDDEC = 104414
ROLIN = 104412
RDOCT = 104413
READCS= 104426
READON
002410
REALPA
002300
REFRES
027166
REFSUB
027236
REGCOP
032470
RELENT
037022
036402
RELOCA
RELOC1
037036
RESREG= 104416
RESTAR
002626
RESVEC= 000010
RESO
041350
RES1
041430
RES2
C41576
RLFLAG
002126
RRFLAG
002124
RTNVAL »8000000
RWCSR
006220
SAVCSR
002154

002274
002272
SAVREG= 104415
SAVMON
SAVPAR

003706
003710
002270
002252
016756
026422
016500
000004
172260
172272
172274
172276
002602
002604
002002
040510
011444
040636
172240
172246
172252
172254
172200
040000
002010
002342
SKJ
051226
SKPERR 002066
SKUB
037012
012606
SKUJ
002572
S0BK
SOBLEN= 000056
SOF TPA 002620
002312
SOURCE
002240
SPLTCS

SAV30
SAV32
SAV4
SBEMSK
SBENT
SBESYN
SBETES
SCOPE =
SDPARQ=
SDPARS=
SDPARG6=
SOPAR7=
SEEDHI
SEEDLO
SELONL
SETPAY
SHADL
1
SHUTUP
SIPARQ=
SIPAR3=
SIPARS=
SIPARG6=
SIPDRO=
=
SIZE
SKIPKA
SKIPMK

SSP

ST
STACK
START
START1
STARTZ2
START3
STAR27
STOPOK
STRIPE
SUBAARA
SUBAAB
SUBAAI
SUBAAP
SUBAAR
SUBARS
SUCCES
SUPDOA
SUPDO1
SUPDO2
SuPDO3
SUPDO4

=%000006
177776

PERR33- 104457
PERR34
- 104460
PERR35= 104461
PERR36= 104462
PERR37s 104463
PERR4O= 104464

002000
003670
000300
000310
000200
021634
002420
002366
004702
005032
011440
012766
012172
010454
002334
002262
024270
024304
024446
024462

SUPDRO
SUPDR1
SUPDR2
SUPDR3
SUPDR4
SUPDRS
SUPDR6
SUPLIM
SUPSTK=
SWAPAT
SWR
SWREG =
SWREND
SWRFLG
SWo
SuWl
SW10
SW11
Sul2
SW13
SWi4
SW15
SuWe
SW3
Swa
SWS
SW6

002160
002162
002164
002166
002170
002172
002174
047456
000740
002634
002636
000176

055054
002566

000001
000002
002000
004000
010000

020000
040000
100000
0€0004

000010
000020
000040
000100
000200

000400
001000

104514

TAG704

TAG71$
TAG72$
TAG73$
TAG744
TAG754
TAG76$
TAG77$
TAG783
TAG79¢
TAG9$
18G4¢
TCFIG1
TCFIG2
TCFIG3
TCONFI
TEMP
TESTAD
TESTMO
TIME
TIMEQU
TKVEC =

004012
011046
011102
024364
052736
052746
052756
053026
053066
053100

053112
053156
053164
053244
010710
024542

033404
033444
033600
033336
002434
002412
002552
002340
034114
000060

TMFLAG
TOOMAN
TOTCSR
TRACE
TRAPVE
=
TSTBAN
TSTDAT
TSTRD1
TSTREA=
1571
TS72
1573
1574
T1S1S
1576
TYPDS
TYPEIT
TYPQC
TYPOS
TYPSO
TYPS1

TYPS2
TYPS3
TYPS4
TYPS5
TYPS6
UDPARQ=
UDPAR7=

UFDSET

002134
002406
002224
006216
000034
011302
002246
034542

104510
005630
010460
010644
011526
013552
013624
104405
104401
104402
104403
000000
000002
000000
000000
000000
000000
000002
177660
177676
002000
177640
177642
177644
177646
177650
177652
177654
17760N
002416
040026
037214
002265
037610
000700

UIPARO=
UIPAR]=
UIPAR2=
UIPAR3=
UIPAR4=
UIPARS=
UIPAR6=
UIPDRO=
UNITOP
UNMAP
UNRELO
UPPFLG
USERMA
USESTK=
%000006
usP
VMKOR
003712
WARN1
010776
WARNZ2
024762
WARN3
024776
WARNS
025022
WARNS
025036
WASDBE= 104500
WASSBE= 104476
WAS108= 104501
WAS15B= 104477
WHICHC
044670
WOOPEN
046654
WooPS
046306

WOOPSA

WooPULP
WORST
XOCHAR
XXOPCH
ZEROS
$APTHD
$AUTC
$BANK
$BASE
$BELL
$CACHF
$CACHN
$CBCSR
$CBREG
$CB1CS
$COW1
$COW2
$CHARC
$CHKDI
$CHK1D
$CKSUWR
$CLRCS
$CLR1C
$CMTAG
$CMTGE
$CNTLC
$CNTLG

$CNTLK

046704
046472
002600
047246

002354
002336
056750
002062
002013
056722
002653
034256
034232
034672
035662
034714
056726
056730
047434
035266
035302
054530
035244
035256
002000
002544
055736
055750

055144

055743
056674
002660
054520
$DBLK
$0820
056526
$0DWO
056734
056736
$DDW1
$00W2
056740
056742
$DOW3
$DDW4
056744
$00WS
056746
056732
$00W7
$OEENE
034222
$DEVCT
056656
$DEVM
056724
$D1000= 000000
$DOAGA
014156
$DOAGN
014052
$DOWN
045722
$0TBL
054510
034570
$ECCDI
$ECCIN 034616
034604
$ECC1D
034632
$ECC1I
034644
$ENASB
034660
$ENALS
014042
$ENDAD
034212
$ENERG
$CNTLU

$CPUOP
$CRLF

CVMJUARO MSV11-J MEMORY DIAG.

MACRO V05.01b Friday 15-Feb-85 16:10

$ENV
S$ENVM
$EOQP
$ERFLG
$ERRGE
$ERROR
$ERRTB
$ERRTY
$ERTTL
$ESCAP
$ETABL
SETEND
$EXHAL
$E$
=

056666
056667
013676
002C14
035412
051502
057274
052316
002630
002362
056666
056750
040630
000001

$LL
=
$LOADC
$LPADR
$LPERR
LY
=
$MADR1
$MADR2
$MADR3
$MADR4
$MAIL
$MAMS1
$MAMS2
$MAMS3
$MAMS4

000106
034274
002622
002624
000000
056700
056704
056710
056714
056646
056676
056702
056706
056712

$0¢
=
$PASS
$PASTM
$PATMA
$PERO1
$PERO2
$PERO3
$PERO4
$PERO7
$PER10
$PER11
$PER12
$PER13
$PER14

000000
056654
056756
002012
047456
047504
047532
047562
047644
047666
047716
047736
047760
050000

$PER37
$PER4O
$PWRON
$PWRUP
$QUES
$R
=
$RAND
$ROCHR
$RDDEC
$ROLIN
$RDOCT
$READC
$RESRE
$SAVRE

051136
051142
045352
045726
002657
177771/
056432
055264
056150
055414
056000
034370
056374
056336

$TRAP2 057006
$TRPAD 057026
$TSTM
056754
$TSTRD 034410
$TIYIN 055712
$7YPDS 054304
$TYPE
047122
$TYPEC 047250
$TYPEX 047436
$TYPOC 054102
$TYPON 054116
$TYPOS 054056
$71
= 000000
$72
= 000530

$F$
=
$GTSWR
$HALT
$HALT2
$HIBTS
$HIOCT

000000
054704
052100
057024
056750
056146

$MSGLG
$MSGTY
$MSWR
$MTYP1
$MTYP2
$MTYP3

056664
056646
055755
056677
056703
056707

$PER20
$PER21
$PER22
$PER23
$PER24
$PER25

050102
050120
050140
050156
050174
044756

$SVLAD
$SV$
=
$SWR =
$SWREG
$SYNRE
$7
=

051402
000000
163000
056670
035700
000531

$VECT1
$VECT2
$WASDB
$WASSB
$WAS1D
$WAS1S

$INVAL
$ITEMB
$I$
=
$KERNE
$KMAP

035362
002015
000001
034202
036310

$NOTRA
$NULL
$NWTST=
$OCNT
$0CTVL

057020
002356
000001
054300
056630

$PER27
$PER30
$PER31
$PER32
$PER33

050404
045204
050574
050672
050740

$TKB
$TKS
$TN
=
$TPB
$TPFLG

002644
002642
000007
002650
002360

$LF

002661

$OVER

051416

$PER36

051106

Symbol teble

$FATAL
SFILLC
$FILLS

$ILLUP

$K$
$L

. ABS.

056650
002652
002357

$MBADR
$MNEW
$MSGAD

046300

$MTYP4

= 000103
= 000110
071612
000000

Errors detected:

056752
055766
056662

056713

$0CT8 = 056634
$OMODE 054302
000
001

(RW,1,GBL,ABS,QVR)
(RW,I,LCL,REL,CON)

s*+ Assembler stetistics

Work
Work

file
reads: 1286
file writes: 949

Size of work file: 25487 Words
Size of core pool: 17688 Words

Operating

system: RSX-11M/PLUS

Elapsed time: 00:32:57.57

( 100 Pages)
( 68 Pages)

CVMJAO.BIN, CVMUAO/NL : TOC=CVMJAO/ML
,CVMURO . MAC

$PER1S
$PER16
$PER17

$PER26

$PER34
$PER3S

050022
050044
050064

050364

051020
051052

Page 473-20

$SAVR6 046304
$SCOPE 051146
$STN = 000001

$TESTN

$TPS
$TRAP

056652

002646
056764

SEQ 0445

$UNIT
$UNITM
$USWR

056660
056760
056672

$XTSTR

051274

$Y$
=
$ZAP42
$2¢
=
$$S
=
$$T
=

056716
056720
035100
034734
035214
035050
000000
014022
000000
000000
000512

$3TT = 000520
$OFILL 054301